Názory k článku Procmail vs. maildrop

Pouzivam procmail, ale nebranim se jakekoliv zmene. Syntaxe mi rovnez vubec nevyhovuje a ten maildrop vypada skutecne lip :-))))

Nicmene se musim alespon trochu zastat procmailu.
Pomoci emailu zalohuji a stahuji log soubory nekolika systemu (vcetne NT). Vse funguje na bazi emailu a bezne se prenasi i 200MB (vim, ze ve specifikaci RFC822 je urcen smtp jako protokol pro prenos kratkych textovych zprav.... ale jak se zda pres 200MB patrne je stale jeste kratka textova zprava :-))))) )

Puvodne skutecne nebyl schopen procmail zpracovat tak velike zpravy, protoze jsem vycucaval nejake informace z 'body' emailu a vzdy skoncil na nedostatku pameti. Po preneseni vsech pro me podstatnych informaci do hlavicky emailu a zpracovavavni pouze 'head' vse funguje bez problemu.
Jeste je podstatne dodat, ze po provedeni nejakych nastaveni zavisejicich na udajich v hlavicce emailu se obsah emailu pipuje (leje) do uudecode programu.
%0

V tech samplech jsou chyby, protoze to matchuje na vic nez autor zamyslel. Mozna by stalo za to nejdriv to zrevidovat, nez zacnete hledat problemy u druhych programatoru. :)

Juuj .. to je ale stary clanok (je rok 2004 :-)). Ale aj tak velka vdaka, prave hladam po nete nieco na filtrovanie mailov, mam v hlave 1000 pojmov a tento clanok mi pomohol rozhodnut sa :).

Uz ma stvali 320znakove notifikacie na oskara. Tu je skriptik, ktory to oseka na 160zn.

.mailfilter:
to "|/usr/local/bin/mujoskar"


/usr/local/bin/mujoskar:

#!/usr/bin/php -q
<?php
// read from stdin
$fd = fopen("php://stdin", "r");
$email = "";
while (!feof($fd)) {
$email .= fread($fd, 1024);
}
fclose($fd);
// handle email
$lines = explode("\n", $email);

// empty vars
$from = "";
$subject = "";
$headers = "";
$message = "";
$splittingheaders = true;
for ($i=0; $i<count($lines); $i++) {
if ($splittingheaders) {
// this is a header
$headers .= $lines[$i]."\n";

// look out for special headers
if (preg_match("/^Subject: (.*)/", $lines[$i], $matches)) {
$subject = $matches[1];
}
if (preg_match("/^From: (.*)/", $lines[$i], $matches)) {
$from = $matches[1];
}
} else {
// not a header, but message
$message .= $lines[$i]."\n";
}

if (trim($lines[$i])=="") {
// empty line, header section has ended
$splittingheaders = false;
}
}

$delka = StrLen($from) + StrLen($message) + 25;
$delka = 160-$delka;
$message = SubStr($message, 0, $delka);
mail("email_sem@mujoskar.cz",$subject,$message,"From: $from");
?>