Module:Protection banner: Difference between revisions

From Zoophilia Wiki
Jump to navigationJump to search
meta>Mr. Stradivarius
use isDemo instead of args.category and use an isSmall variable while we're at it
Update module with messages for Zoophilia Wiki and not Wikipedia
 
(38 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 newFileLink = require('Module:File link').new
local effectiveProtectionLevel = require("Module:Effective protection level")._main
local effectiveProtectionLevel = require('Module:Effective protection level')._main
local effectiveProtectionExpiry = require("Module:Effective protection expiry")._main
local yesno = require('Module:Yesno')
local yesno = require("Module:Yesno")


-- Lazily initialise modules and objects we don't always need.
-- Lazily initialize modules and objects we don't always need.
local getArgs, makeMessageBox, lang
local getArgs, makeMessageBox, lang
-- Set constants.
local CONFIG_MODULE = "Module:Protection banner/config"


--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
Line 16: Line 19:
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


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


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


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


local function toTableEnd(t, pos)
-- Given a directed graph formatted as node → table of direct successors,
-- Sends the value at position pos to the end of array t, and shifts the
-- get a table of all nodes reachable from a given node (though always
-- other items down accordingly.
-- including the given node).
return table.insert(t, table.remove(t, pos))
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


Line 63: Line 82:
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


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


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


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


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


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


-- Set level
  -- Set level.
self.level = effectiveProtectionLevel(self.action, self.title)
  obj.level = args.demolevel or effectiveProtectionLevel(obj.action, obj.title)
if self.level == 'accountcreator' then
  if not obj.level or (obj.action == "move" and obj.level == "autoconfirmed") then
-- Lump titleblacklisted pages in with template-protected pages,
    -- Users need to be autoconfirmed to move pages anyway, so treat
-- since templateeditors can do both.
    -- semi-move-protected pages as unprotected.
self.level = 'templateeditor'
    obj.level = "*"
elseif not self.level or (self.action == 'move' and self.level == 'autoconfirmed') then
  end
-- Users need to be autoconfirmed to move pages anyway, so treat
-- semi-move-protected pages as unprotected.
self.level = '*'
end


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


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


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


function Protection:isProtected()
function Protection:isProtected()
return self.level ~= '*'
  return self.level ~= "*"
end
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()
function Protection:isTemporary()
return type(self.expiry) == 'number'
  return type(self.expiry) == "number"
end
end


function Protection:makeProtectionCategory()
function Protection:makeProtectionCategory()
local cfg = self._cfg
  if not self:shouldHaveProtectionCategory() then
local title = self.title
    return ""
  end
-- Exit if the page is not protected.
 
if not self:isProtected() then
  local cfg = self._cfg
return ''
  local title = self.title
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.
  -- Get the expiry key fragment.
local namespaceFragment
  local expiryFragment
do
  if self.expiry == "indef" then
namespaceFragment = cfg.categoryNamespaceKeys[title.namespace]
    expiryFragment = self.expiry
if not namespaceFragment and title.namespace % 2 == 1 then
  elseif type(self.expiry) == "number" then
namespaceFragment = 'talk'
    expiryFragment = "temp"
end
  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}
}


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


function Protection:needsExpiry()
  -- A key for cfg.protectionCategories is constructed for each value of i.
local cfg = self._cfg
  -- The position of the value in the key is determined by the keypos field in
return not self.expiry
  -- each subtable.
and cfg.expiryCheckActions[self.action]
  local cats = cfg.protectionCategories
and self.reason -- the old {{pp-protected}} didn't check for expiry
  for i = 1, 2^noActive do
and not cfg.reasonsWithoutExpiryCheck[self.reason]
    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 Protection:isIncorrect()
function Protection:isIncorrect()
local expiry = self.expiry
  local expiry = self.expiry
return not self:isProtected()
  return not self:shouldHaveProtectionCategory()
or type(expiry) == 'number' and expiry < os.time()
    or type(expiry) == "number" and expiry < os.time()
end
end


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


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


Line 341: Line 353:
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


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


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


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


-- Private methods --
-- Private methods.


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


function Blurb:_getExpandedMessage(msgKey)
function Blurb:_getExpandedMessage(msgKey)
return self:_substituteParameters(self._cfg.msg[msgKey])
  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 parameterFuncs = {}
    local parameterFuncs = {}


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


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


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


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


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


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


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


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


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


function Blurb:_makeIntroBlurbParameter()
function Blurb:_makeIntroBlurbParameter()
if self._protectionObj:isTemporary() then
  if self._protectionObj:isTemporary() then
return self:_getExpandedMessage('intro-blurb-expiry')
    return self:_getExpandedMessage("intro-blurb-expiry")
else
  else
return self:_getExpandedMessage('intro-blurb-noexpiry')
    return self:_getExpandedMessage("intro-blurb-noexpiry")
end
  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
end


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


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


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


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


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


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


function Blurb:_makeTooltipBlurbParameter()
function Blurb:_makeTooltipBlurbParameter()
if self._protectionObj:isTemporary() then
  if self._protectionObj:isTemporary() then
return self:_getExpandedMessage('tooltip-blurb-expiry')
    return self:_getExpandedMessage("tooltip-blurb-expiry")
else
  else
return self:_getExpandedMessage('tooltip-blurb-noexpiry')
    return self:_getExpandedMessage("tooltip-blurb-noexpiry")
end
  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
end


function Blurb:_makeVandalTemplateParameter()
function Blurb:_makeVandalTemplateParameter()
return require('Module:Vandal-m')._main{
  return mw.getCurrentFrame():expandTemplate{
self._args.user or self._protectionObj.title.baseText
    title="vandal-m",
}
    args={self._args.user or self._protectionObj.title.baseText}
  }
end
end


-- Public methods --
-- Public methods.


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


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


Line 649: Line 685:
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


local BannerTemplate = class('BannerTemplate')
local BannerTemplate = {}
 
BannerTemplate.__index = BannerTemplate
function BannerTemplate:initialize(protectionObj, cfg)
self._cfg = cfg


-- Set the image filename.
function BannerTemplate.new(protectionObj, cfg)
local imageFilename = protectionObj.bannerConfig.image
  local obj = {}
if imageFilename then
  obj._cfg = cfg
self._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
-- Deal with special cases first.
if (namespace == 10 or namespace == 828)
and action == 'edit'
and level == 'sysop'
and not protectionObj:isTemporary()
then
-- Fully protected modules and templates get the special red "indef"
-- padlock.
self._imageFilename = self._cfg.msg['image-filename-indef']
else
-- Deal with regular protection types.
local images = self._cfg.images
if images[action] then
if images[action][level] then
self._imageFilename = images[action][level]
elseif images[action].default then
self._imageFilename = images[action].default
end
end
end
end
end


function BannerTemplate:setImageWidth(width)
  -- Set the image filename.
self._imageWidth = width
  local imageFilename = protectionObj.bannerConfig.image
end
  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


function BannerTemplate:setImageTooltip(tooltip)
    -- Deal with special cases first.
self._imageCaption = tooltip
    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:renderImage()
function BannerTemplate:renderImage()
local filename = self._imageFilename
  local filename = self._imageFilename
or self._cfg.msg['image-filename-default']
    or self._cfg.msg["image-filename-default"]
or 'Transparent.gif'
    or "Transparent.gif"
return newFileLink(filename)
  return makeFileLink{
:width(self._imageWidth or 20)
    file = filename,
:alt(self._imageAlt)
    size = (self.imageWidth or 20) .. "px",
:link(self._imageLink)
    alt = self._imageAlt,
:caption(self._imageCaption)
    link = self._imageLink,
:render()
    caption = self.imageCaption
  }
end
end


Line 712: Line 749:
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


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


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


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


Line 745: Line 784:
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------


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


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


function Padlock:__tostring()
function Padlock:__tostring()
local root = mw.html.create('div')
  local frame = mw.getCurrentFrame()
root
  -- The nowiki tag helps prevent whitespace at the top of articles.
:addClass('metadata topicon nopopups')
  return frame:extensionTag{name = "nowiki"} .. frame:extensionTag{
:attr('id', 'protected-icon')
    name = "indicator",
:css{display = 'none', right = self._right}
    args = {name = self._indicatorName},
:wikitext(self:renderImage())
    content = self:renderImage()
return tostring(root)
  }
end
end


Line 775: Line 816:


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


function p._main(args, cfg, title)
function p._main(args, cfg, title)
args = args or {}
  args = args or {}
cfg = cfg or require('Module:Protection banner/config')
  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)


-- Initialise the protection object and check for errors
    -- Render the banner.
local protectionObjCreated, protectionObj = pcall(
    if protectionObj:shouldShowLock() then
Protection.new, Protection, -- equivalent to Protection:new()
      ret[#ret + 1] = tostring(
args,
        (yesno(args.small) and Padlock or Banner)
cfg,
        .new(protectionObj, blurbObj, cfg)
title
      )
)
    end
if not protectionObjCreated then
  end
local errorBlurb = cfg.msg['error-message-blurb'] or 'Error: $1.'
local errorText = mw.message.newRawMessage(errorBlurb)
:params(protectionObj) -- protectionObj is the error message
:plain()
return string.format(
'<strong class="error">%s</strong>%s',
errorText,
makeCategoryLink(cfg.msg['tracking-category-incorrect'])
)
end
-- Initialise the blurb object
local blurbObj = Blurb:new(protectionObj, args, cfg)


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


-- Render the banner
  return table.concat(ret)
if protectionObj:isProtected() or isDemo then
ret[#ret + 1] = tostring(
(isSmall and Padlock or Banner)
:new(protectionObj, blurbObj, cfg)
)
end
-- Render the categories
if not isDemo then
ret[#ret + 1] = protectionObj:makeCategoryLinks()
end
return table.concat(ret)
end
end


function p.main(frame, cfg)
function p.main(frame, cfg)
getArgs = getArgs or require('Module:Arguments').getArgs
  cfg = cfg or require(CONFIG_MODULE)
cfg = cfg or require('Module:Protection banner/config')
 
local parentTitle = frame:getParent():getTitle()
  -- Find default arguments, if any.
parentTitle = parentTitle:gsub('/sandbox$', '')
  local parent = frame.getParent and frame:getParent()
local defaultArgs = cfg.wrappers[parentTitle] or {}
  local defaultArgs = parent and cfg.wrappers[parent:getTitle():gsub("/sandbox$", "")]
local args = getArgs(frame, {parentOnly = defaultArgs and true})
 
for k, v in pairs(defaultArgs) do
  -- Find user arguments, and use the parent frame if we are being called from a
args[k] = v
  -- wrapper template.
end
  getArgs = getArgs or require("Module:Arguments").getArgs
return p._main(args, cfg)
  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
end


return p
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