打开/关闭菜单
60
73
29
1.1K
武外梗百科
打开/关闭外观设置菜单
打开/关闭个人菜单
未登录
未登录用户的IP地址会在进行任意编辑后公开展示。

Module:PageSummary:修订间差异

武外梗百科 爱国好学自强图新的百科全书
无编辑摘要
无编辑摘要
 
(未显示17个用户的30个中间版本)
第1行: 第1行:
local p = {}
local p = {}


-- 更高效的图片/链接/分类剥离(避免逐字符 + 频繁 sub)
-- 強化版清理:徹底根除內文圖片,保留加粗和連結
local function stripImages(text)
local function cleanContent(text)
     if not text or text == "" then return "" end
     if not text then return "" end
 
    -- 1. 基礎清理(注釋、腳注、表格、模板)
    text = mw.ustring.gsub(text, "<!%-%-.-%-%->", "")
    text = mw.ustring.gsub(text, "<ref[^>]*>.-</ref>", "")
    text = mw.ustring.gsub(text, "<ref[^>]-/>", "")
      
      
     -- 预先把常见命名空间前缀统一处理,减少后续匹配分支
     -- 移除表格 {| ... |}
     text = text:gsub("%[%[(文件|File|Image|图像):", "[[File:")
    local prev
      
     repeat
     local out = {}
        prev = text
     local i = 1
        text = mw.ustring.gsub(text, "{|[^{}]*|}", "")
     local len = #text   -- 优先用字节长度,性能更好(中文环境影响可接受)
     until text == prev
      
 
     while i <= len do
     -- 移除模板 {{ ... }}
         local byte = text:byte(i)
     local count = 0
         if byte == 91 and text:byte(i+1) == 91 then  -- [[
     repeat
             local chunk = text:sub(i, i+12)
        prev = text
             if chunk:match("^%[%[File:")  
        text = mw.ustring.gsub(text, "{{[^{}]-}}", "")
                or chunk:match("^%[%[Category:")
        count = count + 1
                or chunk:match("^%[%[分类:")
    until text == prev or count > 10
            then
 
                -- 跳过整段 [[...]]
     -- 2. 使用安全占位符保護連結,剔除圖片
                local depth = 1
     repeat
                local j = i + 2
         prev = text
                while j <= len and depth > 0 do
         text = mw.ustring.gsub(text, "%[%[%s*([^%[%]]-)%s*%]%]", function(inner)
                    if text:byte(j) == 91 and text:byte(j+1) == 91 then
             local low = mw.ustring.lower(inner)
                        depth = depth + 1
             if low:match("^file:") or low:match("^image:") or
                        j = j + 2
              low:match("^文件:") or low:match("^圖像:") or
                    elseif text:byte(j) == 93 and text:byte(j+1) == 93 then
              low:match("^category:") or low:match("^分類:") then
                        depth = depth - 1
                 return ""  
                        j = j + 2
                    else
                        j = j + 1
                    end
                 end
                i = j
            else
                -- 普通 [[ ,保留
                table.insert(out, "[")
                i = i + 1
             end
             end
        else
             return "LINKSTART" .. inner .. "LINKEND"
             table.insert(out, text:sub(i, i))
        end)
            i = i + 1
    until text == prev
        end
 
       
    -- 3. 清理剩餘雜質
        -- 安全阀(防止极端情况卡死)
    text = mw.ustring.gsub(text, "\n==+.-==+", " ")
        if i > 800 then break end
     text = mw.ustring.gsub(text, "\n%s*[*#:]+", " ")
     end
     text = mw.ustring.gsub(text, "\n+", " ")
      
     text = mw.ustring.gsub(text, "%s+", " ")
     return table.concat(out)
end


    -- 4. 初步恢復連結標籤
    text = mw.ustring.gsub(text, "LINKSTART", "[[")
    text = mw.ustring.gsub(text, "LINKEND", "]]")


-- 合并多次 gsub,提升正则效率
local function cleanFinal(text)
    if not text or text == "" then return "" end
   
    -- 一次性处理多种需要删除的模式
    text = text
        :gsub("{{[^{}]*}}", "")                -- 模板(包括嵌套一层的情况已足够)
        :gsub("<ref.-</?ref[^>]*>", "")        -- 参考文献(更宽松匹配)
        :gsub("<!%-%-.-%-%->", "")              -- 注释
        :gsub("\n==+.+==+", " ")                -- 标题
        :gsub("\n%s*[*#:;]+", " ")              -- 列表
        :gsub("%s*\n%s*", " ")                  -- 换行 → 空格(合并多行)
        :gsub("%s+", " ")                      -- 压缩连续空格
   
     return mw.text.trim(text)
     return mw.text.trim(text)
end
end


function p.getSummaryAndImage(frame)
function p.getSummaryAndImage(frame)
     local pageName = mw.text.trim(frame.args[1] or "")
     local pageName = frame.args[1] or ""
    if pageName == "" then return "" end
   
     local title = mw.title.new(pageName)
     local title = mw.title.new(pageName)
     if not title or not title.exists then return "" end
     if not title or not title.exists then return "" end
    -- 【調整】讀取前 1000 字以確保跨過開頭的表格/模板區
    local rawContent = title:getContent() or ""
    local limitedContent = mw.ustring.sub(rawContent, 1, 1000)
    -- 1. 提取第一張縮圖名
    local firstImage = mw.ustring.match(limitedContent, "%[%[%s*[Ff]ile%s*:([^|%]%s\n]+)") or
                      mw.ustring.match(limitedContent, "%[%[%s*文件%s*:([^|%]%s\n]+)") or
                      mw.ustring.match(limitedContent, "%[%[%s*[Ii]mage%s*:([^|%]%s\n]+)")
    -- 2. 執行清理(此時會得到過濾掉干擾後的純文字)
    local cleanText = cleanContent(limitedContent)
      
      
     local content = title:getContent()
    -- 3. 【調整】最終截取約 80 字
     if not content then return "" end
     local targetLen = 80
     local summary = ""
      
      
     -- 只取前450字节(中文约200-300字),足够提取首图 + 摘要
     if mw.ustring.len(cleanText) <= targetLen then
    local rawExcerpt = content:sub(1, 450)
        summary = cleanText
   
     else
    -- 提取第一张图片(更宽松匹配,兼容更多写法)
        -- 截取前 80 字並加上省略號
    local firstImage = rawExcerpt:match("%[%[(File|文件|Image|图像):([^|%]]+)")
        summary = mw.ustring.sub(cleanText, 1, targetLen) .. "..."
      
       
    -- 核心剥离 + 清理
        -- 閉合加粗標籤 '''
    local step1  = stripImages(rawExcerpt)
        local _, opens = mw.ustring.gsub(summary, "'''", "")
    local cleanText = cleanFinal(step1)
        if opens % 2 ~= 0 then summary = summary .. "'''" end
   
    local targetLen = 120
    local summary = cleanText:sub(1, targetLen * 2) -- 多取一点,后面精确截断
   
    -- 更安全的截断(避免截断在 [[ 中间)
    local len = mw.ustring.len(summary)
    if len > targetLen then
        summary = mw.ustring.sub(summary, 1, targetLen)
          
          
         -- 简单向后找最近的空格或标点,避免断字
         -- 閉合或清理截斷的連結 [[...
         local lastSpace = summary:reverse():find("[ %s%p]") or 1
         if mw.ustring.match(summary, "%[%[[^%]]*$") then
        if lastSpace > 1 and lastSpace < 15 then
             summary = mw.ustring.gsub(summary, "%[%[[^%]]*$", "") .. "..."
             summary = mw.ustring.sub(summary, 1, #summary - lastSpace + 1)
         end
         end
        summary = mw.text.trim(summary) .. "..."
     end
     end
   
 
     -- HTML 构建部分基本保持原样(性能占比很低)
     -- 4. 渲染 HTML
     local container = mw.html.create('div')
     local res = mw.html.create('div'):css({
        :css('margin-bottom', '25px')
        ['display'] = 'flow-root',  
         :css('display', 'flow-root')
        ['line-height'] = '1.5',
         ['margin-bottom'] = '1em' -- 也可以通过这里控制整个组件下方的间距
    })
      
      
     -- 标题
     -- 标题
     container:tag('div')
     res:tag('div')
        :css('font-size', '1.3em')
      :css({['font-size'] = '1.15em', ['font-weight'] = 'bold', ['margin-bottom'] = '4px'})
        :css('font-weight', 'bold')
      :wikitext('[[' .. pageName .. ']]')
        :css('margin-bottom', '6px')
 
        :css('border-bottom', '1px solid #eee')
     -- 右侧缩略图
        :wikitext('[[' .. pageName .. ']]')
   
    -- 内容区
    local textDiv = container:tag('div')
        :css('line-height', '1.6')
        :css('color', '#222')
        :css('font-size', '14px')
   
     -- 图片右浮 + 链接到页面
     if firstImage then
     if firstImage then
         textDiv:wikitext(
         res:wikitext('[[File:' .. firstImage .. '|100px|right|link=' .. pageName .. ']]')
            '[[' .. firstImage .. '|120px|right|link=' .. pageName .. ']]'
        )
     end
     end
      
 
     textDiv:wikitext(summary)
     -- 摘要正文:在末尾增加空行
   
     -- 方法:在 summary 字符串后直接加上 <br /> 或 \n\n
     return tostring(container)
    res:tag('div')
      :wikitext(summary .. '<br /><br />')  
 
     return tostring(res)
end
end


return p
return p

2026年2月18日 (三) 13:35的最新版本

此模块的文档可以在Module:PageSummary/doc创建

local p = {}

-- 強化版清理:徹底根除內文圖片,保留加粗和連結
local function cleanContent(text)
    if not text then return "" end

    -- 1. 基礎清理(注釋、腳注、表格、模板)
    text = mw.ustring.gsub(text, "<!%-%-.-%-%->", "")
    text = mw.ustring.gsub(text, "<ref[^>]*>.-</ref>", "")
    text = mw.ustring.gsub(text, "<ref[^>]-/>", "")
    
    -- 移除表格 {| ... |}
    local prev
    repeat
        prev = text
        text = mw.ustring.gsub(text, "{|[^{}]*|}", "")
    until text == prev

    -- 移除模板 {{ ... }}
    local count = 0
    repeat
        prev = text
        text = mw.ustring.gsub(text, "{{[^{}]-}}", "")
        count = count + 1
    until text == prev or count > 10

    -- 2. 使用安全占位符保護連結,剔除圖片
    repeat
        prev = text
        text = mw.ustring.gsub(text, "%[%[%s*([^%[%]]-)%s*%]%]", function(inner)
            local low = mw.ustring.lower(inner)
            if low:match("^file:") or low:match("^image:") or 
               low:match("^文件:") or low:match("^圖像:") or
               low:match("^category:") or low:match("^分類:") then
                return "" 
            end
            return "LINKSTART" .. inner .. "LINKEND"
        end)
    until text == prev

    -- 3. 清理剩餘雜質
    text = mw.ustring.gsub(text, "\n==+.-==+", " ") 
    text = mw.ustring.gsub(text, "\n%s*[*#:]+", " ")
    text = mw.ustring.gsub(text, "\n+", " ")
    text = mw.ustring.gsub(text, "%s+", " ")

    -- 4. 初步恢復連結標籤
    text = mw.ustring.gsub(text, "LINKSTART", "[[")
    text = mw.ustring.gsub(text, "LINKEND", "]]")

    return mw.text.trim(text)
end

function p.getSummaryAndImage(frame)
    local pageName = frame.args[1] or ""
    local title = mw.title.new(pageName)
    if not title or not title.exists then return "" end

    -- 【調整】讀取前 1000 字以確保跨過開頭的表格/模板區
    local rawContent = title:getContent() or ""
    local limitedContent = mw.ustring.sub(rawContent, 1, 1000)

    -- 1. 提取第一張縮圖名
    local firstImage = mw.ustring.match(limitedContent, "%[%[%s*[Ff]ile%s*:([^|%]%s\n]+)") or 
                       mw.ustring.match(limitedContent, "%[%[%s*文件%s*:([^|%]%s\n]+)") or
                       mw.ustring.match(limitedContent, "%[%[%s*[Ii]mage%s*:([^|%]%s\n]+)")

    -- 2. 執行清理(此時會得到過濾掉干擾後的純文字)
    local cleanText = cleanContent(limitedContent)
    
    -- 3. 【調整】最終截取約 80 字
    local targetLen = 80
    local summary = ""
    
    if mw.ustring.len(cleanText) <= targetLen then
        summary = cleanText
    else
        -- 截取前 80 字並加上省略號
        summary = mw.ustring.sub(cleanText, 1, targetLen) .. "..."
        
        -- 閉合加粗標籤 '''
        local _, opens = mw.ustring.gsub(summary, "'''", "")
        if opens % 2 ~= 0 then summary = summary .. "'''" end
        
        -- 閉合或清理截斷的連結 [[...
        if mw.ustring.match(summary, "%[%[[^%]]*$") then
            summary = mw.ustring.gsub(summary, "%[%[[^%]]*$", "") .. "..."
        end
    end

    -- 4. 渲染 HTML
    local res = mw.html.create('div'):css({
        ['display'] = 'flow-root', 
        ['line-height'] = '1.5',
        ['margin-bottom'] = '1em' -- 也可以通过这里控制整个组件下方的间距
    })
    
    -- 标题
    res:tag('div')
       :css({['font-size'] = '1.15em', ['font-weight'] = 'bold', ['margin-bottom'] = '4px'})
       :wikitext('[[' .. pageName .. ']]')

    -- 右侧缩略图
    if firstImage then
        res:wikitext('[[File:' .. firstImage .. '|100px|right|link=' .. pageName .. ']]')
    end

    -- 摘要正文:在末尾增加空行
    -- 方法:在 summary 字符串后直接加上 <br /> 或 \n\n
    res:tag('div')
       :wikitext(summary .. '<br /><br />') 

    return tostring(res)
end

return p