Module:Protection banner: Difference between revisions

From Zoophilia Wiki
Jump to navigationJump to search
meta>Mr. Stradivarius
move section, username and deletion discussion methods out of the ProtectionStatus class, as they don't really have anything to do with protection status
Update module with messages for Zoophilia Wiki and not Wikipedia
 
(140 intermediate revisions by 12 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.
-- Initialize necessary modules.
require('Module:No globals')
require('strict')
local class = require('Module:Middleclass').class
local makeFileLink = require("Module:File link")._main
local mArguments = require('Module:Arguments')
local effectiveProtectionLevel = require("Module:Effective protection level")._main
local mFileLink = require('Module:File link')
local effectiveProtectionExpiry = require("Module:Effective protection expiry")._main
local mProtectionLevel = require('Module:Effective protection level')
local yesno = require("Module:Yesno")
local yesno = require('Module:Yesno')
 
-- Lazily initialize modules and objects we don't always need.
local getArgs, makeMessageBox, lang
 
-- Set constants.
local CONFIG_MODULE = "Module:Protection banner/config"


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
-- ProtectionStatus class
-- Helper functions
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


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


function ProtectionStatus:initialize(args, titleObj)
-- Validation function for the expiry and the protection date.
-- Set action
local function validateDate(dateString, dateType)
do
  if not lang then
local actions = {
    lang = mw.language.getContentLanguage()
create = true,
  end
edit = true,
  local success, result = pcall(lang.formatDate, lang, "U", dateString)
move = true,
  if success then
autoreview = true
    result = tonumber(result)
}
    if result then
if args.action and actions[args.action] then
      return result
self._action = args.action
    end
else
  end
self._action = 'edit'
  error(string.format(
end
    "invalid %s: %s",
end
    dateType,
    tostring(dateString)
  ), 4)
end


-- Set level
local function makeFullUrl(page, query, display)
do
  return string.format(
local level = mProtectionLevel._main(self._action, titleObj)
    "[%s %s]",
if level == 'accountcreator' then
    tostring(mw.uri.fullUrl(page, query)),
-- Lump titleblacklisted pages in with template-protected pages,
    display
-- since templateeditors can do both.
  )
level = 'templateeditor'
end
end
self._level = level or '*'
end


-- Set other params
-- Given a directed graph formatted as node → table of direct successors,
self._reason = args.reason
-- get a table of all nodes reachable from a given node (though always
self._expiry = args.expiry or 'indef'
-- including the given node).
self._protectionDate = args.date
local function getReachableNodes(graph, 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
      return retval
    end
    toWalk[k] = nil
    retval[k] = true
    for _, v in ipairs(graph[k]) do
      if not retval[v] then
        toWalk[v] = true
      end
    end
  end
end
end


function ProtectionStatus:getAction()
--------------------------------------------------------------------------------
return self._action
-- Protection class
--------------------------------------------------------------------------------
 
local Protection = {}
Protection.__index = Protection
 
Protection.supportedActions = {
  autoreview = true,
  edit      = true,
  move      = true,
  upload    = true
}
 
Protection.bannerConfigFields = {
  "alt",
  "explanation",
  "image",
  "link",
  "text",
  "tooltip"
}
 
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")
  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
end


function ProtectionStatus:getLevel()
function Protection:isUserScript()
return self._level
  -- Whether the page is a user JavaScript or CSS page.
  local title = self.title
  return title.namespace == 2 and (
    title.contentModel == 'javascript' or title.contentModel == 'css'
  )
end
end


function ProtectionStatus:getReason()
function Protection:isProtected()
return self._reason
  return self.level ~= "*"
end
end


function ProtectionStatus:getExpiry()
function Protection:shouldShowLock()
return self._expiry
  -- Whether we should output a banner/padlock.
  return self:isProtected() and not self:isUserScript()
end
end


function ProtectionStatus:getProtectionDate()
-- Whether this page needs a protection category.
return self._protectionDate
Protection.shouldHaveProtectionCategory = Protection.shouldShowLock
 
function Protection:isTemporary()
  return type(self.expiry) == "number"
end
end


--------------------------------------------------------------------------------
function Protection:makeProtectionCategory()
-- Config class
  if not self:shouldHaveProtectionCategory() then
--------------------------------------------------------------------------------
    return ""
  end
 
  local cfg = self._cfg
  local title = self.title
 
  -- 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 = cfg.categoryNamespaceKeys[title.namespace]
  if not namespaceFragment and title.namespace % 2 == 1 then
      namespaceFragment = "talk"
  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 prioritizing namespaces in their categories, and
  -- others prioritizing 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.
  table.insert(order, table.remove(order, self.reason and cfg.reasonsWithNamespacePriority[self.reason] and 2 or 3))
 
  -- 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
  --
  -- 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


local Config = class('Config')
  -- Values of j higher than the number of active subtables are set
  -- to the string "all".


function Config:initialize()
  -- A key for cfg.protectionCategories is constructed for each value of i.
self._cfg = mw.loadData('Module:Protection banner/config')
  -- 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
end


function Config:getBannerConfig(protectionStatusObj)
function Protection:isIncorrect()
local cfg = self._cfg
  local expiry = self.expiry
local action = protectionStatusObj:getAction()
  return not self:shouldHaveProtectionCategory()
local reason = protectionStatusObj:getReason()
    or type(expiry) == "number" and expiry < os.time()
if cfg.banners[action][reason] then
return cfg.banners[action][reason]
else
return cfg.defaultBanners[action]
end
end
end


function Config:getConfigTable(key)
function Protection:isTemplateProtectedNonTemplate()
local blacklist = {
  local action, namespace = self.action, self.title.namespace
banners = true,
  return self.level == "templateeditor"
defaultBanners = true
    and (
}
      (action ~= "edit" and action ~= "move")
if not blacklist[key] then
      or (namespace ~= 10 and namespace ~= 828)
return self._cfg[key]
    )
else
return nil
end
end
end


function Config:getMessage(key)
function Protection:makeCategoryLinks()
return self._cfg.msg[key]
  local msg = self._cfg.msg
  local ret = {self:makeProtectionCategory()}
  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
end


Line 110: Line 353:
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


local Blurb = class('Blurb')
local Blurb = {}
Blurb.__index = Blurb


function Blurb:initialize(configObj, protectionStatusObj, titleObj)
Blurb.bannerTextFields = {
self._configObj = configObj
  alt        = true,
self._protectionStatusObj = protectionStatusObj
  explanation = true,
self._bannerConfig = configObj:getBannerConfig(protectionStatusObj)
  link        = true,
self._titleObj = titleObj
  text        = true,
end
  tooltip    = true
}


function Blurb.makeFullUrl(page, query, display)
function Blurb.new(protectionObj, args, cfg)
local url = mw.uri.fullUrl(page, query)
  return setmetatable({
url = tostring(url)
    _args          = args,
return string.format('[%s %s]', url, display)
    _cfg          = cfg,
    _protectionObj = protectionObj
  }, Blurb)
end
end


function Blurb:setDeletionDiscussionPage(page)
-- Private methods.
self._deletionDiscussionPage = page
end


function Blurb:setUsername(username)
function Blurb:_formatDate(num)
self._username = username
  -- 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
end


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


function Blurb:_substituteParameters(msg)
function Blurb:_substituteParameters(msg)
if not self._params then
  if not self._params then
local params, parameterFuncs = {}, {}
    local parameterFuncs = {}
setmetatable(params, {
 
__index = function (t, k)
    parameterFuncs.CURRENTVERSION    = self._makeCurrentVersionParameter
local param
    parameterFuncs.EDITREQUEST        = self._makeEditRequestParameter
if parameterFuncs[k] then
    parameterFuncs.EXPIRY            = self._makeExpiryParameter
param = parameterFuncs[k](self)
    parameterFuncs.EXPLANATIONBLURB  = self._makeExplanationBlurbParameter
end
    parameterFuncs.IMAGELINK          = self._makeImageLinkParameter
param = param or ''
    parameterFuncs.INTROBLURB        = self._makeIntroBlurbParameter
params[k] = param
    parameterFuncs.INTROFRAGMENT      = self._makeIntroFragmentParameter
return param
    parameterFuncs.PAGETYPE          = self._makePagetypeParameter
end
    parameterFuncs.PROTECTIONBLURB    = self._makeProtectionBlurbParameter
})
    parameterFuncs.PROTECTIONDATE    = self._makeProtectionDateParameter
    parameterFuncs.PROTECTIONLEVEL    = self._makeProtectionLevelParameter
parameterFuncs[1] = self._makeIntroParameter
    parameterFuncs.PROTECTIONLOG      = self._makeProtectionLogParameter
parameterFuncs[2] = self._makeUntilParameter
    parameterFuncs.TALKPAGE          = self._makeTalkPageParameter
parameterFuncs[3] = self._makeDisputesParameter
    parameterFuncs.TOOLTIPBLURB      = self._makeTooltipBlurbParameter
parameterFuncs[4] = self._makePagetypeParameter
    parameterFuncs.TOOLTIPFRAGMENT    = self._makeTooltipFragmentParameter
parameterFuncs[5] = self._makeProtectionDateParameter
    parameterFuncs.VANDAL            = self._makeVandalTemplateParameter
parameterFuncs[6] = self._makeVandalTemplateParameter
parameterFuncs[7] = self._makeProtectionLevelParameter
parameterFuncs[8] = self._makeExpiryParameter
parameterFuncs[9] = self._makeDisputeLinkParameter -- A link to the page history or the move log
parameterFuncs[10] = self._makeProtectionLogParameter
parameterFuncs[11] = self._makeTalkLinkParameter
parameterFuncs[12] = self._makeEditRequestParameter
parameterFuncs[13] = self._makeRequestUnprotectionParameter
parameterFuncs[14] = self._makeSubjectPageLinksParameter -- Adds links to edit requests and the talk page if we are on a subject page
parameterFuncs[15] = self._makeDeletionBlurbParameter
parameterFuncs[16] = self._makeDeletionDiscussionLinkParameter
parameterFuncs[17] = self._makeDeletionLogParameter
self._params = params
end
return mw.message.newRawMessage(msg):params(self._params):plain()
end


function Blurb:_makeIntroParameter()
    self._params = setmetatable({}, {
-- parameter $1
      __index = function (t, k)
local key
        local param
local action = self._protectionStatusObj:getAction()
        if parameterFuncs[k] then
local level = self._protectionStatusObj:getLevel()
          param = parameterFuncs[k](self)
if action == 'edit' and level == 'autoconfirmed' then
        end
key = 'reason-text-semi'
        param = param or ""
elseif action == 'move' then
        t[k] = param
key = 'reason-text-move'
        return param
elseif action == 'create' then
      end
key = 'reason-text-create'
    })
else
  end
key = 'reason-text-default'
end
local msg = self._configObj:getMessage(key)
return self:_substituteParameters(msg)
end


function Blurb:_makeUntilParameter()
  msg = msg:gsub("${(%u+)}", self._params)
-- parameter $2
  return msg
-- "until" or "or until" depending on the expiry
local expiry = self._protectionStatusObj:getExpiry()
if expiry then
return 'or until'
else
return 'until'
end
end
end


function Blurb:_makeDisputesParameter()
function Blurb:_makeCurrentVersionParameter()
-- parameter $3
  -- A link to the page history or the move log, depending on the kind of
-- "disputes", with or without a section link
  -- protection.
local section = self._section
  local pagename = self._protectionObj.title.prefixedText
local disputes = self.configObj:getMessage('dispute-section-link-display')
  if self._protectionObj.action == "move" then
if section then
    -- We need the move log link.
return string.format(
    return makeFullUrl(
'[[%s:%s#%s|%s]]',
      "Special:Log",
mw.site.namespaces[self._titleObj.namespace].talk.name,
      {type = "move", page = pagename},
self._titleObj.text,
      self:_getExpandedMessage("current-version-move-display")
section,
    )
disputes
  else
)
    -- We need the history link.
else
    return makeFullUrl(
return disputes
      pagename,
end
      {action = "history"},
      self:_getExpandedMessage("current-version-edit-display")
    )
  end
end
end


function Blurb:_makePagetypeParameter()
function Blurb:_makeEditRequestParameter()
-- parameter $4
  local mEditRequest = require("Module:Submit an edit request")
local pagetypes = self._configObj:getConfigTable('pagetypeNamespaces')
  local action = self._protectionObj.action
local namespace = self._titleObj:getNamespace()
  local level = self._protectionObj.level
return pagetypes[namespace] or pagetypes.default or 'page'
end


function Blurb:_makeProtectionDateParameter()
  -- Get the edit request type.
-- parameter $5
  local requestType
local protectionDate = self._protectionStatusObj:getProtectionDate()
  if action == "edit" then
if protectionDate then
    if level == "autoconfirmed" then
local lang = mw.language.getContentLanguage()
      requestType = "semi"
local success, date = pcall(
    elseif level == "extendedconfirmed" then
lang.formatDate,
      requestType = "extended"
lang,
    elseif level == "templateeditor" then
'j F Y',
      requestType = "template"
protectionDate
    end
)
  end
if success and date then
  requestType = requestType or "full"
return date
end
end
end


function Blurb:_makeVandalTemplateParameter()
  -- Get the display value.
-- parameter $6
  local display = self:_getExpandedMessage("edit-request-display")
local mVandalM = require('Module:Vandal-m')
local username = self._username
username = username or self._titleObj.baseText
return mVandalM.luaMain{username}
end


function Blurb:_makeProtectionLevelParameter()
  return mEditRequest._link{type = requestType, display = display}
-- parameter $7
local action = self._protectionStatusObj:getAction()
local level = self._protectionStatusObj:getLevel()
local key
if action == 'edit' then
if level == 'sysop' then
key = 'protection-level-full'
elseif level == 'templateeditor' then
key = 'protection-level-template'
elseif level == 'autoconfirmed' then
key = 'protection-level-semi'
end
elseif action == 'move' then
key = 'protection-level-move'
elseif action == 'create' then
key = 'protection-level-create'
else
key = 'protection-level-default'
end
return self._configObj:getMessage(key)
end
end


function Blurb:_makeExpiryParameter()
function Blurb:_makeExpiryParameter()
-- parameter $8
  local expiry = self._protectionObj.expiry
-- @TODO: Check to see if the expiry is valid.
  if type(expiry) == "number" then
local expiry = self._protectionStatusObj:getExpiry()
    return self:_formatDate(expiry)
if expiry then
  else
return ' until ' .. expiry
    return expiry
else
  end
return ''
end
end
end


function Blurb:_makeDisputeLinkParameter()
function Blurb:_makeExplanationBlurbParameter()
-- parameter $9
  -- Cover special cases first.
-- A link to the page history or the move log, depending on the kind of
  if self._protectionObj.title.namespace == 8 then
-- protection.
    -- MediaWiki namespace.
local action = self._protectionStatusObj:getAction()
    return self:_getExpandedMessage("explanation-blurb-nounprotect")
local pagename = self._titleObj.prefixedText
  end
if action == 'move' then
 
-- We need the move log link.
  -- Get explanation blurb table keys.
return self.makeFullUrl(
  local action = self._protectionObj.action
'Special:Log',
  local level = self._protectionObj.level
{type = 'move', page = pagename},
  local talkKey = self._protectionObj.title.isTalkPage and "talk" or "subject"
self._configObj:getMessage('dispute-move-link-display')
 
)
  -- Find the message in the explanation blurb table and substitute any
else
  -- parameters.
-- We need the history link.
  local explanations = self._cfg.explanationBlurbs
return self.makeFullUrl(
  local msg
pagename,
  if explanations[action][level] and explanations[action][level][talkKey] then
{action = 'history'},
    msg = explanations[action][level][talkKey]
self._configObj:getMessage('dispute-edit-link-display')
  elseif explanations[action][level] and explanations[action][level].default then
)
    msg = explanations[action][level].default
end
  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 Blurb:_makeProtectionLogParameter()
function Blurb:_makeImageLinkParameter()
-- parameter $10
  local imageLinks = self._cfg.imageLinks
local action = self._protectionStatusObj:getAction()
  local action = self._protectionObj.action
if action == 'autoreview' then
  local level = self._protectionObj.level
-- We need the pending changes log.
  local msg
return self.makeFullUrl(
  if imageLinks[action][level] then
'Special:Log',
    msg = imageLinks[action][level]
{type = 'stable', page = pagename},
  elseif imageLinks[action].default then
self._configObj:getMessage('more-details-pc-log-display')
    msg = imageLinks[action].default
)
  else
else
    msg = imageLinks.edit.default
-- We need the protection log.
  end
return self.makeFullUrl(
  return self:_substituteParameters(msg)
'Special:Log',
{type = 'protect', page = pagename},
self._configObj:getMessage('more-details-protection-log-display')
)
end
end
end


function Blurb:_makeTalkLinkParameter()
function Blurb:_makeIntroBlurbParameter()
-- parameter $11
  if self._protectionObj:isTemporary() then
local section = self._section
    return self:_getExpandedMessage("intro-blurb-expiry")
local display = self._configObj:getMessage('talk-page-link-display')
  else
return string.format(
    return self:_getExpandedMessage("intro-blurb-noexpiry")
'[[%s:%s#%s|%s]]',
  end
mw.site.namespaces[self._titleObj.namespace].talk.name,
self._titleObj.text,
section or 'top',
display
)
end
end


function Blurb:_makeEditRequestParameter()
function Blurb:_makeIntroFragmentParameter()
-- parameter $12
  if self._protectionObj:isTemporary() then
local mEditRequest = require('Module:Submit an edit request')
    return self:_getExpandedMessage("intro-fragment-expiry")
local action = self._protectionStatusObj:getAction()
  else
local level = self._protectionStatusObj:getLevel()
    return self:_getExpandedMessage("intro-fragment-noexpiry")
  end
-- Get the display message key.
local key
if action == 'edit' and level == 'autoconfirmed' then
key = 'edit-request-semi-display'
else
key = 'edit-request-full-display'
end
local display = self._configObj:getMessage(key)
-- 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'
return mEditRequest.exportLinkToLua{type = requestType, display = display}
end
end


function Blurb:_makeRequestUnprotectionParameter()
function Blurb:_makePagetypeParameter()
-- parameter $13
  local pagetypes = self._cfg.pagetypes
if self._titleObj.namespace ~= 8 then
  return pagetypes[self._protectionObj.title.namespace]
-- MediaWiki pages can't be unprotected.
    or pagetypes.default
return self._configObj:getMessage('request-unprotection-blurb')
    or error("no default pagetype defined", 8)
end
end
end


function Blurb:_makeSubjectPageLinksParameter()
function Blurb:_makeProtectionBlurbParameter()
-- parameter $14
  local protectionBlurbs = self._cfg.protectionBlurbs
-- Don't display these links if we are on a talk page.
  local action = self._protectionObj.action
if not self._titleObj.isTalkPage then
  local level = self._protectionObj.level
local msg = self._config:getMessage('semi-subject-page-links')
  local msg
return self._substituteParameters(msg)
  if protectionBlurbs[action][level] then
end
    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
end


function Blurb:_makeDeletionBlurbParameter()
function Blurb:_makeProtectionDateParameter()
-- parameter $15
  local protectionDate = self._protectionObj.protectionDate
local deletionDiscussionPage = self._deletionDiscussionPage
  if type(protectionDate) == "number" then
local key
    return self:_formatDate(protectionDate)
if deletionDiscussionPage then
  else
key = 'deletion-discussion-blurb-xfd'
    return protectionDate
else
  end
key = 'deletion-discussion-blurb-noxfd'
end
local msg = self._configObj:getMessage(msg)
return self._substituteParameters(msg)
end
end


function Blurb:_makeDeletionDiscussionLinkParameter()
function Blurb:_makeProtectionLevelParameter()
-- parameter $16
  local protectionLevels = self._cfg.protectionLevels
local deletionDiscussionPage = self._deletionDiscussionPage
  local action = self._protectionObj.action
if deletionDiscussionPage then
  local level = self._protectionObj.level
local display = self._configObj:getMessage('deletion-discussion-link-display')
  local msg
return string.format('[[%s|%s]]', deletionDiscussionPage, display)
  if protectionLevels[action][level] then
end
    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
end


function Blurb:_makeDeletionLogParameter()
function Blurb:_makeProtectionLogParameter()
-- parameter $17
  local pagename = self._protectionObj.title.prefixedText
return Blurb.makeFullUrl(
  if self._protectionObj.action == "autoreview" then
'Special:Log',
    -- We need the pending changes log.
{type = 'delete', page = self._titleObj.prefixedText},
    return makeFullUrl(
self._configObj:getMessage('deletion-log-link-display')
      "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
end


--------------------------------------------------------------------------------
function Blurb:_makeTalkPageParameter()
-- Image class
  return string.format(
--------------------------------------------------------------------------------
    "[[%s:%s#%s|%s]]",
 
    mw.site.namespaces[self._protectionObj.title.namespace].talk.name,
local Image = class('Image')
    self._protectionObj.title.text,
 
    self._args.section or "top",
function Image:initialize(configObj, protectionStatusObj, titleObj)
    self:_getExpandedMessage("talk-page-link-display")
self._configObj = configObj
  )
self._protectionStatusObj = protectionStatusObj
self._titleObj = titleObj
end
end


function Image:setFilename(filename)
function Blurb:_makeTooltipBlurbParameter()
if filename then
  if self._protectionObj:isTemporary() then
self._filename = filename
    return self:_getExpandedMessage("tooltip-blurb-expiry")
else
  else
local images, action, level, reason, namespace
    return self:_getExpandedMessage("tooltip-blurb-noexpiry")
do
  end
local configObj = self._configObj
local protectionStatusObj = self._protectionStatusObj
local titleObj = self._titleObj
images = configObj:getConfigTable('images')
action = protectionStatusObj:getAction()
level = protectionStatusObj:getLevel()
reason = protectionStatusObj:getReason()
namespace = titleObj:getNamespace()
end
 
local image
if reason == 'office' or reason == 'reset' then
image = images.office
elseif namespace == 10 or namespace == 828 then
-- We are in the template or module namespaces.
if level == 'templateeditor' then
image = images.template
elseif level == 'sysop' then
image = images.indef
end
elseif action == 'create' then
image = images.create
elseif action == 'move'
and (
level == 'templateeditor'
or level == 'sysop'
)
then
image = images.move
elseif action == 'edit' then
if level == 'sysop' then
image = images.full
elseif level == 'autoconfirmed' then
image = images.semi
end
elseif action == 'autoreview' then
if level == 'autoconfirmed' then
image = images.pc1
elseif level == 'reviewer' then
image = images.pc2
end
end
self._filename = image
end
end
end


function Image:setWidth(width)
function Blurb:_makeTooltipFragmentParameter()
self._width = width
  if self._protectionObj:isTemporary() then
    return self:_getExpandedMessage("tooltip-fragment-expiry")
  else
    return self:_getExpandedMessage("tooltip-fragment-noexpiry")
  end
end
end


function Image:setAlt(alt)
function Blurb:_makeVandalTemplateParameter()
self._alt = alt
  return mw.getCurrentFrame():expandTemplate{
    title="vandal-m",
    args={self._args.user or self._protectionObj.title.baseText}
  }
end
end


function Image:setLink(link)
-- Public methods.
self._link = link
end


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


function Image:export()
  -- Generate the text.
return mFileLink.new(self._filename or 'Transparent.gif')
  local msg = self._protectionObj.bannerConfig[key]
:width(self._width or 20)
  if type(msg) == "string" then
:alt(self._alt)
    return self:_substituteParameters(msg)
:link(self._link)
  elseif type(msg) == "function" then
:caption(self._caption)
    msg = msg(self._protectionObj, self._args)
:render()
    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
end


Line 514: Line 685:
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


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


function BannerTemplate:initialize()
  -- 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
end


function BannerTemplate:render()
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
end


Line 526: Line 749:
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


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


--------------------------------------------------------------------------------
function Banner.new(protectionObj, blurbObj, cfg)
-- Padlock class
  local obj = BannerTemplate.new(protectionObj, cfg)  -- This doesn't need the blurb.
--------------------------------------------------------------------------------
  obj.imageWidth = 40
  obj.imageCaption = 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


local Padlock = BannerTemplate:subclass('Padlock')
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


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
-- Category class
-- Padlock class
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


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


function Category:initialize()
function Padlock.new(protectionObj, blurbObj, cfg)
  local obj = BannerTemplate.new(protectionObj, cfg)  -- This doesn't need the blurb.
  obj.imageWidth = 20
  obj.imageCaption = 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
end


function Category:setName(name)
function Padlock:__tostring()
self._name = name
  local frame = mw.getCurrentFrame()
end
  -- The nowiki tag helps prevent whitespace at the top of articles.
 
  return frame:extensionTag{name = "nowiki"} .. frame:extensionTag{
function Category:export()
    name = "indicator",
if self._categoryName then
    args = {name = self._indicatorName},
return string.format(
    content = self:renderImage()
'[[%s:%s]]',
  }
mw.site.namespaces[14].name,
self._categoryName
)
else
return ''
end
end
end


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
-- ProtectionCategory class
-- Exports
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


local ProtectionCategory = Category:subclass('ProtectionCategory')
local p = {}


function ProtectionCategory:setName(
function p._exportClasses()
name,
  -- This is used for testing purposes.
configObj,
  return {
protectionStatusObj,
    Protection = Protection,
namespace
    Blurb = Blurb,
)
    BannerTemplate = BannerTemplate,
--[[
    Banner = Banner,
-- Sets the protection category. If a category name is not provided, this
    Padlock = Padlock,
-- method gets a category name from the module config, given a combination
   }
-- of the protection type, the protection level, the namespace number, the
-- reason for protection, and the expiry date.
--]]
-- If a name was provided, use that.
if name then
Category.setName(self, name)
end
-- Get the namespace category key from the namespace number.
local nskey
do
local categoryNamespaces = configObj:getConfigTable('categoryNamespaces')
if not namespace or type(namespace) ~= 'number' then
nskey = nil
else
nskey = categoryNamespaces[ns]
if not nskey and ns % 2 == 1 then
nskey = 'talk'
end
end
end
--[[
-- Define the properties table. Each property is a table containing the
-- canonical order that the property is tested in, the position the
-- property has in the category key strings, and the property value itself.
--]]
local properties = {
expiry = {order = 1, keypos = 5, val = protectionStatusObj:getExpiry()},
namespace = {order = 2, keypos = 3, val = nskey},
reason = {order = 3, keypos = 4, val = protectionStatusObj:getReason()},
level = {order = 4, keypos = 2, val = protectionStatusObj:getLevel()},
action = {order = 5, keypos = 1, val = protectionStatusObj:getAction()}
}
--[[
-- Apply the category order configuration, if any. The configuration value
-- will be a property string, e.g. 'reason', 'namespace', etc. The property
-- corresponding to that string is tested last (i.e. it is the most
-- important, because it keeps its specified value the longest) and the
-- other properties are tested in the canonical order. If no configuration
-- value is specified then the canonical order is used.
--]]
local configOrder = {}
do
local bannerConfig = configObj:getBannerConfig(protectionStatusObj)
local categoryOrder = bannerConfig.categoryOrder
for propertiesKey, t in pairs(properties) do
configOrder[t.order] = t
end
if categoryOrder 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
table.insert(configOrder, table.remove(configOrder, property.order))
end
end
--[[
-- Define the attempt order. Properties with no value defined are moved
-- to the end, where they will later be given the value "all". This is
-- to cut down on the number of table lookups in the cats table, which
-- grows exponentially with the number of properties with valid values.
-- We keep track of the number of active properties with the noActive
-- parameter.
--]]
local noActive, attemptOrder
do
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
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 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".
--
-- To generate the keys, we index the property subtables using a
-- binary matrix with indexes i and j. j is only calculated up to
-- the number of active properties. For example, if there were three
-- active properties, the matrix would look like this, with 0
-- corresponding to the string "all", and 1 corresponding to the
-- val field in the property table:
--
--   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 properties are set
-- to the string "all".
--
-- A key for the category table is constructed for each value of i.
-- The correct position of the value in the key is determined by the
-- pos field in the property table.
--]]
local cats = configObj:getConfigTable('categories')
local cat
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
cat = attempt
break
end
end
if cat then
Category.setName(self, cat)
else
error(
'No category match found;'
.. ' please define the category for key "all-all-all-all-all"'
)
end
end
end


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


local ExpiryCategory = Category:subclass('ExpiryCategory')
  local protectionObj = Protection.new(args, cfg, title)


--------------------------------------------------------------------------------
  local ret = {}
-- ErrorCategory class
--------------------------------------------------------------------------------


local ErrorCategory = Category:subclass('ErrorCategory')
  -- 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 not yesno(args.catonly) and (protectionObj.action == "edit" or
    args.demolevel or
    not getReachableNodes(
      cfg.hierarchy,
      protectionObj.level
    )[effectiveProtectionLevel("edit", protectionObj.title)])
  then
    -- Initialise the blurb object.
    local blurbObj = Blurb.new(protectionObj, args, cfg)


--------------------------------------------------------------------------------
    -- Render the banner.
-- ProtectionBanner class
    if protectionObj:shouldShowLock() then
--------------------------------------------------------------------------------
      ret[#ret + 1] = tostring(
        (yesno(args.small) and Padlock or Banner)
        .new(protectionObj, blurbObj, cfg)
      )
    end
  end


local ProtectionBanner = {}
  -- Render the categories.
  if yesno(args.category) ~= false then
    ret[#ret + 1] = protectionObj:makeCategoryLinks()
  end


function ProtectionBanner.exportToWiki(frame, title)
  return table.concat(ret)
local args = mArguments.getArgs(frame)
return ProtectionBanner.exportToLua(args, title)
end
end


function ProtectionBanner.exportToLua(args, title)
function p.main(frame, cfg)
title = title or mw.title.getCurrentTitle()
  cfg = cfg or require(CONFIG_MODULE)
 
-- Get data objects
local theProtectionStatus = ProtectionStatus:new(args, title)
local theConfig = Config:new()
 
local ret = {}


-- Render the banner
  -- Find default arguments, if any.
local theBanner
  local parent = frame.getParent and frame:getParent()
if yesno(args.small) then
  local defaultArgs = parent and cfg.wrappers[parent:getTitle():gsub("/sandbox$", "")]
theBanner = Padlock.new(theConfig, theProtectionStatus, title)
else
theBanner = Banner.new(theConfig, theProtectionStatus, title)
end
theBanner = Padlock.new(theConfig, theProtectionStatus, title)
theBanner:setDeletionDiscussionPage(args.xfd)
theBanner:setUsername(args.user)
theBanner:setSection(args.section)
ret[#ret + 1] = theBanner:export()
-- Render the categories


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


function ProtectionBanner._exportClasses()
  -- Build the arguments table; user-specified arguments overwrite default arguments.
-- This is used to export the classes for testing purposes.
  local args = {}
return {
  for k, v in pairs(defaultArgs or {}) do
ProtectionStatus = ProtectionStatus,
    args[k] = v
Config = Config,
  end
Image = Image,
  for k, v in pairs(userArgs) do
Blurb = Blurb,
    args[k] = v
BannerTemplate = BannerTemplate,
  end
Banner = Banner,
  return p._main(args, cfg)
Padlock = Padlock,
Category = Category,
ProtectionCategory = ProtectionCategory,
ErrorCategory = ErrorCategory,
ExpiryCategory = ExpiryCategory,
}
end
end


return ProtectionBanner
return p

Latest revision as of 05:35, 22 December 2025

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

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

-- Initialize necessary modules.
require('strict')
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 initialize 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)
  if cat then
    return string.format(
      "[[%s:%s|%s]]",
      mw.site.namespaces[14].name,
      cat,
      sort
    )
  end
end

-- Validation function for the expiry and the protection date.
local function validateDate(dateString, dateType)
  if not lang then
    lang = mw.language.getContentLanguage()
  end
  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

-- Given a directed graph formatted as node → table of direct successors,
-- get a table of all nodes reachable from a given node (though always
-- including the given node).
local function getReachableNodes(graph, 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
      return retval
    end
    toWalk[k] = nil
    retval[k] = true
    for _, v in ipairs(graph[k]) do
      if not retval[v] then
        toWalk[v] = true
      end
    end
  end
end

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

local Protection = {}
Protection.__index = Protection

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

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

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")
  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:isUserScript()
  -- Whether the page is a user JavaScript or CSS page.
  local title = self.title
  return title.namespace == 2 and (
    title.contentModel == 'javascript' or title.contentModel == 'css'
  )
end

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

function Protection:shouldShowLock()
  -- Whether we should output a banner/padlock.
  return self:isProtected() and not self:isUserScript()
end

-- Whether this page needs a protection category.
Protection.shouldHaveProtectionCategory = Protection.shouldShowLock

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

function Protection:makeProtectionCategory()
  if not self:shouldHaveProtectionCategory() then
    return ""
  end

  local cfg = self._cfg
  local title = self.title

  -- 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 = cfg.categoryNamespaceKeys[title.namespace]
  if not namespaceFragment and title.namespace % 2 == 1 then
      namespaceFragment = "talk"
  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 prioritizing namespaces in their categories, and
  -- others prioritizing 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.
  table.insert(order, table.remove(order, self.reason and cfg.reasonsWithNamespacePriority[self.reason] and 2 or 3))

  -- 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:isIncorrect()
  local expiry = self.expiry
  return not self:shouldHaveProtectionCategory()
    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: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 = {
  alt         = true,
  explanation = true,
  link        = true,
  text        = true,
  tooltip     = true
}

function Blurb.new(protectionObj, args, cfg)
  return setmetatable({
    _args          = args,
    _cfg           = cfg,
    _protectionObj = protectionObj
  }, 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 == "extendedconfirmed" then
      requestType = "extended"
    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 mw.getCurrentFrame():expandTemplate{
    title="vandal-m",
    args={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: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.imageWidth = 40
  obj.imageCaption = 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.imageWidth = 20
  obj.imageCaption = 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.
  return frame:extensionTag{name = "nowiki"} .. frame:extensionTag{
    name = "indicator",
    args = {name = self._indicatorName},
    content = self:renderImage()
  }
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 not yesno(args.catonly) and (protectionObj.action == "edit" or
    args.demolevel or
    not getReachableNodes(
      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:shouldShowLock() 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 arguments, if any.
  local parent = frame.getParent and frame:getParent()
  local defaultArgs = parent and cfg.wrappers[parent:getTitle():gsub("/sandbox$", "")]

  -- Find user arguments, 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 arguments table; user-specified arguments overwrite default arguments.
  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