Module:Bandeau : Différence entre versions
m (Fonction ébauche : annulation, test non fonctionnel) |
(on ne peut pas générer d'<aside>…) |
||
(149 révisions intermédiaires par 5 utilisateurs non affichées) | |||
Ligne 1 : | Ligne 1 : | ||
− | -- | + | --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 moduleEbauche = 'Module:Bandeau/Ébauche' | ||
+ | -- local paramEbauche = mw.loadData(moduleEbauche) -- ne sera chargé que pour un bandeau d'ébauche. | ||
+ | |||
+ | local cfg = { | ||
+ | forme = 'bandeau-simple', | ||
+ | niveau = 'bandeau-niveau-neutre', | ||
+ | formatLien = '[[Fichier:%s|%spx|alt=%s|class=noviewer]]', | ||
+ | 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(formatstring:format(texte)) | ||
+ | else | ||
+ | res:wikitext(texte) | ||
+ | end | ||
+ | |||
+ | return tostring(res) | ||
end | end | ||
− | + | function p._bandeau(args) | |
− | function | + | 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 |
− | if( | + | cells = mw.html.create('div') |
− | + | :addClass('bandeau-centrer') | |
− | + | elseif trim(args.droite) then | |
− | + | cells = mw.html.create('div') | |
+ | :css{ display = 'table', width = '100%' } | ||
+ | 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 | ||
+ | if yesno( args['domaine public'] ) then | ||
+ | alt = alt .. '|link=' | ||
+ | end | ||
+ | local taille = args['taille icône'] or cfg.tailleIcone | ||
+ | iconeWiki = cfg.formatLien:format(icone, taille, alt) | ||
+ | end | ||
+ | cells | ||
+ | :tag('div') | ||
+ | :addClass('bandeau-cell bandeau-icone') | ||
+ | :wikitext(iconeWiki) | ||
+ | :done() | ||
+ | elseif backgroundIcone ~= '' and args.forme == 'section' then | ||
+ | texte = ' ' .. texte | ||
+ | end | ||
+ | cells | ||
+ | :tag('div') | ||
+ | :addClass('bandeau-cell ' .. backgroundIcone) | ||
+ | :wikitext(texte) | ||
+ | :newline() | ||
+ | :done() | ||
+ | if trim(args.droite) then | ||
+ | cells | ||
+ | :tag('div') | ||
+ | :addClass('bandeau-cell') | ||
+ | :css( 'padding-left', '1em' ) | ||
+ | :newline() | ||
+ | :wikitext(args.droite) | ||
+ | :done() | ||
+ | end | ||
+ | |||
+ | res :node(cells) | ||
+ | if trim(args['supplément']) then | ||
+ | res :tag('p') | ||
+ | :wikitext(args['supplément']) | ||
+ | :done() | ||
end | 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 or '' ) .. ' metadata', | ||
+ | ['icône'] = trim(args['icône']) or trim(args['icône-complexe']) or args.niveau, | ||
+ | alt = args.alt or args['légende'], | ||
+ | ['domaine public'] = args['domaine public'], | ||
+ | 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 = ' ' .. (trim(args.texte) or erreur('texte', cfg.erreurArgument)) | ||
+ | |||
+ | res :addClass('bandeau-section metadata') | ||
+ | :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 = cfg.formatLien:format(icone, 'text-top|20x17', alt) | ||
+ | end | ||
+ | res :wikitext(iconeWiki) | ||
+ | :done() | ||
end | end | ||
− | + | res :addClass(backgroundIcone) | |
− | -- | + | :wikitext(texte) |
− | + | :done() | |
+ | |||
+ | return tostring(res) | ||
+ | end | ||
+ | |||
+ | -- fonction qui inverse la casse du premier caractère d'une chaine | ||
+ | local function inverserCasse( str ) | ||
+ | if type( str ) == 'string' then | ||
+ | local premierCar = mw.ustring.sub( str, 1, 1 ) | ||
+ | if mw.ustring.lower( premierCar ) == premierCar then | ||
+ | return mw.ustring.upper( premierCar ) .. mw.ustring.sub( str, 2 ) | ||
+ | else | ||
+ | return mw.ustring.lower( premierCar ) .. mw.ustring.sub( str, 2 ) | ||
+ | end | ||
+ | end | ||
+ | end | ||
− | return | + | -- fonction qui récupètre la ou les tables d'ébauche correspondant au thème |
+ | local function getEbaucheTable( paramEbauche, theme, feminin ) | ||
+ | -- suprime les marques de direction ltr | ||
+ | theme = theme:gsub( '\226\128\142', '' ):gsub( '_', ' ' ) | ||
+ | -- récupére les paramètres lié au theme, à partir du module:Bandeau/Ébauche | ||
+ | local params = {} | ||
+ | local ebauche = paramEbauche[ theme ] or paramEbauche[ inverserCasse( theme ) ] | ||
+ | if not ebauche and theme:find( ' ' ) then | ||
+ | -- teste si l'un des mots du thème correspond à un adjectif existant | ||
+ | for adj in theme:gmatch( ' ([^ ]+)' ) do | ||
+ | paramsAdj = getEbaucheTable( paramEbauche, adj, feminin ) | ||
+ | if paramsAdj and paramsAdj.adjectif == true then | ||
+ | local nom = theme:gsub( ' ' .. adj:gsub( '(%p)', '%%%1'), '' ) | ||
+ | params = getEbaucheTable( paramEbauche, nom, feminin ) | ||
+ | if params then | ||
+ | return params, paramsAdj | ||
+ | end | ||
+ | end | ||
+ | end | ||
+ | -- aucun mot ne correspond à un adjectif, on essait une autre methode pour trouver une correspondance avec plusieurs mots | ||
+ | if theme:find( ' .+ ' ) then | ||
+ | for adj, paramsAdj in pairs( paramEbauche ) do | ||
+ | if paramsAdj.adjectif == true and theme:find( ' ' .. adj, 2, true ) then | ||
+ | local nom = theme:gsub( ' ' .. adj:gsub( '(%p)', '%%%1'), '' ) | ||
+ | params = getEbaucheTable( paramEbauche, nom, feminin ) | ||
+ | if params then | ||
+ | return params, paramsAdj | ||
+ | end | ||
+ | end | ||
+ | end | ||
+ | end | ||
+ | end | ||
+ | if feminin and ebauche and ebauche.feminin then | ||
+ | ebauche = paramEbauche[ ebauche.feminin ] | ||
+ | end | ||
+ | if ebauche then | ||
+ | for n, v in pairs( ebauche ) do | ||
+ | params[ n ] = v | ||
+ | end | ||
+ | else | ||
+ | params = nil | ||
+ | end | ||
+ | return params, nil | ||
end | end | ||
+ | p.getEbaucheTable = getEbaucheTable | ||
− | function | + | local function femininFromWikidata() |
− | + | local entity = mw.wikibase.getEntity() | |
− | + | if entity then | |
− | + | local p31 = entity:getBestStatements( 'P31' ) | |
+ | local estHumain = type( p31 ) == 'table' | ||
+ | and #p31 == 1 | ||
+ | and type( p31[ 1 ].mainsnak ) == 'table' | ||
+ | and type( p31[ 1 ].mainsnak.datavalue ) == 'table' | ||
+ | and type( p31[ 1 ].mainsnak.datavalue.value ) == 'table' | ||
+ | and p31[ 1 ].mainsnak.datavalue.value['numeric-id'] == 5 | ||
+ | local p21 = entity:getBestStatements( 'P21' ) | ||
+ | local estFeminin = type( p21 ) == 'table' | ||
+ | and #p21 == 1 | ||
+ | and type( p21[ 1 ].mainsnak ) == 'table' | ||
+ | and type( p21[ 1 ].mainsnak.datavalue ) == 'table' | ||
+ | and type( p21[ 1 ].mainsnak.datavalue.value ) == 'table' | ||
+ | and p21[ 1 ].mainsnak.datavalue.value['numeric-id'] == 6581072 | ||
+ | return estHumain, estFeminin | ||
+ | end | ||
+ | return false, false | ||
end | end | ||
− | function | + | p['_ébauche'] = function ( args ) |
− | + | local paramEbauche = mw.loadData( moduleEbauche ) | |
− | + | local page = mw.title.getCurrentTitle() | |
− | + | local ebauches, gestionErreur = {}, {} | |
− | local | + | local humain, feminin = femininFromWikidata() |
− | + | feminin = yesno( args["féminin"], true ) or feminin | |
− | + | local estFeminin | |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | + | -- fonction qui retourne la valeur de param pour l'ébauche i, ou une valeur par défaut | |
− | local | + | local ebaucheParam = function( i, param ) |
− | + | return ebauches[ i ] and ebauches[ i ][ param ] or paramEbauche[''][ param ] | |
− | + | end | |
− | + | ||
− | + | -- récupération des paramètres de tous les thèmes | |
− | + | for i, theme in ipairs( args ) do | |
+ | theme = trim( theme ) | ||
+ | if theme then | ||
+ | local t, tAdj = getEbaucheTable( paramEbauche, theme, feminin ) | ||
+ | if t then | ||
+ | table.insert( ebauches, t ) | ||
+ | table.insert( ebauches, tAdj ) | ||
+ | else | ||
+ | table.insert( | ||
+ | gestionErreur, | ||
+ | erreur( theme, cfg.erreurEbaucheParam, 'div' ) | ||
+ | ) | ||
+ | end | ||
+ | end | ||
+ | end | ||
− | -- | + | -- récupération des différents titres, images et catégories |
− | + | local images, titres, categs = {}, {}, {} | |
− | -- | + | local tailleIcone = '45x35' |
− | + | if #ebauches > 3 then | |
− | if | + | tailleIcone = '35x25' |
− | if | + | end |
− | + | for i, ebauche in ipairs( ebauches ) do | |
− | + | -- création du lien de l'image | |
− | + | local alt = ebauche.altIcone | |
+ | if not alt then | ||
+ | if ebauche.sujet then | ||
+ | alt = 'image illustrant ' .. ebauche.sujet | ||
else | else | ||
− | - | + | alt = '' |
− | + | end | |
− | + | end | |
− | + | if ebauche.icone then | |
− | + | local image = cfg.formatLien:format( ebauche.icone, tailleIcone, alt ) | |
− | -- | + | table.insert( images, image ) |
− | + | 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 | ||
+ | if ebauche.adjectif and #titres > 0 then | ||
+ | local sujet = ebauche.sujet or ebauche.nom | ||
+ | if estFeminin then | ||
+ | sujet = ebauche.sujetF or sujet:gsub( | ||
+ | ebauche.nom:gsub( '(%p)', '%%%1') .. '%f[%W]', | ||
+ | ebauche.feminin | ||
+ | ) | ||
+ | end | ||
+ | -- ajout du sujet de l'adjectif dans le sujet de l'ébauche précédente | ||
+ | local titre, subst = titres[ #titres ]:gsub( | ||
+ | '<(adj[^>]*)>', | ||
+ | { adjectif = sujet, adj = ebauche.nom, adjF = ebauche.feminin } | ||
+ | ) | ||
+ | if subst > 0 then | ||
+ | titres[ #titres ] = titre | ||
+ | else | ||
+ | titres[ #titres ] = titre .. ' ' .. sujet | ||
+ | end | ||
+ | else | ||
+ | table.insert( titres, ebauche.sujet ) | ||
+ | estFeminin = ebauche.estFeminin or ( ebauche.sujet == '' and estFeminin ) | ||
+ | end | ||
+ | |||
+ | -- mise en forme des catégories | ||
+ | if ebauche.adjectif then | ||
+ | -- tentative d'ajout du nom de l'adjectif dans les catégories précédentes | ||
+ | local modif = false | ||
+ | for k, v in ipairs( categs ) do | ||
+ | local cat, subst = v:gsub( | ||
+ | '<(adj[^>]*)>', | ||
+ | { adj = ebauche.nom, adjF = ebauche.feminin, adjectif = ebauche.nom } | ||
+ | ) | ||
+ | if subst == 0 then | ||
+ | cat = v .. ' ' .. ebauche.nom | ||
end | end | ||
− | + | if mw.title.new( 'Catégorie:Wikipédia:ébauche ' .. cat ).exists then | |
− | + | categs[ k ] = cat | |
− | + | modif = true | |
− | |||
− | |||
− | if( | ||
− | |||
− | |||
− | |||
− | |||
end | end | ||
end | end | ||
+ | if not modif | ||
+ | and humain | ||
+ | and mw.title.new( 'Catégorie:Wikipédia:ébauche personnalité ' .. ebauche.feminin ).exists | ||
+ | then | ||
+ | table.insert( categs, 'personnalité ' .. ebauche.feminin ) | ||
+ | end | ||
+ | end | ||
+ | table.insert( categs, ebauche.categ ) | ||
+ | table.insert( categs, ebauche.categ2 ) | ||
+ | end | ||
+ | |||
+ | -- mise en forme des images | ||
+ | local image | ||
+ | if trim( args['icône'] ) then | ||
+ | local theme = getEbaucheTable( paramEbauche, args['icône'] ) | ||
+ | if theme and theme.icone then | ||
+ | image = cfg.formatLien:format( | ||
+ | theme.icone, | ||
+ | tailleIcone, | ||
+ | theme.altIcone or ( 'image illustrant ' .. theme.sujet ) | ||
+ | ) | ||
+ | end | ||
+ | elseif #images == 1 then | ||
+ | image = images[ 1 ] | ||
+ | elseif #images > 1 then | ||
+ | image = cfg.ebaucheImage:format( table.concat( images, ' ' ) ) | ||
+ | end | ||
+ | |||
+ | -- mise en forme du titre | ||
+ | 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 | ||
+ | |||
+ | -- mise en forme du texte | ||
+ | local texte | ||
+ | if #ebauches == 0 then | ||
+ | texte = ( ebaucheParam( 1, 'message' ) ) .. '.' | ||
+ | else | ||
+ | local message = ebaucheParam( 1, 'message' ) | ||
+ | local selon = ebaucheParam( 1, 'selon' ) | ||
+ | -- ajout d'un point si le paramètre selon commence par un retour ligne ou une majuscule | ||
+ | if message:sub( -1 ) == ')' and ( selon:sub( 1, 3 ) == '<br' or mw.ustring.match( selon, '^%u' ) ) then | ||
+ | texte = ( ebaucheParam( 1, 'message' ) ) .. '. ' .. ( ebaucheParam( 1, 'selon' ) ) .. '.' | ||
else | else | ||
− | + | texte = ( ebaucheParam( 1, 'message' ) ) .. ' ' .. ( ebaucheParam( 1, 'selon' ) ) .. '.' | |
− | |||
− | |||
− | |||
end | end | ||
− | + | end | |
− | + | -- ajout d'un texte s'il y a une liste de tâches | |
− | + | local todo = mw.title.makeTitle( mw.site.namespaces[ page.namespace ].talk.id, page.text .. '/À faire' ) | |
− | + | if todo.exists then | |
+ | texte = texte .. '\n\n' | ||
+ | .. 'Consultez la liste des <b>tâches à accomplir</b> en [[' | ||
+ | .. page.talkPageTitle.prefixedText | ||
+ | .. '|page de discussion]].' | ||
+ | end | ||
+ | |||
+ | -- paramètres pour le bandeau | ||
+ | local parametres = { | ||
+ | niveau = 'ébauche', | ||
+ | ['icône'] = image, | ||
+ | titre = titre:gsub( ' <adj[^>]*>', '' ), | ||
+ | texte = texte, | ||
+ | id = args.id | ||
+ | } | ||
+ | |||
+ | -- concaténation des différentes catégories (pas de catégorisation si nocat, ou page de discussion, ou espace utilisateur) | ||
+ | local categ = '' | ||
+ | local messageErreur = table.concat( gestionErreur ) | ||
+ | if not ( yesno( args.nocat, true, false ) or page.isTalkPage or page.namespace == 2 ) then | ||
+ | for i = 1, #categs do | ||
+ | categs[ i ] = cfg.ebaucheCateg:format( categs[ i ] ) | ||
end | end | ||
− | if | + | categ = table.concat( categs ):gsub( ' <[^>]*>', '' ) |
− | + | if categ == '' then | |
− | + | categ = cfg.ebaucheCateg:format('') | |
− | + | end | |
+ | if #gestionErreur > 0 then | ||
+ | messageErreur = messageErreur .. '[[Catégorie:Ébauche inconnue]]' | ||
end | end | ||
end | end | ||
− | -- | + | |
− | local | + | |
− | local | + | return p._bandeauAvertissement( parametres ) .. messageErreur .. categ |
− | + | end | |
− | if( | + | |
− | + | --- | |
+ | -- fonction retournant un paramètre d'une table d'ébauche. | ||
+ | -- Elle est prévue pour être appelée directement par #invoke: | ||
+ | -- avec pour paramètres le thème et le paramètre désiré | ||
+ | -- Cette fonction est principalement destinée à la page d'aide. | ||
+ | function p.parametreEbauche( frame ) | ||
+ | local paramEbauche = mw.loadData( moduleEbauche ) | ||
+ | local theme = frame.args[1] | ||
+ | local param = frame.args[2] | ||
+ | if paramEbauche[ theme ] then | ||
+ | return paramEbauche[ theme ][ param ] | ||
+ | elseif paramEbauche[ inverserCasse( theme ) ] then | ||
+ | return paramEbauche[ inverserCasse( theme ) ][ param ] | ||
end | end | ||
− | + | end | |
− | + | ||
− | + | --- | |
− | + | -- Fonction retournant le féminin d'un théme d'ébauche | |
− | if | + | -- Elle est prévue pour être appelée directement par #invoke: |
− | + | -- avec pour paramètres le thème et le paramètre désiré | |
− | elseif | + | -- Cette fonction est principalement destinée au modèle {{Catégorie d'ébauche}}, donc une valeur n'est retournée que si les catégories sont identiques |
− | + | function p.femininEbauche( frame ) | |
+ | local paramEbauche = mw.loadData( moduleEbauche ) | ||
+ | local theme = frame.args[1] | ||
+ | local themeF | ||
+ | if theme then | ||
+ | local t = getEbaucheTable( paramEbauche, theme ) | ||
+ | local tF, tAdjF = getEbaucheTable( paramEbauche, theme, true ) | ||
+ | if t.feminin and tF.categ == t.categ then | ||
+ | if tAdjF then | ||
+ | themeF = tF.nom .. ' ' .. tAdjF.feminin | ||
+ | elseif tF then | ||
+ | themeF = tF.nom | ||
end | end | ||
+ | return themeF | ||
end | end | ||
− | + | end | |
+ | end | ||
+ | |||
+ | --- | ||
+ | -- fonction qui contruit deux tableaux récapitulatif de l'ensemble des paramètres d'ébauche | ||
+ | function p.tableParametresEbauches( frame ) | ||
+ | local paramEbauche = mw.loadData( moduleEbauche ) | ||
+ | local params, paramAdj, paramType = {}, {}, {} | ||
+ | local wikiTab = { '<table class="wikitable sortable" style="table-layout:fixed;">' } | ||
+ | wikiTab.insert = function ( t, value ) | ||
+ | table.insert( t, value ) | ||
+ | return t | ||
end | end | ||
− | + | for clef, ebauche in pairs( paramEbauche ) do | |
− | + | local kEbauche = {} | |
− | + | for k, v in pairs( ebauche ) do | |
− | + | kEbauche[ k ] = v | |
− | for | + | end |
− | + | kEbauche.clef = clef | |
− | + | if ebauche.type then | |
− | + | table.insert( paramType, kEbauche ) | |
− | + | elseif ebauche.adjectif then | |
− | + | if clef == ebauche.nom or clef ~= ebauche.feminin then | |
+ | table.insert( paramAdj, kEbauche ) | ||
end | end | ||
+ | else | ||
+ | table.insert( params, kEbauche ) | ||
end | end | ||
end | end | ||
− | + | local comp = function( eb1, eb2 ) | |
+ | return eb1.clef < eb2.clef | ||
+ | end | ||
+ | table.sort( params, comp ) | ||
+ | table.sort( paramAdj, comp ) | ||
+ | table.sort( paramType, comp ) | ||
− | + | wikiTab | |
− | + | :insert('\n=== Ébauches normales ===\n') | |
− | if( | + | :insert('<caption>Liste des paramètres d\'ébauche</caption>') |
− | + | :insert('<th scope=col style="width:15%;">nom</th>') | |
− | + | :insert('<th scope=col style="width:50px; box-sizing:border-box;">i</th>') | |
− | + | :insert('<th scope=col style="width:20%;">sujet</th>') | |
− | end | + | :insert('<th scope=col style="width:20%;">catégorie</th>') |
− | + | :insert('<th scope=col>selon</th>') | |
− | + | for k, ebauche in ipairs( params ) do | |
+ | wikiTab | ||
+ | :insert('<tr><td>') | ||
+ | :insert( ebauche.clef ) | ||
+ | :insert('</td><td>') | ||
+ | if ebauche.icone then | ||
+ | wikiTab:insert( cfg.formatLien:format( ebauche.icone, '45x35', ebauche.altIcone or '' ) ) | ||
+ | end | ||
+ | wikiTab | ||
+ | :insert('</td><td>') | ||
+ | :insert( ebauche.sujet ) | ||
+ | :insert('</td><td>') | ||
+ | if ebauche.categ then | ||
+ | wikiTab | ||
+ | :insert( '[[:Catégorie:Wikipédia:ébauche ' .. ebauche.categ .. '|' .. ebauche.categ .. ']]' ) | ||
+ | end | ||
+ | if ebauche.cageg2 then | ||
+ | wikiTab | ||
+ | :insert('<br>') | ||
+ | :insert( '[[:Catégorie:Wikipédia:ébauche ' .. ebauche.categ2 .. '|' .. ebauche.categ2 .. ']]' ) | ||
+ | end | ||
+ | wikiTab | ||
+ | :insert('</td><td>') | ||
+ | :insert( ebauche.selon ) | ||
+ | :insert('</td></tr>') | ||
+ | end | ||
+ | wikiTab:insert('</table>') | ||
+ | |||
+ | -- seconde table pour les adjectifs | ||
+ | wikiTab | ||
+ | :insert('\n=== Adjectifs ===\n') | ||
+ | :insert('<table class="wikitable">') | ||
+ | :insert('<caption>Liste des adjectifs</caption>') | ||
+ | :insert('<th scope=col>adjectif</th>') | ||
+ | :insert('<th scope=col>féminin</th>') | ||
+ | :insert('<th scope=col style="width:50px;">icone</th>') | ||
+ | :insert('<th scope=col>sujet</th>') | ||
+ | :insert('<th scope=col>sujet féminin</th>') | ||
+ | :insert('<th scope=col>catégorie</th>') | ||
+ | for k, ebauche in ipairs( paramAdj ) do | ||
+ | wikiTab | ||
+ | :insert('<tr><td>') | ||
+ | :insert( ebauche.clef ) | ||
+ | :insert('</td><td>') | ||
+ | :insert( ebauche.feminin ) | ||
+ | :insert('</td><td>') | ||
+ | if ebauche.icone then | ||
+ | wikiTab | ||
+ | :insert( cfg.formatLien:format( ebauche.icone, '45x35', ebauche.altIcone or '' ) ) | ||
+ | end | ||
+ | wikiTab | ||
+ | :insert('</td><td>') | ||
+ | :insert( ebauche.sujet ) | ||
+ | :insert('</td><td>') | ||
+ | :insert( ebauche.sujetF or ebauche.sujet:gsub( ebauche.nom .. '%f[%W]', ebauche.feminin ) ) | ||
+ | :insert('</td><td>') | ||
+ | if ebauche.categ then | ||
+ | wikiTab | ||
+ | :insert( '[[:Catégorie:Wikipédia:ébauche ' .. ebauche.categ .. '|' .. ebauche.categ .. ']]' ) | ||
end | end | ||
+ | wikiTab | ||
+ | :insert('</td></tr>') | ||
end | end | ||
+ | wikiTab:insert('</table>') | ||
− | -- | + | -- troisième table pour les types |
− | + | wikiTab | |
− | + | :insert('\n=== Types ===\n') | |
− | + | :insert('<table class="wikitable">') | |
− | + | :insert('<caption>Liste des paramètres de type</caption>') | |
− | + | :insert('<th scope=col style="width:15%;">nom</th>') | |
+ | :insert('<th scope=col style="width:50px;">icone</th>') | ||
+ | :insert('<th scope=col style="width:20%;">type</th>') | ||
+ | :insert('<th scope=col style="width:15%;">sujet</th>') | ||
+ | :insert('<th scope=col style="width:15%;">catégorie</th>') | ||
+ | :insert('<th scope=col>message</th>') | ||
+ | for k, ebauche in ipairs( paramType ) do | ||
+ | wikiTab | ||
+ | :insert('<tr><td>') | ||
+ | :insert( ebauche.clef ) | ||
+ | :insert('</td><td>') | ||
+ | if ebauche.icone then | ||
+ | wikiTab:insert( cfg.formatLien:format( ebauche.icone, '45x35', ebauche.altIcone or '' ) ) | ||
+ | end | ||
+ | wikiTab | ||
+ | :insert('</td><td>') | ||
+ | :insert ( ebauche.type ) | ||
+ | :insert('</td><td>') | ||
+ | :insert( ebauche.sujet ) | ||
+ | :insert('</td><td>') | ||
+ | if ebauche.categ then | ||
+ | wikiTab:insert( '[[:Catégorie:Wikipédia:ébauche ' .. ebauche.categ .. '|' .. ebauche.categ .. ']]' ) | ||
+ | end | ||
+ | wikiTab | ||
+ | :insert('</td><td>') | ||
+ | :insert( ebauche.message ) | ||
+ | :insert('</td></tr>') | ||
+ | end | ||
+ | wikiTab:insert('</table>') | ||
− | return | + | return table.concat( wikiTab ):gsub( ' <adjF?>', '' ) |
− | + | end | |
+ | |||
+ | -- fonction destiné au gadget MediaWiki:Gadget-BandeauxEbauches.js | ||
+ | function p.listeEbauches( frame ) | ||
+ | local paramEbauche = mw.loadData( moduleEbauche ) | ||
+ | local liste = {} | ||
+ | for k in pairs( paramEbauche ) do | ||
+ | if k ~="" then | ||
+ | table.insert( liste, k ) | ||
+ | end | ||
+ | end | ||
+ | table.sort( liste ) | ||
+ | return table.concat( liste, '\n' ) | ||
+ | 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 | end | ||
− | return | + | return p |
Version actuelle datée du 19 mai 2017 à 04:23
La documentation pour ce module peut être créée à Module:Bandeau/doc
--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 moduleEbauche = 'Module:Bandeau/Ébauche' -- local paramEbauche = mw.loadData(moduleEbauche) -- ne sera chargé que pour un bandeau d'ébauche. local cfg = { forme = 'bandeau-simple', niveau = 'bandeau-niveau-neutre', formatLien = '[[Fichier:%s|%spx|alt=%s|class=noviewer]]', 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(formatstring:format(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') elseif trim(args.droite) then cells = mw.html.create('div') :css{ display = 'table', width = '100%' } 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 if yesno( args['domaine public'] ) then alt = alt .. '|link=' end local taille = args['taille icône'] or cfg.tailleIcone iconeWiki = cfg.formatLien:format(icone, taille, alt) end cells :tag('div') :addClass('bandeau-cell bandeau-icone') :wikitext(iconeWiki) :done() elseif backgroundIcone ~= '' and args.forme == 'section' then texte = ' ' .. texte end cells :tag('div') :addClass('bandeau-cell ' .. backgroundIcone) :wikitext(texte) :newline() :done() if trim(args.droite) then cells :tag('div') :addClass('bandeau-cell') :css( 'padding-left', '1em' ) :newline() :wikitext(args.droite) :done() end 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 or '' ) .. ' metadata', ['icône'] = trim(args['icône']) or trim(args['icône-complexe']) or args.niveau, alt = args.alt or args['légende'], ['domaine public'] = args['domaine public'], 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 = ' ' .. (trim(args.texte) or erreur('texte', cfg.erreurArgument)) res :addClass('bandeau-section metadata') :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 = cfg.formatLien:format(icone, 'text-top|20x17', alt) end res :wikitext(iconeWiki) :done() end res :addClass(backgroundIcone) :wikitext(texte) :done() return tostring(res) end -- fonction qui inverse la casse du premier caractère d'une chaine local function inverserCasse( str ) if type( str ) == 'string' then local premierCar = mw.ustring.sub( str, 1, 1 ) if mw.ustring.lower( premierCar ) == premierCar then return mw.ustring.upper( premierCar ) .. mw.ustring.sub( str, 2 ) else return mw.ustring.lower( premierCar ) .. mw.ustring.sub( str, 2 ) end end end -- fonction qui récupètre la ou les tables d'ébauche correspondant au thème local function getEbaucheTable( paramEbauche, theme, feminin ) -- suprime les marques de direction ltr theme = theme:gsub( '\226\128\142', '' ):gsub( '_', ' ' ) -- récupére les paramètres lié au theme, à partir du module:Bandeau/Ébauche local params = {} local ebauche = paramEbauche[ theme ] or paramEbauche[ inverserCasse( theme ) ] if not ebauche and theme:find( ' ' ) then -- teste si l'un des mots du thème correspond à un adjectif existant for adj in theme:gmatch( ' ([^ ]+)' ) do paramsAdj = getEbaucheTable( paramEbauche, adj, feminin ) if paramsAdj and paramsAdj.adjectif == true then local nom = theme:gsub( ' ' .. adj:gsub( '(%p)', '%%%1'), '' ) params = getEbaucheTable( paramEbauche, nom, feminin ) if params then return params, paramsAdj end end end -- aucun mot ne correspond à un adjectif, on essait une autre methode pour trouver une correspondance avec plusieurs mots if theme:find( ' .+ ' ) then for adj, paramsAdj in pairs( paramEbauche ) do if paramsAdj.adjectif == true and theme:find( ' ' .. adj, 2, true ) then local nom = theme:gsub( ' ' .. adj:gsub( '(%p)', '%%%1'), '' ) params = getEbaucheTable( paramEbauche, nom, feminin ) if params then return params, paramsAdj end end end end end if feminin and ebauche and ebauche.feminin then ebauche = paramEbauche[ ebauche.feminin ] end if ebauche then for n, v in pairs( ebauche ) do params[ n ] = v end else params = nil end return params, nil end p.getEbaucheTable = getEbaucheTable local function femininFromWikidata() local entity = mw.wikibase.getEntity() if entity then local p31 = entity:getBestStatements( 'P31' ) local estHumain = type( p31 ) == 'table' and #p31 == 1 and type( p31[ 1 ].mainsnak ) == 'table' and type( p31[ 1 ].mainsnak.datavalue ) == 'table' and type( p31[ 1 ].mainsnak.datavalue.value ) == 'table' and p31[ 1 ].mainsnak.datavalue.value['numeric-id'] == 5 local p21 = entity:getBestStatements( 'P21' ) local estFeminin = type( p21 ) == 'table' and #p21 == 1 and type( p21[ 1 ].mainsnak ) == 'table' and type( p21[ 1 ].mainsnak.datavalue ) == 'table' and type( p21[ 1 ].mainsnak.datavalue.value ) == 'table' and p21[ 1 ].mainsnak.datavalue.value['numeric-id'] == 6581072 return estHumain, estFeminin end return false, false end p['_ébauche'] = function ( args ) local paramEbauche = mw.loadData( moduleEbauche ) local page = mw.title.getCurrentTitle() local ebauches, gestionErreur = {}, {} local humain, feminin = femininFromWikidata() feminin = yesno( args["féminin"], true ) or feminin local estFeminin -- fonction qui retourne la valeur de param pour l'ébauche i, ou une valeur par défaut local ebaucheParam = function( i, param ) return ebauches[ i ] and ebauches[ i ][ param ] or paramEbauche[''][ param ] end -- récupération des paramètres de tous les thèmes for i, theme in ipairs( args ) do theme = trim( theme ) if theme then local t, tAdj = getEbaucheTable( paramEbauche, theme, feminin ) if t then table.insert( ebauches, t ) table.insert( ebauches, tAdj ) else table.insert( gestionErreur, erreur( theme, cfg.erreurEbaucheParam, 'div' ) ) end end end -- récupération des différents titres, images et catégories local images, titres, categs = {}, {}, {} local tailleIcone = '45x35' if #ebauches > 3 then tailleIcone = '35x25' end for i, ebauche in ipairs( ebauches ) do -- création du lien de l'image local alt = ebauche.altIcone if not alt then if ebauche.sujet then alt = 'image illustrant ' .. ebauche.sujet else alt = '' end end if ebauche.icone then local image = cfg.formatLien:format( ebauche.icone, tailleIcone, alt ) table.insert( images, image ) 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 if ebauche.adjectif and #titres > 0 then local sujet = ebauche.sujet or ebauche.nom if estFeminin then sujet = ebauche.sujetF or sujet:gsub( ebauche.nom:gsub( '(%p)', '%%%1') .. '%f[%W]', ebauche.feminin ) end -- ajout du sujet de l'adjectif dans le sujet de l'ébauche précédente local titre, subst = titres[ #titres ]:gsub( '<(adj[^>]*)>', { adjectif = sujet, adj = ebauche.nom, adjF = ebauche.feminin } ) if subst > 0 then titres[ #titres ] = titre else titres[ #titres ] = titre .. ' ' .. sujet end else table.insert( titres, ebauche.sujet ) estFeminin = ebauche.estFeminin or ( ebauche.sujet == '' and estFeminin ) end -- mise en forme des catégories if ebauche.adjectif then -- tentative d'ajout du nom de l'adjectif dans les catégories précédentes local modif = false for k, v in ipairs( categs ) do local cat, subst = v:gsub( '<(adj[^>]*)>', { adj = ebauche.nom, adjF = ebauche.feminin, adjectif = ebauche.nom } ) if subst == 0 then cat = v .. ' ' .. ebauche.nom end if mw.title.new( 'Catégorie:Wikipédia:ébauche ' .. cat ).exists then categs[ k ] = cat modif = true end end if not modif and humain and mw.title.new( 'Catégorie:Wikipédia:ébauche personnalité ' .. ebauche.feminin ).exists then table.insert( categs, 'personnalité ' .. ebauche.feminin ) end end table.insert( categs, ebauche.categ ) table.insert( categs, ebauche.categ2 ) end -- mise en forme des images local image if trim( args['icône'] ) then local theme = getEbaucheTable( paramEbauche, args['icône'] ) if theme and theme.icone then image = cfg.formatLien:format( theme.icone, tailleIcone, theme.altIcone or ( 'image illustrant ' .. theme.sujet ) ) end elseif #images == 1 then image = images[ 1 ] elseif #images > 1 then image = cfg.ebaucheImage:format( table.concat( images, ' ' ) ) end -- mise en forme du titre 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 -- mise en forme du texte local texte if #ebauches == 0 then texte = ( ebaucheParam( 1, 'message' ) ) .. '.' else local message = ebaucheParam( 1, 'message' ) local selon = ebaucheParam( 1, 'selon' ) -- ajout d'un point si le paramètre selon commence par un retour ligne ou une majuscule if message:sub( -1 ) == ')' and ( selon:sub( 1, 3 ) == '<br' or mw.ustring.match( selon, '^%u' ) ) then texte = ( ebaucheParam( 1, 'message' ) ) .. '. ' .. ( ebaucheParam( 1, 'selon' ) ) .. '.' else texte = ( ebaucheParam( 1, 'message' ) ) .. ' ' .. ( ebaucheParam( 1, 'selon' ) ) .. '.' end end -- ajout d'un texte s'il y a une liste de tâches local todo = mw.title.makeTitle( mw.site.namespaces[ page.namespace ].talk.id, page.text .. '/À faire' ) if todo.exists then texte = texte .. '\n\n' .. 'Consultez la liste des <b>tâches à accomplir</b> en [[' .. page.talkPageTitle.prefixedText .. '|page de discussion]].' end -- paramètres pour le bandeau local parametres = { niveau = 'ébauche', ['icône'] = image, titre = titre:gsub( ' <adj[^>]*>', '' ), texte = texte, id = args.id } -- concaténation des différentes catégories (pas de catégorisation si nocat, ou page de discussion, ou espace utilisateur) local categ = '' local messageErreur = table.concat( gestionErreur ) if not ( yesno( args.nocat, true, false ) or page.isTalkPage or page.namespace == 2 ) then for i = 1, #categs do categs[ i ] = cfg.ebaucheCateg:format( categs[ i ] ) end categ = table.concat( categs ):gsub( ' <[^>]*>', '' ) if categ == '' then categ = cfg.ebaucheCateg:format('') end if #gestionErreur > 0 then messageErreur = messageErreur .. '[[Catégorie:Ébauche inconnue]]' end end return p._bandeauAvertissement( parametres ) .. messageErreur .. categ end --- -- fonction retournant un paramètre d'une table d'ébauche. -- Elle est prévue pour être appelée directement par #invoke: -- avec pour paramètres le thème et le paramètre désiré -- Cette fonction est principalement destinée à la page d'aide. function p.parametreEbauche( frame ) local paramEbauche = mw.loadData( moduleEbauche ) local theme = frame.args[1] local param = frame.args[2] if paramEbauche[ theme ] then return paramEbauche[ theme ][ param ] elseif paramEbauche[ inverserCasse( theme ) ] then return paramEbauche[ inverserCasse( theme ) ][ param ] end end --- -- Fonction retournant le féminin d'un théme d'ébauche -- Elle est prévue pour être appelée directement par #invoke: -- avec pour paramètres le thème et le paramètre désiré -- Cette fonction est principalement destinée au modèle {{Catégorie d'ébauche}}, donc une valeur n'est retournée que si les catégories sont identiques function p.femininEbauche( frame ) local paramEbauche = mw.loadData( moduleEbauche ) local theme = frame.args[1] local themeF if theme then local t = getEbaucheTable( paramEbauche, theme ) local tF, tAdjF = getEbaucheTable( paramEbauche, theme, true ) if t.feminin and tF.categ == t.categ then if tAdjF then themeF = tF.nom .. ' ' .. tAdjF.feminin elseif tF then themeF = tF.nom end return themeF end end end --- -- fonction qui contruit deux tableaux récapitulatif de l'ensemble des paramètres d'ébauche function p.tableParametresEbauches( frame ) local paramEbauche = mw.loadData( moduleEbauche ) local params, paramAdj, paramType = {}, {}, {} local wikiTab = { '<table class="wikitable sortable" style="table-layout:fixed;">' } wikiTab.insert = function ( t, value ) table.insert( t, value ) return t end for clef, ebauche in pairs( paramEbauche ) do local kEbauche = {} for k, v in pairs( ebauche ) do kEbauche[ k ] = v end kEbauche.clef = clef if ebauche.type then table.insert( paramType, kEbauche ) elseif ebauche.adjectif then if clef == ebauche.nom or clef ~= ebauche.feminin then table.insert( paramAdj, kEbauche ) end else table.insert( params, kEbauche ) end end local comp = function( eb1, eb2 ) return eb1.clef < eb2.clef end table.sort( params, comp ) table.sort( paramAdj, comp ) table.sort( paramType, comp ) wikiTab :insert('\n=== Ébauches normales ===\n') :insert('<caption>Liste des paramètres d\'ébauche</caption>') :insert('<th scope=col style="width:15%;">nom</th>') :insert('<th scope=col style="width:50px; box-sizing:border-box;">i</th>') :insert('<th scope=col style="width:20%;">sujet</th>') :insert('<th scope=col style="width:20%;">catégorie</th>') :insert('<th scope=col>selon</th>') for k, ebauche in ipairs( params ) do wikiTab :insert('<tr><td>') :insert( ebauche.clef ) :insert('</td><td>') if ebauche.icone then wikiTab:insert( cfg.formatLien:format( ebauche.icone, '45x35', ebauche.altIcone or '' ) ) end wikiTab :insert('</td><td>') :insert( ebauche.sujet ) :insert('</td><td>') if ebauche.categ then wikiTab :insert( '[[:Catégorie:Wikipédia:ébauche ' .. ebauche.categ .. '|' .. ebauche.categ .. ']]' ) end if ebauche.cageg2 then wikiTab :insert('<br>') :insert( '[[:Catégorie:Wikipédia:ébauche ' .. ebauche.categ2 .. '|' .. ebauche.categ2 .. ']]' ) end wikiTab :insert('</td><td>') :insert( ebauche.selon ) :insert('</td></tr>') end wikiTab:insert('</table>') -- seconde table pour les adjectifs wikiTab :insert('\n=== Adjectifs ===\n') :insert('<table class="wikitable">') :insert('<caption>Liste des adjectifs</caption>') :insert('<th scope=col>adjectif</th>') :insert('<th scope=col>féminin</th>') :insert('<th scope=col style="width:50px;">icone</th>') :insert('<th scope=col>sujet</th>') :insert('<th scope=col>sujet féminin</th>') :insert('<th scope=col>catégorie</th>') for k, ebauche in ipairs( paramAdj ) do wikiTab :insert('<tr><td>') :insert( ebauche.clef ) :insert('</td><td>') :insert( ebauche.feminin ) :insert('</td><td>') if ebauche.icone then wikiTab :insert( cfg.formatLien:format( ebauche.icone, '45x35', ebauche.altIcone or '' ) ) end wikiTab :insert('</td><td>') :insert( ebauche.sujet ) :insert('</td><td>') :insert( ebauche.sujetF or ebauche.sujet:gsub( ebauche.nom .. '%f[%W]', ebauche.feminin ) ) :insert('</td><td>') if ebauche.categ then wikiTab :insert( '[[:Catégorie:Wikipédia:ébauche ' .. ebauche.categ .. '|' .. ebauche.categ .. ']]' ) end wikiTab :insert('</td></tr>') end wikiTab:insert('</table>') -- troisième table pour les types wikiTab :insert('\n=== Types ===\n') :insert('<table class="wikitable">') :insert('<caption>Liste des paramètres de type</caption>') :insert('<th scope=col style="width:15%;">nom</th>') :insert('<th scope=col style="width:50px;">icone</th>') :insert('<th scope=col style="width:20%;">type</th>') :insert('<th scope=col style="width:15%;">sujet</th>') :insert('<th scope=col style="width:15%;">catégorie</th>') :insert('<th scope=col>message</th>') for k, ebauche in ipairs( paramType ) do wikiTab :insert('<tr><td>') :insert( ebauche.clef ) :insert('</td><td>') if ebauche.icone then wikiTab:insert( cfg.formatLien:format( ebauche.icone, '45x35', ebauche.altIcone or '' ) ) end wikiTab :insert('</td><td>') :insert ( ebauche.type ) :insert('</td><td>') :insert( ebauche.sujet ) :insert('</td><td>') if ebauche.categ then wikiTab:insert( '[[:Catégorie:Wikipédia:ébauche ' .. ebauche.categ .. '|' .. ebauche.categ .. ']]' ) end wikiTab :insert('</td><td>') :insert( ebauche.message ) :insert('</td></tr>') end wikiTab:insert('</table>') return table.concat( wikiTab ):gsub( ' <adjF?>', '' ) end -- fonction destiné au gadget MediaWiki:Gadget-BandeauxEbauches.js function p.listeEbauches( frame ) local paramEbauche = mw.loadData( moduleEbauche ) local liste = {} for k in pairs( paramEbauche ) do if k ~="" then table.insert( liste, k ) end end table.sort( liste ) return table.concat( liste, '\n' ) 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