Module:Biblio/Article

De Lagny-sur-Marne Wiki
Aller à : navigation, rechercher

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 ) )
	if validArg( 'libellé' ) then
		wiki.minsert( '<small>[', args['libellé'], ']</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.insert( args.auteurs )
		else 
			 wiki.insert( 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.insert( args.titre ) 
		
		if validArg( 'sous-titre' ) then
			 wiki.minsert( ( codeLangue and ': ' ) or ' : ', args['sous-titre'] )
		end
		wiki.minsert( lienTitre and ']]' )
		
		wiki.insert( '</cite> »' )
	else
		wiki.insert( Outils.erreur( 'paramètre « <code>titre</code> » manquant' ) )
		categTitre = true
	end
	
	-- périodique
	if validArg( 'périodique' ) then
		wiki.insert( ', <i>' )
		if validArg( 'lien périodique' ) then
			wiki.minsert( '[[', args['lien périodique'], '|', args['périodique'], ']]' )
		else
			wiki.insert( args['périodique'] )
		end
		wiki.insert( '</i>' )
	else
		wiki.insert( Outils.erreur( 'paramètre « <code>périodique</code> » manquant' ) )
		categPeriodique = true
	end
	
	-- références : lieu, éditeur
	if validArg( 'lieu édition', 'location' ) then
		wiki.minsert( ', ', validArg( 'lieu édition', 'location' ) )
	end	
	local editeur = validArg( 'éditeur', 'publisher' )
	if editeur then
		wiki.minsert( ', ', validArg( 'lieu édition', 'location' ) )
		if validArg( 'lien éditeur' ) then
			wiki.minsert( '[[', args['lien éditeur'], '|', editeur, ']]' )
		else
			wiki.insert( editeur )
		end
	end
	
	-- références : série, volume
	if validArg( 'série' ) then
		wiki.minsert( ', ', Outils.ordinal( args['série'], true ), ' série' )
	end 
	if validArg( 'volume', 'vol' ) then
		wiki.minsert( ', ', Commun.vol, validArg( 'volume', 'vol' ) )
	end
	if validArg( 'tome' ) then
		wiki.minsert( ', ', Commun.tome, args.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.insert( ' « ', titreVolume, ' »' )
	end
	
	-- références : n° du périodique et titre du n° et date de publication
	if validArg( 'numéro', 'no', 'issue' ) then
		wiki.minsert( ', ', validArg( 'numéro', 'no', 'issue' ) )
	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.insert( ' « ', titreNumero, ' »' )
	end
	if validArg( 'année', 'date', 'year' ) then
		wiki.minsert( ', ', Commun.inscriptionDate( args ) )
	end
	
	-- pages
	if validArg( 'pages', 'page', 'passage', 'p.', 'pp.' ) then
		wiki.minsert( ', ', Commun.numero, validArg( 'pages', 'page', 'passage', 'p.', 'pp.' ) )
	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' ) ) 
		)
		
		if validArg( 'présentation en ligne', 'résumé' ) then
			enligne.insert( References.enLigne{ 
				lien = validArg( 'présentation en ligne', 'résumé' ),
				texte = 'résumé',
			} )
		end
		if validArg( 'url texte', 'url', 'lire en ligne', 'texte' ) then
			enligne.insert( 
				References.enLigne{
					lien = validArg( 'url texte', 'url', 'lire en ligne', 'texte' ),
					texte = 'texte intégral',
				} .. ( References.indicationDeFormat( args.format ) or '' )
			)
		end
		
		if validArg( 'consulté le', 'accessdate', 'consulté' ) then
			enligne.insert( 'consulté le ' .. Outils.nobr( validArg( 'consulté le', 'accessdate', 'consulté' ) ) )
		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.insert( '</span></span>' )
	
	 -- citation et commentaire de cet ouvrage 
	if validArg( 'extrait', 'quote' ) then
		wiki.minsert( ' :<blockquote>', args.extrait, '</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