1PUSHDIVERT(-1) 2# 3# Copyright (c) 1998-2001 Sendmail, 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# Not exciting enough to bother with copyrights and most of the 12# rulesets are based from those provided by DEC. 13# Barb Dijker, Labyrinth Computer Services, barb@labyrinth.com 14# 15# This mailer is only useful if you have DECNET and the 16# mail11 program - gatekeeper.dec.com:/pub/DEC/gwtools. 17# 18# For local delivery of DECNET style addresses to the local 19# DECNET node, you will need feature(use_cw_file) and put 20# your DECNET nodename in in the cw file. 21# 22ifdef(`MAIL11_MAILER_PATH',, `define(`MAIL11_MAILER_PATH', /usr/etc/mail11)') 23_DEFIFNOT(`MAIL11_MAILER_FLAGS', `nsFx') 24ifdef(`MAIL11_MAILER_ARGS',, `define(`MAIL11_MAILER_ARGS', mail11 $g $x $h $u)') 25define(`_USE_DECNET_SYNTAX_') 26define(`_LOCAL_', ifdef(`confLOCAL_MAILER', confLOCAL_MAILER, `local')) 27define(`_MAIL11_QGRP', `ifelse(defn(`MAIL11_MAILER_QGRP'),`',`', ` Q=MAIL11_MAILER_QGRP,')')dnl 28 29POPDIVERT 30 31PUSHDIVERT(3) 32# DECNET delivery 33R$* < @ $=w .DECNET. > $#_LOCAL_ $: $1 local DECnet 34R$+ < @ $+ .DECNET. > $#mail11 $@ $2 $: $1 DECnet user 35POPDIVERT 36 37PUSHDIVERT(6) 38CPDECNET 39POPDIVERT 40 41########################################### 42### UTK-MAIL11 Mailer specification ### 43########################################### 44 45VERSIONID(`$Id: mail11.m4,v 8.22 2001/11/12 23:11:34 ca Exp $') 46 47SMail11To 48R$+ < @ $- .UUCP > $: $2 ! $1 back to old style 49R$+ < @ $- .DECNET > $: $2 :: $1 convert to DECnet style 50R$+ < @ $- .LOCAL > $: $2 :: $1 convert to DECnet style 51R$+ < @ $=w. > $: $2 :: $1 convert to DECnet style 52R$=w :: $+ $2 strip local names 53R$+ :: $+ $@ $1 :: $2 already qualified 54 55SMail11From 56R$+ $: $>Mail11To $1 preprocess 57R$w :: $+ $@ $w :: $1 ready to go 58 59Mmail11, P=MAIL11_MAILER_PATH, F=_MODMF_(MAIL11_MAILER_FLAGS, `MAIL11'), S=Mail11From, R=Mail11To, 60 T=DNS/X-DECnet/X-Unix,_MAIL11_QGRP 61 A=MAIL11_MAILER_ARGS 62