--[[
	Text formatting options for indicators durations&stacks
	General -> Misc Tab -> Text Formatting section

	Text formatting database variables and default values:
	Grid2.db.profile.formatting = {
		longDecimalFormat        = "%.1f",
		shortDecimalFormat       = "%.0f",
		longDurationStackFormat  = "%.1f:%d",
		shortDurationStackFormat = "%.0f:%d",
		invertDurationStack      = false,
	}
	shortFormat = used when duration >= 1 sec
	longFormat  = used when duration <  1 sec
	The database formats are translated to/from a more user friendly format, examples:
		"%.1f" <=> "%d"     "%.1f/%d"  <=> "%d/%s"
	User friendly format tokens:
		"%d" = represents duration, becomes translated to/from: "%.0f" or "%.1f" (floating point number)
		"%s" = represents stacks,   becomes translated to/from: "%d" (integer number)
--]]
local Grid2Options = Grid2Options
local L = Grid2Options.L

-- Posible values for "Display tenths of a second" options
local tenthsValues = {L["Never"], L["Always"], L["When duration<1sec"]}

-- Retrieve a formatting mask from database.
-- The mask is converted to a user friendly format
-- formatType = "DecimalFormat" | "DurationStackFormat"
local function GetFormat(formatType)
	local dbx = Grid2.db.profile.formatting
	local mask = dbx["long" .. formatType]
	return mask:gsub("%%d", "%%s"):gsub("%%.0f", "%%d"):gsub("%%.1f", "%%d")
end

-- Calculates tenths display mode examining format masks saved in database, returns:
-- 1 => Never display tenths  ( both shortFormat and longFormat containing a "%.0f" token )
-- 2 => Always display tenths ( both shortFormat and longFormat containing a "%.1f" token )
-- 3 => Display tenths when duraction<1sec (shortFormat contains "%.1f" and longFormat contains "%.0f")
local function GetTenths(formatType)
	local dbx = Grid2.db.profile.formatting
	local short = dbx["short" .. formatType]
	local long = dbx["long" .. formatType]
	return (long:find("%%.0f") and 1) or (short:find("%%.1f") and 2) or 3
end

-- SetFormat(formatType, mask, tenths)
-- Generate a short and long format mask according to the user selections saving the masks in database
local SetFormat
do
	-- converts a user friendly mask to the database format
	local function ToDbFormat(formatType, mask, tenths)
		if formatType == "DecimalFormat" then
			local short = tenths == 2 and "%%.1f" or "%%.0f"
			local long = tenths == 1 and "%%.0f" or "%%.1f"
			return (mask:gsub("%%d", short)), (mask:gsub("%%d", long))
		elseif formatType == "DurationStackFormat" then
			local i1 = mask:find("%%d")
			local i2 = mask:find("%%s")
			if i1 and i2 then
				local short, long = ToDbFormat("DecimalFormat", mask, tenths)
				return (short:gsub("%%s", "%%d")), (long:gsub("%%s", "%%d")), i1 > i2
			end
		end
	end
	function SetFormat(formatType, mask, tenths)
		mask = mask or GetFormat(formatType)
		tenths = tenths or GetTenths(formatType)
		local short, long, inverted = ToDbFormat(formatType, mask, tenths)
		if short then
			-- sanity sheck, string.format will crash if format is wrong, and nothing is saved
			string.format(short, 1, 1)
			string.format(long, 1, 1)
			local dbx = Grid2.db.profile.formatting
			dbx["short" .. formatType] = short
			dbx["long" .. formatType] = long
			if inverted ~= nil then
				dbx.invertDurationStack = inverted
			end
			for _, indicator in Grid2:IterateIndicators("text") do
				indicator:UpdateDB()
			end
		end
	end
end

-- Generate the options for AceConfigTable
Grid2Options:AddGeneralOptions("Misc", "Text Formatting", {
	dFormat = {
		type = "input",
		order = 1,
		name = L["Duration Format"],
		desc = L["Examples:\n(%d)\n%d seconds"],
		get = function()
			return GetFormat("DecimalFormat")
		end,
		set = function(_, v)
			SetFormat("DecimalFormat", v, nil)
		end
	},
	dTenths = {
		type = "select",
		order = 2,
		name = L["Display tenths of a second"],
		desc = L["Display tenths of a second"],
		get = function()
			return GetTenths("DecimalFormat")
		end,
		set = function(_, v)
			SetFormat("DecimalFormat", nil, v)
		end,
		values = tenthsValues
	},
	separator = {type = "description", name = "", order = 3},
	dsFormat = {
		type = "input",
		order = 4,
		name = L["Duration+Stacks Format"],
		desc = L["Examples:\n%d/%s\n%s(%d)"],
		get = function()
			return GetFormat("DurationStackFormat")
		end,
		set = function(_, v)
			SetFormat("DurationStackFormat", v, nil)
		end
	},
	dsTenths = {
		type = "select",
		order = 5,
		name = L["Display tenths of a second"],
		desc = L["Display tenths of a second"],
		get = function()
			return GetTenths("DurationStackFormat")
		end,
		set = function(_, v)
			SetFormat("DurationStackFormat", nil, v)
		end,
		values = tenthsValues
	}
})