home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / misc / volume41 / mailagnt / patch04 < prev    next >
Encoding:
Text File  |  1993-12-19  |  5.9 KB  |  208 lines
  1. Newsgroups: comp.sources.misc
  2. From: Raphael Manfredi <ram@acri.fr>
  3. Subject: v41i048:  mailagent - Flexible mail filtering and processing package, v3.0, Patch04
  4. Message-ID: <1993Dec19.214046.4774@sparky.sterling.com>
  5. X-Md4-Signature: 197bdb4319d8ea4e3e6ae3cf15aad932
  6. Sender: kent@sparky.sterling.com (Kent Landfield)
  7. Organization: Advanced Computer Research Institute, Lyon, France
  8. Date: Sun, 19 Dec 1993 21:40:46 GMT
  9. Approved: kent@sparky.sterling.com
  10.  
  11. Submitted-by: Raphael Manfredi <ram@acri.fr>
  12. Posting-number: Volume 41, Issue 48
  13. Archive-name: mailagent/patch04
  14. Environment: UNIX, Perl
  15. Patch-To: mailagent: Volume 41, Issue 1-26
  16.  
  17. [The latest patch for mailagent version 3.0 is #4.]
  18.  
  19. System: mailagent version 3.0
  20. Patch #: 4
  21. Priority: HIGH
  22. Subject: a regular expression got corrupted by an appliance of itself
  23. Subject: one spurious single quote still remained after patch3
  24. Date: Fri Dec 17 09:13:24 MET 1993
  25. From: Raphael Manfredi <ram@acri.fr>
  26.  
  27. Description:
  28.     A regular expression got corrupted by an appliance of itself. Indeed,
  29.     in maildist, there was a line saying:
  30.  
  31.         s|Locker:.*\$|\$|;
  32.     
  33.     whose aim was to remove RCS locker's marks (in RCS 4.3 I think)
  34.     when mailing distributions. Unfortunately, when maildist was asked
  35.     to mail the mailagent distribution, it applied this regexp on the
  36.     maildist.SH file and since this regexp is roughly self-matching,
  37.     it got transformed into:
  38.  
  39.         s|$|;
  40.  
  41.     This patch changes the regexp to:
  42.  
  43.         s|Lock[e]r:.*\$|\$|;
  44.         
  45.     so that it cannot apply to itself... Note that since the dist-3.0
  46.     tools also perform this substitution, the comp.sources.misc version
  47.     is corrupted as well...  Graham Stoney <greyham@research.canon.oz.au>
  48.     is to be thanked for reporting this bug, which of course I could
  49.     hardly spot since my master copy is not post-processed by dist-3.0
  50.     before being installed!
  51.  
  52.     One spurious single quote still remained after patch3 in the
  53.     agent/test/actions file.
  54.  
  55.  
  56. Fix:    From rn, say "| patch -p -N -d DIR", where DIR is your mailagent source
  57.     directory.  Outside of rn, say "cd DIR; patch -p -N <thisarticle".
  58.     If you don't have the patch program, apply the following by hand,
  59.     or get patch (version 2.0, latest patchlevel).
  60.  
  61.     After patching:
  62.         Configure -ders
  63.         make depend
  64.         make
  65.         make install
  66.  
  67.     If patch indicates that patchlevel is the wrong version, you may need
  68.     to apply one or more previous patches, or the patch may already
  69.     have been applied.  See the patchlevel.h file to find out what has or
  70.     has not been applied.  In any event, don't continue with the patch.
  71.  
  72.     If you are missing previous patches they can be obtained from me:
  73.  
  74.         Raphael Manfredi <ram@acri.fr>
  75.  
  76.     If you send a mail message of the following form it will greatly speed
  77.     processing:
  78.  
  79.         Subject: Command
  80.         @SH mailpatch PATH mailagent 3.0 LIST
  81.                ^ note the c
  82.  
  83.     where PATH is a return path FROM ME TO YOU either in Internet notation,
  84.     or in bang notation from some well-known host, and LIST is the number
  85.     of one or more patches you need, separated by spaces, commas, and/or
  86.     hyphens.  Saying 35- says everything from 35 to the end.
  87.  
  88.     To get some more detailed instructions, send me the following mail:
  89.  
  90.         Subject: Command
  91.         @SH mailhelp PATH
  92.  
  93.  
  94. Index: patchlevel.h
  95. Prereq: 3
  96. 4c4
  97. < #define PATCHLEVEL 3
  98. ---
  99. > #define PATCHLEVEL 4
  100.  
  101. Index: agent/maildist.SH
  102. Prereq: 3.0
  103. *** agent/maildist.SH.old    Fri Dec 17 09:13:22 1993
  104. --- agent/maildist.SH    Fri Dec 17 09:13:22 1993
  105. ***************
  106. *** 20,26 ****
  107.       eval "exec perl -S \$0 \$*"
  108.           if \$running_under_some_shell;
  109.   
  110. ! # $Id: maildist.SH,v 3.0 1993/11/29 13:48:23 ram Exp $
  111.   #
  112.   #  Copyright (c) 1990-1993, Raphael Manfredi
  113.   #  
  114. --- 20,26 ----
  115.       eval "exec perl -S \$0 \$*"
  116.           if \$running_under_some_shell;
  117.   
  118. ! # $Id: maildist.SH,v 3.0.1.1 1993/12/17 08:12:18 ram Exp $
  119.   #
  120.   #  Copyright (c) 1990-1993, Raphael Manfredi
  121.   #  
  122. ***************
  123. *** 31,36 ****
  124. --- 31,39 ----
  125.   #  of the source tree for mailagent 3.0.
  126.   #
  127.   # $Log: maildist.SH,v $
  128. + # Revision 3.0.1.1  1993/12/17  08:12:18  ram
  129. + # patch4: a regular expression got corrupted by an appliance of itself
  130. + #
  131.   # Revision 3.0  1993/11/29  13:48:23  ram
  132.   # Baseline for mailagent 3.0 netwide release.
  133.   #
  134. ***************
  135. *** 297,303 ****
  136.                   &abort("cannot open $location/$file");
  137.           }
  138.           while (<FILE>) {
  139. !             s|$|;      # Remove locker mark
  140.               (print COPY) || &abort("copy error: $!");
  141.           }
  142.           close(FILE) || &abort("copy error: $!");
  143. --- 300,308 ----
  144.                   &abort("cannot open $location/$file");
  145.           }
  146.           while (<FILE>) {
  147. !             # Use Lock[e]r, not Locker, since we might apply this on
  148. !             # ourself one day and get corrupted...
  149. !             s|Lock[e]r:.*\$|\$|;      # Remove locker mark
  150.               (print COPY) || &abort("copy error: $!");
  151.           }
  152.           close(FILE) || &abort("copy error: $!");
  153.  
  154. Index: agent/test/actions
  155. Prereq: 3.0.1.1
  156. *** agent/test/actions.old    Fri Dec 17 09:13:23 1993
  157. --- agent/test/actions    Fri Dec 17 09:13:23 1993
  158. ***************
  159. *** 2,8 ****
  160.   # Mailagent rules for action regression tests
  161.   #
  162.   
  163. ! # $Id: actions,v 3.0.1.1 1993/12/15 09:05:21 ram Exp $
  164.   #
  165.   #  Copyright (c) 1990-1993, Raphael Manfredi
  166.   #  
  167. --- 2,8 ----
  168.   # Mailagent rules for action regression tests
  169.   #
  170.   
  171. ! # $Id: actions,v 3.0.1.2 1993/12/17 08:13:20 ram Exp $
  172.   #
  173.   #  Copyright (c) 1990-1993, Raphael Manfredi
  174.   #  
  175. ***************
  176. *** 13,18 ****
  177. --- 13,21 ----
  178.   #  of the source tree for mailagent 3.0.
  179.   #
  180.   # $Log: actions,v $
  181. + # Revision 3.0.1.2  1993/12/17  08:13:20  ram
  182. + # patch4: one spurious single quote still remained after patch3
  183. + #
  184.   # Revision 3.0.1.1  1993/12/15  09:05:21  ram
  185.   # patch3: extra closing single quote removed (was there since 2.9 PL0)
  186.   #
  187. ***************
  188. *** 59,65 ****
  189.       ASSIGN :ram %#:ram + 4;
  190.       ASSIGN other '1+2';
  191.       ASSIGN final %#other + 4;
  192. !     RUN /bin/echo '%#:ram,%#other,%#final' > output';
  193.   }
  194.   
  195.   X-Tag: /back/
  196. --- 62,68 ----
  197.       ASSIGN :ram %#:ram + 4;
  198.       ASSIGN other '1+2';
  199.       ASSIGN final %#other + 4;
  200. !     RUN /bin/echo '%#:ram,%#other,%#final' > output;
  201.   }
  202.   
  203.   X-Tag: /back/
  204.  
  205. *** End of Patch 4 ***
  206.  
  207. exit 0 # Just in case...
  208.