Philip : 1 version importée

2025-02-15T22:39:45Z

1 version importée

← Version précédente	Version du 16 février 2025 à 01:39
(Aucune différence)

fr__>Escargot bleu le 24 janvier 2025 à 09:17

2025-01-24T09:17:14Z

Voir les modifications

Philip le 14 décembre 2022 à 09:22

2022-12-14T09:22:46Z

Nouvelle page

-- Ce module implémente le modèle {{Méta documentation de modèle}}.

local p = {}

local function existePage(page)
return page and page.exists
end

local function textPagebase(page)
--On n'est pas dans une sous-page
if not page.isSubpage then
return page.text
end

--On est dans une sous-page
local sousPage = page.subpageText
if sousPage == 'Documentation'
or sousPage == 'Bac à sable'
or sousPage == 'Test' then
return page.baseText
else
return page.text
end
end

local function nomSouspage(page, souspage)
return page.subjectNsText .. ':' .. textPagebase(page) .. '/' .. souspage
end

local function lienUrl(nomPage, texteLien, action, pagePreload)
local arguments = {}

if action then
arguments['action'] = action
end

if pagePreload then
arguments['preload'] = 'Modèle:Documentation/' .. pagePreload
end

if arguments['action'] or arguments['preload'] then
return mw.ustring.format('[%s %s]', nomPage:fullUrl(arguments), texteLien)
else
return mw.ustring.format('[[%s|%s]]', nomPage.fullText, texteLien)
end
end

local function entete(args, page, doc, existeDoc)
local res = mw.html.create('div')

-- Titre
res
:css('margin-bottom', '1ex')
:css('border-bottom', '1px solid #aaa')
:css('padding-bottom', '3px')
:wikitext('[[Fichier:Test Template Info-Icon.svg|50px|alt=|link=]]')
:tag('span')
:css('font-weight', 'bold')
:css('font-size', '125%')
:css('vertical-align', 'middle')
:wikitext(' ')
:wikitext(args.titre or 'Documentation')
:done()

-- Liens
local editionLien = res:tag('span')
:addClass('mw-editsection-like plainlinks')
:css('vertical-align', 'middle')

if args['aucun contenu additionnel'] == nil then
if not args.contenu then
if existeDoc then
editionLien
:wikitext('[')
:wikitext(lienUrl(doc, 'voir'))
:wikitext('] ')

:wikitext('[')
:wikitext(lienUrl(doc, 'modifier', 'edit'))
:wikitext('] ')

:wikitext('[')
:wikitext(lienUrl(doc, 'historique', 'history'))
:wikitext('] ')
else
local pagePreload = 'Preload'
if page.namespace == 828 then
pagePreload = 'PreloadModule'
end

editionLien
:wikitext('[')
:wikitext(lienUrl(doc, 'créer', 'edit', pagePreload))
:wikitext('] ')
end
end
end

editionLien
:wikitext('[')
:wikitext(lienUrl(page, 'purger', 'purge'))
:wikitext(']')

return res
end

local function protection(page, doc, existeDoc, message)
-- Insertion automatique du modèle de protection.
local niveauProtection = page.protectionLevels.edit

if niveauProtection and niveauProtection[1] then
local tableProtection = {
autoconfirmed = {'semiProtection', '{{%s*[Ss]emi%-protection%s*[|}]', '{{%s*[Ss]emi%-protection +longue%s*[|}]'},
editextendedsemiprotected = {'semiProtectionEtendue', '{{%s*[Ss]emi%-protection +étendue%s*[|}]'},
sysop = {'protection', '{{%s*[Pp]rotection%s*[|}]'},
}
local protection = tableProtection[niveauProtection[1]]
if not protection then
return ''
end

local alreadyShown = false
if existeDoc then
-- Vérification qu'il n'y a pas déjà un modèle de
-- protection dans la documentation du modèle.
local contenuDoc = doc:getContent()
if contenuDoc:match(protection[2]) or (protection[3] and contenuDoc:match(protection[3])) then
alreadyShown = true
end
end

if not alreadyShown then
if message == '' then
message = nil
end
return require('Module:Protection').main({message}, protection[1], page)
end
end
end

-- pour les bacs à sable, on retire les balises de catégories
-- habituellement situées en "includeonly" à la fin de la documentation
local function retireBalisesCategories(contenuDoc)
local count
repeat
contenuDoc, count = mw.ustring.gsub(contenuDoc, '%[%[Catégorie:[^%]]+%]%][\t\r\n\f ]*$', '')
until count == 0

contenuDoc, count = mw.ustring.gsub(contenuDoc, '[\t\r\n\f ]*$', '')

return contenuDoc
end

local function contenu(args, doc, existeDoc)
local page = mw.title.getCurrentTitle()
local res = mw.html.create():newline()

-- Contenu auto haut
if args['contenu auto haut'] then
res:wikitext(args['contenu auto haut'])
:newline()
end

-- Contenu ou sous-page de doc
if args['aucun contenu additionnel'] == nil then
if args.contenu then
res:newline()
:wikitext(args.contenu)
:newline()

elseif existeDoc then
local contenuDoc = mw.getCurrentFrame():expandTemplate{title = doc.prefixedText}
if page.subpageText == 'Bac à sable' or page.subpageText == 'Test' then
contenuDoc = retireBalisesCategories(contenuDoc)
end
res:newline()
:wikitext(contenuDoc)
:newline()

elseif page.subpageText ~= 'Bac à sable' and page.subpageText ~= 'Test' and args['contenu facultatif'] == nil then
local texteBandeau = 'Ce %s ne possède aucune documentation '
..'explicative en sous-page, pas même une description succincte. '
..'Vous pouvez %s afin de documenter ce %s adéquatement.'
if page.namespace == 828 then -- Module
texteBandeau = texteBandeau:format(
'module',
lienUrl(doc, 'créer cette sous-page', 'edit', 'PreloadModule'),
'module'
)
else -- Modèle
texteBandeau = texteBandeau:format(
'modèle',
lienUrl(doc, 'créer cette sous-page', 'edit', 'Preload'),
'modèle'
)
end
if page.namespace == 10 then -- Modèle
texteBandeau = texteBandeau .. '[[Catégorie:Modèle sans documentation]]'
elseif page.namespace == 828 then -- Module
if page.text:sub(1, 12) == 'Utilisateur:' then
-- Pas de catégorisation pour le pseudo-namespace "Module:Utilisateur:Toto/Nom du module"
elseif existeDoc == false then
texteBandeau = texteBandeau .. '[[Catégorie:Module sans documentation]]'
end
end
local param = {
['icône'] = 'OOjs_UI_icon_book-ltr.svg',
alt = 'MIT',
style = 'width:80%;',
texte = texteBandeau,
}
res:wikitext(require('Module:Bandeau')._bandeau(param))
end
end

-- Contenu auto bas
if args['contenu auto bas'] then
res:newline()
:wikitext(args['contenu auto bas'])
end

res
:tag('div')
:css('clear', 'both')

return res
end

local function lienWstat(nomPage, texteLien)
local nomPageEncoded = mw.text.encode(nomPage)
local nomPageNoSpaces = mw.ustring.gsub(nomPageEncoded, ' ', '_')
local url = 'https://wstat.fr/template/info/' .. nomPageNoSpaces
return mw.ustring.format('[%s %s]', url, texteLien)
end

local function lienRechercheModule(nomModule, texteLien)
local nomModuleEncoded = mw.text.encode(nomModule)
local nomModuleNoSpaces = mw.ustring.gsub(nomModuleEncoded, ' ', '+')
local quote = mw.text.encode('"')
local url = 'https://fr.wikipedia.org/w/index.php?title=Spécial:Recherche&ns828=1&search=insource:' .. quote .. nomModuleNoSpaces .. quote
return mw.ustring.format('[%s %s]', texteLien)
end

local function notice(args, page, doc, existeDoc)
local res = mw.html.create('div')
:css('border-top', '1px solid #aaa')
:css('margin', '1.5em 0 0')

local contenuParagraphe = res
:tag('p')
:css('margin-bottom', '0')
:css('padding-left', '1em')
:css('font-style', 'italic')

-- Phrase "la documentation est générée par ..."
if args['nom modèle'] then
local lienAide = 'modèle'
if page.namespace == 828 then
lienAide = 'module'
end

contenuParagraphe
:wikitext('Ce ')
:wikitext(lienAide)
:wikitext(' ne peut être modifié que par les administrateurs. ')
:wikitext(mw.getCurrentFrame():expandTemplate{title = 'm', args = {args['nom modèle']} })
:wikitext('. ')
else
contenuParagraphe
:tag('span')
:addClass('error')
:wikitext('Erreur : le paramètre <code>nom modèle</code> n\'est pas renseigné. ')
end

-- Phrase indiquant la provenance du contenu (dans le corps ou en sous-page)
if args['aucun contenu additionnel'] == nil then
if args.contenu then
contenuParagraphe
:wikitext('Elle est directement incluse dans l\'appel de ce dernier. ')
:wikitext('Si cette page est protégée, veuillez ')
:wikitext('transférer le contenu de la documentation vers sa ')
:wikitext(lienUrl(doc, 'sous-page dédiée', 'edit', 'Preload'))
:wikitext('. ')
elseif existeDoc then
contenuParagraphe
:wikitext('Elle est incluse depuis ')

if args['page doc'] then
contenuParagraphe
:wikitext('la page [[')
:wikitext(tostring(doc))
:wikitext(']]. ')
else
contenuParagraphe
:wikitext('sa [[')
:wikitext(tostring(doc))
:wikitext('|sous-page de documentation]]. ')
end

contenuParagraphe
:wikitext('Veuillez placer les catégories sur cette page-là. ')
end
end

-- Phrase indiquant les liens vers les statistiques
local nomStat = textPagebase(page)
local texteWstat = "statistiques"

if page.namespace == 828 then
nomStat = 'Module:' .. nomStat
texteWstat = texteWstat .. " d'appel depuis le wikicode"
else
texteWstat = texteWstat .. " d'utilisation du modèle"
end

if page.namespace == 828 then --pour les modules, recherche de "Module:..." dans l'espace de noms Module:
contenuParagraphe
:wikitext(' et les ')
:wikitext(lienRechercheModule(nomStat, "appels depuis d'autres modules"))
end

return res
end

function p._documentation(args)
local page = mw.title.getCurrentTitle()
local titrePageDoc = args['page doc'] or nomSouspage(page, 'Documentation')
local doc = mw.title.new(titrePageDoc)
local existeDoc = existePage(doc)
local res = mw.html.create()

--Bandeau pour les sous-pages /Bac à sable
if page.subpageText == 'Bac à sable' then
res
:tag('div')
:css('clear', 'both')
:done()
:wikitext(mw.getCurrentFrame():expandTemplate{title = 'Sous-page de bac à sable'})
end

--Génération de la documentation
local couleur = '#ecfcf4'
if page.namespace == 828 then
couleur = '#ecf0fc'
end

res
:tag('div')
:addClass('documentation')
:css('clear', 'both')
:css('margin', '1em 0 0 0')
:css('border', '1px solid #aaa')
:css('background', couleur)
:css('padding', '1em 1em 0.8em')
:node(entete(args, page, doc, existeDoc))
:wikitext(protection(page, doc, existeDoc, args['message protection']))
:node(contenu(args, doc, existeDoc))
:node(notice(args, page, doc, existeDoc))

-- Catégorisation par défaut pour les modules sans documentation
if page.namespace == 828 and page.subpageText ~= 'Bac à sable' and page.subpageText ~= 'Test' then
if existeDoc == false then
res:wikitext("[[Catégorie:Module en langage Lua]]")
end
end

return tostring(res)
end

function p.documentation(frame)
local args = {}
local argsParent = frame:getParent().args

--Paramètres vides interprétés par Lua
for cle, val in pairs(argsParent) do
val = mw.text.trim(val)
if val ~= '' then
args[cle] = val
end
end

return p._documentation(args)
end

return p

Module:Documentation - Historique des versions

Philip : 1 version importée

fr__>Escargot bleu le 24 janvier 2025 à 09:17

Philip le 14 décembre 2022 à 09:22

Philip : 1 version importée