/* AMX Mod X - Player Location Plugin
* 
* CVars:
* amx_loc_kick_mode 0 - Auto kick mode
* (0 = off, 1 = kick players whose country code is amx_loc_kick_code, 2 = kick players whose country code is **NOT** amx_loc_kick_code)
* 
* amx_loc_kick_code "" - GeoIP *TWO* dgit code
* 
* amx_loc_access 2 - Players who can access amx_showloc (0 = disabled, 1 = All players, 2 = Admin only)
* 
*/

#include <amxmodx>
#include <amxmisc>
#include <geoip>

public plugin_init() {
	register_plugin("Player Location", "0.7b", "008DEADinHK (anson_wongy)")
	
	register_cvar("amx_loc_kick_mode", "1")
	register_cvar("amx_loc_kick_code", "A1")
	register_cvar("amx_loc_access", "2")
	
	new showloc_access[2]
	get_cvar_string("amx_loc_access", showloc_access, 1)
	
	if (!equali(showloc_access, "0")) {
		if (!equali(showloc_access, "1")) {
			register_concmd("amx_showloc", "show_playerlocation", ADMIN_RCON, "<target> - @ALL, @CT, @T, playername")
		} else if (!equali(showloc_access, "2")) {
			register_concmd("amx_showloc", "show_playerlocation", -1, "<target> - @ALL, @CT, @T, playername")
		}
	}
}

public kickplayer(id) {
	new Reason[64]
	format(Reason, 63, "Player from your country/area isnt allowed to join this server.")
	server_cmd("kick #%d ^"%s^"", get_user_userid(id), Reason)
}

public client_authorized(id) {
	new kick_mode[2]
	get_cvar_string("amx_loc_kick_mode", kick_mode, 1)
	
	if (!equali(kick_mode, "0")) {
		new playerip[16], geoip_code[3], kick_code[3]
		get_user_ip(id, playerip, 15, 1)		
		if (!equali(playerip, "127.0.0.1")) {
			geoip_code2(playerip, geoip_code)
			get_cvar_string("amx_loc_kick_code", kick_code, 2)
			if (equali(kick_mode, "1")) {
				if (equali(geoip_code[0], kick_code[0])) {
					kickplayer(id)
				}
			} else if (equali(kick_mode, "2")) {
				if (!equali(geoip_code[0], kick_code[0])) {
					kickplayer(id)
				}
			}
		}
	}	
	return PLUGIN_HANDLED
}

public show_playerlocation(id, level, cid) {
	if (!cmd_access(id,level,cid,1)) 
		return PLUGIN_HANDLED
	
	new Arg1[24]
	read_argv(1, Arg1, 23)
	
	if (equali(Arg1, "")) {
		format(Arg1, 24, "@ALL")
	}
		
	new playername[32], playerping, playerloss, playerip[16], playerloc[46], playerloccode[3]
	if (Arg1[0] == '@')
	{
		new Team = 0
		if (equali(Arg1[1], "CT")) {
			Team = 2
		} else if (equali(Arg1[1], "T")) {
			Team = 1
          	} else if (equali(Arg1[1], "ALL")) {
          		Team = 0
          	} else {
          		Team = 0
          	}
          	new players[32], num, i
		get_players(players, num)
		
		
		console_print(id, "Location info of players: ")
		console_print(id, "=================================")
		console_print(id, "ID | Name | Ping | Loss | IP | Location | Code")
		
		new playernum		
		for (i=0; i<num; i++)
		{
			if (!Team)
			{				
				get_user_name(players[i], playername, 31)
				get_user_ip(players[i], playerip, 15, 1)
				get_user_ping(players[i], playerping, playerloss)
				if (!equali(playerip, "127.0.0.1")) {
					geoip_country(playerip, playerloc, 45)
					geoip_code2(playerip, playerloccode)
				} else {
					format(playerloc, 45, "localhost (unknown)")
					format(playerloccode, 2, "")
				}
				
				console_print(id, "%d | %s | %d | %d | %s | %s | %s", players[i], playername, playerping, playerloss, playerip, playerloc, playerloccode)
				playernum++
			} else {
				if (get_user_team(players[i]) == Team)
				{
					get_user_name(players[i], playername, 31)
					get_user_ip(players[i], playerip, 15, 1)
					get_user_ping(players[i], playerping, playerloss)
					if (!equali(playerip, "127.0.0.1")) {
						geoip_country(playerip, playerloc, 45)
						geoip_code2(playerip, playerloccode)
					} else {
						format(playerloc, 45, "localhost (unknown)")
						format(playerloccode, 2, "")
					}
					console_print(id, "%d | %s | %d | %d | %s | %s | %s", players[i], playername, playerping, playerloss, playerip, playerloc, playerloccode)
					playernum++					
				}
			}
		}
		
		console_print(id, "=================================")
		console_print(id, "Total player listed: %d players", playernum)
		console_print(id, "=================================")
	} else {
		new player = cmd_target(id, Arg1, 2)
		if (!player)
		{
			console_print(id, "Sorry, player %s could not be found or targetted!", Arg1)
			return PLUGIN_HANDLED
		} else {
			get_user_name(player, playername, 31)
			get_user_ip(player, playerip, 15, 1)
			get_user_ping(player, playerping, playerloss)
			
			if (!equali(playerip, "127.0.0.1")) {
				geoip_country(playerip, playerloc, 45)
				geoip_code2(playerip, playerloccode)
			} else {
				format(playerloc, 45, "localhost (unknown)")
				format(playerloccode, 2, "")
			}
			
			console_print(id, "Here is some info of : %s", playername)
			console_print(id, "=================================")
			console_print(id, "ID: %d", player)
			console_print(id, "Ping: %d", playerping)
			console_print(id, "Loss: %d", playerloss)
			console_print(id, "IP: %s", playerip)
			console_print(id, "Location: %s", playerloc)
			console_print(id, "Code: %s", playerloccode)
			console_print(id, "=================================")
		}
	}
	return PLUGIN_HANDLED
}