Modulo:Navbox: differenze tra le versioni

Versione delle 20:01, 20 mar 2018

Versione delle 20:24, 20 mar 2018

Riga 1:

--[[

* Modulo perche implementareimplementa le funzionalità deii template Navbox e Navbox_subgroup.

]]--

* Costruisce un template di navigazione basato su una table HTML.

]]

require('Modulo:No globals')

local getArgs = require('Modulo:Arguments').getArgs

-- Numero massimo di liste e gruppi per i template Navbox e Navbox_subgroup

local MAX_LIST_NAVBOX = 30

local MAX_LIST_NAVBOX_SUBGROUP = 20

-- =============================================================================

-- Configurazione

-- Funzioni di utilità

local cfg = mw.loadData('Modulo:Navbox/Configurazione')

-- =============================================================================

-- Restituisce una sequence Lua ordinata contenente gli ID dei listN presenti.

-------------------------------------------------------------------------------

-- Funzioni di utilità

-------------------------------------------------------------------------------

-- Ritorna true se il nome dell'argomento è valido

local function isValidArg(name, validArgs, maxList)

local ret = validArgs[name] ~= nil

if not ret then

local id = name:match('^list(%d+)$') or name:match('^group(%d+)$') or

name:match('^list(%d+)style$') or name:match('^group(%d+)style$')

if id then

ret = tonumber(id) <= maxList

end

end

return ret

end

-- Ritorna gli argomenti passati al modulo, scartando quelli senza nome,

-- quelli contenenti stringhe vuote e i non riconosciuti.

local function parseArgs(args, isSubgroup)

local ret = {}

local validArgs = isSubgroup and cfg.subgroupArgs or cfg.navboxArgs

local maxList = isSubgroup and cfg.subgroupMaxList or cfg.navboxMaxList

for k, v in pairs(args) do

if type(k) == 'string' and v ~= '' and isValidArg(k, validArgs, maxList) then

ret[k] = v

end

end

return ret

end

-- Ritorna una sequence contenente gli ID dei listN presenti, ordinata e senza duplicati.

-- Se withGroup è true, controlla anche i groupN.

--

-- @param {table} args

-- @param {boolean} withGroup

-- @return {table}

local function getIds(args, withGroup)

local ret, ids = {}, {}

for key, _ in pairs(args) do

local ret = {}

if type(key) == 'string' then

local id = key:match('^list(%d+)$') or (withGroup and key:match('^group(%d+)$'))

-- siccome Lua ha solo le table e non i set (elementi unici), prima popola ids usando le chiavi

if id and tonumber(id) <= (withGroup and MAX_LIST_NAVBOX or MAX_LIST_NAVBOX_SUBGROUP) then

for k, _ in pairs(args) do

ids[tonumber(id)] = true

local id = k:match('^list(%d+)$') or (withGroup and k:match('^group(%d+)$'))

end

if id then

ids[tonumber(id)] = 1

end

end

for key, _ in pairs(ids) do

table.insert(ret, key)

-- quindi ritorna una sequence fatta delle chiavi della table ids

for k, _ in pairs(ids) do

table.insert(ret, k)

end

table.sort(ret)

return ret

end

-- ToglieRimuove eventuali spazi/a capo dannosi attorno ai {{,}}.

--

-- @param {string} list

-- @return {string}

local function trimSep(list)

local sep = mw.getCurrentFrame():expandTemplate{ title = "," }

local sepEsc = mw.ustring.gsub(sep, '-', '%-')

return mw.ustring.gsub(list, '%s*' .. sepEsc .. '%s*', sep)

Line 78 ⟶ 49:

-- Con il debug ridefinisce il metodo mw.html:css,

-- permettendo di eseguire i test senza controllare anche i css.

--

-- @param {table} tableNode

local function disableCSS(tableNode)

local mt = getmetatable(tableNode)

Line 83 ⟶ 56:

end

-- =============================================================================

-------------------------------------------------------------------------------

-- classe Classe Navbox

-- =============================================================================

-------------------------------------------------------------------------------

local Navbox = {}

-- Costruttore della classe Navbox.

--

-- @param {table} args - gli argomenti passati al modulo

-- @return {table} un nuovo oggetto Navbox

function Navbox:new(args)

local self = {}

Line 101 ⟶ 78:

setmetatable(self, { __index = Navbox })

self.args = args

-- costruzione tabletabella HTML

self.tableNode = mw.html.create('table')

if self.args.debug then

Line 107 ⟶ 84:

end

self:_setupTableNode()

-- prima rowriga: contiene la navbar e il titolo

thNode = self.tableNode:tag('tr')

:tag('th')

Line 119 ⟶ 96:

self:_addTitle(thNode)

end

-- eventuale rowriga per l'above

if self.args.above then

self:_addAboveOrBelow(self.args.above, self.args.abovestyle)

end

-- altre rowrighe

self:_addLists()

-- eventuale rowriga finale per il below

if self.args.below then

self:_addAboveOrBelow(self.args.below, self.args.belowstyle)

Line 133 ⟶ 110:

end

-- Restituisce la tabella HTML.

--

-- @return {string}

function Navbox:getHTML()

return tostring(self.tableNode)

end

-- Configura gli stili CSS della tabella

function Navbox:_setupTableNode()

local tableStyle = {

Line 159 ⟶ 140:

end

-- Aggiunge il Tnavbar (collegamenti alla pagina del template, di discussione e modifica).

--

-- @param {table} node

function Navbox:_addTnavbar(node)

local divStyle = {

Line 177 ⟶ 161:

end

-- Imposta il titolo del navbox dal parametro "title".

--

-- @param {table} node

function Navbox:_addTitle(node)

node:tag('span'):css('font-size', '110%'):wikitext(self.args.title)

end

-- Aggiunge la riga per i parametri "above" e "below".

--

-- @param {string} arg

-- @param {string} argStyle

function Navbox:_addAboveOrBelow(arg, argStyle)

local tdStyle = {

Line 196 ⟶ 187:

end

-- Aggiunge una colonna per l'immagine.

--

-- @param {table} trNode

-- @param {number} rowspan

function Navbox:_addImage(trNode, rowspan)

local tdStyle = {

Line 210 ⟶ 205:

end

-- Aggiunge una nuova riga per ogni groupN/listN

function Navbox:_addLists()

local rowIds, altStyle, altBackground

Line 258 ⟶ 254:

end

-- =============================================================================

-------------------------------------------------------------------------------

-- classe Classe NavboxSubgroup

-- =============================================================================

-------------------------------------------------------------------------------

local NavboxSubgroup = {}

-- Costruttore della classe NavboxSubgroup.

--

-- @param {table} args - gli argomenti passati al modulo

-- @return {table} un nuovo oggetto NavboxSubgroup

function NavboxSubgroup:new(args)

local self = {}

Riga 269:

setmetatable(self, { __index = NavboxSubgroup })

self.args = args

-- costruzione tabletabella HTML

self.tableNode = mw.html.create('table')

if self.args.debug then

Riga 280:

end

-- Restituisce la tabella HTML.

--

-- @return {string}

function NavboxSubgroup:getHTML()

return tostring(self.tableNode)

end

-- Configura gli stili CSS della tabella.

function NavboxSubgroup:_setupTableNode()

local tableStyle = {

Line 300 ⟶ 304:

end

-- Aggiunge una nuova riga per ogni groupN/listN.

function NavboxSubgroup:_addLists()

local listIds, altStyle

Line 332 ⟶ 337:

end

-- =============================================================================

-------------------------------------------------------------------------------

-- Funzioni APIesportate

-- =============================================================================

-------------------------------------------------------------------------------

local p = {}

-- Funzione per l'utilizzo da un altro modulo.

function p._navbox(args)

return Navbox:new(parseArgs(args)):getHTML()

end

-- Funzione per l'utilizzo da un altro modulo.

function p._navbox_subgroup(args)

return NavboxSubgroup:new(parseArgs(args, true)):getHTML()

end

-- Entry-pointFunzione per il template {{Navbox}}.

function p.navbox(frame)

return p._navbox(getArgs(frame, {wrappers parentOnly = 'Template:Navbox'true }))

end

-- Entry-pointFunzione per il template {{Navbox subgroup}}.

function p.navbox_subgroup(frame)

return p._navbox_subgroup(getArgs(frame, {wrappers parentOnly = 'Template:Navboxtrue subgroup'}))

end