Modulo:Tracce/sandbox: differenze tra le versioni

Versione delle 22:21, 9 set 2013

Versione attuale delle 19:02, 25 apr 2024

(44 versioni intermedie di 2 utenti non mostrate)

Riga 1:

local categories = {}

-- Protects a string that will be wrapped in wiki italic markup '' ... ''

local discontinuous_num = '[[Categoria:Voci con template Tracce con numerazione discontinua]]'

local function safeforitalics( str )

local missing_title = '[[Categoria:Voci con template Tracce con titolo mancante]]'

--[[ Note: We can not use <i> for italics, as the expected behavior for

local unexpected_markup = '[[Categoria:Voci con template Tracce con markup inaspettato]]'

italics specified by ''...'' in the title is that they will be inverted

local unknown_format = '[[Categoria:Voci con template Tracce con formato durata sconosciuto]]'

(i.e. unitalicized) in the resulting references. In addition, <i> and ''

tend to interact poorly under Mediawiki's HTML tidy. ]]

-- Protegge una stringa che sarà avvolta dal markup wiki '' ... '' del corsivo

if str == nil or str == '' then

local function safeforitalics(str)

return str;

if str:sub(1,1) == "'" then str = "<span></span>" .. str end

else

if str:sub(-1,-1) == "'" then str = str .. "<span ></span>" .. str; end

return str

if str:sub(-1,-1) == "'" then str = str .. "<span />"; end

return str;

end

end

-- 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

--[[

Riceve una lista di parametri e l'indice del gruppo di parametri da comporre

in una traccia

]]--

local function track(args, i, durata)

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 table.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

table.insert(row_elements, "''" .. safeforitalics(titolo) .. "''")

(not corsivo and (args["Corsivo" .. i] == "sì" local featuring =or args["FeaturingCorsivo" .. i] or== "si"))

if titolo:find(corsivo and "''" or "'''") then

if featuring ~= "" then table.insert(row_elements, " <small>(feat. " .. featuring .. ")</small>") end

categories[#categories+1] = unexpected_markup

local note = args["Note" .. i] or ""

end

if note ~= "" then table.insert(row_elements, " <small>(" .. note .. ")</small>") end

if corsivo then

local string_durata = args["Durata" .. i]

titolo = "''" .. safeforitalics(titolo) .. "''"

if string_durata then

end

local string_minuti, string_secondi = mw.ustring.match(string_durata, "(%d+):(%d%d)")

table.insert(row_elements, titolo)

minuti = tonumber(string_minuti) or 0

local featuring = args["Featuring" .. i]

secondi = tonumber(string_secondi) or 0

if featuring then table.insert(row_elements, " <small>(<abbr title=featuring>feat.</abbr> " .. featuring .. ")</small>") end

else

local minutinote = tonumber(args["MinutiNote" .. i]) or 0

if note then table.insert(row_elements, " <small>(" .. note .. ")</small>") end

secondi = tonumber(args["Secondi" .. i]) or 0

if durata then

end

table.insert(row_elements, " – ")

local durata = minuti * 60 + secondi

table.insert(row_elements, durata)

if durata > 0 then

end

table.insert(row_elements, " – ")

local AutoreTesto = args["Autore testo" .. i]

table.insert(row_elements, string.format("%d:%02.f", minuti, secondi))

local AutoreMusica = args["Autore musica" .. i]

end

local AutoreTestoAutoreTestoeMusica = args["Autore testo e musica" .. i] or ""

local AutoreMusicaedizioni = args["Autore musicaEdizioni" .. i] or ""

local no_autore = false

local AutoreTestoeMusica = args["Autore testo e musica" .. i] or ""

if AutoreTestoeMusica then

local edizioni = args["Edizioni" .. i] or ""

table.insert(row_elements, " <small>(" .. AutoreTestoeMusica )

local no_autore = false

elseif AutoreTesto then

if AutoreTestoeMusica ~= "" then

table.insert(row_elements, " <small>(testo: " .. AutoreTestoeMusica AutoreTesto)

if AutoreMusica then

elseif AutoreTesto ~= "" then

table.insert(row_elements, " <small>(– musica: " .. AutoreMusica)

end

if AutoreMusica ~= "" then

elseif AutoreMusica then

table.insert(row_elements, AutoreTesto .. " – " .. AutoreMusica)

table.insert(row_elements, " <small>(musica: " .. AutoreMusica)

else

else

table.insert(row_elements, AutoreTesto)

no_autore = true

end

end

elseif AutoreMusica ~= "" then

if edizioni then

table.insert(row_elements, " <small>(" .. AutoreMusica)

if no_autore then

else

table.insert(row_elements, " <small>(")

no_autore = true

else

end

table.insert(row_elements, "; ")

if edizioni ~= "" then

end

if no_autore then

table.insert(row_elements, "edizioni musicali " .. edizioni .. ")</small>")

table.insert(row_elements, " <small>(")

elseif not no_autore then

else

table.insert(row_elements, ";)</small>")

end

end

local extra = args["Extra" .. i]

table.insert(row_elements, "edizioni musicali " .. edizioni .. ")</small>")

if extra then table.insert(row_elements, " – " .. extra) end

elseif not no_autore then

table.insert(row_elements, ")</smallli>\n")

local ListaMedley = args["ListaMedley" .. i]

end

if ListaMedley then table.insert(row_elements, '<div style="padding: 0.3em 0px 0.5em 2.5em;">\n' .. ListaMedley .. '</div>') end

local extra = args["Extra" .. i] or ""

if extra ~= "" then return table.insertconcat(row_elements), " – " .. extra) enddurata

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

--[[

local function componi_tracce(args, primo_titolo)

Riceve una tabella di parametri e restituisce una stringa contenente

-- compone testata

l'output da inserire nella voce

local tracks = {}

]]--

local testata = ""

local function componi_tracce(args)

local noautore = false

-- array per accumulare le righe della lista man mano che vengono elaborate

local autoreTestoeMusica = args["Autore testi e musiche"] or ""

local tracks = {}

if autoreTestoeMusica ~= "" then

-- compone la testata dell'elenco tracce

testata = "Testi e musiche di " .. autoreTestoeMusica

local testata = ""

else

local no_autore = false

autoreTesti = args["Autore testi"] or ""

local autoreMusicheautoreTestoeMusica = args["Autore testi e musiche"] or ""

if autoreTesti ~= ""autoreTestoeMusica then

testata = "Testi e musiche di " .. autoreTestiautoreTestoeMusica

else

if autoreMusiche ~= "" then testata = testata .. ", musiche di " .. autoreMusiche end

local elseifautoreTesti, autoreMusiche ~= args["Autore testi"], thenargs["Autore musiche"]

if autoreTesti then

testata = "Musiche di " .. autoreMusiche

testata = "Testi di " .. autoreTesti

else

if autoreMusiche then testata = testata .. ", musiche di " .. autoreMusiche end

noAutore = true

elseif autoreMusiche then

end

testata = "Musiche di " .. autoreMusiche

end

else

local edizioni = args["Edizioni"] or ""

no_autore = true

if edizioni ~= "" then

end

if noAutore then

end

testata = "Edizioni musicali " .. edizioni .."."

local edizioni = args["Edizioni"]

else

if edizioni then

testata = testata .. "; edizioni musicali " .. edizioni .. "."

if no_autore then

end

testata = "Edizioni musicali " .. edizioni .."."

elseif not noAutore then

else

testata = testata .. "."

testata = testata .. "; edizioni musicali " .. edizioni .. "."

end

end

table.insert(tracks, testata)

elseif not no_autore then

-- compone la lista dei parametri

testata = testata .. "."

local i = primo_titolo

end

table.insert(tracks, "<ol>")

table.insert(tracks, testata)

local visualizza_durata = args["Visualizza durata totale"] or ""

-- compone la lista dei parametri

local durata = 0

table.insert(tracks, "<ol>")

local somma_durata = false

if local visualizza_durata == args["si"Visualizza thendurata somma_durata = true endtotale"]

local durata = 0

--estrae le tracce dai parametri e inserisci i valori nella tabella tracks

local somma_durata = false

while true do

if visualizza_durata == "si" or visualizza_durata == "sì" then somma_durata = true end

local new_track, durata_track = track(args, i)

local nums = {}

if new_track==nil then break end

local validated_nums = {}

table.insert(tracks, new_track)

for k, v in pairs(args) do

if somma_durata then durata = durata + durata_track end

local prefix, num = string.match(k, '^(%D+)([0-9]+)$')

i = i + 1

if num and (num == '0' or num:sub(1,1) ~= '0') then

end

-- se il numero viene modificato da tonumber, è troppo alto

table.insert(tracks, "</ol>")

num = tonumber(num)

if somma_durata then

if not args['Titolo' .. num] then

table.insert(tracks, "Durata totale: " .. string.format("%d:%02.f", math.floor(durata/60) , durata % 60) .. "</p>")

categories[#categories+1] = missing_title

end

end

return table.concat(tracks, "\n")

if args[prefix .. num] and not validated_nums[num] then

validated_nums[num] = true

table.insert(nums, num)

end

end

end

table.sort(nums)

if #nums == 0 then

categories[#categories+1] = missing_title

-- 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

local p = {}

--[[

Funzione di interfaccia con template:Tracce

Legge i parametri e li inserisce nella tabella args, che quindi passa a componi_tracce

per l'elaborazione

]]--

function p.tracce(frame)

-- ottiene i parametri del template originale

local pframe = frame:getParent()

-- estrae tutti i parametri e li memorizza in una tabella (pframe ritorna una pseudotabella, vedi documentazione)

local args = {}

for k, v in pairs(pframe.args) do

local primo_titolo

if v ~= nil and v ~= '' then

local inizio, fine, numero_titolo

args[k] = v

for k, v in pairs( pframe.args ) do

end

args[k] = v

end

inizio, fine = string.find(k, "Titolo", 1, true)

return componi_tracce(args)

if fine ~= nil then

numero_titolo = tonumber(string.sub(k, fine+1))

if numero_titolo ~= nil and (not primo_titolo or numero_titolo < primo_titolo) then

primo_titolo = numero_titolo

end

end

end

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_lengttotal_length'] = 'Visualizza durata totale'

}

-- Tavola di conversione per i parametri di en:template:Track_listing indicizzati

local conversion_table_index ={

['title'] = 'Titolo',

['note'] = 'Note',

['titlemusic'] = 'TitoloAutore musica',

['musicwriter'] = 'Autore testo e musica',

['writerlyrics'] = 'Autore musicatesto',

['lyricslength'] = 'Autore testoDurata',

['lenghtextra'] = 'DurataExtra',

['extra'] = 'Extra'

}

--[[

Funzione di interfaccia con template:Track_listing

Legge i parametri, li converte nei parametri corrispondenti del template:Tracce

e li inserisce nella tabella args, che quindi passa a componi_tracce

per l'elaborazione

]]--

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

if v ~= nil and v ~= '' then

if conversion_table[k] then -- Controlla se è un parametro non indicizzato

if conversion_table[k] then

args[ conversion_table[k]] = v

else

-- estrae nome base e indice, se k=title1 allora prefix=title e num=1

local base_keyprefix, posnum = string.match(k, "^(%D+)(%d+)$")

if prefix and conversion_table_index[prefix] then -- controlla se è un parametro indicizzato

if pos and base_key and conversion_table_index[base_key] then

args[conversion_table_index[base_keyprefix] .. posnum] = v

elseif not num then -- non è neanche un parametro indicizzato, lo copia così com'è

if base_key == 'title' and (not primo_titolo or pos < primo_titolo) then

args[k] = v

primo_titolo = pos

end

end

end

end

end

end

if args['Visualizza durata totale'] then args['Visualizza durata totale'] = 'si' end

return componi_tracce(args) -- table.concat(log, '\n*') --

if primo_titolo then

return componi_tracce(args, primo_titolo) -- table.concat(log, '\n*') --

else

return

end

end