Module:Documentation

--Ce module implemente le modèle Modèle:Méta documentation de modèle.

local p = {}

function p.corps(frame)

   local args = frame:getParent().args
   local page = mw.title.getCurrentTitle()
   local corps = {}

   --Bandeau pour les sous-pages /Bac à sable
   if page.subpageText == 'Bac à sable' then

table.insert(corps, '

')

       table.insert(corps, frame:preprocess('Modèle:Sous-page de bac à sable'))
   end

   --Génération de la documentation
   table.insert(corps, frame:preprocess(p.entete(frame, args, page)))
   table.insert(corps, p.contenu(frame, args, page))
   table.insert(corps, frame:preprocess(p.notice(frame, args, page)))

   --Code HTML brut
   if args.raw then
       return frame:preprocess('' .. table.concat(corps) .. '')
   end

   return table.concat(corps)

end

function p.ifexist(page)

   if not page then return false end
   if mw.title.new(page).exists then return true end
   return false

end

function p.docname(page)

   --On n'est pas dans une sous-page
   if not page.isSubpage then return page.subjectNsText .. ":" .. page.text .. "/Documentation" end

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

end

function p.entete(frame, args, page)

local entete = {'

') table.insert(entete, '

')

   table.insert(entete, '')
   table.insert(entete, ' ')

   if args.titre then
       table.insert(entete, args.titre)
   else
       table.insert(entete, 'Documentation')
   end
   table.insert(entete, '')

   if not args.contenu then
       table.insert(entete, '

       if args[1] then
           if p.ifexist(args[1]) then
               table.insert(entete, args[1])
               table.insert(entete, '|action=edit modifier}}]] [Modèle:Purger le cache')
           else
               table.insert(entete, args[1])
               table.insert(entete, '|action=edit&preload=Modèle:Documentation/Preload créer}}]')
           end
       else
           if p.ifexist(doc) then
               table.insert(entete, doc)
               table.insert(entete, '|action=edit modifier}}]] [Modèle:Purger le cache')
           else
               table.insert(entete, doc)
               table.insert(entete, '|action=edit&preload=Modèle:Documentation/Preload créer}}]')
           end
       end
       table.insert(entete, ']')
   end

table.insert(entete, '

')

   return table.concat(entete)

end

function p.contenu(frame, args, page)

   local contenu = {}
   local doc = p.docname(page)

   if args.contenu then
       table.insert(contenu, '\n')
       table.insert(contenu, args.contenu)
   else
       table.insert(contenu, frame:preprocess('\n'))
       --Évite toute récursion
       if args[1]
       and frame:preprocess('Module:Documentation') ~= frame:preprocess()
       and p.ifexist(args[1]) then
           table.insert(contenu, frame:preprocess('{{' .. args[1] .. '}}'))
       elseif frame:preprocess('Module:Documentation') ~= frame:preprocess('%27_.._doc_.._%27')
       and p.ifexist(doc) then
           table.insert(contenu, frame:preprocess('Modèle:' .. doc .. ''))
       end
   end

table.insert(contenu, frame:preprocess('\n

\n'))

   return table.concat(contenu)

end

function p.notice(frame, args, page)

   local notice = {}
   local doc = p.docname(page)

   if args.contenu then

table.insert(notice, '

') table.insert(notice, '

\n') if args.notice then table.insert(notice, args.notice) else table.insert(notice, 'La documentation de ce modèle ') table.insert(notice, 'est directement incluse dans le corps de ce dernier.
') table.insert(notice, 'Si cette page est protégée, veuillez transférer le contenu de la documentation vers sa ') table.insert(notice, '[{{fullurl:' .. doc) table.insert(notice, '|action=edit&preload=Modèle:Documentation/Preload sous-page dédiée}}].') end else if args[1] and p.ifexist(args[1]) or p.ifexist(doc) then table.insert(notice, '

') table.insert(notice, '

') table.insert(notice, 'La documentation de ce ') table.insert(notice, 'modèle est incluse depuis sa ') if args[1] then table.insert(notice, '[[' .. args[1] .. '|sous-page de documentation]]') else table.insert(notice, 'sous-page de documentation') end table.insert(notice, ' (') table.insert(notice, '[{{fullurl:') if args[1] then table.insert(notice, args[1] .. '|action=edit}} modifier]') table.insert(notice, ' | [{{fullurl:') table.insert(notice, args[1] .. '|action=history}} historique]') else table.insert(notice, doc .. '|action=edit}} modifier]') table.insert(notice, ' | [{{fullurl:') table.insert(notice, doc .. '|action=history}} historique]') end table.insert(notice, ').
') else table.insert(notice, '

') table.insert(notice, '

') end table.insert(notice, 'Les éditeurs peuvent travailler dans le ') if args[1] and p.ifexist(frame:preprocess('Bac à sable')) or p.ifexist(frame:preprocess('Bac à sable')) then table.insert(notice, 'bac à sable') table.insert(notice, ' (') table.insert(notice, 'modifier)') else table.insert(notice, 'bac à sable (') table.insert(notice, 'créer') table.insert(notice, ')') end table.insert(notice, ' et la page de ') if args[1] and p.ifexist(frame:preprocess('Test')) or p.ifexist(frame:preprocess('Test')) then table.insert(notice, 'test') table.insert(notice, ' (') table.insert(notice, 'modifier)') else table.insert(notice, 'test (') table.insert(notice, 'créer') table.insert(notice, ')') end table.insert(notice, '.
Veuillez placer les catégories dans la sous-page ') table.insert(notice, '[') table.insert(notice, '{{fullurl:') if args[1] and p.ifexist(args[1]) or p.ifexist(doc) then if args[1] then table.insert(notice, args[1]) else table.insert(notice, doc) end table.insert(notice, '|action=edit') else if args[1] then table.insert(notice, args[1]) else table.insert(notice, doc) end table.insert(notice, '|action=edit&preload=Modèle:Documentation/Preload') end table.insert(notice, ' /Documentation}}].') end table.insert(notice, '

')

   return table.concat(notice)

end

return p