« Module:Biblio/Commun » : différence entre les versions

local abr = Outils.abr -- fonction abréviation discréte

 

-- ou la table transmise à la fonction par une autre fonction d'un module

local extractArgs = Outils.extractArgs

 

local texte = args[name]

if type( texte ) == 'string' and texte ~= '' and texte:match( '%S' ) then

 

 

Commun.chap = abr{ 'chap.', 'chapitre(s)', nbsp='+' }

Commun.coll = abr{ 'coll.', 'collection', nbsp='+' }

end

 

return '<small>&#91;[[' .. ref .. '|détail des éditions]]&#93;</small>'

end

local i = 1

local idTab, id2Tab = { }, { }

while nom or auteur_i do

if auteur_i and not nom then

-- Enregistre le résultat dans args pour les COinS.

auteur_i = Outils.texteLien( auteur_i )

table.insert( idTab, mw.uri.anchorEncode( nom ) )

table.insert( id2Tab, mw.uri.anchorEncode( auteur_i ) )

if i == 4 then

break

auteur_i = validArg( 'auteur' .. i, 'author' .. i )

end

if #idTab < 4 and validArg( 'auteur institutionnel' ) then

table.insert( idTab, mw.uri.anchorEncode( validArg( 'auteur institutionnel' ) ) )

table.insert( id2Tab, idTab[#idTab] )

end

local annee = validArg( 'année', 'year', 'date' )

if annee then

table.insert( id2Tab, annee )

end

if #idTab > 0 then

id = ' id="' .. table.concat( idTab ) .. '"'

id2 = false

end

id = ''

end

end

local spaninitial, spanfinal

if id2 then

if lang then

Langue = require( 'Module:Langue' )

-- on essaie le code de langue complet (nécessaire pour les langues avec plusieurs mot comme "grec ancien")

local codeLangue = Langue.codeLangue2( lang )

return Langue.indicationMultilingue{ codeLangue }, codeLangue

end

-- si la langue n'a pas été trouvée on considère qu'il y a plusieurs langues

-- séparation des langues s'il y en a plusieurs

local listeLangue = mw.text.split( lang, '[+,;:/ %.]+' )

-- code langue principal qui sera appliqué aux titres

codeLangue = Langue.codeLangue2( listeLangue[1] )

if codeLangue == '' then

if type( args.categ ) == 'table' then

args.categ.langue = indicationLangue:find( '???', 1, true )

end

if codeLangue ~= 'fr' then

return indicationLangue, codeLangue

return ''

end

if nom or auteur then

-- clarification des paramètres

args['prénom1'] = validArg( 'prénom1', 'prénom', 'first1', 'first' )

args['postnom1'] = validArg( 'postnom1', 'postnom' )

args.directeur1 = validArg( 'directeur1', 'directeur' )

args['lien auteur1'] = validArg( 'lien auteur1', 'lien auteur', 'author-link' )

end

-- préparation des variables

local listeRresponsables = { } -- contiendra un élément pour chaque nom

local prenom, postnom, dir, responsable, lien, precision, resp

local i = 1

 

-- boucle sur chaque nom, assemble toutes les caractéristique et ajoute l'ensemble à la liste.

while nom or auteur do

-- nom de l'auteur

if not auteur then

end

end

-- lien sur l'auteur

auteur = Commun.fusionTexteLien( auteur, args['lien auteur' .. i], args.categ)

auteur = validArg( 'auteur' .. i, 'author' .. i )

end

local listeAuteurs

local et_al = ''

listeAuteurs = mw.text.listToText( listeRresponsables )

end

if auteurInstitutionnel then

if #listeRresponsables > 0 then

function Commun.responsabiliteSecondaire( args, validArg )

local liste = { }

-- fonction qui teste l'existence d'un paramètre et insérere dans liste une abréviation discrète suivi de ce paramètre

local function insertAbr( arg, abrev, texte )

end

end

-- langue originale et traducteur

local langueOriginale = validArg( 'langue originale' )

local Languedata = mw.loadData( 'Module:Langue/Data' )

langueOriginale = Languedata[langueOriginale] and Languedata[langueOriginale].nom

trad = ''

end

langueOriginale == 'hébreu' then

trad = "de l'" .. langueOriginale .. trad

end

insertAbr( trad, 'trad.', 'traduction' )

-- ajout des différents responsables

insertAbr( validArg( 'préface' ), 'préf.', 'préface' )

table.insert( liste, args['champ libre'] )

end

-- concaténation de l'ensemble

local texte = table.concat( liste, ', ')

return ' (' .. texte .. ')'

end

date = date:gsub( '^(%d%d%d%d%-%d%d%-%d%d)t[%d:+-]+$', '%1') -- Date iso avec l'heure : suppression de l'heure

local t, jma = Date.separationJourMoisAnnee( date )

args['année'] = jma.annee

jma.nolinks = true

jma.nocat = true

return Date.modeleDate( jma )

-- date non reconnue, on essaye Month day, year

local mois, jour, annee = mw.ustring.match( date, '^([%a]+)%s*(%d%d?)[,%s]+(%d+)$' )

if type( texte ) == 'string' then

if texte:match( '[%[<]' ) then

end

-- nettoyage des liens interne

-- NISO Z39.88

-- http://www.openurl.info/registry

local liste = { }

-- sinon comme le nom d'un paramètre.

local function insertList( key, value, prefix )

end

end

-- norme du COinS

insertList( 'ctx_ver', 'Z39.88-2004' )

-- genre, titre et sous-titre

if genre == 'article' then

insertList( 'rft.btitle', nettoyageTexte( args.titre ) )

insertList( 'rft.atitle', nettoyageTexte( validArg( 'titre chapitre', 'titreChap' ) ) )

-- donnée sur l'éditeur

insertList( 'rft.place', Outils.texteLien( validArg( 'lieu', 'location' ) ), nil )

end

insertList( 'rft.stitle', args['sous-titre'] )

-- Premier auteur, séparé en noms et prénoms

local nom = Outils.texteLien( validArg( 'nom1', 'nom', 'last1', 'last' ) )

else

local auteur = Outils.texteLien( validArg( 'auteur', 'auteur1' ) )

insertList( 'rft.au', auteur )

end

end

-- les autres auteurs, la norme ne prévoit pas de séparation

for i = 2, 20 do

local prenom_i = validArg( 'prénom' .. i )

local postnom_i = validArg( 'postnom' .. i)

insertList( 'rft.au', nom_i .. ' ' .. postnom_i .. ', ' .. prenom_i )

elseif prenom_i then

end

end

if validArg( 'auteur institutionnel' ) then

insertList( 'rft.aucorp', args['auteur institutionnel'] )

end

-- date

local datePub = Date.dateISO( args )

insertList( 'rft.date', datePub )

else

insertList( 'rft.date', args.date )

end

-- doonées physique de la publication

insertList( 'rft.volume', validArg( 'volume', 'vol' ) )

insertList( 'rft.spage', args['page début chapitre'] )

insertList( 'rft.tpages', args['pages totales'] )

-- références internationales

insertList( 'rft.isbn', args.isbn )

insertList( 'rft_id', args.oclc, 'info:oclcnum/' )

insertList( 'rft_id', args.url )

-- referer : page Wikipedia ou se trouve cette référence

insertList( 'rfr_id', 'fr.wikipedia.org:' .. mw.title.getCurrentTitle().fullText, 'info:sid/' )

local contextObject = table.concat( liste, '&' )

-- calcul d'un id pour que le span vide ne soit pas supprimé par tydy ( cf. https://bugzilla.wikimedia.org/show_bug.cgi?id=27786 )

local id=0

id = id + string.byte( contextObject, i )

end

return '<span class="Z3988" title="' .. contextObject .. '" id="COinS_' .. id ..'"></span>'

end

 

-- voir Modèle:Module biblio/indication de langue

function Commun.indicationDeLangue2( args, validArg, lang )

if lang then

Langue = require( 'Module:Langue' )

-- on essaie le code de langue complet (nécessaire pour les langues avec plusieurs mot comme "grec ancien")

local codeLangue = Langue.codeLangue2( lang )

if codeLangue == 'fr' then

return ''

return Langue.indicationMultilingue{ codeLangue }, codeLangue

end

-- si la langue n'a pas été trouvée on considère qu'il y a plusieurs langues

-- séparation des langues s'il y en a plusieurs

local listeLangue = mw.text.split( lang, '[+,;:/ %.]+' )

-- code langue principal qui sera appliqué aux titres

codeLangue = Langue.codeLangue2( listeLangue[1] )

if codeLangue == '' then

return Langue.indicationMultilingue( listeLangue ), nil, true

local indicationLangue = Langue.indicationMultilingue( listeLangue )

local categLangue = indicationLangue:find ( '???', 1, true )

if codeLangue ~= 'fr' then

return indicationLangue, codeLangue, categLangue