Module:Biblio/Article
< Module:Biblio
Révision datée du 19 septembre 2013 à 12:41 par Zebulon84 (discussion)
La documentation pour ce module peut être créée à Module:Biblio/Article/doc
local Article = { }
local Commun = require( 'Module:Biblio/Commun' )
local References = require( 'Module:Biblio/Références' )
local Outils = require( 'Module:Outils' )
local TableBuilder = require( 'Module:TableBuilder' )
local Langue -- = require( 'Module:Langue' ) ne sera chargé que si nécessaire.
function Article.article( args )
-- La table wiki va recevoir tout les petits bouts de texte, et sera concaténtée à la fin.
-- Elle utilise la metat-table de TableBuilder, permettant d'utiliser les fonctions de la
-- librairy table comme des mèthodes. minsert permet d'insérer plusieurs élément en une
-- seule fois en, ignorant les paramètre nil.
local wiki = TableBuilder.new()
-- validArg renvoi le premier paramètre non vide, ou nil s'ils sont tous vides.
-- Seul les noms des paramètres doivent être transmis à la fonction.
local validArg = function ( ... ) return Outils.validTextArg( args, ... ) end
-- variable servant à la catégorisation
local categLangue, categAuteur, categCoauteur, categTitre, categPeriodique
-- clarification paramètre nécéssaire pour les coins
args['périodique'] = validArg( 'périodique', 'revue', 'journal' )
args.titre = validArg( 'titre', 'title' )
-- COinS, id et libelé
wiki.minsert( Commun.COinS( args, validArg, 'article' ) )
wiki.minsert( Commun.spanInitial ( args, validArg ) )
local libelle = validArg( 'libellé' )
if libelle then
wiki.minsert( '<small>[', libelle, ']</small> ' )
end
-- indication de langue
local indicLangue, codeLangue, categLangue = Commun.indicationDeLangue ( args, validArg )
wiki.minsert( indicLangue, ' ' )
-- Liste des auteurs et de leur responsabilités (principale et secondaire)
if validArg( 'nom1', 'nom', 'auteur', 'auteurs', 'last1', 'last', 'author1', 'author' ) then
if validArg( 'auteurs' ) then
wiki.minsert( args.auteurs )
else
wiki.minsert( Commun.responsabilitePrincipale( args, validArg ) )
end
wiki.minsert( Commun.responsabiliteSecondaire( args, validArg ), ', ' )
categAuteur = validArg( 'auteur', 'auteurs', 'author1', 'author', 1, 2, 3, 4 )
categCoauteur = validArg( 'coauteurs', 'coauteur', 'coauthors' )
end
-- titre, sous-titre
if args.titre then
if codeLangue then
Langue = Langue or require( 'Module:Langue' )
local dir = Langue.directionLangue( codeLangue )
if dir == 'rtl' then dir = '" dir="rtl'
else dir = nil
end
wiki.minsert( '« <cite style="font-style:normal;" lang="', codeLangue, dir, '">')
else
wiki.minsert( '« <cite style="font-style:normal;">')
end
local lienTitre = validArg( 'lien titre' )
if lienTitre then
wiki.minsert( '[[', lienTitre, '|' )
end
wiki.minsert( args.titre )
local sousTitre = validArg( 'sous-titre' )
if sousTitre then
wiki.minsert( ( codeLangue and ': ' ) or ' : ', sousTitre )
end
wiki.minsert( lienTitre and ']]' )
wiki.minsert( '</cite> »' )
else
wiki.minsert( Outils.erreur( 'paramètre « <code>titre</code> » manquant' ) )
categTitre = true
end
-- périodique
local periodique = validArg( 'périodique' )
if periodique then
wiki.minsert( ', <i>' )
local lienPeriodique = validArg( 'lien périodique' )
if lienPeriodique then
wiki.minsert( '[[', lienPeriodique, '|', periodique, ']]' )
else
wiki.minsert( periodique )
end
wiki.minsert( '</i>' )
else
wiki.minsert( Outils.erreur( 'paramètre « <code>périodique</code> » manquant' ) )
categPeriodique = true
end
-- références : lieu, éditeur
local lieu = validArg( 'lieu', 'lieu édition', 'location' )
if lieu then
wiki.minsert( ', ', lieu )
end
local editeur = validArg( 'éditeur', 'publisher' )
if editeur then
local lienEditeur = validArg( 'lien éditeur' )
if lienEditeur then
wiki.minsert( ', [[', lienEditeur, '|', editeur, ']]' )
else
wiki.minsert( ', ', editeur )
end
end
-- références : série, volume
local serie = validArg( 'série' )
if serie then
wiki.minsert( ', ', Outils.ordinal( serie, true ), ' série' )
end
local volume = validArg( 'volume', 'vol' )
if volume then
wiki.minsert( ', ', Commun.vol, volume )
end
local tome = validArg( 'tome' )
if tome then
wiki.minsert( ', ', Commun.tome, tome )
end
local titreVolume = validArg( 'titre volume', 'titre vol' )
if titreVolume then
if codeLangue then
Langue = Langue or require( 'Module:Langue' )
titreVolume = Langue.lang{ codeLangue, titreVolume }
end
wiki.minsert( ' « ', titreVolume, ' »' )
end
-- références : n° du périodique et titre du n° et date de publication
local numero = validArg( 'numéro', 'no', 'issue' )
if numero then
wiki.minsert( ', ', Commun.numero, numero )
end
local titreNumero = validArg( 'titre numéro', 'titre no' )
if titreNumero then
if codeLangue then
Langue = Langue or require( 'Module:Langue' )
titreNumero = Langue.lang{ codeLangue, titreNumero }
end
wiki.minsert( ' « ', titreNumero, ' »' )
end
if validArg( 'année', 'date', 'year' ) then
wiki.minsert( ', ', Commun.inscriptionDate( args ) )
end
-- pages
local page = validArg( 'pages', 'page', 'passage', 'p.', 'pp.' )
if page then
wiki.minsert( ', ', Commun.page, page )
end
-- lien vers l'ouvrage en ligne
if validArg( 'url texte', 'url', 'issn', 'doi', 'pmid', 'résumé', 'ISSN', 'lire en ligne', 'isbn', 'texte', 'présentation en ligne', 'issn1', 'ISBN', 'PMID', 'pmcid', 'pmc', 'DOI', 'jstor' ) then
local enligne = TableBuilder.new( )
enligne.minsert( References.isbn( args, validArg ), References.issn( args, validArg ) )
enligne.minsert(
References.pmid( validArg( 'pmid', 'PMID' ) ),
References.pmcid ( validArg( 'pmcid', 'pmc' ) ),
References.doi( validArg( 'doi', 'DOI' ) ),
References.jstor( validArg( 'jstor' ) )
)
local resume = validArg( 'résumé', 'présentation en ligne' )
if resume then
enligne.insert( References.enLigne{
lien = resume,
texte = 'résumé',
} )
end
local url = validArg( 'url texte', 'url', 'lire en ligne', 'texte' )
if url then
enligne.insert(
References.enLigne{
lien = url,
texte = 'texte intégral',
} .. ( References.indicationDeFormat( args.format ) or '' )
)
end
local consulteLe = validArg( 'consulté le', 'accessdate', 'consulté' )
if consulteLe then
enligne.insert( 'consulté le ' .. Outils.nobr( consulteLe ) )
end
wiki.minsert( ' <small>', mw.text.nowiki( '[' ), enligne.concat( ', ' ), ']</small>' )
end
-- fin des span (COinS et id) et de la description de l'article
wiki.minsert( '</span></span>' )
-- citation et commentaire de cet ouvrage
local citation = validArg( 'extrait', 'quote', 'citation' )
if citation then
wiki.minsert( ' :<blockquote>', citation, '</blockquote>' )
end
wiki.minsert( Commun.commentaire( args ) )
if mw.title.getCurrentTitle().namespace == 0 then
wiki.minsert(
categAuteur and '[[Catégorie:Utilisation du paramètre auteur dans le modèle article]]',
categCoauteur and '[[Catégorie:Recension temporaire pour le modèle Article]]',
( categLangue or categTitre or categPeriodique ) and '[[Catégorie:Page du modèle Article comportant une erreur]]'
)
end
return wiki.concat()
end
return Article
