Module:Langue : Différence entre versions
(Ajout gestion d'erreur sur le chargement de Module:Langue/Data, Modification pour utiliser le nouveau forma de /Data avec une table par langue.) |
(lang : correction de la catégorisation) |
||
Ligne 147 : | Ligne 147 : | ||
if success and ( type( tabLangue ) ~= 'table' or tabLangue.invalide ) then | if success and ( type( tabLangue ) ~= 'table' or tabLangue.invalide ) then | ||
local namespaceCategorisation = { [0] = true, [4] = true, [10] = true, [14] = true, [100] = true } | local namespaceCategorisation = { [0] = true, [4] = true, [10] = true, [14] = true, [100] = true } | ||
− | if namespaceCategorisation[ mw. | + | if namespaceCategorisation[ mw.title.getCurrentTitle().namespace ] then |
wikiText = wikiText .. '[[Catégorie:Page avec code de langue invalide|' .. code .. ']]' | wikiText = wikiText .. '[[Catégorie:Page avec code de langue invalide|' .. code .. ']]' | ||
end | end |
Version du 13 août 2013 à 17:47
La documentation pour ce module peut être créée à Module:Langue/doc
local Langue = { } -- Chargement du de la base de donnée des langues avec gestion d'erreur. local dataLangue local success, resultat = pcall (mw.loadData, 'Module:Langue/Data' ) if success then dataLangue = resultat else -- Base de donnée à minima en cas de bug sur le Module:Langue/Data dataLangue = { en = { code = 'en', nom = anglais }, de = { code = 'de', nom = 'allemand' }, it = { code = 'it', nom = 'italien' }, es = { code = 'es', nom = 'espagnol' }, } dataLangue.anglais = dataLangue.en dataLangue.allemand = dataLangue.de dataLangue.italien = dataLangue.it dataLangue.espagnol = dataLangue.es end -- premierParametre renvoie le premier paramètre de Frame, que celui-ci ait été au module par invoke, directement au modèle, -- ou à l'intérieur d'un module sous forme de string dans un tableau ou directement de string. -- Si aucun de ces argument ne contient de chaine, la fonction renvoie nil. -- Si le deuxième paramètre est true, la chaine est renvoyée trimée et en minuscule. local function premierParametre( frame, lowerCase ) local arg if type( frame ) == 'table' then arg = ( frame.getParent and ( frame.args[1] or frame:getParent().args[1] ) ) or frame[1] elseif type( frame ) == 'string' then arg = frame end if type( arg ) ~= 'string' then arg = nil end if arg and lowerCase then arg = mw.ustring.lower( mw.text.trim ( arg ) ) end return arg end -- Voir Modèle:Direction langue -- Paramètre : -- 1 : nom de langue ou code IETF. function Langue.directionLangue( frame ) local arg = premierParametre( frame, true ) local direction = 'ltr' local tabLangue = dataLangue[ arg ] if tabLangue and tabLangue.rtl then direction = 'rtl' end return direction end -- Voir Modèle:Code langue -- Paramètre : -- 1 : nom de langue. function Langue.codeLangue( frame ) local arg = premierParametre( frame, true ) local tabLangue = dataLangue[ arg ] return (tabLangue and tabLangue.code) or arg or '' end -- Voir Modèle:Code langue 2 -- Paramètre : -- 1 : nom de langue. function Langue.codeLangue2( frame ) local arg = premierParametre( frame, true ) local tabLangue = dataLangue[ arg ] return (tabLangue and tabLangue.code) or '' end -- Voir Modèle:Nom langue -- Paramètre : -- 1 : code IETF de langue. function Langue.nomLangue( frame ) local arg = premierParametre( frame, true ) if type( arg ) ~= 'string' or arg == '' then return '<span style="color:red">langue non précisée</span>' end local tabLangue = dataLangue[ arg ] if tabLangue then local nom if type( tabLangue.page ) == 'string' then nom = tabLangue.page .. '|' .. tabLangue.nom else nom = tabLangue.nom end return '[[' .. nom .. ']]' else return '<span style="color:red;">langue non reconnue : ' .. arg .. ' </span>' end end -- Voir Modèle:Lang -- Paramètres : -- 1 : code IETF de langue, -- texte ou 2 : texte dans cette langue, -- trans : translitération du texte, -- dir : direction de la langue (obsolète : peut être en paramètre 1, avec code en 2 et texte en 3). function Langue.lang( frame ) local args = ( frame.getParent and frame:getParent().args ) or frame or { } -- préparation pour appel par modèle ou direct. local code = mw.ustring.lower( mw.text.trim( args[1] or '' ) ) local texte = args.texte or '' if texte == '' then texte = args[2] or '' end local dir = args.dir local trans = args.trans -- Décalage des paramètres si code contient la direction du texte (obsolete mais toujours possible). if code == 'ltr' or code == 'rtl' then dir = code code = mw.ustring.lower( mw.text.trim( args[2] ) ) texte = args[3] or '' end -- Si la langue est reconnue, la valeur de la table est prise en compte (permet de corrigé les noms de langue en toute lettre). local tabLangue = dataLangue[ code ] if tabLangue and tabLangue.code then code = tabLangue.code end -- Prépatation du rendu de direction du texte. dir = mw.ustring.lower(dir or '') if dir == 'ltr' or dir == 'rtl' then dir = ' dir=' .. dir else dir = (tabLangue and tabLangue.rtl and ' dir=rtl') or '' end -- Transliteration. if trans and trans ~= '' then trans = ' (<span class="lang-' .. code .. ' transcription" lang="' .. code .. '-Latn"' .. ' dir="ltr">' .. trans .. '</span>)' else trans = '' end -- Compilation du texte à retourner. local wikiText = '' if code == '' then wikiText = texte else wikiText = '<span class="lang-' .. code .. '" lang="' .. code .. '"' .. dir .. '>' .. texte .. '</span>' .. trans end -- Ajout de la catégorie Page avec code de langue invalide si le code langue non reconnu ou invalide. if success and ( type( tabLangue ) ~= 'table' or tabLangue.invalide ) then local namespaceCategorisation = { [0] = true, [4] = true, [10] = true, [14] = true, [100] = true } if namespaceCategorisation[ mw.title.getCurrentTitle().namespace ] then wikiText = wikiText .. '[[Catégorie:Page avec code de langue invalide|' .. code .. ']]' end end return wikiText end -- Voir Modèle:Langue -- Paramètres : -- 1 : nom de langue ou code IETF, -- texte ou 2 : texte dans cette langue, -- trans : translitération du texte, -- dir : direction de la langue. function Langue.langue( frame ) return Langue.lang( frame ) end -- Voir Modèle:Indication de langue -- Paramètres : -- 1 : nom de langue, -- 2 : code IETF, -- texte : texte dans cette langue, -- dir : direction de la langue. function Langue.indicationDeLangue( frame ) local args = ( frame.getParent and frame:getParent().args ) or frame or { } local nomLangue = args[1] or '' local code = mw.ustring.lower( args.langue or mw.text.trim( args[2] or '' ) ) local texte = args.texte local dir = args.dir local wikiText = '' -- Cas ou le premier et/ou le deuxième paramètre est vide. if code .. nomLangue == '' then return texte elseif nomLangue == '' then nomLangue = dataLangue[ code ] nomLangue = (nomLangue and nomLangue.nom or '???') elseif code == '' then code = dataLangue[ nomLangue ] code = ( code and code.code or '' ) if code == '' then return texte end end -- Gestion du texte. if texte and texte ~= '' then texte = ' ' .. Langue.lang{ code, dir = dir, texte = texte } else texte = '' end -- Compilation de l'indicateur de langue et du texte. wikiText = '<span class="indicateur-langue">(<abbr class="abbr" title="Langue : ' .. nomLangue .. '">' .. code .. '</abbr>)</span>' .. texte return wikiText end -- Voir Modèle:Multilang -- Paramètres : codes IETF ou noms de langue, en nombre indéfini. function Langue.indicationMultiLangue( frame ) if type( frame ) ~= 'table' then return end local args = (frame.getParent and frame:getParent().args) or frame local listeNom = { } local listeCode = { } local tabLangue for i, code in ipairs( args ) do if code == '' or type( code ) ~= 'string' then break end tabLangue = dataLangue[ mw.ustring.lower( code ) ] if type( tabLangue ) ~= 'table' then table.insert( listeNom, '???' ) local erreur = ' <span style="color:red; font-size:120%;">langue non reconnue : ' .. code .. ' </span>' table.insert( listeCode, erreur ) else table.insert( listeNom, tabLangue.nom ) table.insert( listeCode, tabLangue.code ) end end local n = #listeCode local pluriel = '' if n == 0 then return '' elseif n > 1 then pluriel = 's' end local wikiText = '<span class="indicateur-langue">(<abbr class="abbr" title="Langue' .. pluriel .. ' : ' .. mw.text.listToText( listeNom ) .. '">' .. table.concat( listeCode, '+' ) .. '</abbr>)</span>' mw.log( wikiText ) return wikiText end -- Voir Modèle:Langue avec nom -- Paramètres : -- 1 : code IETF de langue, -- texte ou 2 : texte dans cette langue, -- trans : translitération du texte, -- dir : direction de la langue. function Langue.langueAvecNom( frame ) local args = ( frame.getParent and frame:getParent().args ) or frame or { } local code = mw.ustring.lower( mw.text.trim( args [1] or '') ) local texte = args.texte or args[2] or '' local trans = args.trans local dir = args.dir local wikiText = '' -- Détection de la direction du texte. if code == 'ltr' or code == 'rtl' then dir = code code = mw.ustring.lower( mw.text.trim( args[2] ) ) texte = args[3] or '' end -- Définition du nom de la langue en français. local nom = Langue.nomLangue{ code } if texte ~= '' then texte = ' ' .. Langue.lang{ code, dir = dir, texte = texte, trans = trans } end wikiText = nom .. ' :' .. texte return wikiText end -- Affichage d'un message d'erreur si le Module:Langue/Data n'a pas été chargé correctement, -- pour la page de discussion de la base de donnée et ceux qui veulent surveiller cette page. function Langue.erreurModuleData() if success == false then local message = [[<strong class="error">Le chargement du module Langue/Data génère une erreur : </strong><br />%s<br /> <span class="error">Cette erreur doit être corrigée au plus vite car des milliers de page ne s'affichent pas correctement</span> ]] return string.format( message, resultat ) end end return Langue