Modul:LinkISBN

Die Dokumentation für dieses Modul kann unter Modul:LinkISBN/doc erstellt werden

-- I18n
local li = {
	invalid    = '&nbsp;<span class="error">Ungültige ISBN</span>',
	invalidCat = '[[Category:Seiten mit ISBN-Fehlern]]',
	special    = 'Special:ISBN-Suche/', -- Special:BookSources

	-- patterns for delimiters except ','
	delimiters = { ' and ', ' or ', ' und ', ' oder ', ';' },

	-- CSS class
	class      = 'wv-booksources'
}

local ci = require( 'Module:Check_isxn' )
local lb = require( 'Module:LinkBase' )
local yn = require( 'Module:Yesno' )

function li.linkISBN( m, noerror, demo )
	m = mw.text.trim( m )
	if m == '' then -- empty string
		return m
	end

	local comment = '', t
	t = mw.ustring.gsub( m, '(.*)(%(.*%))$', '%2' )
	if t ~= m then
		comment = t
		m = mw.ustring.gsub( mw.ustring.gsub( m, '(.*)(%(.*%))$', '%1' ), '( +)$', '' )
	end

	m = mw.ustring.gsub( m, 'ISBN ', '' )
	m = m:upper() -- x -> X
	t = '<span class="' .. li.class .. '" title="' .. li.special .. m
		.. '">[[' .. li.special .. m .. '|' .. 'ISBN ' .. m .. ']]</span>'
	if not noerror then
		if demo then
			t = t .. ci._check_isbn( m, li.invalid )
		else
			t = t .. ci._check_isbn( m, li.invalid .. li.invalidCat )
		end
	end
	if comment ~= '' then
		t = t .. ' ' .. comment
	end
	return t
end

function li.linkISBNSet( args )
	local ns     = mw.title.getCurrentTitle().namespace
	local isDemo = ns == 10 or ns == 828
	
	args.isbn    = args.isbn or args[1] or ''
	args.noerror = yn( args.noerror or '', false )
	if args.isbn == '' then
		return ''
	end

	local result = '', i, s

	-- split separate ISBNs
	local items = lb.splitItems( args.isbn, li.delimiters )
		
	-- analyse ISBNs
	for i = 1, #items, 1 do
		s = li.linkISBN( items[ i ], args.noerror, isDemo )
		if s ~= '' then
			if result == '' then
				result = s
			else
				result = result .. ', ' .. s
			end
		end
	end
	return result
end

function li.linkISBNs( frame )
	return li.linkISBNSet( frame:getParent().args )
end

return li