Module:Page: Difference between revisions

(8 intermediate revisions by 2 users not shown)

Line 23:

-- subpages = require('Module:Page').subpages

-- for page in subpages('Page') do ... end

-- for page in subpages('Page', [{options}]) do ... end

function _M.subpages(title)

function _M.subpages(title, options )

local title, ~~prefix~~ = _M.clean(title);

local title, options, pattern = _M.clean(title), options or {};

~~prefix~~, title = pcall(mw.title.new, title, 0);

if ~~prefix and~~ title then

pattern, title = pcall(mw.title.new, title, 0);

~~local string, frame, expand = mw.ustring, mw:getCurrentFrame~~(~~), mw.text.unstrip;~~

if not pattern or not title then

~~local path = '~~{~~{Special:PrefixIndex/%s/~~}~~}';~~

return ipairs({});

~~prefix = string.len( title.text~~ ) ~~+ 2~~;

elseif not options.ignoreNS and not mw.site.namespaces[title.namespace].hasSubpages then

~~title = string~~.~~gmatch(~~

return ipairs({});

~~expand( frame:preprocess( string~~.~~format(path, title~~.~~prefixedText ) ) ),~~

~~'<a href="~~[~~^"]*"~~ title~~="[^"~~]*">(.~~-)</a>'~~

);

~~else~~

~~prefix = nil~~

~~title = function() return nil end~~

~~end~~

~~return function()~~

~~local pg = title();~~

return ~~pg and sub~~(~~pg, prefix~~) ~~or nil~~;

end

options.ignoreNS = nil;

pattern = table.concat{ string.rep( '.', string.len( title.text ) ), '/', '([^\r\n]+)\r?\n' };

title = title.prefixedText;

local frame, expand, decode = mw:getCurrentFrame(), mw.text.unstrip, mw.text.decode;

local function get(name, options, pattern )

local params = {};

for k,v in pairs(options) do

table.insert( params, table.concat{ k, '=', v ~= nil and tostring(v) or '' } );

end

params = table.concat( params, '|' );

if params ~= "" then params = table.concat{ '|', params }; end

--[[

Due to a change in Scribunto for Lua, expand() will no longer work on special tags,

including <gallery>, <ref> or other costly extension tags (except "#tag:") or special parser

functions which are converted to UNIQ markers starting and ending by an ASCII DEL character ('\127').

mw.text.unstrip() now ONLY expands and unstrips "<nowiki>" tags, and completely kills ALL others

markers without expanding them to their generated HTML!

The actual full expansion of stripped tags can occur only in MediaWiki after return from Lua.

@see https://www.mediawiki.org/wiki/Extension:Scribunto/Lua_reference_manual#mw.text.unstrip

For this reason we only get an empty list of subpages, and we can no longer bypass the costly

expansion limits of "#ifexist:" or costly calls to mw.title.new() by using the Special:prefixindex

parser function...

It is also not possible to use frame:callParserFunction() to process "Special:*" parser functions,

even if they are converted to "#tag:Special*" in Mediawiki, they are stripped in MediaWiki,

but they not found by Lua's frame:callParserFunction().

As well frame:extensionTag() cannot be used and generate the same error in Lua (tag "special" not found).

--]]

params = expand( frame:preprocess( string.format('{{special:prefixindex/%s/%s}}', name, params) ) );

params = string.gsub( params, '%b<>', function(tag) return tag == '</a>' and '\n' or ''; end );

options = {}

for k in string.gmatch( params, pattern ) do table.insert( options, decode(k) ); end

return options;

end;

local subpages = get( title, options, pattern );

return function(title, last)

local page;

while true do

page = table.remove( subpages, 1 );

if page ~= nil then return page, last; end

options.from = table.concat{ title, '/', last };

subpages = get( title, options, pattern );

table.remove( subpages, 1 );

if #subpages == 0 then

return nil;

end

end, title;

end

return _M

commons>Verdy p