Module:Biblio/Article

De Lagny-sur-Marne Wiki
< Module:Biblio
Révision datée du 20 octobre 2013 à 15:37 par Zebulon84 (discussion) (désactivation affichage de "consulté le" (voir Discussion_modèle:Ouvrage#Évolution documentation), catégorisation plus précise.)
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, 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.' )
	
	
	-- span initial (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', 'auteur1', '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
		categTitre = true
		wiki.minsert( Outils.erreur( '[[Modèle:Article|{{Article}}]] : paramètre « <code>titre</code> » manquant' ) )
	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
		categPeriodique = true
		if categTitre then
			wiki.minsert( ', ', Outils.erreur( 'paramètre « <code>périodique</code> » manquant' ) )
		else
			wiki.minsert( ', ', Outils.erreur( '[[Modèle:Article|{{Article}}]] : paramètre « <code>périodique</code> » 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( ', [[', 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 ) )
	else
		categDate = true
		if categTitre or categPeriodique then
			wiki.minsert( ', ', Outils.erreur( 'paramètre « <code>année</code> » ou « <code>date</code> » manquant' ) )
		else
			wiki.minsert( ', ', Outils.erreur( '[[Modèle:Article|{{Article}}]] : paramètre « <code>année</code> » ou « <code>date</code> » manquant' ) )
		end
	end
	
	-- pages
	local page =  validArg( 'passage', 'pages', 'page', 'p.', 'pp.' )
	if page then
		wiki.minsert( ', ', Commun.page, page )
	end	
	local noArticle = validArg( 'numéro article' )
	if noArticle then
		wiki.minsert( ', article ', Commun.numero, noArticle )
	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', 'math reviews'  ) 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' ) ),
			References.mathreviews( validArg( 'math reviews' ) )
		)
		
		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 = 'lire en ligne',
				} .. ( References.indicationDeFormat( args.format ) or '' )
			)
		end
		
		--[=[ consulté le n'est plus affiché, voir [[Discussion_modèle:Ouvrage#Évolution documentation]]
		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
	
	-- ajout des méthadonnées COinS (ContextObjects in Spans)
	wiki.minsert( Commun.COinS( args, validArg, genre ) )
	
	-- fin du span (id) et de la description de l'ouvrage
	wiki.minsert( '</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( 
			categCoauteur and '[[Catégorie:Recension temporaire pour le modèle Article|coauteur]]',
			categLangue  and '[[Catégorie:Page du modèle Article comportant une erreur|langue]]',
			categTitre and '[[Catégorie:Page du modèle Article comportant une erreur|titre]]',
			categPeriodique and '[[Catégorie:Page du modèle Article comportant une erreur|périodique]]'
		)
	end
	
	
	return wiki.concat()
end


return Article