151226SericPUSHDIVERT(-1)
251226Seric#
351226Seric# Copyright (c) 1983 Eric P. Allman
462501Sbostic# Copyright (c) 1988, 1993
562501Sbostic#	The Regents of the University of California.  All rights reserved.
651226Seric#
751226Seric# %sccs.include.redist.sh%
851226Seric#
958088Seric
1058088Sericifdef(`UUCP_MAILER_PATH',, `define(`UUCP_MAILER_PATH', /usr/bin/uux)')
1163755Sericifdef(`UUCP_MAILER_ARGS',, `define(`UUCP_MAILER_ARGS', `uux - -r -z -a$f -gC $h!rmail ($u)')')
1259765Sericifdef(`UUCP_MAILER_FLAGS',, `define(`UUCP_MAILER_FLAGS', `')')
1363790Sericifdef(`UUCP_MAX_SIZE',, `define(`UUCP_MAX_SIZE', 100000)')
1451226SericPOPDIVERT
1551226Seric#####################################
1651226Seric###   UUCP Mailer specification   ###
1751226Seric#####################################
1851226Seric
19*65592SericVERSIONID(`@(#)uucp.m4	8.13 (Berkeley) 01/10/94')
2051226Seric
2165083Seric#
2265083Seric#  There are innumerable variations on the UUCP mailer.  It really
2365083Seric#  is rather absurd.
2465083Seric#
2565083Seric
2665083Seric# old UUCP mailer (two names)
2763790SericMuucp,		P=UUCP_MAILER_PATH, F=CONCAT(DFMhuU, UUCP_MAILER_FLAGS), S=12, R=22, M=UUCP_MAX_SIZE,
2863755Seric		A=UUCP_MAILER_ARGS
2965083SericMuucp-old,	P=UUCP_MAILER_PATH, F=CONCAT(DFMhuU, UUCP_MAILER_FLAGS), S=12, R=22, M=UUCP_MAX_SIZE,
3065083Seric		A=UUCP_MAILER_ARGS
3151226Seric
3265083Seric# smart UUCP mailer (handles multiple addresses) (two names)
3363790SericMsuucp,		P=UUCP_MAILER_PATH, F=CONCAT(mDFMhuU, UUCP_MAILER_FLAGS), S=12, R=22, M=UUCP_MAX_SIZE,
3463755Seric		A=UUCP_MAILER_ARGS
3565083SericMuucp-new,	P=UUCP_MAILER_PATH, F=CONCAT(mDFMhuU, UUCP_MAILER_FLAGS), S=12, R=22, M=UUCP_MAX_SIZE,
3665083Seric		A=UUCP_MAILER_ARGS
3751226Seric
3863790Sericifdef(`_MAILER_smtp_',
3963790Seric`# domain-ized UUCP mailer
4064804SericMuucp-dom,	P=UUCP_MAILER_PATH, F=CONCAT(mDFMhu, UUCP_MAILER_FLAGS), S=52/31, R=ifdef(`_ALL_MASQUERADE_', `11/31', `21'), M=UUCP_MAX_SIZE,
4165083Seric		A=UUCP_MAILER_ARGS
4265083Seric
4365083Seric# domain-ized UUCP mailer with UUCP-style sender envelope
4465083SericMuucp-uudom,	P=UUCP_MAILER_PATH, F=CONCAT(mDFMhu, UUCP_MAILER_FLAGS), S=72/31, R=ifdef(`_ALL_MASQUERADE_', `11/31', `21'), M=UUCP_MAX_SIZE,
4563790Seric		A=UUCP_MAILER_ARGS')
4663790Seric
4763790Seric
4864804Seric#
4964804Seric#  envelope and header sender rewriting
5064804Seric#
5151226SericS12
5251226Seric
5358117Seric# handle error address as a special case
5458500SericR<@>				$n			errors to mailer-daemon
5558117Seric
5663759Seric# do not qualify list:; syntax
5758500SericR$* :; <@>			$@ $1 :;
5854018Seric
5958797SericR$* < @ $* . >			$1 < @ $2 >		strip trailing dots
6064973SericR$* < @ $=w >			$1			strip local name
61*65592SericR<@ $- . UUCP > : $+		$1 ! $2			convert to UUCP format
6265556SericR<@ $+ > : $+			$1 ! $2			convert to UUCP format
63*65592SericR$* < @ $- . UUCP >		$2 ! $1			convert to UUCP format
6451245SericR$* < @ $+ >			$2 ! $1			convert to UUCP format
6565217SericR$&h ! $+ ! $+			$@ $1 ! $2		$h!...!user => ...!user
6665217SericR$&h ! $+			$@ $&h ! $1		$h!user => $h!user
6763755SericR$+				$: $U ! $1		prepend our name
6865184SericR! $+				$: $k ! $1		in case $U undefined
6951259Seric
7064804Seric#
7164804Seric#  envelope and header recipient rewriting
7264804Seric#
7358023SericS22
7458023Seric
7558023Seric# don't touch list:; syntax
7664930SericR$* :; <@>			$@ $1 :;
7758023Seric
7858797SericR$* < @ $* . >			$1 < @ $2 >		strip trailing dots
7958758SericR$* < @ $j >			$1			strip local name
80*65592SericR<@ $- . UUCP > : $+		$1 ! $2			convert to UUCP format
8165556SericR<@ $+ > : $+			$1 ! $2			convert to UUCP format
82*65592SericR$* < @ $- . UUCP >		$2 ! $1			convert to UUCP format
8358023SericR$* < @ $+ >			$2 ! $1			convert to UUCP format
8465217SericR$&h ! $+ ! $+			$@ $1 ! $2		$h!...!user => ...!user
8565217SericR$&h ! $+			$@ $&h ! $1		$h!user => $h!user
8665217SericR$+				$: $U ! $1		prepend our name
8765217SericR! $+				$: $k ! $1		in case $U undefined
8858023Seric
8964804Seric
9065083Sericifdef(`_MAILER_smtp_',
9165083Seric`#
9264804Seric#  envelope sender rewriting for uucp-dom mailer
9364804Seric#
9464804SericS52
9564804Seric
9664804Seric# handle error address as a special case
9764804SericR<@>				$n			errors to mailer-daemon
9864804Seric
9964804Seric# pass everything to standard SMTP mailer rewriting
10064804SericR$*				$@ $>11 $1
10164804Seric
10265083Seric#
10365083Seric#  envelope sender rewriting for uucp-uudom mailer
10465083Seric#
10565083SericS72
10664804Seric
10765217Seric# handle error address as a special case
10865217SericR<@>				$n			errors to mailer-daemon
10965217Seric
11065217Seric# do not qualify list:; syntax
11165217SericR$* :; <@>			$@ $1 :;
11265217Seric
11365217SericR$* < @ $* . >			$1 < @ $2 >		strip trailing dots
11465217SericR$* < @ $=w >			$1			strip local name
115*65592SericR<@ $- . UUCP > : $+		$1 ! $2			convert to UUCP format
11665556SericR<@ $+ > : $+			$1 ! $2			convert to UUCP format
117*65592SericR$* < @ $- . UUCP >		$2 ! $1			convert to UUCP format
11865217SericR$* < @ $+ >			$@ $2 ! $1		convert to UUCP format
11965217Seric
12065217SericR$&h ! $+ ! $+			$@ $1 ! $2		$h!...!user => ...!user
12165217SericR$&h ! $+			$@ $&h ! $1		$h!user => $h!user
12265184SericR$+				$: $M ! $1		prepend masquerade name
12365184SericR! $+				$: $j ! $1		in case $M undefined')
12465083Seric
12565083Seric
12651259SericPUSHDIVERT(4)
12751259Seric# resolve locally connected UUCP links
12865217SericR$* < @ $=Z . UUCP. > $*	$#uucp-uudom $@ $1 $: $1 < @ $2 .UUCP. > $3	@host.UUCP: ...
12965556SericR$* < @ $=Y . UUCP. > $*	$#uucp-new $@ $2 $: $1 < @ $2 .UUCP. > $3
13065556SericR$* < @ $=U . UUCP. > $*	$#uucp-old $@ $2 $: $1 < @ $2 .UUCP. > $3
13151259SericPOPDIVERT
132