uucp.m4 revision 98122
1174042SjbPUSHDIVERT(-1) 2179202Sjb# 3174042Sjb# Copyright (c) 1998-2001 Sendmail, Inc. and its suppliers. 4179202Sjb# All rights reserved. 5179202Sjb# Copyright (c) 1983 Eric P. Allman. All rights reserved. 6179202Sjb# Copyright (c) 1988, 1993 7179202Sjb# The Regents of the University of California. All rights reserved. 8179202Sjb# 9179202Sjb# By using this file, you agree to the terms and conditions set 10179202Sjb# forth in the LICENSE file which can be found at the top level of 11179202Sjb# the sendmail distribution. 12179202Sjb# 13179202Sjb# 14179202Sjb 15179202Sjbifdef(`UUCP_MAILER_PATH',, `define(`UUCP_MAILER_PATH', /usr/bin/uux)') 16179202Sjbifdef(`UUCP_MAILER_ARGS',, `define(`UUCP_MAILER_ARGS', `uux - -r -a$g -gC $h!rmail ($u)')') 17179202Sjb_DEFIFNOT(`UUCP_MAILER_FLAGS', `') 18179202Sjbifdef(`UUCP_MAILER_MAX',, 19179202Sjb `define(`UUCP_MAILER_MAX', 20179202Sjb `ifdef(`UUCP_MAX_SIZE', `UUCP_MAX_SIZE', 100000)')') 21179202Sjbdefine(`_UUCP_QGRP', `ifelse(defn(`UUCP_MAILER_QGRP'),`',`', ` Q=UUCP_MAILER_QGRP,')')dnl 22174042SjbPOPDIVERT 23174042Sjb##################################### 24174042Sjb### UUCP Mailer specification ### 25179202Sjb##################################### 26179202Sjb 27179202SjbVERSIONID(`$Id: uucp.m4,v 8.44 2001/08/24 19:49:08 ca Exp $') 28179202Sjb 29174042Sjb# 30174042Sjb# envelope and header sender rewriting 31174042Sjb# 32174042SjbSFromU 33174042Sjb 34174042Sjb# handle error address as a special case 35174042SjbR<@> $n errors to mailer-daemon 36174042Sjb 37174042Sjb# list:; syntax should disappear 38179202SjbR:; <@> $@ 39179202Sjb 40179202SjbR$* < @ $* . > $* $1 < @ $2 > $3 strip trailing dots 41179202SjbR$* < @ $=w > $1 strip local name 42179202SjbR<@ $- . UUCP > : $+ $1 ! $2 convert to UUCP format 43179202SjbR<@ $+ > : $+ $1 ! $2 convert to UUCP format 44179202SjbR$* < @ $- . UUCP > $2 ! $1 convert to UUCP format 45179202SjbR$* < @ $+ > $2 ! $1 convert to UUCP format 46179202SjbR$&h ! $+ ! $+ $@ $1 ! $2 $h!...!user => ...!user 47179202SjbR$&h ! $+ $@ $&h ! $1 $h!user => $h!user 48179202SjbR$+ $: $U ! $1 prepend our name 49179202SjbR! $+ $: $k ! $1 in case $U undefined 50179202Sjb 51179202Sjb# 52179202Sjb# envelope recipient rewriting 53179202Sjb# 54179202SjbSEnvToU 55179202Sjb 56179202Sjb# list:; should disappear 57179202SjbR:; <@> $@ 58179202Sjb 59179202SjbR$* < @ $* . > $* $1 < @ $2 > $3 strip trailing dots 60179202SjbR$* < @ $=w > $1 strip local name 61179202SjbR<@ $- . UUCP > : $+ $1 ! $2 convert to UUCP format 62179202SjbR<@ $+ > : $+ $1 ! $2 convert to UUCP format 63179202SjbR$* < @ $- . UUCP > $2 ! $1 convert to UUCP format 64179202SjbR$* < @ $+ > $2 ! $1 convert to UUCP format 65179202Sjb 66179202Sjb# 67179202Sjb# header recipient rewriting 68179202Sjb# 69179202SjbSHdrToU 70179202Sjb 71179202Sjb# list:; syntax should disappear 72179202SjbR:; <@> $@ 73179202Sjb 74179202SjbR$* < @ $* . > $* $1 < @ $2 > $3 strip trailing dots 75179202SjbR$* < @ $=w > $1 strip local name 76179202SjbR<@ $- . UUCP > : $+ $1 ! $2 convert to UUCP format 77179202SjbR<@ $+ > : $+ $1 ! $2 convert to UUCP format 78179202SjbR$* < @ $- . UUCP > $2 ! $1 convert to UUCP format 79174042SjbR$* < @ $+ > $2 ! $1 convert to UUCP format 80R$&h ! $+ ! $+ $@ $1 ! $2 $h!...!user => ...!user 81R$&h ! $+ $@ $&h ! $1 $h!user => $h!user 82R$+ $: $U ! $1 prepend our name 83R! $+ $: $k ! $1 in case $U undefined 84 85 86ifdef(`_MAILER_smtp_', 87`# 88# envelope sender rewriting for uucp-dom mailer 89# 90SEnvFromUD 91 92# handle error address as a special case 93R<@> $n errors to mailer-daemon 94 95# pass everything to standard SMTP mailer rewriting 96R$* $@ $>EnvFromSMTP $1 97 98# 99# envelope sender rewriting for uucp-uudom mailer 100# 101SEnvFromUUD 102 103# handle error address as a special case 104R<@> $n errors to mailer-daemon 105 106# do standard SMTP mailer rewriting 107R$* $: $>EnvFromSMTP $1 108 109R$* < @ $* . > $* $1 < @ $2 > $3 strip trailing dots 110R<@ $- . UUCP > : $+ $@ $1 ! $2 convert to UUCP format 111R<@ $+ > : $+ $@ $1 ! $2 convert to UUCP format 112R$* < @ $- . UUCP > $@ $2 ! $1 convert to UUCP format 113R$* < @ $+ > $@ $2 ! $1 convert to UUCP format', 114`errprint(`*** MAILER(`smtp') must appear before MAILER(`uucp') 115 if uucp-dom should be included.') 116') 117 118PUSHDIVERT(4) 119# resolve locally connected UUCP links 120R$* < @ $=Z . UUCP. > $* $#uucp-uudom $@ $2 $: $1 < @ $2 .UUCP. > $3 121R$* < @ $=Y . UUCP. > $* $#uucp-new $@ $2 $: $1 < @ $2 .UUCP. > $3 122R$* < @ $=U . UUCP. > $* $#uucp-old $@ $2 $: $1 < @ $2 .UUCP. > $3 123POPDIVERT 124 125# 126# There are innumerable variations on the UUCP mailer. It really 127# is rather absurd. 128# 129 130# old UUCP mailer (two names) 131Muucp, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`DFMhuUd', UUCP_MAILER_FLAGS), `UUCP'), S=FromU, R=EnvToU/HdrToU, 132 M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,_UUCP_QGRP 133 A=UUCP_MAILER_ARGS 134Muucp-old, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`DFMhuUd', UUCP_MAILER_FLAGS), `UUCP'), S=FromU, R=EnvToU/HdrToU, 135 M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,_UUCP_QGRP 136 A=UUCP_MAILER_ARGS 137 138# smart UUCP mailer (handles multiple addresses) (two names) 139Msuucp, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`mDFMhuUd', UUCP_MAILER_FLAGS), `UUCP'), S=FromU, R=EnvToU/HdrToU, 140 M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,_UUCP_QGRP 141 A=UUCP_MAILER_ARGS 142Muucp-new, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`mDFMhuUd', UUCP_MAILER_FLAGS), `UUCP'), S=FromU, R=EnvToU/HdrToU, 143 M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,_UUCP_QGRP 144 A=UUCP_MAILER_ARGS 145 146ifdef(`_MAILER_smtp_', 147`# domain-ized UUCP mailer 148Muucp-dom, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`mDFMhud', UUCP_MAILER_FLAGS), `UUCP'), S=EnvFromUD/HdrFromSMTP, R=ifdef(`_ALL_MASQUERADE_', `EnvToSMTP/HdrFromSMTP', `EnvToSMTP'), 149 M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,_UUCP_QGRP 150 A=UUCP_MAILER_ARGS 151 152# domain-ized UUCP mailer with UUCP-style sender envelope 153Muucp-uudom, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`mDFMhud', UUCP_MAILER_FLAGS), `UUCP'), S=EnvFromUUD/HdrFromSMTP, R=ifdef(`_ALL_MASQUERADE_', `EnvToSMTP/HdrFromSMTP', `EnvToSMTP'), 154 M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,_UUCP_QGRP 155 A=UUCP_MAILER_ARGS') 156 157 158