Module:Bandeau - Historique des versions

Arthur : 1 révision importée

2016-01-27T20:13:57Z

1 révision importée

Nouvelle page

--Ce module implémente les modèles de bandeau.

--Standardisation des bandeaux ([[Catégorie:Modèle de bandeau]]).
--Créer une fonction exportable pour le modèle {{Bandeau}} (ns:all).
--Créer une fonction exportable pour les bandeaux d'article (ns:0).
--Créer une fonction exportable pour les bandeaux de section (ns:0).
--Créer une fonction exportable pour les bandeaux d'ébauche (ns:0).
--Créer une fonction exportable pour les bandeaux de discussion (ns:1).
--Créer une fonction exportable pour les bandeaux système (ns:8).
--Gérer les images multiples.

local p = {}

local trim = require('Module:Outils').trim
local yesno = require('Module:yesno')
local class = mw.loadData('Module:Bandeau/Class')
-- local paramEbauche = mw.loadData('Module:Bandeau/Ébauche') -- ne sera chargé que pour un bandeau d'ébauche.

local cfg = {
forme = 'bandeau-simple',
niveau = 'bandeau-niveau-neutre',
formatLien = '[[Fichier:%s|%spx|alt=%s]]',
tailleIcone = '45x45',
public = 'domaine public',
erreurArgument = 'Paramètre <code>|%s=</code> manquant',
erreurEbaucheParam = 'le thème « %s » du modèle [[Modèle:Ébauche|{{ébauche}}]] n’est pas [[Aide:Ébauche/Aide paramètres|défini]].',
erreurEbaucheType = 'le thème « %s » doit apparaître en tête de liste du modèle [[Modèle:Ébauche|{{ébauche}}]].',
ebaucheImage = '<span style="white-space:nowrap;word-spacing:5px">%s</span>',
ebaucheTitre = '%s est une [[Aide:Ébauche|ébauche]].',
ebaucheTitreSujet = '%s est une [[Aide:Ébauche|ébauche]] concernant %s.',
ebaucheCateg = '[[Catégorie:Wikipédia:ébauche %s]]',
}

local function erreur(texte, formatstring, tag)
local res = mw.html.create(tag or 'span')
res :addClass('error')
:wikitext('Erreur : ')

if formatstring then
res:wikitext(string.format(formatstring, texte))
else
res:wikitext(texte)
end

return tostring(res)
end

function p._bandeau(args)
local res = mw.html.create('div')
local cells = mw.html.create()
local icone = trim(args.image) or trim(args['icône'])
local backgroundIcone = class.icones[icone] or ''
local texte = (trim(args.texte) or erreur('texte', cfg.erreurArgument))

res :attr{ id = args.id }
:addClass(class.formes[args.forme] or cfg.forme)
:addClass(class.niveau[args.niveau] or cfg.niveau)
:addClass('plainlinks')
:addClass(args.class)
:cssText(args.style)

if yesno(args.centrer) then
cells = mw.html.create('div')
:addClass('bandeau-centrer')
end
if icone and backgroundIcone == '' then
local iconeWiki = icone
if not icone:match('%[') then
local alt = args.alt or args['légende'] or ''
if alt:lower() == cfg.public then
alt = '|link='
end
local taille = args['taille icône'] or cfg.tailleIcone
iconeWiki = mw.ustring.format(cfg.formatLien, icone, taille, alt)
end
cells
:tag('div')
:addClass('bandeau-cell bandeau-icone')
:cssText(args.styleImage) --Provisoire
:wikitext(iconeWiki)
:done()
elseif backgroundIcone ~= '' and args.forme == 'section' then
texte = '&ensp;' .. texte
end
cells
:tag('div')
:addClass('bandeau-cell ' .. backgroundIcone)
:cssText(args.styleTexte) --Provisoire
:wikitext(texte)
:newline()
:done()

res :node(cells)

if trim(args['supplément']) then
res :tag('p')
:wikitext(args['supplément'])
:done()
end

return tostring(res)
end

function p._bandeauAvertissement(args)
local htmlTexte = mw.html.create()

htmlTexte
:tag('strong')
:addClass('bandeau-titre')
:wikitext(trim(args.titre) or erreur('titre', cfg.erreurArgument))
:done()
:wikitext(args.date)
:newline():newline()
:wikitext(args.texte)

local parametres = {
forme = 'article',
niveau = args.niveau,
id = args.id,
class = args.class,
['icône'] = trim(args['icône']) or trim(args['icône-complexe']) or args.niveau,
alt = args.alt or args['légende'],
texte = tostring(htmlTexte),
['supplément'] = args['supplément']
}

return p._bandeau(parametres)
end

function p._bandeauSection(args)
local res = mw.html.create('div')
local icone = trim(args.image) or trim(args['icône'])
local backgroundIcone = class.icones[icone] or ''
local texte = '&ensp;' .. (trim(args.texte) or erreur('texte', cfg.erreurArgument))

res :addClass('bandeau-section')
:addClass(class.niveau[args.niveau] or cfg.niveau)

if icone and backgroundIcone == '' then
local iconeWiki = icone
if not icone:match('%[') then
local alt = args.alt or args['légende'] or ''
if alt:lower() == cfg.public then
alt = '|link='
end
iconeWiki = mw.ustring.format(cfg.formatLien, icone, 'text-top|20x17', alt)
end
res :wikitext(iconeWiki)
:done()
end
res :addClass(backgroundIcone)
:wikitext(texte)
:done()

return tostring(res)
end

p['_ébauche'] = function (args)
local paramEbauche = mw.loadData('Module:Bandeau/Ébauche')
local ebauches, gestionErreur = {}, {}
local frame = mw.getCurrentFrame()
local parametres = {
icone = 'icône',
sujet = 'sujet',
selon = 'selon',
categ = 'catégorie',
type = 'type',
message = 'message'
}
local getEbaucheTable = function( theme )
-- récupére les paramètres lié au theme, à partir du module:Bandeau/Ébauche ou du modèle:Ébauche/paramètres theme
local modele = 'Modèle:Ébauche/paramètres ' .. theme
local params
if paramEbauche[theme] then
params = { nom = theme }
for n, v in pairs(paramEbauche[theme]) do
params[n] = v
end
elseif mw.title.new( modele ).exists then
params = { nom = theme }
for n, v in pairs(parametres) do
local param = frame:expandTemplate{title = modele, args = {v}}
params[n] = trim(param)
end
end
return params
end
local ebaucheParam = function( i, param )
-- foction qui retourne la valeur de param pour l'ébauche i, ou une valeur par défaut.
return ebauches[i] and ebauches[i][param] or paramEbauche[''][param]
end

for i, theme in ipairs(args) do
-- récupération des paramètres de tous les thèmes
theme = trim(theme)
if theme then
local t = getEbaucheTable(theme)
if t then
table.insert(ebauches, t)
else
table.insert(
gestionErreur,
erreur(theme, cfg.erreurEbaucheParam, 'div')
)
end
end
end

local images, titres, categs = {}, {}, {}
local tailleIcone = cfg.tailleIcone
if #ebauches > 3 then
tailleIcone = '35x25'
end
for i, ebauche in ipairs(ebauches) do
-- mise en forme des images
if ebauche.icone then
table.insert(
images,
cfg.formatLien:format(
ebauche.icone,
tailleIcone,
ebauche.altIcone or ''
)
)
end
if math.fmod(#ebauches, 3) == 1 and (#ebauches - i) == 2
or math.fmod(i, 3) == 0 and (#ebauches - i) > 1
then
-- sur plusieurs lignes s'il y a plus de 3 images, avec minimum deux images sur la dernière ligne.
table.insert(images,'<br>')
end

if i > 1 and ebauche.type and ebauche.type ~= paramEbauche[''].type then
-- remplace "Cet article par "Ce portail" ou autre en fonction du premier thème.
table.insert(
gestionErreur,
erreur(ebauche.nom, cfg.erreurEbaucheType, 'div')
)
end

-- récupères les différents noms de thème
table.insert(titres, ebauche.sujet)

-- mise en forme des catégories
if ebauche.categ then
table.insert( categs, cfg.ebaucheCateg:format( ebauche.categ ) )
end
end

local image
if trim(args['icône']) then
local theme = getEbaucheTable(args['icône'])
if theme and theme.icone then
image = cfg.formatLien:format(theme.icone, tailleIcone, theme.altIcone or '')
end
elseif #images == 1 then
image = images[1]
elseif #images > 1 then
image = cfg.ebaucheImage:format(table.concat(images, ' '))
end

local titre
if #titres > 0 then
titre = cfg.ebaucheTitreSujet:format(
ebaucheParam(1, 'type'),
mw.text.listToText(titres)
)
else
titre = cfg.ebaucheTitre:format(ebaucheParam(1, 'type'))
end
local texte
if #ebauches == 0 then
texte = (ebaucheParam(1, 'message')) .. '.'
else
texte = (ebaucheParam(1, 'message')) .. ' ' .. (ebaucheParam(1, 'selon')) .. '.'
end

local parametres = {
niveau = 'ébauche',
['icône'] = image,
titre = titre,
texte = texte,
id = args.id
}

local categ = ''
if not yesno(args.nocat) then
categ = table.concat(categs)
if categ == '' then
categ = cfg.ebaucheCateg:format('')
end
end

local messageErreur = table.concat(gestionErreur)
if messageErreur:len() > 0 and not yesno(args.nocat) then
messageErreur = messageErreur .. '[[Catégorie:Page utilisant un modèle avec une syntaxe erronée|Ébauche]]'
end

return p._bandeauAvertissement(parametres) .. messageErreur .. categ
end

-- Insertion dans la table p des fonctions appelées par les
-- modèles à l'aide d'un adaptateur de fonction.
local function adaptateur(nomFonction)
return function (frame)
local args
if frame.args.texte or frame.args.titre then
args = frame.args
else
args = frame:getParent().args
end
return p[nomFonction](args)
end
end

local nomsFonction = {'bandeau', 'bandeauAvertissement', 'bandeauSection', 'ébauche' }
for _, nomFonction in ipairs(nomsFonction) do
p[nomFonction] = adaptateur('_' .. nomFonction)
end

return p

Arthur : 1 version

2014-01-13T22:01:14Z

1 version

Nouvelle page

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

Module:Bandeau - Historique des versions

Arthur : 1 révision importée

Arthur : 1 version

Arthur : 1 révision importée

Arthur : 1 version