Module:Fo
De Commission Historique
Révision datée du 15 mars 2021 à 10:51 par L.strappazon (discussion | contributions)
La documentation pour ce module peut être créée à Module:Fo/doc
local p = {}
local bib = mw.ext.cargo.query('Zotero', '_pageName, ZoteroKey, TitleItem, Author, Editor, Date, Date__precision, Place, ItemType, Publisher, PublicationTitle, Volume, PublicationYear, Pages, Url, FilingDate, AccessDate, Type, Number, IssuingAuthority, Archive, Medium, Interviewer, AccessDate',{groupBy = 'ZoteroKey', orderBy = 'ZoteroKey', limit = 4000})
local bbib={}
for _,r in ipairs(bib) do
bbib[r['ZoteroKey']] = r
if r['Date__precision'] == '3' then
bbib[r['ZoteroKey']]['Date'] = mw.text.truncate(r['Date'],4,'')
end
end
local model = {
["book"] = function (b)
return b.TitleItem .. ". " .. b.Place .. " : " .. b.Publisher .. ", " .. mw.text.truncate(b.PublicationYear,4,'')
end,
["bookSection"] = function (b)
return b.TitleItem .. ". In:" .. b.PublicationTitle .. ", " .. b.Editor .. ", " .. b.Pages .. ". " .. b.Place .. " : " .. b.Publisher .. ", " .. mw.text.truncate(b.PublicationYear,4,'')
end,
["journalArticle"] = function (b)
return b.TitleItem .. ". " .. b.PublicationTitle .. " " .. b.Volume .. " (" .. mw.text.truncate(b.PublicationYear,4,'') .. ") : " .. b.Pages
end,
["thesis"] = function (b)
return b.TitleItem .. ". " .. b.Type .. ". " .. b.Place .. ", " .. mw.text.truncate(b.PublicationYear,4,'')
end,
["magazineArticle"] = function (b)
return b.TitleItem .. ". " .. b.PublicationTitle .. ". " .. b.Date
end,
["patent"] = function (b)
return b.TitleItem .. ". " .. b.IssuingAuthority .. " " .. b.Number .. ", " .. "{{int:Template-depose_le}} " .. b.FilingDate .. " {{int:Template-et_accorde_le}} " .. b.Date
end,
["encyclopediaArticle"] = function (b)
return b.TitleItem .. ". In:" .. b.PublicationTitle .. ". " .. b.Publisher .. ", " .. mw.text.truncate(b.PublicationYear,4,'') .. ". " .. b.Url
end,
["report"] = function (b)
return b.TitleItem .. ". " .. b.ItemType .. " " .. b.Number .. ". " .. b.Place .. " : " .. b.Publisher .. ", " .. mw.text.truncate(b.PublicationYear,4,'') .. ". " .. b.Url
end,
["interview"] = function (b)
return b.TitleItem .. ", {{int:Template-entretien_realise_par}}" .. b.Interviewer .. ". " .. b.Medium .. ", " .. b.Date .. ". " .. b.Archive .. ". " .. b.Url
end,
["videoRecording"] = function (b)
return b.TitleItem .. ". " .. b.Place .. " : " .. b.Publisher .. ", " .. b.Date .. ". " .. b.Url .. ", {{int:Template-Page_consulte_le}}" .. b.AccessDate
end,
["presentation"] = function (b)
return b.TitleItem .. ". " .. b.Place .. ", " .. b.Date
end,
["newspaperArticle"] = function (b)
return b.TitleItem .. ". " .. b.PublicationTitle .. ", " .. b.Date .. ". " .. b.Url .. ", {{int:Template-Page_consulte_le}}" .. b.AccessDate
end,
["webpage"] = function (b)
return b.TitleItem .. ". " .. b.PublicationTitle .. ", " .. b.Date .. ". " .. b.Url .. ", {{int:Template-Page_consulte_le}}" .. b.AccessDate
end,
["blogPost"] = function (b)
return b.TitleItem .. ". " .. b.PublicationTitle .. ", " .. b.Date .. ". " .. b.Url .. ", {{int:Template-Page_consulte_le}}" .. b.AccessDate
end,
}
function modelRef (b,precision,field)
local content, pr = "", ""
if #b.Author > 0 then
content = b.Author .. ". "
else
content = b.Editor .. "ed"
end
if #precision > 0 then
pr = ". " .. precision
end
content = content .. model[b["ItemType"]](b)
if field ~= "Publication" and field ~= "Reference" then
return '<ref name="' .. b.ZoteroKey .. precision .. '">' .. content .. pr .. '.</ref> '
else
return "*" .. content .. pr .. "\n"
end
end
function p.tableRef(Zref,result) -- Place la référence Zref dans la table result dont les clefs sont les champs (ex. Nom, Prénom, Date de naissance...)(Ref[3]) et les valeurs des tables de tables contenant clef Zotero et précision.
local Ref = mw.text.split(Zref,'+')
local Zkey = mw.text.truncate(Ref[1],-8,'')
if Ref[3] then
if not result[Ref[3]] then result[Ref[3]] = '' end
precision = Ref[2] or ''
if bbib[Zkey] then
--result[Ref[3]] = result[Ref[3]] .. model[bbib[Zkey]["ItemType"]](bbib[Zkey],precision)
result[Ref[3]] = result[Ref[3]] .. modelRef(bbib[Zkey],precision,Ref[3])
end
end
end
function p.expandRef(refs,typeRef)
local result = ''
if refs then
for _,ref in ipairs(refs) do
if #ref['Note'] > 1 then
local Zkey = mw.text.truncate(ref['Note'],-8,'')
if bbib[Zkey] then
local templ = 'ZoteroNote'
if typeRef then templ = 'ZoteroPub' end
bbib[Zkey]['Precisions'] = ref['Precisions'] or nil
result = result .. frame:expandTemplate{title = templ, args = bbib[Zkey]}
else
local note = ref['Note']
if #ref['Precisions'] > 1 then
note = note .. ', ' .. ref['Precisions']
end
if typeRef then
result = result .. '\n*' .. note
else
result = result .. frame:expandTemplate{title = 'Note', args = {note}}
end
end
end
end
end
return result
end
function p.split(frame)
if #frame.args['texte'] < 2 or string.sub(frame.args['texte'],1,3) == '[[:' then
return ''
end
local texte,res,precision = '','',''
local texte_libre = mw.text.split(frame.args['texte'],'€€€')
if #texte_libre % 2 == 0 then
texte = '!!! ERREUR BALISES NOTES !!!\n\n'
end
for n, chunk in ipairs(texte_libre) do
if (n % 2 == 0) then
local note = mw.text.split(chunk:gsub("[\n\r]",""),'£££')
local ref = mw.text.truncate(note[1],-8,'')
local precision = ''
if #note > 1 then
precision = note[2]
end
if bbib[ref] then
--res = model[bbib[ref]["ItemType"]](bbib[ref],note[2])
res = modelRef(bbib[ref],precision,'')
else
local name = mw.text.truncate(note[1],50,'') .. precision
name = string.gsub(name, "%W",'_')
res = '<ref name="' .. name .. '">' .. note[1] .. ', ' .. precision .. '</ref> '
end
texte = texte .. res
else
texte = texte .. chunk
end
end
return texte
end
function p.ref(ref,precision)
local result = '<ref name="' .. ref .. precision .. '">' .. bbib[ref]["Author"] .. ', ' .. bbib[ref]["Editor"] .. pr .. '.</ref> '
return result
end
return p