skandinavien-wiki.net

Modul:Citation/COinS: Unterschied zwischen den Versionen

Modul Diskussion

Modul:Citation/COinS (Quelltext anzeigen)

Version vom 11. Februar 2023, 20:58 Uhr

260 Bytes hinzugefügt ,  vor 2 Jahren
K
43 Versionen von wikivoyage:Modul:Citation/COinS importiert
KKeine Bearbeitungszusammenfassung
K (43 Versionen von wikivoyage:Modul:Citation/COinS importiert)
 
(35 dazwischenliegende Versionen von einem anderen Benutzer werden nicht angezeigt)
Zeile 1: Zeile 1:
-- documentation
-- documentation
local citation = {
local citationCOinS = {
suite  = 'Citation',
suite  = 'Citation',
sub    = 'COinS',  
sub    = 'COinS',  
serial = '2020-03-30',
serial = '2022-10-21'
}
}


-- module variable
-- module variable and administration
local cc = {}
local cc = {
moduleInterface = citationCOinS
}


-- module import
-- module import
-- require( 'strict' )
local ci = require( 'Module:Citation/i18n' )
local cu = require( 'Module:Citation/utilities' )
local cu = require( 'Module:Citation/utilities' )
local ci = require( 'Module:Citation/i18n' )


function cc.prepareForCOinS( args )
function cc.prepareForCOinS( args )
local key, value
local function pagesMatch( s )
local function pagesMatch( s )
if not cu.isSet( s ) then
if not cu.isSet( s ) then
Zeile 21: Zeile 22:
end
end


s = s:match( '%d+%s*%-%s*%d+' ) or s:match( '%d+' ) or
s = s:match( '%a*%d+%s*%-%s*%a*%d+' ) or s:match( '%a*%d+' ) or
-- Roman numerals
-- Roman numerals
s:match( '[Cc]*[LlXxVvIi]+%s*%-%s*[Cc]*[LlXxVvIi]+' ) or
s:match( '[Cc]*[LlXxVvIi]+%s*%-%s*[Cc]*[LlXxVvIi]+' ) or
Zeile 38: Zeile 39:
end
end
if s == '' then
if s == '' then
cu.addErrorMsg( texts.wrongPages )
cu.addErrorMsg( ci.texts.wrongPages )
end
end
return s
return s
Zeile 44: Zeile 45:


for key, value in pairs( args ) do
for key, value in pairs( args ) do
if type( args[ key ] ) == 'string' then
if ci.params[ key ] then
args[ key ] = mw.ustring.gsub( args[ key ], ' ', ' ' )
args[ key ] = cu.coinsCleanup( args[ key ] )  
args[ key ] = mw.ustring.gsub( args[ key ], '&%w+;', '' ) -- remove entities
end
end
end
end
Zeile 55: Zeile 55:
args.pages = args.columns
args.pages = args.columns
end
end
args.extent = args.extent:match( '%d+' )


-- only first author
-- only first author
args.author = cu.getFirst( args.author or '', ';' )
args.author = cu.getFirst( args.author or '', ';' )
local count
local s, count
_,count = args.author:gsub( ',', ',' )
s, count = args.author:gsub( ',', ',' )
if count > 1 then
if count > 1 then
args.author = cu.getFirst( args.author, ',' )
args.author = cu.getFirst( args.author, ',' )
Zeile 69: Zeile 70:
args.isbn = cu.getFirst( args.isbn or '', ',' )
args.isbn = cu.getFirst( args.isbn or '', ',' )
args.isbn = args.isbn:match( '[%d%-Xx]+' )
args.isbn = args.isbn:match( '[%d%-Xx]+' )
if not cu.isSet( args.issn ) and cu.isSet( args.eissn ) then
args.issn = args.eissn
end
end
end


function cc.makeCOinS( args, params )
function cc.makeCOinS( args )
local rft = {}, key, value
local rft = {}


local function insertCOinS( key, value )
local function insertCOinS( key, value )
Zeile 90: Zeile 87:
-- handle titles
-- handle titles
-- maps handled like books
-- maps handled like books
if args.type == 'book' or args.type == 'map' or args.type == 'collection' then
if args.type == 'book' or args.type == 'map' or args.type == 'bookitem' then
table.insert( rft, 'rft_val_fmt='
table.insert( rft, 'rft_val_fmt='
.. mw.uri.encode( 'info:ofi/fmt:kev:mtx:book', 'PATH' ) )
.. mw.uri.encode( 'info:ofi/fmt:kev:mtx:book', 'PATH' ) )
insertCOinS( 'rft.title', args.title )
if args.type == 'bookitem' then
if args.type == 'collection' then
table.insert( rft, 'rft.genre=bookitem' )
table.insert( rft, 'rft.genre=bookitem' )
insertCOinS( 'rft.atitle', args.title )
insertCOinS( 'rft.atitle', args.title )
Zeile 107: Zeile 103:
table.insert( rft, 'rft_val_fmt='
table.insert( rft, 'rft_val_fmt='
.. mw.uri.encode( 'info:ofi/fmt:kev:mtx:journal', 'PATH' ) )
.. mw.uri.encode( 'info:ofi/fmt:kev:mtx:journal', 'PATH' ) )
table.insert( rft, 'rft.genre=journal' )
table.insert( rft, 'rft.genre=article' )
insertCOinS( 'rft.title', args.title )
insertCOinS( 'rft.atitle', args.title )
insertCOinS( 'rft.atitle', args.title )
if args.type == 'journal' then
insertCOinS( 'rft.jtitle', args.type == 'journal' and args.journal or args.newspaper )
insertCOinS( 'rft.jtitle', args.journal )
else
insertCOinS( 'rft.jtitle', args.newspaper )
end
 
-- else -- 'newspaper'
-- table.insert( rft, 'rft_val_fmt='
-- .. mw.uri.encode( 'info:ofi/fmt:kev:mtx:dc', 'PATH' ) )
-- insertCOinS( 'rft.type', 'newspaperArticle' )
-- insertCOinS( 'rft.title', args.title )
-- insertCOinS( 'rft.atitle', args.title )
-- insertCOinS( 'rft.source', args.newspaper )


-- handle web
-- handle web
Zeile 131: Zeile 114:
.. mw.uri.encode( 'info:ofi/fmt:kev:mtx:dc', 'PATH' ) )
.. mw.uri.encode( 'info:ofi/fmt:kev:mtx:dc', 'PATH' ) )
insertCOinS( 'rft.type', 'webpage' )
insertCOinS( 'rft.type', 'webpage' )
insertCOinS( 'rft.creator', args.author )
insertCOinS( 'rft.title', args.title )
insertCOinS( 'rft.title', args.title )
insertCOinS( 'rft.source', args.website )
insertCOinS( 'rft.source', args.website )
Zeile 140: Zeile 122:


if #rft > 2 then
if #rft > 2 then
for key, value in pairs( params ) do
local prefix
if cu.isSet( args[ key ] ) and type( args[ key ] ) == 'string' then
local rftUrl = ( cu.isSet( args.url ) and not args.url:find( 'doi.org/', 1, true ) )
if value.COinS and value.COinS ~= 'rft.jtitle' and value.COinS ~= 'rft.title' then
and args.url or ''
insertCOinS( value.COinS, args[ key ] )
for key, value in pairs( ci.params ) do
elseif value.COinS_id and args[ key ] then
if cu.isSet( args[ key ] ) and value.COinS then
table.insert( rft, 'rft_id=' ..
if key == 'date' and args.dateFormat == 'R' then
mw.uri.encode( value.COinS_id .. '/' .. args[ key ], 'PATH' ) )
insertCOinS( value.COinS, string.sub( args[ key ], 1, 4 ) )
elseif value.COinS ~= 'rft.jtitle' and value.COinS ~= 'rft.title' then
prefix = value.COinS:sub( 1, 3 )
if prefix == 'rft' then
insertCOinS( value.COinS, args[ key ] )
elseif prefix == 'inf' then
table.insert( rft, 'rft_id=' ..
mw.uri.encode( value.COinS .. '/' .. args[ key ], 'PATH' ) )
elseif prefix == 'url' and rftUrl == '' then
rftUrl = value.url:format( args[ key ] )
elseif prefix == 'jst' then
if not cu.isSet( args.doi ) then
table.insert( rft, 'rft_id=' ..
mw.uri.encode( 'info:doi/' .. value.doi:format( args[ key ] ), 'PATH' ) )
end
if rftUrl == '' then
rftUrl = value.url:format( args[ key ] )
end
end
end
end
end
end
end
if rftUrl ~= '' then
if rftUrl:match( '^//' ) then
rftUrl = 'https:' .. rftUrl
end
table.insert( rft, 'rft_id=' .. mw.uri.encode( rftUrl, 'PATH' ) )
end
end


Zeile 154: Zeile 160:
.. mw.uri.encode( 'info/sid:/' .. ci.project.name, 'PATH' ) )
.. mw.uri.encode( 'info/sid:/' .. ci.project.name, 'PATH' ) )
table.insert( rft, 1, 'ctx_ver=Z39.88-2004' )
table.insert( rft, 1, 'ctx_ver=Z39.88-2004' )
rft = table.concat( rft, '&' )
return tostring( mw.html.create( 'span' )
return '<span title="' .. rft .. '" class="Z3988"></span>'
:addClass( 'Z3988' )
:attr( 'title', table.concat( rft, '&' ) )
)
end
end
return ''
return ''
Abgerufen von „https://skandinavien-wiki.net/wiki/Spezial:Mobiler_Unterschied/22623...22659“