Re: [Sysadmins] что это может быть?

[Sergey]

On Thursday 05 October 2006 14:34, Grigory Fateyev wrote:

>  Как вычислить что за скрипт спамит? И как лучше это
> предотвратить?

подменить sendmail на что-то вроде

#!/usr/bin/perl

use Env;
my $date = `export LANG=C && date`;

chomp $date;
my $uid = $>;
my @info = getpwuid($uid);

system "logger -i -t spamcontrol '$date\: Directory\: $PWD\, info\: @info\, 
args\: @ARGV'";

my $mailprog = '/usr/sbin/sendmail.bla-bla-bla';

foreach (@ARGV) {
    $arg="$arg" . " $_";
}


open (MAIL,"|$mailprog $arg") || die "cannot open $mailprog: $!n";

print MAIL "X-Abuse-MTA-Caller-Dir: running from $PWD\n";
print MAIL "X-Abuse-To:";

while (<STDIN>) {
        print MAIL;
}

close (MAIL);
 
и на www.dedic.ru посмотреть примерно то же самое для php. Только оно что-то не
открывается. Вот ещё: 
http://www.lancs.ac.uk/~steveb/patches/php-mail-header-patch/

-- 
С уважением, Сергей
[EMAIL PROTECTED]
_______________________________________________
Sysadmins mailing list
Sysadmins@lists.altlinux.org
https://lists.altlinux.org/mailman/listinfo/sysadmins