1PUSHDIVERT(-1) 2# 3# Copyright (c) 1983 Eric P. Allman 4# Copyright (c) 1988 The Regents of the University of California. 5# All rights reserved. 6# 7# %sccs.include.redist.sh% 8# 9 10ifdef(`UUCP_MAILER_PATH',, `define(`UUCP_MAILER_PATH', /usr/bin/uux)') 11POPDIVERT 12##################################### 13### UUCP Mailer specification ### 14##################################### 15 16VERSIONID(`@(#)uucp.m4 6.10 (Berkeley) 03/24/93') 17 18Msuucp, P=UUCP_MAILER_PATH, F=mDFMhuU, S=12, R=22, M=100000, 19 A=uux - -r -z -a$f -gC $h!rmail ($u) 20 21Muucp, P=UUCP_MAILER_PATH, F=DFMhuU, S=12, R=22, M=100000, 22 A=uux - -r -z -a$f -gC $h!rmail ($u) 23 24# sender rewriting 25S12 26 27# handle error address as a special case 28R<@> $n errors to mailer-daemon 29 30# don't qualify list:; syntax 31R$* :; <@> $@ $1 :; 32 33R$* < @ $* . > $1 < @ $2 > strip trailing dots 34R$* < @ $j > $1 strip local name 35R$* < @ $- . UUCP > $2 ! $1 convert to UUCP format 36R$* < @ $+ > $2 ! $1 convert to UUCP format 37R$+ $: $k ! $1 prepend our name 38 39# recipient rewriting 40S22 41 42# don't touch list:; syntax 43R$* :; <@> $@ $1 ;: 44 45R$* < @ $* . > $1 < @ $2 > strip trailing dots 46R$* < @ $j > $1 strip local name 47R$* < @ $- . UUCP > $2 ! $1 convert to UUCP format 48R$* < @ $+ > $2 ! $1 convert to UUCP format 49 50PUSHDIVERT(4) 51# resolve locally connected UUCP links 52R< @ $=Y . UUCP > : $+ $#suucp $@ $1 $: $1:$2 @host.UUCP: ... 53R< @ $=U . UUCP > : $+ $#uucp $@ $1 $: $1:$2 @host.UUCP: ... 54R$+ < @ $=Y . UUCP > $#suucp $@ $2 $: $1 user@host.UUCP 55R$+ < @ $=U . UUCP > $#uucp $@ $2 $: $1 user@host.UUCP 56POPDIVERT 57