greet_pause.m4 revision 266692
1divert(-1)
2#
3# Copyright (c) 2004 Proofpoint, Inc. and its suppliers.
4#	All rights reserved.
5#
6# By using this file, you agree to the terms and conditions set
7# forth in the LICENSE file which can be found at the top level of
8# the sendmail distribution.
9#
10#
11
12divert(0)
13VERSIONID(`$Id: greet_pause.m4,v 1.5 2013-11-22 20:51:11 ca Exp $')
14divert(-1)
15
16ifelse(len(X`'_ARG_),`1',`ifdef(`_ACCESS_TABLE_', `',
17	`errprint(`*** ERROR: FEATURE(`greet_pause') requires FEATURE(`access_db')
18')')')
19
20define(`_GREET_PAUSE_', `')
21
22LOCAL_RULESETS
23######################################################################
24###  greet_pause: lookup pause time before 220 greeting
25###
26###	Parameters:
27###		$1: {client_name}
28###		$2: {client_addr}
29######################################################################
30SLocal_greet_pause
31Sgreet_pause
32R$*			$: <$1><?> $| $>"Local_greet_pause" $1
33R<$*><?> $| $#$*	$#$2
34R<$*><?> $| $*		$: $1
35ifdef(`_ACCESS_TABLE_', `dnl
36R$+ $| $+		$: $>D < $1 > <?> <! GreetPause> < $2 >
37R   $| $+		$: $>A < $1 > <?> <! GreetPause> <>	empty client_name
38R<?> <$+>		$: $>A < $1 > <?> <! GreetPause> <>	no: another lookup
39ifelse(len(X`'_ARG_),`1',
40`R<?> <$*>		$@',
41`R<?> <$*>		$# _ARG_')
42R<$* <TMPF>> <$*>	$@
43R<$+> <$*>		$# $1',`dnl
44R$*			$# _ARG_')
45