Remove sample RIS custom reader (since we now have a native one).
This commit is contained in:
John MacFarlane
parent
0f0b042139
commit
2b3433404e
1 changed files with 0 additions and 217 deletions
|
|
@ -159,223 +159,6 @@ except paragraph breaks.
|
||||||
]
|
]
|
||||||
```
|
```
|
||||||
|
|
||||||
# Example: a RIS bibliography reader
|
|
||||||
|
|
||||||
This is a parser for [RIS bibliography] files. It can be used
|
|
||||||
to convert them to CSL JSON or YAML, BibTeX, or BibLaTeX.
|
|
||||||
|
|
||||||
[RIS bibliography]: https://en.wikipedia.org/wiki/RIS_(file_format)
|
|
||||||
|
|
||||||
```lua
|
|
||||||
-- A sample custom reader for RIS bibliography format
|
|
||||||
-- https://en.wikipedia.org/wiki/RIS_(file_format)
|
|
||||||
-- The references are converted to inline pandoc/CSL YAML
|
|
||||||
-- references in the metadata.
|
|
||||||
|
|
||||||
local inspect = require"inspect"
|
|
||||||
|
|
||||||
local types =
|
|
||||||
{ ABST = "article",
|
|
||||||
ADVS = "motion-picture",
|
|
||||||
AGGR = "dataset",
|
|
||||||
ANCIENT = "book",
|
|
||||||
ART = "graphic",
|
|
||||||
BILL = "bill",
|
|
||||||
BLOG = "post-weblog",
|
|
||||||
BOOK = "book",
|
|
||||||
CASE = "legal_case",
|
|
||||||
CHAP = "chapter",
|
|
||||||
CHART = "graphic",
|
|
||||||
CLSWK = "book",
|
|
||||||
COMP = "program",
|
|
||||||
CONF = "paper-conference",
|
|
||||||
CPAPER = "paper-conference",
|
|
||||||
CTLG = "catalog",
|
|
||||||
DATA = "dataset",
|
|
||||||
DBASE = "dataset",
|
|
||||||
DICT = "book",
|
|
||||||
EBOOK = "book",
|
|
||||||
ECHAP = "chapter",
|
|
||||||
EDBOOK = "book",
|
|
||||||
EJOUR = "article",
|
|
||||||
WEB = "webpage",
|
|
||||||
ENCYC = "entry-encyclopedia",
|
|
||||||
EQUA = "figure",
|
|
||||||
FIGURE = "figure",
|
|
||||||
GEN = "entry",
|
|
||||||
GOVDOC = "report",
|
|
||||||
GRANT = "report",
|
|
||||||
HEAR = "report",
|
|
||||||
ICOMM = "personal_communication",
|
|
||||||
INPR = "article-journal",
|
|
||||||
JFULL = "article-journal",
|
|
||||||
JOUR = "article-journal",
|
|
||||||
LEGAL = "legal_case",
|
|
||||||
MANSCPT = "manuscript",
|
|
||||||
MAP = "map",
|
|
||||||
MGZN = "article-magazine",
|
|
||||||
MPCT = "motion-picture",
|
|
||||||
MULTI = "webpage",
|
|
||||||
MUSIC = "musical_score",
|
|
||||||
NEWS = "article-newspaper",
|
|
||||||
PAMP = "pamphlet",
|
|
||||||
PAT = "patent",
|
|
||||||
PCOMM = "personal_communication",
|
|
||||||
RPRT = "report",
|
|
||||||
SER = "article",
|
|
||||||
SLIDE = "graphic",
|
|
||||||
SOUND = "musical_score",
|
|
||||||
STAND = "report",
|
|
||||||
STAT = "legislation",
|
|
||||||
THES = "thesis",
|
|
||||||
UNBILL = "bill",
|
|
||||||
UNPB = "unpublished",
|
|
||||||
VIDEO = "graphic"
|
|
||||||
}
|
|
||||||
|
|
||||||
local function clean(refpairs)
|
|
||||||
local ref = {}
|
|
||||||
for i = 1, #refpairs do
|
|
||||||
local k,v = table.unpack(refpairs[i])
|
|
||||||
if k == "TY" then
|
|
||||||
ref["type"] = types[v]
|
|
||||||
elseif k == "VL" then
|
|
||||||
ref.volume = v
|
|
||||||
elseif k == "KW" then
|
|
||||||
ref.keyword = v
|
|
||||||
elseif k == "PB" then
|
|
||||||
ref.publisher = v
|
|
||||||
elseif k == "CY" or k == "PP" then
|
|
||||||
ref["publisher-place"] = v
|
|
||||||
elseif k == "SP" then
|
|
||||||
if ref.page then
|
|
||||||
ref.page = v .. ref.page
|
|
||||||
else
|
|
||||||
ref.page = v
|
|
||||||
end
|
|
||||||
elseif k == "EP" then
|
|
||||||
if ref.page then
|
|
||||||
ref.page = ref.page .. "-" .. v
|
|
||||||
else
|
|
||||||
ref.page = "-" .. v
|
|
||||||
end
|
|
||||||
elseif k == "AU" or k == "A1" or k == "A2" or k == "A3" then
|
|
||||||
if ref.author then
|
|
||||||
table.insert(ref.author, v)
|
|
||||||
else
|
|
||||||
ref.author = {v}
|
|
||||||
end
|
|
||||||
elseif k == "TI" or k == "T1" or k == "CT" or
|
|
||||||
(k == "BT" and ref.type == "book") then
|
|
||||||
ref.title = v
|
|
||||||
elseif k == "ET" then
|
|
||||||
ref.edition = v
|
|
||||||
elseif k == "NV" then
|
|
||||||
ref["number-of-volumes"] = v
|
|
||||||
elseif k == "AB" then
|
|
||||||
ref.abstract = v
|
|
||||||
elseif k == "ED" then
|
|
||||||
if ref.editor then
|
|
||||||
table.insert(ref.editor, v)
|
|
||||||
else
|
|
||||||
ref.editor = {v}
|
|
||||||
end
|
|
||||||
elseif k == "JO" or k == "JF" or k == "T2" or
|
|
||||||
(k == "BT" and ref.type ~= "book") then
|
|
||||||
ref["container-title"] = v
|
|
||||||
elseif k == "PY" or k == "Y1" then
|
|
||||||
ref.issued = v
|
|
||||||
elseif k == "IS" then
|
|
||||||
ref.issue = v
|
|
||||||
elseif k == "SN" then
|
|
||||||
ref.ISSN = v
|
|
||||||
elseif k == "L" then
|
|
||||||
ref.lang = v
|
|
||||||
elseif k == "UR" or k == "LK" then
|
|
||||||
ref.URL = v
|
|
||||||
end
|
|
||||||
end
|
|
||||||
return ref
|
|
||||||
end
|
|
||||||
|
|
||||||
function Reader(input, reader_options)
|
|
||||||
local refs = {}
|
|
||||||
local thisref = {}
|
|
||||||
local ids = {}
|
|
||||||
for line in string.gmatch(tostring(input), "[^\n]*") do
|
|
||||||
key, val = string.match(line, "([A-Z][A-Z0-9]) %- (.*)")
|
|
||||||
if key == "ER" then
|
|
||||||
-- clean up fields
|
|
||||||
local newref = clean(thisref)
|
|
||||||
-- ensure we have an id and if not, create a sensible one
|
|
||||||
if not newref.id then
|
|
||||||
newref.id = ""
|
|
||||||
for _,x in ipairs(newref.author) do
|
|
||||||
newref.id = newref.id .. string.match(pandoc.utils.stringify(x), "%a+")
|
|
||||||
end
|
|
||||||
if newref.issued then
|
|
||||||
newref.id = newref.id .. string.match(newref.issued, "%d+")
|
|
||||||
end
|
|
||||||
if ids[newref.id] then -- add disambiguator if needed
|
|
||||||
newref.id = newref.id .. "-" .. #ids
|
|
||||||
end
|
|
||||||
end
|
|
||||||
table.insert(ids, newref.id)
|
|
||||||
table.insert(refs, newref)
|
|
||||||
thisref = {}
|
|
||||||
elseif key then
|
|
||||||
table.insert(thisref, {key, val})
|
|
||||||
end
|
|
||||||
end
|
|
||||||
return pandoc.Pandoc({}, pandoc.Meta { references = refs } )
|
|
||||||
end
|
|
||||||
```
|
|
||||||
|
|
||||||
Example of use:
|
|
||||||
|
|
||||||
```
|
|
||||||
% pandoc -f ris.lua -t bibtex
|
|
||||||
TY - JOUR
|
|
||||||
AU - Shannon, Claude E.
|
|
||||||
PY - 1948
|
|
||||||
DA - July
|
|
||||||
TI - A Mathematical Theory of Communication
|
|
||||||
T2 - Bell System Technical Journal
|
|
||||||
SP - 379
|
|
||||||
EP - 423
|
|
||||||
VL - 27
|
|
||||||
ER -
|
|
||||||
TY - JOUR
|
|
||||||
T1 - On computable numbers, with an application to the Entscheidungsproblem
|
|
||||||
A1 - Turing, Alan Mathison
|
|
||||||
JO - Proc. of London Mathematical Society
|
|
||||||
VL - 47
|
|
||||||
IS - 1
|
|
||||||
SP - 230
|
|
||||||
EP - 265
|
|
||||||
Y1 - 1937
|
|
||||||
ER -
|
|
||||||
^D
|
|
||||||
@article{Shannon1948,
|
|
||||||
author = {Shannon, Claude E.},
|
|
||||||
title = {A {Mathematical} {Theory} of {Communication}},
|
|
||||||
journal = {Bell System Technical Journal},
|
|
||||||
volume = {27},
|
|
||||||
pages = {379-423},
|
|
||||||
year = {1948}
|
|
||||||
}
|
|
||||||
@article{Turing1937,
|
|
||||||
author = {Turing, Alan Mathison},
|
|
||||||
title = {On Computable Numbers, with an Application to the
|
|
||||||
{Entscheidungsproblem}},
|
|
||||||
journal = {Proc. of London Mathematical Society},
|
|
||||||
volume = {47},
|
|
||||||
number = {1},
|
|
||||||
pages = {230-265},
|
|
||||||
year = {1937}
|
|
||||||
}
|
|
||||||
```
|
|
||||||
|
|
||||||
# Example: a wiki Creole reader
|
# Example: a wiki Creole reader
|
||||||
|
|
||||||
This is a parser for [Creole common wiki markup].
|
This is a parser for [Creole common wiki markup].
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue