Module:PageSummary

2026-02-17T16:15:17Z

240D:C010:77:8:0:0:0:AE：

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, 600) or ""

-- Extract first image filename (improved pattern to handle your example)
local firstImage = nil
for _, prefix in ipairs({"File:", "文件:"}) do -- Image/图像 rarely used here
firstImage = mw.ustring.match(rawExcerpt, "%[%[" .. prefix .. "([^|%]]+)")
if firstImage then break end
end

-- Fallback: full link check
if not firstImage then
local full = mw.ustring.match(rawExcerpt, "%[%[([^%]]+)%]%]")
if full then
local ns, name = mw.ustring.match(full, "^([^:]+):(.+)$")
if ns and (ns == "File" or ns == "文件") then
firstImage = ns .. ":" .. name
end
end
end

if firstImage then
firstImage = mw.text.trim(firstImage)
firstImage = mw.ustring.gsub(firstImage, "[%z%s<>\"]+", "")
if mw.ustring.len(firstImage) < 5 or not mw.ustring.find(firstImage, "%.[a-zA-Z]+$") then
firstImage = nil -- invalid filename
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

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

Module:PageSummary