Return to nstcpm.m4 CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / usr.lib / sendmail / cf / m4

Annotation of 43BSDTahoe/usr.lib/sendmail/cf/m4/nstcpm.m4, revision 1.1.1.1

1.1       root        1: divert(10)
                      2: #
                      3: #  Sendmail
                      4: #  Copyright (c) 1983  Eric P. Allman
                      5: #  Berkeley, California
                      6: #
                      7: #  Copyright (c) 1983 Regents of the University of California.
                      8: #  All rights reserved.  The Berkeley software License Agreement
                      9: #  specifies the terms and conditions for redistribution.
                     10: #
                     11: #      @(#)nstcpm.m4   1.19 (Berkeley) 3/31/88
                     12: #
                     13: divert(0)
                     14: ############################################################
                     15: ############################################################
                     16: #####
                     17: #####          Arpanet TCP Mailer specification
                     18: #####
                     19: #####  Messages processed by this specification are assumed to leave
                     20: #####  the local domain -- hence, they must be canonical according to
                     21: #####  RFC822 etc.
                     22: #####
                     23: #####  This mailer is to be used with the Berkeley Name Server.
                     24: #####
                     25: ############################################################
                     26: ############################################################
                     27: 
                     28: Mtcp,  P=[IPC], F=mDFMueXLC, S=14, R=24, A=IPC $h, E=\r\n
                     29: 
                     30: S14
                     31: 
                     32: # pass <route-addr>'s through
                     33: R<@$+>$*               $@<@$[$1$]>$2                   resolve <route-addr>
                     34: 
                     35: # map colons to dots everywhere
                     36: R$*:$*                 $1.$2                           map colons to dots
                     37: 
                     38: # output local host in [email protected] syntax
                     39: R$-                    $1<@$w>                         user w/o host
                     40: R$+<@$=w>              $:$1<@$w>                       this host
                     41: R$+<@$->               $:$1<@$[$2$]>                   canonicalize into dom
                     42: R$+<@$->               $:$1<@$2.$D>                    if nameserver fails
                     43: R$+<@$=N.$D>           $@$1<@$2.$D>                    nic-reg hosts are ok
                     44: R$+<@$*.$D>            $@$1%$2.$D<@$A>                 else -> u%h@gateway
                     45: 
                     46: # if not local, and not a "fake" domain, ask the nameserver
                     47: R$+<@$+.$~I>           $@$1<@$[$2.$3$]>                [email protected]
                     48: R$+<@[$+]>             $@$1<@[$2]>                     already ok
                     49: 
                     50: # output internal ("fake") domains as "user%host@relay"
                     51: 
                     52: R$+<@$+.CSNET>         $@$1%$2.CSNET<@relay.cs.net>    [email protected]
                     53: R$+<@$+.BITNET>                $@$1%$2.BITNET<@jade.berkeley.edu> [email protected]
                     54: R$+<@$+.UUCP>          $@$2!$1<@$w>                    [email protected]
                     55: 
                     56: 
                     57: S24
                     58: 
                     59: # put in <> kludge
                     60: R$*<$*>$*              $1$2$3                          defocus
                     61: R$*                    $:$>3$1                         now canonical form
                     62: 
                     63: # pass <route-addr>'s through
                     64: R<@$+>$*               $@<@$[$1$]>$2                   resolve <route-addr>
                     65: 
                     66: # map colons to dots everywhere.....
                     67: R$*:$*                 $1.$2                           map colons to dots
                     68: 
                     69: # output local host in [email protected] syntax
                     70: R$-                    $1<@$w>                         user w/o host
                     71: R$+<@$=w>              $:$1<@$w>                       this host
                     72: R$+<@$->               $:$1<@$[$2$]>                   canonicalize into dom
                     73: R$+<@$->               $:$1<@$2.$D>                    if nameserver fails
                     74: R$+<@$=N.$D>           $@$1<@$2.$D>                    nic-reg hosts are ok
                     75: R$+<@$*.$D>            $@$1%$2.$D<@$A>                 else -> u%h@gateway
                     76: 
                     77: # if not local, and not a "fake" domain, ask the nameserver
                     78: R$+<@$+.$~I>           $@$1<@$[$2.$3$]>                [email protected]
                     79: R$+<@[$+]>             $@$1<@[$2]>                     already ok
                     80: 
                     81: # Hide fake domains behind gateways
                     82: 
                     83: R$+<@$+.CSNET>         $@$1%$2.CSNET<@relay.cs.net>    [email protected]
                     84: R$+<@$+.BITNET>                $@$1<@$2.BITNET>                [email protected]
                     85: R$+<@$+.UUCP>          $@$2!$1                         [email protected]
                     86: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.