divert(-1)
#
# mail from loopback chack
#
# никаких копирайтов!
#
dnl
divert(0)
dnl
VERSIONID(`$Id: check-mail-from-loopback.m4,v 8.12 2002/12/22 19:10:00 corvax Exp $')
dnl
divert(-1)
dnl
ifdef(`_CHECK_ENVELOPE_INIT_',,`HACK(`precheck-envelope')')
ifdef(`_CHECK_ADDRESSES_INIT_',,`HACK(`precheck-addresses')')
dnl
ifdef(`confMAIL_FROM_CHECKER',,	`define(`confMAIL_FROM_CHECKER',	`/usr/local/scripts/mail_from_check.pl')')
ifdef(`confTRUSTED_DOMAINS',,	`define(`confTRUSTED_DOMAINS',		`/etc/mail/trusted-domains')')
dnl
divert(0)
dnl
dnl
LOCAL_CONFIG
dnl
dnl
Kmail_from_check program `'confMAIL_FROM_CHECKER
F{trusted_domains}`'confTRUSTED_DOMAINS
dnl
dnl
LOCAL_RULESETS
dnl
dnl
######################################################################
#                      MAIL FROM loopback check                      #
######################################################################
dnl
SLocal_check_mail
R $*						$: $>loopback_check_mail $1

Sloopback_check_mail
dnl R $*					$: $>Parse0 $>3 $1
dnl
ifdef(`confDONT_CHECK_OUTGOING_MAIL_FROM',`
dnl
R $*						$: $1 <?> $>SetIsOutgoing
R $* <?> $*					$: $1
dnl
R $*						$: < $&{IsOutgoing} > $1
R < YES > $*					$@ $1
R < $* > $*					$: $2
',`')dnl

R $+ < @ $+ > $*				$: < $1 @ $2 > $1 < @ $2 > $3
R < $+ . > $*					$: < $1 > $2
R < $+ @ $={trusted_domains} > $+		$: OK < $1 @ $2 > $3
R < $+ @ $+ > $+				$: < $(mail_from_check $1 @ $2 $) > $3
R < error: $* User unknown > $+		$#error $: 554 5.1.7 Sender unknown
R < error: $+ > $+			$#error $: 554 $1
R OK < $+ @ $+ > $+				$: <$1 @ $2 > $3
R < $+ > $+ < @ $+ > $*				$2 < @ $3 > $4
dnl