contrib/sendmail-8.13.8/cf/mailer/smtp.m4

   1 PUSHDIVERT(-1)
   2 #
   3 # Copyright (c) 1998-2001 Sendmail, Inc. and its suppliers.
   4 #       All rights reserved.
   5 # Copyright (c) 1983 Eric P. Allman.  All rights reserved.
   6 # Copyright (c) 1988, 1993
   7 #       The Regents of the University of California.  All rights reserved.
   8 #
   9 # By using this file, you agree to the terms and conditions set
  10 # forth in the LICENSE file which can be found at the top level of
  11 # the sendmail distribution.
  12 #
  13 #
  14 _DEFIFNOT(`_DEF_SMTP_MAILER_FLAGS', `mDFMuX')
  15 _DEFIFNOT(`SMTP_MAILER_FLAGS',`')
  16 _DEFIFNOT(`RELAY_MAILER_FLAGS', `SMTP_MAILER_FLAGS')
  17 ifdef(`SMTP_MAILER_ARGS',, `define(`SMTP_MAILER_ARGS', `TCP $h')')
  18 ifdef(`ESMTP_MAILER_ARGS',, `define(`ESMTP_MAILER_ARGS', `TCP $h')')
  19 ifdef(`SMTP8_MAILER_ARGS',, `define(`SMTP8_MAILER_ARGS', `TCP $h')')
  20 ifdef(`DSMTP_MAILER_ARGS',, `define(`DSMTP_MAILER_ARGS', `TCP $h')')
  21 ifdef(`RELAY_MAILER_ARGS',, `define(`RELAY_MAILER_ARGS', `TCP $h')')
  22 define(`_SMTP_QGRP', `ifelse(defn(`SMTP_MAILER_QGRP'),`',`', ` Q=SMTP_MAILER_QGRP,')')dnl
  23 define(`_ESMTP_QGRP', `ifelse(defn(`ESMTP_MAILER_QGRP'),`',`', ` Q=ESMTP_MAILER_QGRP,')')dnl
  24 define(`_SMTP8_QGRP', `ifelse(defn(`SMTP8_MAILER_QGRP'),`',`', ` Q=SMTP8_MAILER_QGRP,')')dnl
  25 define(`_DSMTP_QGRP', `ifelse(defn(`DSMTP_MAILER_QGRP'),`',`', ` Q=DSMTP_MAILER_QGRP,')')dnl
  26 define(`_RELAY_QGRP', `ifelse(defn(`RELAY_MAILER_QGRP'),`',`', ` Q=RELAY_MAILER_QGRP,')')dnl
  27 POPDIVERT
  28 #####################################
  29 ###   SMTP Mailer specification   ###
  30 #####################################
  31
  32 VERSIONID(`$Id: smtp.m4,v 8.64 2001/04/03 01:52:54 gshapiro Exp $')
  33
  34 #
  35 #  common sender and masquerading recipient rewriting
  36 #
  37 SMasqSMTP
  38 R$* < @ $* > $*         $@ $1 < @ $2 > $3               already fully qualified
  39 R$+                     $@ $1 < @ *LOCAL* >             add local qualification
  40
  41 #
  42 #  convert pseudo-domain addresses to real domain addresses
  43 #
  44 SPseudoToReal
  45
  46 # pass <route-addr>s through
  47 R< @ $+ > $*            $@ < @ $1 > $2                  resolve <route-addr>
  48
  49 # output fake domains as user%fake@relay
  50 ifdef(`BITNET_RELAY',
  51 `R$+ <@ $+ .BITNET. >   $: $1 % $2 .BITNET < @ $B >     user@host.BITNET
  52 R$+.BITNET <@ $~[ $*:$+ >       $: $1 .BITNET < @ $4 >  strip mailer: part',
  53         `dnl')
  54 ifdef(`_NO_UUCP_', `dnl', `
  55 # do UUCP heuristics; note that these are shared with UUCP mailers
  56 R$+ < @ $+ .UUCP. >     $: < $2 ! > $1                  convert to UUCP form
  57 R$+ < @ $* > $*         $@ $1 < @ $2 > $3               not UUCP form
  58
  59 # leave these in .UUCP form to avoid further tampering
  60 R< $&h ! > $- ! $+      $@ $2 < @ $1 .UUCP. >
  61 R< $&h ! > $-.$+ ! $+   $@ $3 < @ $1.$2 >
  62 R< $&h ! > $+           $@ $1 < @ $&h .UUCP. >
  63 R< $+ ! > $+            $: $1 ! $2 < @ $Y >             use UUCP_RELAY
  64 R$+ < @ $~[ $* : $+ >   $@ $1 < @ $4 >                  strip mailer: part
  65 R$+ < @ >               $: $1 < @ *LOCAL* >             if no UUCP_RELAY')
  66
  67
  68 #
  69 #  envelope sender rewriting
  70 #
  71 SEnvFromSMTP
  72 R$+                     $: $>PseudoToReal $1            sender/recipient common
  73 R$* :; <@>              $@                              list:; special case
  74 R$*                     $: $>MasqSMTP $1                qualify unqual'ed names
  75 R$+                     $: $>MasqEnv $1                 do masquerading
  76
  77
  78 #
  79 #  envelope recipient rewriting --
  80 #  also header recipient if not masquerading recipients
  81 #
  82 SEnvToSMTP
  83 R$+                     $: $>PseudoToReal $1            sender/recipient common
  84 R$+                     $: $>MasqSMTP $1                qualify unqual'ed names
  85 R$* < @ *LOCAL* > $*    $: $1 < @ $j . > $2
  86
  87 #
  88 #  header sender and masquerading header recipient rewriting
  89 #
  90 SHdrFromSMTP
  91 R$+                     $: $>PseudoToReal $1            sender/recipient common
  92 R:; <@>                 $@                              list:; special case
  93
  94 # do special header rewriting
  95 R$* <@> $*              $@ $1 <@> $2                    pass null host through
  96 R< @ $* > $*            $@ < @ $1 > $2                  pass route-addr through
  97 R$*                     $: $>MasqSMTP $1                qualify unqual'ed names
  98 R$+                     $: $>MasqHdr $1                 do masquerading
  99
 100
 101 #
 102 #  relay mailer header masquerading recipient rewriting
 103 #
 104 SMasqRelay
 105 R$+                     $: $>MasqSMTP $1
 106 R$+                     $: $>MasqHdr $1
 107
 108 Msmtp,          P=[IPC], F=_MODMF_(CONCAT(_DEF_SMTP_MAILER_FLAGS, SMTP_MAILER_FLAGS), `SMTP'), S=EnvFromSMTP/HdrFromSMTP, R=ifdef(`_ALL_MASQUERADE_', `EnvToSMTP/HdrFromSMTP', `EnvToSMTP'), E=\r\n, L=990,
 109                 _OPTINS(`SMTP_MAILER_MAX', `M=', `, ')_OPTINS(`SMTP_MAILER_MAXMSGS', `m=', `, ')_OPTINS(`SMTP_MAILER_MAXRCPTS', `r=', `, ')_OPTINS(`SMTP_MAILER_CHARSET', `C=', `, ')T=DNS/RFC822/SMTP,_SMTP_QGRP
 110                 A=SMTP_MAILER_ARGS
 111 Mesmtp,         P=[IPC], F=_MODMF_(CONCAT(_DEF_SMTP_MAILER_FLAGS, `a', SMTP_MAILER_FLAGS), `ESMTP'), S=EnvFromSMTP/HdrFromSMTP, R=ifdef(`_ALL_MASQUERADE_', `EnvToSMTP/HdrFromSMTP', `EnvToSMTP'), E=\r\n, L=990,
 112                 _OPTINS(`SMTP_MAILER_MAX', `M=', `, ')_OPTINS(`SMTP_MAILER_MAXMSGS', `m=', `, ')_OPTINS(`SMTP_MAILER_MAXRCPTS', `r=', `, ')_OPTINS(`SMTP_MAILER_CHARSET', `C=', `, ')T=DNS/RFC822/SMTP,_ESMTP_QGRP
 113                 A=ESMTP_MAILER_ARGS
 114 Msmtp8,         P=[IPC], F=_MODMF_(CONCAT(_DEF_SMTP_MAILER_FLAGS, `8', SMTP_MAILER_FLAGS), `SMTP8'), S=EnvFromSMTP/HdrFromSMTP, R=ifdef(`_ALL_MASQUERADE_', `EnvToSMTP/HdrFromSMTP', `EnvToSMTP'), E=\r\n, L=990,
 115                 _OPTINS(`SMTP_MAILER_MAX', `M=', `, ')_OPTINS(`SMTP_MAILER_MAXMSGS', `m=', `, ')_OPTINS(`SMTP_MAILER_MAXRCPTS', `r=', `, ')_OPTINS(`SMTP_MAILER_CHARSET', `C=', `, ')T=DNS/RFC822/SMTP,_SMTP8_QGRP
 116                 A=SMTP8_MAILER_ARGS
 117 Mdsmtp,         P=[IPC], F=_MODMF_(CONCAT(_DEF_SMTP_MAILER_FLAGS, `a%', SMTP_MAILER_FLAGS), `DSMTP'), S=EnvFromSMTP/HdrFromSMTP, R=ifdef(`_ALL_MASQUERADE_', `EnvToSMTP/HdrFromSMTP', `EnvToSMTP'), E=\r\n, L=990,
 118                 _OPTINS(`SMTP_MAILER_MAX', `M=', `, ')_OPTINS(`SMTP_MAILER_MAXMSGS', `m=', `, ')_OPTINS(`SMTP_MAILER_MAXRCPTS', `r=', `, ')_OPTINS(`SMTP_MAILER_CHARSET', `C=', `, ')T=DNS/RFC822/SMTP,_DSMTP_QGRP
 119                 A=DSMTP_MAILER_ARGS
 120 Mrelay,         P=[IPC], F=_MODMF_(CONCAT(_DEF_SMTP_MAILER_FLAGS, `a8', RELAY_MAILER_FLAGS), `RELAY'), S=EnvFromSMTP/HdrFromSMTP, R=ifdef(`_ALL_MASQUERADE_', `MasqSMTP/MasqRelay', `MasqSMTP'), E=\r\n, L=2040,
 121                 _OPTINS(`RELAY_MAILER_CHARSET', `C=', `, ')_OPTINS(`RELAY_MAILER_MAXMSGS', `m=', `, ')_OPTINS(`SMTP_MAILER_MAXRCPTS', `r=', `, ')T=DNS/RFC822/SMTP,_RELAY_QGRP
 122                 A=RELAY_MAILER_ARGS