local yesno = require('Module:Yesno')
-------------------------------------------------------------------------------
-- AfDLog class
-------------------------------------------------------------------------------
local AfDLog = {}
AfDLog.__index = AfDLog
---Create a new AfDLog object instance.
---@param args table
---@return AfDLog
function AfDLog.new(args)
local self = setmetatable({}, AfDLog)
-- Set non-data parameters
self.talk = not not yesno(args.talk)
self.collapse = tonumber(args.collapse) or not not yesno(args.collapse)
self.numbered = true --yesno(args.numbered) == nil or not not yesno(args.numbered) -- Disabled parameter
self.reversed = yesno(args.reversed) == nil or not not yesno(args.reversed)
self.currentTitle = mw.title.getCurrentTitle()
self.omitCat = (function()
local patterns = {
'^Template:削除依頼ログ',
'^Template:削除済みノート',
'^Template:不削除ノート'
}
for _, v in ipairs(patterns) do
if string.find(self.currentTitle.prefixedText, v) then
return true
end
end
return false
end)()
self.pageList = {}
self.pageInvalid = false
self._suppressPageError = args._suppressPageError == 'true' -- Private parameter
-- Get page type
local thisTitle
if self.talk then
thisTitle = self.currentTitle.talkPageTitle.prefixedText
self.pageType = 'ノート'
else
local subjTitle = self.currentTitle.subjectPageTitle
thisTitle = subjTitle.prefixedText
local pageTypes = {
[0] = '記事',
[2] = '利用者ページ',
[4] = 'プロジェクトページ',
[6] = 'ファイル',
[8] = 'インターフェースページ',
[10] = 'テンプレート',
[12] = 'ヘルプページ',
[14] = 'カテゴリ',
[100] = 'ポータル',
[102] = 'プロジェクト',
[828] = 'モジュール'
}
self.pageType = pageTypes[subjTitle.namespace]
end
-- Process data paremeters (result, page, date)
self.rowData = {}
self.badParameters = {}
---@param prefix "result" | "page" | "date"
---@param num number
---@param val string
local function setRowData(prefix, num, val)
if not self.rowData[num] then -- Set default data
self.rowData[num] = {
result = '削除',
page = 'Wikipedia:削除依頼/' .. thisTitle,
date = nil
}
end
if prefix == 'page' then
local m = string.match(val, '^%[*%s*(.-)%s*%]*$') -- Remove leading/trailing brackets and spaces
if m then val = m end
val = 'Wikipedia:削除依頼/' .. val
end
self.rowData[num][prefix] = val -- Set the specified data
end
---@param paramKey string | number
local function setBadParameter(paramKey)
self.badParameters[#self.badParameters + 1] = paramKey
end
-- List of accepted parameter names; true for ordered parameters and false for unordered ones
local acceptedPrefixes = {
result = true,
date = true,
page = true,
talk = false,
collapse = false,
reversed = false,
_suppresspageerror = false, -- Private parameter
-- numbered = false -- Disabled parameter
}
for k, v in pairs(args) do
if type(k) == 'string' then
local key = mw.ustring.lower(k)
local prefix, num = key:match('^(.-)(%d*)$')
if prefix and acceptedPrefixes[prefix] ~= nil and num and num ~= '0' then
num = tonumber(num) or 1
if acceptedPrefixes[prefix] == true then
setRowData(prefix, num, v)
elseif acceptedPrefixes[prefix] == false then
-- Do nothing
else
setBadParameter(k)
end
else
setBadParameter(k)
end
else
setBadParameter(k)
end
end
---Remove any gaps in the array we made.
---@param t table
---@return table
local function compressSparseArray(t)
local ret, nums = {}, {}
for num, data in pairs(t) do
nums[#nums + 1] = num
end
table.sort(nums)
for i, num in ipairs(nums) do
ret[i] = t[num]
end
return ret
end
self.rowData = compressSparseArray(self.rowData)
self.hasNoData = not self.rowData[1]
return self
end
---Render the AfDLog instance as a message box.
---@return string
function AfDLog:renderBox()
return require('Module:Message box').main('tmbox', {
type = 'notice',
image = '[[File:Clipboard.svg|35px|削除依頼]]',
text = self:_renderBoxText()
})
end
function AfDLog:_renderBoxText()
local nRows = #self.rowData
local ret = {}
if nRows == 1 and self.rowData[1].date then
ret[#ret + 1] = string.format(
'この%sは%sに[[Wikipedia:削除依頼|削除依頼]]の審議対象になりました。',
self.pageType,
self.rowData[1].date
)
else
ret[#ret + 1] = string.format(
'この%sは過去に[[Wikipedia:削除依頼|削除依頼]]の審議対象になりました。',
self.pageType
)
end
if nRows > 1 then
ret[#ret + 1] = '新しく依頼を提出する場合、以下を参考にしてください。'
ret[#ret + 1] = '\n'
ret[#ret + 1] = self:_renderMultipleRows()
elseif nRows == 1 then
ret[#ret + 1] = self:_renderFirstRow()
else -- There's no rowData
-- Do nothing
end
local errorMessage = self:_renderErrors()
ret[#ret + 1] = #errorMessage > 0 and table.concat(errorMessage) or ''
return table.concat(ret)
end
function AfDLog:_renderMultipleRows()
local root = mw.html.create()
local nRows = #self.rowData
local i = self.reversed and nRows or 1
local nCollapsedRows
if type(self.collapse) == 'number' then
nCollapsedRows = self.collapse
elseif self.collapse then
nCollapsedRows = nRows
else
nCollapsedRows = 0
end
local hasNormalRows = nRows - nCollapsedRows > 0
local function makeList(isCollapsed, header)
local tableRoot = root:tag('table')
tableRoot
:addClass(isCollapsed and 'mw-collapsible mw-collapsed' or nil)
:css('width', '100%')
:css('background-color', '#f8eaba')
if header then
tableRoot
:tag('tr')
:tag('th')
:wikitext(header)
end
return tableRoot
:tag('tr')
:tag('td')
:tag(self.numbered and 'ol' or 'ul')
end
-- Render normal rows
if hasNormalRows then
local normalList = makeList(false)
if self.reversed then
while i >= 1 and i > nCollapsedRows do
self:_renderRow(i, normalList)
i = i - 1
end
else
while i <= nRows - nCollapsedRows do
self:_renderRow(i, normalList)
i = i + 1
end
end
end
-- Render collapsed rows
if nCollapsedRows > 0 then
local header
if hasNormalRows then
header = '過去の削除依頼:'
else
header = '削除依頼:'
end
local collapsedList = makeList(true, header)
if self.reversed then
while i >= 1 do
self:_renderRow(i, collapsedList)
i = i - 1
end
else
while i <= nRows do
self:_renderRow(i, collapsedList)
i = i + 1
end
end
end
return tostring(root)
end
function AfDLog:_renderRow(rowNum, html)
local data = self.rowData[rowNum]
local link = self:_addPage(data)
local wkt
if data.date then
wkt = string.format('<b>%s</b> %s (%s)', data.result, link, data.date)
else
wkt = string.format('<b>%s</b> %s', data.result, link)
end
html
:tag('li')
:attr('value', self.numbered and rowNum or nil)
:wikitext(wkt)
end
function AfDLog:_renderFirstRow()
local data = self.rowData[1]
return string.format(
'%sの結果、<b>%s</b>となりました。',
self:_addPage(data, '議論'),
data.result
)
end
---Clean up pagetitle, check its existence, and set the 'pageInvalid' parameter to true if there's a problem.
---@param data table rowData object
---@param caption? string If nil, same as data.page
---@return string wikilink
function AfDLog:_addPage(data, caption)
local title = mw.title.new(data.page)
if title then
data.page = title.prefixedText
if self.pageList[data.page] == nil and not self._suppressPageError then
self.pageList[data.page] = title.exists
else
self.pageList[data.page] = true
end
else
self.pageList[data.page] = false
end
if not self.pageInvalid and not self.pageList[data.page] then
self.pageInvalid = true
end
if title then
return string.format(
'[[%s|%s]]',
data.page,
caption or data.page
)
else
return string.format(
'%s%s%s',
mw.text.nowiki('[['),
data.page,
mw.text.nowiki(']]')
)
end
end
function AfDLog:_renderErrors()
local ret = {}
local errorMessage = '<strong class="error" style="display:block;">エラー: %s</strong>'
if self.hasNoData then
ret[#ret + 1] = string.format(
errorMessage,
'必須引数が指定されていません'
)
end
if #self.badParameters > 0 then
ret[#ret + 1] = string.format(
errorMessage,
string.format(
'不正な引数が指定されています (%s)',
table.concat(self.badParameters, ', ')
)
)
end
if self.pageInvalid then
ret[#ret + 1] = string.format(
errorMessage,
'不正な削除依頼サブページ名が指定されています'
)
end
-- Add cat if the caller isn't a template invoking this module
if #ret > 0 then
ret[#ret + 1] = self:renderCat()
end
return ret
end
function AfDLog:renderCat()
return self.omitCat and '' or '[[Category:テンプレート呼び出しエラーのあるページ/Template:削除依頼ログ]]'
end
function AfDLog:renderRawTemplate()
local ret = {}
ret[#ret + 1] = '{{削除依頼ログ/sandbox'
for i, _ in ipairs(self.rowData) do
local data = self.rowData[i]
ret[#ret + 1] = '\n'
ret[#ret + 1] = string.format('|result%s=%s', i, data.result)
ret[#ret + 1] = string.format('|page%s=%s', i, string.gsub(data.page, '^Wikipedia:削除依頼/', ''))
ret[#ret + 1] = string.format('|date%s=%s', i, data.date or '')
end
ret[#ret + 1] = '\n'
ret[#ret + 1] = '|talk=' .. tostring(self.talk)
ret[#ret + 1] = '\n'
ret[#ret + 1] = '|collapse=' .. tostring(self.collapse)
-- ret[#ret + 1] = '\n'
-- ret[#ret + 1] = '|numbered=' .. tostring(self.numbered)
ret[#ret + 1] = '\n'
ret[#ret + 1] = '}}'
return table.concat(ret)
end
-------------------------------------------------------------------------------
-- Exports
-------------------------------------------------------------------------------
local p = {}
function p._main(args)
local afd = AfDLog.new(args)
local caller = mw.getCurrentFrame():getParent():getTitle()
local callerTitle = caller:match('^Template:(削除済みノート)') or caller:match('^Template:(不削除ノート)')
if mw.isSubsting() then
return afd:renderRawTemplate()
elseif callerTitle then
local ret = {}
ret[#ret + 1] = '<strong class="error">エラー: '
ret[#ret + 1] = '[[Help:テンプレート#テンプレートの内容で置き換える|subst:]] がありません。'
ret[#ret + 1] = string.format('「%s」ではなく「subst:%s」としてください。', callerTitle, callerTitle)
ret[#ret + 1] = '</strong>'
ret[#ret + 1] = afd:renderCat()
return table.concat(ret)
else
return afd:renderBox()
end
end
function p.main(frame)
local args = require('Module:Arguments').getArgs(frame, {
wrappers = {
'Template:削除依頼ログ'
}
})
return p._main(args)
end
return p
モジュールの解説[作成]