On Mon, Oct 06, 2003 at 07:05:12PM +0300, Pavel Gulchouck wrote: PG> Hi! PG>On Mon, Oct 06, 2003 at 06:30:22PM +0300, Victor Forsyuk writes: PG>> > > VNG> Не подскажете, как в sendmail'е разрешить релеинг для доменов, у PG>> > > VNG> которых все более приоритетные mx'ы находятся в определенном наборе PG>> > > VNG> сетей? PG>> > > VNG> Т.е. я хочу сделать smart relay, для всех моих сетей, чтобы PG>> > > VNG> не прописывать каждый домен по отдельности. PG>> PG>> > Заодно: а подобное для exim'а есть? PG>> PG>> Есть. И выглядит вполне по-человечески :) PG>Мне в exim-users ответили, что такого нету, после чего пришлось PG>наваять следующий acl: жуть perl_startup = do '/etc/exim/funcs1.pl' domainlist relay_to_domains = @mx_secondary acl_check_rcpt: ... accept domains = +relay_to_domains endpass message = Unauthorized backup MX for @$domain not permitted. log_message = Unauthorized backup MX for @$domain condition = ${lookup{${perl{bestmx}{${lookup dnsdb{mx=$domain}}}}} dbm {/etc/exim/backup_mx.db} {yes}{no}} cat funcs1.pl #!/usr/bin/perl sub bestmx { if(not defined($_)) { return(undef); } else { my($mxs)=shift; my($res)='not found'; my($bmx)=9999999999; my($prec,$line); foreach $mx (split(/\n/m,$mxs)) { ($prec,$line)=split(/\s+/,$mx); if($prec < $bmx) { $res=$line; $bmx=$prec; } } return($res); } } perl понадобился ибо не придумал как выбрать функциями exim bext mx из записей вида N1 MX1 N2 MX2 ... -- Best regard, Aleksander Trotsai aka MAGE-RIPE aka MAGE-UANIC My PGP key at ftp://blackhole.adamant.ua/pgp/trotsai.key[.asc] Big trouble - I'm not sure. Try calling the Internet's head office -- it's in the book. =================================================================== uanog mailing list. To Unsubscribe: send mail to majordomo@uanog.kiev.ua with "unsubscribe uanog" in the body of the message