|
local categories = {}
local missing_titlediscontinuous_num = '[[Categoria:ErroriVoci di compilazione delcon template Tracce -con titolonumerazione mancantediscontinua]]'
local unexpected_markupmissing_title = '[[Categoria:ErroriVoci di compilazione delcon template Tracce -con markuptitolo inaspettatomancante]]'
local unknown_formatunexpected_markup = '[[Categoria:ErroriVoci di compilazione delcon template Tracce - formatocon duratamarkup sconosciutoinaspettato]]'
local unknown_format = '[[Categoria:Voci con template Tracce con formato durata sconosciuto]]'
-- ProtectsProtegge auna stringstringa thatche willsarà beavvolta wrappeddal inmarkup wiki italic markup '' ... '' del corsivo
local function safeforitalics( str )
if str:sub(1,1) == "'" ifthen str ~= nil"<span></span>" and.. str ~= '' thenend
if str:sub(-1,-1) == "'" then str = str .. "<span></span>" .. str end
return str
if str:sub(-1,-1) == "'" then str = str .. "<span></span>" end
end
return str
-- Calcola e formatta la durata di una traccia
local function getTrackLength(args, i)
local string_durata = args["Durata" .. i]
local minuti, secondi
if string_durata then
local string_minuti, string_secondi = mw.ustring.match(string_durata, "^(%d+):(%d%d)$")
minuti = tonumber(string_minuti)
secondi = tonumber(string_secondi)
else
minuti = tonumber(args["Minuti" .. i])
secondi = args["Secondi" .. i] and mw.ustring.match(args["Secondi" .. i], "^%d%d?$") and
tonumber(args["Secondi" .. i])
end
local durata = (minuti or 0) * 60 + (secondi or 0)
if (string_durata and durata == 0) or (not minuti and args["Minuti" .. i]) or
(not secondi and args["Secondi" .. i]) then
categories[#categories+1] = unknown_format
end
return durata, durata > 0 and string.format("%d:%02.f", minuti or 0, secondi or 0) or nil
end
]]--
local function track(args, i, corsivodurata)
local titolo = args["Titolo" .. i] or ""
local row_elements = {}
if titolo ~= "" then
table.insert(row_elements, '<li value="' .. tostring(i) .. '">')
local row_elements = {}
local interprete = args["Interprete" .. i]
table.insert(row_elements, '<li value="' .. tostring(i) .. '">')
if interprete then localtable.insert(row_elements, interprete = args["Interprete" .. i]" or– "") end
local corsivo = args["Corsivo"] ~= "no" and true or false
if interprete ~= "" then table.insert(row_elements, interprete .. " – ") end
corsivo = (corsivo and args["Corsivo" .. i] ~= "no") or
(not corsivo and (args["Corsivo" .. i] == "sì" or args["Corsivo" .. i] == "si"))
if titolo:find(corsivo and "''" or "'''") then
categories[#categories+1] = unexpected_markup
end
if corsivo then
titolo = "''" .. safeforitalics(titolo) .. "''"
end
table.insert(row_elements, titolo)
local featuring = args["Featuring" .. i] or ""
if featuring ~= "" then table.insert(row_elements, " <small>(<abbr title=featuring>feat.</abbr> " .. featuring .. ")</small>") end
local note = args["Note" .. i] or ""
if note ~= "" then table.insert(row_elements, " <small>(" .. note .. ")</small>") end
if durata then
local string_durata = args["Durata" .. i]
table.insert(row_elements, " – ")
local minuti, secondi
table.insert(row_elements, durata)
if string_durata then
end
local string_minuti, string_secondi = mw.ustring.match(string_durata, "(%d+):(%d%d)")
local AutoreTesto = args["Autore testo" .. i]
minuti = tonumber(string_minuti) or 0
local AutoreMusica = args["Autore musica" .. i]
secondi = tonumber(string_secondi) or 0
local AutoreTestoeMusica = args["Autore testo e musica" .. i]
else
local minutiedizioni = tonumber(args["MinutiEdizioni" .. i]) or 0
local no_autore = false
secondi = tonumber(args["Secondi" .. i]) or 0
if AutoreTestoeMusica then
end
table.insert(row_elements, " <small>(" .. AutoreTestoeMusica )
local durata = minuti * 60 + secondi
elseif AutoreTesto then
if durata > 0 then
table.insert(row_elements, " –<small>(testo: " .. AutoreTesto)
if AutoreMusica then
table.insert(row_elements, string.format("%d:%02.f", minuti, secondi))
table.insert(row_elements, " – musica: " .. AutoreMusica)
elseif string_durata or args["Minuti" .. i] or args["Secondi" .. i] then
end
categories[#categories+1] = unknown_format
elseif AutoreMusica then
end
table.insert(row_elements, " <small>(musica: " .. AutoreMusica)
local AutoreTesto = args["Autore testo" .. i] or ""
else
local AutoreMusica = args["Autore musica" .. i] or ""
no_autore = true
local AutoreTestoeMusica = args["Autore testo e musica" .. i] or ""
end
local edizioni = args["Edizioni" .. i] or ""
if edizioni then
local no_autore = false
if no_autore then
if AutoreTestoeMusica ~= "" then
table.insert(row_elements, " <small>(" .. AutoreTestoeMusica )
else
elseif AutoreTesto ~= "" then
table.insert(row_elements, " <small>(testo:; " .. AutoreTesto)
end
if AutoreMusica ~="" then
table.insert(row_elements, "edizioni – musica:musicali " .. AutoreMusicaedizioni .. ")</small>")
elseif not no_autore then
end
table.insert(row_elements, ")</small>")
elseif AutoreMusica ~= "" then
end
table.insert(row_elements, " <small>(musica: " .. AutoreMusica)
local extra = args["Extra" .. i]
else
if extra then table.insert(row_elements, " – " .. extra) end
no_autore = true
table.insert(row_elements, "</li>\n")
end
local ListaMedley = args["ListaMedley" .. i]
if edizioni ~= "" then
if ListaMedley then table.insert(row_elements, '<div style="padding: 0.3em 0px 0.5em 2.5em;">\n' .. ListaMedley .. '</div>') end
if no_autore then
return table.insertconcat(row_elements), " <small>(")durata
else
table.insert(row_elements, "; ")
end
table.insert(row_elements, "edizioni musicali " .. edizioni .. ")</small>")
elseif not no_autore then
table.insert(row_elements, ")</small>")
end
local extra = args["Extra" .. i] or ""
if extra ~= "" then table.insert(row_elements, " – " .. extra) end
table.insert(row_elements, "</li>\n")
local ListaMedley = args["ListaMedley" .. i] or ""
if ListaMedley ~= "" then table.insert(row_elements, '<div style="padding: 0.3em 0px 0.5em 2.5em;">\n' .. ListaMedley .. '</div>') end
return table.concat(row_elements), durata
else
return nil
end
end
--[[
Riceve una tabella di parametri e l'indicerestituisce deluna primostringa gruppo di parametri del template tracce,contenente
restituisce una stringa contenente l'output da inserire nella voce
]]--
local function componi_tracce(args, primo_titolo)
-- array per accumulare le righe della lista man mano che vengono elaborate
local tracks = {}
-- compone la testata dell'elenco tracce
local testata = ""
local no_autore = false
local autoreTestoeMusica = args["Autore testi e musiche"] or ""
if autoreTestoeMusica ~= "" then
testata = "Testi e musiche di " .. autoreTestoeMusica
else
local autoreTesti, autoreMusiche = args["Autore testi"], orargs["Autore musiche""]
if autoreTesti then
local autoreMusiche = args["Autore musiche"] or ""
testata = "Testi di " if.. autoreTesti ~= "" then
if autoreMusiche then testata = testata =.. "Testi, musiche di " .. autoreTestiautoreMusiche end
elseif autoreMusiche then
if autoreMusiche ~= "" then testata = testata .. ", musiche di " .. autoreMusiche end
testata = "Musiche di " elseif.. autoreMusiche ~= "" then
else
testata = "Musiche di " .. autoreMusiche
no_autore = true
else
end
no_autore = true
end
local edizioni = args["Edizioni"]
end
local if edizioni = args["Edizioni"] or ""then
if edizioni ~= ""no_autore then
testata = "Edizioni musicali " .. edizioni .."."
if no_autore then
else
testata = "Edizioni musicali " .. edizioni .."."
testata = testata .. "; edizioni musicali " .. edizioni .. "."
else
end
testata = testata .. "; edizioni musicali " .. edizioni .. "."
elseif not no_autore then
end
testata = testata .. "."
elseif not no_autore then
end
testata = testata .. "."
table.insert(tracks, testata)
end
-- compone la lista dei parametri
local corsivo = true
table.insert(tracks, "<ol>")
if args["Corsivo"] == "no" then
local visualizza_durata = args["Visualizza durata totale"]
corsivo = false
local durata = 0
end
local somma_durata = false
table.insert(tracks, testata)
if visualizza_durata == "si" or visualizza_durata == "sì" then somma_durata = true end
-- compone la lista dei parametri
local inums = primo_titolo{}
local validated_nums = {}
table.insert(tracks, "<ol>")
for k, v in pairs(args) do
local visualizza_durata = args["Visualizza durata totale"] or ""
local prefix, num = string.match(k, '^(%D+)([0-9]+)$')
local durata = 0
if num and (num == '0' or num:sub(1,1) ~= '0') then
local somma_durata = false
-- se il numero viene modificato da tonumber, è troppo alto
if visualizza_durata == "si" or visualizza_durata == "sì" then somma_durata = true end
num = tonumber(num)
--estrae le tracce dai parametri e inserisci i valori nella tabella tracks
if not args['Titolo' .. num] then
while true do
categories[#categories+1] = missing_title
local new_track, durata_track = track(args, i, corsivo)
end
if new_track == nil then break end
if args[prefix .. num] and not validated_nums[num] then
table.insert(tracks, new_track)
validated_nums[num] = true
if somma_durata then durata = durata + durata_track end
table.insert(nums, num)
i = i + 1
end
end
table.insert(tracks, "</ol>")
end
if somma_durata then
table.sort(nums)
table.insert(tracks, "Durata totale: " .. string.format("%d:%02.f", math.floor(durata/60) , durata % 60) .. "</p>")
if #nums == 0 endthen
categories[#categories+1] = missing_title
return table.concat(tracks, "\n") .. table.concat(categories)
-- categoria di tracciamento se la numerazione delle tracce è discontinua
elseif nums[1] + #nums - 1 ~= nums[#nums] then
categories[#categories+1] = discontinuous_num
end
local tracce = false
-- estrae le tracce dai parametri e inserisce i valori nella tabella tracks
for k, num in ipairs(nums) do
local durata_track, durata_formattata = getTrackLength(args, num)
if args['Titolo' .. num] then
tracce = true
local new_track = track(args, num, durata_formattata)
table.insert(tracks, new_track)
end
if somma_durata then durata = durata + durata_track end
end
table.insert(tracks, "</ol>")
if somma_durata then
table.insert(tracks, "Durata totale: " .. string.format("%d:%02.f", math.floor(durata/60) , durata % 60) .. "</p>")
end
local ns = mw.title.getCurrentTitle().namespace
return (tracce and table.concat(tracks, "\n") or '') .. (ns == 0 and table.concat(categories) or '')
end
]]--
function p.tracce(frame)
-- ottiene i parametri del template originale
local pframe = frame:getParent()
-- estrae tutti i parametri e li memorizza in una tabella
local args = {}
for k, v in pairs(pframe.args) do
local primo_titolo
if v ~= nil and v ~= '' then
for k, v in pairs( pframe.args ) do
if v ~= nil then args[k] = v end
end
-- Se è un titolo confronto con primo_titolo e se è minore lo memorizzo
end
local pos = string.match(k, "Titolo(%d+)$")
return componi_tracce(args)
if pos then
pos = tonumber(pos)
if not primo_titolo or pos < primo_titolo then
primo_titolo = pos
end
end
end
-- Aggiunge una categoria di errore qualora una traccia sia senza titolo
for k, v in pairs( args ) do
local numero_titolo = k:match('%D(%d+)$')
if numero_titolo and not args['Titolo' .. numero_titolo] then
categories[#categories+1] = missing_title
end
end
-- Se primo_titolo è falso non c'è alcun campo titolo
if primo_titolo then
return componi_tracce(args, primo_titolo)
else
return ""
end
end
-- Tavola di conversione per i parametri di en:template:Track_listing non indicizzati
local conversion_table = {
['all_writing'] = 'Autore testi e musiche',
['all_lyrics'] = 'Autore testi',
['all_music'] = 'Autore musiche',
['total_length'] = 'Visualizza durata totale'
}
-- Tavola di conversione per i parametri di en:template:Track_listing indicizzati
local conversion_table_index ={
['title'] = 'Titolo',
['note'] = 'Note',
['music'] = 'Autore musica',
['writer'] = 'Autore testo e musica',
['lyrics'] = 'Autore testo',
['length'] = 'Durata',
['extra'] = 'Extra'
}
]]--
function p.en_tracks(frame)
local pframe = frame:getParent()
-- estrae tutti i parametri e li memorizza in una tabella (pframe ritorna una pseudotabella, vedi documentazione)
local args = {}
local log = {}
local primo_titolo
for k, v in pairs(pframe.args) do
local log ={}
if v ~= nil and v ~= '' then
for k,v in pairs( pframe.args) do
if conversion_table[k] then -- Controlla sse è un parametro non indicizzato
args[ conversion_table[k]] = v
else
-- estrae nome base e indice, se k=Title1title1 allora base_keyprefix=Titletitle e posnum=1
local base_keyprefix, posnum = string.match(k, "^(%D+)(%d+)$")
if pos and base_keyprefix and conversion_table_index[base_keyprefix] then -- controlla se è un parametro indicizzato
args[conversion_table_index[base_keyprefix] .. posnum] = v
elseif not num then -- non è neanche un parametro indicizzato, lo copia così com'è
pos = tonumber(pos)
args[k] = v
if base_key == 'title' and (not primo_titolo or pos < primo_titolo) then
end
primo_titolo = pos
end
end
end
else -- non è neanche un parametro indicizzato, lo copia così com'è
end
args[k] = v
if args['Visualizza durata totale'] then args['Visualizza durata totale'] = 'si' end
end
return componi_tracce(args) -- table.concat(log, '\n*') --
end
end
if args['Visualizza durata totale'] then args['Visualizza durata totale'] = 'si' end
if primo_titolo then
return componi_tracce(args, primo_titolo) -- table.concat(log, '\n*') --
else
return
end
end
| 