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     ! 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.