$owner ! @o `j s /etc/exim.pl ]o ! p `j G ! p i Hp ! Hp hp F# ) p i p hp ! p p E ! 8p HG! p ) p i 8p p ! p p I ) 8p p i p p ! p p D ) Pp Pp
% KE Xp p A p p ~ C p p G main ) xp i Xp p ! (p S $homedir main medir ! xp `j P ! p i p /etc/exim.pl ers -m A `o `o ~ p o p L ]o ! p p j J r" ! p p O# ! 8p 8p N ! p
QG! p ) (p i p @p ! @p @p R ) p p i p xp ! Xp xp M ) p p % TE p p A p (p ~ L pp p H /etc/exim.pl main /etc/exim.pl p ! p _ $passwd ! H.p H.p j R ) 4p 4p ` $ E p H.p $'m /etc/exim.pl ^o $'m main $'m d^o ) Pp ` B ]F (p p ! `o u $headers ) pp i C p xp ! `p xp i ) p i Pp p $spamkey main ! p p W /etc/ /passwd ! p j H X ) p p ` B Y `p p ! (p Z ! xp j I \ ) p p ` B [F p p ! p p ^ ) Pp p i p p ! `p p V ) 0p 0p % `E pp p A p p ~ U Pp p I ) p i p Hp ! p e $addressexists ! p j c ! Hp Hp d ) p p i p p ! p p b ) 8p 8p % fE p p A p p ~ a p pp J /etc/exim.pl ) `p i @p p ! p n main amkey ! `p `j k ! p i p ! p p j# ! p p i ! p lG! p ) p i p p ! p p m ) p p i p `p ! @p `p h ) p p % oE p p A p p ~ g p xp K /etc/exim.pl v v v my $homedir = shift;
if ($p 6m yhil p ${homedir} . '/.spamassassinquotatest') {
P p if ($waittime == 60) { last; }
p $waittime++;
sleep(1);
p my $pid;
if (!($pid = fork()) p umask(0002);
&setuid p wner);
open(QUOTATEST,">${homedi@ p spamassassinquotatest");
print Qp p TEST " " x 4096;
close(QUOTATEST p exit();
}
waitpid p d,0);
if (!((stat("${homedir}/.spama p sinquotatest"))[7] == 4096)) {
u0 p k("${homedir}/.spamassassinquotatest");
` p return 0;
}
unlink("${ho p r}/.spamassassinquotatest");
}
retur p
}
1;
$loop_count++;
p }
my $mtime = ( p ($lockfile) )[9];
if ( !P p me || $mtime == $omtime ) {
p unlink $lockfile;
p aittime = 0;
}
p }
}
if ( $waitti p & $omtime ) { # $waittime%" alt=""/>
 |
G. Davies & Associates 15-6400 Millcreek Drive, Suite 322 Mississauga, Ontario L5N 3E7
Tel: 905-495-9530 Fax: 905-495-9532 Toll Free: 1-877-440-0898 (Canada/USA)
gdavies@rogers.com
|