Search
 
 

Display results as :
 


Rechercher Advanced Search

Web Applications
install Joomla Wordpress Phpbb Drupal FluxBB PunBB osCommerce simple-machines MYBB moodle vBulletin Dolphin-v.7.1.1 PHPNUKE XOOPS
Services
install BorkNet Services X3 Services Anope Atheme Services Srvx IRC Srervices
IRCD
install Snircd IRCU INSPIRCD UNREAL Nefarious Bircd Bahamut Asuka Charybdis
TCL SCRIPT
TCL SCRIPT FOR EGGDROP Allprotection4.7 Antiproxy
Bots
Bots install FishBot bobot++ Eggdrop janus Omega Security Services Botnix Bopm SupyBot PyLink Hopm
Keywords

Latest topics
October 2017
MonTueWedThuFriSatSun
      1
2345678
9101112131415
16171819202122
23242526272829
3031     

Calendar Calendar

Affiliates
free forum

Affiliates
free forum


botnet protection

View previous topic View next topic Go down

botnet protection

Post  Admin on Fri Aug 19, 2011 6:44 am

נבנה על ידי Or
הגנה נגד בוטנטים מציפים
Code:

on *:snotice:*Client connecting*:{
  var %reg = $server $+ $(|) $+ $network $+ $(|) $+ $serverip
  if (!$read(serlist.txt,r,%reg)) { return }
  var %ip = $iif($regex($10,/(\d+\.\d+\.\d+\.\d+)/),$regml(1),1)
  if (%B.Pro) {
    if (!$hget(Botnet,$9)) { hadd -mu [ $+ [ %E.SecB ] ] Botnet $9 %ip }
    if ($hget(Botnet,0).item >= %E.LimB) {
      var %x 1
      while ($hget(Botnet,%x).item) {
        dll WhileFix.dll WhileFix .
        gline $ifmatch - :Abuse - Botnets Flood!
        hdel -w Botnet $ifmatch     
        inc %x
      }
    }
  }
  if (%P.Pro) { set %P.Who. [ $+ [ $9 ] ] 1 | whois $9 }
}
 
alias proxy {
  if (!$sock(proxy1)) { set %site /index.php?s=c9939a9801d4c5d6ab176f4376120e11&pageid=socks5proxylist | sockopen proxy1 www.proxyfire.net 80 }
}
 
on *:sockopen:proxy*:{
  if ($sockerr) { return }
  var %a = sockwrite -nt $sockname
  %a GET %site HTTP/1.0
  %a Host: www.proxyfire.net
  %a Connection: keep-alive
  %a Accept: */*
  %a User-Agent: Mozilla/4.0 (compatible; MSIE 5.00; Windows 98)
  %a
}
 
on *:sockread:proxy*:{
  var %data
  sockread -f %data
  if ($sockerr) { return }
  if ($regex(%data,/<td>(\d+\.\d+\.\d+\.\d+)&#\d+;</td>/)) && (%C.Sypx) {
    if (!$read(proxy.txt,w,$regml(1))) { write proxy.txt $regml(1) }
  }
  if ($regex(%data,/<td>(\d+)</td>/)) && (%C.Sypo) {
    if (!$read(port.txt,w,$regml(1))) { write port.txt $regml(1) }
  }
}
 
on *:sockclose:proxy*:{
  if ($dialog(proxy)) {
    did -r proxy 1,8
    filter -fo proxy.txt proxy 1
    filter -fo port.txt proxy 8
  }
  if (!$sock(proxy2)) { set %site /index.php?s=c9939a9801d4c5d6ab176f4376120e11&pageid=socks4proxylist | sockopen proxy2 www.proxyfire.net 80 }
}
 
dialog proxy {
  title "Protection Proxy / Botnets"
  size -1 -1 163 205
  option dbu notheme
  combo 1, 5 20 69 102, size
  button "Add", 2, 5 8 31 10, flat
  button "Del", 3, 43 8 31 10, flat
  check "Auto Sync Proxy List Online every", 4, 4 132 92 10
  text "min", 6, 110 134 12 8
  box "Proxy's Ip List", 9, 1 0 79 125
  box "Proxy's Port List", 10, 82 0 79 125
  combo 8, 86 20 69 102, size
  button "Add", 11, 86 8 31 10, flat
  button "Del", 12, 124 8 31 10, flat
  text "min", 15, 110 144 12 8
  check "Auto  Sync Port  List  Online every", 16, 4 143 91 10
  text "Limit Botnets until", 18, 4 177 43 8
  edit "", 19, 47 176 13 10
  text "in", 20, 61 177 5 8
  edit "", 21, 66 176 13 10
  text "Secs", 22, 80 177 11 8
  edit "", 5, 96 133 13 10
  edit "", 14, 96 143 13 10
  box "Proxy Options", 17, 1 125 160 42
  check "Enable Proxy Protection", 23, 4 154 76 10
  box "Botnets Options", 24, 1 167 160 35
  check "Enable Botnet Protection", 25, 4 188 76 10
  button "Exit", 26, 125 187 32 11, flat, cancel
  button "Servers", 27, 125 152 32 11, flat
}
 
on *:dialog:proxy:init:0:{
  filter -fo proxy.txt $dname 1
  filter -fo port.txt $dname 8
  if (%P.Pro) { did -c $dname 23 }
  else { did -b $dname 4-6,14-16 }
  if (%B.Pro) { did -c $dname 25 }
  else { did -b $dname 18-22 }
  if (%C.Sypx) { did -c $dname 4 }
  if (%C.Sypo) { did -c $dname 16 }
  if (%E.Sypx) { did -ra $dname 5 %E.Sypx }
  else { did -ra $dname 5 60 | set %E.Sypx 60 }
  if (%E.Sypo) { did -ra $dname 14 %E.Sypo }
  else { did -ra $dname 14 60 | set %E.Sypo 60 }
  if (%E.LimB) { did -ra $dname 19 %E.LimB }
  else { did -ra $dname 19 4 | set %E.LimB 4 }
  if (%E.SecB) { did -ra $dname 21 %E.SecB }
  else { did -ra $dname 21 3 | set %E.SecB 3 }
}
 
on *:dialog:proxy:sclick:*:{
  if ($did == 23) {
    set %P.Pro $iif($did(23).state,1,$null)
    did $iif(%P.Pro,-e,-b) $dname 4-6,14-16
  }
  elseif ($did == 25) {
    set %B.Pro $iif($did(25).state,1,$null)
    did $iif(%B.Pro,-e,-b) $dname 18-22
  }
  elseif ($did == 4) {
    if ($did(4).state) {
      set %C.Sypx 1
      .timerC.Sypx 0 $calc(60 * %E.Sypx) proxy
    }
    else { set %C.Sypx $null | .timerC.Sypx off }
  }
  elseif ($did == 16) {
    if ($did(16).state) {
      set %C.Sypo 1
      .timerC.Sypo 0 $calc(60 * %E.Sypo) proxy
    }
    else { set %C.Sypo $null | .timerC.Sypo off }
  }
  elseif ($did == 2) {
    if ($did(1)) && (!$read(proxy.txt,w,$did(1))) { did -a $dname 1 $did(1) | write proxy.txt $did(1) | did -c $dname 1 $did(1).lines }
  }
  elseif ($did == 3) {
    if ($did(1)) && ($read(proxy.txt,w,$did(1))) { did -d $dname 1 $didwm($dname,1,$did(1)) | write -dl [ $+ [ $readn ] ] proxy.txt }
  }
  elseif ($did == 11) {
    if ($did(8)) && (!$read(port.txt,w,$did(8))) { did -a $dname 8 $did(8) | write port.txt $did(8) | did -c $dname 8 $did(8).lines }
  }
  elseif ($did == 12) {
    if ($did(8)) && ($read(port.txt,w,$did(8))) { did -d $dname 8 $didwm($dname,8,$did(8)) | write -dl [ $+ [ $readn ] ] port.txt }
  }
  elseif ($did == 27) {
    dialog -i $dname $dname
    if (!$dialog(serlist)) { dialog -m serlist serlist }
  }
}
 
on *:dialog:proxy:edit:*:{
  if ($did == 5) { set %E.Sypx $did(5) | .timerC.Sypx 0 $calc(60 * %E.Sypx) proxy }
  elseif ($did == 14) { set %E.Sypo $did(14) | .timerC.Sypo 0 $calc(60 * %E.Sypo) proxy }
  elseif ($did == 19) { set %E.LimB $did(19) }
  elseif ($did == 21) { set %E.SecB $did(21) }
}
 
dialog serlist {
  title "Servers List"
  size -1 -1 80 147
  option dbu notheme
  combo 1, 3 17 71 79, size
  button "Add", 2, 4 4 33 10, flat
  button "Del", 3, 40 4 33 10, flat
  box "", 4, 1 -2 77 101
  button "Close", 5, 22 135 33 10, flat cancel
  text "servers masks examples:", 6, 5 102 69 8, disable center
  text "0.0.0.0", 7, 5 110 69 7, disable center
  text "irc.network.co.il", 8, 5 117 69 7, disable center
  text "network", 9, 5 124 69 7, disable center
  box "", 10, 1 96 77 38
}
 
on *:dialog:serlist:init:0:{
  filter -fo serlist.txt $dname 1
}
 
on *:dialog:serlist:sclick:*:{
  if ($did == 2) {
    if ($did(1)) && (!$read(serlist.txt,w,$did(1))) { did -a $dname 1 $did(1) | write serlist.txt $did(1) | did -c $dname 1 $did(1).lines }
  }
  elseif ($did == 3) {
    if ($did(1)) && ($read(serlist.txt,w,$did(1))) { did -d $dname 1 $didwm($dname,1,$did(1)) | write -dl [ $+ [ $readn ] ] serlist.txt }
  }
}
 
menu * {
  .Botnets/Proxy Protecion:{ if (!$dialog(proxy)) { dialog -md proxy proxy } }
}
 
raw 378:*:{
  if (%P.Who. [ $+ [ $2 ] ]) {
    if ($read(proxy.txt,w,$7)) { gline *@ $+ $7 - :Abuse - Proxy Protection! }
    unset %P.Who. [ $+ [ $2 ] ]
  }
}
avatar
Admin
Admin

מספר הודעות : 268
Join date : 2009-09-12
Age : 37
מיקום : mIRCX IRC Network

View user profile http://mircx.forumotion.net

Back to top Go down

Re: botnet protection

Post  Admin on Tue Aug 23, 2011 7:54 am

Code:

 on *:join:#:{
  if ($network != KILLZONE) { return }
  if (!$hget(Botnet,$nick)) { hadd -mu4 Botnet $nick $wildsite }
  if ($hget(Botnet,0).item >= 3) {
    var %x 1
    while ($hget(Botnet,%x).item) {
      dll WhileFix.dll WhileFix .
      ban -k # $ifmatch Abuse - Botnets Flood!
      hdel -w Botnet $ifmatch     
      inc %x
    }
  }
}
נעשה על ידי אור מנהל המירקס
avatar
Admin
Admin

מספר הודעות : 268
Join date : 2009-09-12
Age : 37
מיקום : mIRCX IRC Network

View user profile http://mircx.forumotion.net

Back to top Go down

מעודכן יותר על ידי אור בתאריך 12.9.2011

Post  Admin on Mon Sep 12, 2011 9:15 pm

Code:

on *:snotice:*Client connecting*:{
  var %reg = $server $+ $(|) $+ $network $+ $(|) $+ $serverip
  if (!$read(serlist.txt,r,%reg)) { return }
  if (%P.Pro) { set %P.Who. [ $+ [ $9 ] ] 1 | whois $9 }
}
 
 
alias proxy {
  if (!$sock(proxy1)) { set %site /index.php?s=c9939a9801d4c5d6ab176f4376120e11&pageid=socks5proxylist | sockopen proxy1 www.proxyfire.net 80 }
}
 
on *:sockopen:proxy*:{
  if ($sockerr) { return }
  var %a = sockwrite -nt $sockname
  %a GET %site HTTP/1.0
  %a Host: www.proxyfire.net
  %a Connection: keep-alive
  %a Accept: */*
  %a User-Agent: Mozilla/4.0 (compatible; MSIE 5.00; Windows 98)
  %a
  remproxy
}
 
on *:sockread:proxy*:{
  var %data
  sockread -f %data
  if ($sockerr) { return }
  if ($regex(%data,/<td>(\d+\.\d+\.\d+\.\d+)&#\d+;</td>/)) && (%C.Sypx) {
    if (!$read(proxy.txt,w,$regml(1))) { write proxy.txt $regml(1) }
  }
  if ($regex(%data,/<td>(\d+)</td>/)) && (%C.Sypo) {
    if (!$read(port.txt,w,$regml(1))) { write port.txt $regml(1) }
  }
}
 
on *:sockclose:proxy*:{
  if ($dialog(proxy)) {
    did -r proxy 1,8
    filter -fo proxy.txt proxy 1
    filter -fo port.txt proxy 8
  }
  if (!$sock(proxy2)) { set %site /index.php?s=c9939a9801d4c5d6ab176f4376120e11&pageid=socks4proxylist | sockopen proxy2 www.proxyfire.net 80 }
}
 
 
dialog proxy {
  title "Protection Proxy / Botnets"
  size -1 -1 163 205
  option dbu notheme
  combo 1, 5 20 69 102, size
  button "Add", 2, 5 8 31 10, flat
  button "Del", 3, 43 8 31 10, flat
  check "Auto Sync Proxy List Online every", 4, 4 132 92 10
  text "min", 6, 110 134 12 8
  box "Proxy's Ip List", 9, 1 0 79 125
  box "Proxy's Port List", 10, 82 0 79 125
  combo 8, 86 20 69 102, size
  button "Add", 11, 86 8 31 10, flat
  button "Del", 12, 124 8 31 10, flat
  text "min", 15, 110 144 12 8
  check "Auto  Sync Port  List  Online every", 16, 4 143 91 10
  text "Limit Botnets until", 18, 4 177 43 8
  edit "", 19, 47 176 13 10
  text "in", 20, 61 177 5 8
  edit "", 21, 66 176 13 10
  text "Secs", 22, 80 177 11 8
  edit "", 5, 96 133 13 10
  edit "", 14, 96 143 13 10
  box "Proxy Options", 17, 1 125 160 42
  check "Enable Proxy Protection", 23, 4 154 76 10
  box "Botnets Options", 24, 1 167 160 35
  check "Enable Botnet Protection", 25, 4 188 76 10
  button "Exit", 26, 125 187 32 11, flat, cancel
  button "Servers", 27, 125 152 32 11, flat
}
 
on *:dialog:proxy:init:0:{
  filter -fo proxy.txt $dname 1
  filter -fo port.txt $dname 8
  if (%P.Pro) { did -c $dname 23 }
  else { did -b $dname 4-6,14-16 }
  if (%B.Pro) { did -c $dname 25 }
  else { did -b $dname 18-22 }
  if (%C.Sypx) { did -c $dname 4 }
  if (%C.Sypo) { did -c $dname 16 }
  if (%E.Sypx) { did -ra $dname 5 %E.Sypx }
  else { did -ra $dname 5 60 | set %E.Sypx 60 | profire | proxy }
  if (%E.Sypo) { did -ra $dname 14 %E.Sypo }
  else { did -ra $dname 14 60 | set %E.Sypo 60 }
  if (%E.LimB) { did -ra $dname 19 %E.LimB }
  else { did -ra $dname 19 4 | set %E.LimB 4 }
  if (%E.SecB) { did -ra $dname 21 %E.SecB }
  else { did -ra $dname 21 3 | set %E.SecB 3 }
}
 
on *:dialog:proxy:sclick:*:{
  if ($did == 23) {
    set %P.Pro $iif($did(23).state,1,$null)
    did $iif(%P.Pro,-e,-b) $dname 4-6,14-16
  }
  elseif ($did == 25) {
    set %B.Pro $iif($did(25).state,1,$null)
    did $iif(%B.Pro,-e,-b) $dname 18-22
  }
  elseif ($did == 4) {
    if ($did(4).state) {
      set %C.Sypx 1
      .timerC.Sypx 0 $calc(60 * %E.Sypx) profire $(|) proxy
    }
    else { set %C.Sypx $null | .timerC.Sypx off }
  }
  elseif ($did == 16) {
    if ($did(16).state) {
      set %C.Sypo 1
      .timerC.Sypo 0 $calc(60 * %E.Sypo) profire $(|) proxy
    }
    else { set %C.Sypo $null | .timerC.Sypo off }
  }
  elseif ($did == 2) {
    if ($did(1)) && (!$read(proxy.txt,w,$did(1))) { did -a $dname 1 $did(1) | write proxy.txt $did(1) | did -c $dname 1 $did(1).lines }
  }
  elseif ($did == 3) {
    if ($did(1)) && ($read(proxy.txt,w,$did(1))) { did -d $dname 1 $didwm($dname,1,$did(1)) | write -dl [ $+ [ $readn ] ] proxy.txt }
  }
  elseif ($did == 11) {
    if ($did(8)) && (!$read(port.txt,w,$did(8))) { did -a $dname 8 $did(8) | write port.txt $did(8) | did -c $dname 8 $did(8).lines }
  }
  elseif ($did == 12) {
    if ($did(8)) && ($read(port.txt,w,$did(8))) { did -d $dname 8 $didwm($dname,8,$did(8)) | write -dl [ $+ [ $readn ] ] port.txt }
  }
  elseif ($did == 27) {
    dialog -i $dname $dname
    if (!$dialog(serlist)) { dialog -m serlist serlist }
  }
}
 
on *:dialog:proxy:edit:*:{
  if ($did == 5) { set %E.Sypx $did(5) | .timerC.Sypx 0 $calc(60 * %E.Sypx) profire $(|) proxy }
  elseif ($did == 14) { set %E.Sypo $did(14) | .timerC.Sypo 0 $calc(60 * %E.Sypo) profire $(|) proxy }
  elseif ($did == 19) { set %E.LimB $did(19) }
  elseif ($did == 21) { set %E.SecB $did(21) }
}
 
dialog serlist {
  title "Servers List"
  size -1 -1 80 147
  option dbu notheme
  combo 1, 3 17 71 79, size
  button "Add", 2, 4 4 33 10, flat
  button "Del", 3, 40 4 33 10, flat
  box "", 4, 1 -2 77 101
  button "Close", 5, 22 135 33 10, flat cancel
  text "servers masks examples:", 6, 5 102 69 8, disable center
  text "0.0.0.0", 7, 5 110 69 7, disable center
  text "irc.network.co.il", 8, 5 117 69 7, disable center
  text "network", 9, 5 124 69 7, disable center
  box "", 10, 1 96 77 38
}
 
on *:dialog:serlist:init:0:{
  filter -fo serlist.txt $dname 1
}
 
on *:dialog:serlist:sclick:*:{
  if ($did == 2) {
    if ($did(1)) && (!$read(serlist.txt,w,$did(1))) { did -a $dname 1 $did(1) | write serlist.txt $did(1) | did -c $dname 1 $did(1).lines }
  }
  elseif ($did == 3) {
    if ($did(1)) && ($read(serlist.txt,w,$did(1))) { did -d $dname 1 $didwm($dname,1,$did(1)) | write -dl [ $+ [ $readn ] ] serlist.txt }
  }
}
 
menu * {
  .Botnets/Proxy Protecion:{ if (!$dialog(proxy)) { dialog -md proxy proxy } }
}
 
raw 378:*:{
  if (%P.Who. [ $+ [ $2 ] ]) {
    if ($read(proxy.txt,w,$7)) { gline *@ $+ $7 - :Abuse - Proxy Protection! }
    unset %P.Who. [ $+ [ $2 ] ]
  }
}
 
alias profire {
  set %proPage /?page=1
  sockopen profire1 www.freeproxylists.net 80
}
 
on *:sockopen:profire*:{
  if ($sockerr) { return }
  var %a = sockwrite -nt $sockname
  %a GET %proPage HTTP/1.0
  %a Host: www.freeproxylists.net
  %a Connection: keep-alive
  %a Accept: */*
  %a User-Agent: Mozilla/4.0 (compatible; MSIE 5.00; Windows 98)
  %a
  remproxy
}
 
on *:sockread:profire*:{
  var %data
  if ($sockerr) { return }
  sockread -f %data
  if ($regex(%data,/<td>(\d+\.\d+\.\d+\.\d+)<\/td>/g)) {
    var %x 1
    while (%x <= $regml(0)) {
      if (!$read(proxy.txt,w,$regml(%x))) { write proxy.txt $regml(%x) }
      inc %x
    }
  }
}
 
on *:sockclose:profire*:{
  var %i 1
  while (%i <= 56) {
    if ($sockname == profire [ $+ [ %i ] ] && !$sock(profire [ $+ [ $calc(%i +1) ] ])) { set %proPage /?page= [ $+ [ $calc(%i +1) ] ] | sockopen profire [ $+ [ $calc(%i +1) ] ] www.freeproxylists.net 80 }
    inc %i
  }
  if ($dialog(proxy)) {
    did -r proxy 1,8
    filter -fo proxy.txt proxy 1
    filter -fo port.txt proxy 8
  }
  if ($sockname == profire56) {
    set %proPage /?c=EG&pt=&pr=&a[]=0&a[]=1&a[]=2&u=0
    sockopen profireEG www.freeproxylists.net 80
  }
}
 
alias remproxy {
  if ($lines(proxy.txt) >= 7000) {
    var %x = $lines(proxy.txt),%i 1
    while (%i < 100) {
      write -dl [ $+ [ %x ] ] proxy.txt
      dec %x
      inc %i
    }
  }
}
avatar
Admin
Admin

מספר הודעות : 268
Join date : 2009-09-12
Age : 37
מיקום : mIRCX IRC Network

View user profile http://mircx.forumotion.net

Back to top Go down

Re: botnet protection

Post  Sponsored content


Sponsored content


Back to top Go down

View previous topic View next topic Back to top

- Similar topics

 
Permissions in this forum:
You cannot reply to topics in this forum