PtokaX forum

Archive => Archived 5.0 boards => Finished Scripts => Topic started by: -RICK- on 14 May, 2006, 22:53:30

Title: Adultspammer ip blocker
Post by: -RICK- on 14 May, 2006, 22:53:30
i blocked some ranges and no adult spam detected after that

-- ip blocker Adultspammers
-- by? -RICK-

sBot = frmHub:GetHubBotName()

ipAdultspammer = {
"86.49.211.0-86.49.211.255",?
"213.220.225.0-213.220.225.255",? ?
"62.24.72.0-62.24.72.255",
"86.124.64.0-86.124.127.255",? ?
"84.42.195.0-84.42.195.255",?
"62.24.84.0-62.24.84.255",?
"84.42.174.0-84.42.174.255",?
"89.102.198.0-89.102.198.255",?
"89.176.63.0-89.176.63.255",?
"62.141.25.0-62.141.25.255",
} --From-To end

function MyINFOArrival(user, data)
? ? if (IspChecker(user.sIP) == 1) then
? ? ? ? user:Ban()
? ? end
end


function IspChecker(IP)
? ? local accept = 0

? ? local s,e,ip1,ip2,ip3,ip4 = string.find(IP, "(%d+)%.(%d+)%.(%d+)%.(%d+)")
? ? local userIP = Addzero(ip1)..Addzero(ip2)..Addzero(ip3)..Addzero(ip4)
? ? userIP = tonumber(userIP)

? ? for i=1, table.getn(ipAdultspammer) do
? ? ? ? local s,e,a1,a2,a3,a4,b1,b2,b3,b4 = string.find(ipAdultspammer[i], "(%d+)%.(%d+)%.(%d+)%.(%d+)-(%d+)%.(%d+)%.(%d+)%.(%d+)")
? ? ? ? local aIP = Addzero(a1)..Addzero(a2)..Addzero(a3)..Addzero(a4)
? ? ? ? aIP = tonumber(aIP)
? ? ? ? local bIP = Addzero(b1)..Addzero(b2)..Addzero(b3)..Addzero(b4)
? ? ? ? bIP = tonumber(bIP)

? ? ? ? if (userIP >= aIP and userIP <= bIP) then
? ? ? ? ? ? accept = 1
? ? ? ? break
? ? ? ? end
? ? end
? ? return accept
end

function Addzero(number)
? ? iAux = tonumber(number)
? ? if (iAux < 10) then
? ? ? ? number = "00"..number
? ? elseif (iAux < 100) then
? ? ? ? number = "0"..number
? ? else
? ? ? ? number = number
? ? end
? ? return number
end
Title: Re: Adultspammer ip blocker
Post by: PPK on 15 May, 2006, 00:19:18
Czech users from this ISP ranges will like this script  ;D
Title: Re: Adultspammer ip blocker
Post by: bastya_elvtars on 15 May, 2006, 00:33:46
Indeed. Too much security?
Title: Re: Adultspammer ip blocker
Post by: -RICK- on 15 May, 2006, 11:14:07
   =-=<>=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=<>=-=
       Monday  15-05-2006    12:12:02
      Online time 0:weeks 4:days 3:hours 1:minutes
   =-=<>=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=<>=-=
      1720487       Total users
      78830       Different users
      4.6 %       New users
      290       Users minute
   =-=<>=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=<>=-=


and blocked 7 users so its not a big problem ;)