Modulo:Link-FormeFlesse

local getArgs = require('Modulo:Arguments').getArgs

-- Funzione per categorizzare
local function categorizza(cat)
	return string.format(']', mw.site.namespaces.name, cat)
end

-- Funzione per vedere se una pagina esiste già o no
local function titleExists(pagina)
	local title = mw.title.new(pagina)
	return title and title.exists
end

local p = {}

local function main (frame)
local forme = {}
local arg = getArgs(frame)
local categoria

	for i, j in pairs(arg) do
	
		if titleExists(mw.text.trim(j)) == false then
				--categoriazza le pagine se hanno forme flesse da scrivere
			categoria = ''..categorizza('Lemmi con forme flesse da scrivere')
		else 
			categoria = ''
		end
			
		local link = ']'
		table.insert(forme, link)
		
	
		if mw.text.trim(j) == 'inserisci qui voce al plurale' then
			modifica = ' '
			return '<strong class="error plainlinks">hai lasciato il testo di default,'..modifica..'</strong>'..categorizza('Template per le forme flesse con testo di default')
		end
	
	end

	if (#forme) == 0 then
			modifica = ' '
			return '<strong class="error plainlinks">non specificato,'..modifica..'</strong>'..categorizza('Template per le forme flesse senza informazioni')
		end
	
	return ''..table.concat(forme,', ')..''..categoria

end

function p.plurale(frame)
local arg = getArgs(frame)

	if arg == 'inv' or arg == 'invariabile' then
		return  '(\'\'invariabile\'\')'
	else
		return '(\'\'pl.\'\': '.. main(frame,forme)..')'
	end
end

function p.femminile (frame)
local arg = getArgs(frame)
	if arg == 'inv' or arg == 'invariabile' then
		return  '(\'\'invariabile\'\')'
	else
		return '(\'\'f.\'\': '.. main(frame,forme)..')'
	end
end

function p.femminileplurale (frame)
local arg = getArgs(frame)
	if arg == 'inv' or arg == 'invariabile' then
		return  '(\'\'invariabile\'\')'
	else
		return '(\'\'f. pl.\'\': '.. main(frame,forme)..')'
	end
end

function p.neutro (frame)
local arg = getArgs(frame)
	return '(\'\'n.\'\': '.. main(frame,forme)..')'
end

function p.genitivo (frame)
local arg = getArgs(frame)
	if arg == 'inv' or arg == 'invariabile' then
		return  '(\'\'invariabile\'\')'
	elseif arg == 'no' then
		return '(\'\'solo singolare)'
	else
		return '(\'\'genitivo\'\': '.. main(frame,forme)..')'
	end
end

function p.maiuscolo (frame)
local arg = getArgs(frame)

	return '(\'\'maiuscolo\'\': \'\'\''.. main(frame,forme) ..'\'\'\')'

end

return p