Title: Module:Citation/CS1/Identifiers - freem

URL Source: https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers

Markdown Content:
[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#)

- [x] 

*   [Home](https://freemwiki.com/wiki/Main_Page)
*   [Random](https://freemwiki.com/wiki/Special:Random)

*   [Log in](https://freemwiki.com/index.php?title=Special:UserLogin&returnto=Module%3ACitation%2FCS1%2FIdentifiers&returntoquery=mobileaction%3Dtoggle_view_mobile)

*   [Settings](https://freemwiki.com/index.php?title=Special:MobileOptions&returnto=Module%3ACitation%2FCS1%2FIdentifiers)

*   [About](https://freemwiki.com/wiki/About)
*   [Terms of Service](https://freemwiki.com/wiki/Terms_of_Service)

[freem](https://freemwiki.com/wiki/Main_Page)

Search

# Module:Citation/CS1/Identifiers

*   [Language](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#p-lang "Language")
*   [Watch](https://freemwiki.com/index.php?title=Special:UserLogin&returnto=Module%3ACitation%2FCS1%2FIdentifiers)
*   [Edit](https://freemwiki.com/index.php?title=Module:Citation/CS1/Identifiers&action=edit)

<[Module:Citation/CS1](https://freemwiki.com/wiki/Module:Citation/CS1 "Module:Citation/CS1")

_Documentation for this module may be created at [Module:Citation/CS1/Identifiers/doc](https://freemwiki.com/index.php?title=Module:Citation/CS1/Identifiers/doc&action=edit&redlink=1 "Module:Citation/CS1/Identifiers/doc (page does not exist)")_

[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1)--[[--------------------------< F O R W A R D D E C L A R A T I O N S >--------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-2)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-3)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-4)local has_accept_as_written, is_set, in_array, set_message, select_one,-- functions in Module:Citation/CS1/Utilities[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-5)substitute, make_wikilink;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-6)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-7)local z;-- table of tables defined in Module:Citation/CS1/Utilities[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-8)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-9)local cfg;-- table of configuration tables that are defined in Module:Citation/CS1/Configuration[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-10)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-11)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-12)--[[--------------------------< P A G E S C O P E V A R I A B L E S >--------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-13)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-14)declare variables here that have page-wide scope that are not brought in from other modules; that are created here and used here[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-15)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-16)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-17)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-18)local auto_link_urls = {};-- holds identifier URLs for those identifiers that can auto-link |title=[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-19)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-20)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-21)--============================<< H E L P E R F U N C T I O N S >>============================================[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-22)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-23)--[[--------------------------< W I K I D A T A _ A R T I C L E _ N A M E _ G E T >----------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-24)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-25)as an aid to internationalizing identifier-label wikilinks, gets identifier article names from Wikidata.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-26)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-27)returns w:<lang code>:<article title> when <q> has an <article title> for <lang code>; nil else. 'w:<lang code>'[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-28)ensures that sister project (like wiktionary) will link to the <lang code>.wikipedia article.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-29)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-30)for identifiers that do not have <q>, returns nil[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-31)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-32)for wikis that do not have mw.wikibase installed, returns nil[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-33)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-34)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-35)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-36)local function wikidata_article_name_get (q)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-37)if not is_set (q) or (q and not mw.wikibase) then-- when no q number or when a q number but mw.wikibase not installed on this wiki[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-38)return nil;-- abandon[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-39)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-40)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-41)local wd_article;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-42)local this_wiki_code = cfg.this_wiki_code;-- Wikipedia subdomain; 'en' for en.wikipedia.org[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-43)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-44)wd_article = mw.wikibase.getSitelink (q, this_wiki_code .. 'wiki');-- fetch article title from WD; nil when no title available at this wiki[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-45)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-46)if wd_article then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-47)wd_article = table.concat ({'w:', this_wiki_code, ':', wd_article});-- interwiki-style link without brackets if taken from WD; leading 'w:' required[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-48)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-49)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-50)return wd_article;-- article title from WD; nil else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-51)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-52)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-53)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-54)--[[--------------------------< L A B E L _ L I N K _ M A K E >------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-55)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-56)common function to create a link for an identifier label from handler table or from Wikidata[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-57)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-58)returns the first available of:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-59) 1. redirect from local wiki's handler table (if enabled)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-60) 2. Wikidata sitelink to the local language wikipedia article (if there is a Wikidata entry for this identifier in the local language)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-61) 3. link to wikipedia article specified in the local wiki's handler table[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-62)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-63)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-64)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-65)local function label_link_make (handler)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-66)local wd_article;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-67)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-68)if not (cfg.use_identifier_redirects and is_set (handler.redirect)) then-- redirect has priority so if enabled and available don't fetch from Wikidata because expensive[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-69)wd_article = wikidata_article_name_get (handler.q);-- if Wikidata has an article title for this wiki, get it;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-70)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-71)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-72)return (cfg.use_identifier_redirects and is_set (handler.redirect) and handler.redirect) or wd_article or handler.link;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-73)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-74)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-75)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-76)--[[--------------------------< E X T E R N A L _ L I N K _ I D >----------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-77)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-78)Formats a wiki-style external link[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-79)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-80)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-81)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-82)local function external_link_id (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-83)local url_string = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-84)local ext_link;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-85)local this_wiki_code = cfg.this_wiki_code;-- Wikipedia subdomain; 'en' for en.wikipedia.org[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-86)local wd_article;-- article title from Wikidata[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-87)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-88)if options.encode == true or options.encode == nil then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-89)url_string = mw.uri.encode (url_string, 'PATH');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-90)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-91)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-92)if options.auto_link and is_set (options.access) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-93)auto_link_urls[options.auto_link] = table.concat ({options.prefix, url_string, options.suffix});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-94)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-95)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-96)ext_link = mw.ustring.format ('[%s%s%s %s]', options.prefix, url_string, options.suffix or "", mw.text.nowiki (options.id));[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-97)if is_set (options.access) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-98)ext_link = substitute (cfg.presentation['ext-link-access-signal'], {cfg.presentation[options.access].class, cfg.presentation[options.access].title, ext_link});-- add the free-to-read / paywall lock[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-99)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-100)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-101)return table.concat({[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-102)make_wikilink (label_link_make (options), options.label),-- redirect, Wikidata link, or locally specified link (in that order)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-103)options.separator or '&nbsp;',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-104)ext_link[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-105)});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-106)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-107)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-108)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-109)--[[--------------------------< I N T E R N A L _ L I N K _ I D >----------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-110)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-111)Formats a wiki-style internal link[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-112)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-113)TODO: Does not currently need to support options.access, options.encode, auto-linking and COinS (as in external_link_id),[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-114)but may be needed in the future for :m:Interwiki_map custom-prefixes like :arxiv:, :bibcode:, :DOI:, :hdl:, :ISSN:,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-115):JSTOR:, :Openlibrary:, :PMID:, :RFC:.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-116)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-117)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-118)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-119)local function internal_link_id (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-120)local id = mw.ustring.gsub (options.id, '%d', cfg.date_names.local_digits);-- translate 'local' digits to Western 0-9[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-121)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-122)return table.concat ([](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-123){[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-124)make_wikilink (label_link_make (options), options.label),-- wiki-link the identifier label[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-125)options.separator or '&nbsp;',-- add the separator[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-126)make_wikilink ([](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-127)table.concat ([](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-128){[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-129)options.prefix,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-130)id,-- translated to Western digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-131)options.suffix or ''[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-132)}),[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-133)substitute (cfg.presentation['bdi'], {'', mw.text.nowiki (options.id)})-- bdi tags to prevent Latin script identifiers from being reversed at RTL language wikis[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-134));-- nowiki because MediaWiki still has magic links for ISBN and the like; TODO: is it really required?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-135)});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-136)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-137)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-138)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-139)--[[--------------------------< I S _ E M B A R G O E D >------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-140)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-141)Determines if a PMC identifier's online version is embargoed. Compares the date in |pmc-embargo-date= against[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-142)today's date. If embargo date is in the future, returns the content of |pmc-embargo-date=; otherwise, returns[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-143)an empty string because the embargo has expired or because |pmc-embargo-date= was not set in this cite.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-144)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-145)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-146)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-147)local function is_embargoed (embargo)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-148)if is_set (embargo) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-149)local lang = mw.getContentLanguage();[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-150)local good1, embargo_date, todays_date;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-151)good1, embargo_date = pcall (lang.formatDate, lang, 'U', embargo);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-152)todays_date = lang:formatDate ('U');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-153)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-154)if good1 then-- if embargo date is a good date[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-155)if tonumber (embargo_date) >= tonumber (todays_date) then-- is embargo date is in the future?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-156)return embargo;-- still embargoed[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-157)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-158)set_message ('maint_pmc_embargo');-- embargo has expired; add main cat[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-159)return '';-- unset because embargo has expired[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-160)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-161)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-162)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-163)return '';-- |pmc-embargo-date= not set return empty string[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-164)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-165)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-166)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-167)--[=[-------------------------< I S _ V A L I D _ R X I V _ D A T E >------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-168)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-169)for biorxiv, returns true if:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-170) 2019-12-11T00:00Z <= biorxiv_date < today + 2 days[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-171)for medrxiv, returns true if:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-172) 2020-01-01T00:00Z <= medrxiv_date < today + 2 days[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-173)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-174)The dated form of biorxiv identifier has a start date of 2019-12-11. The Unix timestamp for that date is {{#time:U|2019-12-11}} = 1576022400[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-175)The medrxiv identifier has a start date of 2020-01-01. The Unix timestamp for that date is {{#time:U|2020-01-01}} = 1577836800[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-176)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-177)<rxiv_date> is the date provided in those |biorxiv= parameter values that are dated and in |medrxiv= parameter values at time 00:00:00 UTC[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-178)<today> is the current date at time 00:00:00 UTC plus 48 hours[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-179) if today's date is 2023-01-01T00:00:00 then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-180) adding 24 hours gives 2023-01-02T00:00:00 – one second more than today[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-181) adding 24 hours gives 2023-01-03T00:00:00 – one second more than tomorrow[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-182)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-183)inputs:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-184)<y>, <m>, <d> – year, month, day parts of the date from the birxiv or medrxiv identifier[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-185)<select> 'b' for biorxiv, 'm' for medrxiv; defaults to 'b'[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-186)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-187)]=][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-188)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-189)local function is_valid_rxiv_date (y, m, d, select)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-190)if 0 == tonumber (m) and 12 < tonumber (m) then-- <m> must be a number 1–12[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-191)return false;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-192)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-193)if 0 == tonumber (d) and 31 < tonumber (d) then-- <d> must be a number 1–31; TODO: account for month length and leap yer?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-194)return false;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-195)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-196)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-197)local rxiv_date = table.concat ({y, m, d}, '-');-- make ymd date string[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-198)local good1, good2;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-199)local rxiv_ts, tomorrow_ts;-- to hold Unix timestamps representing the dates[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-200)local lang_object = mw.getContentLanguage();[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-201)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-202)good1, rxiv_ts = pcall (lang_object.formatDate, lang_object, 'U', rxiv_date);-- convert rxiv_date value to Unix timestamp [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-203)good2, tomorrow_ts = pcall (lang_object.formatDate, lang_object, 'U', 'today + 2 days' );-- today midnight + 2 days is one second more than all day tomorrow[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-204)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-205)if good1 and good2 then-- lang.formatDate() returns a timestamp in the local script which tonumber() may not understand[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-206)rxiv_ts = tonumber (rxiv_ts) or lang_object:parseFormattedNumber (rxiv_ts);-- convert to numbers for the comparison;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-207)tomorrow_ts = tonumber (tomorrow_ts) or lang_object:parseFormattedNumber (tomorrow_ts);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-208)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-209)return false;-- one or both failed to convert to Unix timestamp[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-210)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-211)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-212)local limit_ts = ((select and ('m' == select)) and 1577836800) or 1576022400;-- choose the appropriate limit timesatmp[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-213)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-214)return ((limit_ts <= rxiv_ts) and (rxiv_ts < tomorrow_ts))-- limit_ts <= rxiv_date < tomorrow's date[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-215)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-216)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-217)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-218)--[[--------------------------< IS _ V A L I D _ I S X N >-----------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-219)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-220)ISBN-10 and ISSN validator code calculates checksum across all ISBN/ISSN digits including the check digit.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-221)ISBN-13 is checked in isbn().[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-222)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-223)If the number is valid the result will be 0. Before calling this function, ISBN/ISSN must be checked for length[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-224)and stripped of dashes, spaces and other non-ISxN characters.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-225)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-226)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-227)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-228)local function is_valid_isxn (isxn_str, len)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-229)local temp = 0;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-230)isxn_str = { isxn_str:byte(1, len) };-- make a table of byte values '0' → 0x30 .. '9' → 0x39, 'X' → 0x58[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-231)len = len + 1;-- adjust to be a loop counter[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-232)for i, v in ipairs (isxn_str) do-- loop through all of the bytes and calculate the checksum[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-233)if v == string.byte ("X" ) then-- if checkdigit is X (compares the byte value of 'X' which is 0x58)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-234)temp = temp + 10 * (len - i);-- it represents 10 decimal[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-235)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-236)temp = temp + tonumber (string.char (v) )*(len-i);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-237)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-238)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-239)return temp % 11 == 0;-- returns true if calculation result is zero[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-240)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-241)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-242)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-243)--[[--------------------------< IS _ V A L I D _ I S X N _ 1 3 >-----------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-244)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-245)ISBN-13 and ISMN validator code calculates checksum across all 13 ISBN/ISMN digits including the check digit.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-246)If the number is valid, the result will be 0. Before calling this function, ISBN-13/ISMN must be checked for length[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-247)and stripped of dashes, spaces and other non-ISxN-13 characters.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-248)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-249)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-250)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-251)local function is_valid_isxn_13 (isxn_str)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-252)local temp=0;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-253)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-254)isxn_str = { isxn_str:byte(1, 13) };-- make a table of byte values '0' → 0x30 .. '9' → 0x39[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-255)for i, v in ipairs (isxn_str) do[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-256)temp = temp + (3 - 2*(i % 2)) * tonumber (string.char (v) );-- multiply odd index digits by 1, even index digits by 3 and sum; includes check digit[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-257)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-258)return temp % 10 == 0;-- sum modulo 10 is zero when ISBN-13/ISMN is correct[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-259)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-260)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-261)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-262)--[[--------------------------< N O R M A L I Z E _ L C C N >--------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-263)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-264)LCCN normalization (https://www.loc.gov/marc/lccn-namespace.html#normalization)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-265)1. Remove all blanks.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-266)2. If there is a forward slash (/) in the string, remove it, and remove all characters to the right of the forward slash.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-267)3. If there is a hyphen in the string:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-268) a. Remove it.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-269) b. Inspect the substring following (to the right of) the (removed) hyphen. Then (and assuming that steps 1 and 2 have been carried out):[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-270) 1. All these characters should be digits, and there should be six or less. (not done in this function)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-271) 2. If the length of the substring is less than 6, left-fill the substring with zeroes until the length is six.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-272)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-273)Returns a normalized LCCN for lccn() to validate. There is no error checking (step 3.b.1) performed in this function.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-274)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-275)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-276)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-277)local function normalize_lccn (lccn)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-278)lccn = lccn:gsub ("%s", "");-- 1. strip whitespace[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-279)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-280)if nil ~= string.find (lccn, '/') then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-281)lccn = lccn:match ("(.-)/");-- 2. remove forward slash and all character to the right of it[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-282)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-283)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-284)local prefix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-285)local suffix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-286)prefix, suffix = lccn:match ("(.+)%-(.+)");-- 3.a remove hyphen by splitting the string into prefix and suffix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-287)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-288)if nil ~= suffix then-- if there was a hyphen[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-289)suffix = string.rep("0", 6-string.len (suffix)) .. suffix;-- 3.b.2 left fill the suffix with 0s if suffix length less than 6[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-290)lccn = prefix..suffix;-- reassemble the LCCN[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-291)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-292)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-293)return lccn;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-294)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-295)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-296)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-297)--============================<< I D E N T I F I E R F U N C T I O N S >>====================================[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-298)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-299)--[[--------------------------< A R X I V >--------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-300)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-301)See: https://arxiv.org/help/arxiv_identifier[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-302)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-303)format and error check arXiv identifier. There are three valid forms of the identifier:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-304)the first form, valid only between date codes 9107 and 0703, is:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-305) arXiv:<archive>.<class>/<date code><number><version>[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-306)where:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-307)<archive> is a string of alpha characters - may be hyphenated; no other punctuation[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-308)<class> is a string of alpha characters - may be hyphenated; no other punctuation; not the same as |class= parameter which is not supported in this form[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-309)<date code> is four digits in the form YYMM where YY is the last two digits of the four-digit year and MM is the month number January = 01[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-310) first digit of YY for this form can only 9 and 0[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-311)<number> is a three-digit number[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-312)<version> is a 1 or more digit number preceded with a lowercase v; no spaces (undocumented)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-313)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-314)the second form, valid from April 2007 through December 2014 is:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-315) arXiv:<date code>.<number><version>[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-316)where:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-317)<date code> is four digits in the form YYMM where YY is the last two digits of the four-digit year and MM is the month number January = 01[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-318)<number> is a four-digit number[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-319)<version> is a 1 or more digit number preceded with a lowercase v; no spaces[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-320)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-321)the third form, valid from January 2015 is:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-322) arXiv:<date code>.<number><version>[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-323)where:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-324)<date code> and <version> are as defined for 0704-1412[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-325)<number> is a five-digit number[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-326)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-327)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-328)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-329)local function arxiv (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-330)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-331)local class = options.Class;-- TODO: lowercase?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-332)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-333)local year, month, version;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-334)local err_msg = false;-- assume no error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-335)local text;-- output text[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-336)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-337)if id:match("^%a[%a%.%-]+/[90]%d[01]%d%d%d%d$") or id:match("^%a[%a%.%-]+/[90]%d[01]%d%d%d%dv%d+$") then-- test for the 9107-0703 format with or without version[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-338)year, month = id:match("^%a[%a%.%-]+/([90]%d)([01]%d)%d%d%d[v%d]*$");[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-339)year = tonumber (year);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-340)month = tonumber (month);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-341)if ((not (90 < year or 8 > year)) or (1 > month or 12 < month)) or-- if invalid year or invalid month[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-342)((91 == year and 7 > month) or (7 == year and 3 < month)) then-- if years ok, are starting and ending months ok?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-343)err_msg = true;-- flag for error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-344)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-345)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-346)elseif id:match("^%d%d[01]%d%.%d%d%d%d$") or id:match("^%d%d[01]%d%.%d%d%d%dv%d+$") then-- test for the 0704-1412 with or without version[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-347)year, month = id:match("^(%d%d)([01]%d)%.%d%d%d%d[v%d]*$");[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-348)year = tonumber (year);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-349)month = tonumber (month);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-350)if ((7 > year) or (14 < year) or (1 > month or 12 < month)) or-- is year invalid or is month invalid? (doesn't test for future years)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-351)((7 == year) and (4 > month)) then-- when year is 07, is month invalid (before April)?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-352)err_msg = true;-- flag for error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-353)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-354)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-355)elseif id:match("^%d%d[01]%d%.%d%d%d%d%d$") or id:match("^%d%d[01]%d%.%d%d%d%d%dv%d+$") then-- test for the 1501- format with or without version[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-356)year, month = id:match("^(%d%d)([01]%d)%.%d%d%d%d%d[v%d]*$");[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-357)year = tonumber (year);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-358)month = tonumber (month);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-359)if ((15 > year) or (1 > month or 12 < month)) then-- is year invalid or is month invalid? (doesn't test for future years)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-360)err_msg = true;-- flag for error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-361)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-362)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-363)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-364)err_msg = true;-- not a recognized format; flag for error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-365)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-366)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-367)if err_msg then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-368)options.coins_list_t['ARXIV'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-369)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-370)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-371)local err_msg_t = {};[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-372)if err_msg then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-373)set_message ('err_bad_arxiv');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-374)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-375)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-376)text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-377)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode, access = handler.access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-378)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-379)if is_set (class) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-380)if id:match ('^%d+') then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-381)text = table.concat ({text, ' [[https://arxiv.org/archive/', class, ' ', class, ']]'});-- external link within square brackets, not wikilink[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-382)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-383)set_message ('err_class_ignored');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-384)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-385)else-- class not set[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-386)if id:match ('^%d+') and options.CitationClass == 'arxiv' then-- new (post 2007) format; {{cite arxiv}} only[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-387)set_message ('maint_missing_class');-- add maint cat[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-388)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-389)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-390)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-391)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-392)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-393)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-394)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-395)--[[--------------------------< B I B C O D E >--------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-396)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-397)Validates (sort of) and formats a bibcode ID.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-398)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-399)Format for bibcodes is specified here: https://adsabs.harvard.edu/abs_doc/help_pages/data.html#bibcodes[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-400)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-401)But, this: 2015arXiv151206696F is apparently valid so apparently, the only things that really matter are length, 19 characters[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-402)and first four digits must be a year. This function makes these tests:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-403) length must be 19 characters[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-404) characters in position[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-405) 1–4 must be digits and must represent a year in the range of 1000 – next year[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-406) 5 must be a letter[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-407) 6–8 must be letter, digit, ampersand, or dot (ampersand cannot directly precede a dot; &. )[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-408) 9–18 must be letter, digit, or dot[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-409) 19 must be a letter or dot[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-410)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-411)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-412)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-413)local function bibcode (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-414)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-415)local access = options.access;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-416)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-417)local ignore_invalid = options.accept;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-418)local err_type;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-419)local err_msg = '';[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-420)local year;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-421)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-422)local text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-423)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-424)access = access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-425)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-426)if 19 ~= id:len() then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-427)err_type = cfg.err_msg_supl.length;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-428)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-429)year = id:match ("^(%d%d%d%d)[%a][%w&%.][%w&%.][%w&%.][%w.]+[%a%.]$");[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-430)if not year then-- if nil then no pattern match[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-431)err_type = cfg.err_msg_supl.value;-- so value error[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-432)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-433)local next_year = tonumber (os.date ('%Y')) + 1;-- get the current year as a number and add one for next year[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-434)year = tonumber (year);-- convert year portion of bibcode to a number[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-435)if (1000 > year) or (year > next_year) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-436)err_type = cfg.err_msg_supl.year;-- year out of bounds[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-437)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-438)if id:find('&%.') then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-439)err_type = cfg.err_msg_supl.journal;-- journal abbreviation must not have '&.' (if it does it's missing a letter)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-440)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-441)if id:match ('.........%.tmp%.') then-- temporary bibcodes when positions 10–14 are '.tmp.'[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-442)set_message ('maint_bibcode');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-443)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-444)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-445)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-446)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-447)if is_set (err_type) and not ignore_invalid then-- if there was an error detected and accept-as-written markup not used[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-448)set_message ('err_bad_bibcode', {err_type});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-449)options.coins_list_t['BIBCODE'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-450)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-451)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-452)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-453)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-454)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-455)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-456)--[[--------------------------< B I O R X I V >-----------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-457)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-458)Format bioRxiv ID and do simple error checking. Before 2019-12-11, biorXiv IDs were 10.1101/ followed by exactly[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-459)6 digits. After 2019-12-11, biorXiv IDs retained the six-digit identifier but prefixed that with a yyyy.mm.dd. [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-460)date and suffixed with an optional version identifier.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-461)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-462)The bioRxiv ID is the string of characters:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-463) https://doi.org/10.1101/078733 -> 10.1101/078733[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-464)or a date followed by a six-digit number followed by an optional version indicator 'v' and one or more digits:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-465) https://www.biorxiv.org/content/10.1101/2019.12.11.123456v2 -> 10.1101/2019.12.11.123456v2[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-466)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-467)see https://www.biorxiv.org/about-biorxiv[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-468)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-469)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-470)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-471)local function biorxiv (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-472)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-473)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-474)local err_msg = true;-- flag; assume that there will be an error[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-475)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-476)local patterns = {[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-477)'^10%.1101/%d%d%d%d%d%d$',-- simple 6-digit identifier (before 2019-12-11)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-478)'^10%.1101/(20%d%d)%.(%d%d)%.(%d%d)%.%d%d%d%d%d%dv%d+$',-- y.m.d. date + 6-digit identifier + version (after 2019-12-11)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-479)'^10%.1101/(20%d%d)%.(%d%d)%.(%d%d)%.%d%d%d%d%d%d$',-- y.m.d. date + 6-digit identifier (after 2019-12-11)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-480)}[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-481)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-482)for _, pattern in ipairs (patterns) do-- spin through the patterns looking for a match[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-483)if id:match (pattern) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-484)local y, m, d = id:match (pattern);-- found a match, attempt to get year, month and date from the identifier[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-485)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-486)if m then-- m is nil when id is the six-digit form[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-487)if not is_valid_rxiv_date (y, m, d, 'b') then-- validate the encoded date; 'b' for biorxiv limit[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-488)break;-- date fail; break out early so we don't unset the error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-489)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-490)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-491)err_msg = nil;-- we found a match so unset the error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-492)break;-- and done[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-493)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-494)end-- err_cat remains set here when no match[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-495)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-496)if err_msg then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-497)options.coins_list_t['BIORXIV'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-498)set_message ('err_bad_biorxiv');-- and set the error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-499)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-500)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-501)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-502)prefix = handler.prefix, id = id, separator = handler.separator,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-503)encode = handler.encode, access = handler.access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-504)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-505)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-506)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-507)--[[--------------------------< C I T E S E E R X >------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-508)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-509)CiteSeerX use their own notion of "doi" (not to be confused with the identifiers resolved via doi.org).[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-510)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-511)The description of the structure of this identifier can be found at Help_talk:Citation_Style_1/Archive_26#CiteSeerX_id_structure[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-512)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-513)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-514)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-515)local function citeseerx (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-516)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-517)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-518)local matched;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-519)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-520)local text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-521)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-522)access = handler.access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-523)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-524)matched = id:match ("^10%.1%.1%.[1-9]%d?%d?%d?%.[1-9]%d?%d?%d?$");[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-525)if not matched then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-526)set_message ('err_bad_citeseerx' );[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-527)options.coins_list_t['CITESEERX'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-528)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-529)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-530)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-531)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-532)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-533)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-534)--[[--------------------------< D O I >------------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-535)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-536)Formats a DOI and checks for DOI errors.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-537)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-538)DOI names contain two parts: prefix and suffix separated by a forward slash.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-539) Prefix: directory indicator '10.' followed by a registrant code[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-540) Suffix: character string of any length chosen by the registrant[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-541)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-542)This function checks a DOI name for: prefix/suffix. If the DOI name contains spaces or endashes, or, if it ends[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-543)with a period or a comma, this function will emit a bad_doi error message.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-544)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-545)DOI names are case-insensitive and can incorporate any printable Unicode characters so the test for spaces, endash,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-546)and terminal punctuation may not be technically correct but it appears, that in practice these characters are rarely[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-547)if ever used in DOI names.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-548)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-549)https://www.doi.org/doi_handbook/2_Numbering.html -- 2.2 Syntax of a DOI name[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-550)https://www.doi.org/doi_handbook/2_Numbering.html#2.2.2 -- 2.2.2 DOI prefix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-551)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-552)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-553)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-554)local function doi (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-555)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-556)local inactive = options.DoiBroken[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-557)local access = options.access;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-558)local ignore_invalid = options.accept;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-559)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-560)local err_flag;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-561)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-562)local function is_extended_free (registrant, suffix)-- local function to check those few registrants that are mixed; identifiable by the doi suffix <incipit>[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-563)if cfg.extended_registrants_t[registrant] then-- if this registrant has known free-to-read extentions[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-564)for _, incipit in ipairs (cfg.extended_registrants_t[registrant]) do-- loop through the registrant's incipits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-565)if mw.ustring.find (suffix, '^' .. incipit) then-- if found[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-566)return true;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-567)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-568)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-569)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-570)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-571)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-572)local text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-573)if is_set (inactive) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-574)local inactive_year = inactive:match("%d%d%d%d");-- try to get the year portion from the inactive date[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-575)local inactive_month, good;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-576)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-577)if is_set (inactive_year) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-578)if 4 < inactive:len() then-- inactive date has more than just a year (could be anything)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-579)local lang_obj = mw.getContentLanguage();-- get a language object for this wiki[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-580)good, inactive_month = pcall (lang_obj.formatDate, lang_obj, 'F', inactive);-- try to get the month name from the inactive date[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-581)if not good then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-582)inactive_month = nil;-- something went wrong so make sure this is unset[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-583)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-584)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-585)end-- otherwise, |doi-broken-date= has something but it isn't a date[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-586)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-587)if is_set (inactive_year) and is_set (inactive_month) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-588)set_message ('maint_doi_inactive_dated', {inactive_year, inactive_month, ' '});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-589)elseif is_set (inactive_year) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-590)set_message ('maint_doi_inactive_dated', {inactive_year, '', ''});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-591)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-592)set_message ('maint_doi_inactive');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-593)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-594)inactive = " (" .. cfg.messages['inactive'] .. ' ' .. inactive .. ')';[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-595)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-596)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-597)local suffix;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-598)local registrant, suffix = mw.ustring.match (id, '^10%.([^/]+)/([^%s–]-[^%.,])$');-- registrant and suffix set when DOI has the proper basic form[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-599)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-600)local registrant_err_patterns = {-- these patterns are for code ranges that are not supported [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-601)'^[^1-3]%d%d%d%d%.%d+$',-- 5 digits with subcode (0xxxx, 40000+); accepts: 10000–39999[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-602)'^[^1-7]%d%d%d%d$',-- 5 digits without subcode (0xxxx, 60000+); accepts: 10000–69999[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-603)'^[^1-9]%d%d%d%.%d+$',-- 4 digits with subcode (0xxx); accepts: 1000–9999[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-604)'^[^1-9]%d%d%d$',-- 4 digits without subcode (0xxx); accepts: 1000–9999[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-605)'^%d%d%d%d%d%d+',-- 6 or more digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-606)'^%d%d?%d?$',-- less than 4 digits without subcode (3 digits with subcode is legitimate)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-607)'^%d%d?%.[%d%.]+',-- 1 or 2 digits with subcode[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-608)'^5555$',-- test registrant will never resolve[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-609)'[^%d%.]',-- any character that isn't a digit or a dot[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-610)}[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-611)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-612)if not ignore_invalid then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-613)if registrant then-- when DOI has proper form[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-614)for i, pattern in ipairs (registrant_err_patterns) do-- spin through error patterns[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-615)if registrant:match (pattern) then-- to validate registrant codes[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-616)err_flag = set_message ('err_bad_doi');-- when found, mark this DOI as bad[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-617)break;-- and done[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-618)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-619)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-620)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-621)err_flag = set_message ('err_bad_doi');-- invalid directory or malformed[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-622)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-623)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-624)set_message ('maint_doi_ignore');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-625)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-626)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-627)if err_flag then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-628)options.coins_list_t['DOI'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-629)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-630)if not access and (cfg.known_free_doi_registrants_t[registrant] or is_extended_free (registrant, suffix)) then-- |doi-access=free not set and <registrant> is known to be free[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-631)set_message ('maint_doi_unflagged_free');-- set a maint cat[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-632)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-633)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-634)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-635)text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-636)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode, access = access,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-637)auto_link = not (err_flag or is_set (inactive) or ignore_invalid) and 'doi' or nil -- do not auto-link when |doi-broken-date= has a value or when there is a DOI error or (to play it safe, after all, auto-linking is not essential) when invalid DOIs are ignored[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-638)}) .. (inactive or '');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-639)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-640)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-641)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-642)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-643)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-644)--[[--------------------------< H D L >------------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-645)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-646)Formats an HDL with minor error checking.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-647)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-648)HDL names contain two parts: prefix and suffix separated by a forward slash.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-649) Prefix: character string using any character in the UCS-2 character set except '/'[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-650) Suffix: character string of any length using any character in the UCS-2 character set chosen by the registrant[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-651)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-652)This function checks a HDL name for: prefix/suffix. If the HDL name contains spaces, endashes, or, if it ends[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-653)with a period or a comma, this function will emit a bad_hdl error message.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-654)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-655)HDL names are case-insensitive and can incorporate any printable Unicode characters so the test for endashes and[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-656)terminal punctuation may not be technically correct but it appears, that in practice these characters are rarely[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-657)if ever used in HDLs.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-658)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-659)Query string parameters are named here: https://www.handle.net/proxy_servlet.html. query strings are not displayed[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-660)but since '?' is an allowed character in an HDL, '?' followed by one of the query parameters is the only way we[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-661)have to detect the query string so that it isn't URL-encoded with the rest of the identifier.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-662)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-663)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-664)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-665)local function hdl (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-666)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-667)local access = options.access;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-668)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-669)local query_params = {-- list of known query parameters from https://www.handle.net/proxy_servlet.html[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-670)'noredirect',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-671)'ignore_aliases',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-672)'auth',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-673)'cert',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-674)'index',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-675)'type',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-676)'urlappend',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-677)'locatt',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-678)'action',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-679)}[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-680)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-681)local hdl, suffix, param = id:match ('(.-)(%?(%a+).+)$');-- look for query string[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-682)local found;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-683)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-684)if hdl then-- when there are query strings, this is the handle identifier portion[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-685)for _, q in ipairs (query_params) do-- spin through the list of query parameters[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-686)if param:match ('^' .. q) then-- if the query string begins with one of the parameters[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-687)found = true;-- announce a find[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-688)break;-- and stop looking[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-689)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-690)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-691)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-692)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-693)if found then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-694)id = hdl;-- found so replace id with the handle portion; this will be URL-encoded, suffix will not[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-695)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-696)suffix = '';-- make sure suffix is empty string for concatenation else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-697)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-698)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-699)local text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-700)prefix = handler.prefix, id = id, suffix = suffix, separator = handler.separator, encode = handler.encode, access = access})[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-701)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-702)if nil == id:match("^[^%s–]-/[^%s–]-[^%.,]$") then-- HDL must contain a forward slash, must not contain spaces, endashes, and must not end with period or comma[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-703)set_message ('err_bad_hdl' );[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-704)options.coins_list_t['HDL'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-705)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-706)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-707)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-708)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-709)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-710)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-711)--[[--------------------------< I S B N >----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-712)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-713)Determines whether an ISBN string is valid[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-714)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-715)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-716)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-717)local function isbn (options_t)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-718)local isbn_str = options_t.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-719)local ignore_invalid = options_t.accept;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-720)local handler = options_t.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-721)local year = options_t.Year;-- when set, valid anchor_year; may have a disambiguator which must be removed[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-722)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-723)local function return_result (check, err_type)-- local function to handle the various returns[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-724)local ISBN = internal_link_id ({link = handler.link, label = handler.label, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-725)prefix = handler.prefix, id = isbn_str, separator = handler.separator});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-726)if ignore_invalid then-- if ignoring ISBN errors[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-727)set_message ('maint_isbn_ignore');-- add a maint category even when there is no error[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-728)else-- here when not ignoring[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-729)if not check then-- and there is an error[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-730)options_t.coins_list_t['ISBN'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-731)set_message ('err_bad_isbn', err_type);-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-732)return ISBN; -- return id text[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-733)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-734)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-735)return ISBN;-- return id text[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-736)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-737)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-738)if year and not ignore_invalid then-- [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-739)year = year:match ('%d%d%d%d?');-- strip disambiguator if present[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-740)if year and (1965 > tonumber(year)) then-- <year> will be nil here when |year=n.d. or |year=nd[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-741)set_message ('err_invalid_isbn_date');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-742)return internal_link_id ({link = handler.link, label = handler.label, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-743)prefix = handler.prefix, id = isbn_str, separator = handler.separator});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-744)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-745)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-746)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-747)if nil ~= isbn_str:match ('[^%s-0-9X]') then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-748)return return_result (false, cfg.err_msg_supl.char);-- fail if isbn_str contains anything but digits, hyphens, or the uppercase X[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-749)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-750)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-751)local id = isbn_str:gsub ('[%s-]', '');-- remove hyphens and whitespace[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-752)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-753)local len = id:len();[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-754) [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-755)if len ~= 10 and len ~= 13 then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-756)return return_result (false, cfg.err_msg_supl.length);-- fail if incorrect length[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-757)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-758)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-759)if len == 10 then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-760)if id:match ('^%d*X?$') == nil then-- fail if isbn_str has 'X' anywhere but last position[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-761)return return_result (false, cfg.err_msg_supl.form);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-762)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-763)if not is_valid_isxn (id, 10) then-- test isbn-10 for numerical validity[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-764)return return_result (false, cfg.err_msg_supl.check);-- fail if isbn-10 is not numerically valid[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-765)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-766)if id:find ('^63[01]') then-- 630xxxxxxx and 631xxxxxxx are (apparently) not valid isbn group ids but are used by amazon as numeric identifiers (asin)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-767)return return_result (false, cfg.err_msg_supl.group);-- fail if isbn-10 begins with 630/1[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-768)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-769)return return_result (true, cfg.err_msg_supl.check);-- pass if isbn-10 is numerically valid[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-770)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-771)if id:match ('^%d+$') == nil then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-772)return return_result (false, cfg.err_msg_supl.char);-- fail if ISBN-13 is not all digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-773)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-774)if id:match ('^97[89]%d*$') == nil then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-775)return return_result (false, cfg.err_msg_supl.prefix);-- fail when ISBN-13 does not begin with 978 or 979[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-776)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-777)if id:match ('^9790') then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-778)return return_result (false, cfg.err_msg_supl.group);-- group identifier '0' is reserved to ISMN[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-779)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-780)return return_result (is_valid_isxn_13 (id), cfg.err_msg_supl.check);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-781)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-782)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-783)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-784)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-785)--[[--------------------------< A S I N >----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-786)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-787)Formats a link to Amazon. Do simple error checking: ASIN must be mix of 10 numeric or uppercase alpha[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-788)characters. If a mix, first character must be uppercase alpha; if all numeric, ASINs must be 10-digit[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-789)ISBN. If 10-digit ISBN, add a maintenance category so a bot or AWB script can replace |asin= with |isbn=.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-790)Error message if not 10 characters, if not ISBN-10, if mixed and first character is a digit.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-791)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-792)|asin=630....... and |asin=631....... are (apparently) not a legitimate ISBN though it checksums as one; these[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-793)do not cause this function to emit the maint_asin message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-794)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-795)This function is positioned here because it calls isbn()[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-796)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-797)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-798)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-799)local function asin (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-800)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-801)local domain = options.ASINTLD;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-802)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-803)local err_flag;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-804)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-805)if not id:match("^[%d%u][%d%u][%d%u][%d%u][%d%u][%d%u][%d%u][%d%u][%d%u][%d%u]$") then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-806)err_flag = set_message ('err_bad_asin');-- ASIN is not a mix of 10 uppercase alpha and numeric characters[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-807)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-808)if id:match("^%d%d%d%d%d%d%d%d%d[%dX]$") then-- if 10-digit numeric (or 9 digits with terminal X)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-809)if is_valid_isxn (id, 10) then-- see if ASIN value is or validates as ISBN-10[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-810)if not id:find ('^63[01]') then-- 630xxxxxxx and 631xxxxxxx are (apparently) not a valid isbn prefixes but are used by amazon as a numeric identifier[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-811)err_flag = set_message ('err_bad_asin');-- ASIN has ISBN-10 form but begins with something other than 630/1 so probably an isbn [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-812)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-813)elseif not is_set (err_flag) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-814)err_flag = set_message ('err_bad_asin');-- ASIN is not ISBN-10[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-815)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-816)elseif not id:match("^%u[%d%u]+$") then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-817)err_flag = set_message ('err_bad_asin');-- asin doesn't begin with uppercase alpha[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-818)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-819)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-820)if (not is_set (domain)) or in_array (domain, {'us'}) then-- default: United States[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-821)domain = "com";[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-822)elseif in_array (domain, {'jp', 'uk'}) then-- Japan, United Kingdom[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-823)domain = "co." .. domain;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-824)elseif in_array (domain, {'z.cn'}) then -- China[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-825)domain = "cn";[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-826)elseif in_array (domain, {'au', 'br', 'mx', 'sg', 'tr'}) then-- Australia, Brazil, Mexico, Singapore, Turkey[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-827)domain = "com." .. domain;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-828)elseif not in_array (domain, {'ae', 'ca', 'cn', 'de', 'es', 'fr', 'in', 'it', 'nl', 'pl', 'sa', 'se', 'co.jp', 'co.uk', 'com', 'com.au', 'com.br', 'com.mx', 'com.sg', 'com.tr'}) then -- Arabic Emirates, Canada, China, Germany, Spain, France, Indonesia, Italy, Netherlands, Poland, Saudi Arabia, Sweden (as of 2021-03 Austria (.at), Liechtenstein (.li) and Switzerland (.ch) still redirect to the German site (.de) with special settings, so don't maintain local ASINs for them)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-829)err_flag = set_message ('err_bad_asin_tld');-- unsupported asin-tld value[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-830)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-831)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-832)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-833)if not is_set (err_flag) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-834)options.coins_list_t['ASIN'] = handler.prefix .. domain .. "/dp/" .. id;-- asin for coins[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-835)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-836)options.coins_list_t['ASIN'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-837)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-838)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-839)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-840)prefix = handler.prefix .. domain .. "/dp/",[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-841)id = id, encode = handler.encode, separator = handler.separator})[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-842)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-843)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-844)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-845)--[[--------------------------< I S M N >----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-846)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-847)Determines whether an ISMN string is valid. Similar to ISBN-13, ISMN is 13 digits beginning 979-0-... and uses the[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-848)same check digit calculations. See https://www.ismn-international.org/download/Web_ISMN_Users_Manual_2008-6.pdf[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-849)section 2, pages 9–12.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-850)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-851)ismn value not made part of COinS metadata because we don't have a url or isn't a COinS-defined identifier (rft.xxx)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-852)or an identifier registered at info-uri.info (info:)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-853)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-854)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-855)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-856)local function ismn (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-857)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-858)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-859)local text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-860)local valid_ismn = true;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-861)local id_copy;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-862)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-863)id_copy = id;-- save a copy because this testing is destructive[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-864)id = id:gsub ('[%s-]', '');-- remove hyphens and white space[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-865)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-866)if 13 ~= id:len() or id:match ("^9790%d*$" ) == nil then-- ISMN must be 13 digits and begin with 9790[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-867)valid_ismn = false;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-868)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-869)valid_ismn=is_valid_isxn_13 (id);-- validate ISMN[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-870)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-871)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-872)-- text = internal_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect, -- use this (or external version) when there is some place to link to[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-873)-- prefix = handler.prefix, id = id_copy, separator = handler.separator, encode = handler.encode})[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-874)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-875)text = table.concat (-- because no place to link to yet[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-876){[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-877)make_wikilink (label_link_make (handler), handler.label),[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-878)handler.separator,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-879)id_copy[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-880)});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-881)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-882)if false == valid_ismn then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-883)options.coins_list_t['ISMN'] = nil;-- when error, unset so not included in COinS; not really necessary here because ismn not made part of COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-884)set_message ('err_bad_ismn');-- create an error message if the ISMN is invalid[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-885)end [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-886)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-887)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-888)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-889)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-890)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-891)--[[--------------------------< I S S N >----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-892)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-893)Validate and format an ISSN. This code fixes the case where an editor has included an ISSN in the citation but[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-894)has separated the two groups of four digits with a space. When that condition occurred, the resulting link looked[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-895)like this:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-896)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-897) |issn=0819 4327 gives: [https://www.worldcat.org/issn/0819 4327 0819 4327] -- can't have spaces in an external link[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-898)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-899)This code now prevents that by inserting a hyphen at the ISSN midpoint. It also validates the ISSN for length[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-900)and makes sure that the checkdigit agrees with the calculated value. Incorrect length (8 digits), characters[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-901)other than 0-9 and X, or checkdigit / calculated value mismatch will all cause a check ISSN error message. The[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-902)ISSN is always displayed with a hyphen, even if the ISSN was given as a single group of 8 digits.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-903)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-904)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-905)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-906)local function issn (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-907)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-908)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-909)local ignore_invalid = options.accept;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-910)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-911)local issn_copy = id;-- save a copy of unadulterated ISSN; use this version for display if ISSN does not validate[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-912)local text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-913)local valid_issn = true;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-914)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-915)id = id:gsub ('[%s-]', '');-- remove hyphens and whitespace[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-916)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-917)if 8 ~= id:len() or nil == id:match ("^%d*X?$" ) then-- validate the ISSN: 8 digits long, containing only 0-9 or X in the last position[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-918)valid_issn = false;-- wrong length or improper character[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-919)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-920)valid_issn = is_valid_isxn (id, 8);-- validate ISSN[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-921)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-922)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-923)if true == valid_issn then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-924)id = string.sub (id, 1, 4 ) .. "-" .. string.sub (id, 5 );-- if valid, display correctly formatted version[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-925)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-926)id = issn_copy;-- if not valid, show the invalid ISSN with error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-927)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-928)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-929)text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-930)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode})[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-931)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-932)if ignore_invalid then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-933)set_message ('maint_issn_ignore');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-934)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-935)if false == valid_issn then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-936)options.coins_list_t['ISSN'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-937)set_message ('err_bad_issn', (options.hkey == 'EISSN') and 'e' or '');-- create an error message if the ISSN is invalid[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-938)end [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-939)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-940)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-941)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-942)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-943)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-944)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-945)--[[--------------------------< J F M >-----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-946)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-947)A numerical identifier in the form nn.nnnn.nn[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-948)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-949)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-950)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-951)local function jfm (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-952)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-953)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-954)local id_num;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-955)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-956)id_num = id:match ('^[Jj][Ff][Mm](.*)$');-- identifier with jfm prefix; extract identifier[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-957)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-958)if is_set (id_num) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-959)set_message ('maint_jfm_format');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-960)else-- plain number without JFM prefix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-961)id_num = id;-- if here id does not have prefix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-962)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-963)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-964)if id_num and id_num:match('^%d%d%.%d%d%d%d%.%d%d$') then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-965)id = id_num;-- jfm matches pattern[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-966)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-967)set_message ('err_bad_jfm' );-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-968)options.coins_list_t['JFM'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-969)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-970)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-971)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-972)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-973)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-974)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-975)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-976)--[[--------------------------< J S T O R >--------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-977)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-978)Format a JSTOR with some error checking[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-979)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-980)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-981)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-982)local function jstor (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-983)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-984)local access = options.access;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-985)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-986)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-987)if id:find ('[Jj][Ss][Tt][Oo][Rr]') or id:find ('^https?://') or id:find ('%s') then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-988)set_message ('err_bad_jstor');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-989)options.coins_list_t['JSTOR'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-990)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-991)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-992)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-993)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode, access = access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-994)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-995)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-996)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-997)--[[--------------------------< L C C N >----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-998)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-999)Format LCCN link and do simple error checking. LCCN is a character string 8-12 characters long. The length of[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1000)the LCCN dictates the character type of the first 1-3 characters; the rightmost eight are always digits.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1001)https://oclc-research.github.io/infoURI-Frozen/info-uri.info/info:lccn/reg.html[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1002)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1003)length = 8 then all digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1004)length = 9 then lccn[1] is lowercase alpha[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1005)length = 10 then lccn[1] and lccn[2] are both lowercase alpha or both digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1006)length = 11 then lccn[1] is lower case alpha, lccn[2] and lccn[3] are both lowercase alpha or both digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1007)length = 12 then lccn[1] and lccn[2] are both lowercase alpha[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1008)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1009)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1010)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1011)local function lccn (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1012)local lccn = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1013)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1014)local err_flag;-- presume that LCCN is valid[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1015)local id = lccn;-- local copy of the LCCN[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1016)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1017)id = normalize_lccn (id);-- get canonical form (no whitespace, hyphens, forward slashes)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1018)local len = id:len();-- get the length of the LCCN[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1019)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1020)if 8 == len then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1021)if id:match("[^%d]") then-- if LCCN has anything but digits (nil if only digits)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1022)err_flag = set_message ('err_bad_lccn');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1023)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1024)elseif 9 == len then-- LCCN should be adddddddd[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1025)if nil == id:match("%l%d%d%d%d%d%d%d%d") then-- does it match our pattern?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1026)err_flag = set_message ('err_bad_lccn');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1027)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1028)elseif 10 == len then-- LCCN should be aadddddddd or dddddddddd[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1029)if id:match("[^%d]") then-- if LCCN has anything but digits (nil if only digits) ...[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1030)if nil == id:match("^%l%l%d%d%d%d%d%d%d%d") then-- ... see if it matches our pattern[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1031)err_flag = set_message ('err_bad_lccn');-- no match, set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1032)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1033)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1034)elseif 11 == len then-- LCCN should be aaadddddddd or adddddddddd[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1035)if not (id:match("^%l%l%l%d%d%d%d%d%d%d%d") or id:match("^%l%d%d%d%d%d%d%d%d%d%d")) then-- see if it matches one of our patterns[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1036)err_flag = set_message ('err_bad_lccn');-- no match, set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1037)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1038)elseif 12 == len then-- LCCN should be aadddddddddd[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1039)if not id:match("^%l%l%d%d%d%d%d%d%d%d%d%d") then-- see if it matches our pattern[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1040)err_flag = set_message ('err_bad_lccn');-- no match, set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1041)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1042)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1043)err_flag = set_message ('err_bad_lccn');-- wrong length, set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1044)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1045)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1046)if not is_set (err_flag) and nil ~= lccn:find ('%s') then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1047)err_flag = set_message ('err_bad_lccn');-- lccn contains a space, set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1048)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1049)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1050)if is_set (err_flag) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1051)options.coins_list_t['LCCN'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1052)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1053)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1054)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1055)prefix = handler.prefix, id = lccn, separator = handler.separator, encode = handler.encode});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1056)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1057)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1058)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1059)--[[--------------------------< M E D R X I V >-----------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1060)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1061)Format medRxiv ID and do simple error checking. Similar to later bioRxiv IDs, medRxiv IDs are prefixed with a[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1062)yyyy.mm.dd. date and suffixed with an optional version identifier. Ealiest date accepted is 2020.01.01[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1063)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1064)The medRxiv ID is a date followed by an eight-digit number followed by an optional version indicator 'v' and one or more digits:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1065) https://www.medrxiv.org/content/10.1101/2020.11.16.20232009v2 -> 10.1101/2020.11.16.20232009v2[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1066)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1067)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1068)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1069)local function medrxiv (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1070)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1071)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1072)local err_msg_flag = true;-- flag; assume that there will be an error[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1073)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1074)local patterns = {[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1075)'^%d%d%d%d%d%d%d%d$',-- simple 8-digit identifier; these should be relatively rare[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1076)'^10%.1101/(20%d%d)%.(%d%d)%.(%d%d)%.%d%d%d%d%d%d%d%dv%d+$',-- y.m.d. date + 8-digit identifier + version (2020-01-01 and later)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1077)'^10%.1101/(20%d%d)%.(%d%d)%.(%d%d)%.%d%d%d%d%d%d%d%d$',-- y.m.d. date + 8-digit identifier (2020-01-01 and later)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1078)}[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1079)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1080)for _, pattern in ipairs (patterns) do-- spin through the patterns looking for a match[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1081)if id:match (pattern) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1082)local y, m, d = id:match (pattern);-- found a match, attempt to get year, month and date from the identifier[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1083)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1084)if m then-- m is nil when id is the 8-digit form[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1085)if not is_valid_rxiv_date (y, m, d, 'b') then-- validate the encoded date; 'b' for medrxiv limit[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1086)break;-- date fail; break out early so we don't unset the error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1087)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1088)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1089)err_msg_flag = nil;-- we found a match so unset the error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1090)break;-- and done[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1091)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1092)end-- <err_msg_flag> remains set here when no match[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1093)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1094)if err_msg_flag then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1095)options.coins_list_t['MEDRXIV'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1096)set_message ('err_bad_medrxiv');-- and set the error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1097)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1098)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1099)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1100)prefix = handler.prefix, id = id, separator = handler.separator,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1101)encode = handler.encode, access = handler.access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1102)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1103)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1104)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1105)--[[--------------------------< M R >--------------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1106)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1107)A seven digit number; if not seven digits, zero-fill leading digits to make seven digits.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1108)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1109)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1110)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1111)local function mr (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1112)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1113)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1114)local id_num;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1115)local id_len;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1116)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1117)id_num = id:match ('^[Mm][Rr](%d+)$');-- identifier with mr prefix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1118)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1119)if is_set (id_num) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1120)set_message ('maint_mr_format');-- add maint cat[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1121)else-- plain number without mr prefix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1122)id_num = id:match ('^%d+$');-- if here id is all digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1123)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1124)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1125)id_len = id_num and id_num:len() or 0;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1126)if (7 >= id_len) and (0 ~= id_len) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1127)id = string.rep ('0', 7-id_len) .. id_num;-- zero-fill leading digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1128)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1129)set_message ('err_bad_mr');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1130)options.coins_list_t['MR'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1131)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1132)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1133)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1134)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1135)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1136)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1137)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1138)--[[--------------------------< O C L C >----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1139)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1140)Validate and format an OCLC ID. https://www.oclc.org/batchload/controlnumber.en.html {{dead link}}[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1141)archived at: https://web.archive.org/web/20161228233804/https://www.oclc.org/batchload/controlnumber.en.html[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1142)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1143)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1144)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1145)local function oclc (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1146)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1147)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1148)local number;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1149)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1150)if id:match('^ocm%d%d%d%d%d%d%d%d$') then-- ocm prefix and 8 digits; 001 field (12 characters)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1151)number = id:match('ocm(%d+)');-- get the number[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1152)elseif id:match('^ocn%d%d%d%d%d%d%d%d%d$') then-- ocn prefix and 9 digits; 001 field (12 characters)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1153)number = id:match('ocn(%d+)');-- get the number[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1154)elseif id:match('^on%d%d%d%d%d%d%d%d%d%d+$') then-- on prefix and 10 or more digits; 001 field (12 characters)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1155)number = id:match('^on(%d%d%d%d%d%d%d%d%d%d+)$');-- get the number[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1156)elseif id:match('^%(OCoLC%)[1-9]%d*$') then-- (OCoLC) prefix and variable number digits; no leading zeros; 035 field[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1157)number = id:match('%(OCoLC%)([1-9]%d*)');-- get the number[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1158)if 9 < number:len() then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1159)number = nil;-- constrain to 1 to 9 digits; change this when OCLC issues 10-digit numbers[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1160)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1161)elseif id:match('^%d+$') then-- no prefix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1162)number = id;-- get the number[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1163)if tonumber (id) > handler.id_limit then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1164)number = nil;-- unset when id value exceeds the limit[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1165)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1166)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1167)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1168)if number then-- proper format[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1169)id = number;-- exclude prefix, if any, from external link[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1170)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1171)set_message ('err_bad_oclc')-- add an error message if the id is malformed[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1172)options.coins_list_t['OCLC'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1173)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1174)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1175)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1176)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1177)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1178)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1179)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1180)--[[--------------------------< O P E N L I B R A R Y >--------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1181)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1182)Formats an OpenLibrary link, and checks for associated errors.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1183)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1184)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1185)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1186)local function openlibrary (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1187)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1188)local access = options.access;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1189)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1190)local ident, code = id:gsub('^OL', ''):match("^(%d+([AMW]))$");-- strip optional OL prefix followed immediately by digits followed by 'A', 'M', or 'W';[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1191)local err_flag;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1192)local prefix = {-- these are appended to the handler.prefix according to code[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1193)['A']='authors/OL',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1194)['M']='books/OL',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1195)['W']='works/OL',[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1196)['X']='OL'-- not a code; spoof when 'code' in id is invalid[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1197)};[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1198)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1199)if not ident then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1200)code = 'X';-- no code or id completely invalid[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1201)ident = id;-- copy id to ident so that we display the flawed identifier[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1202)err_flag = set_message ('err_bad_ol');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1203)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1204)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1205)if not is_set (err_flag) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1206)options.coins_list_t['OL'] = handler.prefix .. prefix[code] .. ident;-- experiment for ol coins[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1207)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1208)options.coins_list_t['OL'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1209)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1210)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1211)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1212)prefix = handler.prefix .. prefix[code],[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1213)id = ident, separator = handler.separator, encode = handler.encode,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1214)access = access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1215)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1216)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1217)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1218)--[[--------------------------< O S T I >----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1219)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1220)Format OSTI and do simple error checking. OSTIs are sequential numbers beginning at 1 and counting up. This[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1221)code checks the OSTI to see that it contains only digits and is less than test_limit specified in the configuration;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1222)the value in test_limit will need to be updated periodically as more OSTIs are issued.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1223)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1224)NB. 1018 is the lowest OSTI number found in the wild (so far) and resolving OK on the OSTI site[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1225)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1226)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1227)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1228)local function osti (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1229)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1230)local access = options.access;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1231)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1232)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1233)if id:match("[^%d]") then-- if OSTI has anything but digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1234)set_message ('err_bad_osti');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1235)options.coins_list_t['OSTI'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1236)else-- OSTI is only digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1237)local id_num = tonumber (id);-- convert id to a number for range testing[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1238)if 1018 > id_num or handler.id_limit < id_num then-- if OSTI is outside test limit boundaries[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1239)set_message ('err_bad_osti');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1240)options.coins_list_t['OSTI'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1241)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1242)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1243)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1244)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1245)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode, access = access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1246)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1247)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1248)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1249)--[[--------------------------< P M C >------------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1250)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1251)Format a PMC, do simple error checking, and check for embargoed articles.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1252)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1253)The embargo parameter takes a date for a value. If the embargo date is in the future the PMC identifier will not[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1254)be linked to the article. If the embargo date is today or in the past, or if it is empty or omitted, then the[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1255)PMC identifier is linked to the article through the link at cfg.id_handlers['PMC'].prefix.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1256)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1257)PMC embargo date testing is done in function is_embargoed () which is called earlier because when the citation[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1258)has |pmc=<value> but does not have a |url= then |title= is linked with the PMC link. Function is_embargoed ()[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1259)returns the embargo date if the PMC article is still embargoed, otherwise it returns an empty string.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1260)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1261)PMCs are sequential numbers beginning at 1 and counting up. This code checks the PMC to see that it contains only digits and is less[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1262)than test_limit; the value in local variable test_limit will need to be updated periodically as more PMCs are issued.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1263)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1264)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1265)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1266)local function pmc (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1267)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1268)local embargo = options.Embargo;-- TODO: lowercase?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1269)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1270)local err_flag;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1271)local id_num;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1272)local text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1273)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1274)id_num = id:match ('^[Pp][Mm][Cc](%d+)$');-- identifier with PMC prefix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1275)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1276)if is_set (id_num) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1277)set_message ('maint_pmc_format');[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1278)else-- plain number without PMC prefix[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1279)id_num = id:match ('^%d+$');-- if here id is all digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1280)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1281)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1282)if is_set (id_num) then-- id_num has a value so test it[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1283)id_num = tonumber (id_num);-- convert id_num to a number for range testing[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1284)if 1 > id_num or handler.id_limit < id_num then-- if PMC is outside test limit boundaries[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1285)err_flag = set_message ('err_bad_pmc');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1286)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1287)id = tostring (id_num);-- make sure id is a string[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1288)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1289)else-- when id format incorrect[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1290)err_flag = set_message ('err_bad_pmc');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1291)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1292)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1293)if is_set (embargo) and is_set (is_embargoed (embargo)) then-- is PMC is still embargoed?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1294)text = table.concat (-- still embargoed so no external link[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1295){[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1296)make_wikilink (label_link_make (handler), handler.label),[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1297)handler.separator,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1298)id,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1299)});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1300)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1301)text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,-- no embargo date or embargo has expired, ok to link to article[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1302)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode, access = handler.access,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1303)auto_link = not err_flag and 'pmc' or nil-- do not auto-link when PMC has error[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1304)});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1305)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1306)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1307)if err_flag then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1308)options.coins_list_t['PMC'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1309)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1310)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1311)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1312)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1313)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1314)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1315)--[[--------------------------< P M I D >----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1316)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1317)Format PMID and do simple error checking. PMIDs are sequential numbers beginning at 1 and counting up. This[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1318)code checks the PMID to see that it contains only digits and is less than test_limit; the value in local variable[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1319)test_limit will need to be updated periodically as more PMIDs are issued.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1320)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1321)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1322)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1323)local function pmid (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1324)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1325)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1326)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1327)if id:match("[^%d]") then-- if PMID has anything but digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1328)set_message ('err_bad_pmid');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1329)options.coins_list_t['PMID'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1330)else-- PMID is only digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1331)local id_num = tonumber (id);-- convert id to a number for range testing[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1332)if 1 > id_num or handler.id_limit < id_num then-- if PMID is outside test limit boundaries[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1333)set_message ('err_bad_pmid');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1334)options.coins_list_t['PMID'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1335)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1336)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1337)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1338)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1339)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1340)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1341)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1342)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1343)--[[--------------------------< R F C >------------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1344)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1345)Format RFC and do simple error checking. RFCs are sequential numbers beginning at 1 and counting up. This[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1346)code checks the RFC to see that it contains only digits and is less than test_limit specified in the configuration;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1347)the value in test_limit will need to be updated periodically as more RFCs are issued.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1348)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1349)An index of all RFCs is here: https://tools.ietf.org/rfc/[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1350)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1351)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1352)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1353)local function rfc (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1354)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1355)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1356)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1357)if id:match("[^%d]") then-- if RFC has anything but digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1358)set_message ('err_bad_rfc');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1359)options.coins_list_t['RFC'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1360)else-- RFC is only digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1361)local id_num = tonumber (id);-- convert id to a number for range testing[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1362)if 1 > id_num or handler.id_limit < id_num then-- if RFC is outside test limit boundaries[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1363)set_message ('err_bad_rfc');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1364)options.coins_list_t['RFC'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1365)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1366)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1367)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1368)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1369)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode, access = handler.access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1370)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1371)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1372)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1373)--[[--------------------------< S 2 C I D >--------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1374)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1375)Format an S2CID, do simple error checking[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1376)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1377)S2CIDs are sequential numbers beginning at 1 and counting up. This code checks the S2CID to see that it is only[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1378)digits and is less than test_limit; the value in local variable test_limit will need to be updated periodically[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1379)as more S2CIDs are issued.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1380)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1381)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1382)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1383)local function s2cid (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1384)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1385)local access = options.access;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1386)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1387)local id_num;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1388)local text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1389)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1390)id_num = id:match ('^[1-9]%d*$');-- id must be all digits; must not begin with 0; no open access flag[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1391)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1392) if is_set (id_num) then-- id_num has a value so test it[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1393)id_num = tonumber (id_num);-- convert id_num to a number for range testing[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1394)if handler.id_limit < id_num then-- if S2CID is outside test limit boundaries[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1395)set_message ('err_bad_s2cid');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1396)options.coins_list_t['S2CID'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1397)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1398)else-- when id format incorrect[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1399)set_message ('err_bad_s2cid');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1400)options.coins_list_t['S2CID'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1401)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1402)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1403)text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1404)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode, access = access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1405)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1406)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1407)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1408)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1409)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1410)--[[--------------------------< S B N >------------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1411)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1412)9-digit form of ISBN-10; uses same check-digit validation when SBN is prefixed with an additional '0' to make 10 digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1413)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1414)sbn value not made part of COinS metadata because we don't have a url or isn't a COinS-defined identifier (rft.xxx)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1415)or an identifier registered at info-uri.info (info:)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1416)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1417)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1418)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1419)local function sbn (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1420)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1421)local ignore_invalid = options.accept;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1422)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1423)local function return_result (check, err_type)-- local function to handle the various returns[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1424)local SBN = internal_link_id ({link = handler.link, label = handler.label, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1425)prefix = handler.prefix, id = id, separator = handler.separator});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1426)if not ignore_invalid then-- if not ignoring SBN errors[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1427)if not check then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1428)options.coins_list_t['SBN'] = nil;-- when error, unset so not included in COinS; not really necessary here because sbn not made part of COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1429)set_message ('err_bad_sbn', {err_type});-- display an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1430)return SBN; [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1431)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1432)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1433)set_message ('maint_isbn_ignore');-- add a maint category even when there is no error (ToDo: Possibly switch to separate message for SBNs only)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1434)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1435)return SBN;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1436)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1437)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1438)if id:match ('[^%s-0-9X]') then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1439)return return_result (false, cfg.err_msg_supl.char);-- fail if SBN contains anything but digits, hyphens, or the uppercase X[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1440)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1441)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1442)local ident = id:gsub ('[%s-]', '');-- remove hyphens and whitespace; they interfere with the rest of the tests[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1443)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1444)if 9 ~= ident:len() then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1445)return return_result (false, cfg.err_msg_supl.length);-- fail if incorrect length[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1446)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1447)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1448)if ident:match ('^%d*X?$') == nil then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1449)return return_result (false, cfg.err_msg_supl.form);-- fail if SBN has 'X' anywhere but last position[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1450)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1451)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1452)return return_result (is_valid_isxn ('0' .. ident, 10), cfg.err_msg_supl.check);[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1453)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1454)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1455)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1456)--[[--------------------------< S S R N >----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1457)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1458)Format an SSRN, do simple error checking[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1459)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1460)SSRNs are sequential numbers beginning at 100? and counting up. This code checks the SSRN to see that it is[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1461)only digits and is greater than 99 and less than test_limit; the value in local variable test_limit will need[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1462)to be updated periodically as more SSRNs are issued.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1463)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1464)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1465)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1466)local function ssrn (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1467)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1468)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1469)local id_num;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1470)local text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1471)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1472)id_num = id:match ('^%d+$');-- id must be all digits[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1473)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1474)if is_set (id_num) then-- id_num has a value so test it[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1475)id_num = tonumber (id_num);-- convert id_num to a number for range testing[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1476)if 100 > id_num or handler.id_limit < id_num then-- if SSRN is outside test limit boundaries[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1477)set_message ('err_bad_ssrn');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1478)options.coins_list_t['SSRN'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1479)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1480)else-- when id format incorrect[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1481)set_message ('err_bad_ssrn');-- set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1482)options.coins_list_t['SSRN'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1483)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1484)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1485)text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1486)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode, access = options.access});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1487)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1488)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1489)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1490)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1491)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1492)--[[--------------------------< U S E N E T _ I D >------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1493)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1494)Validate and format a usenet message id. Simple error checking, looks for 'id-left@id-right' not enclosed in[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1495)'<' and/or '>' angle brackets.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1496)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1497)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1498)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1499)local function usenet_id (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1500)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1501)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1502)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1503)local text = external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1504)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode})[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1505) [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1506)if not id:match('^.+@.+$') or not id:match('^[^<].*[^>]$') then-- doesn't have '@' or has one or first or last character is '< or '>'[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1507)set_message ('err_bad_usenet_id')-- add an error message if the message id is invalid[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1508)options.coins_list_t['USENETID'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1509)end [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1510)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1511)return text;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1512)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1513)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1514)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1515)--[[--------------------------< Z B L >-----------------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1516)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1517)A numerical identifier in the form nnnn.nnnnn - leading zeros in the first quartet optional[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1518)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1519)format described here: http://emis.mi.sanu.ac.rs/ZMATH/zmath/en/help/search/[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1520)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1521)temporary format is apparently eight digits. Anything else is an error[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1522)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1523)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1524)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1525)local function zbl (options)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1526)local id = options.id;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1527)local handler = options.handler;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1528)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1529)if id:match('^%d%d%d%d%d%d%d%d$') then-- is this identifier using temporary format?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1530)set_message ('maint_zbl');-- yes, add maint cat[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1531)elseif not id:match('^%d?%d?%d?%d%.%d%d%d%d%d$') then-- not temporary, is it normal format?[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1532)set_message ('err_bad_zbl');-- no, set an error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1533)options.coins_list_t['ZBL'] = nil;-- when error, unset so not included in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1534)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1535)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1536)return external_link_id ({link = handler.link, label = handler.label, q = handler.q, redirect = handler.redirect,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1537)prefix = handler.prefix, id = id, separator = handler.separator, encode = handler.encode});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1538)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1539)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1540)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1541)--============================<< I N T E R F A C E F U N C T I O N S >>==========================================[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1542)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1543)--[[--------------------------< E X T R A C T _ I D S >------------------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1544)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1545)Populates ID table from arguments using configuration settings. Loops through cfg.id_handlers and searches args for[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1546)any of the parameters listed in each cfg.id_handlers['...'].parameters. If found, adds the parameter and value to[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1547)the identifier list. Emits redundant error message if more than one alias exists in args[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1548)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1549)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1550)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1551)local function extract_ids (args)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1552)local id_list = {};-- list of identifiers found in args[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1553)for k, v in pairs (cfg.id_handlers) do-- k is uppercase identifier name as index to cfg.id_handlers; e.g. cfg.id_handlers['ISBN'], v is a table[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1554)v = select_one (args, v.parameters, 'err_redundant_parameters' );-- v.parameters is a table of aliases for k; here we pick one from args if present[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1555)if is_set (v) then id_list[k] = v; end-- if found in args, add identifier to our list[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1556)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1557)return id_list;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1558)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1559)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1560)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1561)--[[--------------------------< E X T R A C T _ I D _ A C C E S S _ L E V E L S >--------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1562)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1563)Fetches custom id access levels from arguments using configuration settings. Parameters which have a predefined access[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1564)level (e.g. arxiv) do not use this function as they are directly rendered as free without using an additional parameter.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1565)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1566)returns a table of k/v pairs where k is same as the identifier's key in cfg.id_handlers and v is the assigned (valid) keyword[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1567)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1568)access-level values must match the case used in cfg.keywords_lists['id-access'] (lowercase unless there is some special reason for something else)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1569)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1570)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1571)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1572)local function extract_id_access_levels (args, id_list)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1573)local id_accesses_list = {};[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1574)for k, v in pairs (cfg.id_handlers) do[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1575)local access_param = v.custom_access;-- name of identifier's access-level parameter[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1576)if is_set (access_param) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1577)local access_level = args[access_param];-- get the assigned value if there is one[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1578)if is_set (access_level) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1579)if not in_array (access_level, cfg.keywords_lists['id-access']) then-- exact match required[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1580)set_message ('err_invalid_param_val', {access_param, access_level});[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1581)access_level = nil;-- invalid so unset[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1582)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1583)if not is_set (id_list[k]) then-- identifier access-level must have a matching identifier[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1584)set_message ('err_param_access_requires_param', {k:lower()});-- parameter name is uppercase in cfg.id_handlers (k); lowercase for error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1585)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1586)id_accesses_list[k] = cfg.keywords_xlate[access_level];-- get translated keyword[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1587)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1588)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1589)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1590)return id_accesses_list;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1591)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1592)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1593)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1594)--[[--------------------------< B U I L D _ I D _ L I S T >----------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1595)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1596)render the identifiers into a sorted sequence table[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1597)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1598)<ID_list_coins_t> is a table of k/v pairs where k is same as key in cfg.id_handlers and v is the assigned value[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1599)<options_t> is a table of various k/v option pairs provided in the call to new_build_id_list();[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1600) modified by this function and passed to all identifier rendering functions[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1601)<access_levels_t> is a table of k/v pairs where k is same as key in cfg.id_handlers and v is the assigned value (if valid)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1602)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1603)returns a sequence table of sorted (by hkey - 'handler' key) rendered identifier strings[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1604)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1605)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1606)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1607)local function build_id_list (ID_list_coins_t, options_t, access_levels_t)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1608)local ID_list_t = {};[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1609)local accept;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1610)local func_map = {--function map points to functions associated with hkey identifier[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1611)['ARXIV'] = arxiv,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1612)['ASIN'] = asin,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1613)['BIBCODE'] = bibcode,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1614)['BIORXIV'] = biorxiv,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1615)['CITESEERX'] = citeseerx,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1616)['DOI'] = doi,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1617)['EISSN'] = issn,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1618)['HDL'] = hdl,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1619)['ISBN'] = isbn,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1620)['ISMN'] = ismn,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1621)['ISSN'] = issn,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1622)['JFM'] = jfm,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1623)['JSTOR'] = jstor,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1624)['LCCN'] = lccn,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1625)['MEDRXIV'] = medrxiv,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1626)['MR'] = mr,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1627)['OCLC'] = oclc,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1628)['OL'] = openlibrary,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1629)['OSTI'] = osti,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1630)['PMC'] = pmc,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1631)['PMID'] = pmid,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1632)['RFC'] = rfc,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1633)['S2CID'] = s2cid,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1634)['SBN'] = sbn,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1635)['SSRN'] = ssrn,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1636)['USENETID'] = usenet_id,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1637)['ZBL'] = zbl,[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1638)}[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1639)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1640)for hkey, v in pairs (ID_list_coins_t) do[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1641)v, accept = has_accept_as_written (v);-- remove accept-as-written markup if present; accept is boolean true when markup removed; false else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1642)-- every function gets the options table with value v and accept boolean[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1643)options_t.hkey = hkey;-- ~/Configuration handler key[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1644)options_t.id = v;-- add that identifier value to the options table[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1645)options_t.accept = accept;-- add the accept boolean flag[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1646)options_t.access = access_levels_t[hkey];-- add the access level for those that have an |<identifier-access= parameter[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1647)options_t.handler = cfg.id_handlers[hkey];[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1648)options_t.coins_list_t = ID_list_coins_t;-- pointer to ID_list_coins_t; for |asin= and |ol=; also to keep erroneous values out of the citation's metadata[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1649)options_t.coins_list_t[hkey] = v;-- id value without accept-as-written markup for metadata[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1650)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1651)if options_t.handler.access and not in_array (options_t.handler.access, cfg.keywords_lists['id-access']) then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1652)error (cfg.messages['unknown_ID_access'] .. options_t.handler.access);-- here when handler access key set to a value not listed in list of allowed id access keywords[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1653)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1654)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1655)if func_map[hkey] then[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1656)local id_text = func_map[hkey] (options_t);-- call the function to get identifier text and any error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1657)table.insert (ID_list_t, {hkey, id_text});-- add identifier text to the output sequence table[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1658)else[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1659)error (cfg.messages['unknown_ID_key'] .. hkey);-- here when func_map doesn't have a function for hkey[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1660)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1661)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1662)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1663)local function comp (a, b)-- used by following table.sort()[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1664)return a[1]:lower() < b[1]:lower();-- sort by hkey[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1665)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1666)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1667)table.sort (ID_list_t, comp);-- sequence table of tables sort [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1668)for k, v in ipairs (ID_list_t) do-- convert sequence table of tables to simple sequence table of strings[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1669)ID_list_t[k] = v[2];-- v[2] is the identifier rendering from the call to the various functions in func_map{}[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1670)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1671)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1672)return ID_list_t;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1673)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1674)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1675)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1676)--[[--------------------------< O P T I O N S _ C H E C K >----------------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1677)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1678)check that certain option parameters have their associated identifier parameters with values[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1679)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1680)<ID_list_coins_t> is a table of k/v pairs where k is same as key in cfg.id_handlers and v is the assigned value[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1681)<ID_support_t> is a sequence table of tables created in citation0() where each subtable has four elements:[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1682) [1] is the support parameter's assigned value; empty string if not set[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1683) [2] is a text string same as key in cfg.id_handlers[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1684) [3] is cfg.error_conditions key used to create error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1685) [4] is original ID support parameter name used to create error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1686)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1687)returns nothing; on error emits an appropriate error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1688)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1689)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1690)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1691)local function options_check (ID_list_coins_t, ID_support_t)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1692)for _, v in ipairs (ID_support_t) do[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1693)if is_set (v[1]) and not ID_list_coins_t[v[2]] then-- when support parameter has a value but matching identifier parameter is missing or empty[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1694)set_message (v[3], (v[4]));-- emit the appropriate error message[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1695)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1696)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1697)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1698)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1699)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1700)--[[--------------------------< I D E N T I F I E R _ L I S T S _ G E T >--------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1701)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1702)Creates two identifier lists: a k/v table of identifiers and their values to be used locally and for use in the[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1703)COinS metadata, and a sequence table of the rendered identifier strings that will be included in the rendered[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1704)citation.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1705)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1706)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1707)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1708)local function identifier_lists_get (args_t, options_t, ID_support_t)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1709)local ID_list_coins_t = extract_ids (args_t);-- get a table of identifiers and their values for use locally and for use in COinS[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1710)options_check (ID_list_coins_t, ID_support_t);-- ID support parameters must have matching identifier parameters [](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1711)local ID_access_levels_t = extract_id_access_levels (args_t, ID_list_coins_t);-- get a table of identifier access levels[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1712)local ID_list_t = build_id_list (ID_list_coins_t, options_t, ID_access_levels_t);-- get a sequence table of rendered identifier strings[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1713)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1714)return ID_list_t, ID_list_coins_t;-- return the tables[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1715)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1716)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1717)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1718)--[[--------------------------< S E T _ S E L E C T E D _ M O D U L E S >--------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1719)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1720)Sets local cfg table and imported functions table to same (live or sandbox) as that used by the other modules.[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1721)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1722)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1723)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1724)local function set_selected_modules (cfg_table_ptr, utilities_page_ptr)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1725)cfg = cfg_table_ptr;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1726)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1727)has_accept_as_written = utilities_page_ptr.has_accept_as_written;-- import functions from select Module:Citation/CS1/Utilities module[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1728)is_set = utilities_page_ptr.is_set;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1729)in_array = utilities_page_ptr.in_array;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1730)set_message = utilities_page_ptr.set_message;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1731)select_one = utilities_page_ptr.select_one;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1732)substitute = utilities_page_ptr.substitute;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1733)make_wikilink = utilities_page_ptr.make_wikilink;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1734)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1735)z = utilities_page_ptr.z;-- table of tables in Module:Citation/CS1/Utilities[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1736)end[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1737)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1738)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1739)--[[--------------------------< E X P O R T E D F U N C T I O N S >------------------------------------------[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1740)]][](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1741)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1742)return {[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1743)auto_link_urls = auto_link_urls,-- table of identifier URLs to be used when auto-linking |title=[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1744)[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1745)identifier_lists_get = identifier_lists_get,-- experiment to replace individual calls to build_id_list(), extract_ids, extract_id_access_levels[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1746)is_embargoed = is_embargoed;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1747)set_selected_modules = set_selected_modules;[](https://freemwiki.com/index.php?mobileaction=toggle_view_mobile&title=Module%3ACitation%2FCS1%2FIdentifiers#L-1748)}

Retrieved from "[https://freemwiki.com/index.php?title=Module:Citation/CS1/Identifiers&oldid=579718](https://freemwiki.com/index.php?title=Module:Citation/CS1/Identifiers&oldid=579718)"

[Last edited on 21 October 2025, at 06:18](https://freemwiki.com/index.php?title=Module:Citation/CS1/Identifiers&action=history)

#### Languages

*   [English](https://freemwiki.com/wiki/Module:Citation/CS1/ "Module:Citation/CS1/ – English")

 freem 

*    This page was last edited on 21 October 2025, at 06:18.
*   Content is available under [Creative Commons Attribution-ShareAlike 4.0](https://creativecommons.org/licenses/by-sa/4.0/) unless otherwise noted. FreemWiki is operated by **FINGERPOWER DIGITAL TECHNOLOGY LLC** (Colorado, Entity ID 20221978727).

*   [Privacy Policy](https://freemwiki.com/wiki/Privacy_Policy)
*   [About](https://freemwiki.com/wiki/About)
*   [Terms of Service](https://freemwiki.com/wiki/Terms_of_Service)
*   [Desktop](https://freemwiki.com/index.php?title=Module:Citation/CS1/Identifiers&mobileaction=toggle_view_desktop)