mail11.m4 revision 64562
138032SpeterPUSHDIVERT(-1)
238032Speter#
364562Sgshapiro# Copyright (c) 1998, 1999 Sendmail, Inc. and its suppliers.
464562Sgshapiro#	All rights reserved.
538032Speter#
638032Speter# By using this file, you agree to the terms and conditions set
738032Speter# forth in the LICENSE file which can be found at the top level of
838032Speter# the sendmail distribution.
938032Speter#
1038032Speter#
1138032Speter# Not exciting enough to bother with copyrights and most of the
1238032Speter# rulesets are based from those provided by DEC.
1338032Speter# Barb Dijker, Labyrinth Computer Services, barb@labyrinth.com
1438032Speter#
1538032Speter# This mailer is only useful if you have DECNET and the
1638032Speter# mail11 program - gatekeeper.dec.com:/pub/DEC/gwtools.
1764562Sgshapiro#
1838032Speter# For local delivery of DECNET style addresses to the local
1938032Speter# DECNET node, you will need feature(use_cw_file) and put
2038032Speter# your DECNET nodename in in the cw file.
2138032Speter#
2238032Speterifdef(`MAIL11_MAILER_PATH',, `define(`MAIL11_MAILER_PATH', /usr/etc/mail11)')
2364562Sgshapiro_DEFIFNOT(`MAIL11_MAILER_FLAGS', `nsFx')
2438032Speterifdef(`MAIL11_MAILER_ARGS',, `define(`MAIL11_MAILER_ARGS', mail11 $g $x $h $u)')
2538032Speterdefine(`_USE_DECNET_SYNTAX_')
2638032Speterdefine(`_LOCAL_', ifdef(`confLOCAL_MAILER', confLOCAL_MAILER, `local'))
2738032Speter
2838032SpeterPOPDIVERT
2938032Speter
3038032SpeterPUSHDIVERT(3)
3138032Speter# DECNET delivery
3238032SpeterR$* < @ $=w .DECNET. >		$#_LOCAL_ $: $1			local DECnet
3338032SpeterR$+ < @ $+ .DECNET. >		$#mail11 $@ $2 $: $1		DECnet user
3438032SpeterPOPDIVERT
3538032Speter
3638032SpeterPUSHDIVERT(6)
3738032SpeterCPDECNET
3838032SpeterPOPDIVERT
3938032Speter
4038032Speter###########################################
4138032Speter###   UTK-MAIL11 Mailer specification   ###
4238032Speter###########################################
4338032Speter
4464562SgshapiroVERSIONID(`$Id: mail11.m4,v 8.19 1999/10/18 04:57:54 gshapiro Exp $')
4538032Speter
4664562SgshapiroSMail11From=15
4738032SpeterR$+			$: $>25 $1		preprocess
4838032SpeterR$w :: $+		$@ $w :: $1		ready to go
4938032Speter
5064562SgshapiroSMail11To=25
5138032SpeterR$+ < @ $- .UUCP >	$: $2 ! $1		back to old style
5238032SpeterR$+ < @ $- .DECNET >	$: $2 :: $1		convert to DECnet style
5338032SpeterR$+ < @ $- .LOCAL >	$: $2 :: $1		convert to DECnet style
5438032SpeterR$+ < @ $=w. >		$: $2 :: $1		convert to DECnet style
5538032SpeterR$=w :: $+		$2			strip local names
5638032SpeterR$+ :: $+		$@ $1 :: $2		already qualified
5764562Sgshapiro
5864562SgshapiroMmail11, P=MAIL11_MAILER_PATH, F=_MODMF_(MAIL11_MAILER_FLAGS, `MAIL11'), S=Mail11From, R=Mail11To,
5964562Sgshapiro	T=DNS/X-DECnet/X-Unix,
6064562Sgshapiro	A=MAIL11_MAILER_ARGS
61