Module:Bandeau
Révision datée du 28 mai 2013 à 14:09 par Tejgad (discussion) (Fonction ébauche : annulation, test non fonctionnel)
La documentation pour ce module peut être créée à Module:Bandeau/doc
-- Module dédié à la création de bandeaux en tous genres
local fun = {}
function fun.metaBandeauAvertissement(frame)
local pframe = frame:getParent()
local arguments = pframe.args
return fun.do_metaBandeauAvertissement(arguments)
end
-- Squelette d'un bandeau d'avertissement
function fun.do_metaBandeauAvertissement(arguments)
local result = ""
local niveau = arguments.niveau or ""
local bClass = mw.ustring.gsub(niveau,"é","e")
local icone = ""
local texte = ""
-- Icônes prédéfinies
local iconeTable = {
grave = "Fairytale no.svg",
["modéré"] = "Emblem-important.svg",
information = "Information_icon.svg",
["ébauche"] = "Nuvola_apps_kedit.svg"
}
-- Utiliser l'icône fournie s'il y a lieu, ou prendre parmi celles de la table
if(arguments["icône-complexe"] ~= nil and arguments["icône-complexe"] ~= "") then
icone = arguments["icône-complexe"]
else
icone = "<div style=\"width:45px; text-align:center\">[[Fichier:" .. (arguments["icône"] or iconeTable[arguments.niveau] or "Icon apps query.svg") .. "|45x35px|alt=|link=]]</div>"
end
-- Texte du bandeau
if(arguments.texte ~= nil) then
texte = "<div class=\"bandeau-texte\">" .. arguments.texte .. "</div>"
end
-- Mise en boîte
result = "<div " .. (arguments.id or "") .. "class=\"plainlinks bandeau-niveau-" .. bClass .. " bandeau js-no-interprojets\"><table style=\"background-color:transparent\"><tr><td class=\"bandeau-icone\">" .. icone .. "</td><td><div class=\"bandeau-titre\"><strong>" .. (arguments.titre or "Pas de titre") .. "</strong>" .. (arguments.date or "") .. "</div>" .. texte .. "</td></tr></table>" .. (arguments["supplément"] or "") .. "</div>"
return result
end
function fun.ebauche(frame)
local pframe = frame:getParent()
local arguments = pframe.args
return fun.do_ebauche(arguments)
end
function fun.do_ebauche(arguments)
-- Données relatives aux différents paramètres possibles du modèle
-- Seront déplacées en sous-page dès que loadData sera activé
-- local data = mw.loadData("Module:Bandeau/ébauche")
local data = {
football = {"Soccer.svg", "le [[football]]"},
footballeur = {"football", "un [[Portail:Football|footballeur]]"},
["hip hop"] = {"redirection", "hip-hop"},
["hip-hop"] = {"BandeauPortailHipHopSmall-fr.svg", "le [[Portail:Hip-hop|hip-hop]]"},
histoire = {"Pierre_Mignard_001.jpg", "l’[[histoire]]"},
Italie = {"Italy looking like the flag.svg", "l’[[Portail:Italie|Italie]]"},
jardinage = {"Extracted pink rose.png", "le [[jardinage]] et l’[[horticulture]]"},
lac = {"Icon river reservoir.svg", "un [[lac]]"},
lapin = {"Lapin01.svg", "la [[cuniculture]]", "Cuniculture"}
}
local index = 1
local inconnu = {false, ""}
local newTheme = 0
local nomTheme = arguments[1]
local icones = {}
local sujets = {}
local categories = {}
-- Récupération des données sur tous les thèmes
while(arguments[index] ~= nil) do
-- Récupération des données relatives au thème
theme = data[nomTheme]
if(theme ~= nil) then
if(theme[1] == "alias" or theme[1] == "redirection") then
-- Cas de redirection
newTheme = newTheme + 1
nomTheme = theme[2]
else
-- Cas normal
newTheme = 0
-- Gestion de l'icône
if(theme[1] ~= nil) then
local cibleIcone = data[theme[1]]
-- Le nom de l'icône est-il une référence directe à un autre thème ?
if(cibleIcone == nil or cibleIcone[1] == "alias" or cibleIcone[1] == "redirection") then
-- Non : on récupère le nom du fichier
icones[#icones+1] = theme[1]
else
-- Oui : on récupère l'icône de l'autre thème
icones[#icones+1] = cibleIcone[1]
end
end
-- Gestion du sujet
if(theme[2] ~= nil) then
sujets[#sujets+1] = theme[2]
end
-- Gestion de la catégorie
if(theme[3] ~= nil) then
categories[#categories+1] = theme[3]
else
-- Par défaut, la catégorie correspond au thème
categories[#categories+1] = nomTheme
end
end
else
-- Thème inconnu : on le mémorise et on passe au suivant
newTheme = 0
inconnu[1] = true
inconnu[2] = inconnu[2] .. arguments[index] .. " "
end
-- Passage éventuel au thème suivant
if(newTheme > 2) then
-- Prévention des boucles infinies
newTheme = 0
end
if(newTheme == 0) then
-- Nouveau thème (non issu d'une redirection)
index = index + 1
nomTheme = arguments[index]
end
end
-- Génération du bandeau
local multiIcone = ""
local taille = "45x35px"
-- Réduire les icônes si elles sont trop nombreuses
if(#icones > 3) then
taille = "35x25px"
end
if(#icones > 0) then
for i = 1, #icones do
multiIcone = multiIcone .. "[[Image:" .. icones[i] .. "|" .. taille .. "|alt=|link=]]"
-- Passage sur la deuxième ligne
if(#icones > 3 and i == math.floor((#icones+1)/2)) then
multiIcone = multiIcone .. "</span><br /><span style=\"white-space:nowrap;word-spacing:5px\">"
elseif(i ~= #icones) then
multiIcone = multiIcone .. " "
end
end
multiIcone = "<div style=\"text-align:center;white-space:nowrap\"><span style=\"white-space:nowrap;word-spacing:5px\">" .. multiIcone .. "</span></div>"
end
-- Texte du bandeau, contenant les sujets
local texteSuj = "Cet article est une [[Aide:Ébauche|ébauche]]"
if(#sujets > 0) then
texteSuj = texteSuj .. " concernant "
for i = 1, #sujets do
texteSuj = texteSuj .. sujets[i]
if(i < #sujets-1) then
texteSuj = texteSuj .. ", "
elseif(i == #sujets-1) then
texteSuj = texteSuj .. " et "
end
end
end
texteSuj = texteSuj .. ".\n"
local texteCat = ""
-- Ne pas catégoriser si nocat est présent
if(arguments.nocat == nil) then
if(#categories > 0) then
for i = 1, #categories do
texteCat = texteCat .. "[[Catégorie:Wikipédia:ébauche " .. categories[i] .. "]]\n"
end
else
texteCat = "[[Catégorie:Wikipédia:ébauche]]\n"
end
end
-- Préparation de l'appel du modèle de méta-bandeau
local metaArgs = {
niveau = "ébauche",
["icône-complexe"] = multiIcone,
titre = texteSuj
}
return fun.do_metaBandeauAvertissement(metaArgs) .. "\n" .. texteCat
end
return fun
