Module:Footnotes/anchor id list - Revision history

imported>Hike395: fix errors when using Visual Editor

2025-01-14T02:04:50Z

fix errors when using Visual Editor

← Older revision		Revision as of 02:04, 14 January 2025
Line 92:		Line 92:
	['Citation-attribution'] = true,		['Citation-attribution'] = true,
	}		}
	local ~~Article_content;~~		local global_article_content = nil

			local global_anchor_id_list = nil -- exported tables
			local global_template_list = nil
			local global_article_whitelist = nil

	~~local anchor_id_list = {}; -- exported tables~~
	~~local template_list = {};~~
	~~local article_whitelist = {};~~
	~~local template_list_done = false~~


Line 108:		Line 108:

	local function article_content_get ()		local function article_content_get ()
	if ~~not Article_content~~ then		if global_article_content then return global_article_content end
	~~Article_content~~ = mw.title.getCurrentTitle():getContent() or ''; -- get the content of the article or ''; new pages edited w/ve do not have 'content' until saved; ve does not preview; phab:T221625		local article_content = mw.title.getCurrentTitle():getContent() or ''; -- get the content of the article or ''; new pages edited w/ve do not have 'content' until saved; ve does not preview; phab:T221625
	for _, tag in ipairs (patterns_tags) do		for _, tag in ipairs (patterns_tags) do
	~~Article_content~~ = ~~Article_content~~:gsub (tag, ''); -- remove certain html-like tags and their content		article_content = article_content:gsub (tag, ''); -- remove certain html-like tags and their content
	~~end~~
	end		end
			global_article_content = article_content
			return article_content
	end		end

Line 697:		Line 698:
	]]		]]

	local function template_list_add (template)		local function template_list_add (template, template_list)
	local template = template:match ('{{%s*(.-)[\|}]'); -- keep the case of the template - this is different from template_name_get()		local template = template:match ('{{%s*(.-)[\|}]'); -- keep the case of the template - this is different from template_name_get()
	if template and not template:match ('^#') then -- found a template or magic word; ignore magic words		if template and not template:match ('^#') then -- found a template or magic word; ignore magic words
Line 723:		Line 724:

	local function anchor_id_list_make ()		local function anchor_id_list_make ()
	article_content_get (); -- attempt to get this article's content		local anchor_id_list = {}
			local template_list = {}
			local article_whitelist = {}
			local article_content = article_content_get (); -- attempt to get this article's content

	if '' ~~== Article_content~~ then -- when there is no article content		if article_content == '' then -- when there is no article content
	return ''; -- no point in continuing		return ''; -- no point in continuing
	end		end
Line 734:		Line 738:

	local find_pattern = '%f[{]{{[^{]';		local find_pattern = '%f[{]{{[^{]';
	local tstart, tend = ~~Article_content~~:find (find_pattern); -- find the first template; do not find template variables: {{{template var\|}}}		local tstart, tend = article_content:find (find_pattern); -- find the first template; do not find template variables: {{{template var\|}}}

	while tstart do		while tstart do
	template = ~~Article_content~~:match ('%b{}', tstart); -- get the whole template		template = article_content:match ('%b{}', tstart); -- get the whole template
	if not template then		if not template then
	break; -- template is nil for some reason (last template missing closing }} for example) so declare ourselves done		break; -- template is nil for some reason (last template missing closing }} for example) so declare ourselves done
Line 743:		Line 747:

	template_name = template_name_get (template); -- get first char uppercase trimmed template name; ignore subpages ~/new, ~/sandbox		template_name = template_name_get (template); -- get first char uppercase trimmed template name; ignore subpages ~/new, ~/sandbox
	template_list_add (template); -- add this template's name to the list		template_list_add (template, template_list); -- add this template's name to the list

	if data.known_templates_cs12 [template_name] then		if data.known_templates_cs12 [template_name] then
Line 819:		Line 823:
	end		end

	tstart, tend = ~~Article_content~~:find (find_pattern, tend); -- search for another template; begin at end of last search		tstart, tend = article_content:find (find_pattern, tend); -- search for another template; begin at end of last search
	end		end
	~~template_list_done = true~~

	mw.logObject (anchor_id_list, 'anchor_id_list');		mw.logObject (anchor_id_list, 'anchor_id_list');
Line 827:		Line 830:
	mw.logObject (article_whitelist, 'article_whitelist');		mw.logObject (article_whitelist, 'article_whitelist');

	~~return~~ anchor_id_list;
			global_anchor_id_list = anchor_id_list
			global_template_list = template_list
			global_article_whitelist = article_whitelist
	end		end

Line 839:		Line 845:

	local function citeref_patterns_make()		local function citeref_patterns_make()
	if not ~~template_list_done~~ then ~~error("Template list not yet created")~~ end		if not global_template_list then return end
	local citeref_patterns = {}		local citeref_patterns = {}
	local template_patterns = whitelist.wrapper_template_patterns		local template_patterns = whitelist.wrapper_template_patterns
	for _, p in ipairs(template_patterns) do		for _, p in ipairs(template_patterns) do
	for _, t in ipairs(p[1]) do -- loop through list of template wrappers		for _, t in ipairs(p[1]) do -- loop through list of template wrappers
	if ~~template_list~~[t] then -- if wrapper is found in article, record corresponding patterns		if global_template_list[t] then -- if wrapper is found in article, record corresponding patterns
	for _, pat in ipairs(p[2]) do		for _, pat in ipairs(p[2]) do
	table.insert(citeref_patterns, pat)		table.insert(citeref_patterns, pat)
Line 860:		Line 866:
	]]		]]

			-- First create global_anchor_id_list, global_template_list, global_article_whitelist
			anchor_id_list_make()

			-- Then stuff them (and derived tables) into return table
	return {		return {
	anchor_id_list = ~~anchor_id_list_make()~~, -- table of anchor ids available in this article		anchor_id_list = global_anchor_id_list or {}, -- table of anchor ids available in this article
	article_whitelist = ~~article_whitelist~~, -- table of anchor ids with false-positive error message to be suppressed		article_whitelist = global_article_whitelist or {}, -- table of anchor ids with false-positive error message to be suppressed
	template_list = ~~template_list~~, -- table of templates used in this article		template_list = global_template_list or {}, -- table of templates used in this article
	citeref_patterns = citeref_patterns_make() -- table of Lua patterns to search for citeref from wrappers		citeref_patterns = citeref_patterns_make() or {} -- table of Lua patterns to search for citeref from wrappers
	}		}

imported>Hike395: fix fascicle logic

2024-12-03T05:17:10Z

fix fascicle logic

← Older revision		Revision as of 05:17, 3 December 2024
Line 501:		Line 501:
	template_params_get (template, params); -- build a table of template parameters and their values		template_params_get (template, params); -- build a table of template parameters and their values

	if whitelist.wrapper_templates[template_name][1] then -- is this wrapper a simple-default wrapper?		local wrap_data = whitelist.wrapper_templates[template_name]
	name_default = ~~whitelist.wrapper_templates[template_name]~~[1]; -- get the default names
	date_default = ~~whitelist.wrapper_templates[template_name]~~[2]; -- get the default date		if wrap_data[1] then -- is this wrapper a simple-default wrapper?
			name_default = wrap_data[1]; -- get the default names
			date_default = wrap_data[2]; -- get the default date
	else		else
	vol = params['volume'] or 'default';		vol = params['volume'] or 'default';
	local fascicle = params['fascicle'] -- some templates use "fascicle" to mean "subvolume"		local fascicle = params['fascicle'] -- some templates use "fascicle" to mean "subvolume"
	~~vol~~ = ~~fascicle and~~ vol..'/'..fascicle ~~or vol~~ -- if fascicle is used, ~~set volume~~ = vol/fascicle		if fascicle then
	if not ~~whitelist.wrapper_templates[template_name]~~[vol] then -- make sure this volume exists		local subvol = vol..'/'..fascicle -- if fascicle is used, subvolume = "vol/fascicle"
			if wrap_data[subvol] then -- if subvolume exists, use it, otherwise fall back to volume
			vol = subvol
			end
			end
			if not wrap_data[vol] then -- make sure this volume exists
	vol = 'default'; -- doesn't exist, use default volume		vol = 'default'; -- doesn't exist, use default volume
	end		end
	name_default = ~~whitelist.wrapper_templates[template_name]~~[vol][1]; -- get the default names		name_default = wrap_data[vol][1]; -- get the default names
	date_default = ~~whitelist.wrapper_templates[template_name]~~[vol][2]; -- get the default date		date_default = wrap_data[vol][2]; -- get the default date
	end		end

Line 544:		Line 551:
	return anchor_id; -- anchor_id text; nil else		return anchor_id; -- anchor_id text; nil else
	end		end

imported>Hike395: correctly handle volume/fascicle for Encyclopedia Iranica

2024-12-03T02:44:26Z

correctly handle volume/fascicle for Encyclopedia Iranica

← Older revision		Revision as of 02:44, 3 December 2024
Line 506:		Line 506:
	else		else
	vol = params['volume'] or 'default';		vol = params['volume'] or 'default';
			local fascicle = params['fascicle'] -- some templates use "fascicle" to mean "subvolume"
			vol = fascicle and vol..'/'..fascicle or vol -- if fascicle is used, set volume = vol/fascicle
	if not whitelist.wrapper_templates[template_name][vol] then -- make sure this volume exists		if not whitelist.wrapper_templates[template_name][vol] then -- make sure this volume exists
	vol = 'default'; -- doesn't exist, use default volume		vol = 'default'; -- doesn't exist, use default volume

imported>Hike395: restore comment

2024-12-02T06:54:13Z

restore comment

← Older revision		Revision as of 06:54, 2 December 2024
Line 457:		Line 457:

	inspect externally visible \|ref= to decide what to do:		inspect externally visible \|ref= to decide what to do:
			\|ref= - empty or missing: get names and date from whitelist defaults; override defaults from externally visible template parameters
			\|ref=harv - same as empty or missing
	\|ref={{SfnRef\|name\|name\|name\|name\|year}} - assemble an anchor id from {{sfnref}} positional parameters		\|ref={{SfnRef\|name\|name\|name\|name\|year}} - assemble an anchor id from {{sfnref}} positional parameters
	\|ref={{Harvid\|name\|name\|name\|name\|year}} - assemble an anchor id from {{harvid}} positional parameters		\|ref={{Harvid\|name\|name\|name\|name\|year}} - assemble an anchor id from {{harvid}} positional parameters
	\|ref=none - skip; do nothing because an anchor id intentionally suppressed; TODO: keep with a type code of '0'?		\|ref=none - skip; do nothing because an anchor id intentionally suppressed; TODO: keep with a type code of '0'?
	\|ref=<text> - save param value because may match an anchor id override value in {{harv}} template \|ref= parameter or {{harvc}} \|id= parameter		\|ref=<text> - save param value because may match an anchor id override value in {{harv}} template \|ref= parameter or {{harvc}} \|id= parameter
	~~otherwise assume that wrapper template generates correct target for default ref~~
	]]		]]

imported>Hike395: restore anchor_id_make_wrapper

2024-12-02T00:26:12Z

restore anchor_id_make_wrapper

@@ Line 498: / Line 498: @@
 	template_params_get (template, params);										-- build a table of template parameters and their values
 	if 'harv' == ref  or not ref then											-- |ref=harv specified or |ref= missing or empty
-        anchor_id = nil                                                         -- wrapper template will be checked via whitelist mechanism in target_check(): no need for an id
+		anchor_id = names_get (params, aliases_contributor) or					-- get contributor, author, or editor names
 	elseif ref:match ('%b{}') then												-- ref holds a template
@@ Line 514: / Line 540: @@
 	return anchor_id;															-- anchor_id text; nil else
 end

imported>Hike395: 1) rely on whitelist and patterns to catch wrapper template "no target" errors, 2) pre-compute patterns based on template used on page

2024-12-01T22:33:39Z

1) rely on whitelist and patterns to catch wrapper template "no target" errors, 2) pre-compute patterns based on template used on page

← Older revision		Revision as of 22:33, 1 December 2024
Line 97:		Line 97:
	local template_list = {};		local template_list = {};
	local article_whitelist = {};		local article_whitelist = {};
			local template_list_done = false


Line 456:		Line 457:

	inspect externally visible \|ref= to decide what to do:		inspect externally visible \|ref= to decide what to do:
	~~\|ref= - empty or missing: get names and date from whitelist defaults; override defaults from externally visible template parameters~~
	~~\|ref=harv - same as empty or missing~~
	\|ref={{SfnRef\|name\|name\|name\|name\|year}} - assemble an anchor id from {{sfnref}} positional parameters		\|ref={{SfnRef\|name\|name\|name\|name\|year}} - assemble an anchor id from {{sfnref}} positional parameters
	\|ref={{Harvid\|name\|name\|name\|name\|year}} - assemble an anchor id from {{harvid}} positional parameters		\|ref={{Harvid\|name\|name\|name\|name\|year}} - assemble an anchor id from {{harvid}} positional parameters
	\|ref=none - skip; do nothing because an anchor id intentionally suppressed; TODO: keep with a type code of '0'?		\|ref=none - skip; do nothing because an anchor id intentionally suppressed; TODO: keep with a type code of '0'?
	\|ref=<text> - save param value because may match an anchor id override value in {{harv}} template \|ref= parameter or {{harvc}} \|id= parameter		\|ref=<text> - save param value because may match an anchor id override value in {{harv}} template \|ref= parameter or {{harvc}} \|id= parameter
			otherwise assume that wrapper template generates correct target for default ref
	]]		]]

Line 499:		Line 498:

	template_params_get (template, params); -- build a table of template parameters and their values		template_params_get (template, params); -- build a table of template parameters and their values

	~~if whitelist.wrapper_templates[template_name][1] then -- is this wrapper a simple-default wrapper?~~
	~~name_default = whitelist.wrapper_templates[template_name][1]; -- get the default names~~
	~~date_default = whitelist.wrapper_templates[template_name][2]; -- get the default date~~
	~~else~~
	~~vol = params['volume'] or 'default';~~
	~~if not whitelist.wrapper_templates[template_name][vol] then -- make sure this volume exists~~
	~~vol = 'default'; -- doesn't exist, use default volume~~
	~~end~~
	~~name_default = whitelist.wrapper_templates[template_name][vol][1]; -- get the default names~~
	~~date_default = whitelist.wrapper_templates[template_name][vol][2]; -- get the default date~~
	~~end~~

	if 'harv' == ref or not ref then -- \|ref=harv specified or \|ref= missing or empty		if 'harv' == ref or not ref then -- \|ref=harv specified or \|ref= missing or empty
	anchor_id = ~~names_get (params, aliases_contributor) or~~ -- ~~get contributor, author, or editor names~~		anchor_id = nil -- wrapper template will be checked via whitelist mechanism in target_check(): no need for an id
	~~names_get~~ (~~params, aliases_author~~) or
	~~vnames_get (params, 'vauthors') or -- \|vauthors=~~
	~~names_get (params, aliases_editor) or~~
	~~vnames_get (params, 'veditors') or -- \|veditors=~~
	~~name_default; -- default names from whitelist~~
	~~-- whitelist.wrapper_templates[template_name][1]; -- default names from whitelist~~

	~~if '' == date then -- if date not provided in the template~~
	~~date = date_default; -- use the default date from whitelist~~
	~~end~~

	~~if anchor_id then -- if names were gotten~~
	~~anchor_id = 'CITEREF' .. anchor_id .. date;~~
	~~end~~

	elseif ref:match ('%b{}') then -- ref holds a template		elseif ref:match ('%b{}') then -- ref holds a template
Line 541:		Line 514:
	return anchor_id; -- anchor_id text; nil else		return anchor_id; -- anchor_id text; nil else
	end		end




Line 798:		Line 773:
	end		end
	end		end

	elseif template_name and whitelist.wrapper_templates[template_name] then		elseif template_name and whitelist.wrapper_templates[template_name] then
	anchor_id = anchor_id_make_wrapper (template); -- extract an anchor id from this template if possible		anchor_id = anchor_id_make_wrapper (template); -- extract an anchor id from this template if possible
	list_add (anchor_id, anchor_id_list, true);		list_add (anchor_id, anchor_id_list, true);


	elseif template_name and template_name:match ('^Cit[ea]') then -- not known, not known wrapper; last gasp, try as cs1-like		elseif template_name and template_name:match ('^Cit[ea]') then -- not known, not known wrapper; last gasp, try as cs1-like
	anchor_id = anchor_id_make_cs12 (template); -- extract an anchor id from this template if possible		anchor_id = anchor_id_make_cs12 (template); -- extract an anchor id from this template if possible
Line 810:		Line 786:
	tstart, tend = Article_content:find (find_pattern, tend); -- search for another template; begin at end of last search		tstart, tend = Article_content:find (find_pattern, tend); -- search for another template; begin at end of last search
	end		end
			template_list_done = true

	mw.logObject (anchor_id_list, 'anchor_id_list');		mw.logObject (anchor_id_list, 'anchor_id_list');
Line 816:		Line 793:

	return anchor_id_list;		return anchor_id_list;
			end

			--[[--------------------------< C I T E R E F _ P A T T E R N S _ M A K E >--------------------------------------------

			Scans template_list to look for wrapper templates that generate citerefs that require Lua patterns.

			This scan is only done once per page load, to save time

			]]

			local function citeref_patterns_make()
			if not template_list_done then error("Template list not yet created") end
			local citeref_patterns = {}
			local template_patterns = whitelist.wrapper_template_patterns
			for _, p in ipairs(template_patterns) do
			for _, t in ipairs(p[1]) do -- loop through list of template wrappers
			if template_list[t] then -- if wrapper is found in article, record corresponding patterns
			for _, pat in ipairs(p[2]) do
			table.insert(citeref_patterns, pat)
			end
			break
			end
			end
			end
			mw.logObject(citeref_patterns,'citeref_patterns')
			return citeref_patterns
	end		end

Line 826:		Line 829:
	article_whitelist = article_whitelist, -- table of anchor ids with false-positive error message to be suppressed		article_whitelist = article_whitelist, -- table of anchor ids with false-positive error message to be suppressed
	template_list = template_list, -- table of templates used in this article		template_list = template_list, -- table of templates used in this article
			citeref_patterns = citeref_patterns_make() -- table of Lua patterns to search for citeref from wrappers
	}		}

imported>Trappist the monk: -cite LSA support; template deleted;

2024-07-17T17:25:58Z

-cite LSA support; template deleted;

← Older revision		Revision as of 17:25, 17 July 2024
Line 589:		Line 589:

	template_params_get (template, params); -- build a table of template parameters and their values		template_params_get (template, params); -- build a table of template parameters and their values

	~~if not ref then -- \|ref= not set, might be cite LSA which doesn't support \|ref=~~
	~~if 'cite lsa' == template_name then~~
	~~return 'CITEREF' .. (params.last or '') .. (params.year or ''); -- cite LSA always creates an anchor id using only \|last= and \|year= (no aliases)~~
	~~end~~
	~~end~~

	if 'harv' == ref or not ref then -- \|ref=harv specified or \|ref= missing or empty		if 'harv' == ref or not ref then -- \|ref=harv specified or \|ref= missing or empty

imported>Trappist the monk at 18:24, 8 August 2023

2023-08-08T18:24:26Z

← Older revision		Revision as of 18:24, 8 August 2023
Line 73:		Line 73:
	}		}
	local patterns_date = { -- normal lua patterns		local patterns_date = { -- normal lua patterns
	'(%d%d%d%d–%d%d%d%d%l?)$', -- YYYY–YYYY four-digit year range at end (Season YYYY–YYYY); with or without dab		-- '(%d%d%d%d–%d%d%d%d%l?)$', -- YYYY–YYYY four-digit year range at end (Season YYYY–YYYY); with or without dab
			'(%d%d%d%d)%D+(%d%d%d%d%l?)$', -- any range with four-digit years; with or without dab; not two captures
	'^(%d%d%d%d–%d%d%l?)$', -- YYYY–YY two-digit year range; with or without dab		'^(%d%d%d%d–%d%d%l?)$', -- YYYY–YY two-digit year range; with or without dab
	'^(c%. %d%d%d%d?%l?)$', -- three- or four-digit circa year; with or without dab		'^(c%. %d%d%d%d?%l?)$', -- three- or four-digit circa year; with or without dab
Line 157:		Line 158:

	local function date_get (template, aliases)		local function date_get (template, aliases)
	~~local date;~~
	local rvalue;		local rvalue;

Line 186:		Line 186:
	if rvalue then		if rvalue then
	for _, pattern in ipairs (patterns_date) do -- spin through the recognized date formats		for _, pattern in ipairs (patterns_date) do -- spin through the recognized date formats
	date = rvalue:match (pattern); -- attempt to extract year portion according to the pattern		-- date = rvalue:match (pattern); -- attempt to extract year portion according to the pattern
			local date, date2 = rvalue:match (pattern); -- attempt to extract year portion according to the pattern; <date2> gets second year in any range
	if date then		if date then
			if date2 then -- when a second year
			date = table.concat ({date, '–', date2}); -- build a date range
			end
	return date; -- matched so return;		return date; -- matched so return;
	end		end

imported>WOSlinker: use require('strict') instead of require('Module:No globals')

2022-10-22T14:43:49Z

use require('strict') instead of require('Module:No globals')

← Older revision		Revision as of 14:43, 22 October 2022
Line 1:		Line 1:
	require('~~Module:No globals~~');		require('strict');
	local data = mw.loadData ('Module:Footnotes/anchor id list/data');		local data = mw.loadData ('Module:Footnotes/anchor id list/data');
	local whitelist = mw.loadData ('Module:Footnotes/whitelist');		local whitelist = mw.loadData ('Module:Footnotes/whitelist');

imported>Trappist the monk at 18:02, 20 December 2021

2021-12-20T18:02:30Z

← Older revision		Revision as of 18:02, 20 December 2021
Line 401:		Line 401:
	template = template_strip (template); -- because template markup can confuse code that builds params_t{} and because templates in name parameters are not allowed		template = template_strip (template); -- because template markup can confuse code that builds params_t{} and because templates in name parameters are not allowed

	local temp_t = mw.text.split (template, '%s*\|%s'); --split on the pipe		local temp_t = mw.text.split (template, '%s\|%s'); --split on the pipe
	for _, param in ipairs (temp_t) do		for _, param in ipairs (temp_t) do
	if param:find ('=', 1, true) then -- a named parameter?		if param:find ('=', 1, true) then -- a named parameter?