#include "core/globals.sp"

#define PLUGIN_VERSION "1.0"

public Plugin myinfo = {
	name = "Facti13 Reports",
	author = "gsd",
	description = "basic reports to backend",
	version = PLUGIN_VERSION,
	url = "https://tf2.pblr-nyk.pro"
}

#define REASON_TEXT_SIZE 256
#define CONFIG_REASON_LINE REASON_TEXT_SIZE + 32

// Client Vars
int		g_clients_cooldown[MAXPLAYERS+1];
int		g_clients_reported_uid[MAXPLAYERS+1];
bool	g_clients_reasons_wait[MAXPLAYERS+1];
char	g_clients_reason[MAXPLAYERS+1][REASON_TEXT_SIZE];

// Plugin Vars
int 	g_client_cooldown = 300;

// Choices
#define REASONS_SLOTS 32
char	g_reasons[REASONS_SLOTS][64];
int		g_reasons_bitflag[REASONS_SLOTS];
char	g_reasons_solution[REASONS_SLOTS][REASON_TEXT_SIZE];

public OnPluginStart() {
	fillReason();
    SetupGlobalConVar();
    SetupThis();
}

public OnPluginEnd() {
    UnSetupGlobalConvar();
}

stock fillReason() {
	char EMBEDED_REASONS[REASONS_SLOTS][REASON_TEXT_SIZE];
	Format(EMBEDED_REASONS[0], REASON_TEXT_SIZE, "Аdmin абуз :)|z");
	Format(EMBEDED_REASONS[1], REASON_TEXT_SIZE, "Аdmin абуз|b");
	Format(EMBEDED_REASONS[2], REASON_TEXT_SIZE, "Moder абуз|k");
	Format(EMBEDED_REASONS[3], REASON_TEXT_SIZE, "FreeVIP абуз|t|Ты можешь проголосовать за кик данного игрока из меню. Введи для этого в чат: меню, потом иди по пути: меню -> голосование -> кикнуть");
	Format(EMBEDED_REASONS[4], REASON_TEXT_SIZE, "VIP абуз|a|Ты можешь проголосовать за кик данного игрока из меню. Введи для этого в чат: меню, потом иди по пути: меню -> голосование -> кикнуть");
	Format(EMBEDED_REASONS[5], REASON_TEXT_SIZE, "Читы");
	Format(EMBEDED_REASONS[6], REASON_TEXT_SIZE, "Микспам||Ты можешь проголосовать чтоб данного игрока заглушили. Введи для этого в чат: меню, потом иди по пути: меню -> голосование -> замьютить");
	Format(EMBEDED_REASONS[7], REASON_TEXT_SIZE, "Трейдер");
	Format(EMBEDED_REASONS[8], REASON_TEXT_SIZE, "Тупые опросы||Ты можешь проголосовать чтоб у данного игрока выключили голосование. Введи для этого в чат: меню, потом иди по пути: меню -> голосование -> блокировка команд -> голосование");
	Format(EMBEDED_REASONS[9], REASON_TEXT_SIZE, "Реклама");
	Format(EMBEDED_REASONS[10], REASON_TEXT_SIZE, "Скаммер");
	Format(EMBEDED_REASONS[11], REASON_TEXT_SIZE, "Путис");
	Format(EMBEDED_REASONS[12], REASON_TEXT_SIZE, "Женщина на сервере");

	int i_counter = 0;
	char multi_container[3][REASON_TEXT_SIZE];
	char single_container[CONFIG_REASON_LINE];

	for (i_counter = 0; i_counter < REASONS_SLOTS; i_counter++){
		multi_container[0][0] = '\0';
		multi_container[1][0] = '\0';
		multi_container[2][0] = '\0';
		single_container[0] = '\0';

		Format(single_container, CONFIG_REASON_LINE, EMBEDED_REASONS[i_counter]);

		if(strlen(single_container) > 0){
			ExplodeString(single_container, "|", multi_container, 3, REASON_TEXT_SIZE)
			Format(g_reasons[i_counter], sizeof(g_reasons[]), "%s", multi_container[0]);
			g_reasons_bitflag[i_counter] = ReadFlagString(multi_container[1][0]);
			Format(g_reasons_solution[i_counter], sizeof(g_reasons_solution[]), "%s", multi_container[2]);
		} else {
			g_reasons[i_counter][0] = '\0';
			g_reasons_bitflag[i_counter] = 0;
			g_reasons_solution[i_counter][0] = '\0';
		}
		//g_reasons[i_counter]
	}
}

public SetupThis(){
	RegConsoleCmd("sm_report",			COMMAND_ClientReport);
	/////////////////////////////////////////////////////////////////
	RegConsoleCmd("say",		SayHook);
	RegConsoleCmd("say_team",	SayHook);
	/////////////////////////////////////////////////////////////////
	for(int i; i++ < MaxClients - 1;){
		OnClientPutInServer(i);
	}
	/////////////////////////////////////////////////////////////////
}

public void OnClientPutInServer(int cid){
	g_clients_cooldown[cid] = -1;
	g_clients_reasons_wait[cid] = false;
	g_clients_reported_uid[cid] = -1;
}

stock HTTPRequest createRequest() {
    HTTPRequest client = INVALID_HANDLE;
    char url[256];
    Format(url, sizeof(url), "%s/report", g_url);
	LogMessage("Use report endpoint: %s", url);
    if (strlen(url)>0) {
        client = new HTTPRequest(url);
        client.SetHeader("Cookie", g_cookie);
        client.Timeout = 3;
    } else {
        LogMessage("[FBI] Client not builded");
    }
    return client;
}

//legacy
static void SendReport(const char[] reason, int uid){
	int cid_author = GetClientOfUserId(uid);
    int cid_reported = GetClientOfUserId(g_clients_reported_uid[cid_author]);
	LogMessage("author: %N, reported: %N", cid_author, cid_reported);

    char author_steam64[64];
    char reported_steam64[64];
    GetClientAuthId(cid_author, AuthId_SteamID64, author_steam64, 64);
	if (cid_reported != 0)
    	GetClientAuthId(cid_reported, AuthId_SteamID64, reported_steam64, 64);

    JSONObject payload = new JSONObject();
    payload.SetString("author_steam64", author_steam64);
    payload.SetString("reason", reason);

	if (cid_reported != 0)
    	payload.SetString("reported_steam64", reported_steam64);

    createRequest().Post(payload, Report_Callback, uid);

	////////////////////////////////////////////////////////////////
	g_clients_cooldown[cid_author] = GetTime();
	g_clients_reported_uid[cid_author] = -1;
	g_clients_reasons_wait[cid_author] = false;
	////////////////////////////////////////////////////////////////
}


public Action COMMAND_ClientReport(int cid, int args){
	if(cid == 0){
		return Plugin_Handled;
	}
	///////////////////////////////////////////////////////////////////////////////
	int client_cooldown = GetTime() - g_clients_cooldown[cid];
	if(client_cooldown < g_client_cooldown){
		PrintToChat(cid, "Подожди еще %i секунды прежде чем отправлять следующий репорт.", g_client_cooldown - client_cooldown);
		return Plugin_Handled;
	}
	///////////////////////////////////////////////////////////////////////////////
	ShowDisclaimer(cid);
	return Plugin_Handled;
}

public int ShowDisclaimer(int cid){
	Handle Disclaimer = CreateMenu(PreDisplayPlayers);
	SetMenuTitle(Disclaimer, "Ты согласен с тем что твой репорт на игрока оправдан и несет в себе ценную информацию, иначе тебе могут дать по жопе?");
	AddMenuItem(Disclaimer, "","Согласен?", ITEMDRAW_RAWLINE);
	AddMenuItem(Disclaimer, "<show_players>", "ДА");
	AddMenuItem(Disclaimer, "<kill_player>", "НЕТ");
	DisplayMenu(Disclaimer, cid, MENU_TIME_FOREVER);
	return 0;
}

public int ShowReasonSolution(int cid, int reason_id, const char[] reason){
	strcopy(g_clients_reason[cid], sizeof(g_clients_reason[]), reason);
	Handle Solution = CreateMenu(PreDisplayPlayers);
	SetMenuTitle(Solution, "Смотри друг на твою проблему есть решение, без учатия модераторов: \n%s\nТы всеравно хочешь отправить репорт?", g_reasons_solution[reason_id]);
	int count = 4;
	int choice = GetRandomInt(0, count);
	for(int i = 0; i <= count; i++){
		if(i == choice) AddMenuItem(Solution, "<send_report>","ДА");
		else			AddMenuItem(Solution, "<exit>","НЕТ");
	}
	SetMenuExitBackButton(Solution, false);
	SetMenuExitButton(Solution, false);
	DisplayMenu(Solution, cid, MENU_TIME_FOREVER);
}

public int PreDisplayPlayers(Handle Disclaimer, MenuAction eAction, int cid, int select){
	switch(eAction){
		case MenuAction_End:CloseHandle(Disclaimer);
		case MenuAction_Select:{
			char cmd[32];
			GetMenuItem(Disclaimer, select, cmd, sizeof(cmd));
			//////////////////////////////////////////////////
			if (StrContains(cmd, "<show_players>") != -1){
				return DisplayPlayers(cid);
			}
			if (StrContains(cmd, "<kill_player>") != -1){
				//SDKHooks_TakeDamage(cid, cid, cid, 99999999.0);
				FakeClientCommand(cid, "explode");
				return 0;
			}
			if (StrContains(cmd, "<send_report>") != -1){
				ReportProcessing(cid, g_clients_reason[cid]);
				return 0;
			}
			if (StrContains(cmd, "<exit>") != -1){
				g_clients_cooldown[cid] = -1;
				return 0;
			}
			return 0;
		}
	}
	return 0;
}

public int DisplayReasons(int cid){
	if(strlen(g_reasons[0]) > 0){
		bool HavePermitionReason = false;		
		Handle ReasonsMenu = CreateMenu(SelectReasonsHandle);
		SetMenuExitBackButton(ReasonsMenu, true);
		SetMenuExitButton(ReasonsMenu, true);
		SetMenuTitle(ReasonsMenu, "Выбери причину:");
		char menu_item[REASON_TEXT_SIZE];
		for (int i = 0; i < 32; i++){
			menu_item[0] = '\0';
			if(strlen(g_reasons[i]) > 0){
				Format(menu_item, sizeof(menu_item), "%i|%s", i, g_reasons[i]);

				if(g_reasons_bitflag[i] != 0){
					if(HavePermitionReason){
						continue;
					}

					if(CheckCommandAccess(GetClientOfUserId(g_clients_reported_uid[cid]), "", g_reasons_bitflag[i])){
						AddMenuItem(ReasonsMenu, menu_item, g_reasons[i]);
						HavePermitionReason = true;
						continue;
					}
				} else {
					AddMenuItem(ReasonsMenu, menu_item, g_reasons[i]);
				}
			}
		}
		AddMenuItem(ReasonsMenu, "<open_menu>", "Меню");
		AddMenuItem(ReasonsMenu, "<custom_reason>", "Своя причина");
		DisplayMenu(ReasonsMenu, cid, MENU_TIME_FOREVER);
		return 0;
	} else {
		SetWaitChatMessage(cid);
		return 0;
	}
	return 0;
}

public int SelectReasonsHandle(Handle ReasonMenu, MenuAction eAction, int cid, int select){
	switch(eAction){
		case MenuAction_End:CloseHandle(ReasonMenu);
		case MenuAction_Select:{
			char reason_and_id[64], reason[64];
			GetMenuItem(ReasonMenu, select, reason_and_id, sizeof(reason_and_id));

			if(StrContains(reason_and_id, "|") != -1){
				char reason_array[2][64];
				int reason_id = 0;
			
				ExplodeString(reason_and_id, "|", reason_array, 2, 64);
				strcopy(reason, sizeof(reason), reason_array[1]);
				reason_id = StringToInt(reason_array[0]);

				if(strlen(g_reasons_solution[reason_id]) > 0){
					ShowReasonSolution(cid, reason_id, reason);
					return 0;
				}
			} else {
				strcopy(reason, 64, reason_and_id);
				if (StrContains(reason, "<custom_reason>") != -1){
					SetWaitChatMessage(cid);
					return 0;
				}
				if (StrContains(reason, "<open_menu>") != -1){
					FakeClientCommand(cid, "sm_menu");
					return 0;
				}
			}
			ReportProcessing(cid, reason);
			return 0;
		}
	}
	return 0;
}

public int DisplayPlayers(int cid){
	Handle ReportMenu = CreateMenu(SelectPlayerHandle);
	for (int i; i++ <= MaxClients - 1;) {
		//i == cid || 
		if(!IsClientInGame(i) || IsFakeClient(i)){
			continue;
		}

		if(i == cid){
			if(!(GetUserFlagBits(cid) & ADMFLAG_ROOT)){
				continue;
			}
		}

		char menu_uid[16];
		char menu_name[32];
		
		IntToString(GetClientUserId(i), menu_uid, sizeof(menu_uid));
		GetClientName(i, menu_name, sizeof(menu_name));

		AddMenuItem(ReportMenu, menu_uid, menu_name);
	}
	///////////////////////////////////////////////////////////////////////////////
	if (GetMenuItemCount(ReportMenu) > 0){
		SetMenuExitBackButton(ReportMenu, false);
		SetMenuExitButton(ReportMenu, true);
		SetMenuTitle(ReportMenu, "Зарепортить игрока:");
		DisplayMenu(ReportMenu, cid, MENU_TIME_FOREVER);
		return 1;
	}

	CloseHandle(ReportMenu);
	PrintToChat(cid, "Увы! Подходящих игроков не найдено.");
	return 0;
}

// Menu functions
public int SelectPlayerHandle(Handle ReportMenu, MenuAction eAction, int cid, int select){
	switch(eAction){
		case MenuAction_End:CloseHandle(ReportMenu);
		case MenuAction_Select:{
			char menu_uid[16];
			GetMenuItem(ReportMenu, select, menu_uid, sizeof(menu_uid));

			int reported_cid = GetClientOfUserId(StringToInt(menu_uid));
			if(!reported_cid){
				PrintToChat(cid, "Увы! Данный игрок недоступен.");
				return;
			}

			LogMessage("Fill reported uid, author: %N, reported: %N", cid, reported_cid);
			g_clients_reported_uid[cid] = GetClientUserId(reported_cid);
			
			DisplayReasons(cid);
		}
	}
}

//Say hook
static void SetWaitChatMessage(int cid){
	g_clients_reasons_wait[cid] = true;
	PrintToChat(cid, "Напиши в чат, причину жалобы. Если ты не уверен, напиши в чат: !отмена")
}

public Action SayHook(cid, args){
	if(!cid || !g_clients_reasons_wait[cid]) {
		return Plugin_Continue;
	}

	if(!(GetClientOfUserId(g_clients_reported_uid[cid]))){
		PrintToChat(cid, "Увы! К написанию жалобы, данный игрок стал недоступен.")
		OnClientPutInServer(cid);
		return Plugin_Handled;
	}

	char Reason[512];

	if(args == 1){
		GetCmdArg(1, Reason, sizeof(Reason));
	} else {
		GetCmdArgString(Reason, sizeof(Reason));
	}

	if (!strcmp(Reason, "!отмена")) {
		PrintToChat(cid, "Твоя жалоба была откланена!");
		OnClientPutInServer(cid);
		return Plugin_Handled;
	}

	if (!strcmp(Reason, "!menu") || !strcmp(Reason, "!MENU") || !strcmp(Reason, "menu") || !strcmp(Reason, "MENU") || !strcmp(Reason, "!меню") || !strcmp(Reason, "!МЕНЮ") || !strcmp(Reason, "меню") || !strcmp(Reason, "МЕНЮ")) {
		KickClient(cid, "МЕНЮ БЛЯТЬ ПОШЕЛ НАХУЙ");
		return Plugin_Handled;
	}

	if (!strcmp(Reason, "!report")) {
		PrintToChat(cid, "Твоя жалоба была откланена, по причине долбаеб.");
		OnClientPutInServer(cid);
		return Plugin_Handled;
	}

	ReportProcessing(cid, Reason);

	return Plugin_Handled;
}

stock ReportProcessing(int cid, const char[] Reason){
	if (cid == GetClientOfUserId(g_clients_reported_uid[cid])){
		g_clients_reported_uid[cid] = 0;
	}else{
		PrintToChat(GetClientOfUserId(g_clients_reported_uid[cid]), "\n\n[REPORT.SYSTEM] На вас составили репорт, ожидайте пока вам дадут пизды!\n\n");
	}
	SendReport(Reason, GetClientUserId(cid));
}

static void Report_Callback(HTTPResponse response, any value){
    int cid_author = GetClientOfUserId(value);

	if (response.Status == 200){
	    PrintToChat(cid_author, "Репорт отправлен!");
		return;
	} else {
        OnClientPutInServer(cid_author);
        PrintToChat(cid_author, "РЕПОРТ НЕ БЫЛ ДОСТАВЛЕН, ПОВТОРИ ПОПЫТКУ ПОЗЖЕ");
		PrintToServer("Failed response! Code: %i", response.Status);
		return;
	}
}