p = {}
local cfg = mw.loadData('Module:Archives/config')
local function is_filled(var)
return var and var ~= ''
end
-- simple helper for simple cases
local function var_or_default(var, default)
if is_filled(var) then
return var
else
return default
end
end
local function wikilink(link, display)
if display then
return '[[' .. link .. '|' .. display .. ']]'
else
return '[[' .. link .. ']]'
end
end
local function talk_other(demospace, talk)
if is_filled(demospace) then return demospace end
if mw.title.getCurrentTitle().isTalkPage then return talk end
return nil -- just return nil rather than 'other' since we have no need
end
local function add_image(image)
if image.image and image.image == 'none' then return nil end
return mw.html.create('div'):addClass('archives-image'):wikitext(
require('Module:InfoboxImage/sandbox')._InfoboxImage({
[cfg.img_mod_arg.image] = var_or_default(image.image, cfg.image),
[cfg.img_mod_arg.alt] = var_or_default(image.alt, 'none'),
[cfg.img_mod_arg.link] = var_or_default(image.link, 'none'),
[cfg.img_mod_arg.size] = var_or_default(image.size, nil),
[cfg.img_mod_arg.sizedefault] = cfg.image_size
})
)
end
local function archive_list()
end
local function make_title()
end
local function search_box(frame, is_banner, root, search)
if search.search and search.search == 'no' then return nil end
local prefix = ''
if is_filled(search.prefix) then
prefix = search.prefix
-- this double-check elseif may move out to code-proper
elseif is_filled(root) then
prefix = root
else
prefix = mw.title.getCurrentTitle().prefixedText .. '/'
end
-- break
local sbreak
if search.sbreak and (search.sbreak == 'yes' or search.sbreak == 'no') then
sbreak = search.sbreak
end
-- set sbreak's default
if not sbreak then
if is_banner then
sbreak = 'no'
else
sbreak = 'yes'
end
end
-- width
local width = ''
if not is_banner then
width = var_or_default(search.width, cfg.search_width)
end
-- label
local label = var_or_default(search.label, cfg.search_label)
local inputbox_options = {
['bgcolor'] = 'transparent',
['type'] = 'fulltext',
['prefix'] = prefix,
['break'] = sbreak,
['width'] = width,
['searchbuttonlabel'] = label
}
local inputbox_content = {}
for k, v in pairs(inputbox_options) do
table.insert(inputbox_content, k .. '=' .. v)
end
return mw.html.create('div'):addClass('archives-search'):wikitext(frame:extensionTag{
name = 'inputbox',
content = table.concat(inputbox_content, '\n')
})
end
local function note_auto(frame, auto)
if not is_filled(auto.age) and not is_filled(auto.target) then return nil end
local age = var_or_default(auto.age, nil)
local target = var_or_default(auto.target, nil)
local target_text = ''
if target then
target_text = mw.ustring.format(
cfg.has_archives,
frame:callParserFunction( '#rel2abs', target ),
age and ' ' or ''
)
end
local age_text = ''
if age then
local units = var_or_default(auto.units, cfg.units)
-- there's probably a friendlier l10n way to do this check on units...
-- TODO make it friendlier. maybe split it to a separate function?
-- (borrowed from Module:String.endswith in the meantime)
if age ~= '1' and mw.ustring.sub(units, -1, -1) ~= 's' then
units = units .. 's'
end
-- TODO localizable
local age_with_units = age .. ' ' .. units
local has_bot = is_filled(auto.bot)
local has_minthreadsleft = is_filled(auto.minthreadsleft)
if has_bot and has_minthreadsleft then
age_text = mw.ustring.format(
cfg.age_bot_threads,
age_with_units,
wikilink('User:' .. auto.bot, auto.bot),
var_or_default(auto.minthreadsleft, cfg.min_threads)
)
elseif has_bot then
age_text = mw.ustring.format(
cfg.age_bot,
age_with_units,
wikilink('User:' .. auto.bot, auto.bot)
)
elseif has_minthreadsleft then
age_text = mw.ustring.format(
cfg.age_threads,
age_with_units,
var_or_default(auto.minthreadsleft, cfg.min_threads)
)
else
age_text = mw.ustring.format(
cfg.age,
age_with_units
)
end
end
return mw.html.create('div'):addClass('archives-auto'):wikitext(target_text .. age_text)
end
local function edit_list(frame, auto, list1, archive_list, archive_list_exists, editbox)
local has_editbox = not editbox or (editbox and (editbox == '' or editbox == 'yes'))
if not (archive_list_exists and has_editbox and not auto and is_filled(list1)) then
return nil
end
return mw.html.create('div'):addClass('archives-edit'):wikitext(mw.ustring.format(
cfg.edit_this_box,
archive_list.fullUrl('action=edit' .. cfg.pre_load)
))
end
--[[
pass the frame down for a minute because we do a lot of work with a frame
]]
function p._main(args, frame)
local frame = frame -- data continuity
local list = args.list
local list1 = args[1]
local root = args.root
local collapsed = args.collapsed
local collapsible = args.collapsible
local title = args.title
local auto = var_or_default(args.auto, nil)
local is_banner = false
if (args.banner and args.banner == cfg.banner_yes) or (args.large and args.large == cfg.banner_yes) then
is_banner = true
end
local archive_list = frame:callParserFunction(
'#rel2abs',
var_or_default(args.archivelist, cfg.archivelist)
)
-- Is this how you use .new?
local archive_list_title = mw.title.new(archive_list)
local archive_list_exists = archive_list_title.exists
local archives = mw.html.create()
archives
:tag('div')
:addClass('archives plainlinks')
-- banner is roughly mbox, small is roughly mbox-small
:addClass(is_banner and 'archives-banner' or 'archives-small')
-- archives-talk has same-ish styles as tmbox tmbox-notice
-- base styles are same-ish as ombox ombox-notice
:addClass(talk_other(var_or_default(args.demospace, nil), 'archives-talk'))
:css('width', var_or_default(args[cfg.arg.box_width], nil))
:node(add_image({
image = args[cfg.arg.image],
alt = args[cfg.arg.alt],
link = args[cfg.arg.link],
size = args[cfg.arg.image_size]
}))
--[[
TODO:
flex
collapse
actual list
]]
:node(search_box(frame, is_banner, root, {
search = args.search,
prefix = args.prefix,
width = args['search-width'],
sbreak = args['search-break'],
label = args['search-button-label']
}))
:node(note_auto(frame, {
age = args.age,
target = args.target,
units = args.units,
bot = args.bot,
minthreadsleft = args.minthreadsleft
}))
:node(edit_list(
frame, auto, list1, archive_list_title, archive_list_exists, args.editbox
))
return frame:extensionTag{
name = 'templatestyles', args = { src = cfg.templatestyles }
} .. tostring(archives)
end
function p.main(frame)
return p._main(require('Module:Arguments').getArgs(frame), frame)
end
return p
