Difference between revisions of "Module:Protection banner"

From BESA® Wiki
Jump to: navigation, search
(add the reset banner blurb)
m (228 revisions)
 
(168 intermediate revisions by 6 users not shown)
Line 1: Line 1:
 
-- This module implements {{pp-meta}} and its daughter templates such as
 
-- This module implements {{pp-meta}} and its daughter templates such as
 
-- {{pp-dispute}}, {{pp-vandalism}} and {{pp-sock}}.
 
-- {{pp-dispute}}, {{pp-vandalism}} and {{pp-sock}}.
 +
 +
-- Initialise necessary modules.
 +
require('Module:No globals')
 +
local makeFileLink = require('Module:File link')._main
 +
local effectiveProtectionLevel = require('Module:Effective protection level')._main
 +
local effectiveProtectionExpiry = require('Module:Effective protection expiry')._main
 +
local yesno = require('Module:Yesno')
 +
 +
-- Lazily initialise modules and objects we don't always need.
 +
local getArgs, makeMessageBox, lang
 +
 +
-- Set constants.
 +
local CONFIG_MODULE = 'Module:Protection banner/config'
  
 
--------------------------------------------------------------------------------
 
--------------------------------------------------------------------------------
-- Configuration
+
-- Helper functions
 
--------------------------------------------------------------------------------
 
--------------------------------------------------------------------------------
  
local cfg = {}
+
local function makeCategoryLink(cat, sort)
 +
local nsText = mw.site.namespaces[14].name
 +
if cat and sort then
 +
return string.format(
 +
'[[%s:%s|%s]]',
 +
nsText,
 +
cat,
 +
sort
 +
)
 +
elseif cat then
 +
return string.format(
 +
'[[%s:%s]]',
 +
nsText,
 +
cat
 +
)
 +
else
 +
return ''
 +
end
 +
end
  
cfg.reasons = {
+
-- Validation function for the expiry and the protection date
blp = {
+
local function validateDate(dateString, dateType)
categoryOrder = 'reason',
+
lang = lang or mw.language.getContentLanguage()
banner = 'blp'
+
local success, result = pcall(lang.formatDate, lang, 'U', dateString)
},
+
if success then
dispute = {
+
result = tonumber(result)
categoryOrder = 'reason',
+
if result then
banner = 'dispute'
+
return result
},
+
end
office = {
+
end
categoryOrder = 'reason',
+
error(string.format(
banner = 'office'
+
'invalid %s ("%s")',
},
+
dateType,
sock = {
+
tostring(dateString)
categoryOrder = 'reason',
+
), 4)
banner = 'sock'
+
end
},
+
usertalk = {
+
banner = 'usertalk'
+
},
+
vandalism = {
+
categoryOrder = 'namespace',
+
banner = 'vandalism'
+
}
+
}
+
  
cfg.banners = {
+
local function makeFullUrl(page, query, display)
-- $1 = "until" or "or until" depending on the expiry
+
return string.format(
-- $2 = "disputes", with or without a section link
+
'[%s %s]',
-- $3 = the type of the page, e.g. "article", "template", or "page"
+
tostring(mw.uri.fullUrl(page, query)),
-- $4 = A blurb "it has been protected for x years, x months and x days."
+
display
-- $5 = the protection date
+
)
blp = {
+
end
text = 'to promote compliance with'
+
.. '[[Wikipedia:Biographies of living persons'
+
.. "|Wikipedia's policy on the biographies"
+
.. ' of living people]]',
+
tooltip = 'to promote compliance with the policy on biographies of'
+
.. ' living people'
+
},
+
dispute = {
+
text = '$1 editing $2 have been resolved',
+
tooltip = 'due to editing disputes',
+
dispute = true
+
},
+
office = {
+
text = 'This $3 is currently under the scrutiny of the'
+
.. ' [[Wikipedia:Office actions|Wikimedia Foundation Office]]'
+
.. ' and is protected. $4'
+
},
+
reset = {
+
text = [=[
+
'''On $5 this article was reduced to a simplified, "bare bones" version so that it may be completely rewritten to ensure it meets the policies of [[WP:NPOV|Neutral Point of View]] and [[WP:V|Verifiability]]. Standard Wikipedia policies will apply to its rewriting—which will eventually be open to all editors—and will be strictly enforced. The article has been placed under a level of semi-protection temporarily during the rebuilding of this article.
+
  
Any insertion of material directly from pre-protection revisions of the article will be removed, as will any material added to the article that is not properly sourced. The associated talk page(s) were also cleared on the same date.
+
local function toTableEnd(t, pos)
 +
-- Sends the value at position pos to the end of array t, and shifts the
 +
-- other items down accordingly.
 +
return table.insert(t, table.remove(t, pos))
 +
end
  
'''Administrators may not override this action without approval from someone from the [[WP:OFFICE|Office]]. No editor may remove this notice.]=]
+
local function walkHierarchy(hierarchy, start)
},
+
local toWalk, retval = {[start] = true}, {}
sock = {
+
while true do
text = 'to prevent [[Wikipedia:Sock puppetry|sock puppets]] of'
+
-- Can't use pairs() since we're adding and removing things as we're iterating
.. ' [[Wikipedia:Blocking policy|blocked]] or'
+
local k = next(toWalk) -- This always gets the "first" key
.. ' [[Wikipedia:List of banned users|banned users]]'
+
if k == nil then break end
.. ' from editing it',
+
toWalk[k] = nil
tooltip = 'to prevent sock puppets of blocked or banned users from'
+
retval[k] = true
.. ' editing it'
+
for _,v in ipairs(hierarchy[k]) do
},
+
if not retval[v] then
usertalk = {
+
toWalk[v] = true
text = '',
+
end
explanation = 'If you cannot edit this user talk page and you need to'
+
end
.. ' make a change or leave a message, you can'
+
end
.. ' [[Wikipedia:Requests for page protection'
+
return retval
.. '#Current requests for edits to a protected page'
+
end
.. '|request an edit]],'
+
.. ' [[Wikipedia:Requests for page protection'
+
.. '#Current requests for reduction in protection level'
+
.. '|request unprotection]],'
+
.. ' [[Special:Userlogin|log in]],'
+
.. ' or [[Special:UserLogin/signup|create an account]].'
+
},
+
vandalism = {
+
text = 'due to [[Wikipedia:Vandalism|vandalism]]',
+
tooltip = 'due to vandalism'
+
},
+
}
+
  
cfg.categories = {
+
--------------------------------------------------------------------------------
-- The key strings follow this format:
+
-- Protection class
-- type, level, ns, reason, expiry
+
--------------------------------------------------------------------------------
['all-all-all-all-all']                  = 'Wikipedia protected pages',
+
['all-all-all-office-all']              = 'Wikipedia Office-protected pages',
+
['edit-all-template-all-all']            = 'Wikipedia protected templates',
+
['edit-autoconfirmed-all-all-all']      = 'Wikipedia semi-protected pages',
+
['edit-autoconfirmed-all-all-indef']    = 'Wikipedia indefinitely semi-protected pages',
+
['edit-autoconfirmed-all-blp-all']      = 'Wikipedia indefinitely semi-protected biographies of living people',
+
['edit-autoconfirmed-all-blp-temp']      = 'Wikipedia temporarily semi-protected biographies of living people',
+
['edit-autoconfirmed-all-dispute-all']  = 'Wikipedia pages semi-protected due to dispute',
+
['edit-autoconfirmed-all-sock-all']      = 'Wikipedia pages semi-protected from banned users',
+
['edit-autoconfirmed-all-vandalism-all'] = 'Wikipedia pages semi-protected against vandalism',
+
['edit-autoconfirmed-category-all-all']  = 'Wikipedia semi-protected categories',
+
['edit-autoconfirmed-file-all-all']      = 'Semi-protected images',
+
['edit-autoconfirmed-portal-all-all']    = 'Semi-protected portals',
+
['edit-autoconfirmed-project-all-all']  = 'Semi-protected project pages',
+
['edit-autoconfirmed-talk-all-all']      = 'Semi-protected talk pages',
+
['edit-autoconfirmed-template-all-all']  = 'Wikipedia semi-protected templates',
+
['edit-autoconfirmed-template-all-all']  = 'Wikipedia semi-protected templates',
+
['edit-autoconfirmed-user-all-all']      = 'Wikipedia semi-protected user and user talk pages',
+
['edit-sysop-all-blp-all']              = 'Wikipedia indefinitely protected biographies of living people',
+
['edit-sysop-all-blp-temp']              = 'Wikipedia temporarily protected biographies of living people',
+
['edit-sysop-all-dispute-all']          = 'Wikipedia pages protected due to dispute',
+
['edit-sysop-all-sock-all']              = 'Wikipedia pages protected from banned users',
+
['edit-sysop-all-vandalism-all']        = 'Wikipedia pages protected against vandalism',
+
['edit-sysop-category-all-all']          = 'Wikipedia protected categories',
+
['edit-sysop-file-all-all']              = 'Protected images',
+
['edit-sysop-project-all-all']          = 'Protected project pages',
+
['edit-sysop-talk-all-all']              = 'Protected talk pages',
+
['edit-sysop-template-all-all']          = 'Wikipedia protected templates',
+
['edit-sysop-user-all-all']              = 'Wikipedia protected user and user talk pages',
+
['move-sysop-all-all-all']              = 'Wikipedia move-protected pages',
+
['move-sysop-all-all-indef']            = 'Wikipedia indefinitely move-protected pages',
+
['move-sysop-all-dispute-all']          = 'Wikipedia pages move-protected due to dispute',
+
['move-sysop-all-vandalism-all']        = 'Wikipedia pages move-protected due to vandalism',
+
['move-sysop-portal-all-all']            = 'Wikipedia move-protected portals',
+
['move-sysop-portal-all-all']            = 'Wikipedia move-protected portals',
+
['move-sysop-project-all-all']          = 'Wikipedia move-protected project pages',
+
['move-sysop-talk-all-all']              = 'Wikipedia move-protected talk pages',
+
['move-sysop-template-all-all']          = 'Wikipedia move-protected templates',
+
['move-sysop-user-all-all']              = 'Wikipedia move-protected user and user talk pages',
+
['pc-autoconfirmed-all-all-all']        = 'Wikipedia pending changes protected pages (level 1)',
+
['pc-reviewer-all-all-all']              = 'Wikipedia pending changes protected pages (level 2)',
+
}
+
  
cfg.categoryNamespaces = {
+
local Protection = {}
[2] = 'user',
+
Protection.__index = Protection
[3] = 'user',
+
[4] = 'project',
+
[6] = 'file',
+
[10] = 'template',
+
[12] = 'project',
+
[14] = 'category',
+
[100] = 'portal',
+
}
+
  
cfg.pagetypeNamespaces = {
+
Protection.supportedActions = {
[0] = 'article',
+
edit = true,
[6] = 'file',
+
move = true,
[10] = 'template',
+
autoreview = true,
[14] = 'category',
+
upload = true
[828] = 'module',
+
default = 'page'
+
 
}
 
}
  
--[[
+
Protection.bannerConfigFields = {
-- Not currently used
+
'text',
local error_categories = {
+
'explanation',
incorrect = 'Wikipedia pages with incorrect protection templates',
+
'tooltip',
no_expiry = 'Wikipedia protected pages without expiry',
+
'alt',
create = 'Wikipedia pages tagged as create-protected',
+
'link',
template = 'Wikipedia template-protected pages other than templates and modules'
+
'image'
 
}
 
}
--]]
 
  
--------------------------------------------------------------------------------
+
function Protection.new(args, cfg, title)
-- Main functions
+
local obj = {}
--------------------------------------------------------------------------------
+
obj._cfg = cfg
 +
obj.title = title or mw.title.getCurrentTitle()
  
-- Initialise necessary modules.
+
-- Set action
local mArguments = require('Module:Arguments')
+
if not args.action then
local mMessageBox -- only needs to be loaded if we are outputting a banner, so lazily initialise
+
obj.action = 'edit'
 +
elseif Protection.supportedActions[args.action] then
 +
obj.action = args.action
 +
else
 +
error(string.format(
 +
'invalid action ("%s")',
 +
tostring(args.action)
 +
), 3)
 +
end
  
-- Define often-used functions as local variables.
+
-- Set level
local tconcat = table.concat
+
obj.level = args.demolevel or effectiveProtectionLevel(obj.action, obj.title)
local tinsert = table.insert
+
if not obj.level or (obj.action == 'move' and obj.level == 'autoconfirmed') then
local tremove = table.remove
+
-- Users need to be autoconfirmed to move pages anyway, so treat
local ceil = math.ceil
+
-- semi-move-protected pages as unprotected.
local format = string.format
+
obj.level = '*'
 +
end
  
local function toTableEnd(t, pos)
+
-- Set expiry
-- Sends the value at position pos to the end of array t, and shifts the
+
local effectiveExpiry = effectiveProtectionExpiry(obj.action, obj.title)
-- other items down accordingly.
+
if effectiveExpiry == 'infinity' then
return tinsert(t, tremove(t, pos))
+
obj.expiry = 'indef'
end
+
elseif effectiveExpiry ~= 'unknown' then
 +
obj.expiry = validateDate(effectiveExpiry, 'expiry date')
 +
elseif args.expiry then
 +
if cfg.indefStrings[args.expiry] then
 +
obj.expiry = 'indef'
 +
elseif type(args.expiry) == 'number' then
 +
obj.expiry = args.expiry
 +
else
 +
obj.expiry = validateDate(args.expiry, 'expiry date')
 +
end
 +
end
  
local p = {}
+
-- Set reason
 +
if args[1] then
 +
obj.reason = mw.ustring.lower(args[1])
 +
if obj.reason:find('|') then
 +
error('reasons cannot contain the pipe character ("|")', 3)
 +
end
 +
end
  
function p.getPagetype(ns)
+
-- Set protection date
-- Returns a string with the page's type. Takes a namespace number as input.
+
if args.date then
local pagetype = pagetypeNamespaces[ns] or pagetypeNamespaces.default
+
obj.protectionDate = validateDate(args.date, 'protection date')
if not pagetype then
+
error('the page type could not be found; please define a name for the key "default"')
+
 
end
 
end
return pagetype
+
 +
-- Set banner config
 +
do
 +
obj.bannerConfig = {}
 +
local configTables = {}
 +
if cfg.banners[obj.action] then
 +
configTables[#configTables + 1] = cfg.banners[obj.action][obj.reason]
 +
end
 +
if cfg.defaultBanners[obj.action] then
 +
configTables[#configTables + 1] = cfg.defaultBanners[obj.action][obj.level]
 +
configTables[#configTables + 1] = cfg.defaultBanners[obj.action].default
 +
end
 +
configTables[#configTables + 1] = cfg.masterBanner
 +
for i, field in ipairs(Protection.bannerConfigFields) do
 +
for j, t in ipairs(configTables) do
 +
if t[field] then
 +
obj.bannerConfig[field] = t[field]
 +
break
 +
end
 +
end
 +
end
 +
end
 +
return setmetatable(obj, Protection)
 
end
 
end
  
function p.matchNamespace(ns)
+
function Protection:isProtected()
-- Matches a namespace number to a string that can be passed to the
+
return self.level ~= '*'
-- namespace parameter of p.getCategoryName.
+
end
if not ns or type(ns) ~= 'number' then
+
 
return nil
+
function Protection:isTemporary()
 +
return type(self.expiry) == 'number'
 +
end
 +
 
 +
function Protection:makeProtectionCategory()
 +
local cfg = self._cfg
 +
local title = self.title
 +
 +
-- Exit if the page is not protected.
 +
if not self:isProtected() then
 +
return ''
 
end
 
end
local nskey = cfg.categoryNamespaces[ns]
+
if not nskey and ns % 2 == 1 then
+
-- Get the expiry key fragment.
nskey = 'talk'
+
local expiryFragment
 +
if self.expiry == 'indef' then
 +
expiryFragment = self.expiry
 +
elseif type(self.expiry) == 'number' then
 +
expiryFragment = 'temp'
 
end
 
end
return nskey
 
end
 
  
function p.getCategoryName(cats, action, level, namespace, reason, expiry)
+
-- Get the namespace key fragment.
--[[
+
local namespaceFragment
-- Gets a category name from the category table, given a combination of
+
do
-- the protection type, the protection level, the namespace number, the
+
namespaceFragment = cfg.categoryNamespaceKeys[title.namespace]
-- reason for protection, and the expiry date.
+
if not namespaceFragment and title.namespace % 2 == 1 then
--]]
+
namespaceFragment = 'talk'
cats = cats or cfg.categories
+
end
 +
end
 +
 +
-- Define the order that key fragments are tested in. This is done with an
 +
-- array of tables containing the value to be tested, along with its
 +
-- position in the cfg.protectionCategories table.
 +
local order = {
 +
{val = expiryFragment,   keypos = 1},
 +
{val = namespaceFragment, keypos = 2},
 +
{val = self.reason,       keypos = 3},
 +
{val = self.level,        keypos = 4},
 +
{val = self.action,      keypos = 5}
 +
}
  
 
--[[
 
--[[
-- Define the properties table. Each property is a table containing the
+
-- The old protection templates used an ad-hoc protection category system,
-- canonical order that the property is tested in, the position the
+
-- with some templates prioritising namespaces in their categories, and
-- property has in the category key strings, and the property value itself.
+
-- others prioritising the protection reason. To emulate this in this module
 +
-- we use the config table cfg.reasonsWithNamespacePriority to set the
 +
-- reasons for which namespaces have priority over protection reason.
 +
-- If we are dealing with one of those reasons, move the namespace table to
 +
-- the end of the order table, i.e. give it highest priority. If not, the
 +
-- reason should have highest priority, so move that to the end of the table
 +
-- instead.
 
--]]
 
--]]
local properties = {
+
if self.reason and cfg.reasonsWithNamespacePriority[self.reason] then
expiry = {order = 1, keypos = 5, val = expiry},
+
-- table.insert(order, 3, table.remove(order, 2))
namespace = {order = 2, keypos = 3, val = p.matchNamespace(namespace)},
+
toTableEnd(order, 2)
reason = {order = 3, keypos = 4, val = reason},
+
else
level = {order = 4, keypos = 2, val = level},
+
toTableEnd(order, 3)
action = {order = 5, keypos = 1, val = action}
+
end
}
+
 
+
 
--[[
 
--[[
-- Load the category order configuration for the reason specified.
+
-- Define the attempt order. Inactive subtables (subtables with nil "value"
-- The configuration is stored in the categoryOrder field of each reason
+
-- fields) are moved to the end, where they will later be given the key
-- subtable of cfg.reasons. If the value is a table, then the order is the
+
-- "all". This is to cut down on the number of table lookups in
-- values specified in the table. If the value is a string, then the
+
-- cfg.protectionCategories, which grows exponentially with the number of
-- property corresponding to that string is tested last (i.e. it is the most
+
-- non-nil keys. We keep track of the number of active subtables with the
-- important, because it keeps its specified value the longest) and the
+
-- noActive parameter.
-- other properties are tested in the canonical order. If the value is of
+
-- any other type then the canonical order is used.
+
 
--]]
 
--]]
local reasonTable = reason and cfg.reasons[reason]
+
local noActive, attemptOrder
local categoryOrder = reasonTable and reasonTable.categoryOrder
+
do
local categoryOrderType = type(categoryOrder)
+
local active, inactive = {}, {}
local configOrder = {}
+
for i, t in ipairs(order) do
if categoryOrderType == 'table' then
+
if t.val then
local dupes = {}
+
active[#active + 1] = t
for i = 1, 5 do
+
local propertiesKey = categoryOrder[i]
+
if not propertiesKey then
+
local msg = 'no entry found for key '
+
.. i
+
.. ' in the cfg.reasons.'
+
.. reason
+
.. '.categoryOrder table'
+
error(msg)
+
end
+
local property = properties[propertiesKey]
+
if not property then
+
local msg = 'invalid value "'
+
.. propertiesKey
+
.. '" detected in the cfg.reasons.'
+
.. reason
+
.. '.categoryOrder table'
+
error(msg)
+
end
+
if dupes[propertiesKey] then
+
local msg = 'duplicate values "'
+
.. propertiesKey
+
.. '" detected in the cfg.reasons.'
+
.. reason
+
.. '.categoryOrder table'
+
error(msg)
+
 
else
 
else
dupes[propertiesKey] = true
+
inactive[#inactive + 1] = t
 
end
 
end
configOrder[i] = property
 
 
end
 
end
else
+
noActive = #active
for propertiesKey, t in pairs(properties) do
+
attemptOrder = active
configOrder[t.order] = t
+
for i, t in ipairs(inactive) do
end
+
attemptOrder[#attemptOrder + 1] = t
if categoryOrderType == 'string' then
+
local property = properties[categoryOrder]
+
if not property then
+
local msg = '"'
+
.. categoryOrder
+
.. '" is not a valid value of cfg.reasons.'
+
.. reason
+
.. '.categoryOrder'
+
error(msg)
+
end
+
toTableEnd(configOrder, property.order)
+
 
end
 
end
 
end
 
end
 
+
 
--[[
 
--[[
-- Define the attempt order. Properties with no value defined are moved
+
-- Check increasingly generic key combinations until we find a match. If a
-- to the end, where they will later be given the value "all". This is
+
-- specific category exists for the combination of key fragments we are
-- to cut down on the number of table lookups in the cats table, which
+
-- given, that match will be found first. If not, we keep trying different
-- grows exponentially with the number of properties with valid values.
+
-- key fragment combinations until we match using the key
-- We keep track of the number of active properties with the noActive
+
-- parameter.
+
--]]
+
local active, inactive = {}, {}
+
for i, t in ipairs(configOrder) do
+
if t.val then
+
active[#active + 1] = t
+
else
+
inactive[#inactive + 1] = t
+
end
+
end
+
local noActive = #active
+
local attemptOrder = active
+
for i, t in ipairs(inactive) do
+
attemptOrder[#attemptOrder + 1] = t
+
end
+
 
+
--[[
+
-- Check increasingly generic key combinations until we find a match.
+
-- If a specific category exists for the combination of properties
+
-- we are given, that match will be found first. If not, we keep
+
-- trying different key combinations until we match using the key
+
 
-- "all-all-all-all-all".
 
-- "all-all-all-all-all".
 
--
 
--
-- To generate the keys, we index the property subtables using a
+
-- To generate the keys, we index the key subtables using a binary matrix
-- binary matrix with indexes i and j. j is only calculated up to
+
-- with indexes i and j. j is only calculated up to the number of active
-- the number of active properties. For example, if there were three
+
-- subtables. For example, if there were three active subtables, the matrix
-- active properties, the matrix would look like this, with 0
+
-- would look like this, with 0 corresponding to the key fragment "all", and
-- corresponding to the string "all", and 1 corresponding to the
+
-- 1 corresponding to other key fragments.
-- val field in the property table:
+
 
--  
 
--  
 
--  j 1  2  3
 
--  j 1  2  3
Line 347: Line 300:
 
-- 8  0  0  0
 
-- 8  0  0  0
 
--  
 
--  
-- Values of j higher than the number of active properties are set
+
-- Values of j higher than the number of active subtables are set
 
-- to the string "all".
 
-- to the string "all".
 
--
 
--
-- A key for the category table is constructed for each value of i.
+
-- A key for cfg.protectionCategories is constructed for each value of i.
-- The correct position of the value in the key is determined by the
+
-- The position of the value in the key is determined by the keypos field in
-- pos field in the property table.
+
-- each subtable.
 
--]]
 
--]]
 +
local cats = cfg.protectionCategories
 
for i = 1, 2^noActive do
 
for i = 1, 2^noActive do
 
local key = {}
 
local key = {}
Line 361: Line 315:
 
else
 
else
 
local quotient = i / 2 ^ (j - 1)
 
local quotient = i / 2 ^ (j - 1)
quotient = ceil(quotient)
+
quotient = math.ceil(quotient)
 
if quotient % 2 == 1 then
 
if quotient % 2 == 1 then
 
key[t.keypos] = t.val
 
key[t.keypos] = t.val
Line 369: Line 323:
 
end
 
end
 
end
 
end
key = tconcat(key, '-')
+
key = table.concat(key, '|')
 
local attempt = cats[key]
 
local attempt = cats[key]
 
if attempt then
 
if attempt then
return attempt
+
return makeCategoryLink(attempt, title.text)
 
end
 
end
 
end
 
end
error(
+
return ''
'No category match found;'
+
end
.. ' please define the category for key "all-all-all-all-all"'
+
 
 +
function Protection:needsExpiry()
 +
local cfg = self._cfg
 +
local actionNeedsCheck = cfg.expiryCheckActions[self.action]
 +
return not self.expiry and (
 +
actionNeedsCheck or (
 +
actionNeedsCheck == nil
 +
and self.reason -- the old {{pp-protected}} didn't check for expiry
 +
and not cfg.reasonsWithoutExpiryCheck[self.reason]
 +
)
 
)
 
)
 
end
 
end
  
function p.renderImageLink(image, size, link, text, alt)
+
function Protection:isIncorrect()
--[[
+
local expiry = self.expiry
-- Renders the image link wikitext All parameters are optional
+
return not self:isProtected()
-- apart from the display text.
+
or type(expiry) == 'number' and expiry < os.time()
--
+
end
-- @parameters:
+
 
-- image - the image name
+
function Protection:isTemplateProtectedNonTemplate()
-- size - the image size, as a number
+
local action, namespace = self.action, self.title.namespace
-- link - page linked to by the image
+
return self.level == 'templateeditor'
-- text - the tooltip text
+
and (
-- alt - the alt text
+
(action ~= 'edit' and action ~= 'move')
--
+
or (namespace ~= 10 and namespace ~= 828)
-- All parameters are optional apart from the text parameter.
+
)
--]]
+
end
image = image or 'Transparent.gif'
+
 
size = size or 20
+
function Protection:makeCategoryLinks()
if link then
+
local msg = self._cfg.msg
link = '|link=' .. link
+
local ret = { self:makeProtectionCategory() }
 +
if self:needsExpiry() then
 +
ret[#ret + 1] = makeCategoryLink(
 +
msg['tracking-category-expiry'],
 +
self.title.text
 +
)
 +
end
 +
if self:isIncorrect() then
 +
ret[#ret + 1] = makeCategoryLink(
 +
msg['tracking-category-incorrect'],
 +
self.title.text
 +
)
 +
end
 +
if self:isTemplateProtectedNonTemplate() then
 +
ret[#ret + 1] = makeCategoryLink(
 +
msg['tracking-category-template'],
 +
self.title.text
 +
)
 +
end
 +
return table.concat(ret)
 +
end
 +
 
 +
--------------------------------------------------------------------------------
 +
-- Blurb class
 +
--------------------------------------------------------------------------------
 +
 
 +
local Blurb = {}
 +
Blurb.__index = Blurb
 +
 
 +
Blurb.bannerTextFields = {
 +
text = true,
 +
explanation = true,
 +
tooltip = true,
 +
alt = true,
 +
link = true
 +
}
 +
 
 +
function Blurb.new(protectionObj, args, cfg)
 +
return setmetatable({
 +
_cfg = cfg,
 +
_protectionObj = protectionObj,
 +
_args = args
 +
}, Blurb)
 +
end
 +
 
 +
-- Private methods --
 +
 
 +
function Blurb:_formatDate(num)
 +
-- Formats a Unix timestamp into dd Month, YYYY format.
 +
lang = lang or mw.language.getContentLanguage()
 +
local success, date = pcall(
 +
lang.formatDate,
 +
lang,
 +
self._cfg.msg['expiry-date-format'] or 'j F Y',
 +
'@' .. tostring(num)
 +
)
 +
if success then
 +
return date
 +
end
 +
end
 +
 
 +
function Blurb:_getExpandedMessage(msgKey)
 +
return self:_substituteParameters(self._cfg.msg[msgKey])
 +
end
 +
 
 +
function Blurb:_substituteParameters(msg)
 +
if not self._params then
 +
local parameterFuncs = {}
 +
 
 +
parameterFuncs.CURRENTVERSION    = self._makeCurrentVersionParameter
 +
parameterFuncs.EDITREQUEST        = self._makeEditRequestParameter
 +
parameterFuncs.EXPIRY            = self._makeExpiryParameter
 +
parameterFuncs.EXPLANATIONBLURB  = self._makeExplanationBlurbParameter
 +
parameterFuncs.IMAGELINK          = self._makeImageLinkParameter
 +
parameterFuncs.INTROBLURB        = self._makeIntroBlurbParameter
 +
parameterFuncs.INTROFRAGMENT      = self._makeIntroFragmentParameter
 +
parameterFuncs.PAGETYPE          = self._makePagetypeParameter
 +
parameterFuncs.PROTECTIONBLURB    = self._makeProtectionBlurbParameter
 +
parameterFuncs.PROTECTIONDATE    = self._makeProtectionDateParameter
 +
parameterFuncs.PROTECTIONLEVEL    = self._makeProtectionLevelParameter
 +
parameterFuncs.PROTECTIONLOG      = self._makeProtectionLogParameter
 +
parameterFuncs.TALKPAGE          = self._makeTalkPageParameter
 +
parameterFuncs.TOOLTIPBLURB      = self._makeTooltipBlurbParameter
 +
parameterFuncs.TOOLTIPFRAGMENT    = self._makeTooltipFragmentParameter
 +
parameterFuncs.VANDAL            = self._makeVandalTemplateParameter
 +
 +
self._params = setmetatable({}, {
 +
__index = function (t, k)
 +
local param
 +
if parameterFuncs[k] then
 +
param = parameterFuncs[k](self)
 +
end
 +
param = param or ''
 +
t[k] = param
 +
return param
 +
end
 +
})
 +
end
 +
 +
msg = msg:gsub('${(%u+)}', self._params)
 +
return msg
 +
end
 +
 
 +
function Blurb:_makeCurrentVersionParameter()
 +
-- A link to the page history or the move log, depending on the kind of
 +
-- protection.
 +
local pagename = self._protectionObj.title.prefixedText
 +
if self._protectionObj.action == 'move' then
 +
-- We need the move log link.
 +
return makeFullUrl(
 +
'Special:Log',
 +
{type = 'move', page = pagename},
 +
self:_getExpandedMessage('current-version-move-display')
 +
)
 
else
 
else
link = ''
+
-- We need the history link.
 +
return makeFullUrl(
 +
pagename,
 +
{action = 'history'},
 +
self:_getExpandedMessage('current-version-edit-display')
 +
)
 
end
 
end
text = text or error('No text parameter supplied to p.renderImageLink')
+
end
if alt then
+
 
alt = '|alt=' .. alt
+
function Blurb:_makeEditRequestParameter()
 +
local mEditRequest = require('Module:Submit an edit request')
 +
local action = self._protectionObj.action
 +
local level = self._protectionObj.level
 +
 +
-- Get the edit request type.
 +
local requestType
 +
if action == 'edit' then
 +
if level == 'autoconfirmed' then
 +
requestType = 'semi'
 +
elseif level == 'templateeditor' then
 +
requestType = 'template'
 +
end
 +
end
 +
requestType = requestType or 'full'
 +
 +
-- Get the display value.
 +
local display = self:_getExpandedMessage('edit-request-display')
 +
 
 +
return mEditRequest._link{type = requestType, display = display}
 +
end
 +
 
 +
function Blurb:_makeExpiryParameter()
 +
local expiry = self._protectionObj.expiry
 +
if type(expiry) == 'number' then
 +
return self:_formatDate(expiry)
 
else
 
else
alt = ''
+
return expiry
 
end
 
end
return string.format('[[Image:%s|%dpx%s|%s%s]]', image, size, link, text, alt)
 
 
end
 
end
  
function p.renderPadlock(image, right)
+
function Blurb:_makeExplanationBlurbParameter()
--[[
+
-- Cover special cases first.
-- Renders the html of the padlock seen in the top-right-hand corner
+
if self._protectionObj.title.namespace == 8 then
-- of protected pages.
+
-- MediaWiki namespace
--
+
return self:_getExpandedMessage('explanation-blurb-nounprotect')
-- @parameters:
+
end
-- image - the image wikitext (required)
+
 
-- right - the "right" css property value, as a string (optional)
+
-- Get explanation blurb table keys
--]]
+
local action = self._protectionObj.action
image = image or error('No image parameter specified in p.renderPadlock')
+
local level = self._protectionObj.level
local root = mw.html.create('div')
+
local talkKey = self._protectionObj.title.isTalkPage and 'talk' or 'subject'
root
+
 
:addClass('metadata topicon nopopups')
+
-- Find the message in the explanation blurb table and substitute any
:attr('id', 'protected-icon')
+
-- parameters.
:css{display = 'none', right = right or '55px'}
+
local explanations = self._cfg.explanationBlurbs
:wikitext(image)
+
local msg
return tostring(root)
+
if explanations[action][level] and explanations[action][level][talkKey] then
 +
msg = explanations[action][level][talkKey]
 +
elseif explanations[action][level] and explanations[action][level].default then
 +
msg = explanations[action][level].default
 +
elseif explanations[action].default and explanations[action].default[talkKey] then
 +
msg = explanations[action].default[talkKey]
 +
elseif explanations[action].default and explanations[action].default.default then
 +
msg = explanations[action].default.default
 +
else
 +
error(string.format(
 +
'could not find explanation blurb for action "%s", level "%s" and talk key "%s"',
 +
action,
 +
level,
 +
talkKey
 +
), 8)
 +
end
 +
return self:_substituteParameters(msg)
 
end
 
end
  
function p.renderBanner(page, image, text)
+
function Blurb:_makeImageLinkParameter()
--[[
+
local imageLinks = self._cfg.imageLinks
-- Renders the large protection banner placed at the top of articles,
+
local action = self._protectionObj.action
-- using the data provided in the data table.
+
local level = self._protectionObj.level
--  
+
local msg
-- @parameters:
+
if imageLinks[action][level] then
-- page - demo page parameter to pass to {{mbox}}
+
msg = imageLinks[action][level]
-- image - the image wikitext
+
elseif imageLinks[action].default then
-- text - the text to display
+
msg = imageLinks[action].default
--
+
else
-- All parameters are optional.
+
msg = imageLinks.edit.default
--]]
+
end
mMessageBox = require('Module:Message box')
+
return self:_substituteParameters(msg)
local mbargs = { -- arguments for the message box module
+
end
page = page,
+
 
 +
function Blurb:_makeIntroBlurbParameter()
 +
if self._protectionObj:isTemporary() then
 +
return self:_getExpandedMessage('intro-blurb-expiry')
 +
else
 +
return self:_getExpandedMessage('intro-blurb-noexpiry')
 +
end
 +
end
 +
 
 +
function Blurb:_makeIntroFragmentParameter()
 +
if self._protectionObj:isTemporary() then
 +
return self:_getExpandedMessage('intro-fragment-expiry')
 +
else
 +
return self:_getExpandedMessage('intro-fragment-noexpiry')
 +
end
 +
end
 +
 
 +
function Blurb:_makePagetypeParameter()
 +
local pagetypes = self._cfg.pagetypes
 +
return pagetypes[self._protectionObj.title.namespace]
 +
or pagetypes.default
 +
or error('no default pagetype defined', 8)
 +
end
 +
 
 +
function Blurb:_makeProtectionBlurbParameter()
 +
local protectionBlurbs = self._cfg.protectionBlurbs
 +
local action = self._protectionObj.action
 +
local level = self._protectionObj.level
 +
local msg
 +
if protectionBlurbs[action][level] then
 +
msg = protectionBlurbs[action][level]
 +
elseif protectionBlurbs[action].default then
 +
msg = protectionBlurbs[action].default
 +
elseif protectionBlurbs.edit.default then
 +
msg = protectionBlurbs.edit.default
 +
else
 +
error('no protection blurb defined for protectionBlurbs.edit.default', 8)
 +
end
 +
return self:_substituteParameters(msg)
 +
end
 +
 
 +
function Blurb:_makeProtectionDateParameter()
 +
local protectionDate = self._protectionObj.protectionDate
 +
if type(protectionDate) == 'number' then
 +
return self:_formatDate(protectionDate)
 +
else
 +
return protectionDate
 +
end
 +
end
 +
 
 +
function Blurb:_makeProtectionLevelParameter()
 +
local protectionLevels = self._cfg.protectionLevels
 +
local action = self._protectionObj.action
 +
local level = self._protectionObj.level
 +
local msg
 +
if protectionLevels[action][level] then
 +
msg = protectionLevels[action][level]
 +
elseif protectionLevels[action].default then
 +
msg = protectionLevels[action].default
 +
elseif protectionLevels.edit.default then
 +
msg = protectionLevels.edit.default
 +
else
 +
error('no protection level defined for protectionLevels.edit.default', 8)
 +
end
 +
return self:_substituteParameters(msg)
 +
end
 +
 
 +
function Blurb:_makeProtectionLogParameter()
 +
local pagename = self._protectionObj.title.prefixedText
 +
if self._protectionObj.action == 'autoreview' then
 +
-- We need the pending changes log.
 +
return makeFullUrl(
 +
'Special:Log',
 +
{type = 'stable', page = pagename},
 +
self:_getExpandedMessage('pc-log-display')
 +
)
 +
else
 +
-- We need the protection log.
 +
return makeFullUrl(
 +
'Special:Log',
 +
{type = 'protect', page = pagename},
 +
self:_getExpandedMessage('protection-log-display')
 +
)
 +
end
 +
end
 +
 
 +
function Blurb:_makeTalkPageParameter()
 +
return string.format(
 +
'[[%s:%s#%s|%s]]',
 +
mw.site.namespaces[self._protectionObj.title.namespace].talk.name,
 +
self._protectionObj.title.text,
 +
self._args.section or 'top',
 +
self:_getExpandedMessage('talk-page-link-display')
 +
)
 +
end
 +
 
 +
function Blurb:_makeTooltipBlurbParameter()
 +
if self._protectionObj:isTemporary() then
 +
return self:_getExpandedMessage('tooltip-blurb-expiry')
 +
else
 +
return self:_getExpandedMessage('tooltip-blurb-noexpiry')
 +
end
 +
end
 +
 
 +
function Blurb:_makeTooltipFragmentParameter()
 +
if self._protectionObj:isTemporary() then
 +
return self:_getExpandedMessage('tooltip-fragment-expiry')
 +
else
 +
return self:_getExpandedMessage('tooltip-fragment-noexpiry')
 +
end
 +
end
 +
 
 +
function Blurb:_makeVandalTemplateParameter()
 +
return require('Module:Vandal-m')._main{
 +
self._args.user or self._protectionObj.title.baseText
 +
}
 +
end
 +
 
 +
-- Public methods --
 +
 
 +
function Blurb:makeBannerText(key)
 +
-- Validate input.
 +
if not key or not Blurb.bannerTextFields[key] then
 +
error(string.format(
 +
'"%s" is not a valid banner config field',
 +
tostring(key)
 +
), 2)
 +
end
 +
 
 +
-- Generate the text.
 +
local msg = self._protectionObj.bannerConfig[key]
 +
if type(msg) == 'string' then
 +
return self:_substituteParameters(msg)
 +
elseif type(msg) == 'function' then
 +
msg = msg(self._protectionObj, self._args)
 +
if type(msg) ~= 'string' then
 +
error(string.format(
 +
'bad output from banner config function with key "%s"'
 +
.. ' (expected string, got %s)',
 +
tostring(key),
 +
type(msg)
 +
), 4)
 +
end
 +
return self:_substituteParameters(msg)
 +
end
 +
end
 +
 
 +
--------------------------------------------------------------------------------
 +
-- BannerTemplate class
 +
--------------------------------------------------------------------------------
 +
 
 +
local BannerTemplate = {}
 +
BannerTemplate.__index = BannerTemplate
 +
 
 +
function BannerTemplate.new(protectionObj, cfg)
 +
local obj = {}
 +
obj._cfg = cfg
 +
 
 +
-- Set the image filename.
 +
local imageFilename = protectionObj.bannerConfig.image
 +
if imageFilename then
 +
obj._imageFilename = imageFilename
 +
else
 +
-- If an image filename isn't specified explicitly in the banner config,
 +
-- generate it from the protection status and the namespace.
 +
local action = protectionObj.action
 +
local level = protectionObj.level
 +
local namespace = protectionObj.title.namespace
 +
local reason = protectionObj.reason
 +
 +
-- Deal with special cases first.
 +
if (
 +
namespace == 10
 +
or namespace == 828
 +
or reason and obj._cfg.indefImageReasons[reason]
 +
)
 +
and action == 'edit'
 +
and level == 'sysop'
 +
and not protectionObj:isTemporary()
 +
then
 +
-- Fully protected modules and templates get the special red "indef"
 +
-- padlock.
 +
obj._imageFilename = obj._cfg.msg['image-filename-indef']
 +
else
 +
-- Deal with regular protection types.
 +
local images = obj._cfg.images
 +
if images[action] then
 +
if images[action][level] then
 +
obj._imageFilename = images[action][level]
 +
elseif images[action].default then
 +
obj._imageFilename = images[action].default
 +
end
 +
end
 +
end
 +
end
 +
return setmetatable(obj, BannerTemplate)
 +
end
 +
 
 +
function BannerTemplate:setImageWidth(width)
 +
self._imageWidth = width
 +
end
 +
 
 +
function BannerTemplate:setImageTooltip(tooltip)
 +
self._imageCaption = tooltip
 +
end
 +
 
 +
function BannerTemplate:renderImage()
 +
local filename = self._imageFilename
 +
or self._cfg.msg['image-filename-default']
 +
or 'Transparent.gif'
 +
return makeFileLink{
 +
file = filename,
 +
size = (self._imageWidth or 20) .. 'px',
 +
alt = self._imageAlt,
 +
link = self._imageLink,
 +
caption = self._imageCaption
 +
}
 +
end
 +
 
 +
--------------------------------------------------------------------------------
 +
-- Banner class
 +
--------------------------------------------------------------------------------
 +
 
 +
local Banner = setmetatable({}, BannerTemplate)
 +
Banner.__index = Banner
 +
 
 +
function Banner.new(protectionObj, blurbObj, cfg)
 +
local obj = BannerTemplate.new(protectionObj, cfg) -- This doesn't need the blurb.
 +
obj:setImageWidth(40)
 +
obj:setImageTooltip(blurbObj:makeBannerText('alt')) -- Large banners use the alt text for the tooltip.
 +
obj._reasonText = blurbObj:makeBannerText('text')
 +
obj._explanationText = blurbObj:makeBannerText('explanation')
 +
obj._page = protectionObj.title.prefixedText -- Only makes a difference in testing.
 +
return setmetatable(obj, Banner)
 +
end
 +
 
 +
function Banner:__tostring()
 +
-- Renders the banner.
 +
makeMessageBox = makeMessageBox or require('Module:Message box').main
 +
local reasonText = self._reasonText or error('no reason text set', 2)
 +
local explanationText = self._explanationText
 +
local mbargs = {
 +
page = self._page,
 
type = 'protection',
 
type = 'protection',
image = image,
+
image = self:renderImage(),
text = text
+
text = string.format(
 +
"'''%s'''%s",
 +
reasonText,
 +
explanationText and '<br />' .. explanationText or ''
 +
)
 
}
 
}
return mMessageBox.main('mbox', mbargs)
+
return makeMessageBox('mbox', mbargs)
 +
end
 +
 
 +
--------------------------------------------------------------------------------
 +
-- Padlock class
 +
--------------------------------------------------------------------------------
 +
 
 +
local Padlock = setmetatable({}, BannerTemplate)
 +
Padlock.__index = Padlock
 +
 
 +
function Padlock.new(protectionObj, blurbObj, cfg)
 +
local obj = BannerTemplate.new(protectionObj, cfg) -- This doesn't need the blurb.
 +
obj:setImageWidth(20)
 +
obj:setImageTooltip(blurbObj:makeBannerText('tooltip'))
 +
obj._imageAlt = blurbObj:makeBannerText('alt')
 +
obj._imageLink = blurbObj:makeBannerText('link')
 +
obj._indicatorName = cfg.padlockIndicatorNames[protectionObj.action]
 +
or cfg.padlockIndicatorNames.default
 +
or 'pp-default'
 +
return setmetatable(obj, Padlock)
 +
end
 +
 
 +
function Padlock:__tostring()
 +
local frame = mw.getCurrentFrame()
 +
-- The nowiki tag helps prevent whitespace at the top of articles.
 +
local nowiki = frame:extensionTag{name = 'nowiki'}
 +
local indicator = frame:extensionTag{
 +
name = 'indicator',
 +
args = {name = self._indicatorName},
 +
content = self:renderImage()
 +
}
 +
return nowiki .. indicator
 +
end
 +
 
 +
--------------------------------------------------------------------------------
 +
-- Exports
 +
--------------------------------------------------------------------------------
 +
 
 +
local p = {}
 +
 
 +
function p._exportClasses()
 +
-- This is used for testing purposes.
 +
return {
 +
Protection = Protection,
 +
Blurb = Blurb,
 +
BannerTemplate = BannerTemplate,
 +
Banner = Banner,
 +
Padlock = Padlock,
 +
}
 +
end
 +
 
 +
function p._main(args, cfg, title)
 +
args = args or {}
 +
cfg = cfg or require(CONFIG_MODULE)
 +
 
 +
local protectionObj = Protection.new(args, cfg, title)
 +
 
 +
local ret = {}
 +
 
 +
-- If a page's edit protection is equally or more restrictive than its
 +
-- protection from some other action, then don't bother displaying anything
 +
-- for the other action (except categories).
 +
if protectionObj.action == 'edit' or
 +
args.demolevel or
 +
not walkHierarchy(
 +
cfg.hierarchy,
 +
protectionObj.level
 +
)[effectiveProtectionLevel('edit', protectionObj.title)]
 +
then
 +
-- Initialise the blurb object
 +
local blurbObj = Blurb.new(protectionObj, args, cfg)
 +
 +
-- Render the banner
 +
if protectionObj:isProtected() then
 +
ret[#ret + 1] = tostring(
 +
(yesno(args.small) and Padlock or Banner)
 +
.new(protectionObj, blurbObj, cfg)
 +
)
 +
end
 +
end
 +
 
 +
-- Render the categories
 +
if yesno(args.category) ~= false then
 +
ret[#ret + 1] = protectionObj:makeCategoryLinks()
 +
end
 +
 +
return table.concat(ret)
 +
end
 +
 
 +
function p.main(frame, cfg)
 +
cfg = cfg or require(CONFIG_MODULE)
 +
 
 +
-- Find default args, if any.
 +
local parent = frame.getParent and frame:getParent()
 +
local defaultArgs = parent and cfg.wrappers[parent:getTitle():gsub('/sandbox$', '')]
 +
 
 +
-- Find user args, and use the parent frame if we are being called from a
 +
-- wrapper template.
 +
getArgs = getArgs or require('Module:Arguments').getArgs
 +
local userArgs = getArgs(frame, {
 +
parentOnly = defaultArgs,
 +
frameOnly = not defaultArgs
 +
})
 +
 
 +
-- Build the args table. User-specified args overwrite default args.
 +
local args = {}
 +
for k, v in pairs(defaultArgs or {}) do
 +
args[k] = v
 +
end
 +
for k, v in pairs(userArgs) do
 +
args[k] = v
 +
end
 +
return p._main(args, cfg)
 
end
 
end
  
 
return p
 
return p

Latest revision as of 13:23, 8 April 2016

Documentation for this module may be created at Module:Protection banner/doc

Script error: Lua error: Internal error: The interpreter exited with status 126.

-- This module implements {{pp-meta}} and its daughter templates such as
-- {{pp-dispute}}, {{pp-vandalism}} and {{pp-sock}}.

-- Initialise necessary modules.
require('Module:No globals')
local makeFileLink = require('Module:File link')._main
local effectiveProtectionLevel = require('Module:Effective protection level')._main
local effectiveProtectionExpiry = require('Module:Effective protection expiry')._main
local yesno = require('Module:Yesno')

-- Lazily initialise modules and objects we don't always need.
local getArgs, makeMessageBox, lang

-- Set constants.
local CONFIG_MODULE = 'Module:Protection banner/config'

--------------------------------------------------------------------------------
-- Helper functions
--------------------------------------------------------------------------------

local function makeCategoryLink(cat, sort)
	local nsText = mw.site.namespaces[14].name
	if cat and sort then
		return string.format(
			'[[%s:%s|%s]]',
			nsText,
			cat,
			sort
		)
	elseif cat then
		return string.format(
			'[[%s:%s]]',
			nsText,
			cat
		)
	else
		return ''
	end
end

-- Validation function for the expiry and the protection date
local function validateDate(dateString, dateType)
	lang = lang or mw.language.getContentLanguage()
	local success, result = pcall(lang.formatDate, lang, 'U', dateString)
	if success then
		result = tonumber(result)
		if result then
			return result
		end
	end
	error(string.format(
		'invalid %s ("%s")',
		dateType,
		tostring(dateString)
	), 4)
end

local function makeFullUrl(page, query, display)
	return string.format(
		'[%s %s]',
		tostring(mw.uri.fullUrl(page, query)),
		display
	)
end

local function toTableEnd(t, pos)
	-- Sends the value at position pos to the end of array t, and shifts the
	-- other items down accordingly.
	return table.insert(t, table.remove(t, pos))
end

local function walkHierarchy(hierarchy, start)
	local toWalk, retval = {[start] = true}, {}
	while true do
		-- Can't use pairs() since we're adding and removing things as we're iterating
		local k = next(toWalk) -- This always gets the "first" key
		if k == nil then break end
		toWalk[k] = nil
		retval[k] = true
		for _,v in ipairs(hierarchy[k]) do
			if not retval[v] then
				toWalk[v] = true
			end
		end
	end
	return retval
end

--------------------------------------------------------------------------------
-- Protection class
--------------------------------------------------------------------------------

local Protection = {}
Protection.__index = Protection

Protection.supportedActions = {
	edit = true,
	move = true,
	autoreview = true,
	upload = true
}

Protection.bannerConfigFields = {
	'text',
	'explanation',
	'tooltip',
	'alt',
	'link',
	'image'
}

function Protection.new(args, cfg, title)
	local obj = {}
	obj._cfg = cfg
	obj.title = title or mw.title.getCurrentTitle()

	-- Set action
	if not args.action then
		obj.action = 'edit'
	elseif Protection.supportedActions[args.action] then
		obj.action = args.action
	else
		error(string.format(
			'invalid action ("%s")',
			tostring(args.action)
		), 3)
	end

	-- Set level
	obj.level = args.demolevel or effectiveProtectionLevel(obj.action, obj.title)
	if not obj.level or (obj.action == 'move' and obj.level == 'autoconfirmed') then
		-- Users need to be autoconfirmed to move pages anyway, so treat
		-- semi-move-protected pages as unprotected.
		obj.level = '*'
	end

	-- Set expiry
	local effectiveExpiry = effectiveProtectionExpiry(obj.action, obj.title)
	if effectiveExpiry == 'infinity' then
		obj.expiry = 'indef'
	elseif effectiveExpiry ~= 'unknown' then
		obj.expiry = validateDate(effectiveExpiry, 'expiry date')
	elseif args.expiry then
		if cfg.indefStrings[args.expiry] then
			obj.expiry = 'indef'
		elseif type(args.expiry) == 'number' then
			obj.expiry = args.expiry
		else
			obj.expiry = validateDate(args.expiry, 'expiry date')
		end
	end

	-- Set reason
	if args[1] then
		obj.reason = mw.ustring.lower(args[1])
		if obj.reason:find('|') then
			error('reasons cannot contain the pipe character ("|")', 3)
		end
	end

	-- Set protection date
	if args.date then
		obj.protectionDate = validateDate(args.date, 'protection date')
	end
	
	-- Set banner config
	do
		obj.bannerConfig = {}
		local configTables = {}
		if cfg.banners[obj.action] then
			configTables[#configTables + 1] = cfg.banners[obj.action][obj.reason]
		end
		if cfg.defaultBanners[obj.action] then
			configTables[#configTables + 1] = cfg.defaultBanners[obj.action][obj.level]
			configTables[#configTables + 1] = cfg.defaultBanners[obj.action].default
		end
		configTables[#configTables + 1] = cfg.masterBanner
		for i, field in ipairs(Protection.bannerConfigFields) do
			for j, t in ipairs(configTables) do
				if t[field] then
					obj.bannerConfig[field] = t[field]
					break
				end
			end
		end
	end
	return setmetatable(obj, Protection)
end

function Protection:isProtected()
	return self.level ~= '*'
end

function Protection:isTemporary()
	return type(self.expiry) == 'number'
end

function Protection:makeProtectionCategory()
	local cfg = self._cfg
	local title = self.title
	
	-- Exit if the page is not protected.
	if not self:isProtected() then
		return ''
	end
	
	-- Get the expiry key fragment.
	local expiryFragment
	if self.expiry == 'indef' then
		expiryFragment = self.expiry
	elseif type(self.expiry) == 'number' then
		expiryFragment = 'temp'
	end

	-- Get the namespace key fragment.
	local namespaceFragment
	do
		namespaceFragment = cfg.categoryNamespaceKeys[title.namespace]
		if not namespaceFragment and title.namespace % 2 == 1 then
				namespaceFragment = 'talk'
		end
	end
 
	-- Define the order that key fragments are tested in. This is done with an
	-- array of tables containing the value to be tested, along with its
	-- position in the cfg.protectionCategories table.
	local order = {
		{val = expiryFragment,    keypos = 1},
		{val = namespaceFragment, keypos = 2},
		{val = self.reason,       keypos = 3},
		{val = self.level,        keypos = 4},
		{val = self.action,       keypos = 5}
	}

	--[[
	-- The old protection templates used an ad-hoc protection category system,
	-- with some templates prioritising namespaces in their categories, and
	-- others prioritising the protection reason. To emulate this in this module
	-- we use the config table cfg.reasonsWithNamespacePriority to set the
	-- reasons for which namespaces have priority over protection reason.
	-- If we are dealing with one of those reasons, move the namespace table to
	-- the end of the order table, i.e. give it highest priority. If not, the
	-- reason should have highest priority, so move that to the end of the table
	-- instead.
	--]]
	if self.reason and cfg.reasonsWithNamespacePriority[self.reason] then
		-- table.insert(order, 3, table.remove(order, 2))
		toTableEnd(order, 2)
	else
		toTableEnd(order, 3)
	end
 
	--[[
	-- Define the attempt order. Inactive subtables (subtables with nil "value"
	-- fields) are moved to the end, where they will later be given the key
	-- "all". This is to cut down on the number of table lookups in
	-- cfg.protectionCategories, which grows exponentially with the number of
	-- non-nil keys. We keep track of the number of active subtables with the
	-- noActive parameter.
	--]]
	local noActive, attemptOrder
	do
		local active, inactive = {}, {}
		for i, t in ipairs(order) do
			if t.val then
				active[#active + 1] = t
			else
				inactive[#inactive + 1] = t
			end
		end
		noActive = #active
		attemptOrder = active
		for i, t in ipairs(inactive) do
			attemptOrder[#attemptOrder + 1] = t
		end
	end
 
	--[[
	-- Check increasingly generic key combinations until we find a match. If a
	-- specific category exists for the combination of key fragments we are
	-- given, that match will be found first. If not, we keep trying different
	-- key fragment combinations until we match using the key
	-- "all-all-all-all-all".
	--
	-- To generate the keys, we index the key subtables using a binary matrix
	-- with indexes i and j. j is only calculated up to the number of active
	-- subtables. For example, if there were three active subtables, the matrix
	-- would look like this, with 0 corresponding to the key fragment "all", and
	-- 1 corresponding to other key fragments.
	-- 
	--   j 1  2  3
	-- i  
	-- 1   1  1  1
	-- 2   0  1  1
	-- 3   1  0  1
	-- 4   0  0  1
	-- 5   1  1  0
	-- 6   0  1  0
	-- 7   1  0  0
	-- 8   0  0  0
	-- 
	-- Values of j higher than the number of active subtables are set
	-- to the string "all".
	--
	-- A key for cfg.protectionCategories is constructed for each value of i.
	-- The position of the value in the key is determined by the keypos field in
	-- each subtable.
	--]]
	local cats = cfg.protectionCategories
	for i = 1, 2^noActive do
		local key = {}
		for j, t in ipairs(attemptOrder) do
			if j > noActive then
				key[t.keypos] = 'all'
			else
				local quotient = i / 2 ^ (j - 1)
				quotient = math.ceil(quotient)
				if quotient % 2 == 1 then
					key[t.keypos] = t.val
				else
					key[t.keypos] = 'all'
				end
			end
		end
		key = table.concat(key, '|')
		local attempt = cats[key]
		if attempt then
			return makeCategoryLink(attempt, title.text)
		end
	end
	return ''
end

function Protection:needsExpiry()
	local cfg = self._cfg
	local actionNeedsCheck = cfg.expiryCheckActions[self.action]
	return not self.expiry and (
		actionNeedsCheck or (
			actionNeedsCheck == nil
			and self.reason -- the old {{pp-protected}} didn't check for expiry
			and not cfg.reasonsWithoutExpiryCheck[self.reason]
		)
	)
end

function Protection:isIncorrect()
	local expiry = self.expiry
	return not self:isProtected()
		or type(expiry) == 'number' and expiry < os.time()
end

function Protection:isTemplateProtectedNonTemplate()
	local action, namespace = self.action, self.title.namespace
	return self.level == 'templateeditor'
		and (
			(action ~= 'edit' and action ~= 'move')
			or (namespace ~= 10 and namespace ~= 828)
		)
end

function Protection:makeCategoryLinks()
	local msg = self._cfg.msg
	local ret = { self:makeProtectionCategory() }
	if self:needsExpiry() then
		ret[#ret + 1] = makeCategoryLink(
			msg['tracking-category-expiry'],
			self.title.text
		)
	end
	if self:isIncorrect() then
		ret[#ret + 1] = makeCategoryLink(
			msg['tracking-category-incorrect'],
			self.title.text
		)
	end
	if self:isTemplateProtectedNonTemplate() then
		ret[#ret + 1] = makeCategoryLink(
			msg['tracking-category-template'],
			self.title.text
		)
	end
	return table.concat(ret)
end

--------------------------------------------------------------------------------
-- Blurb class
--------------------------------------------------------------------------------

local Blurb = {}
Blurb.__index = Blurb

Blurb.bannerTextFields = {
	text = true,
	explanation = true,
	tooltip = true,
	alt = true,
	link = true
}

function Blurb.new(protectionObj, args, cfg)
	return setmetatable({
		_cfg = cfg,
		_protectionObj = protectionObj,
		_args = args
	}, Blurb)
end

-- Private methods --

function Blurb:_formatDate(num)
	-- Formats a Unix timestamp into dd Month, YYYY format.
	lang = lang or mw.language.getContentLanguage()
	local success, date = pcall(
		lang.formatDate,
		lang,
		self._cfg.msg['expiry-date-format'] or 'j F Y',
		'@' .. tostring(num)
	)
	if success then
		return date
	end
end

function Blurb:_getExpandedMessage(msgKey)
	return self:_substituteParameters(self._cfg.msg[msgKey])
end

function Blurb:_substituteParameters(msg)
	if not self._params then
		local parameterFuncs = {}

		parameterFuncs.CURRENTVERSION     = self._makeCurrentVersionParameter
		parameterFuncs.EDITREQUEST        = self._makeEditRequestParameter
		parameterFuncs.EXPIRY             = self._makeExpiryParameter
		parameterFuncs.EXPLANATIONBLURB   = self._makeExplanationBlurbParameter
		parameterFuncs.IMAGELINK          = self._makeImageLinkParameter
		parameterFuncs.INTROBLURB         = self._makeIntroBlurbParameter
		parameterFuncs.INTROFRAGMENT      = self._makeIntroFragmentParameter
		parameterFuncs.PAGETYPE           = self._makePagetypeParameter
		parameterFuncs.PROTECTIONBLURB    = self._makeProtectionBlurbParameter
		parameterFuncs.PROTECTIONDATE     = self._makeProtectionDateParameter
		parameterFuncs.PROTECTIONLEVEL    = self._makeProtectionLevelParameter
		parameterFuncs.PROTECTIONLOG      = self._makeProtectionLogParameter
		parameterFuncs.TALKPAGE           = self._makeTalkPageParameter
		parameterFuncs.TOOLTIPBLURB       = self._makeTooltipBlurbParameter
		parameterFuncs.TOOLTIPFRAGMENT    = self._makeTooltipFragmentParameter
		parameterFuncs.VANDAL             = self._makeVandalTemplateParameter
		
		self._params = setmetatable({}, {
			__index = function (t, k)
				local param
				if parameterFuncs[k] then
					param = parameterFuncs[k](self)
				end
				param = param or ''
				t[k] = param
				return param
			end
		})
	end
	
	msg = msg:gsub('${(%u+)}', self._params)
	return msg
end

function Blurb:_makeCurrentVersionParameter()
	-- A link to the page history or the move log, depending on the kind of
	-- protection.
	local pagename = self._protectionObj.title.prefixedText
	if self._protectionObj.action == 'move' then
		-- We need the move log link.
		return makeFullUrl(
			'Special:Log',
			{type = 'move', page = pagename},
			self:_getExpandedMessage('current-version-move-display')
		)
	else
		-- We need the history link.
		return makeFullUrl(
			pagename,
			{action = 'history'},
			self:_getExpandedMessage('current-version-edit-display')
		)
	end
end

function Blurb:_makeEditRequestParameter()
	local mEditRequest = require('Module:Submit an edit request')
	local action = self._protectionObj.action
	local level = self._protectionObj.level
	
	-- Get the edit request type.
	local requestType
	if action == 'edit' then
		if level == 'autoconfirmed' then
			requestType = 'semi'
		elseif level == 'templateeditor' then
			requestType = 'template'
		end
	end
	requestType = requestType or 'full'
	
	-- Get the display value.
	local display = self:_getExpandedMessage('edit-request-display')

	return mEditRequest._link{type = requestType, display = display}
end

function Blurb:_makeExpiryParameter()
	local expiry = self._protectionObj.expiry
	if type(expiry) == 'number' then
		return self:_formatDate(expiry)
	else
		return expiry
	end
end

function Blurb:_makeExplanationBlurbParameter()
	-- Cover special cases first.
	if self._protectionObj.title.namespace == 8 then
		-- MediaWiki namespace
		return self:_getExpandedMessage('explanation-blurb-nounprotect')
	end

	-- Get explanation blurb table keys
	local action = self._protectionObj.action
	local level = self._protectionObj.level
	local talkKey = self._protectionObj.title.isTalkPage and 'talk' or 'subject'

	-- Find the message in the explanation blurb table and substitute any
	-- parameters.
	local explanations = self._cfg.explanationBlurbs
	local msg
	if explanations[action][level] and explanations[action][level][talkKey] then
		msg = explanations[action][level][talkKey]
	elseif explanations[action][level] and explanations[action][level].default then
		msg = explanations[action][level].default
	elseif explanations[action].default and explanations[action].default[talkKey] then
		msg = explanations[action].default[talkKey]
	elseif explanations[action].default and explanations[action].default.default then
		msg = explanations[action].default.default
	else
		error(string.format(
			'could not find explanation blurb for action "%s", level "%s" and talk key "%s"',
			action,
			level,
			talkKey
		), 8)
	end
	return self:_substituteParameters(msg)
end

function Blurb:_makeImageLinkParameter()
	local imageLinks = self._cfg.imageLinks
	local action = self._protectionObj.action
	local level = self._protectionObj.level
	local msg
	if imageLinks[action][level] then
		msg = imageLinks[action][level]
	elseif imageLinks[action].default then
		msg = imageLinks[action].default
	else
		msg = imageLinks.edit.default
	end
	return self:_substituteParameters(msg)
end

function Blurb:_makeIntroBlurbParameter()
	if self._protectionObj:isTemporary() then
		return self:_getExpandedMessage('intro-blurb-expiry')
	else
		return self:_getExpandedMessage('intro-blurb-noexpiry')
	end
end

function Blurb:_makeIntroFragmentParameter()
	if self._protectionObj:isTemporary() then
		return self:_getExpandedMessage('intro-fragment-expiry')
	else
		return self:_getExpandedMessage('intro-fragment-noexpiry')
	end
end

function Blurb:_makePagetypeParameter()
	local pagetypes = self._cfg.pagetypes
	return pagetypes[self._protectionObj.title.namespace]
		or pagetypes.default
		or error('no default pagetype defined', 8)
end

function Blurb:_makeProtectionBlurbParameter()
	local protectionBlurbs = self._cfg.protectionBlurbs
	local action = self._protectionObj.action
	local level = self._protectionObj.level
	local msg
	if protectionBlurbs[action][level] then
		msg = protectionBlurbs[action][level]
	elseif protectionBlurbs[action].default then
		msg = protectionBlurbs[action].default
	elseif protectionBlurbs.edit.default then
		msg = protectionBlurbs.edit.default
	else
		error('no protection blurb defined for protectionBlurbs.edit.default', 8)
	end
	return self:_substituteParameters(msg)
end

function Blurb:_makeProtectionDateParameter()
	local protectionDate = self._protectionObj.protectionDate
	if type(protectionDate) == 'number' then
		return self:_formatDate(protectionDate)
	else
		return protectionDate
	end
end

function Blurb:_makeProtectionLevelParameter()
	local protectionLevels = self._cfg.protectionLevels
	local action = self._protectionObj.action
	local level = self._protectionObj.level
	local msg
	if protectionLevels[action][level] then
		msg = protectionLevels[action][level]
	elseif protectionLevels[action].default then
		msg = protectionLevels[action].default
	elseif protectionLevels.edit.default then
		msg = protectionLevels.edit.default
	else
		error('no protection level defined for protectionLevels.edit.default', 8)
	end
	return self:_substituteParameters(msg)
end

function Blurb:_makeProtectionLogParameter()
	local pagename = self._protectionObj.title.prefixedText
	if self._protectionObj.action == 'autoreview' then
		-- We need the pending changes log.
		return makeFullUrl(
			'Special:Log',
			{type = 'stable', page = pagename},
			self:_getExpandedMessage('pc-log-display')
		)
	else
		-- We need the protection log.
		return makeFullUrl(
			'Special:Log',
			{type = 'protect', page = pagename},
			self:_getExpandedMessage('protection-log-display')
		)
	end
end

function Blurb:_makeTalkPageParameter()
	return string.format(
		'[[%s:%s#%s|%s]]',
		mw.site.namespaces[self._protectionObj.title.namespace].talk.name,
		self._protectionObj.title.text,
		self._args.section or 'top',
		self:_getExpandedMessage('talk-page-link-display')
	)
end

function Blurb:_makeTooltipBlurbParameter()
	if self._protectionObj:isTemporary() then
		return self:_getExpandedMessage('tooltip-blurb-expiry')
	else
		return self:_getExpandedMessage('tooltip-blurb-noexpiry')
	end
end

function Blurb:_makeTooltipFragmentParameter()
	if self._protectionObj:isTemporary() then
		return self:_getExpandedMessage('tooltip-fragment-expiry')
	else
		return self:_getExpandedMessage('tooltip-fragment-noexpiry')
	end
end

function Blurb:_makeVandalTemplateParameter()
	return require('Module:Vandal-m')._main{
		self._args.user or self._protectionObj.title.baseText
	}
end

-- Public methods --

function Blurb:makeBannerText(key)
	-- Validate input.
	if not key or not Blurb.bannerTextFields[key] then
		error(string.format(
			'"%s" is not a valid banner config field',
			tostring(key)
		), 2)
	end

	-- Generate the text.
	local msg = self._protectionObj.bannerConfig[key]
	if type(msg) == 'string' then
		return self:_substituteParameters(msg)
	elseif type(msg) == 'function' then
		msg = msg(self._protectionObj, self._args)
		if type(msg) ~= 'string' then
			error(string.format(
				'bad output from banner config function with key "%s"'
					.. ' (expected string, got %s)',
				tostring(key),
				type(msg)
			), 4)
		end
		return self:_substituteParameters(msg)
	end
end

--------------------------------------------------------------------------------
-- BannerTemplate class
--------------------------------------------------------------------------------

local BannerTemplate = {}
BannerTemplate.__index = BannerTemplate

function BannerTemplate.new(protectionObj, cfg)
	local obj = {}
	obj._cfg = cfg

	-- Set the image filename.
	local imageFilename = protectionObj.bannerConfig.image
	if imageFilename then
		obj._imageFilename = imageFilename
	else
		-- If an image filename isn't specified explicitly in the banner config,
		-- generate it from the protection status and the namespace.
		local action = protectionObj.action
		local level = protectionObj.level
		local namespace = protectionObj.title.namespace
		local reason = protectionObj.reason
		
		-- Deal with special cases first.
		if (
			namespace == 10
			or namespace == 828
			or reason and obj._cfg.indefImageReasons[reason]
			)
			and action == 'edit'
			and level == 'sysop'
			and not protectionObj:isTemporary()
		then
			-- Fully protected modules and templates get the special red "indef"
			-- padlock.
			obj._imageFilename = obj._cfg.msg['image-filename-indef']
		else
			-- Deal with regular protection types.
			local images = obj._cfg.images
			if images[action] then
				if images[action][level] then
					obj._imageFilename = images[action][level]
				elseif images[action].default then
					obj._imageFilename = images[action].default
				end
			end
		end
	end
	return setmetatable(obj, BannerTemplate)
end

function BannerTemplate:setImageWidth(width)
	self._imageWidth = width
end

function BannerTemplate:setImageTooltip(tooltip)
	self._imageCaption = tooltip
end

function BannerTemplate:renderImage()
	local filename = self._imageFilename
		or self._cfg.msg['image-filename-default']
		or 'Transparent.gif'
	return makeFileLink{
		file = filename,
		size = (self._imageWidth or 20) .. 'px',
		alt = self._imageAlt,
		link = self._imageLink,
		caption = self._imageCaption
	}
end

--------------------------------------------------------------------------------
-- Banner class
--------------------------------------------------------------------------------

local Banner = setmetatable({}, BannerTemplate)
Banner.__index = Banner

function Banner.new(protectionObj, blurbObj, cfg)
	local obj = BannerTemplate.new(protectionObj, cfg) -- This doesn't need the blurb.
	obj:setImageWidth(40)
	obj:setImageTooltip(blurbObj:makeBannerText('alt')) -- Large banners use the alt text for the tooltip.
	obj._reasonText = blurbObj:makeBannerText('text')
	obj._explanationText = blurbObj:makeBannerText('explanation')
	obj._page = protectionObj.title.prefixedText -- Only makes a difference in testing.
	return setmetatable(obj, Banner)
end

function Banner:__tostring()
	-- Renders the banner.
	makeMessageBox = makeMessageBox or require('Module:Message box').main
	local reasonText = self._reasonText or error('no reason text set', 2)
	local explanationText = self._explanationText
	local mbargs = {
		page = self._page,
		type = 'protection',
		image = self:renderImage(),
		text = string.format(
			"'''%s'''%s",
			reasonText,
			explanationText and '<br />' .. explanationText or ''
		)
	}
	return makeMessageBox('mbox', mbargs)
end

--------------------------------------------------------------------------------
-- Padlock class
--------------------------------------------------------------------------------

local Padlock = setmetatable({}, BannerTemplate)
Padlock.__index = Padlock

function Padlock.new(protectionObj, blurbObj, cfg)
	local obj = BannerTemplate.new(protectionObj, cfg) -- This doesn't need the blurb.
	obj:setImageWidth(20)
	obj:setImageTooltip(blurbObj:makeBannerText('tooltip'))
	obj._imageAlt = blurbObj:makeBannerText('alt')
	obj._imageLink = blurbObj:makeBannerText('link')
	obj._indicatorName = cfg.padlockIndicatorNames[protectionObj.action]
		or cfg.padlockIndicatorNames.default
		or 'pp-default'
	return setmetatable(obj, Padlock)
end

function Padlock:__tostring()
	local frame = mw.getCurrentFrame()
	-- The nowiki tag helps prevent whitespace at the top of articles.
	local nowiki = frame:extensionTag{name = 'nowiki'}
	local indicator = frame:extensionTag{
		name = 'indicator',
		args = {name = self._indicatorName},
		content = self:renderImage()
	}
	return nowiki .. indicator
end

--------------------------------------------------------------------------------
-- Exports
--------------------------------------------------------------------------------

local p = {}

function p._exportClasses()
	-- This is used for testing purposes.
	return {
		Protection = Protection,
		Blurb = Blurb,
		BannerTemplate = BannerTemplate,
		Banner = Banner,
		Padlock = Padlock,
	}
end

function p._main(args, cfg, title)
	args = args or {}
	cfg = cfg or require(CONFIG_MODULE)

	local protectionObj = Protection.new(args, cfg, title)

	local ret = {}

	-- If a page's edit protection is equally or more restrictive than its
	-- protection from some other action, then don't bother displaying anything
	-- for the other action (except categories).
	if protectionObj.action == 'edit' or
		args.demolevel or
		not walkHierarchy(
			cfg.hierarchy,
			protectionObj.level
		)[effectiveProtectionLevel('edit', protectionObj.title)]
	then
		-- Initialise the blurb object
		local blurbObj = Blurb.new(protectionObj, args, cfg)
	
		-- Render the banner
		if protectionObj:isProtected() then
			ret[#ret + 1] = tostring(
				(yesno(args.small) and Padlock or Banner)
				.new(protectionObj, blurbObj, cfg)
			)
		end
	end

	-- Render the categories
	if yesno(args.category) ~= false then
		ret[#ret + 1] = protectionObj:makeCategoryLinks()
	end
	
	return table.concat(ret)	
end

function p.main(frame, cfg)
	cfg = cfg or require(CONFIG_MODULE)

	-- Find default args, if any.
	local parent = frame.getParent and frame:getParent()
	local defaultArgs = parent and cfg.wrappers[parent:getTitle():gsub('/sandbox$', '')]

	-- Find user args, and use the parent frame if we are being called from a
	-- wrapper template.
	getArgs = getArgs or require('Module:Arguments').getArgs
	local userArgs = getArgs(frame, {
		parentOnly = defaultArgs,
		frameOnly = not defaultArgs
	})

	-- Build the args table. User-specified args overwrite default args.
	local args = {}
	for k, v in pairs(defaultArgs or {}) do
		args[k] = v
	end
	for k, v in pairs(userArgs) do
		args[k] = v
	end
	return p._main(args, cfg)
end

return p