Module:Biblio/Article

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, categDate

-- clarification paramètre nécéssaire pour les coins args['périodique'] = validArg( 'périodique', 'revue', 'journal' ) args.titre = validArg( 'titre', 'title' ) args.passage = validArg( 'pages', 'page', 'passage', 'p.', 'pp.' )

-- 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( '[', libelle, '] ' ) 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( '« ') else wiki.minsert( '« ') end

local lienTitre = validArg( 'lien titre' ) if lienTitre then wiki.minsert( '' ) 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( ' »' ) else categTitre = true wiki.minsert( Outils.erreur( '[[Modèle:Article| , , ]] : paramètre « titre » manquant' ) ) end

-- périodique local periodique = validArg( 'périodique' ) if periodique then wiki.minsert( ', ' ) local lienPeriodique = validArg( 'lien périodique' ) if lienPeriodique then wiki.minsert( '', periodique, '' ) else wiki.minsert( periodique ) end wiki.minsert( '' ) else categPeriodique = true if categTitre then wiki.minsert( ', ', Outils.erreur( 'paramètre « périodique » manquant' ) ) else wiki.minsert( ', ', Outils.erreur( '[[Modèle:Article| , , ]] : paramètre « périodique » manquant' ) ) end 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( ', ', 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 ) ) else categDate = true if categTitre or categPeriodique then wiki.minsert( ', ', Outils.erreur( 'paramètre « année » ou « date » manquant' ) ) else wiki.minsert( ', ', Outils.erreur( '[[Modèle:Article| , , ]] : paramètre « année » ou « date » manquant' ) ) end end

-- pages local page = validArg( 'passage', 'pages', 'page', '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.oclc( validArg( 'oclc' ) ), References.pmid( validArg( 'pmid', 'PMID' ) ), References.pmcid ( validArg( 'pmcid', 'pmc' ) ), References.doi( validArg( 'doi', 'DOI' ) ), References.jstor( validArg( 'jstor' ) ), References.bibcode( validArg( 'bibcode' ) ) )

local arxiv = validArg( 'arxiv' ) if arxiv then enligne.minsert( 'arXiv [[arxiv:' .. arxiv .. '|]]' ) end

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( ' ', mw.text.nowiki( '(' ), enligne.concat( ', ' ), ')' ) end

-- fin des span (COinS et id) et de la description de l'article wiki.minsert( '' )

-- citation et commentaire de cet ouvrage local citation = validArg( 'extrait', 'quote', 'citation' ) if citation then

wiki.minsert( ' :

', citation, '

' )

end wiki.minsert( Commun.commentaire( args ) )

if mw.title.getCurrentTitle().namespace == 0 then wiki.minsert( categAuteur and , categCoauteur and , ( categLangue or categTitre or categPeriodique ) and ) end

return wiki.concat() end

return Article