Arthur : 1 révision importée

2016-01-27T20:14:13Z

1 révision importée

Nouvelle page

reference = {}

wd = wd or require "Module:Wikidata"

local article = require "Module:Wikidata/Références/classes d'articles"
local book = require "Module:Wikidata/Références/classes d'ouvrages"

local linguistic = require "Module:Linguistique"
local cite = require "Module:Biblio"
local langcodes = mw.loadData "Module:Dictionnaire Wikidata/Codes langue"
local tools = require 'Module:Wikidata/Outils'
local entities = require 'Module:Wikidata/Formatage entité'
local getData = require 'Module:Wikidata/Récup'

local function getStringStatementValues(entity, propertyId)
local statements = entity:getBestStatements(propertyId)
for i,statement in pairs(statements) do
statements[i] = tools.getValue(statement.mainsnak)
end
return statements
end

local function getStringStatementValue(entity, propertyId)
local statements = getStringStatementValues(entity, propertyId)
if #statements > 0 then
return statements[1]
else
return nil
end
end

local function getDirectItemLang(workentity, property)
itemlangs = getData.getClaims{entity = workentity, property = property}
if itemlangs ~= nil then
return langcodes[tools.getNumericId(itemlangs[1].mainsnak)]
end
end

local function hasRole(statement, roleId)
return statement.qualifiers and (statement.qualifiers['P518'] and tools.getId(statement.qualifiers['P518'][1]) == roleId or statement.qualifiers['P794'] and tools.getId(statement.qualifiers['P794'][1]) == roleId)
end

function reference.citeitem(entity, options)
if not entity then
return nil
end
entity = tools.getEntity(entity)
if not entity then
return "invalid entity id"
end

--work entity if it exists
local workEntity = nil
local workClaims = getData.getClaims{entity = entity, property = 'P629'}
if workClaims ~= nil then
workEntity = tools.getEntity(tools.getMainId(workClaims[1]))
end
local journalEntity = nil
local journalClaims = getData.getClaims{entity = entity, property = 'P1433'}
if journalClaims ~= nil then
journalEntity = tools.getEntity(tools.getMainId(journalClaims[1]))
end

local translator = wd.formatStatements{entity = entity, property = 'P655', defaultlink = '-'}
local illustrator = wd.formatStatements{entity = entity, property = 'P110', defaultlink = '-'}
local preface = ''
local postface = ''
local photographe = ''
local authors = {}
local are_director = {}
local responsability = {}
for _,statement in pairs(entity:getBestStatements('P50')) do
table.insert(authors, wd.formatStatement(statement, {defaultlink = '-'}))
table.insert(are_director, '')
--qualifier pour la responsabilité
if statement.qualifiers and statement.qualifiers['P518'] then
table.insert(responsability, wd.formatSnak(statement.qualifiers['P518'][1], {defaultlink = '-'}))
else
table.insert(responsability, '')
end
end
for _,statement in pairs(entity:getBestStatements('P98')) do
table.insert(authors, wd.formatStatement(statement, {defaultlink = '-'}))
table.insert(are_director, 'y')
table.insert(responsability, '')
end
for _,statement in pairs(entity:getBestStatements('P767')) do
if hasRole(statement, 'Q670787') or hasRole(statement, 'Q19839393') then --préface/préfacier
preface = wd.formatStatement(statement, {defaultlink = '-'})
elseif hasRole(statement, 'Q7234272') then --postface
postface = wd.formatStatement(statement, {defaultlink = '-'})
elseif hasRole(statement, 'Q33231') or hasRole(statement, 'Q125191') then --photographe/photographie
photographe = wd.formatStatement(statement, {defaultlink = '-'})
end
end

local isbns = getStringStatementValues(entity, 'P212')
for _,isbn in pairs(getStringStatementValues(entity, 'P957')) do
table.insert(isbns, isbn)
end
local issns = {}
if journalEntity then
issns = getStringStatementValues(journalEntity, 'P236')
end
if #issns == 0 then
issns = getStringStatementValues(entity, 'P236')
end
local oclc = getStringStatementValue(entity, 'P243')
local bnf = getStringStatementValue(entity, 'P268')
local lccn = getStringStatementValue(entity, 'P1144')
local dnb = getStringStatementValue(entity, 'P1292')
local doi = getStringStatementValue(entity, 'P356')
local pmid = getStringStatementValue(entity, 'P698')
local jstor = getStringStatementValue(entity, 'P888')
local bibcode = nil
if journalEntity then
bibcode = getStringStatementValues(entity, 'P1300')
end
if not bibcode then
bibcode = getStringStatementValues(entity, 'P1300')
end
local arxiv = getStringStatementValue(entity, 'P818')
local pmcid = getStringStatementValue(entity, 'P932')

local ednumber = wd.formatStatements{entity = entity, property = 'P393'}
local publisher = wd.formatStatements{entity = entity, property = 'P123', defaultlink = '-'}
local journal = wd.formatStatements{entity = entity , property = 'P1433', defaultlink = '-'}
--TODO fix local journalnumber = wd.formatStatements{entity = entity, property = 'P433'}
--TODO fix local volume = wd.formatStatements{entity = entity, property = 'P478'}
local publishdate = wd.formatStatements{entity = entity, property = 'P577', linktopic = '-'}
local publishplace = wd.formatStatements{entity = entity, property = 'P291', defaultlink = '-'}
local pagenum = wd.formatStatements{entity = entity, property = 'P1104'}
local title = wd.formatStatements{entity = entity, property = 'P1476', numval = 1 } or entities.getLabel(entity)
local titlelink = entities.getLink(entity)
if not titlelink and workEntity then -- si pas de lien, on peut essayer de voir si c'est l'édition de quelque chose d'autre
titlelink = entities.getLink(workEntity)
end
if title and titlelink then
title = '[[' .. titlelink .. '|' .. title .. ']]'
end
local subtitle = wd.formatStatements{entity = entity, property = 'P1680'}
local url = wd.formatStatements{entity = entity, property = 'P854', numval = 1} or wd.formatStatements{entity = entity, property = 'P953', numval = 1 }
local wikisource = entity:getSitelink('frwikisource')
local language = getDirectItemLang(entity, 'P407')
if not language and journalEntity then
language = getDirectItemLang(journalEntity, 'P407')
end
local originalLanguage = getDirectItemLang(entity, 'P364') --TODO: be clever? or getDirectItemLang(workEntity, 'P407') or getDirectItemLang(workEntity, 'P364')
local originalTitle = nil
if workEntity and originalLanguage then
originalTitle = wd.formatStatements{entity = workEntity, property = 'P1476', numval = 1 } or workEntity:getLabel(originalLanguage)
end

-- choose relevant cite type
local entitytype = wd.formatStatements{property = 'P31', entity = entity, numval = 1, displayformat = 'raw'}
local funtype

if (entitytype == "Q3331189") then --book edition
funtype = cite.ouvrage

-- TODO : gérer l'édition et l'élément de l'oeuvre.

elseif book.is_book_class(entitytype) then -- ouvrage sans édition connue ?

-- TODO : gérer le cas ou un ouvrage est cité mais que Wikidata en connait des éditions.
-- TODO : refuser ce genre d'items ?

funtype = cite.ouvrage

elseif article.is_article_class(entitytype) then -- article
funtype = cite.article
else -- default: output a very simple display
local parameters = authors
if title then
table.insert(parameters, '<i>' .. title .. '</i>')
end
if publisher then
table.insert(parameters, publisher)
end
if publishplace then
table.insert(parameters, publishplace)
end
if publishdate then
table.insert(parameters, publishdate)
end
if options['page'] then
table.insert(parameters, 'p.' .. options['page'])
end
if options['accessdate'] then
table.insert(parameters, 'consulté le ' .. options['accessdate'])
end
return linguistic.conj(parameters, 'comma')
end

local parameters = {
['traducteur'] = translator,
['illustrateur'] = illustrator,
['préface'] = preface,
['postface'] = postface,
['photographe'] = photographe,
['titre'] = title,
['sous-titre'] = subtitle,
--['volume'] = volume,
['date'] = publishdate,
['lieu'] = publishplace,
['périodique'] = journal,
--['numéro'] = journalnumber,
["numéro d'édition"] = ednumber,
['éditeur'] = publisher,
['pages totales'] = pagenum,
['lire en ligne'] = url,
['wikisource'] = wikisource,
['isbn'] = isbn,
['isbn2'] = isbn2,
['issn'] = issn,
['oclc'] = oclc,
['bnf'] = bnf,
['lccn'] = lccn,
['dnb'] = dnb,
['doi'] = doi,
['pmid'] = pmid,
['jstor'] = jstor,
['bibcode'] = bibcode,
['arxiv'] = arxiv,
['pmcid'] = pmcid,
['page'] = options['page'],
['langue'] = language,
['langue originale'] = originalLanguage,
['titre original'] = originalTitle,
['plume'] = options['plume']
}
for i,isbn in pairs(isbns) do
parameters['isbn' .. i] = isbn
end
for i,issn in pairs(issns) do
parameters['issn' .. i] = issn
end

-- try to find if there is an author set in options
local setAuthors = true
for i=1,15 do
if options['auteur' .. i] or options['directeur' .. i] or options['responsabilité' .. i] then
authorsAlreadySets = false
end
end

if setAuthors then
for i,author in pairs(authors) do
parameters['auteur' .. i] = author
parameters['directeur' .. i] = are_director[i]
parameters['responsabilité' .. i] = responsability[i]
end
end

for parameter,value in pairs(options) do
parameters[parameter] = value
end
local val = funtype(parameters)

if val then
return wd.addRefAnchor(wd.addLinkback(val, entity), tools.EntityId(entity))
end

return tools.formatError()
end

-- pour tester
function reference.citeItem(frame)
local args = frame:getParent().args
return reference.citeitem(args[1], args)
end

return reference

Module:Wikidata/Références - Historique des versions

Arthur : 1 révision importée

Arthur : 1 révision importée