Дополнение. Анонимная рассылка корреспонденции

Создан& 626c22g #1080;е скрипта, отправляющего сообщения

SMTP IP IP

proxy proxy

Internet

Perl /SRC/smtp.pl"). Подробное объяснение ее работы выходит за рамки дан& 626c22g #1085;ой книги, однако, структура программы достаточна проста, чтобы в ней мог разобраться даже неподготовленный читатель.

use Socket;

my($mailFrom) = 'KPNC@APORT.RU';

my($MailTo) = 'KPNC@APORT.RU';

socket(SMTP, PF_INET(), SOCK_STREAM(), 6);

connect(SMTP,sockaddr_in(25,inet_aton("mail.aport.ru")));

recv(SMTP, $buffer, 200, 0);

print "$buffer\n";

send(SMTP, "HELO kpnc\n",0);

print ">HELO\n";

my($buffer) = @_;

recv(SMTP, $buffer, 200, 0);

print "$buffer\n";

send(SMTP, "MAIL FROM: <$mailFrom>\n",0);

print ">MAIL FROM:<$mailFrom>\n";

recv(SMTP, $buffer, 200, 0);

print "$buffer\n";

send(SMTP, "RCPT TO: <$MailTo>\n",0);

print ">RCPT TO: <$MailTo>\n";

recv(SMTP, $buffer, 200, 0);

print "$buffer\n";

send(SMTP, "DATA\n",0);

print ">DATA\n";

recv(SMTP, $buffer, 200, 0);

print "$buffer\n";

send(SMTP, "From: Kris Kaspersky\n", 0);

print ">From: Kris Kaspersky";

print "<BR>\n\n";

send(SMTP, "Subject: Test\n", 0);

print ">Subject: Test\n";

send(SMTP, "Hello, KPNC!\n", 0);

print ">Hello, KPNC!\n";

send(SMTP, "\r\n.\r\n",0);

print "\r\n.\r\n";

recv(SMTP, $buffer, 200, 0);

print "$buffer\n";

send(SMTP, "QUIT\n",0);

print ">QUIT\n";

recv(SMTP, $buffer, 200, 0);

print "$buffer\n";

close(SMTP);

.

telnet Perl hobbiton.org

ftp telnet-сессии проще всего так: "perl имяфайла.pl". (Для запуска скрипта по протоколу HTTP HTTP

Для облегчения понимания этот пример не имеет никаких изменяемых настоек и все дан& 626c22g #1085;ые прописаны непосредственно в теле программы. Однако это не законченная программа, а всего лишь макет, демонстрирующий принципиальную возможность анонимной отправки корреспонденции.

kpnc aport ru :

From kpnc@aport.ru Mon Jun 05 11:51:53 2000

Received: from hobbiton.org ([216.161.239.42] helo=kpnc)

by hearst.mail.ru with smtp (Exim 3.14 #3)

id 12yrfs-000KGD-00

for KPNC@APORT.RU; Mon, 05 Jun 2000 11:51:53 +0400

From: Kris Kaspersky

Subject: Test

Message-Id: <E12yrfs-000KGD-00@hearst.mail.ru>

Date: Mon, 05 Jun 2000 11:51:53 +0400

IP , выполнившего скрипт, но нет никакой информации об (за исключением дан& 626c22g #1085;ых, которые он пожелал оставить сам). Таким образом, можно построить собственный анонимайзер, позволяющий его создателю (а, возможно, и другим пользователям) рассылать анонимные сообщения.

.

IP hobbiton.org . Или можно задействовать несколько десятков узлов, последовательно пересылая скрипт (или команду на его выполнение) от машины к машине. Если хотя бы один из узлов этой цепочки не регистрирует всех подключений, то установить отправителя будет невозможно. Некоторые приемы позволяют подделать содержимое IP

Received», например, так "Received: from mail.pets.ja" smtp pl smtp pl

send(SMTP, "Received: from mail.pets.ja\n", 0);

print ">Received: from mail.pets.ja";

From kpnc@aport.ru Thu Apr 06 10:57:30 2000

Received: from [209.143.154.93] (helo=kpnc)

by camel.mail.ru with smtp (Exim 3.02 #107)

id 12d6EL-000NmZ-00

for KPNC@APORT.RU; Thu, 06 Apr 2000 10:57:30 +0400

Received: from mail.pets.ja

From: Kris Kaspersky

Subject: Test

Message-Id: <E12d6EL-000NmZ-00@camel.mail.ru>

Bcc:

Date: Thu, 06 Apr 2000 10:57:30 +0400

mail pets ja SMTP Received

Received

Received

From owner-sf-news@securityfocus.com Wed Sep 06 03:00:03 2000

Received: from lists.securityfocus.com ([207.126.127.68])

by hearst.mail.ru with esmtp (Exim 3.14 #4)

id 13WRh6-000LBx-00; Wed, 06 Sep 2000 02:59:57 +0400

Received: from lists.securityfocus.com (lists.securityfocus.com [207.126.127.68])

by lists.securityfocus.com (Postfix) with ESMTP

id E62DC1EF74; Tue, 5 Sep 2000 15:58:34 -0700 (PDT)

Received: from LISTS.SECURITYFOCUS.COM by LISTS.SECURITYFOCUS.COM

(LISTSERV-TCP/IP release 1.8d) with spool id 13121453 for

SF-NEWS@LISTS.SECURITYFOCUS.COM; Tue, 5 Sep 2000 15:58:31 -0700

Approved-By: se@SECURITYFOCUS.COM