Adultspammer ip blocker
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

Adultspammer ip blocker

Started by -RICK-, 14 May, 2006, 22:53:30

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

-RICK-

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

PPK

Czech users from this ISP ranges will like this script  ;D
"Most of you are familiar with the virtues of a programmer. There are three, of course: laziness, impatience, and hubris." - Larry Wall

bastya_elvtars

Indeed. Too much security?
Everything could have been anything else and it would have just as much meaning.

-RICK-

   =-=<>=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=<>=-=
       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 ;)

SMF spam blocked by CleanTalk