Modulo:Listing
Istruzioni per l'usoQuesto è un modulo scritto in Lua. Le istruzioni che seguono sono contenute nella sottopagina Modulo:Listing/man (modifica · cronologia)
Sandbox: Modulo:Listing/sandbox (modifica · cronologia) · Test: Modulo:Listing/test (modifica · cronologia · Esegui)
Vedi anche
--[[
Source script: https://it.wikivoyage.org/wiki/Modulo:Listing
Maintainer: Andyrom75
Lazy loads:
require('Modulo:IsLatin').IsLatinValue
require('Modulo:EmailTracking').EmailTrackingValue
require('Modulo:Wikibase').label
require('Modulo:WikidataIB').getSiteLink
]]
local Marker = require('Modulo:Marker').MarkerModule
local LinkModule = require('Modulo:LinkPhone')
local function _templateStyle( frame, src )
return frame:extensionTag( 'templatestyles', '', { src = src } )
end
local function _isDefined(s)
return s ~= '' and s
end
function _hiddenUnicode( value )
-- Note the quote ("") below is not empty and actually contains a hidden unicode character.
return mw.ustring.match(value or '',"") and '[[Categoria:Listing con caratteri unicode nascosti]]<span class="unicodeinfo debuginfo" style="display:none;">UNICODE</span>' or ''
end
function _phone( phone )
return '<abbr title="telefono" style="text-decoration:none">☎</abbr> <span class="tel listing-phone">'.. LinkModule.LinkPhone{ args={phone} } .. '</span>'
end
function _email( mail )
return '<span class="email listing-email">' .. LinkModule.LinkEmail{ args={mail} } .. '</span>' .. require('Modulo:EmailTracking').EmailTrackingValue(mail)
end
function _concatIndexed( tab )
local tt = {}
for _, v in pairs( tab ) do
tt[#tt+1] = v
end
return table.concat( tt )
end
function _validateParams( params )
local validParams = {
counter = true,
tipo = true,
nome = true,
alt = true,
sito = true,
email = true,
indirizzo = true,
lat = true,
long = true,
indicazioni = true,
tel = true,
['numero verde'] = true,
fax = true,
orari = true,
checkin = true,
checkout = true,
prezzo = true,
descrizione = true,
wikipedia = true,
immagine = true,
wikidata = true
}
local invalidParams = ''
for key, _ in pairs( params ) do
if not validParams[key] then
invalidParams = invalidParams .. '<b>' .. key ..'</b>; '
end
end
return _isDefined(invalidParams) and ('[[Categoria:Listing con errori di compilazione]]<span class="debuginfo" style="display:none;">Sono presenti parametri non gestiti: '.. invalidParams .. '</span>') or ''
end
local function _Listing(frame)
local args = frame.args
local output = '<bdi class="vcard">'
--Marker creation
local MarkerArgs = {
counter = args.counter or args.tipo or 'listing',
tipo = args.tipo or 'listing',
nome = args.nome,
lat = args.lat,
long = args.long,
immagine = args.immagine,
sito = args.sito,
islisting = 'yes',
wikidata = args.wikidata
}
output = output .. Marker{ args = MarkerArgs }
--Alt
if _isDefined( args.alt ) then
output = output .. ' (<span class="nickname listing-alt ' .. (require('Modulo:IsLatin').IsLatinValue(args.alt) == 'sì' and 'IsLatin' or '') .. '">' .. args.alt .. '</span>)'
end
--Indirizzo
local anyPrevData = args.nome or args.sito
if _isDefined( args.indirizzo ) then
output = output .. (anyPrevData and ',' or '') .. ' <span class="adr listing-address street-address">' .. args.indirizzo .. '</span>'
anyPrevData = true
end
--indicazioni
if _isDefined( args.indicazioni ) then
output = output .. ' (<span class="adr listing-directions">' .. args.indicazioni .. ')</span>'
anyPrevData = true
end
--Telefono
if _isDefined( args.tel ) then
output = output .. (anyPrevData and ', ' or ' ') .. _phone(args.tel)
anyPrevData = true
end
--Numero Verde
if _isDefined( args['numero verde'] ) then
output = output .. (anyPrevData and ',' or '')
.. ' <abbr title="numero verde" class="green">☎</abbr> <span class="tel listing-tollfree">'
.. LinkModule.LinkPhone{ args={args['numero verde'], tollfree='yes'} }
.. '</span>'
anyPrevData = true
end
--Fax
if _isDefined( args.fax ) then
output = output .. (anyPrevData and ',' or '')
.. ' <span class="tel"><span class="type">fax</span>: <span class="value listing-fax">'
.. LinkModule.LinkPhone{ args={args.fax, fax='true'} }
.. '</span></span>'
anyPrevData = true
end
--E-mail
if _isDefined( args.email ) then
output = output .. (anyPrevData and ', ' or ' ') .. _email(args.email)
end
--Se sono state inserite informazioni nei campi precedenti, forzo un punto di fine periodo
output = output .. (anyPrevData and '.' or '')
--Prezzo
if _isDefined( args.prezzo ) then
output = output .. ' <abbr title="prezzo">[[File:Ecb copyright.svg|13px|link=]]</abbr> <span class="note listing-price">'
.. args.prezzo .. '</span>.'
end
--Orari
if _isDefined( args.orari ) then
output = output .. ' <abbr title="orari">[[File:Simple icon time.svg|15px|link=]]</abbr> <span class="note listing-hours">'
.. args.orari .. '</span>.'
end
--Check-in e checkout
if _isDefined( args.checkin ) then
output = output .. ' <span class="note">Check-in: <span class="listing-checkin">' .. args.checkin .. '</span>'
if _isDefined( args.checkout ) then
output = output .. ', check-out: <span class="listing-checkout">' .. args.checkout .. '</span>'
end
output = output .. '</span>.'
else
if _isDefined( args.checkout ) then
output = output .. ' <span class="note">Check-out: <span class="listing-checkout">' .. args.checkout .. '</span></span>.'
end
end
--Descrizione generale del listing in oggetto
args.descrizione = _isDefined( args.descrizione ) or _isDefined( args[1] )
if args.descrizione then
--Sostituisco temporaneamente gli stili dei template utilizzati all'interno delle descrizioni per il loro contenuto può compromettere la succeessiva elaborazione
local styles = {}
local style = ''
local patterns = {'(style=".-")', "(style='.-')"}
for i=1, #patterns do
local pos = mw.ustring.find(args.descrizione, patterns[i])
while pos do
style = mw.ustring.gsub(args.descrizione, '.-'..patterns[i]..'.*', '%1')
styles[#styles+1] = style
args.descrizione = mw.ustring.sub( args.descrizione, 1, pos-1 ) .. "<<§@§>>" .. mw.ustring.sub( args.descrizione, pos+#style)
pos = mw.ustring.find(args.descrizione, patterns[i])
end
end
local level1 = not mw.ustring.find(args.descrizione, '\n[\*#][\*#]') and not mw.ustring.find(args.descrizione, '\n:+[\*#:][\*#]')
if mw.ustring.find(mw.ustring.sub(args.descrizione,1,1), '[:;\*#]') then
-- se la descrizione inizia con un carattere speciale, lo mando a capo affiché venga correttamente gestito dal wiki-interprete
args.descrizione = '\n' .. args.descrizione
end
-- limito le dispendiose gsub ai casi di descrizioni con righe-multiple
-- inoltre, per le attuali limitazioni, evito di elaborare le descrizioni contenenti liste HTML a più livelli
if mw.ustring.find(args.descrizione, '\n') and level1 then
-- gestisco i casi più comuni di ";" sebbene ricreare l'esatto rendering del wiki-testo è praticamente impossibile
if mw.ustring.find(args.descrizione, ';') then
args.descrizione = mw.ustring.gsub(args.descrizione, "(\n:*);(:*[\*#])", "%1:%2")
args.descrizione = mw.ustring.gsub(args.descrizione, "(\n):*;", "%1<<§>>")
args.descrizione = mw.ustring.gsub(args.descrizione, "(\n:*([\*#][:;]*));", "%1<<§>>")
args.descrizione = mw.ustring.gsub(args.descrizione, "<<§>>(.-)\n", "<dl><dt>%1</dt></dl>\n")
args.descrizione = mw.ustring.gsub(args.descrizione, "<<§>>(.-)$", "<dl><dt>%1</dt></dl>")
end
local isUnorderedList = mw.ustring.find(args.descrizione, '\n:* *\*') or mw.ustring.find(args.descrizione, '^:* *\*')
local isOrderedList = mw.ustring.find(args.descrizione, '\n:* *\#') or mw.ustring.find(args.descrizione, '^:* *\#')
-- per attuali limitazioni elaboro solo descrizioni contenenti un unico tipo di liste
if (isUnorderedList and not isOrderedList) or (isOrderedList and not isUnorderedList) then
--contrassegno l'inizio di ogni item con un simbolo potenzialmente univoco
args.descrizione = mw.ustring.gsub(args.descrizione, "\n:? *[\*#]", "\n<<§>>")
args.descrizione = mw.ustring.gsub(args.descrizione, "<<§>>(.-)\n", "<li>%1</li>\n")
args.descrizione = mw.ustring.gsub(args.descrizione, "<<§>>(.-)$", "<li>%1</li>")
args.descrizione = mw.ustring.gsub(args.descrizione, "</li>\n*:*<li>", "</li><li>")
if isUnorderedList then
args.descrizione = mw.ustring.gsub(args.descrizione, "(<li>.-</li>\n)", "<ul>%1</ul>\n")
args.descrizione = mw.ustring.gsub(args.descrizione, "(<li>.*</li>)$", "<ul>%1</ul>")
args.descrizione = mw.ustring.gsub(args.descrizione, "</ul>\n:", "</ul>")
elseif isOrderedList then
args.descrizione = mw.ustring.gsub(args.descrizione, "(<li>.-</li>\n)", "<ol>%1</ol>\n")
args.descrizione = mw.ustring.gsub(args.descrizione, "(<li>.*</li>)$", "<ol>%1</ol>")
args.descrizione = mw.ustring.gsub(args.descrizione, "</ol>\n:", "</ol>")
end
end
-- per attuali limitazioni evito di elaborare descrizioni contenenti sia liste ordinate che non ordinate
if not (isUnorderedList and isOrderedList) then
args.descrizione = mw.ustring.gsub(args.descrizione, "\n:+", "<br />")
args.descrizione = mw.ustring.gsub(args.descrizione, "\n\n", "<br />")
args.descrizione = mw.ustring.gsub(args.descrizione, "\n([^\n]+)", "%1")
end
end
--ripristino gli stili rimossi
for i=1, #styles do
args.descrizione = mw.ustring.gsub(args.descrizione , '<<§@§>>', styles[i], 1)
end
output = output .. ' <bdi class="note listing-content">' .. args.descrizione .. '</bdi>'
end
local metadata = ''
--Sister project icons
args.wikipedia = _isDefined( args.wikipedia )
args.wikidata = _isDefined( args.wikidata )
if args.wikipedia or args.wikidata then
metadata = metadata .. '<span class="listing-sister-icons">'
local wpLink = _isDefined( args.wikipedia )
if args.wikidata then
--in presenza dell'istanza wikidata, recupero i dati relativi alle versioni italiane di Wikivoyage e Wikipedia
local WIB_wikivoyage = _isDefined( require('Modulo:WikidataIB').getSiteLink{args={wiki='itwikivoyage', qid=args.wikidata}} )
if WIB_wikivoyage then
metadata = metadata .. ' [[File:Wikivoyage-logo.svg|15px|class=listing-sister|link=' .. WIB_wikivoyage .. '|<span>' .. WIB_wikivoyage .. '</span> quì su Wikivoyage]]'
end
wpLink = wpLink or _isDefined( require('Modulo:WikidataIB').getSiteLink{args={wiki='itwiki', qid=args.wikidata}} )
end
if args.wikipedia ~= 'NA' and wpLink then
metadata = metadata .. ' [[File:Wikipedia-icon.png|15px|class=listing-sister|link=w:' .. wpLink .. '|<span>' .. wpLink .. '</span> su Wikipedia]]'
end
if args.wikidata then
metadata = metadata .. ' [[File:Wikidata-logo.svg|16px|class=listing-sister|link=d:' .. args.wikidata
..'|' .. (require('Modulo:Wikibase').label{args={args.wikidata}} or '') .. ' ('.. args.wikidata .. ') su Wikidata]]'
end
metadata = metadata .. '</span>'
end
--Metadata - last edit date, "edit" link, etc
args.lastedit = _isDefined( args.lastedit )
metadata = metadata .. '<span class="listing-metadata">'
if args.lastedit then
metadata = metadata .. ' (<span class="listing-metadata-items"><span class="listing-lastedit">Aggiornamento: ' .. mw.getContentLanguage():formatDate( 'M Y', args.lastedit ) .. '</span></span>|)'
else
metadata = metadata .. '<span class="listing-metadata-items"> </span>'
end
metadata = metadata .. '</span>'
--[[
local match = 0
output, match = mw.ustring.gsub( output, "(</..></[uod]l></bdi>)$", metadata .. "%1")
if match == 0 then
output = output .. metadata
end
]]
output, match = mw.ustring.gsub( output, "(</dt></dl></li></[uo]l></bdi>)$", metadata .. "%1")
if match == 0 then
output, match = mw.ustring.gsub( output, "(</..></[uod]l></bdi>)$", metadata .. "%1")
if match == 0 then
output = output .. metadata
end
end
output = output .. '</bdi>'
--Controllo la presenza di caratteri Unicode all'interno dei parametri forniti in input
--A seguire controllo anche la presenza di parametri non gestiti da questo template
output = output .. _hiddenUnicode( _concatIndexed( args ) ) .. _validateParams( args )
if args.wikipedia and not args.wikidata then
--Non è considerato un errore se il parametro Wikipedia è usato per puntare a una specifica sezione
output = output .. (mw.ustring.find(args.wikipedia, '#') == 0 and '[[Categoria:Listing con link a Wikipedia ma non a Wikidata]]' or '')
end
return _templateStyle( frame, 'Listing/styles.css' ) .. output
end
local p = {}
function p.ListingTemplate(frame)
return _Listing(frame:getParent())
end
function p.ListingInvoke(frame)
return _Listing(frame)
end
function p.ListingModule(frame)
local Cframe = mw.getCurrentFrame()
Cframe.args = frame.args
return _Listing(Cframe)
end
return p