Wikipedia

Modulo:Bio/sandbox: differenze tra le versioni

Naviga nella cronologia in modo interattivo
Contenuto cancellato Contenuto aggiunto
fix controllo mainsnak.snaktype
 
aggiorno
 
(151 versioni intermedie di 7 utenti non mostrate)
Riga 1:
--[[
* Modulo perche implementareimplementa leil funzionalità ditemplate Bio.
* Traduce in lua:
* Template:Bio
* Template:Bio/categorie_attività
* Template:Bio/cat
* Template:Bio/catnatimorti
* Template:Bio/epoca
* Template:Bio/articolo
* Template:Bio/articolo_F
* Template:Bio/link attività
* Template:Bio/link nazionalità
* Template:Bio/plurale_attività
* Template:Bio/plurale_nazionalità
* Template:Bio/warning_A
* Template:Bio/warning_N
* Template:Primo del mese
*
* Nota: non esistendo in Lua una differenziazione tra metodi pubblici e privati,
* utilizza:
* per convenzione, quelli privati iniziano con un underscore.
* Template:Avviso
]]
 
require("strict")
-- Variabili globali
local p = {} -- per l'esportazione delle funzioni del modulo
local args -- argomenti passati al template
local textTable = {} -- table per contenere la risposta da ritornare
local SPACE = " " -- HTML Entity Code per lo spazio
 
local mString = require("Modulo:String")
-- Configurazione
local mWikidata = require("Modulo:Wikidata")
local cfg
local cfg = mw.loadData("Modulo:Bio/Configurazione")
local link_attivita
local ex_attivita = mw.loadData("Modulo:Bio/Ex attività")
local link_nazionalita
-- argomenti passati al template
local plurale_attivita
local plurale_nazionalitaargs
-- table per contenere gli errori
local errorTable = {}
-- nomi dei parametri per l'attività e la nazionalità
local attivitaParams = { "Attività", "Attività2", "Attività3" }
local nazionalitaParams = { "Nazionalità", "NazionalitàNaturalizzato", "Cittadinanza" }
 
-- =============================================================================
-------------------------------------------------------------------------------
-- Funzioni di utilità
-- =============================================================================
-------------------------------------------------------------------------------
 
-- Aggiunge testol'output alladel risposta,[[Template:Avviso]] svolgee ancheuna la funzionecategoria di concatenatorewarning a errorTable
local function dumpTextaddAvviso(...testo, category)
local arg = {...}text
 
text = mw.getCurrentFrame():expandTemplate {
for _, val in ipairs(arg) do
title = "Avviso",
table.insert(textTable, val)
args = {
end
tipo = "stile",
immagine = "[[File:Nuvola apps important.svg|40px]]",
["immagine a destra"] = "[[File:Crystal Clear app Login Manager.svg|40px]]",
testo = testo
}
}
 
table.insert(errorTable, text)
if mw.title.getCurrentTitle().namespace == 0 then
table.insert(errorTable, string.format("[[Categoria:%s]]\n", cfg.categorie[category]))
end
end
 
-- Wrapper di mw.title.exists, verifica sia che name sia valido, sia che esista
-- Aggiunge una categoria alla risposta
local function dumpCategorytitleExists(categoryname)
local title = mw.title.new(name)
dumpText("[[Categoria:", category, "]]", "\n")
return title and title.exists
end
 
local function currentTitleEquals(name)
-- Aggiunge un wlink alla risposta, se target è nil utilizza label come target
local title = mw.title.getCurrentTitle().text
local function dumpWlink(target, label)
title = mw.text.split(title, " %(")[1]
if target and label then
return title == name or mw.getContentLanguage():lcfirst(title) == name
dumpText("[[", target, "|", label, "]]")
else
dumpText("[[", target or label, "]]")
end
end
 
-- Se date inizia con "1 " o "1°" restituisce una nuova data che inizia per "1º", altrimenti date
-- Aggiunge una immagine alla risposta, size e caption sono opzionali
local function dumpImagefixFirstOfMonth(name, size, captiondate)
date = dumpTextdate:gsub("[[File:^1%s", name,"1º "|thumb")
date = date:gsub("^1\194\176", "1º")
return date
end
 
-- Restituisce "ed" se nextWord inizia con "e", altrimenti "e"
if size then
local function getEufonica(nextWord)
dumpText("|", size, "px")
return nextWord:match("^e[^d]") and "ed" or "e"
end
end
if caption then
dumpText("|", caption)
end
 
-- Restituisce true se uno degli argomenti del modulo specificati (params) ha almeno
dumpText("]]", "\n")
-- un valore tra quelli indicati (values), altrimenti false
local function argsSearch(params, values)
local ret = false
for _, param in ipairs(params) do
for _, value in ipairs(values) do
if args[param] == value then
return true
end
end
end
return false
end
 
-- Riconosce le ex attività previste e le restituisce senza "ex"
-- Aggiunge l'output del [[Template:Avviso]] e una categoria di warning alla risposta
local function dumpAvvisoisExAttivita(tipo, immagine, immagine_a_destra, testoattivita)
local textret
attivita = attivita:match("^ex (.+)$")
if attivita then
for _, v in ipairs(ex_attivita) do
if v == attivita then
ret = attivita
break
end
end
end
return ret
end
 
-- =============================================================================
text = mw.getCurrentFrame():expandTemplate {
-- classe ArgsParser
title = "Avviso",
-- =============================================================================
args = {
["tipo"] = tipo,
["immagine"] = immagine,
["immagine a destra"] = immagine_a_destra,
["testo"] = testo
}
}
 
local ArgsParser = {}
dumpText(text)
 
dumpCategory(cfg.categorie["warning"])
function ArgsParser:new()
local self = {}
setmetatable(self, { __index = ArgsParser })
return self
end
 
-- Parsifica i parametri passati al modulo e aggiunge eventuali categorie di errore.
-- Wrapper di mw.title.exists, verifica sia che name sia valido, sia che esista
-- Restituisce i parametri conosciuti scartando quelli valorizzati a stringa vuota.
local function titleExists(name)
function ArgsParser:parse(origArgs)
local title = mw.title.new(name)
local paramcfg = require("Modulo:Bio/Parametri")
local retArgs = {}
 
-- controlla i parametri conosciuti e li copia
return title and title.exists
for k, v in pairs(origArgs) do
end
if paramcfg.params[k] then
if v ~= "" then
retArgs[k] = v
end
else
addAvviso(cfg.warningParams.testo:gsub("$1", "il parametro '" ..
(tonumber(k) and (v == "" and " " or v) or k ) .. "' è sconosciuto"), "unknown-params")
end
end
 
-- controlla il valore
-- Traduzione in lua del [[Template:Primo del mese]]
for i, validator in pairs(paramcfg.validators) do
-- Se date inizia con "1 " o "1°" ritorna una nuova data che inizia per "1º", altrimenti date
if retArgs[validator.param] then
local function fixFirstOfMonth(date)
if not self:_checkParamValue(retArgs[validator.param], validator.valuetest, retArgs) then
date = date:gsub("^1%s", "1º ")
if validator.errmsg then
date = date:gsub("^1\194\176", "1º")
addAvviso(cfg.warningParams.testo:gsub("$1", validator.errmsg), "wrong-params")
end
end
end
end
-- è ammessa l'iniziale maiuscola per i parametri per attività e nazionalità
-- (complicazione inutile. basta eliminare dalle voci le maiuscole esistenti)
local lang = mw.getContentLanguage()
for _, param in ipairs(attivitaParams) do
if retArgs[param] and not cfg.attivita_maiuscolo[retArgs[param]] then
retArgs[param] = lang:lcfirst(retArgs[param])
end
end
for _, param in ipairs(nazionalitaParams) do
retArgs[param] = retArgs[param] and lang:lcfirst(retArgs[param])
end
 
return dateretArgs
end
 
-- Utilizzata da parse per controllare il valore di un parametro.
-- Ritorna "ed" se nextWord inizia con "e", altrimenti "e"
-- Restituisce true se il valore è valido altrimenti false.
local function getEufonica(nextWord)
function ArgsParser:_checkParamValue(value, valueTest, otherArgs)
return nextWord:sub(1, 1) == "e" and "ed" or "e"
local ret = true
 
if type(valueTest) == "function" then
ret = valueTest(value, otherArgs)
elseif type(valueTest) == "string" and not value:match(valueTest) then
ret = false
end
 
return ret
end
 
-- =============================================================================
-- Parsifica un TimeValue di Wikidata e ne ritorna "giornomese, anno"
-- classe CategoryManager
local function parseWikidataTimeValue(property)
-- =============================================================================
local entity, value, year, month, day, daymonth
 
local CategoryManager = {}
entity = mw.wikibase.getEntity()
if entity and entity.claims and entity.claims[property] and
entity.claims[property][0].mainsnak.snaktype == "value" then
value = entity.claims[property][0].mainsnak.datavalue.value
year, month, day = value.time:match(".+(%d%d%d%d%d)%-(%d%d)%-(%d%d).+")
if value.precision == 11 then
month = mw.getLanguage("it"):formatDate("F", tonumber(year) .. "-" .. month .. "-" .. day)
daymonth = tonumber(day) .. " " .. month
end
if value.precision == 9 or value.precision == 11 then
year = tonumber(year) .. (value.time:sub(1, 1) == "-" and " a.C." or "")
end
end
 
function CategoryManager:new()
return daymonth, year
local self = {}
 
setmetatable(self, { __index = CategoryManager })
self.plurale_attivita = nil
self.plurale_nazionalita = nil
self.categories = {}
-- al di fuori del namespace 0 esegue comunque il controllo di attività e nazionalità
self.plurals = self:_getPluralsAttivitaNazionalita()
 
local title = mw.title.getCurrentTitle()
if title.namespace == 0 and title.text ~= 'Pagina principale' or args.Debug then
-- imposta la magic word defaultsort
local sortkey
if args.ForzaOrdinamento then
sortkey = args.ForzaOrdinamento:gsub("(.-)%s*,%s*(.*)", "%1 ,%2")
elseif args.Soprannome and args.Cognome and currentTitleEquals(args.Soprannome .. " " .. args.Cognome) then
sortkey = mString.collate( { args = { args.Cognome .. " ," .. args.Soprannome } } )
elseif args.Pseudonimo and currentTitleEquals(args.Pseudonimo) then
local pseudonimo = mString.collate( { args = { args.Pseudonimo } } )
if pseudonimo ~= args.Pseudonimo then
sortkey = pseudonimo
end
elseif args.Cognome and args.Nome then
sortkey = mString.collate( { args = { args.Cognome .. " ," .. args.Nome } } )
elseif args.Nome then
local nome = mString.collate( { args = { args.Nome } } )
if nome ~= args.Nome then
sortkey = nome
end
end
if sortkey then
if args.Debug then
-- per i test di DEFAULTSORT in Modulo:Bio/test
table.insert(self.categories, string.format("DEFAULTSORT:%s", sortkey))
else
mw.getCurrentFrame():preprocess("{{DEFAULTSORT:" .. sortkey .. "}}")
end
end
self:_addAttivita(self.plurals)
self:_addNatiMorti()
self:_addCategory(cfg.categorie["bot"])
-- categoria di servizio per AnnoMorte (o anno corrente) - AnnoNascita > 122
local years = {
birth = tonumber(args.AnnoNascita),
death = not args.AnnoMorte and os.date("%Y") or tonumber(args.AnnoMorte)
}
if years.birth and years.death and years.death - years.birth > 122 then
self:_addCategory(cfg.categorie["controllo-età"])
end
-- eventuali categorie di servizio per Wikidata
if not args.Debug then
self:_addCategoriesWikidata()
end
end
 
return self
end
 
function CategoryManager:getCategories()
-------------------------------------------------------------------------------
return self.categories
-- Bio
end
-------------------------------------------------------------------------------
 
function CategoryManager:_addCategory(cat)
-- Traduzione in lua del [[Template:Bio/articolo]]
table.insert(self.categories, string.format("[[Categoria:%s]]", cat))
local function getArticleMan(attivita)
end
local article
 
-- Aggiunge la categoria se la pagina non ha un elemento Wikidata collegato,
if cfg.articoli_maschili["uno"][attivita] then
-- oppure non ha la proprietà indicata.
article = "uno"
function CategoryManager:_addCategoryWikidata(propertyId, cat)
elseif cfg.articoli_maschili["una"][attivita] then
if not mWikidata._getProperty({ propertyId }) then
article = "una"
self:_addCategory(cat)
else
end
article = "un"
end
 
-- Aggiunge eventuali categorie di servizio per Wikidata, tramite controlli
return article
-- più avanzati di quelli che si effettuano abitualmente con {{Controllo Wikidata}}.
function CategoryManager:_addCategoriesWikidata()
-- Per Speciale:LinkPermanente/80165551#Proposta_categoria_di_servizio_biografie_con_data_di_morte_su_Wikidata
if not args.AnnoMorte and mWikidata._getProperty({ "P570" }) then
self:_addCategory("Voci con template Bio senza AnnoMorte ma con data di morte su Wikidata")
end
if mWikidata._instanceOf({ "Q5" }) then
-- Per Speciale:LinkPermanente/66620402#Add_this_text_to_Template:Bio
if args["Nazionalità"] then
self:_addCategoryWikidata("P27", "Voci con template Bio e nazionalità assente su Wikidata")
end
-- Per Speciale:LinkPermanente/80165551#Wikidata_d:Property:P21
if not args.Sesso or args.Sesso == "M" then
self:_addCategoryWikidata("P21", "Voci con template Bio e sesso (M) assente su Wikidata")
elseif args.Sesso == "F" then
self:_addCategoryWikidata("P21", "Voci con template Bio e sesso (F) assente su Wikidata")
end
-- Per Speciale:LinkPermanente/80254035#Wikidata_properties_P19.2C_P20.2C_P569.2C_P570
if args.LuogoNascita and not args.LuogoNascitaLink then
self:_addCategoryWikidata("P19", "Voci con template Bio e LuogoNascita assente su Wikidata")
end
if args.LuogoNascitaLink then
self:_addCategoryWikidata("P19", "Voci con template Bio e LuogoNascitaLink assente su Wikidata")
end
if args.LuogoMorte and not args.LuogoMorteLink then
self:_addCategoryWikidata("P20", "Voci con template Bio e LuogoMorte assente su Wikidata")
end
if args.LuogoMorteLink then
self:_addCategoryWikidata("P20", "Voci con template Bio e LuogoMorteLink assente su Wikidata")
end
if args.AnnoNascita then
self:_addCategoryWikidata("P569", "Voci con template Bio e AnnoNascita assente su Wikidata")
end
if args.AnnoMorte and args.AnnoMorte ~= "?" then
self:_addCategoryWikidata("P570", "Voci con template Bio e AnnoMorte assente su Wikidata")
end
if args.Immagine and not titleExists("File:" .. args.Immagine) then
self:_addCategoryWikidata("P18", "Voci con template Bio e Immagine assente su Wikidata")
end
-- Per Speciale:LinkPermanente/80336084#Wikidata_properties_P27
-- e Speciale:LinkPermanente/105389666#Year_in_line_278_(for_Wikidata_category)
local annoNascita = tonumber(args.AnnoNascita)
local annoMorte = tonumber(args.AnnoNascita)
if (args["Nazionalità"] == "italiano" or args["Nazionalità"] == "italiana") and
((annoNascita or 0) > 1861 or (annoMorte or 0) > 1861) then
-- Le cittadinanze "Italia" e "Regno d'Italia" non si escludono, quindi non va usato "elseif"
local cittadRegno = false
local cittadRepubblica = false
if ((annoNascita ~= nil and annoNascita < 1946) or (annoMorte ~= nil and annoMorte < 1946)) then
self:_addCategoryWikidata("P27", "Voci con template Bio e cittadinanza Regno d'Italia assente su Wikidata")
cittadRegno = true
end
if ((annoNascita or 0) > 1946 or (annoMorte or 0) > 1946) then
self:_addCategoryWikidata("P27", "Voci con template Bio e cittadinanza Italia assente su Wikidata")
cittadRepubblica = true
end
if not (cittadRegno or cittadRepubblica) then
self:_addCategoryWikidata("P27", "Voci con template Bio e Nazionalità italiana assente su Wikidata")
end
elseif args["Nazionalità"] == "statunitense" and
((annoNascita or 0) > 1776 or (annoMorte or 0) > 1776) then
self:_addCategoryWikidata("P27", "Voci con template Bio e Nazionalità statunitense assente su Wikidata")
elseif args["Nazionalità"] == "francese" and
((annoNascita or 0) > 1799 or (annoMorte or 0) > 1799) then
self:_addCategoryWikidata("P27", "Voci con template Bio e Nazionalità francese assente su Wikidata")
end
-- Per Speciale:LinkPermanente/80431600#Wikidata_properties_P106
if argsSearch(attivitaParams, { "calciatore", "ex calciatore", "calciatrice" }) then
self:_addCategoryWikidata("P106", "Voci con template Bio e Attività assente su Wikidata (calciatore)")
end
if argsSearch(attivitaParams, { "attore", "attrice" }) then
self:_addCategoryWikidata("P106", "Voci con template Bio e Attività assente su Wikidata (attore)")
end
if argsSearch(attivitaParams, { "politico", "politica" }) then
self:_addCategoryWikidata("P106", "Voci con template Bio e Attività assente su Wikidata (politico)")
end
end
end
 
-- Restituisce il plurale dell'attività o nil se non trovato (con eventuale warning)
-- Traduzione in lua del [[Template:Bio/articolo_F]]
function CategoryManager:_getPluralAttivita(attivita)
-- aggiunge anche uno spazio nel caso non usi l'apostrofo
local plural
local function getArticleWoman(attivita)
local article
 
self.plurale_attivita = self.plurale_attivita or mw.loadData("Modulo:Bio/Plurale attività")
if cfg.articoli_femminili["un"][attivita] then
plural = self.plurale_attivita[isExAttivita(attivita) or attivita]
article = "un" .. SPACE
if not plural then
elseif attivita and attivita:match("^[aeiou]") then
addAvviso(cfg.warningA.testo .. cfg.warningA.testo2a:gsub("$1", attivita) .. cfg.warningA.testo3, "warning")
article = "un'"
end
else
article = "una" .. SPACE
end
 
return articleplural
end
 
-- Restituisce il plurale della nazionalità o nil se non trovato (con eventuale warning)
-- Traduzione in lua del [[Template:Bio/cat]]
function CategoryManager:_getPluralNazionalita(nazionalita)
-- Utilizzata da addAttivitaCategories, aggiunge la categoria (eventualmente con l'epoca)
local plural
local function addCat(catname, epoca1, epoca2)
 
local added = false
self.plurale_nazionalita = self.plurale_nazionalita or mw.loadData("Modulo:Bio/Plurale nazionalità")
plural = self.plurale_nazionalita[nazionalita]
if not plural then
addAvviso(cfg.warningN.testo .. cfg.warningN.testo2a:gsub("$1", nazionalita) .. cfg.warningN.testo3, "warning")
end
 
return plural
if epoca1 and titleExists("Categoria:" .. catname .. " " .. epoca1) then
dumpCategory(catname .. " " .. epoca1)
added = true
end
if epoca2 and titleExists("Categoria:" .. catname .. " " .. epoca2) then
dumpCategory(catname .. " " .. epoca2)
added = true
end
if not added then
-- se non è stata aggiunta la categoria per epoca1 e epoca2
-- aggiunge la cat. semplice, e.g. "Scrittori italiani"
dumpCategory(catname)
end
end
 
-- Restituisce il plurale dei parametri necessari per le categorie
-- Utilizzata da addAttivitaCategories, ritorna il plurale dell'attività
function CategoryManager:_getPluralsAttivitaNazionalita()
-- se non esiste il plurale aggiunge alla risposta un warning e ritorna nil
local plurals = {}
local function getPluralA(attivita)
local attnaznecessarie = not (args.Categorie == "no" and args.FineIncipit)
local plural
 
-- Nazionalità può essere vuota solo quando c'è Categorie=no e FineIncipit
plural = plurale_attivita[attivita]
if not args["Nazionalità"] and attnaznecessarie then
if not plural then
addAvviso(cfg.warningN.testo .. cfg.warningN.testo2b .. cfg.warningN.testo3, "warning")
dumpAvviso(cfg.warningA.tipo, cfg.warningA.immagine, cfg.warningA.immagine_a_destra,
end
cfg.warningA.testo .. cfg.warningA.testo2a:gsub("$1", attivita) .. cfg.warningA.testo3)
for _, nazionalita in ipairs(nazionalitaParams) do
end
if args[nazionalita] then
plurals[nazionalita] = self:_getPluralNazionalita(args[nazionalita])
end
end
-- Attività può essere vuota solo quando c'è Categorie=no e FineIncipit
if not args["Attività"] and attnaznecessarie then
addAvviso(cfg.warningA.testo .. cfg.warningA.testo2b .. cfg.warningA.testo3, "warning")
end
for _, attivita in ipairs(attivitaParams) do
if args[attivita] then
plurals[attivita] = self:_getPluralAttivita(args[attivita])
end
end
 
return pluralplurals
end
 
-- Calcola il valore di Epoca se non inserito dall'utente.
-- Utilizzata da addAttivitaCategories, ritorna il plurale della nazionalità
function CategoryManager:_getEpoca()
-- se non esiste il plurale aggiunge alla risposta un warning e ritorna nil
local ret
local function getPluralN(nazionalita)
local annoNascita = tonumber(args.AnnoNascita)
local plural
local annoMorte = tonumber(args.AnnoMorte)
if not annoNascita then
annoNascita = args.AnnoNascita:match('^(%d+) a%.C%.$')
annoNascita = annoNascita and tonumber(annoNascita) * -1
end
if annoNascita and annoNascita >= 2000 then
return "2000"
end
if not annoMorte and args.AnnoMorte then
annoMorte = args.AnnoMorte:match('^(%d+) a%.C%.$')
annoMorte = annoMorte and tonumber(annoMorte) * -1
end
 
if annoNascita and annoMorte and
plural = plurale_nazionalita[nazionalita]
annoNascita >= -500 and annoNascita <= 2100 and
if not plural then
annoMorte >= -500 and annoMorte <= 2100 and
dumpAvviso(cfg.warningN.tipo, cfg.warningN.immagine, cfg.warningN.immagine_a_destra,
((annoNascita >= 0 and annoMorte >= 0) or (annoNascita < 0 and annoMorte < 0)) then
cfg.warningN.testo .. cfg.warningN.testo2a:gsub("$1", nazionalita) .. cfg.warningN.testo3)
local sign = ''
end
if annoNascita < 0 then
annoNascita, annoMorte = -annoNascita, -annoMorte
sign = '-'
end
local secoloNascita = math.floor((annoNascita - 1) / 100) * 100
local secoloMorte = math.floor((annoMorte - 1) / 100) * 100
ret = secoloNascita == secoloMorte and (sign .. secoloNascita) or nil
end
 
return pluralret
end
 
-- Aggiunge Categoria:X dei secoli, se esistono
function CategoryManager:_addCatSecolo(catname, epoca1, epoca2)
local ok = false
for _, epoca in ipairs({ epoca1, epoca2 }) do
if epoca and titleExists("Categoria:" .. catname .. " " .. epoca) then
self:_addCategory(catname .. " " .. epoca)
ok = true
end
end
return ok
end
 
-- Traduzione in lua del [[Template:Bio/categorie attività]] con un minimo di refactoring
-- Aggiunge le categorie: Attività nazionalità [del XYZ secolo]
local function addAttivitaCategoriesCategoryManager:_addAttivita(plurals)
local catname, epoca1, epoca2, added, addatt, addnaz, add1, addbase
local plurals = {} -- contiene la versione plurale dei parametri
addatt = {}
local epoca1, epoca2
addnaz = {}
 
-- se Epoca e Epoca2 non sono stati inseriti dall'utente
-- controllo argomenti necessari al plurale per le categorie
-- e AnnoNascita e AnnoMorte cadono nello stesso secolo
-- (nello stesso ordine in cui avvenivano in [[Template:Bio/categorie attività]])
-- calcola epoca1 automaticamente
if args["Nazionalità"] then
if not args.Epoca and not args.Epoca2 and args.AnnoNascita then
plurals["Nazionalità"] = getPluralN(args["Nazionalità"])
epoca1 = self:_getEpoca()
else
epoca1 = epoca1 and cfg.epoche[epoca1]
dumpAvviso(cfg.warningN.tipo, cfg.warningN.immagine, cfg.warningN.immagine_a_destra,
else
cfg.warningN.testo .. cfg.warningN.testo2b .. cfg.warningN.testo3)
epoca1 = args.Epoca and cfg.epoche[args.Epoca]
end
epoca2 = args.Epoca2 and cfg.epoche[args.Epoca2]
if args["NazionalitàNaturalizzato"] then
end
plurals["NazionalitàNaturalizzato"] = getPluralN(args["NazionalitàNaturalizzato"])
if not epoca1 and not epoca2 then
end
self:_addCategory(cfg.categorie["no-epoca"])
if args["Cittadinanza"] then
end
plurals["Cittadinanza"] = getPluralN(args["Cittadinanza"])
end
if args["Attività"] then
plurals["Attività"] = getPluralA(args["Attività"])
else
dumpAvviso(cfg.warningA.tipo, cfg.warningA.immagine, cfg.warningA.immagine_a_destra,
cfg.warningA.testo .. cfg.warningA.testo2b .. cfg.warningA.testo3)
end
if args["Attività2"] then
plurals["Attività2"] = getPluralA(args["Attività2"])
end
if args["Attività3"] then
plurals["Attività3"] = getPluralA(args["Attività3"])
end
 
if args.Categorie ~= "no" then
-- aggiunta categorie
for _, attivita in ipairs(attivitaParams) do
epoca1 = args["Epoca"] and cfg.epoche[args["Epoca"]]
if plurals[attivita] then
epoca2 = args["Epoca2"] and cfg.epoche[args["Epoca2"]]
for _, valnazionalita in ipairs({ "Attività", "Attività2", "Attività3" }nazionalitaParams) do
if plurals[valnazionalita] then
catname = plurals[attivita] .. " " if.. plurals["Nazionalità"nazionalita] then
added = addCatself:_addCatSecolo(plurals[val] .. " " .. plurals["Nazionalità"]catname, epoca1, epoca2)
-- se non è stata aggiunta la categoria per epoca1 e epoca2
end
-- aggiunge la cat. semplice, es. "Scrittori italiani"
if plurals["NazionalitàNaturalizzato"] then
if added then
addCat(plurals[val] .. " " .. plurals["NazionalitàNaturalizzato"], epoca1, epoca2)
add1 = true
end
addatt[attivita] = true
if plurals["Cittadinanza"] then
addnaz[nazionalita] = true
addCat(plurals[val] .. " " .. plurals["Cittadinanza"], epoca1, epoca2)
else
end
self:_addCategory(catname)
end
addbase = true
end
end
end
end
end
end
end
-- in mancanza di "A N del S" prova "A del S" e "N del S"
for _, attivita in ipairs(attivitaParams) do
if plurals[attivita] and not addatt[attivita] then
add1 = self:_addCatSecolo(plurals[attivita], epoca1, epoca2) or add1
end
end
for _, nazionalita in ipairs(nazionalitaParams) do
if plurals[nazionalita] and not addnaz[nazionalita] then
add1 = self:_addCatSecolo(plurals[nazionalita], epoca1, epoca2) or add1
for k, v in ipairs({"cecoslovacchi", "jugoslavi", "sovietici"}) do
if plurals[nazionalita] == v and not add1 and not addbase then
self:_addCategory(plurals[nazionalita])
add1 = true
end
end
end
end
if not add1 and not addbase then
self:_addCatSecolo("Persone", epoca1, epoca2)
end
end
 
-- Utilizzata da addNatiMorti, restituisce il nome della categoria
-- se titleLink o title sono nella lista di eccezioni Cat luoghi, altrimenti nil
function CategoryManager:_getCatLuoghi(titleLink, title, catPrefix)
local cat
 
self.catLuoghi = self.catLuoghi or mw.loadData("Modulo:Bio/Cat luoghi")
if titleLink and title then
cat = self.catLuoghi[titleLink]
elseif title then
cat = self.catLuoghi[title]
end
 
return cat and (catPrefix .. " " .. cat) or nil
end
 
-- Traduzione in lua del [[Template:Bio/catnatimorti]]
-- Aggiunge le categorie: Nati/Morti nell'anno/giorno/luogo
local function addNatiMortiCategoriesCategoryManager:_addNatiMorti()
local cat1, cat2
if args["AnnoNascita"] then
cat1 = "Nati nel " .. args["AnnoNascita"]
cat2 = "Nati nell'" .. args["AnnoNascita"]
if titleExists("Categoria:" .. cat1) then
dumpCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
dumpCategory(cat2)
end
end
 
if args["AnnoMorte"].AnnoNascita then
cat1 = "MortiNati nel " .. args["AnnoMorte"].AnnoNascita
cat2 = "MortiNati nell'" .. args["AnnoMorte"] .AnnoNascita
if titleExists("Categoria:" .. cat1) then
self:_addCategory(cat1)
dumpCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
self:_addCategory(cat2)
dumpCategory(cat2)
end
end
else
dumpCategory("Persone viventi")
end
 
if args["GiornoMeseNascita"].AnnoMorte then
if args.AnnoMorte == "?" then
cat1 = "Nati il " .. fixFirstOfMonth(args["GiornoMeseNascita"])
self:_addCategory(cfg.categorie["annomorte-punto-interrogativo"])
cat2 = "Nati l'" .. args["GiornoMeseNascita"]
else
if titleExists("Categoria:" .. cat1) then
cat1 = "Morti nel " .. args.AnnoMorte
dumpCategory(cat1)
cat2 = "Morti nell'" .. args.AnnoMorte
elseif titleExists("Categoria:" .. cat2) then
if titleExists("Categoria:" .. cat1) then
dumpCategory(cat2)
self:_addCategory(cat1)
end
elseif titleExists("Categoria:" .. cat2) then
end
self:_addCategory(cat2)
end
if args["GiornoMeseMorte"] then
end
cat1 = "Morti il " .. fixFirstOfMonth(args["GiornoMeseMorte"])
else
cat2 = "Morti l'" .. args["GiornoMeseMorte"]
self:_addCategory(cfg.categorie["annomorte-assente"])
if titleExists("Categoria:" .. cat1) then
end
dumpCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
dumpCategory(cat2)
end
end
if args["LuogoNascitaLink"] then
cat1 = "Nati a " .. args["LuogoNascitaLink"]
cat2 = "Nati ad " .. args["LuogoNascitaLink"]
if titleExists("Categoria:" .. cat1) then
dumpCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
dumpCategory(cat2)
end
elseif args["LuogoNascita"] then
cat1 = "Nati a " .. args["LuogoNascita"]
cat2 = "Nati ad " .. args["LuogoNascita"]
if titleExists("Categoria:" .. cat1) then
dumpCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
dumpCategory(cat2)
end
end
 
if args["LuogoMorteLink"].GiornoMeseNascita then
cat1 = "MortiNati ail " .. fixFirstOfMonth(args["LuogoMorteLink"].GiornoMeseNascita)
cat2 = "Morti adNati l'" .. args["LuogoMorteLink"].GiornoMeseNascita
if titleExists("Categoria:" .. cat1) then
self:_addCategory(cat1)
dumpCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
self:_addCategory(cat2)
dumpCategory(cat2)
end
end
end
elseif args["LuogoMorte"] then
cat1 = "Morti a " .. args["LuogoMorte"]
if args.GiornoMeseMorte then
cat2 = "Morti ad " .. args["LuogoMorte"]
cat1 = "Morti il " .. fixFirstOfMonth(args.GiornoMeseMorte)
if titleExists("Categoria:" .. cat1) then
cat2 = "Morti l'" .. args.GiornoMeseMorte
dumpCategory(cat1)
elseif if titleExists("Categoria:" .. cat2cat1) then
self:_addCategory(cat1)
dumpCategory(cat2)
elseif titleExists("Categoria:" .. cat2) then
end
self:_addCategory(cat2)
end
end
end
 
-- prima di verificare le categorie per LuogoNascitaLink e LuogoNascita
-- viene controllata una lista di eccezioni
cat1 = self:_getCatLuoghi(args.LuogoNascitaLink, args.LuogoNascita, "Nati")
if cat1 then
self:_addCategory(cat1)
elseif args.LuogoNascitaLink then
cat1 = "Nati a " .. args.LuogoNascitaLink
cat2 = "Nati ad " .. args.LuogoNascitaLink
if titleExists("Categoria:" .. cat1) then
self:_addCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
self:_addCategory(cat2)
end
elseif args.LuogoNascita then
cat1 = "Nati a " .. args.LuogoNascita
cat2 = "Nati ad " .. args.LuogoNascita
if titleExists("Categoria:" .. cat1) then
self:_addCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
self:_addCategory(cat2)
end
end
 
-- prima di verificare le categorie per LuogoMorteLink e LuogoMorte
-- viene controllata una lista di eccezioni
cat1 = self:_getCatLuoghi(args.LuogoMorteLink, args.LuogoMorte, "Morti")
if cat1 then
self:_addCategory(cat1)
elseif args.LuogoMorteLink then
cat1 = "Morti a " .. args.LuogoMorteLink
cat2 = "Morti ad " .. args.LuogoMorteLink
if titleExists("Categoria:" .. cat1) then
self:_addCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
self:_addCategory(cat2)
end
elseif args.LuogoMorte then
cat1 = "Morti a " .. args.LuogoMorte
cat2 = "Morti ad " .. args.LuogoMorte
if titleExists("Categoria:" .. cat1) then
self:_addCategory(cat1)
elseif titleExists("Categoria:" .. cat2) then
self:_addCategory(cat2)
end
end
end
 
-- =============================================================================
-- Prova a ottenere alcuni parametri mancanti da Wikidata
-- classe Incipit
local function checkWikidata()
-- =============================================================================
local daymonth, year
 
local Incipit = {}
-- GiornoMeseNascita e AnnoNascita
 
if not args["GiornoMeseNascita"] or not args["AnnoNascita"] then
function Incipit:new()
daymonth, year = parseWikidataTimeValue("P569")
local self = {}
args["GiornoMeseNascita"] = args["GiornoMeseNascita"] or daymonth
 
args["AnnoNascita"] = args["AnnoNascita"] or year
setmetatable(self, { __index = Incipit })
end
self.textTable = {}
-- GiornoMeseMorte e AnnoMorte
self:_addImmagine()
if not args["GiornoMeseMorte"] or not args["AnnoMorte"] then
self:_addNomeCognome()
daymonth, year = parseWikidataTimeValue("P570")
self:_addNascitaMorte()
args["GiornoMeseMorte"] = args["GiornoMeseMorte"] or daymonth
if args.Soprannome or args.Pseudonimo or args.PostCognomeVirgola then
args["AnnoMorte"] = args["AnnoMorte"] or year
self:_addText(",")
end
end
if args.FineIncipit then
if self:_needSpace(args.FineIncipit) then
self:_addText(' ')
end
self:_addText(args.FineIncipit)
else
self:_addAttivita()
end
if args.Punto ~= "no" then
self:_addText((args.FineIncipit == "e" or
args.FineIncipit == "ed" or
args.FineIncipit == ",") and
" " or ".")
end
 
return self
end
 
local function addImmagineIncipit:getIncipit()
return table.concat(self.textTable)
local caption
end
 
-- Aggiunge testo alla risposta, svolge anche la funzione di concatenatore
if args["Immagine"] then
function Incipit:_addText(...)
if args["Didascalia"] then
local arg = {...}
caption = args["Didascalia"]
for _, val in ipairs(arg) do
else
table.insert(self.textTable, val)
if args["Nome"] then
end
caption = args["Nome"]
end
if args["Cognome"] then
caption = (caption or "") .. " " .. args["Cognome"]
end
end
if args["Didascalia2"] then
caption = (caption or "") .. "<hr />" .. args["Didascalia2"]
end
dumpImage(args["Immagine"], args["DimImmagine"], caption)
elseif args["Didascalia2"] then
-- parentesi () extra per non ritornare anche il gsub.count
dumpText( (cfg.didascalia2:gsub("$1", args["Didascalia2"])) )
end
end
 
-- Aggiunge un wlink alla risposta, se target è nil utilizza label come target.
local function addNomeCognome()
-- labelPrefix, se presente, viene rimosso dalla label e anteposto al wlink.
if args["Titolo"] then
function Incipit:_addWlink(target, label, labelPrefix)
dumpText(args["Titolo"], SPACE)
if target and label and labelPrefix then
end
local count
label, count = label:gsub("^" .. labelPrefix .. " ", "")
if count == 1 then
self:_addText(labelPrefix, " ")
end
end
 
if target and label then
-- inizio grassetto
self:_addText("[[", target, "|", label, "]]")
dumpText("'''")
else
self:_addText("[[", target or label, "]]")
end
end
 
-- Aggiunge una immagine alla risposta, size e caption sono opzionali
if args["Nome"] then
function Incipit:_addImage(name, size, caption)
dumpText(args["Nome"])
self:_addText("[[File:", name, "|thumb")
end
 
if args["Cognome"]size then
self:_addText("|", size, "px")
dumpText(SPACE, args["Cognome"])
end
if caption then
self:_addText("|", caption)
end
 
self:_addText("]]", "\n")
-- fine grassetto
end
dumpText("'''")
 
if args["PostCognomeVirgola"] then
dumpText(",", SPACE, args["PostCognomeVirgola"])
end
 
-- Restituisce true se text necessita di uno spazio iniziale (PostCognome, PostSoprannome, PostPseudonimo, LuogoNascitaAlt, NoteNascita, LuogoMorteAlt, NoteMorte, AttivitàAltre, PostNazionalità, FineIncipit)
if args["PostCognome"] then
function Incipit:_needSpace(text)
dumpText(SPACE, args["PostCognome"])
return mw.ustring.match(mw.ustring.sub(text, 1, 1), "%w") ~= nil or
end
text:sub(1, 2) == "[[" or
text:sub(1, 1) == "(" or
text:sub(1, 1) == "'" or
mw.ustring.sub(text, 1, 1) == "–" or
text:sub(1, 5) == "<span"
end
 
local function addNascitaMorteIncipit:_getArticleMan(attivita)
local article
-- si apre la parentesi
if cfg.articoli_maschili["uno"][attivita] then
dumpText(SPACE, "(")
article = "uno"
elseif cfg.articoli_maschili["una"][attivita] then
article = "una"
else
article = "un"
end
return article
end
 
function Incipit:_getArticleWoman(attivita)
if args["PreData"] then
local article
dumpText(args["PreData"], SPACE)
-- aggiunge anche uno spazio nel caso non usi l'apostrofo
end
if cfg.articoli_femminili["un"][attivita] then
article = "un "
elseif attivita and attivita:match("^[aeiou]") then
article = "un'"
else
article = "una "
end
return article
end
 
function Incipit:_addImmagine()
if args["LuogoNascita"] then
local caption
dumpWlink(args["LuogoNascitaLink"], args["LuogoNascita"])
if args["LuogoNascitaAlt"].Immagine then
if args.Didascalia then
dumpText(SPACE, args["LuogoNascitaAlt"])
caption = args.Didascalia
end
elseif args.Pseudonimo and currentTitleEquals(args.Pseudonimo) then
dumpText(",", SPACE)
caption = args.Pseudonimo
end
elseif args.Soprannome and args.Cognome and currentTitleEquals(args.Soprannome .. " " .. args.Cognome) then
caption = args.Soprannome .. " " .. args.Cognome
elseif args.Soprannome and currentTitleEquals(args.Soprannome) then
caption = args.Soprannome
else
if args.CognomePrima and args.Nome and args.Cognome then
caption = args.Cognome .. " " .. args.Nome
else
if args.Nome then
caption = args.Nome
end
if args.Cognome then
caption = (caption or "") .. " " .. args.Cognome
end
end
end
if args.Didascalia2 then
caption = (caption or "") .. "<hr />" .. args.Didascalia2
end
self:_addImage(args.Immagine, args.DimImmagine, caption)
elseif args.Didascalia2 then
-- parentesi () extra per non restituire anche il gsub.count
self:_addText( (cfg.didascalia2:gsub("$1", args.Didascalia2)) )
end
end
 
function Incipit:_addNomeCognome()
if args["GiornoMeseNascita"] then
if titleExists(args["GiornoMeseNascita"]).Titolo then
self:_addText(args.Titolo, " ")
dumpWlink(args["GiornoMeseNascita"])
end
else
dumpText(args["GiornoMeseNascita"])
end
dumpText(SPACE)
end
 
if args.Pseudonimo and currentTitleEquals(args.Pseudonimo) then
if args["AnnoNascita"] then
self:_addText("'''", args.Pseudonimo, "'''")
if titleExists(args["AnnoNascita"]) then
if args.PostPseudonimo then
dumpWlink(args["AnnoNascita"])
if self:_needSpace(args.PostPseudonimo) then
else
self:_addText(" ")
dumpText(args["AnnoNascita"])
end
self:_addText(args.PostPseudonimo)
else
end
dumpText("...")
self:_addText(", pseudonimo di ")
end
end
 
-- inizio grassetto
if args["NoteNascita"] then
self:_addText("'''")
dumpText(args["NoteNascita"])
end
 
if args.CognomePrima and args.Nome ifand args["AnnoMorte"].Cognome then
self:_addText(args.Cognome, " ", args.Nome, mw.getCurrentFrame():expandTemplate{
dumpText(SPACE, "–", SPACE)
title = "Nota nome",
if args["LuogoMorte"] then
args = { [1] = args.CognomePrima, [2] = args.Cognome }
dumpWlink(args["LuogoMorteLink"], args["LuogoMorte"])
})
if args["LuogoMorteAlt"] then
else
dumpText(SPACE, args["LuogoMorteAlt"])
local no_space
end
if args.Nome then
dumpText(",", SPACE)
self:_addText(args.Nome)
end
-- niente spazio prima di Cognome se Nome termina con «d'»
no_space = mw.ustring.match(args.Nome, " d'$") and ''
end
if args.Cognome then
self:_addText(no_space or " ", args.Cognome)
end
end
 
-- fine grassetto
if args["GiornoMeseMorte"] then
self:_addText("'''")
if titleExists(args["GiornoMeseMorte"]) then
dumpWlink(args["GiornoMeseMorte"])
else
dumpText(args["GiornoMeseMorte"])
end
dumpText(SPACE)
end
 
if args["AnnoMorte"].PostCognomeVirgola then
self:_addText(", ", args.PostCognomeVirgola)
if args["AnnoMorte"] == "?" then
elseif args.PostCognome then
dumpText("...")
if self:_needSpace(args.PostCognome) then
else
self:_addText(" ")
if titleExists(args["AnnoMorte"]) then
end
dumpWlink(args["AnnoMorte"])
self:_addText(args.PostCognome)
else
end
dumpText(args["AnnoMorte"])
end
end
end
end
 
if args["NoteMorte"].Soprannome then
self:_addText(", ", (not args.Sesso or args.Sesso == "M") and "detto" or "detta",
dumpText(args["NoteMorte"])
" ", "'''", args.Soprannome, "'''")
end
if args.PostSoprannome then
if self:_needSpace(args.PostSoprannome) then
self:_addText(" ")
end
self:_addText(args.PostSoprannome)
end
end
 
if args.Pseudonimo and not currentTitleEquals(args.Pseudonimo) then
-- si chiude la parentesi
self:_addText(", ", (not args.Sesso or args.Sesso == "M") and "noto" or "nota",
dumpText(")")
" anche con lo pseudonimo di ", "'''", args.Pseudonimo, "'''")
if args.PostPseudonimo then
if self:_needSpace(args.PostPseudonimo) then
self:_addText(" ")
end
self:_addText(args.PostPseudonimo)
end
end
end
 
local function addAttivitaIncipit:_addNascitaMorte()
-- si apre la parentesi
if args["PreAttività"] then
self:_addText(" (")
dumpText(args["PreAttività"], SPACE)
else
if args.PreData then
dumpText("è", SPACE)
self:_addText(args.PreData, "; ")
if args["AnnoMorte"] then
end
if args["Sesso"] == "M" then
dumpText("stato", SPACE)
local datimancanti = not (args.LuogoNascita or args.GiornoMeseNascita or args.NoteNascita or args.LuogoMorte or args.GiornoMeseMorte)
else
local floruit = args.AnnoMorte == "?" and (args.Floruit or cfg.epoche[args.Epoca])
dumpText("stata", SPACE)
end
end
if args["Sesso"] == "M" then
dumpText(getArticleMan(args["Attività"]), SPACE)
else
dumpText(getArticleWoman(args["Attività"]))
end
end
 
if args.LuogoNascita then
dumpWlink(link_attivita[args["Attività"]], args["Attività"] or "")
self:_addWlink(args.LuogoNascitaLink, args.LuogoNascita)
if args.LuogoNascitaAlt then
if self:_needSpace(args.LuogoNascitaAlt) then
self:_addText(" ")
end
self:_addText(args.LuogoNascitaAlt)
end
self:_addText(", ")
end
 
if args["Attività2"].GiornoMeseNascita then
if titleExists(args.GiornoMeseNascita) then
if args["Attività3"] or args["AttivitàAltre"] then
self:_addWlink(args.GiornoMeseNascita)
dumpText(",")
else
self:_addText(args.GiornoMeseNascita)
dumpText(SPACE, getEufonica(args["Attività2"]))
end
self:_addText(" ")
dumpText(SPACE)
end
dumpWlink(link_attivita[args["Attività2"]], args["Attività2"])
end
 
if args["Attività3"].AnnoNascita then
if titleExists(args["AttivitàAltre"].AnnoNascita) then
self:_addWlink(args.AnnoNascita)
dumpText(",")
else
self:_addText(args.AnnoNascita)
dumpText(SPACE, getEufonica(args["Attività3"]))
end
elseif not floruit or not datimancanti then
dumpText(SPACE)
self:_addText("...")
dumpWlink(link_attivita[args["Attività3"]], args["Attività3"])
end
if args.NoteNascita then
if self:_needSpace(args.NoteNascita) then
self:_addText(" ")
end
self:_addText(args.NoteNascita)
end
 
if args.AnnoMorte and (not floruit or not datimancanti) then
if args["AttivitàAltre"] then
self:_addText(" – ")
dumpText(args["AttivitàAltre"])
if args.LuogoMorte then
end
self:_addWlink(args.LuogoMorteLink, args.LuogoMorte)
if args.LuogoMorteAlt then
if self:_needSpace(args.LuogoMorteAlt) then
self:_addText(" ")
end
self:_addText(args.LuogoMorteAlt)
end
self:_addText(", ")
end
 
if args.GiornoMeseMorte then
dumpText(SPACE)
if titleExists(args.GiornoMeseMorte) then
dumpWlink(link_nazionalita[args["Nazionalità"]], args["Nazionalità"] or "")
self:_addWlink(args.GiornoMeseMorte)
else
self:_addText(args.GiornoMeseMorte)
end
self:_addText(" ")
end
 
if args["Cittadinanza"].AnnoMorte then
if args.AnnoMorte == "?" then
dumpText(SPACE, "con cittadinanza", SPACE)
self:_addText("...")
dumpWlink(link_nazionalita[args["Cittadinanza"]], args["Cittadinanza"])
else
end
if titleExists(args.AnnoMorte) then
self:_addWlink(args.AnnoMorte)
else
self:_addText(args.AnnoMorte)
end
end
end
end
 
-- se date ignote, usa Floruit o lo ricava da Epoca
if args["NazionalitàNaturalizzato"] then
if not args.AnnoNascita and args.AnnoMorte == "?" then
dumpText(SPACE)
local fl = args.Floruit
dumpWlink("Naturalizzazione", (args["Sesso"] == "F" and "naturalizzata" or "naturalizzato"))
if not fl and cfg.epoche[args.Epoca] then
dumpText(SPACE)
fl = mw.ustring.gsub(cfg.epoche[args.Epoca], "^del ?l?'?", "")
dumpWlink(link_nazionalita[args["NazionalitàNaturalizzato"]], args["NazionalitàNaturalizzato"])
-- se due epoche, le mette entrambe senza ripetere la parola "secolo"
end
if cfg.epoche[args.Epoca2] then
if fl ~= "I secolo a.C." then
fl = fl .. "|" .. mw.ustring.gsub(fl, " secolo.*$", "")
end
fl = "[[" .. fl .. "]]-[[" .. mw.ustring.gsub(cfg.epoche[args.Epoca2], "^del ?l?'?", "") .. "]]"
end
end
if fl then
if titleExists(fl) then
fl = "[[" .. fl .. "]]"
end
if not datimancanti then
self:_addText("; ")
end
self:_addText("[[floruit|fl.]] ", fl)
end
end
 
if args["PostNazionalità"].NoteMorte then
dumpText(args["PostNazionalità"])
if self:_needSpace(args.NoteMorte) then
end
self:_addText(" ")
end
self:_addText(args.NoteMorte)
end
-- si chiude la parentesi
self:_addText(")")
end
 
function Incipit:_addAttivita()
-- Traduzione in lua di [[Template:Bio]]
local link_attivita = mw.loadData("Modulo:Bio/Link attività")
local function bio()
local link_nazionalita = mw.loadData("Modulo:Bio/Link nazionalità")
local sortkey
 
self:_addText(" ")
-- lettura configurazione
if args["PreAttività"] then
cfg = mw.loadData("Modulo:Bio/Configurazione")
self:_addText(args["PreAttività"], " ")
link_attivita = mw.loadData("Modulo:Bio/Link attività")
else
link_nazionalita = mw.loadData("Modulo:Bio/Link nazionalità")
self:_addText("è ")
plurale_attivita = mw.loadData("Modulo:Bio/Plurale attività")
if args.AnnoMorte then
plurale_nazionalita = mw.loadData("Modulo:Bio/Plurale nazionalità")
self:_addText((not args.Sesso or args.Sesso == "M")
and "stato " or "stata ")
end
if not args.Sesso or args.Sesso == "M" then
self:_addText(self:_getArticleMan(args["Attività"]), " ")
else
self:_addText(self:_getArticleWoman(args["Attività"]))
end
end
 
local getLinkAttivita = function(attivita)
-- prova a ottenere alcuni parametri mancanti da Wikidata
if not attivita then return end
if cfg.wikidata then
local ex_attivita = isExAttivita(attivita)
checkWikidata()
return link_attivita[ex_attivita or attivita] or ex_attivita
end
end
 
self:_addWlink(getLinkAttivita(args["Attività"]), args["Attività"] or "", "ex")
-- le categorie sono aggiunte solo se la pagina è nel namespace principale (0)
if mw.title.getCurrentTitle().namespace == 0 then
-- imposta la magic word defaultsort
if args["ForzaOrdinamento"] then
sortkey = args["ForzaOrdinamento"]
elseif args["Cognome"] and args["Nome"] then
sortkey = args["Cognome"] .. "&#32;," .. args["Nome"]
end
if sortkey then
mw.getCurrentFrame():preprocess("{{DEFAULTSORT:" .. sortkey .. "}}")
end
-- Categorie impostato a "no" disabilita la categorizzazione per attività
if args["Categorie"] ~= "no" then
addAttivitaCategories()
end
addNatiMortiCategories()
dumpCategory(cfg.categorie["bot"])
end
 
if args["Attività2"] then
addImmagine()
if args["Attività3"] or args["AttivitàAltre"] then
addNomeCognome()
self:_addText(",")
addNascitaMorte()
else
self:_addText(" ", getEufonica(args["Attività2"]))
end
self:_addText(" ")
self:_addWlink(getLinkAttivita(args["Attività2"]), args["Attività2"], "ex")
end
 
if args["PostCognomeVirgolaAttività3"] then
if args["AttivitàAltre"] then
dumpText(",")
self:_addText(",")
end
else
self:_addText(" ", getEufonica(args["Attività3"]))
end
self:_addText(" ")
self:_addWlink(getLinkAttivita(args["Attività3"]), args["Attività3"], "ex")
end
 
if args["FineIncipitAttivitàAltre"] ~= "," then
if self:_needSpace(args["AttivitàAltre"]) then
dumpText(SPACE)
self:_addText(" ")
end
end
self:_addText(args["AttivitàAltre"])
end
 
self:_addText(" ")
if args["FineIncipit"] and args["FineIncipit"] ~= "," then
self:_addWlink(link_nazionalita[args["Nazionalità"]], args["Nazionalità"] or "")
dumpText(args["FineIncipit"])
else
addAttivita()
end
 
if args["Punto"] ~= "no".Cittadinanza then
self:_addText(" con cittadinanza ")
if args["FineIncipit"] ~= "e" and
self:_addWlink(link_nazionalita[args.Cittadinanza], args.Cittadinanza)
args["FineIncipit"] ~= "ed" and
end
args["FineIncipit"] ~= ",=&#32;" then
dumpText(".")
end
end
 
if args["NazionalitàNaturalizzato"] then
return table.concat(textTable)
self:_addText(" ")
end
self:_addWlink("Naturalizzazione",
(not args.Sesso or args.Sesso == "M" or
(args.Sesso == "F" and self:_getArticleWoman(args["Attività"]) == "un ")) and
"naturalizzato" or "naturalizzata")
self:_addText(" ")
self:_addWlink(link_nazionalita[args["NazionalitàNaturalizzato"]], args["NazionalitàNaturalizzato"])
end
 
if args["PostNazionalità"] then
-- Entry-point per {{Bio/link attività}}
if self:_needSpace(args["PostNazionalità"]) then
function p.linkAttivita(frame)
self:_addText(" ")
return mw.loadData("Modulo:Bio/Link attività")[frame:getParent().args[1]]
end
self:_addText(args["PostNazionalità"])
end
end
 
-- =============================================================================
-- Entry-point per {{Bio/link nazionalità}}
-- Funzioni esportate
function p.linkNazionalita(frame)
-- =============================================================================
return mw.loadData("Modulo:Bio/Link nazionalità")[frame:getParent().args[1]]
end
 
local p = {}
-- Entry-point per {{Bio/plurale attività}}
function p.pluraleAttivita(frame)
return mw.loadData("Modulo:Bio/Plurale attività")[frame:getParent().args[1]]
end
 
-- Funzione per {{#invoke:Bio|categorie}} utilizzato da Modulo:Bio/test
-- Entry-point per {{Bio/plurale nazionalità}}
function p.pluraleNazionalitacategorie(frame)
args = ArgsParser:new():parse(frame.args)
return mw.loadData("Modulo:Bio/Plurale nazionalità")[frame:getParent().args[1]]
local categories = CategoryManager:new():getCategories()
return table.concat(errorTable) ..
(args.Debug and ( table.concat(categories, '<br />'):gsub('%[%[', '[[:') ) .. '<br />' or
table.concat(categories))
end
 
-- Entry-pointFunzione per il template per {{Bio}}
function p.biomain(frame)
-- gli errori generano avvisi, ma non interrompono l'esecuzione,
args = {}
-- come avveniva nel vecchio template.
 
args = ArgsParser:new():parse(frame:getParent().args)
-- copia i parametri ricevuti, eccetto quelli valorizzati a stringa vuota
local catTable = CategoryManager:new():getCategories()
for k, v in pairs(frame:getParent().args) do
if v ~= "" then
args[k] = v
end
end
 
return biotable.concat(errorTable) ..
Incipit:new():getIncipit() ..
table.concat(catTable)
end
 
Estratto da "https://it.wikipedia.org/wiki/Modulo:Bio/sandbox"