// vim: set ts=4 sw=4 tw=99 noet:
//
// AMX Mod X, based on AMX Mod by Aleksander Naszko ("OLO").
// Copyright (C) The AMX Mod X Development Team.
//
// This software is licensed under the GNU General Public License, version 3 or higher.
// Additional exceptions apply. For full license details, see LICENSE.txt or visit:
//     https://alliedmods.net/amxmodx-license

//
// Stats Configuration Plugin
//

#include <amxmodx>
#include <amxmisc>

#define MAX_MENU_DATA 72

new g_menuData[MAX_MENU_DATA][32]
new g_menuDataVar[MAX_MENU_DATA][32]
new g_menuDataId[MAX_MENU_DATA]
new g_menuDataNum
new g_menuPosition[MAX_PLAYERS + 1]
new g_fileToSave[64]
new bool:g_modified
new g_coloredMenus

public plugin_precache()
{
	register_clcmd("amx_statscfgmenu", "cmdCfgMenu", ADMIN_CFG, "- displays stats configuration menu")
	register_dictionary("statscfg.txt")
	register_dictionary("common.txt")
	register_concmd("amx_statscfg", "cmdCfg", ADMIN_CFG, "- displays help for stats configuration")
}

public plugin_init()
{
	register_plugin("Stats Configuration", AMXX_VERSION_STR, "AMXX Dev Team")
	register_menucmd(register_menuid("Stats Configuration"), 1023, "actionCfgMenu")
	
	get_configsdir(g_fileToSave, charsmax(g_fileToSave))
	format(g_fileToSave, charsmax(g_fileToSave), "%s/stats.ini", g_fileToSave)
	loadSettings(g_fileToSave)
	g_coloredMenus = colored_menus()
}

public cmdCfg(id, level, cid)
{
	if (!cmd_access(id, level, cid, 1))
		return PLUGIN_HANDLED

	new cmds[32]
	read_argv(1, cmds, charsmax(cmds))
	
	new option = equali(cmds, "on") ? 1 : 0

	if (!option)
		option = equali(cmds, "off") ? 2 : 0
	
	if (read_argc() > 2 && option)
	{
		new var[32], enabled = 0
		read_argv(2, var, charsmax(var))
		
		for (new a = 0; a < g_menuDataNum; ++a)
		{
			if (containi(g_menuDataVar[a], var) != -1)
			{
				g_modified = true
				++enabled
				if (option == 1)
				{
					set_xvar_num(g_menuDataId[a], 1)
					console_print(id, "%L: %s", id, "STATS_ENABLED", g_menuData[a])
				} else {
					set_xvar_num(g_menuDataId[a], 0)
					console_print(id, "%L: %s", id, "STATS_DISABLED", g_menuData[a])
				}
			}
		}
		
		if (enabled)
			console_print(id, "%L", id, "TOTAL_NUM", enabled)
		else
			console_print(id, "%L", id, "NO_OPTION", var)
	}
	else if (equali(cmds, "save"))
	{
		if (saveSettings(g_fileToSave))
		{
			g_modified = false
			console_print(id, "%L", id, "STATS_CONF_SAVED")
		}
		else
			console_print(id, "%L", id, "STATS_CONF_FAILED")
	}
	else if (equali(cmds, "load"))
	{
		if (loadSettings(g_fileToSave))
		{
			g_modified = false
			console_print(id, "%L", id, "STATS_CONF_LOADED")
		}
		else
			console_print(id, "%L", id, "STATS_CONF_FAIL_LOAD")
	}
	else if (equali(cmds, "list"))
	{
		new arg1[8]
		new start = read_argv(2, arg1, charsmax(arg1)) ? str_to_num(arg1) : 1

		if (--start < 0) start = 0
		
		if (start >= g_menuDataNum)
			start = g_menuDataNum - 1
		
		new end = start + 10
		
		if (end > g_menuDataNum)
			end = g_menuDataNum

		new lName[16], lVariable[16], lStatus[16]
		
		format(lName, charsmax(lName), "%L", id, "NAME")
		format(lVariable, charsmax(lVariable), "%L", id, "VARIABLE")
		format(lStatus, charsmax(lStatus), "%L", id, "STATUS")
		console_print(id, "^n----- %L: -----", id, "STATS_CONF")
		console_print(id, "     %-29.28s   %-24.23s   %-9.8s", lName, lVariable, lStatus)
		
		if (start != -1)
		{ 
			new lOnOff[16]
			
			for (new a = start; a < end; ++a)
			{
				format(lOnOff, charsmax(lOnOff), "%L", id, get_xvar_num(g_menuDataId[a]) ? "ON" : "OFF")
				console_print(id, "%3d: %-29.28s   %-24.23s   %-9.8s", a + 1, g_menuData[a], g_menuDataVar[a], lOnOff)
			}
		}
		
		console_print(id, "----- %L -----", id, "STATS_ENTRIES_OF", start + 1, end, g_menuDataNum)
		
		if (end < g_menuDataNum)
			console_print(id, "----- %L -----", id, "STATS_USE_MORE", end + 1)
		else 
			console_print(id, "----- %L -----", id, "STATS_USE_BEGIN")
	}
	else if (equali(cmds, "add") && read_argc() > 3)
	{
		if (g_menuDataNum < MAX_MENU_DATA)
		{
			read_argv(2, g_menuData[g_menuDataNum], charsmax(g_menuData[]))
			read_argv(3, g_menuDataVar[g_menuDataNum], charsmax(g_menuDataVar[]))
			g_menuDataId[g_menuDataNum] = get_xvar_id(g_menuDataVar[g_menuDataNum])
			++g_menuDataNum
		}
		else
			console_print(id, "%L", id, "CANT_ADD_STATS")
	} else {
		console_print(id, "%L", id, "COM_STATS_USAGE")
		console_print(id, "%L", id, "COM_STATS_COM")
		console_print(id, "%L", id, "COM_STATS_ON")
		console_print(id, "%L", id, "COM_STATS_OFF")
		console_print(id, "%L", id, "COM_STATS_SAVE")
		console_print(id, "%L", id, "COM_STATS_LOAD")
		console_print(id, "%L", id, "COM_STATS_LIST")
		console_print(id, "%L", id, "COM_STATS_ADD")
	}

	return PLUGIN_HANDLED
}

public cmdCfgMenu(id, level, cid)
{
	if (cmd_access(id, level, cid, 1))
		displayCfgMenu(id, g_menuPosition[id] = 0)
	
	return PLUGIN_HANDLED
}

displayCfgMenu(id, pos)
{
	if (pos < 0)
		return
	
	new menu_body[512], start = pos * 7
	
	if (start >= g_menuDataNum)
		start = pos = g_menuPosition[id] = 0
	
	new len = format(menu_body, charsmax(menu_body), g_coloredMenus ? "\y%L\R%d/%d^n\w^n" : "%L %d/%d^n^n", id, "STATS_CONF", pos + 1, ((g_menuDataNum / 7)+((g_menuDataNum % 7) ? 1 : 0)))
	new end = start + 7, keys = MENU_KEY_0|MENU_KEY_8, k = 0
	
	if (end > g_menuDataNum)
		end = g_menuDataNum
	
	for (new a = start; a < end; ++a)
	{
		keys |= (1<<k)
		/* Backwards compatibility hack - if the name starts with ST_, assume it is translation safe! */
		if (equal(g_menuData[a], "ST_", 3))
		{
			len += format(menu_body[len], charsmax(menu_body) -len, g_coloredMenus ? "%d. %L\y\R%L^n\w" : "%d. %L %L^n", ++k, id, g_menuData[a], id, get_xvar_num(g_menuDataId[a]) ? "ON" : "OFF")
		} else {
			len += format(menu_body[len], charsmax(menu_body) -len, g_coloredMenus ? "%d. %s\y\R%L^n\w" : "%d. %s %L^n", ++k, g_menuData[a], id, get_xvar_num(g_menuDataId[a]) ? "ON" : "OFF")
		}
	}
	
	if (g_menuDataNum == 0)
		len += format(menu_body[len], charsmax(menu_body) -len, g_coloredMenus ? "\d%L\w" : "%L", id, "NO_STATS")

	len += format(menu_body[len], charsmax(menu_body) -len, g_coloredMenus ? "^n8. %L\y\R%s^n\w" : "^n8. %L %s^n", id, "SAVE_CONF", g_modified ? "*" : "")

	if (end != g_menuDataNum)
	{
		format(menu_body[len], charsmax(menu_body) -len, "^n9. %L...^n0. %L", id, "MORE", id, pos ? "BACK" : "EXIT")
		keys |= MENU_KEY_9
	}
	else
		format(menu_body[len], charsmax(menu_body) -len, "^n0. %L", id, pos ? "BACK" : "EXIT")
	
	show_menu(id, keys, menu_body, -1, "Stats Configuration")
}

public actionCfgMenu(id, key)
{
	switch (key)
	{
		case 7:
		{
			if (saveSettings(g_fileToSave))
			{
				g_modified = false
				client_print(id, print_chat, "* %L", id, "STATS_CONF_SAVED")
			}
			else
				client_print(id, print_chat, "* %L", id, "STATS_CONF_FAILED")
			
			displayCfgMenu(id, g_menuPosition[id])
		}
		case 8: displayCfgMenu(id, ++g_menuPosition[id])
		case 9: displayCfgMenu(id, --g_menuPosition[id])
		default:
		{
			g_modified = true
			new a = g_menuPosition[id] * 7 + key
			set_xvar_num(g_menuDataId[a], 1 - get_xvar_num(g_menuDataId[a]))
			
			displayCfgMenu(id, g_menuPosition[id])
		}
	}
	
	return PLUGIN_HANDLED
}

saveSettings(filename[])
{
	if (file_exists(filename))
		delete_file(filename)
	
	if (!write_file(filename, ";Generated by Stats Configuration Plugin. Do not modify!^n;Variable  Description"))
		return 0
	
	new text[256]
	
	for (new a = 0; a < g_menuDataNum; ++a)
	{
		if (get_xvar_num(g_menuDataId[a]))
		{
			if (equal(g_menuData[a], "ST_", 3))
			{
				format(text, charsmax(text), "%-24.23s ;%L", g_menuDataVar[a], LANG_SERVER, g_menuData[a])
			}
			else
			{
				format(text, charsmax(text), "%-24.23s ;%s", g_menuDataVar[a], g_menuData[a])
			}
			write_file(filename, text)
		}
	} 
	
	return 1
}

loadSettings(filename[])
{
	if (!file_exists(filename)) 
		return 0
	
	new text[256], name[32]
	new len, pos = 0, xid

	while (read_file(filename, pos++, text, charsmax(text), len))
	{
		if (text[0] == ';') continue // line is a comment
		
		parse(text, name, charsmax(name))
		
		if ((xid = get_xvar_id(name)) != -1)
			set_xvar_num(xid, 1)
	}
	
	return 1
}