Module:Bandeau : Différence entre versions

De Lagny-sur-Marne Wiki
Aller à : navigation, rechercher
m (typo)
(on ne peut pas générer d'<aside>…)
 
(23 révisions intermédiaires par 4 utilisateurs non affichées)
Ligne 15 : Ligne 15 :
 
local yesno = require('Module:yesno')
 
local yesno = require('Module:yesno')
 
local class = mw.loadData('Module:Bandeau/Class')
 
local class = mw.loadData('Module:Bandeau/Class')
-- local paramEbauche = mw.loadData('Module:Bandeau/Ébauche') -- ne sera chargé que pour un bandeau d'ébauche.
+
local moduleEbauche = 'Module:Bandeau/Ébauche'
 +
-- local paramEbauche = mw.loadData(moduleEbauche) -- ne sera chargé que pour un bandeau d'ébauche.
  
 
local cfg = {
 
local cfg = {
 
forme = 'bandeau-simple',
 
forme = 'bandeau-simple',
 
niveau = 'bandeau-niveau-neutre',
 
niveau = 'bandeau-niveau-neutre',
formatLien = '[[Fichier:%s|%spx|alt=%s]]',
+
formatLien = '[[Fichier:%s|%spx|alt=%s|class=noviewer]]',
 
tailleIcone = '45x45',
 
tailleIcone = '45x45',
 
public = 'domaine public',
 
public = 'domaine public',
Ligne 63 : Ligne 64 :
 
cells = mw.html.create('div')
 
cells = mw.html.create('div')
 
:addClass('bandeau-centrer')
 
:addClass('bandeau-centrer')
 +
elseif trim(args.droite) then
 +
cells = mw.html.create('div')
 +
:css{ display = 'table', width = '100%' }
 
end
 
end
 
if icone and backgroundIcone == '' then
 
if icone and backgroundIcone == '' then
Ligne 80 : Ligne 84 :
 
:tag('div')
 
:tag('div')
 
:addClass('bandeau-cell bandeau-icone')
 
:addClass('bandeau-cell bandeau-icone')
:cssText(args.styleImage) --Provisoire
 
 
:wikitext(iconeWiki)
 
:wikitext(iconeWiki)
 
:done()
 
:done()
Ligne 89 : Ligne 92 :
 
:tag('div')
 
:tag('div')
 
:addClass('bandeau-cell ' .. backgroundIcone)
 
:addClass('bandeau-cell ' .. backgroundIcone)
:cssText(args.styleTexte) --Provisoire
 
 
:wikitext(texte)
 
:wikitext(texte)
 
:newline()
 
:newline()
 
:done()
 
: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)
 
res :node(cells)
 
 
if trim(args['supplément']) then
 
if trim(args['supplément']) then
 
res :tag('p')   
 
res :tag('p')   
Ligne 101 : Ligne 111 :
 
:done()
 
:done()
 
end
 
end
 
 
return tostring(res)
 
return tostring(res)
 
end
 
end
Ligne 121 : Ligne 130 :
 
niveau = args.niveau,
 
niveau = args.niveau,
 
id = args.id,
 
id = args.id,
class = args.class,
+
class = ( args.class or '' ) .. ' metadata',
 
['icône'] = trim(args['icône']) or trim(args['icône-complexe']) or args.niveau,
 
['icône'] = trim(args['icône']) or trim(args['icône-complexe']) or args.niveau,
 
alt = args.alt or args['légende'],
 
alt = args.alt or args['légende'],
Ligne 138 : Ligne 147 :
 
local texte = '&ensp;' .. (trim(args.texte) or erreur('texte', cfg.erreurArgument))
 
local texte = '&ensp;' .. (trim(args.texte) or erreur('texte', cfg.erreurArgument))
  
res :addClass('bandeau-section')
+
res :addClass('bandeau-section metadata')
 
:addClass(class.niveau[args.niveau] or cfg.niveau)
 
:addClass(class.niveau[args.niveau] or cfg.niveau)
 
 
Ligne 174 : Ligne 183 :
 
-- fonction qui récupètre la ou les tables d'ébauche correspondant au thème
 
-- fonction qui récupètre la ou les tables d'ébauche correspondant au thème
 
local function getEbaucheTable( paramEbauche, theme, feminin )
 
local function getEbaucheTable( paramEbauche, theme, feminin )
-- récupére les paramètres lié au theme, à partir du module:Bandeau/Ébauche ou du modèle:Ébauche/paramètres theme
+
-- suprime les marques de direction ltr
local modele = 'Modèle:Ébauche/paramètres ' .. theme
+
theme = theme:gsub( '\226\128\142', '' ):gsub( '_', ' ' )
local params = { nom = theme }
+
-- récupére les paramètres lié au theme, à partir du module:Bandeau/Ébauche
 +
local params = {}
 
local ebauche = paramEbauche[ theme ] or paramEbauche[ inverserCasse( theme ) ]
 
local ebauche = paramEbauche[ theme ] or paramEbauche[ inverserCasse( theme ) ]
if not ebauche and theme:match( ' ' ) then
+
if not ebauche and theme:find( ' ' ) then
-- teste si le thème inclue un adjectif existant
+
-- teste si l'un des mots du thème correspond à un adjectif existant
 
for adj in theme:gmatch( ' ([^ ]+)' ) do
 
for adj in theme:gmatch( ' ([^ ]+)' ) do
 
paramsAdj = getEbaucheTable( paramEbauche, adj, feminin )
 
paramsAdj = getEbaucheTable( paramEbauche, adj, feminin )
 
if paramsAdj and paramsAdj.adjectif == true then
 
if paramsAdj and paramsAdj.adjectif == true then
local nom = theme:gsub( ' ' .. adj:gsub('(%p)', '%%%1'), '' )
+
local nom = theme:gsub( ' ' .. adj:gsub( '(%p)', '%%%1'), '' )
 
params = getEbaucheTable( paramEbauche, nom, feminin )
 
params = getEbaucheTable( paramEbauche, nom, feminin )
 
if params then
 
if params then
 
return params, paramsAdj
 
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
Ligne 197 : Ligne 219 :
 
for n, v in pairs( ebauche ) do
 
for n, v in pairs( ebauche ) do
 
params[ n ] = v
 
params[ n ] = v
end
 
elseif mw.title.new( modele ).exists then
 
local frame = mw.getCurrentFrame()
 
local parametres = {
 
icone = 'icône',
 
sujet = 'sujet',
 
selon = 'selon',
 
categ = 'catégorie',
 
type  = 'type',
 
message = 'message'
 
}
 
for n, v in pairs( parametres )  do
 
local param = frame:expandTemplate{ title = modele, args = {v} }
 
params[ n ] = trim( param )
 
 
end
 
end
 
else
 
else
Ligne 217 : Ligne 225 :
 
return params, nil
 
return params, nil
 
end
 
end
 +
p.getEbaucheTable = getEbaucheTable
  
 
local function femininFromWikidata()
 
local function femininFromWikidata()
 
local entity = mw.wikibase.getEntity()
 
local entity = mw.wikibase.getEntity()
 
if entity then
 
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 p21 = entity:getBestStatements( 'P21' )
if type( p21 ) == 'table'
+
local estFeminin = type( p21 ) == 'table'
 
and #p21 == 1
 
and #p21 == 1
 
and type( p21[ 1 ].mainsnak ) == 'table'
 
and type( p21[ 1 ].mainsnak ) == 'table'
 
and type( p21[ 1 ].mainsnak.datavalue ) == 'table'
 
and type( p21[ 1 ].mainsnak.datavalue ) == 'table'
 
and type( p21[ 1 ].mainsnak.datavalue.value ) == 'table'
 
and type( p21[ 1 ].mainsnak.datavalue.value ) == 'table'
then
+
and p21[ 1 ].mainsnak.datavalue.value['numeric-id'] == 6581072
return p21[ 1 ].mainsnak.datavalue.value['numeric-id'] == 6581072
+
return estHumain, estFeminin
end
 
 
end
 
end
return false
+
return false, false
 
end
 
end
  
 
p['_ébauche'] = function ( args )
 
p['_ébauche'] = function ( args )
local paramEbauche = mw.loadData('Module:Bandeau/Ébauche')
+
local paramEbauche = mw.loadData( moduleEbauche )
 
local page = mw.title.getCurrentTitle()
 
local page = mw.title.getCurrentTitle()
 
local ebauches, gestionErreur = {}, {}
 
local ebauches, gestionErreur = {}, {}
local feminin = yesno( args["féminin"] ) or femininFromWikidata()
+
local humain, feminin = femininFromWikidata()
 +
feminin = yesno( args["féminin"], true ) or feminin
 
local estFeminin
 
local estFeminin
 
 
Ligne 302 : Ligne 318 :
 
local sujet = ebauche.sujet or ebauche.nom
 
local sujet = ebauche.sujet or ebauche.nom
 
if estFeminin then
 
if estFeminin then
sujet = ebauche.sujetF or sujet:gsub( ebauche.nom .. '%f[%W]', ebauche.feminin )
+
sujet = ebauche.sujetF or sujet:gsub(
 +
ebauche.nom:gsub( '(%p)', '%%%1') .. '%f[%W]',  
 +
ebauche.feminin
 +
)
 
end
 
end
 
-- ajout du sujet de l'adjectif dans le sujet de l'ébauche précédente
 
-- ajout du sujet de l'adjectif dans le sujet de l'ébauche précédente
Ligne 322 : Ligne 341 :
 
if ebauche.adjectif then
 
if ebauche.adjectif then
 
-- tentative d'ajout du nom de l'adjectif dans les catégories précédentes
 
-- 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
 
for k, v in ipairs( categs ) do
 
local cat, subst = v:gsub(  
 
local cat, subst = v:gsub(  
Ligne 332 : Ligne 352 :
 
if mw.title.new( 'Catégorie:Wikipédia:ébauche ' .. cat ).exists then
 
if mw.title.new( 'Catégorie:Wikipédia:ébauche ' .. cat ).exists then
 
categs[ k ] = cat
 
categs[ k ] = cat
 +
modif = true
 
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
 
end
 
end
Ligne 375 : Ligne 402 :
 
local selon = ebaucheParam( 1, 'selon' )
 
local selon = ebaucheParam( 1, 'selon' )
 
-- ajout d'un point si le paramètre selon commence par un retour ligne ou une majuscule
 
-- 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:sub( 1, 1 ), '%u' ) ) then
+
if message:sub( -1 ) == ')' and ( selon:sub( 1, 3 ) == '<br' or mw.ustring.match( selon, '^%u' ) ) then
 
texte = ( ebaucheParam( 1, 'message' ) ) .. '. ' .. ( ebaucheParam( 1, 'selon' ) ) .. '.'
 
texte = ( ebaucheParam( 1, 'message' ) ) .. '. ' .. ( ebaucheParam( 1, 'selon' ) ) .. '.'
 
else
 
else
Ligne 394 : Ligne 421 :
 
niveau = 'ébauche',
 
niveau = 'ébauche',
 
['icône'] = image,
 
['icône'] = image,
titre = titre:gsub( ' <[^>]*>', '' ),
+
titre = titre:gsub( ' <adj[^>]*>', '' ),
 
texte = texte,
 
texte = texte,
 
id = args.id
 
id = args.id
Ligne 401 : Ligne 428 :
 
-- concaténation des différentes catégories (pas de catégorisation si nocat, ou page de discussion, ou espace utilisateur)
 
-- concaténation des différentes catégories (pas de catégorisation si nocat, ou page de discussion, ou espace utilisateur)
 
local categ = ''
 
local categ = ''
if not ( yesno( args.nocat ) or page.isTalkPage or page.namespace == 2 ) then
+
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
 
for i = 1, #categs do
 
categs[ i ] = cfg.ebaucheCateg:format( categs[ i ] )
 
categs[ i ] = cfg.ebaucheCateg:format( categs[ i ] )
Ligne 408 : Ligne 436 :
 
if categ == '' then
 
if categ == '' then
 
categ = cfg.ebaucheCateg:format('')
 
categ = cfg.ebaucheCateg:format('')
 +
end
 +
if #gestionErreur > 0 then
 +
messageErreur = messageErreur .. '[[Catégorie:Ébauche inconnue]]'
 
end
 
end
 
end
 
end
 
 
local messageErreur = table.concat( gestionErreur )
+
if messageErreur:len() > 0 and not yesno( args.nocat ) then
+
 
messageErreur = messageErreur .. '[[Catégorie:Ébauche inconnue]]'
+
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
 +
end
  
return p._bandeauAvertissement( parametres ) .. messageErreur .. categ
+
---
 +
-- 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
 
end
  
Ligne 422 : Ligne 489 :
 
-- fonction qui contruit deux tableaux récapitulatif de l'ensemble des paramètres d'ébauche
 
-- fonction qui contruit deux tableaux récapitulatif de l'ensemble des paramètres d'ébauche
 
function p.tableParametresEbauches( frame )
 
function p.tableParametresEbauches( frame )
local paramEbauche = mw.loadData('Module:Bandeau/Ébauche')
+
local paramEbauche = mw.loadData( moduleEbauche )
 
local params, paramAdj, paramType = {}, {}, {}
 
local params, paramAdj, paramType = {}, {}, {}
 
local wikiTab = { '<table class="wikitable sortable" style="table-layout:fixed;">' }
 
local wikiTab = { '<table class="wikitable sortable" style="table-layout:fixed;">' }
Ligne 563 : Ligne 630 :
 
return table.concat( wikiTab ):gsub( ' <adjF?>', '' )
 
return table.concat( wikiTab ):gsub( ' <adjF?>', '' )
 
end
 
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
 +
  
  

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 = '&ensp;' .. 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 = '&ensp;' .. (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