Module:PageSummary

2026-02-17T16:46:26Z

240D:C010:18:4:0:0:0:87：

local p = {}

local function stripImages(text)
if not text or text == "" then return "" end
text = text:gsub("%[%[(文件|Image|图像):", "[[File:")
:gsub("%[%[(分类|Category):", "[[Category:")
local out = {}
local i = 1
local len = #text
while i <= len do
if text:byte(i) == 91 and text:byte(i+1) == 91 then
local chunk = text:sub(i, i+15)
if chunk:match("^%[%[File:") or chunk:match("^%[%[Category:") then
local depth = 1
local j = i + 2
while j <= len and depth > 0 do
if text:byte(j) == 91 and text:byte(j+1) == 91 then
depth = depth + 1
j = j + 2
elseif text:byte(j) == 93 and text:byte(j+1) == 93 then
depth = depth - 1
j = j + 2
else
j = j + 1
end
end
i = j
else
table.insert(out, text:sub(i, i+1))
i = i + 2
end
else
table.insert(out, text:sub(i, i))
i = i + 1
end
if i > 1200 then break end
end
return table.concat(out)
end

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)
end

function p.getSummaryAndImage(frame)
local pageName = mw.text.trim(frame.args[1] or "")
if pageName == "" then return "" end

local title = mw.title.new(pageName)
if not title or not title.exists then return "" end

local content = title:getContent()
if not content or content == "" then return "" end

local rawExcerpt = mw.ustring.sub(content, 1, 800) or ""

-- 强力提取第一张图片（只抓有效文件名）
local firstImage = mw.ustring.match(rawExcerpt, "%[%[File:([^|%]]+)")
or mw.ustring.match(rawExcerpt, "%[%[文件:([^|%]]+)")

-- 超级严格验证：必须是图片文件名（含 ":" 和 "."）
if firstImage then
firstImage = mw.text.trim(firstImage)
firstImage = mw.ustring.gsub(firstImage, "[%z%s<>\"]+", "")
if not mw.ustring.find(firstImage, ":") or not mw.ustring.find(firstImage, "%.") or mw.ustring.len(firstImage) < 6 then
firstImage = nil
end
end

local step1 = stripImages(rawExcerpt) or ""
local cleanText = cleanFinal(step1) or ""

local targetLen = 120
local summary = cleanText:sub(1, targetLen * 2) or ""

local ulen = mw.ustring.len(summary) or 0
if ulen > targetLen then
summary = mw.ustring.sub(summary, 1, targetLen) or ""
local rev = summary:reverse()
local lastBreak = rev:find("[ %s%p，。！？；：,…]") or 1
if lastBreak > 1 and lastBreak < 20 then
summary = mw.ustring.sub(summary, 1, #summary - lastBreak + 1) or ""
end
summary = mw.text.trim(summary) .. "..."
end
summary = mw.text.trim(summary)

local container = mw.html.create('div')
:css('margin-bottom', '25px')
:css('display', 'flow-root')

container:tag('div')
:css('font-size', '1.3em')
:css('font-weight', 'bold')
: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 and firstImage ~= "" then
textDiv:wikitext('[[' .. firstImage .. '|120px|right|link=' .. pageName .. ']]')
end

textDiv:wikitext(summary)

return tostring(container)
end

return p

Module:PageSummary

2026-02-17T16:07:31Z

240D:C010:18:4:0:0:0:87：

function p.getSummaryAndImage(frame)
local pageName = mw.text.trim(frame.args[1] or "")
if pageName == "" then return "" end

local title = mw.title.new(pageName)
if not title or not title.exists then return "" end

local content = title:getContent()
if not content or content == "" then return "" end

local rawExcerpt = mw.ustring.sub(content, 1, 500) or "" -- 再加大范围，增加抓图概率

-- 提取第一张图片 - 严格匹配，只取文件名部分
local firstImage = nil
for _, prefix in ipairs({"File:", "文件:", "Image:", "图像:"}) do
firstImage = mw.ustring.match(rawExcerpt, "%[%[" .. prefix .. "([^|%]]+)")
if firstImage then break end
end

-- 备用匹配：如果上面失败，尝试抓完整链接并验证
if not firstImage then
local fullLink = mw.ustring.match(rawExcerpt, "%[%[([^%]]+)%]%]")
if fullLink then
local ns, fname = mw.ustring.match(fullLink, "^([^:]+):(.+)$")
if ns and (ns:lower() == "file" or ns == "文件" or ns:lower() == "image" or ns == "图像") then
firstImage = ns .. ":" .. fname
end
end
end

-- 清理 & 验证
if firstImage then
firstImage = mw.text.trim(firstImage)
firstImage = mw.ustring.gsub(firstImage, "[%z%s<>\"]+", "") -- 去掉非法字符
if firstImage == "" or mw.ustring.len(firstImage) < 3 then
firstImage = nil -- 太短或空，视为无效
end
end

local step1 = stripImages(rawExcerpt) or ""
local cleanText = cleanFinal(step1) or ""

local targetLen = 120
local summary = cleanText:sub(1, targetLen * 2) or ""

local ulen = mw.ustring.len(summary) or 0
if ulen > targetLen then
summary = mw.ustring.sub(summary, 1, targetLen) or ""

local rev = summary:reverse()
local lastBreak = rev:find("[ %s%p，。！？；：,…]") or 1
if lastBreak > 1 and lastBreak < 20 then
summary = mw.ustring.sub(summary, 1, #summary - lastBreak + 1) or ""
end

summary = mw.text.trim(summary) .. "..."
end

summary = mw.text.trim(summary)

-- HTML 构建
local container = mw.html.create('div')
:css('margin-bottom', '25px')
:css('display', 'flow-root')

container:tag('div')
:css('font-size', '1.3em')
:css('font-weight', 'bold')
: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')

-- 只在有有效图片时输出 wikitext（避免泄漏参数）
if firstImage and firstImage ~= "" then
local imgWikitext = '[[' .. firstImage .. '|120px|right|link=' .. pageName .. ']]'
textDiv:wikitext(imgWikitext)
end -- 如果没图，就只显示文字摘要

textDiv:wikitext(summary)

return tostring(container)
end

武外梗百科 - 用户贡献 [zh]

Module:PageSummary

Module:PageSummary