“Module:Lockbox/sandbox”的意思、由来-开放百科全书

词条

Module:Lockbox/sandbox

释义

local export = {}

-- XXX: OUTRAGEOUS ABUSE OF SCRIBUNTO API-- Generates a transclusion without incrementing the "expensive function" count

local generate_transclusion

local mock_title = mw.title.new(mw.title.getCurrentTitle().id)

local getContent = mock_title.getContent

function generate_transclusion(title)

local full_text = type(title) == 'table' and title.fullText or title

rawset(mock_title, 'fullText', full_text)

getContent(mock_title)

end

local function make_wikitext_warning(msg)

return string.format('Warning: %s.', msg)

end

function export.lock(frame)

local warnings, transclusion_list = {}, {}

-- Check if the transcluding page is cascade-protected.

-- Only pages transcluded from a cascade-protected page appear in

-- CASCADINGSOURCES, so normally we would not be able to tell if the lockbox

-- itself is cascade-protected. To work around this, we generate a

-- transclusion from the lockbox to itself, so that it will have an entry

-- for itself in CASCADINGSOURCES.

-- We cannot generate this transclusion using the title object for the

-- parent title (the lockbox), as if the lockbox is transcluded on another

-- page, we will generate a transclusion *from* the lockbox *to* that page

-- as well, and the page will be cascade-protected. Instead we generate it

-- with the title object for the current title.

-- When the current title is the parent title (i.e. we are rendering the

-- lockbox page), this creates the required entry in the link table in the

-- database. When the current title is the grandparent title or up (i.e. we

-- are rendering a page transcluding the lockbox), transclusions are only

-- created from the page itself, not from the lockbox, and it is not

-- cascade-protected.

-- This creates an extaneous self-transclusion for all pages using the

-- module, but we treat that as a necessary evil.

-- XXX: there seems to be no way to check for cascading protection using a

-- Scribunto API, so we have to use frame:preprocess with the

-- CASCADINGSOURCES parser function.

mw.title.getCurrentTitle():getContent() -- Generate self-transclusion

local parent_title = frame:getParent():getTitle()

if frame:preprocess('{{CASCADINGSOURCES:' .. parent_title .. '}}') == then

warnings[#warnings + 1] = make_wikitext_warning(string.format(

'the page "%s" is not cascade-protected',

parent_title

))

end

-- Generate transclusions to the templates, and build the output list.

for i, item in ipairs(frame.args) do

item = mw.text.trim(item)

local title = mw.title.new(item)

if title then

local ns = title.namespace

local prefixed_text = title.prefixedText

if ns == 0 then

-- The item had no namespace text. If the item starts with a

-- colon, assume it is a mainspace page. Otherwise, assume it is

-- a template.

if item:sub(1, 1) == ':' then

generate_transclusion(title)

table.insert(transclusion_list, '* ' .. prefixed_text .. '')

else

generate_transclusion('Template:' .. prefixed_text)

table.insert(transclusion_list, '* ' .. prefixed_text .. '')

end

elseif ns == 6 or ns == 14 then -- File or Category namespace

generate_transclusion(title)

table.insert(transclusion_list, '* ' .. prefixed_text .. '')

else

generate_transclusion(title)

table.insert(transclusion_list, '* ' .. prefixed_text .. '')

end

else

warnings[#warnings + 1] = make_wikitext_warning(string.format(

'invalid title "%s" in argument #%d',

item,

))

end

if frame.args.silent then

return

else

-- If there were any warnings, show them at the top. Then show the list

-- of transcluded pages.

local ret =

if #warnings > 0 then

if #warnings > 1 then

for i, warning in ipairs(warnings) do

warnings[i] = '* ' .. warning

end

ret = ret .. table.concat(warnings, '\') .. '\\'

end

return ret .. table.concat(transclusion_list, '\')

end

return export

随便看

开放百科全书收录14589846条英语、德语、日语等多语种百科知识，基本涵盖了大多数领域的百科知识，是一部内容自由、开放的电子版国际百科全书。