Changes

m
1 revision imported
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
confirmed, superuser, Administrators
838

edits