|
|
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: # @(#)nstcpldm.m4 1.3 (Berkeley) 5/1/86 ! 12: # ! 13: divert(0) ! 14: ############################################################ ! 15: ############################################################ ! 16: ##### ! 17: ##### Local Domain TCP Mailer specification ! 18: ##### ! 19: ##### Messages processed by this specification are assumed to remain ! 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: Mtcpld, P=[IPC], F=mDFMueXLC, S=17, R=27, A=IPC $h, E=\r\n ! 29: ! 30: S17 ! 31: ! 32: # cleanup forwarding a bit ! 33: R$*<$*>$* $1$2$3 defocus ! 34: R$* $:$>3$1 canonicalize ! 35: R$*%$*<@LOCAL> $:$>9$1%$2 user%localhost@localdomain ! 36: ! 37: # pass <route-addr>'s through ! 38: R<@$+>$* $@<@$[$1$]>$2 resolve <route-addr> ! 39: ! 40: # map colons to dots everywhere..... ! 41: R$*:$* $1.$2 map colons to dots ! 42: ! 43: # handle the simple case.... ! 44: R$+<@$-.ARPA> $@$1<@$[$2.ARPA$]> [email protected] ! 45: ! 46: # fully qualify computer center names so the rest works nicely ! 47: R$+<@$=C> $1<@$2.$D> [email protected] ! 48: ! 49: # output local host in [email protected] syntax ! 50: R$+<@LOCAL> $:$1<@$w> this host ! 51: R$+<@$-> $:$1<@$[$2$]> check for local domain ! 52: R$+<@$+.LOCAL> $@$1<@$2.$D> nic-reg local hosts ! 53: R$+<@$=w> $@$1<@$w.$D> user@this_host.berkeley.edu ! 54: ! 55: # output local hosts in user%[email protected] syntax ! 56: ! 57: R$+<@$+.CSNET> $@$1%$2.CSNET<@CSNET-RELAY.ARPA> [email protected] ! 58: R$+<@$+.DEC> $@$1%$2.DEC<@decwrl.dec.com> [email protected] ! 59: R$+<@$+.OZ.AU> $@$1%$2.OZ.AU<@seismo.css.gov> [email protected] ! 60: R$+<@$+.UUCP> $@$2!$1<@$w> [email protected] ! 61: R$+<@$+.$=P> $@$1<@$[$2.$3$]> user@host.{mil,edu,...} ! 62: R$+<@$+.$=K> $@$1%$2.$3<@$w> [email protected] ! 63: R$+<@$*$=Z> $@$1%$2$3<@$w> ! 64: ! 65: # handle other external cases ! 66: R$+<@$-> $@$1<@$[$2$]> no .ARPA on simple names ! 67: #R$+<@$+.$-.ARPA> $@$1%$2<@$[$3.ARPA$]> approximate something ! 68: R$+<@[$+]> $@$1<@[$2]> already ok ! 69: R$+<@$+> $@$1<@$[$2$]> set for named ! 70: ! 71: # convert remaining addresses to old format and externalize appropriately ! 72: R$+ $:$>5$1 => old format ! 73: R$-:$+ $@$1.$2<@$w> convert berk hosts ! 74: #R$+<@$+> $@$1%$2<@$w> pessmize ! 75: R$+ $:$1<@$w> tack on our hostname ! 76: R$+<@$=w> $:$1<@$w.$D> wher $w doesn't have .b.e ! 77: R$+%$=R<@$=A> $1<@$[$3$]> strip unneeded relay ! 78: ! 79: S27 ! 80: ! 81: # put in <> kludge ! 82: R$*<$*>$* $1$2$3 defocus ! 83: R$* $:$>3$1 now canonical form ! 84: R$*%$*<@LOCAL> $:$>9$1%$2 user%localhost@localdomain ! 85: ! 86: # pass <route-addr>'s through ! 87: R<@$+>$* $@<@$[$1$]>$2 resolve <route-addr> ! 88: ! 89: # map colons to dots everywhere..... ! 90: R$*:$* $1.$2 map colons to dots ! 91: ! 92: # handle the simple case.... ! 93: R$+<@$-.ARPA> $@$1<@$[$2.ARPA$]> [email protected] ! 94: ! 95: # fully qualify computer center names so the rest works nicely ! 96: R$+<@$=C> $1<@$2.$D> [email protected] ! 97: ! 98: # output local host in [email protected] syntax ! 99: R$+<@$=w> $@$1<@$w> this host ! 100: R$+<@LOCAL> $@$1<@$w> this host ! 101: R$+<@$+.LOCAL> $@$1<@$2.$D> local hosts ! 102: ! 103: # output local hosts in user%[email protected] syntax ! 104: ! 105: R$+<@$+.CSNET> $@$1%$2.CSNET<@CSNET-RELAY.ARPA> [email protected] ! 106: R$+<@$+.DEC> $@$1%$2.DEC<@decwrl.dec.com> [email protected] ! 107: R$+<@$+.OZ.AU> $@$1%$2.OZ.AU<@seismo.css.gov> [email protected] ! 108: R$+<@$+.UUCP> $@$2!$1 [email protected] ! 109: R$+<@$+.BITNET> $@$1<@$2.BITNET> [email protected] ! 110: R$+<@$+.$=P> $@$1<@$[$2.$3$]> user@host.{mil,edu,...} ! 111: R$+<@$+.$=K> $@$1%$2.$3<@$w> [email protected] ! 112: R$+<@$=Z> $@$1<@$2> berkhosts ! 113: ! 114: # handle other external cases ! 115: R$+<@$-> $@$1<@$[$2$]> no .ARPA on simple names ! 116: #R$+<@$+.$-.ARPA> $@$1%$2<@$[$3.ARPA$]> approximate something ! 117: R$+<@[$+]> $@$1<@[$2]> already ok ! 118: R$+<@$+> $@$1<@$[$2$]> set for named ! 119: ! 120: # convert remaining addresses to old format and externalize appropriately ! 121: R$+ $:$>5$1 => old format ! 122: R$-:$+ $@$1.$2<@$w> convert berk hosts ! 123: #R$+<@$+> $@$1%$2<@$w> pessmize ! 124: R$+ $:$1<@$w> tack on our hostname ! 125: R$+%$=R<@$=A> $1<@$[$3$]> strip unneeded relay ! 126:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.