Module:Charte

La documentation pour ce module peut être créée à Module:Charte/doc

local p = {}

local chartes = {
	biographie = {
		titre            = "#6eacdc9c",
		soustitre        = "#a9c8e09c",
		hr               = "#6eacdc9c",
	},
	empire = {
		titre            = "#993333b0",
		soustitre        = "#831f1fc7",
		hr               = "#993333b0",
	},
	geographie = {
		titre            = "#209a57d9",
		soustitre        = "#209a57a8",
		hr               = "#209a57d9",
	},
	darkgods = {
		titre            = "#000000cc",
		soustitre        = "#000000a3",
		hr               = "#000000a3",
		color            = "#ffffff",
	},
	defaut = {
		titre            = "#eaecf0",
		soustitre        = "#a2a9b1",
		hr               = "#eaecf0",
	}
}

local soustitres = {
	biographie = "Informations biographiques",
	empire     = "Données impériales",
	geographie = "Informations géographiques",
	darkgods   = "Entité obscure",
	defaut     = "Informations générales"
}

local function isHexCode(value)
	return type(value) == "string" and mw.ustring.match(value, "^#%x%x%x%x%x%x%x?$") ~= nil
end

-- Fonction interne qui prend des paramètres explicites
local function couleurDirect(charte, type)
	charte = charte or "defaut"
	type = type or "titre"

	if type == "texte" then
		if chartes[charte] and chartes[charte].color then
			return chartes[charte].color
		else
			return "#000000"
		end
	end

	if type == "soustitre_color" then
		if chartes[charte] and chartes[charte].soustitre_color then
			return chartes[charte].soustitre_color
		else
			return "#000000"
		end
	end

	if isHexCode(charte) then
		return charte
	elseif chartes[charte] and chartes[charte][type] then
		return chartes[charte][type]
	else
		return chartes["defaut"][type] or "#dddddd"
	end
end

-- Fonction exportée appelée par #invoke
function p.couleur(frameOrCharte, typeOrNil)
	if type(frameOrCharte) == "table" and frameOrCharte.args then
		-- Appel via #invoke (frame)
		local args = frameOrCharte.args
		return couleurDirect(args["charte"], args["type"])
	else
		-- Appel direct depuis Lua avec params
		return couleurDirect(frameOrCharte, typeOrNil)
	end
end

-- Fonction pour afficher le texte par défaut du sous-titre (idem avec frame)
function p.soustitre(frame)
	local charte = frame.args["charte"] or "defaut"
	charte = mw.ustring.lower(charte)
	return soustitres[charte] or soustitres["defaut"]
end

return p