/* AMX Mod script.
*
*
* 1.74.1SL [2007/07/19] by Simon Logic
! now '<' & '>' symbols within player names display properly on MOTD
*/

#include <amxmod>
#include <amxmisc>
#include <geoip>

new strbuf[33][65]
new g_Buffer[2048]
new logfilename[256]

public admin_banip(id, level, cid) {
if (!cmd_access(id, level, cid, 2))
return PLUGIN_HANDLED
new ban_time = 0
new arg[32]
new ip[16]
read_argv(1, arg, 31)
new player = find_player("d",arg)
if (!player) {
player = cmd_target(id,arg,1)
if (!player) return PLUGIN_HANDLED
get_user_ip(player,ip,15,1)
} else {
copy(ip, 15, arg)
}
new ban_times[13]
read_argv(2, ban_times, 12)
ban_time = str_to_num(ban_times)
if(!ban_time)
ban_time = 0
new authid[16], name[32]
get_user_authid(id,authid,15)
get_user_name(id,name,31)
log_to_file(logfilename,"^"%s<%d><%s><>^" ban ^"%s^" (minutes ^"%i^") (reason ^"^")", name,get_user_userid(id),authid, ip, ban_time)
new srvcmd[65]
format(srvcmd, 64, "addip %i %s", ban_time, ip)
if (ban_time == 0) {
server_cmd("addip 0 %s; writeip", ip)
} else {
server_cmd("addip %d %s", ban_time, ip)
}
return PLUGIN_HANDLED_MAIN

}

public admin_unbanip(id, level, cid) {
if (!cmd_access(id, level, cid, 2))
return PLUGIN_HANDLED
new ip[16]
read_argv(1, ip, 15)
new authid[16], name[32]
get_user_authid(id,authid,15)
get_user_name(id,name,31)
log_to_file(logfilename,"^"%s<%d><%s><>^" unban ^"%s^" (reason ^"^")", name,get_user_userid(id),authid, ip)
server_cmd("removeip %s; writeip", ip)
return PLUGIN_HANDLED_MAIN

}

public admin_ips(id, level, cid) {
if (!cmd_access(id, level, cid, 1))
return PLUGIN_HANDLED
new players[32], name[64], buf[2048], ip[17]
// new country[3]
new i, inum, tmpip, j, pos
new tmpbuf[65]
new nip[33]
get_players(players, inum)
pos = format(g_Buffer, 2047, "<pre>%16s %-28.27s %6s^n", "nick", "IP address", "country")
for(i = 0; i < inum; i++) {
get_user_name(players[i], name, sizeof(name)-1)
if(contain(name, "<") >= 0)
replace(name, sizeof(name)-1, "<", "&lt;")
if(contain(name, ">") >= 0)
replace(name, sizeof(name)-1, ">", "&gt;");

get_user_ip(players[i], ip, 16, 1)
// geoip_code2(ip, country)
nip[i] = ip_to_number(ip)
// format(strbuf[i], 64,"%16s %-28.27s %6s^n", name, ip, country)
format(strbuf[i], 64,"%16s %-28.27s N/A^n", name, ip)
// format(strbuf[i], 64, "%s ... %s .. %s^n", name, ip, country)
}
for(i = 0; i < inum - 1; i++) {
for (j = i + 1; j < inum; j++) {
if (nip[j] < nip[i]) {
copy(tmpbuf, 64, strbuf[i])
tmpip = nip[i]
strbuf[i][0] = 0

copy(strbuf[i], 64, strbuf[j])
nip[i] = nip[j]
strbuf[j][0] = 0

copy(strbuf[j], 64, tmpbuf)
nip[j] = tmpip
tmpbuf[0] = 0
}
}
}

for(i = 0; i < inum; i++) {
pos += format(g_Buffer[pos], 2047 - pos, "%s", strbuf[i])
}
format(g_Buffer[pos],2047-pos,"</pre>")
if (id == 0) {
console_print(id, buf)
} else {
show_motd(id, g_Buffer, "Player's IP")
}
return PLUGIN_HANDLED_MAIN
}

public admin_ipl(id, level, cid) {
if (!cmd_access(id, level, cid, 1))
return PLUGIN_HANDLED
new buf[2049], ip[33], temp[65]
new len
if (file_exists("listip.cfg")) {
for(new i=0; i < 100 && read_file("listip.cfg", i, ip, 32, len) != 0; i += 1) {
read_file("listip.cfg", i, ip, 32, len)
format(temp, 32, "%s ^n", ip)
add(buf, 2048, temp)
}
}
show_motd(id, buf, "Banned IP")
return PLUGIN_HANDLED_MAIN
}

public plugin_init()
{
register_plugin("IPTools", "1.74.1SL", "SYZo")
register_concmd("amx_ips", "admin_ips", ADMIN_BAN)
register_clcmd("amx_ipl", "admin_ipl", ADMIN_BAN)
// register_concmd("amx_banip", "admin_banip", ADMIN_BAN, "<ip address | nick> [time]")
// register_concmd("amx_unbanip", "admin_unbanip", ADMIN_BAN,"<ip address>")
get_time("addons/amxx/logs/admin%m%d.log", logfilename, 255)
return PLUGIN_CONTINUE
}

ip_to_number(userip[17])
{
new ipb1[12]
new ipb2[12]
new ipb3[12]
new ipb4[12]
new ip
new nipb1
new nipb2
new nipb3
new nipb4
new uip[16]
copy(uip, 16, userip)
while(replace(uip, 16, ".", " ")){}
parse(uip, ipb1, 12, ipb2, 12, ipb3, 12, ipb4, 12)
nipb1 = strtonum(ipb1)
nipb2 = strtonum(ipb2)
nipb3 = strtonum(ipb3)
nipb4 = strtonum(ipb4)
ip = ((((nipb1 * 256) + nipb2) * 256) + nipb3) + ((((((nipb1 * 256) + nipb2) * 256) + nipb3) * 255) + nipb4)
return ip
}