local cs1_template_list = { -- lua patterns of the cannonical names and redirects
'[Cc]ite ar[Xx]iv', -- arXiv is the canonical name
'[Cc]ite ArXiv',
'[Cc]ite AV media', -- canonical
'[Cc]ite audio', '[Cc]ite AV', '[Cc]ite AV ?Media', '[Cc]ite av media',
'[Cc]ite cd', '[Cc]ite DVD', '[Cc]ite dvd', '[Cc]ite film',
'[Cc]ite image', '[Cc]ite media', '[Cc]ite movie',
'[Cc]ite music video', '[Cc]ite radio', '[Cc]ite song',
'[Cc]ite ?video', '[Cc]ite visual', '[Cc]ite You[Tt]ube',
'[Cc]ita vídeo', -- non-English redirect; TODO: tally separately?
'[Cc]ite AV media notes', -- canonical
'[Cc]ite album[ %-]notes', '[Cc]ite av media notes',
'[Cc]ite DVD[ %-]notes', '[Cc]ite dvd%-notes', '[Cc]ite liner notes',
'[Cc]ite music release notes', '[Ll]iner notes',
'[Cc]ite bio[Rr]xiv', -- bioRxiv is the canonical form
'[Cc]ite [Bb]ook', -- book is the canonical form
'[Bb]ook cite', '[Bb]ook reference', '[Bb]ook reference url',
'[Cc] book', '[Cc]it book', '[Cc]ite books', '[Cc]ite chapter',
'[Cc]ite ebook', '[Cc]ite manual', '[Cc]ite page',
'[Cc]ite publication', '[Cc]ite score',
'[Cc]ite work', '[Cc]ite%-?book',
'[Bb]okref', '[Cc]itace monografie', '[Cc]itar livro', -- non-English redirects; TODO: tally separately?
'[Cc]iteer boek', '[Oo]uvrage', '[Rr]ef-llibre', '서적 인용',
'[Cc]ite citeseerx', -- canonical
'[Cc]ite conference', -- canonical
'[Cc]ita conferenza', '[Cc]ite proceedings', '[Cc]onference reference', -- cita conferenza is non-English; TODO: tally separately?
'[Cc]ite ?encyclopedia', -- cite encyclopedia is the canonical name
'[Cc]ite contribution', '[Cc]ite dic', '[Cc]ite dictionary',
'[Cc]ite encyclopaedia', '[Cc]ite encyclopædia', '[Ee]ncyclopedia',
'[Cc]ite [Ee]pisode', -- episode is the canonical form
'[Cc]ite show',
'[Cc]ite interview', -- canonical
'[Cc]ite ?journal', -- cite journal is the canonical form
'[Cc] journal', '[Cc]itation journal', '[Cc]ite abstract',
'[Cc]ite document', '[Cc]ite Journal', '[Cc]ite journal zh',
'[Cc]ite ?paper', '[Vv]cite2 journal',
'[Cc]ita pubblicazione', '[Cc]itace periodika', '[Cc]itar jornal', -- non-English redirects; TODO: tally separately?
'[Cc]itar publicació', '[Cc]ytuj pismo', '[Tt]idskriftsref',
'Навод из стручног часописа', '저널 인용',
'[Cc]ite [Mm]agazine', -- magazine is the canonical form
'[Cc]ite mag', '[Cc]ite magazine article', '[Cc]ite newsletter',
'[Cc]ite periodical',
'[Cc]ite mailing ?list', -- mailing list is the canonical form
'[Cc]ite list',
'[Cc]ite maps?', -- map is the canonical form
'[Cc]ite[ %-]?news', -- cite news is the canonical form
'[Cc] news', '[Cc]it news', '[Cc]itation news', '[Cc]ite article',
'[Cc]ite n', '[Cc]ite new', '[Cc]ite newspaper', '[Cc]ite News',
'[Cc]ite news%-q', '[Cc]ite news2', '[Cc]itenewsauthor', '[Cc]ute news',
'[Cc]itar notícia', '[Hh]aber kaynağı', '[Tt]idningsref', 'استشهاد بخبر', -- non-English redirects; TODO: tally separately?
'뉴스 인용',
'[Cc]ite newsgroup', -- canonical
'[Cc]ite usenet',
'[Cc]ite podcast', -- canonical
'[Cc]ite [Pp]ress release', -- press release is the canonical form
'[Cc]ite media release', '[Cc]ite news release', '[Cc]ite pr',
'[Cc]ite press', '[Cc]ite press release\.', '[Cc]ite press[%-]?release',
'[Cc]ite report', -- canonical
'[Cc]ite serial', -- canonical
'[Cc]ite sign', -- canonical
'[Cc]ite plaque',
'[Cc]ite speech', -- canonical
'[Cc]ite ssrn', -- canonical
'[Cc]ite SSRN',
'[Cc]ite tech ?report', -- techreport is the canonical form
'[Cc]ite standard', '[Cc]ite technical report', '[Tt]echrep reference',
'[Cc]ite thesis', -- canonical
'[Cc]ite dissertation',
'[Cc]itar tese', -- non-English redirect; TODO: tally separately?
'[Cc]ite [Ww]eb', -- web is the canonical form
'[Cc] web', '[Cc]it web', '[Cc]ite blog', '[Cc]ite URL', '[Cc]ite url',
'[Cc]ite w', '[Cc]ite wb', '[Cc]ite we', '[Cc]ite web\.',
'[Cc]ite webpage', '[Cc]ite website', '[Cc]ite website article',
'[Cc]ite%-?web', '[Cc]itweb', '[Cc]w', '[Rr]ef web', '[Ww]eb citation',
'[Ww]eb cite', '[Ww]eb link', '[Ww]eb[ %-]reference', '[Ww]eblink',
'[Cc]hú thích web', '[Cc]ita web', '[Cc]itace elektronické monografie', -- non-English redirects; TODO: tally separately?
'[Cc]itat web', 'مرجع ويب', 'یادکرد وب', '웹 인용',
}
local cs1_stripped_list = {};
local function add_stripped (name)
if not cs1_stripped_list[name] then
cs1_stripped_list[name] = true;
end
end
local function pattern_convert (cs1_name)
if cs1_name:match ('(.-)%[(%a)(%a)%](.*)') then -- mixed case optional letters
local l;
lead, c, l, tail = cs1_name:match ('(.-)%[(%a)(%a)%](.*)');
add_stripped (lead .. c .. tail); -- uppercase
add_stripped (lead .. l .. tail); -- lowercase
elseif cs1_name:match ('^([^%[]+)(%[ %%%-%]%?)(.+)$') then -- [ %-]?
lead, c, tail = cs1_name:match ('^([^%[]+)(%[ %%%-%]%?)(.+)$');
add_stripped (lead .. tail); -- neither char
add_stripped (lead .. ' ' .. tail); -- space
add_stripped (lead .. '-' .. tail); -- hyphen
elseif cs1_name:match ('^([^%[]+)(%[%%%-%]%?)(.+)$') then -- [%-]?
lead, c, tail = cs1_name:match ('^([^%[]+)(%[%%%-%]%?)(.+)$');
add_stripped (lead .. tail); -- no hyphen
add_stripped (lead .. '-' .. tail); -- hyphen
elseif cs1_name:match ('^([^%[]+)(%[ %%%-%])(.+)$') then -- [ %-]
lead, c, tail = cs1_name:match ('^([^%[]+)(%[ %%%-%])(.+)$');
add_stripped (lead .. ' ' .. tail); -- space
add_stripped (lead .. '-' .. tail); -- hyphen
elseif cs1_name:match ('^([^%?]+)(%%%-%?)(.+)$') then -- %-?
lead, c, tail = cs1_name:match ('^([^%?]+)(%%%-%?)(.+)$');
add_stripped (lead .. tail); -- no hyphen
add_stripped (lead .. '-' .. tail); -- hyphen
elseif cs1_name:match ('^(.-)(%%%-)(.+)$') then -- %-
lead, c, tail = cs1_name:match ('^(.-)(%%%-)(.+)$');
add_stripped (lead .. '-' .. tail); -- hyphen
cs1_name = cs1_name:gsub ('^(%a)', cs1_name:match ('^(%a)'):lower()) -- initial letter lowercase
elseif cs1_name:match ('^(.-)(.)%?(.*)$') then -- .?
lead, c, tail = cs1_name:match ('^(.-)(.)%?(.*)$');
add_stripped (lead .. tail); -- no character
add_stripped (lead .. c .. tail); -- character
else
add_stripped (cs1_name)
end
end
for _, pattern in ipairs (cs1_template_list) do
local lead, c, tail;
cs1_name = pattern:gsub ('^%[(%a)%a%]', '%1'); -- leading character (usually uppercase)
pattern_convert (cs1_name);
cs1_name = pattern:gsub ('^%[%a(%a)%]', '%1'); -- leading character (usually lowercase)
pattern_convert (cs1_name);
end
local cs2_template_list = { -- lua patterns of the cannonical names and redirects
'[Cc]itation',
'[Cc]ite', '[Cc]ite citation', '[Cc]ite study', '[Cc]ite [Tt]echnical standard',
}
local harv_template_list = { -- lua patterns of the cannonical names and redirects
'[Hh]arvard citation no brackets', -- canonical
'[Hh]arnvb', '[Hh]arvardnb', '[Hh]arvnb',
'[Hh]arvard citation', -- canonical
'[Hh]arv', '[Hh]arvsp',
'[Hh]arvard citation text', -- canonical
'[Hh]arvtxt',
'[Hh]arvcoltxt', -- canonical
'[Hh]arvcol', -- canonical
'[Hh]rvcoln',
'[Hh]arvcolnb', -- canonical
'[Hh]arvard citations', -- canonical
'[Hh]arvs',
'[Hh]arvp', -- canonical
}
local sfn_template_list = { -- lua patterns of the cannonical names and redirects
'[Ss]fn', -- canonical
'[Hh]f', '[Ss]f', '[Ss]hortened footnote',
'[Ss]hortened footnote template', '[Ss]nf',
'[Ss]fnp', -- canonical
'[Ss]fb', '[Ss]fnb',
'[Ss]fnm', -- canonical
'[Ss]fnmp', -- canonical
}
local cleanup_template_list = {'[Cc]itation needed', '[Dd]isputed inline', '[Dd]ubious', '[Ff]ailed verification'};
local dead_link_template_list = {'[Dd]ea?d[%- ]?[Ll]inks?', '[Dd]ead ?cite', '[Dd]ead page', '[Dd]ead ?url', '[Dd]ead%-inline',
'404', '[Bb]ad ?link', '[Bb]roken ?link', '[Dd][Ll]', '[Ll]ink ?broken', '[Dd]ead'}
local webarchive_template_list = {'[Aa]rchive url', '[Aa]rchive.org', 'IAWM', '[Ii]awm', '[Uu]rl archive', '[Ww]ay[Bb]ack', '[Ww]aybackdate',
'[Ww]eb ?archive?', '[Ww]ebcitation'}
local authors_param_list = {'authors', 'people', 'credits'};
local author_param_list = {'author1?', 'host1?', 'subject1?'};
local last_param_list = {'last1?', 'author1?%-last1?', 'surname1?'};
--[[--------------------------< E X P O R T S >----------------------------------------------------------------
]]
return
{
author_param_list = author_param_list,
authors_param_list = authors_param_list,
cleanup_template_list = cleanup_template_list,
cs1_template_list = cs1_template_list,
cs1_stripped_list = cs1_stripped_list,
cs2_template_list = cs2_template_list,
dead_link_template_list = dead_link_template_list,
harv_template_list = harv_template_list,
last_param_list = last_param_list,
sfn_template_list = sfn_template_list,
webarchive_template_list = webarchive_template_list,
}
