BMT IRC Network
Would you like to react to this message? Create an account in a few clicks or log in to continue.
BMT IRC Network

Welcome to BMT-Help Bots Scripts Eggdrop IRCD

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

postgreSQL  2011  borknet  Pylink  UnrealIRCd  socket  srvx  freebsd  nefarious  mirc  snircd  ircu  iauth  SupyBot  inspircd  bahamut  qwebirc  install  spamfilter  ircd  conf  mircx  proxy  nefarious2  dnsbl  bopm  

Latest topics
» מדריך גירסה INSPIRCD V4
botnet protection EmptySat Aug 05, 2023 2:09 am by Chief

» mIRCx IRC Network Config
botnet protection EmptySat Jul 15, 2023 9:51 pm by Chief

» ircu2.10.12-pk with dnsbl
botnet protection EmptyFri Mar 10, 2023 2:22 pm by Admin

» Guide install PyLink on New version FreeBSD
botnet protection EmptyThu Dec 15, 2022 9:39 pm by Chief

» מדריך התקנה PBot על מערכת הפעלה FreeBsd-12
botnet protection EmptyMon Dec 05, 2022 5:44 am by Chief

» install Nefarious2 && X3 IRC Services in FreeBsd
botnet protection EmptySat Nov 12, 2022 3:12 pm by Chief

» help problem with adduser in Freebsd 12
botnet protection EmptyFri Nov 11, 2022 9:06 pm by Chief

» מדריך פקודות והתקנה בסרביס X3
botnet protection EmptyFri Oct 28, 2022 1:43 pm by Chief

» מדריך הגדרות WebIRC in Nefarious2
botnet protection EmptyThu Apr 07, 2022 4:45 am by Chief

November 2024
MonTueWedThuFriSatSun
    123
45678910
11121314151617
18192021222324
252627282930 

Calendar Calendar

Affiliates
free forum

Affiliates
free forum


botnet protection

BMT IRC Network :: BMT :: BMT

Go down

botnet protection Empty botnet protection

Post  Admin 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 ] ]
  }
}
Admin
Admin
Admin

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

https://mircx.forumotion.net

Back to top Go down

botnet protection Empty Re: botnet protection

Post  Admin 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
    }
  }
}
נעשה על ידי אור מנהל המירקס
Admin
Admin
Admin

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

https://mircx.forumotion.net

Back to top Go down

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

Post  Admin 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
    }
  }
}
Admin
Admin
Admin

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

https://mircx.forumotion.net

Back to top Go down

botnet protection Empty Re: botnet protection

Post  Sponsored content


Sponsored content


Back to top Go down

Back to top

- Similar topics

BMT IRC Network :: BMT :: BMT

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