divert(-1)
#
# Check mail from field
#
# никаких копирайтов!
#
dnl
divert(0)
dnl
VERSIONID(`$Id: check-mail-from.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
divert(0)
dnl
dnl
LOCAL_RULESETS
dnl
dnl
######################################################################
#                          MAIL FROM checks                          #
######################################################################
dnl
SLocal_check_mail
# check address against various regex checks
dnl R $*					$: $>Parse0 $>3 $1
dnl
R $+						$: $(checkaddress_canonified $1 $)
R @MATCH				$#error $: 554 Header Error
dnl
R $+						$: <!> $1
ifdef(`confNUMERIC_DOMAINS', `dnl
R <!> $+ < @ $={NumericDomains} . > $*		$: <OK> $1 < @ $2 . > $3
')
dnl
R <!> $+ < @ $+ > $*				$: $(allnumbers     $1 $: <!> $1 < @ $2 > $3 $)
R @MATCH				$#error $: 554 5.1.7 Header Error
R <!> $+ < @ $+ > $*				$: $(allnumbersdots $1 $: <!> $1 < @ $2 > $3 $)
R @MATCH				$#error $: 554 5.1.7 Header Error
dnl
R <OK> $+ < @ $+ > $*				$: $1 < @ $2 > $3
R <!> $+					$: $1
dnl