mail11.m4 revision 38032
1PUSHDIVERT(-1)
2#
3# Copyright (c) 1998 Sendmail, Inc.  All rights reserved.
4#
5# By using this file, you agree to the terms and conditions set
6# forth in the LICENSE file which can be found at the top level of
7# the sendmail distribution.
8#
9#
10# Not exciting enough to bother with copyrights and most of the
11# rulesets are based from those provided by DEC.
12# Barb Dijker, Labyrinth Computer Services, barb@labyrinth.com
13#
14# This mailer is only useful if you have DECNET and the
15# mail11 program - gatekeeper.dec.com:/pub/DEC/gwtools.
16# 
17# For local delivery of DECNET style addresses to the local
18# DECNET node, you will need feature(use_cw_file) and put
19# your DECNET nodename in in the cw file.
20#
21ifdef(`MAIL11_MAILER_PATH',, `define(`MAIL11_MAILER_PATH', /usr/etc/mail11)')
22ifdef(`MAIL11_MAILER_FLAGS',, `define(`MAIL11_MAILER_FLAGS', nsFx)')
23ifdef(`MAIL11_MAILER_ARGS',, `define(`MAIL11_MAILER_ARGS', mail11 $g $x $h $u)')
24define(`_USE_DECNET_SYNTAX_')
25define(`_LOCAL_', ifdef(`confLOCAL_MAILER', confLOCAL_MAILER, `local'))
26
27POPDIVERT
28
29PUSHDIVERT(3)
30# DECNET delivery
31R$* < @ $=w .DECNET. >		$#_LOCAL_ $: $1			local DECnet
32R$+ < @ $+ .DECNET. >		$#mail11 $@ $2 $: $1		DECnet user
33POPDIVERT
34
35PUSHDIVERT(6)
36CPDECNET
37POPDIVERT
38
39###########################################
40###   UTK-MAIL11 Mailer specification   ###
41###########################################
42
43VERSIONID(`@(#)mail11.m4	8.8 (Berkeley) 5/19/98')
44
45Mmail11, P=MAIL11_MAILER_PATH, F=MAIL11_MAILER_FLAGS, S=15, R=25,
46	A=MAIL11_MAILER_ARGS
47
48S15
49R$+			$: $>25 $1		preprocess
50R$w :: $+		$@ $w :: $1		ready to go
51
52S25
53R$+ < @ $- .UUCP >	$: $2 ! $1		back to old style
54R$+ < @ $- .DECNET >	$: $2 :: $1		convert to DECnet style
55R$+ < @ $- .LOCAL >	$: $2 :: $1		convert to DECnet style
56R$+ < @ $=w. >		$: $2 :: $1		convert to DECnet style
57R$=w :: $+		$2			strip local names
58R$+ :: $+		$@ $1 :: $2		already qualified
59