uucp.m4
上传用户:xu_441
上传日期:2007-01-04
资源大小:1640k
文件大小:5k
源码类别:

Email客户端

开发平台:

Unix_Linux

  1. PUSHDIVERT(-1)
  2. #
  3. # Copyright (c) 1998, 1999 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. ifdef(`_MAILER_smtp_', `',
  15. `errprint(`*** MAILER(`smtp') must appear before MAILER(`uucp')')')dnl
  16. ifdef(`UUCP_MAILER_PATH',, `define(`UUCP_MAILER_PATH', /usr/bin/uux)')
  17. ifdef(`UUCP_MAILER_ARGS',, `define(`UUCP_MAILER_ARGS', `uux - -r -a$g -gC $h!rmail ($u)')')
  18. _DEFIFNOT(`UUCP_MAILER_FLAGS', `')
  19. ifdef(`UUCP_MAILER_MAX',,
  20. `define(`UUCP_MAILER_MAX',
  21. `ifdef(`UUCP_MAX_SIZE', `UUCP_MAX_SIZE', 100000)')')
  22. POPDIVERT
  23. #####################################
  24. ###   UUCP Mailer specification   ###
  25. #####################################
  26. VERSIONID(`$Id: uucp.m4,v 8.38 1999/10/18 04:57:55 gshapiro Exp $')
  27. #
  28. #  envelope and header sender rewriting
  29. #
  30. SFromU=12
  31. # handle error address as a special case
  32. R<@> $n errors to mailer-daemon
  33. # list:; syntax should disappear
  34. R:; <@> $@
  35. R$* < @ $* . > $* $1 < @ $2 > $3 strip trailing dots
  36. R$* < @ $=w > $1 strip local name
  37. R<@ $- . UUCP > : $+ $1 ! $2 convert to UUCP format
  38. R<@ $+ > : $+ $1 ! $2 convert to UUCP format
  39. R$* < @ $- . UUCP > $2 ! $1 convert to UUCP format
  40. R$* < @ $+ > $2 ! $1 convert to UUCP format
  41. R$&h ! $+ ! $+ $@ $1 ! $2 $h!...!user => ...!user
  42. R$&h ! $+ $@ $&h ! $1 $h!user => $h!user
  43. R$+ $: $U ! $1 prepend our name
  44. R! $+ $: $k ! $1 in case $U undefined
  45. #
  46. #  envelope recipient rewriting
  47. #
  48. SEnvToU=22
  49. # list:; should disappear
  50. R:; <@> $@
  51. R$* < @ $* . > $* $1 < @ $2 > $3 strip trailing dots
  52. R$* < @ $=w > $1 strip local name
  53. R<@ $- . UUCP > : $+ $1 ! $2 convert to UUCP format
  54. R<@ $+ > : $+ $1 ! $2 convert to UUCP format
  55. R$* < @ $- . UUCP > $2 ! $1 convert to UUCP format
  56. R$* < @ $+ > $2 ! $1 convert to UUCP format
  57. #
  58. #  header recipient rewriting
  59. #
  60. SHdrToU=42
  61. # list:; syntax should disappear
  62. R:; <@> $@
  63. R$* < @ $* . > $* $1 < @ $2 > $3 strip trailing dots
  64. R$* < @ $=w > $1 strip local name
  65. R<@ $- . UUCP > : $+ $1 ! $2 convert to UUCP format
  66. R<@ $+ > : $+ $1 ! $2 convert to UUCP format
  67. R$* < @ $- . UUCP > $2 ! $1 convert to UUCP format
  68. R$* < @ $+ > $2 ! $1 convert to UUCP format
  69. R$&h ! $+ ! $+ $@ $1 ! $2 $h!...!user => ...!user
  70. R$&h ! $+ $@ $&h ! $1 $h!user => $h!user
  71. R$+ $: $U ! $1 prepend our name
  72. R! $+ $: $k ! $1 in case $U undefined
  73. ifdef(`_MAILER_smtp_',
  74. `#
  75. #  envelope sender rewriting for uucp-dom mailer
  76. #
  77. SEnvFromUD=52
  78. # handle error address as a special case
  79. R<@> $n errors to mailer-daemon
  80. # pass everything to standard SMTP mailer rewriting
  81. R$* $@ $>EnvFromSMTP $1
  82. #
  83. #  envelope sender rewriting for uucp-uudom mailer
  84. #
  85. SEnvFromUUD=72
  86. # handle error address as a special case
  87. R<@> $n errors to mailer-daemon
  88. # do standard SMTP mailer rewriting
  89. R$* $: $>EnvFromSMTP $1
  90. R$* < @ $* . > $* $1 < @ $2 > $3 strip trailing dots
  91. R<@ $- . UUCP > : $+ $@ $1 ! $2 convert to UUCP format
  92. R<@ $+ > : $+ $@ $1 ! $2 convert to UUCP format
  93. R$* < @ $- . UUCP > $@ $2 ! $1 convert to UUCP format
  94. R$* < @ $+ > $@ $2 ! $1 convert to UUCP format')
  95. PUSHDIVERT(4)
  96. # resolve locally connected UUCP links
  97. R$* < @ $=Z . UUCP. > $* $#uucp-uudom $@ $2 $: $1 < @ $2 .UUCP. > $3
  98. R$* < @ $=Y . UUCP. > $* $#uucp-new $@ $2 $: $1 < @ $2 .UUCP. > $3
  99. R$* < @ $=U . UUCP. > $* $#uucp-old $@ $2 $: $1 < @ $2 .UUCP. > $3
  100. POPDIVERT
  101. #
  102. #  There are innumerable variations on the UUCP mailer.  It really
  103. #  is rather absurd.
  104. #
  105. # old UUCP mailer (two names)
  106. Muucp, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`DFMhuUd', UUCP_MAILER_FLAGS), `UUCP'), S=FromU, R=EnvToU/HdrToU,
  107. M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,
  108. A=UUCP_MAILER_ARGS
  109. Muucp-old, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`DFMhuUd', UUCP_MAILER_FLAGS), `UUCP'), S=FromU, R=EnvToU/HdrToU,
  110. M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,
  111. A=UUCP_MAILER_ARGS
  112. # smart UUCP mailer (handles multiple addresses) (two names)
  113. Msuucp, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`mDFMhuUd', UUCP_MAILER_FLAGS), `UUCP'), S=FromU, R=EnvToU/HdrToU,
  114.  M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,
  115. A=UUCP_MAILER_ARGS
  116. Muucp-new, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`mDFMhuUd', UUCP_MAILER_FLAGS), `UUCP'), S=FromU, R=EnvToU/HdrToU,
  117. M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,
  118. A=UUCP_MAILER_ARGS
  119. ifdef(`_MAILER_smtp_',
  120. `# domain-ized UUCP mailer
  121. Muucp-dom, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`mDFMhud', UUCP_MAILER_FLAGS), `UUCP'), S=EnvFromUD/HdrFromSMTP, R=ifdef(`_ALL_MASQUERADE_', `EnvToSMTP/HdrFromSMTP', `EnvToSMTP'),
  122. M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,
  123. A=UUCP_MAILER_ARGS
  124. # domain-ized UUCP mailer with UUCP-style sender envelope
  125. Muucp-uudom, P=UUCP_MAILER_PATH, F=_MODMF_(CONCAT(`mDFMhud', UUCP_MAILER_FLAGS), `UUCP'), S=EnvFromUUD/HdrFromSMTP, R=ifdef(`_ALL_MASQUERADE_', `EnvToSMTP/HdrFromSMTP', `EnvToSMTP'),
  126. M=UUCP_MAILER_MAX, _OPTINS(`UUCP_MAILER_CHARSET', `C=', `, ')T=X-UUCP/X-UUCP/X-Unix,
  127. A=UUCP_MAILER_ARGS')