dnl
dnl Проверка HELO в черном списке
dnl
dnl NO		- не проводить проверку
dnl DROP	- возврат клиенту кода 5xx и обрыв соединения
dnl REJECT	- возврат клиенту кода 5xx
dnl DEFER	- возврат клиенту кода 4xx
dnl WARN	- вывод в лог файл предупреждения
dnl PAUSE:XX	- пауза XX секунд
dnl GREYLIST:XX	- добавить XX баллов к счетчику опционального greylisting'а
dnl REJECT:XX	- добавить XX баллов к счетчику опционального reject'а
dnl define(`confCHECK_HELO_ACCESS', `WARN')dnl
dnl
dnl действия PAUSE:XX, GREYLIST:XX, REJECT:XX можно указывать через пробел с
dnl другими действиями
dnl
dnl черный список HELO находится в файле confCONFDIR/access-helo в виде:
dnl helo : action : message : log_message
dnl
dnl возможные значения для action:
dnl ok			- исключение из проверки для указанного helo
dnl warn		- вывод в лог файл предупреждения
dnl reject		- отказ в приеме сообщения
dnl deny		- синоним для reject
dnl defer		- возврат временной ошибки
dnl greylist:X		- добавление X баллов к счетчику опционального грейлистинга
dnl reject:X		- добавление X баллов к счетчику опционального reject'а
dnl submit_mysql	- занесение записи о хосте в базу MySQL
dnl submit_sqlite	- занесение записи о хосте в базу SQLite
dnl submit_rbl		- занесение записи о хосте в DNSBL
dnl
dnl если action отсутствует, то будет использовано значение из confCHECK_HELO_ACCESS
dnl
dnl message - ответ SMTP клиенту (может отсутствовать)
dnl log_message - сообщение в лог файл (может отсутствовать)
dnl
dnl пример:
dnl [127.0.0.1]		: deny : Invalid greeting used
dnl localhost		: deny : Invalid greeting used
dnl [194.183.174.249]	: deny : Invalid greeting used
dnl domain.tld		: deny : Invalid greeting used
dnl \N^.+\.localhost\N		: deny : Invalid greeting used
dnl localhost.localdomain	: deny : Invalid greeting used
dnl compuserv.com		: deny : Invalid greeting used
dnl microsoft.com		: deny : Invalid greeting used
dnl QRJATIDY			: deny : Invalid greeting used : helo blacklisted
dnl QRJATYDI			: deny : Invalid greeting used
dnl

ifelse(confCHECK_HELO_ACCESS, `YES', `define(`confCHECK_HELO_ACCESS', `REJECT')')

# Проверка наличия HELO в черном списке
# в т. ч. проверка HELO в виде имени хоста, принадлежащего к dial-up/dsl/cable сетям

	warn	set acl_m1	=
		set acl_m0	= ${lookup{$sender_host_address}\
				iplsearch{CONFDIR/access-helo}\
				{${if eq{$value}{}{confCHECK_HELO_ACCESS}{$value}}}\
				{\
					${lookup{$sender_helo_name}\
					wildlsearch{CONFDIR/access-helo}\
					{${if eq{$value}{}{confCHECK_HELO_ACCESS}{$value}}}\
					{no}}\				   
				}}
		condition	= ${if eq{$acl_m0}{no}{no}{yes}}
		set acl_m1	= ${extract{1}{:}{$acl_m0}}
		acl		= normalize_action
		set acl_m1	= ${sg{$acl_m1 }{\N\b([^=\s\d]+)(\s)\N}{\$1=00\$2}}
		# message	= $acl_m2
		# log_message	= $acl_m0
		set acl_m2	= ${expand:${sg{${extract{2}{:}{$acl_m0}}}{\N^\s+\N}{}}}
		set acl_m0	= ${expand:${sg{${extract{3}{:}{$acl_m0}}}{\N^\s+\N}{}}}
		set acl_m0	= ${if eq{$acl_m0}{}{helo $sender_helo_name blacklisted${if eq{$acl_m2}{}{}{: $acl_m2}}}{$acl_m0}}
#		set acl_m2	= ${if eq{$acl_m2}{}{Invalid greeting used}{$acl_m2}}

ifdef(`confENTERPRISE_USER', `dnl
	warn	condition	= ${if match{$acl_m1}{submit_mysql}{yes}{no}}
ENTERPRISE(`mysql', `submit', `helo', `blacklisted', `$sender_helo_name', `0')
	warn	condition	= ${if match{$acl_m1}{submit_sqlite}{yes}{no}}
ENTERPRISE(`sqlite', `submit', `helo', `blacklisted', `$sender_helo_name', `0')
	warn	condition	= ${if match{$acl_m1}{submit_rbl}{yes}{no}}
dnl ENTERPRISE(`rbl',   `update', `mx.org.ua', `helo.rbl.mx.org.ua', `blacklisted', `$sender_helo_name')
ENTERPRISE(`rbl',   `submit', `helo', `blacklisted', `$sender_helo_name')
') dnl

	# Warning в случае принадлежности HELO к blacklisted сетям
	# Warning if sender HELO in blacklisted network
	warn	condition	= ${if match{$acl_m1}{warn}{yes}{no}}
		add_header	= X-Warn-HELO-Blacklisted: ${if eq{$acl_m2}{}{HELO $sender_helo_name is blacklisted}{$acl_m2}}
                log_message	= $acl_m0${if eq{${extract{pause}{$acl_m1}}}{}{}{: message delayed for ${extract{pause}{$acl_m1}}s}}

	# Pause в случае принадлежности HELO к blacklisted сетям
	# Pause if sender HELO in blacklisted network
	warn	condition	= ${if eq{${extract{pause}{$acl_m1}}}{}{no}{yes}}
		delay		= ${extract{pause}{$acl_m1}}s
		set acl_m15	= ${acl_m15}\t\
				delay=${extract{pause}{$acl_m1}}s\t\t\
				$acl_m0\n

	# Reject в случае принадлежности HELO к blacklisted сетям
	# Reject if sender HELO in blacklisted network
	deny	condition	= ${if eq{${extract{reject}{$acl_m1}}}{00}{yes}{no}}
		message		= ${if eq{$acl_m2}{}{Invalid greeting used}{$acl_m2}}
                log_message	= $acl_m0

	# Defer в случае принадлежности HELO к blacklisted сетям
	# Defer if sender HELO in blacklisted network
	defer	condition	= ${if match{$acl_m1}{defer}{yes}{no}}
		message		= ${if eq{$acl_m2}{}{Invalid greeting used}{$acl_m2}}
                log_message	= $acl_m0

	# Drop в случае принадлежности HELO к blacklisted сетям
	# Drop if sender HELO in blacklisted network
	drop	condition	= ${if match{$acl_m1}{drop}{yes}{no}}
		message		= ${if eq{$acl_m2}{}{Invalid greeting used}{$acl_m2}}
                log_message	= $acl_m0

ifelse(confGREYLIST, `OPTIONAL', `dnl
	# greylist в случае принадлежности HELO к blacklisted сетям
	# greylist if sender HELO in blacklisted network
	warn	condition	= ${if eq{${extract{greylist}{$acl_m1}}}{}{no}{yes}}
 		set acl_c8	= \
				scores=${eval:${extract{scores}{$acl_c8}}+${extract{greylist}{$acl_m1}}} \
 				log_message="${extract{log_message}{$acl_c8}} $acl_m0;"
		set acl_m15	= ${acl_m15}\t\
				greylist scores=${extract{greylist}{$acl_m1}}\t\
				$acl_m0\n
') dnl ifelse(confGREYLIST, `OPTIONAL', `')
ifdef(`confOPTIONAL_REJECT', `ifelse(confOPTIONAL_REJECT, `NO', `dnl', `dnl
	# optional reject в случае принадлежности HELO к blacklisted сетям
	# optional reject if sender HELO in blacklisted network
	warn	condition	= ${if eq{${extract{reject}{$acl_m1}}}{}{no}{yes}}
 		condition	= ${if eq{${extract{reject}{$acl_m1}}}{00}{no}{yes}}
 		set acl_c6	= \
				scores=${eval:${extract{scores}{$acl_c6}}+${extract{reject}{$acl_m1}}} \
 				log_message="${extract{log_message}{$acl_c6}} $acl_m0;"
		set acl_m15	= ${acl_m15}\t\
				reject scores=${extract{reject}{$acl_m1}}\t\t\
				$acl_m0\n
')') dnl ifdef(`confOPTIONAL_REJECT', `ifelse(confOPTIONAL_REJECT, `NO', `', `')')