Module:Check isxn - Revision history

Trappist the monk: sync from sandbox;

2022-11-03T23:27:58Z

sync from sandbox;

The Anome: Changed protection level for "Module:Check isxn": High-risk Lua module ([Edit=Require template editor access] (indefinite) [Move=Require template editor access] (indefinite))

2017-05-31T10:38:54Z

Changed protection level for "Module:Check isxn": High-risk Lua module ([Edit=Require template editor access] (indefinite) [Move=Require template editor access] (indefinite))

← Previous revision	Revision as of 10:38, 31 May 2017
(No difference)

Frietjes: Undid revision 712696584 by Frietjes (talk)

2016-03-30T16:27:01Z

Undid revision 712696584 by Frietjes (talk)

@@ Line 145: / Line 145: @@
 function p.check_issn(frame)
 	return check_issn(frame.args[1] or frame:getParent().args[1], frame.args['error'] or frame:getParent().args['error'] or 'error')
 end

Frietjes: add entry points for checking lists

2016-03-30T16:10:40Z

add entry points for checking lists

@@ Line 145: / Line 145: @@
 function p.check_issn(frame)
 	return check_issn(frame.args[1] or frame:getParent().args[1], frame.args['error'] or frame:getParent().args['error'] or 'error')
 end

Frietjes: fix return value

2016-03-11T16:04:31Z

fix return value

← Previous revision		Revision as of 16:04, 11 March 2016
Line 52:		Line 52:

	local function check_isbn( isbn_str, error_string )		local function check_isbn( isbn_str, error_string )
	if nil ~= isbn_str:match("[^%s-0-9X]") then ~~return false; end~~ -- fail if isbn_str contains anything but digits, hyphens, or the uppercase X		if nil ~= isbn_str:match("[^%s-0-9X]") then -- fail if isbn_str contains anything but digits, hyphens, or the uppercase X
			return error_string;
			end
	isbn_str = isbn_str:gsub( "-", "" ):gsub( " ", "" ); -- remove hyphens and spaces		isbn_str = isbn_str:gsub( "-", "" ):gsub( " ", "" ); -- remove hyphens and spaces
	local len = isbn_str:len();		local len = isbn_str:len();
Line 61:		Line 63:

	if len == 10 then		if len == 10 then
	if isbn_str:match( "^%d*X?$" ) == nil then return ~~false~~; end		if isbn_str:match( "^%d*X?$" ) == nil then
			return error_string;
			end
	return is_valid_isxn(isbn_str, 10) and '' or error_string;		return is_valid_isxn(isbn_str, 10) and '' or error_string;
	else		else
	local temp = 0;		local temp = 0;
	if isbn_str:match( "^97[89]%d*$" ) == nil then ~~return false; end~~ -- isbn13 begins with 978 or 979; ismn begins with 979		if isbn_str:match( "^97[89]%d*$" ) == nil then -- isbn13 begins with 978 or 979; ismn begins with 979
			return error_string;
			end
	return is_valid_isxn_13 (isbn_str) and '' or error_string;		return is_valid_isxn_13 (isbn_str) and '' or error_string;
	end		end

Trappist the monk: X;

2016-01-05T03:23:29Z

← Previous revision		Revision as of 03:23, 5 January 2016
Line 111:		Line 111:
	local valid_issn = true;		local valid_issn = true;

	if not id:match ('^%d%d%d%d%-%d%d%d%d$') then		if not id:match ('^%d%d%d%d%-%d%d%d[%dX]$') then
	return error_string;		return error_string;
	end		end

Trappist the monk: test issn for correct format;

2016-01-05T01:35:44Z

test issn for correct format;

← Previous revision		Revision as of 01:35, 5 January 2016
Line 51:		Line 51:
	]]		]]

	function check_isbn( isbn_str, error_string )		local function check_isbn( isbn_str, error_string )
	if nil ~= isbn_str:match("[^%s-0-9X]") then return false; end -- fail if isbn_str contains anything but digits, hyphens, or the uppercase X		if nil ~= isbn_str:match("[^%s-0-9X]") then return false; end -- fail if isbn_str contains anything but digits, hyphens, or the uppercase X
	isbn_str = isbn_str:gsub( "-", "" ):gsub( " ", "" ); -- remove hyphens and spaces		isbn_str = isbn_str:gsub( "-", "" ):gsub( " ", "" ); -- remove hyphens and spaces
Line 78:		Line 78:
	]]		]]

	function check_ismn (id, error_string)		local function check_ismn (id, error_string)
	local text;		local text;
	local valid_ismn = true;		local valid_ismn = true;
Line 106:		Line 106:
	]]		]]

	function check_issn(id, error_string)		local function check_issn(id, error_string)
	local issn_copy = id; -- save a copy of unadulterated issn; use this version for display if issn does not validate		local issn_copy = id; -- save a copy of unadulterated issn; use this version for display if issn does not validate
	local text;		local text;
	local valid_issn = true;		local valid_issn = true;

			if not id:match ('^%d%d%d%d%-%d%d%d%d$') then
			return error_string;
			end

	id=id:gsub( "[%s-–]", "" ); -- strip spaces, hyphens, and endashes from the issn		id=id:gsub( "[%s-–]", "" ); -- strip spaces, hyphens, and endashes from the issn

Line 121:		Line 125:
	return valid_issn and '' or error_string		return valid_issn and '' or error_string
	end		end


			------------------------------< E N T R Y P O I N T S >--------------------------------------------------====

	function p.check_isbn(frame)		function p.check_isbn(frame)

The Earwig: Protected "Module:Check isxn": High-risk Lua module: thousands of mainspace transclusions ([Edit=Allow only autoconfirmed users] (indefinite) [Move=Allow only autoconfirmed users] (indefinite))

2015-12-14T10:26:01Z

Protected "Module:Check isxn": High-risk Lua module: thousands of mainspace transclusions ([Edit=Allow only autoconfirmed users] (indefinite) [Move=Allow only autoconfirmed users] (indefinite))

← Previous revision	Revision as of 10:26, 14 December 2015
(No difference)

Frietjes: Undid revision 674386007 by Frietjes (talk)

2015-08-03T16:07:57Z

Undid revision 674386007 by Frietjes (talk)

← Previous revision		Revision as of 16:07, 3 August 2015
Line 66:		Line 66:
	local temp = 0;		local temp = 0;
	if isbn_str:match( "^97[89]%d*$" ) == nil then return false; end -- isbn13 begins with 978 or 979; ismn begins with 979		if isbn_str:match( "^97[89]%d*$" ) == nil then return false; end -- isbn13 begins with 978 or 979; ismn begins with 979
	return is_valid_isxn_13 (isbn_str) and '' or ~~'test'~~;		return is_valid_isxn_13 (isbn_str) and '' or error_string;
	end		end
	end		end
Line 123:		Line 123:

	function p.check_isbn(frame)		function p.check_isbn(frame)
	return ~~check_issn~~(frame.args[1] or frame:getParent().args[1], frame.args['error'] or frame:getParent().args['error'] or 'error')		return check_isbn(frame.args[1] or frame:getParent().args[1], frame.args['error'] or frame:getParent().args['error'] or 'error')
	end		end

	function p.check_ismn(frame)		function p.check_ismn(frame)
	return ~~check_issn~~(frame.args[1] or frame:getParent().args[1], frame.args['error'] or frame:getParent().args['error'] or 'error')		return check_ismn(frame.args[1] or frame:getParent().args[1], frame.args['error'] or frame:getParent().args['error'] or 'error')
	end		end

Frietjes: testing

2015-08-03T16:07:01Z

testing

← Previous revision		Revision as of 16:07, 3 August 2015
Line 66:		Line 66:
	local temp = 0;		local temp = 0;
	if isbn_str:match( "^97[89]%d*$" ) == nil then return false; end -- isbn13 begins with 978 or 979; ismn begins with 979		if isbn_str:match( "^97[89]%d*$" ) == nil then return false; end -- isbn13 begins with 978 or 979; ismn begins with 979
	return is_valid_isxn_13 (isbn_str) and '' or ~~error_string~~;		return is_valid_isxn_13 (isbn_str) and '' or 'test';
	end		end
	end		end