Module:Biblio/Ouvrage : Différence entre versions
(chapitre : Ajout de l'alias "title") |
(Utilisation de Commun.validTextArg) |
||
| Ligne 12 : | Ligne 12 : | ||
-- validArg renvoie le premier paramètre non vide, ou nil s'ils sont tous vides. | -- validArg renvoie le premier paramètre non vide, ou nil s'ils sont tous vides. | ||
-- Seul les noms des paramètres doivent être transmis à la fonction. | -- Seul les noms des paramètres doivent être transmis à la fonction. | ||
| − | local validArg = function ( ... ) return | + | local validArg = function ( ... ) return Commun.validTextArg( args, ... ) end |
-- titreChap est un paramètre différents de ceux du modèle ouvrage pour utilisé le même programme | -- titreChap est un paramètre différents de ceux du modèle ouvrage pour utilisé le même programme | ||
Version du 29 juillet 2014 à 08:42
La documentation pour ce module peut être créée à Module:Biblio/Ouvrage/doc
local Ouvrage = { }
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 Ouvrage.chapitre( args )
-- validArg renvoie 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 Commun.validTextArg( args, ... ) end
-- titreChap est un paramètre différents de ceux du modèle ouvrage pour utilisé le même programme
args.titreChap = validArg( 'titre chapitre', 'chap', 'titre', 'title' )
if args.titre == args.titreChap then
args.titre = false
end
args.titre = validArg( 'titre ouvrage', 'ouvrage', 'titre', 'title' ) or false
args['titre chapitre'] = false
args.chap = false
args['sous-titre chapitre'] = validArg( 'sous-titre chapitre', 'sous-titre' ) or false
args['sous-titre'] = validArg( 'sous-titre ouvrage', 'sous-titre' )
if args['sous-titre chapitre'] == args['sous-titre'] then
args['sous-titre'] = false
end
args['lien titre'] = validArg( 'lien titre ouvrage', 'lien titre' )
return Ouvrage.ouvrage( args, true )
end
function Ouvrage.ouvrage( args, chapitre )
-- La table wiki va recevoir tout les petits bouts de texte, et sera concaténée à la fin.
-- Elle utilise la meta-table de TableBuilder, permettant d'utiliser les fonctions de la
-- librairie table comme des méthodes. minsert permet d'insérer plusieurs éléments en une
-- seule fois en, ignorant les paramètres nil.
local wiki = TableBuilder.new()
-- validArg renvoie 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, ... ) or false end
local genre = ( chapitre and 'chapitre' ) or 'ouvrage'
--Variables servant à la catégorisation
local categTitre, categTitreChapitre, categTitreOuvrage, categIsbnInvalid --, categLangue (déclaré lors de l'indication de langue)
local modeNormal = not validArg( 'nocat' )
-- clarification des paramètres nécessaires pour les coins
args.titre = validArg( 'titre', 'title' )
args['pages totales'] = validArg( 'pages totales', 'pages' )
args.pages = ''
if args.format and string.match(args.format,"pdf") then
args['format électronique'] = args.format
args.format = false
end
-- span initial (id) et libelé
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 )
local dir
if Outils.notEmpty( indicLangue ) then
wiki.minsert( indicLangue, ' ' )
if codeLangue then
Langue = Langue or require( 'Module:Langue' )
dir = Langue.directionLangue( codeLangue )
if dir == 'rtl' then
dir = '" dir="rtl'
else
dir = nil
end
end
end
-- Liste des auteurs et de leurs responsabilités (principales et secondaires)
local auteur = validArg( 'nom1', 'nom', 'auteur1', 'auteur', 'auteurs', 'last1', 'last', 'author1', 'author' )
if auteur then
if validArg( 'auteurs' ) then
wiki.minsert( args.auteurs )
else
wiki.minsert( Commun.responsabilitePrincipale( args, validArg, true ) )
end
local coauteur = validArg( 'co-auteur', 'coauteurs', 'coauteur', 'coauthors' )
if coauteur then
wiki.minsert( ', ', coauteur )
end
wiki.minsert( Commun.responsabiliteSecondaire( args, validArg ), ', ' )
end
-- Pour le modèle chapitre : affichage du chapitre
if chapitre then
if args.titreChap then
if codeLangue then
wiki.minsert( '<span lang="', codeLangue, dir, '">' )
end
wiki.minsert( '« <cite style="font-style:normal">', args.titreChap )
if args['sous-titre chapitre'] then
wiki.minsert( ' : ', args['sous-titre chapitre'] )
end
wiki.minsert( '</cite> »' )
if codeLangue then
wiki.minsert( '</span>' )
end
elseif modeNormal then
wiki.minsert( Outils.erreur( ' [[Modèle:Chapitre|{{Chapitre}}]] : paramètre « <code>titre chapitre</code> » manquant' ) )
categTitreChapitre = true
end
wiki.minsert( ', dans ' )
local auteurOuvrage = validArg( 'auteurs ouvrage', 'auteur ouvrage' )
if auteurOuvrage then
wiki.minsert( auteurOuvrage, ', ' )
end
end
-- titre
if args.titre then
if codeLangue then
wiki.minsert( '<cite class="italique" lang="', codeLangue, dir, '">')
else
wiki.minsert( '<cite class="italique">')
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( ' : ', sousTitre )
end
if lienTitre then
wiki.minsert( ']]' )
end
wiki.minsert( '</cite>' )
elseif modeNormal then
if chapitre then
categTitreOuvrage = true
if categTitreChapitre then
wiki.minsert( Outils.erreur( 'paramètre « <code>titre ouvrage</code> » manquant' ) )
else
wiki.minsert( Outils.erreur( '[[Modèle:Chapitre|{{Chapitre}}]] : paramètre « <code>titre ouvrage</code> » manquant' ) )
end
else
categTitre = true
wiki.minsert( Outils.erreur( '[[Modèle:Ouvrage|{{Ouvrage}}]] : paramètre « <code>titre</code> » manquant' ) )
end
end
-- titre original et traducteur
local original = validArg( 'titre original', 'titre vo', 'traduction titre' )
if original and original ~= args.titre then
wiki.minsert( ' [« ', original, ' »]' )
end
if not auteur then
local responsabiliteSecondaire = Commun.responsabiliteSecondaire( args, validArg )
if responsabiliteSecondaire then
wiki.minsert( ' ', responsabiliteSecondaire )
end
end
-- volume, tome
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 titreVolTome = validArg( 'titre volume', 'titre tome' )
if titreVolTome then
if volume or tome then
wiki.minsert( [[ : '']] )
else
wiki.minsert( [[, '']] )
end
if codeLangue then
Langue = Langue or require( 'Module:Langue' )
wiki.minsert( Langue.lang{ codeLangue, titreVolTome }, [['']] )
else
wiki.minsert( titreVolTome, [['']] )
end
end
-- lieu et éditeur
local lieu = validArg( 'lieu', 'location' )
if lieu then
wiki.minsert( ', ', lieu )
end
local editeur = validArg( 'éditeur', 'édition', 'editeur', 'edition', 'publisher' )
if editeur then
local lienEditeur = validArg( 'lien éditeur' )
if lienEditeur then
wiki.minsert( ', [[', lienEditeur, '|', editeur, ']]' )
else
wiki.minsert( ', ', editeur )
end
end
-- nature du document
local nature = validArg( 'nature ouvrage' )
if nature then
wiki.minsert( ' (', nature, ')')
end
-- collecion et numéro
local collection = validArg( 'collection' )
if collection then
wiki.minsert( ', ', Commun.coll, '« ', collection )
local serie = validArg( 'série' )
if serie then
wiki.minsert( ' / ', serie )
end
wiki.minsert( ' »' )
end
local numeroCollection = validArg( 'numéro dans collection', 'numéro dans la collection' )
if numeroCollection then
wiki.minsert( ' (', Commun.numero, numeroCollection, ')' )
end
-- date, réimpression et éditions
local annee = validArg( 'année', 'date', 'year' )
if annee then
wiki.minsert( ',‎ ', Commun.inscriptionDate( args ) )
-- le &lrm est une marque de texte gauche à droite, utile si le texte qui précède est en droite à gauche (arabe, hébreux...)
end
local publi = validArg( 'réimpression', 'publi' )
if publi then
wiki.minsert( ' (', Commun.reimpr, publi, ')' )
end
local numeroEdition = validArg( "numéro d'édition", "numéro édition" )
if numeroEdition then
wiki.minsert( ', ', Outils.ordinal( numeroEdition, true ), Commun.ed )
end
local premiereEdition = validArg( 'année première édition', 'origyear' )
if premiereEdition then
wiki.minsert( ' (', Commun.premiere, Commun.ed, ' ', premiereEdition, ')' )
end
-- format et pages
local format = validArg( 'format livre', 'format' )
if format then
wiki.minsert( ', ', format )
end
local pages = validArg( 'pages totales', 'pages' )
if pages then
wiki.minsert( ', ', pages, Commun.nbp )
end
-- références
local reference = validArg( 'référence' )
if reference then
wiki.minsert( ' ', Commun.detailEditions( reference ) )
end
local refSimple = validArg( 'référence simplifiée', 'ref' )
if refSimple then
wiki.minsert( ' ', Commun.detailEdition( refSimple ) )
end
-- lien vers l'ouvrage en ligne (isbn, issn, pmid, doi, lire en ligne, résumé...)
wiki.minsert( References.affichageLiensExternes( args, validArg, true, false ) )
categIsbnInvalid = args.categIsbnInvalid
-- consulté le n'est plus affiché, voir [[Discussion_modèle:Ouvrage#Évolution documentation]]
-- précision sur le passage concerné
local partie = validArg( 'partie' )
if partie then
if string.match ( partie, '^[%dIVXLCM]+$' ) then
wiki.minsert( ', partie ', partie )
elseif string.match ( partie, '^[ivxlcmIVXLCM]+$' ) then
wiki.minsert( ', partie ', Commun.romain( partie ) )
else
wiki.minsert( ', ', partie )
end
end
local numeroChapitre = validArg( 'numéro chapitre', 'numéro' )
if numeroChapitre then
wiki.minsert( ', ', Commun.chap, numeroChapitre )
end
local titreChapitre = validArg( 'titre chapitre', 'chap', 'chapitre', 'chapter' )
if titreChapitre then
if numeroChapitre then
titreChapitre = ' (« ' .. titreChapitre .. ' »)'
else
titreChapitre = ', « ' .. titreChapitre .. ' »'
end
if codeLangue then
Langue = Langue or require( 'Module:Langue' )
titreChapitre = Langue.lang{ codeLangue, titreChapitre }
end
wiki.minsert( titreChapitre )
end
local passage = validArg( 'passage', 'page' )
if passage then
if string.match ( passage, '^[%dIVXLCM]' ) then
wiki.minsert( ', ', Commun.page, passage )
else
wiki.minsert( ', ', passage )
end
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', 'citation' )
if citation then
wiki.minsert( ' :<blockquote>« ', citation, ' »</blockquote>' )
end
if validArg( 'plume' ) then
wiki.minsert( Commun.plume )
end
wiki.minsert( Commun.commentaire( args ) )
if mw.title.getCurrentTitle().namespace == 0 and modeNormal then
wiki.minsert(
categLangue and '[[Catégorie:Page du modèle Ouvrage comportant une erreur|langue]]',
categTitre and '[[Catégorie:Page du modèle Ouvrage comportant une erreur|titre]]',
categTitreChapitre and '[[Catégorie:Page du modèle Chapitre comportant une erreur|Chapitre]]',
categTitreOuvrage and '[[Catégorie:Page du modèle Chapitre comportant une erreur|Ouvrage]]',
categIsbnInvalid and '[[Catégorie:Ouvrage avec ISBN invalide]]'
)
if dir then
wiki.minsert( '[[Catégorie:Recension temporaire pour le modèle Ouvrage|rtl]]' )
end
end
return wiki.concat()
end
return Ouvrage
