| Line 1: |
Line 1: |
| | + | require('strict') |
| | + | |
| | local p = {} | | local p = {} |
| | local getArgs = require('Module:Arguments').getArgs | | local getArgs = require('Module:Arguments').getArgs |
| | | | |
| − | -- _fetch looks at the "demo" argument.
| + | local _fetch = require('Module:Transclusion_count')._fetch -- _fetch looks at the 'demo' argument |
| − | local _fetch = require('Module:Transclusion_count')._fetch | |
| | local yesno = require('Module:Yesno') | | local yesno = require('Module:Yesno') |
| | | | |
| | + | local lang_obj = mw.getContentLanguage() -- this here because the language object is used multiple places in the module |
| | + | local large_count_cutoff = 100000 |
| | + | local approx_num_total_pages = 63000000 |
| | + | |
| | + | local user_subpage_info_page = 'Wikipedia:User pages#SUB' |
| | + | local sandbox_module_page = 'Module:Sandbox' |
| | + | local system_messages_cat = 'Pages used in system messages needing protection' |
| | + | local sandbox_word = 'sandbox' |
| | + | local testcases_word = 'testcases' |
| | + | local doc_word = 'doc' |
| | + | |
| | + | local function count_from_args(args) |
| | + | if tonumber(args.count) then -- check if function has already been used |
| | + | return tonumber(args.count) -- early exit if so |
| | + | end |
| | + | |
| | + | local count |
| | + | |
| | + | if yesno(args['fetch']) ~= false then |
| | + | count = _fetch(args) -- fetch transclusion count |
| | + | end |
| | + | |
| | + | -- use explicitly-provided count when fetch fails |
| | + | if count == nil and args[1] ~= nil and args[1] ~= '' then |
| | + | -- convert local language number string to a number understandable by Lua |
| | + | count = mw.ustring.gsub(args[1], '+$', '') |
| | + | count = lang_obj:parseFormattedNumber(args[1]) |
| | + | end |
| | + | |
| | + | -- in case someone writes a non-positive number |
| | + | if count and count > 0 then |
| | + | return count |
| | + | end |
| | + | |
| | + | return nil |
| | + | end |
| | + | |
| | + | -- Actions if there is a large (greater than or equal to 100,000) transclusion count |
| | + | local function risk_boolean(args) |
| | + | if args.risk == true or args.risk == false then |
| | + | return args.risk |
| | + | elseif args[1] == 'risk' then |
| | + | return true |
| | + | else |
| | + | local count = count_from_args(args) |
| | + | if count and count >= large_count_cutoff then |
| | + | return true |
| | + | end |
| | + | end |
| | + | return false |
| | + | end |
| | + | |
| | + | -- function retained for backwards compatibility |
| | + | function p._risk(args) |
| | + | return risk_boolean(args) and 'risk' or '' |
| | + | end |
| | + | |
| | + | -- function retained for backwards compatibility |
| | + | function p.risk(frame) |
| | + | return p._risk(getArgs(frame)) |
| | + | end |
| | + | |
| | + | -- count and no_percent arguments retained for backwards compatibility |
| | function p._num(args, count, no_percent) | | function p._num(args, count, no_percent) |
| | if count == nil then | | if count == nil then |
| − | if yesno(args['fetch']) == false then | + | count = count_from_args(args) |
| − | if (args[1] or '') ~= '' then count = tonumber(args[1]) end
| |
| − | else
| |
| − | count = _fetch(args)
| |
| − | end
| |
| | end | | end |
| | + | args.count = count |
| | + | args.risk = risk_boolean(args) |
| | | | |
| | -- Build output string | | -- Build output string |
| − | local return_value = "" | + | local return_value = '' |
| − | if count == nil then | + | if args.count == nil and args.risk then |
| − | if args[1] == "risk" then
| + | return 'a very large number of' |
| − | return "a very large number of"
| + | elseif args.count == nil then |
| − | else | + | return 'many' |
| − | return "many"
| |
| − | end
| |
| | else | | else |
| | -- Use 2 significant figures for smaller numbers and 3 for larger ones | | -- Use 2 significant figures for smaller numbers and 3 for larger ones |
| | local sigfig = 2 | | local sigfig = 2 |
| − | if count >= 100000 then | + | if args.count >= large_count_cutoff then |
| | sigfig = 3 | | sigfig = 3 |
| | end | | end |
| | | | |
| | -- Prepare to round to appropriate number of sigfigs | | -- Prepare to round to appropriate number of sigfigs |
| − | local f = math.floor(math.log10(count)) - sigfig + 1 | + | local f = math.floor(math.log10(args.count)) - sigfig + 1 |
| | | | |
| − | -- Round and insert "approximately" or "+" when appropriate | + | -- Round and insert 'approximately' or '+' when appropriate |
| − | if (args[2] == "yes") or (type(args[1]) == 'string' and (mw.ustring.sub(args[1],-1) == "+")) then | + | if yesno(args[2]) == true or (type(args[1]) == 'string' and (mw.ustring.sub(args[1], -1) == '+')) then |
| | -- Round down | | -- Round down |
| − | return_value = string.format("%s+", mw.getContentLanguage():formatNum(math.floor( (count / 10^(f)) ) * (10^(f))) ) | + | return_value = string.format('%s+', lang_obj:formatNum(math.floor( (args.count / 10^(f)) ) * (10^(f))) ) |
| | else | | else |
| | -- Round to nearest | | -- Round to nearest |
| − | return_value = string.format("approximately %s", mw.getContentLanguage():formatNum(math.floor( (count / 10^(f)) + 0.5) * (10^(f))) ) | + | return_value = string.format('approximately %s', lang_obj:formatNum(math.floor( (args.count / 10^(f)) + 0.5) * (10^(f))) ) |
| | end | | end |
| − | | + | |
| | -- Insert percentage of pages if that is likely to be >= 1% and when |no-percent= not set to yes | | -- Insert percentage of pages if that is likely to be >= 1% and when |no-percent= not set to yes |
| − | no_percent = no_percent or args['no-percent'] | + | no_percent = yesno(no_percent or args['no-percent']) |
| − | if count and count > 250000 and not yesno (no_percent) then | + | if args.count and args.count >= approx_num_total_pages/100 and not no_percent then |
| − | local numpages = mw.getCurrentFrame():callParserFunction('NUMBEROFPAGES', 'R') | + | local num_total_pages = mw.getCurrentFrame():callParserFunction('NUMBEROFPAGES', 'R') |
| − | local percent = math.floor( ( ( count/numpages ) * 100) + 0.5) | + | local total_percent = math.floor( ( ( args.count/num_total_pages ) * 100) + 0.5) |
| − | if percent >= 1 then | + | |
| − | return_value = string.format("%s pages, or roughly %s%% of all", return_value, percent) | + | if total_percent >= 1 then |
| | + | return_value = string.format('%s pages, or roughly %s%% of all', return_value, total_percent) |
| | end | | end |
| | end | | end |
| Line 56: |
Line 117: |
| | end | | end |
| | | | |
| | + | -- used by [[Template:Stub documentation]] and other pages |
| | + | -- count argument retained for backwards compatibility |
| | function p.num(frame, count) | | function p.num(frame, count) |
| | return p._num(getArgs(frame), count) | | return p._num(getArgs(frame), count) |
| | end | | end |
| | | | |
| − | -- Actions if there is a large (greater than or equal to 100,000) transclusion count | + | -- count argument retained for backwards compatibility |
| − | function p._risk(args)
| |
| − | if args[1] == "risk" then
| |
| − | return "risk"
| |
| − | else
| |
| − | local count = _fetch(args)
| |
| − | if count and count >= 100000 then
| |
| − | return "risk"
| |
| − | end
| |
| − | end
| |
| − | return ""
| |
| − | end
| |
| − | | |
| − | function p.risk(frame)
| |
| − | return p._risk(getArgs(frame))
| |
| − | end
| |
| − | | |
| | function p._text(args, count) | | function p._text(args, count) |
| − | -- Only show the information about how this template gets updated if someone | + | --[=[ |
| − | -- is actually editing the page and maybe trying to update the count.
| + | Only show the information about how this template gets updated |
| − | local bot_text = (mw.getCurrentFrame():preprocess("{{REVISIONID}}") == "") and "\n\n----\n'''Preview message''': Transclusion count updated automatically ([[Template:High-use/doc#Technical details|see documentation]])." or '' | + | if someone is actually editing the page and maybe trying to update the count. |
| | + | ]=] |
| | + | local bot_text = (mw.getCurrentFrame():preprocess('{{REVISIONID}}') == '') and ("\n\n----\n'''Preview message''':" .. ' Transclusion count updated automatically ([[Template:High-use/doc#Technical details|see documentation]]).') or '' |
| | | | |
| | if count == nil then | | if count == nil then |
| − | if yesno(args['fetch']) == false then | + | count = count_from_args(args) |
| − | if (args[1] or '') ~= '' then count = tonumber(args[1]) end
| |
| − | else
| |
| − | count = _fetch(args)
| |
| − | end
| |
| | end | | end |
| − | local title = mw.title.getCurrentTitle() | + | args.count = count |
| − | if ( (args.demo or '' ~= '') and mw.title.new(args.demo, 10) ) then | + | args.risk = risk_boolean(args) |
| − | title = mw.title.new(args.demo, 10) | + | |
| | + | -- trim /doc, /sandbox and /testcases |
| | + | local title = args.title or (args.demo and args.demo ~= '' and mw.title.new(args.demo, 'Template')) or mw.title.getCurrentTitle() |
| | + | if title.subpageText == doc_word or title.subpageText == sandbox_word or title.subpageText == testcases_word then |
| | + | title = title.basePageTitle |
| | end | | end |
| − | | + | |
| − | if title.subpageText == "doc" or title.subpageText == "sandbox" then | + | -- use /testcases of base template |
| − | title = title.basePageTitle | + | local testcases_page = mw.title.new(title.prefixedText .. '/' .. testcases_word) |
| | + | -- exists is expensive |
| | + | while testcases_page.basePageTitle.isSubpage and not testcases_page.exists do |
| | + | testcases_page = mw.title.new(testcases_page.basePageTitle.basePageTitle.prefixedText .. '/' .. testcases_word) |
| | end | | end |
| | | | |
| Line 103: |
Line 155: |
| | local templateCount = ('on [https://linkcount.toolforge.org/?project=%s&page=%s#transclusions %s pages]'):format( | | local templateCount = ('on [https://linkcount.toolforge.org/?project=%s&page=%s#transclusions %s pages]'):format( |
| | title:fullUrl():gsub('//(.-)/.*', '%1'), | | title:fullUrl():gsub('//(.-)/.*', '%1'), |
| − | mw.uri.encode(title.fullText), p._num(args, count)) | + | mw.uri.encode(title.fullText), p._num(args)) |
| − | local used_on_text = "'''This " .. (title.namespace == 828 and "Lua module" or "template") .. ' is used '; | + | local used_on_text = "'''This " .. (title:inNamespace('Module') and 'Lua module' or 'template') .. ' is used ' |
| | if systemMessages then | | if systemMessages then |
| | used_on_text = used_on_text .. args['system'] .. | | used_on_text = used_on_text .. args['system'] .. |
| − | ((count and count > 2000) and ("''', and " .. templateCount) or ("'''")) | + | ((args.count and args.count > 2000) and ("''', and " .. templateCount) or ("'''")) |
| | else | | else |
| | used_on_text = used_on_text .. templateCount .. "'''" | | used_on_text = used_on_text .. templateCount .. "'''" |
| | end | | end |
| | | | |
| − |
| + | local sandbox_text = ('%s\'s [[%s/sandbox|/sandbox]] or [[%s|/testcases]] subpages, or in your own [[%s]]. '):format( |
| − | local sandbox_text = ("%s's [[%s/sandbox|/sandbox]] or [[%s/testcases|/testcases]] subpages, or in your own [[%s]]. "):format( | + | title:inNamespace('Module') and 'module' or 'template', |
| − | (title.namespace == 828 and "module" or "template"), | + | title.fullText, |
| − | title.fullText, title.fullText, | + | testcases_page.fullText, |
| − | title.namespace == 828 and "Module:Sandbox|module sandbox" or "Wikipedia:User pages#SUB|user subpage" | + | title:inNamespace('Module') and (sandbox_module_page .. '|module sandbox') or (user_subpage_info_page .. '|user subpage') |
| | ) | | ) |
| | | | |
| − | local infoArg = args["info"] ~= "" and args["info"] | + | local infoArg = args['info'] ~= '' and args['info'] |
| − | if (systemMessages or args[1] == "risk" or (count and count >= 100000) ) then | + | if (systemMessages or args.risk) then |
| − | local info = systemMessages and '.<br/>Changes to it can cause immediate changes to the Wikipedia user interface.' or '.' | + | local info = '.' |
| | + | if systemMessages then |
| | + | info = info .. '<br />Changes to it can cause immediate changes to the ' .. mw.site.namespaces.Project.name .. ' user interface.' |
| | + | end |
| | if infoArg then | | if infoArg then |
| − | info = info .. "<br />" .. infoArg | + | info = info .. '<br />' .. infoArg |
| | end | | end |
| | sandbox_text = info .. '<br /> To avoid major disruption' .. | | sandbox_text = info .. '<br /> To avoid major disruption' .. |
| − | (count and count >= 100000 and ' and server load' or '') .. | + | (args.count and args.count >= large_count_cutoff and ' and server load' or '') .. -- should this use args.risk? |
| | ', any changes should be tested in the ' .. sandbox_text .. | | ', any changes should be tested in the ' .. sandbox_text .. |
| | 'The tested changes can be added to this page in a single edit. ' | | 'The tested changes can be added to this page in a single edit. ' |
| Line 133: |
Line 188: |
| | 'hanges may be widely noticed. Test changes in the ' .. sandbox_text | | 'hanges may be widely noticed. Test changes in the ' .. sandbox_text |
| | end | | end |
| − |
| |
| | | | |
| | local discussion_text = systemMessages and 'Please discuss changes ' or 'Consider discussing changes ' | | local discussion_text = systemMessages and 'Please discuss changes ' or 'Consider discussing changes ' |
| − | if args["2"] and args["2"] ~= "" and args["2"] ~= "yes" then | + | if args[2] ~= nil and args[2] ~= '' and yesno(args[2]) == nil then |
| − | discussion_text = string.format("%sat [[%s]]", discussion_text, args["2"]) | + | discussion_text = string.format('%sat [[%s]]', discussion_text, args[2]) |
| | else | | else |
| − | discussion_text = string.format("%son the [[%s|talk page]]", discussion_text, title.talkPageTitle.fullText ) | + | discussion_text = string.format('%son the [[%s|talk page]]', discussion_text, title.talkPageTitle.fullText) |
| | end | | end |
| | | | |
| − | return used_on_text .. sandbox_text .. discussion_text .. " before implementing them." .. bot_text | + | return used_on_text .. sandbox_text .. discussion_text .. ' before implementing them.' .. bot_text |
| | end | | end |
| | | | |
| | + | -- used by [[Template:R from high-use template]] |
| | + | -- count argument retained for backwards compatibility |
| | function p.text(frame, count) | | function p.text(frame, count) |
| | return p._text(getArgs(frame), count) | | return p._text(getArgs(frame), count) |
| | end | | end |
| | | | |
| | + | -- nocat argument retained for backwards compatibility |
| | function p._main(args, nocat) | | function p._main(args, nocat) |
| − | local count = nil | + | args.count = count_from_args(args) |
| − | if yesno(args['fetch']) == false then | + | args.risk = risk_boolean(args) |
| − | if (args[1] or '') ~= '' then count = tonumber(args[1]) end
| + | args.title = (args.demo and args.demo ~= '' and mw.title.new(args.demo, 'Template')) or mw.title.getCurrentTitle() |
| − | else
| + | |
| − | count = _fetch(args)
| + | local image = 'Ambox warning yellow.svg' |
| − | end | + | local type_param = 'style' |
| − | local image = "[[File:Ambox warning yellow.svg|40px|alt=Warning|link=]]" | |
| − | local type_param = "style" | |
| | local epilogue = '' | | local epilogue = '' |
| | + | |
| | if args['system'] and args['system'] ~= '' then | | if args['system'] and args['system'] ~= '' then |
| − | image = "[[File:Ambox important.svg|40px|alt=Warning|link=]]" | + | image = 'Ambox important.svg' |
| − | type_param = "content" | + | type_param = 'content' |
| − | nocat = nocat or args['nocat'] | + | if yesno(nocat or args['nocat']) ~= true and not args.title.isRedirect then |
| − | local categorise = (nocat == '' or not yesno(nocat))
| + | local protection_action = (args.title:inNamespace('File') and 'upload') or 'edit' |
| − | if categorise and not mw.title.getCurrentTitle().isRedirect then
| + | local protection_level = require('Module:Effective protection level')._main(protection_action, args.title.fullText) |
| − | epilogue = mw.getCurrentFrame():preprocess('{{Sandbox other||{{#switch:{{#invoke:Effective protection level|{{#switch:{{NAMESPACE}}|File=upload|#default=edit}}|{{FULLPAGENAME}}}}|sysop|templateeditor|interfaceadmin=|#default=[[Category:Pages used in system messages needing protection]]}}}}')
| + | |
| | + | if protection_level ~= 'sysop' and protection_level ~= 'templateeditor' and protection_level ~= 'interfaceadmin' then |
| | + | epilogue = mw.getCurrentFrame():expandTemplate { |
| | + | title = 'sandbox other', |
| | + | args = { |
| | + | [2] = '[[Category:' .. system_messages_cat .. ']]' |
| | + | } |
| | + | } |
| | + | end |
| | end | | end |
| − | elseif (args[1] == "risk" or (count and count >= 100000)) then | + | elseif args.risk then |
| − | image = "[[File:Ambox warning orange.svg|40px|alt=Warning|link=]]" | + | image = 'Ambox warning orange.svg' |
| − | type_param = "content" | + | type_param = 'content' |
| | end | | end |
| | | | |
| − | if args["form"] == "editnotice" then | + | image = '[[File:' .. image .. '|40px|alt=Warning|link=]]' |
| | + | if args['form'] == 'editnotice' then |
| | return mw.getCurrentFrame():expandTemplate{ | | return mw.getCurrentFrame():expandTemplate{ |
| | title = 'editnotice', | | title = 'editnotice', |
| | args = { | | args = { |
| − | ["image"] = image, | + | ['image'] = image, |
| − | ["text"] = p._text(args, count), | + | ['text'] = p._text(args), |
| − | ["expiry"] = (args["expiry"] or "") | + | ['expiry'] = (args['expiry'] or '') |
| | } | | } |
| | } .. epilogue | | } .. epilogue |
| Line 185: |
Line 250: |
| | type = type_param, | | type = type_param, |
| | image = image, | | image = image, |
| − | text = p._text(args, count), | + | text = p._text(args), |
| − | expiry = (args["expiry"] or "") | + | expiry = (args['expiry'] or '') |
| | }) .. epilogue | | }) .. epilogue |
| | end | | end |
| Line 194: |
Line 259: |
| | return p._main(getArgs(frame)) | | return p._main(getArgs(frame)) |
| | end | | end |
| | + | |
| | return p | | return p |