Moduuli:Fr:Biblio

---

-- Mallinen Fr:Biblio yhdistää bibliografioille ja viitteille hyödyllisiä toimintoja.

local Biblio = {  }

require( 'strict' )
local Outils = require( 'Module:Fr:Outils' )


Biblio.ouvrage = function ( frame )
	local args = Outils.extractArgs( frame )
	local Ouvrage = require( 'Module:Fr:Biblio/Ouvrage' )
	return Ouvrage.ouvrage( args ) 
end


Biblio.chapitre = function ( frame )
	local args = Outils.extractArgs( frame )
	local Ouvrage = require( 'Module:Fr:Biblio/Ouvrage' )
	return Ouvrage.chapitre( args ) 
end


Biblio.article = function ( frame )
	local args = Outils.extractArgs( frame )
	local Ouvrage = require( 'Module:Fr:Biblio/Article' )
	return Ouvrage.article( args ) 
end


Biblio.lienWeb = function( frame )
	local args = Outils.extractArgs( frame )
	local Ouvrage = require( 'Module:Fr:Biblio/Lien web' )
	return Ouvrage.lienWeb( args ) 
end

Biblio.lienBrise = function( frame )
	local args = Outils.extractArgs( frame )
	local Ouvrage = require( 'Module:Biblio/Lien web' )
	return Ouvrage.lienBrise( args )
end

Biblio.lienFailback = function( frame )
	local args = Outils.extractArgs( frame )
	local Ouvrage = require( 'Module:Fr:Biblio/Failback' )
	return Ouvrage.lienFailback( args ) 
end


Biblio.dictionnaire = function( frame )
	local args = Outils.extractArgs( frame )
	local article = Outils.validTextArg( args, 'huom', 'artikkeli', 'luvun otsikko' )
	local Ouvrage = require( 'Module:Fr:Biblio/Ouvrage' )
	if article then
		args['luvun otsikko'] = article
		return Ouvrage.chapitre( args ) 
	else
		args.titre = args['teoksen otsikko']
		args['sous-titre'] = args['teoksen alaotsikko']
		args.auteur1 = args['teoksen tekijä']
		args.auteurs = args['tekijä'] or args['Tekijä']
		return Ouvrage.ouvrage( args )
	end
end

-- catégorise une page en fonction du namespace
local function categorise(args)
	local namespaceCategorisation = { [0] = true, [4] = true, [10] = true, [12] = true, [14] = true, [100] = true, [104] = true }
	local category = args[1]
	local flag = args[2]
	if type(category) == 'string'
		and flag 
		and namespaceCategorisation[ mw.title.getCurrentTitle().namespace ]
	then
		return '[[Category:' .. category .. ']]'
	end
	return ''
end

Biblio.ISBN = function ( frame )
	local args = Outils.extractArgs( frame )
	if Outils.trim( args[1] ) then
		local newArgs = { isbn = args[1] }
		local i = 2
		while args[i] do
			newArgs[ 'isbn' .. i ] = args[i]
			i = i + 1
		end
		return Biblio.identifiantsBiblio( newArgs )
	else 
		return '<small>(Tuntematon&nbsp;[[International Standard Book Number|ISBN]]&nbsp;)</small>' .. categorise{ 'Puuttuva ISBN', true }
	end
end

Biblio.rechercheIsbn = function( frame )
	local args = Outils.extractArgs( frame )
	local References = require( 'Module:Fr:Biblio/Références' )
	local newArgs = { isbn = args[1], sansLabel = true, categ = {} }
	local isbn = References.isbn( newArgs ) or ''
	local categ = categorise{ 'Teos, jolla on epäkelpo ISBN', newArgs.categ.isbnInvalid }
	return isbn .. categ
end


Biblio.EAN = function ( frame )
	local args = Outils.extractArgs( frame )
	if Outils.trim( args[1] ) then
		local newArgs = { ean = args[1], categ = {} }
		local i = 2
		while args[i] do
			newArgs[ 'ean' .. i ] = args[i]
			i = i + 1
		end
		return Biblio.identifiantsBiblio( newArgs )
	else 
		return '<small>(Tuntematon&nbsp;[[EAN 13|EAN]])</small>[[Luokka:Puuttuva EAN]]'
	end
end


Biblio.ISSN = function ( frame )
	local args = Outils.extractArgs( frame )
	if Outils.trim( args[1] ) then
		local newArgs = { issn = args[1], categ = {} }
		local i = 2
		while args[i] do
			newArgs[ 'issn' .. i ] = args[i]
			i = i + 1
		end
		return Biblio.identifiantsBiblio( newArgs )
	else 
		return '<small>(Tuntematon&nbsp;[[International Standard Serial Number|ISSN]])</small>' .. categorise{ 'Puuttuva ISSN', true }
	end
end

Biblio.rechercheIssn = function( frame )
	local args = Outils.extractArgs( frame )
	local References = require( 'Module:Fr:Biblio/Références' )
	local newArgs = { issn = args[1], sansLabel = true, categ = {} }
	local issn = References.issn( newArgs ) or ''
	local categ = categorise{ 'Sivulla epäkelpo ISSN', newArgs.categ.issnInvalid }
	return issn .. categ
end

Biblio.BNF = function ( frame )
	local References = require( 'Module:Biblio/Références' )
	return References.bnf( Outils.extractArgs( frame )[1] )
end

Biblio.enLigne = function ( frame )
	local args = Outils.extractArgs( frame )
	local References = require( 'Module:Fr:Biblio/Références' )
	return '<small>[' .. References.enLigne( args )  .. ']</small>'
end

Biblio.identifiantsBiblio = function( frame )
	local args = Outils.extractArgs( frame )
	args.categ = {}
	local References = require( 'Module:Fr:Biblio/Références' )
	return ( References.affichageLiensExternes( args, nil, true, true ) or '' ) 
		.. categorise{ 'Teoksella epäkelpo ISBN', args.categ.isbnInvalid }
		.. categorise{ 'Sivulla epäkelpo ISSN', args.categ.issnInvalid }
		.. categorise{ 'Sivulla epäkelpo EAN', args.categ.eanInvalid }
end

return Biblio