home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / mail / elm / 3356 < prev    next >
Encoding:
Text File  |  1992-11-17  |  54.8 KB  |  1,735 lines
  1. Xref: sparky comp.mail.elm:3356 comp.sources.bugs:274
  2. Newsgroups: comp.mail.elm,comp.sources.bugs
  3. Path: sparky!uunet!ukma!cs.widener.edu!dsinc!syd
  4. From: syd@dsinc.DSI.COM (Syd Weinstein)
  5. Subject: elm 2.4 Patch #10
  6. Message-ID: <1992Nov17.191905.8133@DSI.COM>
  7. Followup-To: poster
  8. Summary: This is an official patch for elm 2.4 system.  Please apply it.
  9. Sender: syd@DSI.COM (Syd Weinstein)
  10. Priority: HIGH
  11. Organization: Datacomp Systems, Inc., Huntingdon Valley, PA 19006
  12. Date: Tue, 17 Nov 1992 19:19:05 GMT
  13. Lines: 1720
  14.  
  15. part 2 of a 2 part patch
  16.  
  17. Fix:    From rn, say "| patch -p -N -d DIR", where DIR is your elm source
  18.     directory.  Outside of rn, say "cd DIR; patch -p -N <thisarticle".
  19.     If you don't have the patch program, apply the following by hand,
  20.     or get patch (version 2.0, latest patchlevel).
  21.  
  22.     After patching:
  23.         sh Configure -d
  24.         make
  25.         make install
  26.  
  27.     If patch indicates that patchlevel is the wrong version, you may need
  28.     to apply one or more previous patches, or the patch may already
  29.     have been applied.  See the patchlevel.h file to find out what has or
  30.     has not been applied.  In any event, don't continue with the patch.
  31.  
  32.     If you are missing previous patches they can be obtained from our:
  33.     archive server.
  34.  
  35.     Syd Weinstein
  36.     elm@DSI.COM
  37.  
  38.     The patches are available from the dsinc archive server
  39.     Send the following message to archive-server@DSI.COM for
  40.     a list of available patches:
  41.  
  42.     Subject: patch list
  43.     send index elm
  44.  
  45. Index: hdrs/patchlevel.h
  46. Prereq: "9"
  47. *** ../elm2.4/hdrs/patchlevel.h    Tue Nov 10 15:20:28 1992
  48. --- hdrs/patchlevel.h    Sat Nov 14 16:40:24 1992
  49. ***************
  50. *** 1 ****
  51. ! #define PATCHLEVEL "9"
  52. --- 1 ----
  53. ! #define PATCHLEVEL "10"
  54.  
  55. Index: filter/rules.c
  56. Prereq: 5.1
  57. *** ../elm2.4/filter/rules.c    Sat Oct  3 18:18:29 1992
  58. --- filter/rules.c    Mon Nov 16 23:10:02 1992
  59. ***************
  60. *** 1,8 ****
  61.   
  62. ! static char rcsid[] ="@(#)$Id: rules.c,v 5.1 1992/10/03 22:18:09 syd Exp $";
  63.   
  64.   /*******************************************************************************
  65. !  *  The Elm Mail System  -  $Revision: 5.1 $   $State: Exp $
  66.    *
  67.    *             Copyright (c) 1988-1992 USENET Community Trust
  68.    *             Copyright (c) 1986,1987 Dave Taylor
  69. --- 1,8 ----
  70.   
  71. ! static char rcsid[] ="@(#)$Id: rules.c,v 5.3 1992/11/17 04:10:01 syd Exp $";
  72.   
  73.   /*******************************************************************************
  74. !  *  The Elm Mail System  -  $Revision: 5.3 $   $State: Exp $
  75.    *
  76.    *             Copyright (c) 1988-1992 USENET Community Trust
  77.    *             Copyright (c) 1986,1987 Dave Taylor
  78. ***************
  79. *** 14,19 ****
  80. --- 14,33 ----
  81.    *
  82.    *******************************************************************************
  83.    * $Log: rules.c,v $
  84. +  * Revision 5.3  1992/11/17  04:10:01  syd
  85. +  * The changes to filter/regexp.c are to correct compiler warnings about
  86. +  * unreachable statements.
  87. +  *
  88. +  * The changes to filter/rules.c are to correct the fact that we are passing
  89. +  * a pointer to a condition_rec structore to a function expecting a pointer to
  90. +  * a character string.
  91. +  * From: Tom Moore <tmoore@fievel.DaytonOH.NCR.COM>
  92. +  *
  93. +  * Revision 5.2  1992/11/15  01:40:43  syd
  94. +  * Add regexp processing to filter.
  95. +  * Add execc operator
  96. +  * From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  97. +  *
  98.    * Revision 5.1  1992/10/03  22:18:09  syd
  99.    * Initial checkin as of 2.4 Release at PL0
  100.    *
  101. ***************
  102. *** 43,48 ****
  103. --- 57,97 ----
  104.   
  105.   char *listrule();
  106.   
  107. + static struct regexp *last_regexp = NULL;
  108. + 
  109. + static int
  110. + matches(str, relation, cond)
  111. + char *str;
  112. + int relation;
  113. + struct condition_rec *cond;
  114. + {
  115. +     if (relation == RE) {
  116. +       if (cond->regex == NULL) cond->regex = regcomp(cond->argument1);
  117. +       if (regexec(cond->regex, str)) {
  118. +         last_regexp = cond->regex;
  119. +         return TRUE;
  120. +       } else {
  121. +         return FALSE;
  122. +       }
  123. +     } else {
  124. +       return contains(str, cond->argument1);
  125. +     }
  126. + }
  127. + 
  128. + void
  129. + regerror(s)
  130. + char *s;
  131. + {
  132. +     if (outfd != NULL)
  133. +       fprintf(outfd,
  134. +         catgets(elm_msg_cat,
  135. +             FilterSet,FilterCantCompileRegexp,
  136. +             "filter (%s): Error: can't compile regexp: \"%s\"\n"),
  137. +          username, s);
  138. +     if (outfd != NULL) fclose(outfd);
  139. +     exit(1);         
  140. + }
  141. + 
  142.   int
  143.   action_from_ruleset()
  144.   {
  145. ***************
  146. *** 65,75 ****
  147.       
  148.           switch (cond->matchwhat) {
  149.   
  150. !           case TO     : x = contains(to, cond->argument1);         break;
  151. !           case FROM   : x = contains(from, cond->argument1);     break;
  152. !           case SENDER : x = contains(sender, cond->argument1);    break;
  153. !           case SUBJECT: x = contains(subject, cond->argument1);    break;
  154. !           case LINES  : x = compare(lines, relation, cond->argument1);break;
  155.                  
  156.             case CONTAINS: if (outfd != NULL) fprintf(outfd,
  157.                   catgets(elm_msg_cat,
  158. --- 114,124 ----
  159.       
  160.           switch (cond->matchwhat) {
  161.   
  162. !           case TO     : x = matches(to, relation, cond);        break;
  163. !           case FROM   : x = matches(from, relation, cond);         break;
  164. !           case SENDER : x = matches(sender, relation, cond);    break;
  165. !           case SUBJECT: x = matches(subject, relation, cond);    break;
  166. !           case LINES  : x = compare(lines, relation, cond);        break;
  167.                  
  168.             case CONTAINS: if (outfd != NULL) fprintf(outfd,
  169.                   catgets(elm_msg_cat,
  170. ***************
  171. *** 105,110 ****
  172. --- 154,175 ----
  173.                  gotten_time++;           \
  174.               }
  175.   
  176. + static struct {
  177. +     int    id;
  178. +     char    *str;
  179. + } regmessage[] = {
  180. +     FilterWholeRegsub,    "<match>",
  181. +     FilterRegsubOne,    "<submatch-1>",
  182. +     FilterRegsubTwo,    "<submatch-2>",
  183. +     FilterRegsubThree,    "<submatch-3>",
  184. +     FilterRegsubFour,    "<submatch-4>",
  185. +     FilterRegsubFive,    "<submatch-5>",
  186. +     FilterRegsubSix,    "<submatch-6>",
  187. +     FilterRegsubSeven,    "<submatch-7>",
  188. +     FilterRegsubEight,    "<submatch-8>",
  189. +     FilterRegsubNine,    "<submatch-9>",
  190. + };
  191. + 
  192.   expand_macros(word, buffer, line, display)
  193.   char *word, *buffer;
  194.   int  line, display;
  195. ***************
  196. *** 120,125 ****
  197. --- 185,192 ----
  198.              %S    = "Re: subject of message"  (only add Re: if not there)
  199.           %t    = hour:minute     
  200.           %y    = year          
  201. +         %&    = the whole string that matched last regexp
  202. +         %1-%9    = matched subexpressions in last regexp
  203.           or simply copies word into buffer. If "display" is set then
  204.           instead it puts "<day-of-month>" etc. etc. in the output.
  205.       **/
  206. ***************
  207. *** 131,137 ****
  208.       struct tm *timerec;
  209.       time_t    thetime;
  210.       register int i, j=0, gotten_time = 0, reading_a_percent_sign = 0,
  211. !                      len, backslashed=0;
  212.   
  213.       for (i = 0, len = strlen(word); i < len; i++) {
  214.         if (reading_a_percent_sign) {
  215. --- 198,204 ----
  216.       struct tm *timerec;
  217.       time_t    thetime;
  218.       register int i, j=0, gotten_time = 0, reading_a_percent_sign = 0,
  219. !                      len, backslashed=0, regsub;
  220.   
  221.       for (i = 0, len = strlen(word); i < len; i++) {
  222.         if (reading_a_percent_sign) {
  223. ***************
  224. *** 251,256 ****
  225. --- 318,345 ----
  226.                        j = strlen(buffer);
  227.                break;
  228.   
  229. +           case '&': case '1': case '2': case '3': case '4':
  230. +           case '5': case '6': case '7': case '8': case '9':
  231. + 
  232. +              if (word[i] == '&') regsub = 0;
  233. +              else regsub = word[i] - '0';
  234. + 
  235. +              if (display) {
  236. +                strcat(buffer,catgets(elm_msg_cat,
  237. +                          FilterSet,
  238. +                          regmessage[regsub].id,
  239. +                          regmessage[regsub].str));
  240. +                j = strlen(buffer);
  241. +              } else {
  242. +                if (last_regexp != NULL) {
  243. +                  char *sp = last_regexp->startp[regsub];
  244. +                  char *ep = last_regexp->endp[regsub];
  245. +                  if (sp != NULL && ep != NULL && ep > sp)
  246. +                    while (sp < ep) buffer[j++] = *sp++;
  247. +                }
  248. +              }
  249. +              break;
  250. + 
  251.             default  : if (outfd != NULL) fprintf(outfd,
  252.                   catgets(elm_msg_cat,
  253.                       FilterSet,FilterErrorTranslatingMacro,
  254. ***************
  255. *** 379,384 ****
  256. --- 468,476 ----
  257.         case EXEC       : return(catgets(elm_msg_cat,
  258.                          FilterSet,FilterExecute,
  259.                          "Execute"));
  260. +       case EXECC       : return(catgets(elm_msg_cat,
  261. +                        FilterSet,FilterExecuteAndSave,
  262. +                        "Execute and Save"));
  263.         default         : return(catgets(elm_msg_cat,
  264.                          FilterSet,FilterAction,
  265.                          "?action?"));
  266. ***************
  267. *** 386,394 ****
  268.   }
  269.   
  270.   int
  271. ! compare(line, relop, arg)
  272.   int line, relop;
  273. ! char *arg;
  274.   {
  275.       /** Given the actual number of lines in the message, the relop
  276.           relation, and the number of lines in the rule, as a string (!),
  277. --- 478,486 ----
  278.   }
  279.   
  280.   int
  281. ! compare(line, relop, cond)
  282.   int line, relop;
  283. ! struct condition_rec *cond;
  284.   {
  285.       /** Given the actual number of lines in the message, the relop
  286.           relation, and the number of lines in the rule, as a string (!),
  287. ***************
  288. *** 397,403 ****
  289.   
  290.       int rule_lines;
  291.   
  292. !     rule_lines = atoi(arg);
  293.   
  294.       switch (relop) {
  295.         case LE: return(line <= rule_lines);
  296. --- 489,495 ----
  297.   
  298.       int rule_lines;
  299.   
  300. !     rule_lines = atoi(cond->argument1);
  301.   
  302.       switch (relop) {
  303.         case LE: return(line <= rule_lines);
  304.  
  305. Index: filter/summarize.c
  306. Prereq: 5.3
  307. *** ../elm2.4/filter/summarize.c    Tue Nov 10 15:20:23 1992
  308. --- filter/summarize.c    Sat Nov 14 20:40:43 1992
  309. ***************
  310. *** 1,8 ****
  311.   
  312. ! static char rcsid[] ="@(#)$Id: summarize.c,v 5.3 1992/11/07 20:48:55 syd Exp $";
  313.   
  314.   /*******************************************************************************
  315. !  *  The Elm Mail System  -  $Revision: 5.3 $   $State: Exp $
  316.    *
  317.    *             Copyright (c) 1988-1992 USENET Community Trust
  318.    *             Copyright (c) 1986,1987 Dave Taylor
  319. --- 1,8 ----
  320.   
  321. ! static char rcsid[] ="@(#)$Id: summarize.c,v 5.4 1992/11/15 01:40:43 syd Exp $";
  322.   
  323.   /*******************************************************************************
  324. !  *  The Elm Mail System  -  $Revision: 5.4 $   $State: Exp $
  325.    *
  326.    *             Copyright (c) 1988-1992 USENET Community Trust
  327.    *             Copyright (c) 1986,1987 Dave Taylor
  328. ***************
  329. *** 14,19 ****
  330. --- 14,24 ----
  331.    *
  332.    *******************************************************************************
  333.    * $Log: summarize.c,v $
  334. +  * Revision 5.4  1992/11/15  01:40:43  syd
  335. +  * Add regexp processing to filter.
  336. +  * Add execc operator
  337. +  * From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  338. +  *
  339.    * Revision 5.3  1992/11/07  20:48:55  syd
  340.    * fix applied rule count message
  341.    *
  342. ***************
  343. *** 199,208 ****
  344.                 "(left in mailbox and forwarded to \"%s\")"),
  345.                           rules[rule].argument2);
  346.                               break;
  347. !           case EXEC  :      fprintf(outfd,catgets(elm_msg_cat,
  348.                                 FilterSet,
  349.                                 FilterExecMesg,
  350.                         "(given to command \"%s\")"),
  351.                           rules[rule].argument2);
  352.                               break;
  353.             }
  354. --- 204,219 ----
  355.                 "(left in mailbox and forwarded to \"%s\")"),
  356.                           rules[rule].argument2);
  357.                               break;
  358. !           case EXEC :      fprintf(outfd,catgets(elm_msg_cat,
  359.                                 FilterSet,
  360.                                 FilterExecMesg,
  361.                         "(given to command \"%s\")"),
  362. +                         rules[rule].argument2);
  363. +                             break;
  364. +           case EXECC :      fprintf(outfd,catgets(elm_msg_cat,
  365. +                               FilterSet,
  366. +                               FilterExecCMesg,
  367. +                "(left in mailbox and given to command \"%s\")"),
  368.                           rules[rule].argument2);
  369.                               break;
  370.             }
  371.  
  372. Index: filter/utils.c
  373. Prereq: 5.1
  374. *** ../elm2.4/filter/utils.c    Sat Oct  3 18:18:29 1992
  375. --- filter/utils.c    Sat Nov 14 20:40:45 1992
  376. ***************
  377. *** 1,8 ****
  378.   
  379. ! static char rcsid[] ="@(#)$Id: utils.c,v 5.1 1992/10/03 22:18:09 syd Exp $";
  380.   
  381.   /*******************************************************************************
  382. !  *  The Elm Mail System  -  $Revision: 5.1 $   $State: Exp $
  383.    *
  384.    *             Copyright (c) 1988-1992 USENET Community Trust
  385.    *             Copyright (c) 1986,1987 Dave Taylor
  386. --- 1,8 ----
  387.   
  388. ! static char rcsid[] ="@(#)$Id: utils.c,v 5.2 1992/11/15 01:40:43 syd Exp $";
  389.   
  390.   /*******************************************************************************
  391. !  *  The Elm Mail System  -  $Revision: 5.2 $   $State: Exp $
  392.    *
  393.    *             Copyright (c) 1988-1992 USENET Community Trust
  394.    *             Copyright (c) 1986,1987 Dave Taylor
  395. ***************
  396. *** 14,19 ****
  397. --- 14,24 ----
  398.    *
  399.    *******************************************************************************
  400.    * $Log: utils.c,v $
  401. +  * Revision 5.2  1992/11/15  01:40:43  syd
  402. +  * Add regexp processing to filter.
  403. +  * Add execc operator
  404. +  * From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  405. +  *
  406.    * Revision 5.1  1992/10/03  22:18:09  syd
  407.    * Initial checkin as of 2.4 Release at PL0
  408.    *
  409. ***************
  410. *** 141,146 ****
  411. --- 146,156 ----
  412.         case EXEC       : fprintf(fd,catgets(elm_msg_cat,
  413.                              FilterSet,FilterExecutedMesg,
  414.                              "\tEXECUTED \"%s\""),
  415. +                     rules[rule_choosen].argument2);
  416. +                         break;
  417. +       case EXECC      : fprintf(fd,catgets(elm_msg_cat,
  418. +                            FilterSet,FilterExecutedSMesg,
  419. +                 "\tEXECUTED \"%s\" AND PUT in mailbox"),
  420.                       rules[rule_choosen].argument2);
  421.                           break;
  422.         case LEAVE      : fprintf(fd,catgets(elm_msg_cat,
  423.  
  424. Index: hdrs/filter.h
  425. Prereq: 5.2
  426. *** ../elm2.4/hdrs/filter.h    Tue Oct 27 11:17:24 1992
  427. --- hdrs/filter.h    Sat Nov 14 20:42:57 1992
  428. ***************
  429. *** 1,8 ****
  430.   
  431. ! /* $Id: filter.h,v 5.2 1992/10/24 14:20:24 syd Exp $ */
  432.   
  433.   /*******************************************************************************
  434. !  *  The Elm Mail System  -  $Revision: 5.2 $   $State: Exp $
  435.    *
  436.    *             Copyright (c) 1988-1992 USENET Community Trust
  437.    *             Copyright (c) 1986,1987 Dave Taylor
  438. --- 1,8 ----
  439.   
  440. ! /* $Id: filter.h,v 5.3 1992/11/15 01:42:57 syd Exp $ */
  441.   
  442.   /*******************************************************************************
  443. !  *  The Elm Mail System  -  $Revision: 5.3 $   $State: Exp $
  444.    *
  445.    *             Copyright (c) 1988-1992 USENET Community Trust
  446.    *             Copyright (c) 1986,1987 Dave Taylor
  447. ***************
  448. *** 14,19 ****
  449. --- 14,24 ----
  450.    *
  451.    *******************************************************************************
  452.    * $Log: filter.h,v $
  453. +  * Revision 5.3  1992/11/15  01:42:57  syd
  454. +  * Add regexp processing to filter.
  455. +  * Add execc operator
  456. +  * From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  457. +  *
  458.    * Revision 5.2  1992/10/24  14:20:24  syd
  459.    * remove the 25 (MAXRULES) limitation.
  460.    * Basically it mallocs rules in hunks of RULESINC (25) as it goes along.
  461. ***************
  462. *** 29,34 ****
  463. --- 34,41 ----
  464.   
  465.   **/
  466.   
  467. + #include "regexp.h"
  468. + 
  469.   #ifdef   BSD
  470.   # undef  tolower
  471.   #endif
  472. ***************
  473. *** 83,88 ****
  474. --- 90,96 ----
  475.   #define  EXEC        12
  476.   #define  FORWARDC    13
  477.   #define  SENDER        14
  478. + #define  EXECC        15
  479.   
  480.   #define  FAILED_SAVE    20
  481.   
  482. ***************
  483. *** 94,99 ****
  484. --- 102,108 ----
  485.   #define GT        4
  486.   #define NE        5
  487.   #define EQ        6
  488. + #define RE        7
  489.   
  490.   /** A funky way to open a file using open() to avoid file locking hassles **/
  491.   
  492. ***************
  493. *** 170,180 ****
  494.       int     matchwhat;            /* type of 'if' clause      */
  495.       int     relation;            /* type of match (eq, etc)  */
  496.       char    argument1[SLEN];        /* match against this       */
  497.       struct  condition_rec  *next;        /* next condition...        */
  498.         };
  499.   
  500.   struct ruleset_record {
  501. !     char      printable[SLEN];        /* straight from file...    */
  502.       struct  condition_rec  *condition;
  503.       int     action;                /* what action to take      */
  504.       char    argument2[SLEN];        /* argument for action      */
  505. --- 179,190 ----
  506.       int     matchwhat;            /* type of 'if' clause      */
  507.       int     relation;            /* type of match (eq, etc)  */
  508.       char    argument1[SLEN];        /* match against this       */
  509. +     regexp    *regex;                /* compiled regexp        */
  510.       struct  condition_rec  *next;        /* next condition...        */
  511.         };
  512.   
  513.   struct ruleset_record {
  514. !     int    line;                /* line in rules file        */
  515.       struct  condition_rec  *condition;
  516.       int     action;                /* what action to take      */
  517.       char    argument2[SLEN];        /* argument for action      */
  518.  
  519. Index: hdrs/regexp.h
  520. *** /dev/null    Sat Nov 14 05:48:13 1992
  521. --- hdrs/regexp.h    Sat Nov 14 20:38:25 1992
  522. ***************
  523. *** 0 ****
  524. --- 1,45 ----
  525. + 
  526. + /* $Id: regexp.h,v 5.3 1992/11/15 01:38:23 syd Exp $ */
  527. + 
  528. + /*******************************************************************************
  529. +  *  The Elm Mail System  -  $Revision: 5.3 $   $State: Exp $
  530. +  *
  531. +  *             Copyright (c) 1992 USENET Community Trust
  532. +  *******************************************************************************
  533. +  * Bug reports, patches, comments, suggestions should be sent to:
  534. +  *
  535. +  *    Syd Weinstein, Elm Coordinator
  536. +  *    elm@DSI.COM            dsinc!elm
  537. +  *
  538. +  *******************************************************************************
  539. +  * $Log: regexp.h,v $
  540. +  * Revision 5.3  1992/11/15  01:38:23  syd
  541. +  * fix headers
  542. +  *
  543. +  * Revision 5.2  1992/11/15  01:37:57  syd
  544. +  * add proper headers
  545. +  *
  546. +  *
  547. +  ******************************************************************************/
  548. + 
  549. + /*
  550. +  * Definitions etc. for regexp(3) routines.
  551. +  *
  552. +  * Caveat:  this is V8 regexp(3) [actually, a reimplementation thereof],
  553. +  * not the System V one.
  554. +  */
  555. + #define NSUBEXP  10
  556. + typedef struct regexp {
  557. +     char *startp[NSUBEXP];
  558. +     char *endp[NSUBEXP];
  559. +     char regstart;        /* Internal use only. */
  560. +     char reganch;        /* Internal use only. */
  561. +     char *regmust;        /* Internal use only. */
  562. +     int regmlen;        /* Internal use only. */
  563. +     char program[1];    /* Unwarranted chumminess with compiler. */
  564. + } regexp;
  565. + 
  566. + extern regexp *regcomp();
  567. + extern int regexec();
  568. + extern void regsub();
  569. + extern void regerror();
  570.  
  571. Index: hdrs/s_elm.h
  572. *** ../elm2.4/hdrs/s_elm.h    Tue Nov 10 15:20:23 1992
  573. --- hdrs/s_elm.h    Sat Nov 14 16:48:43 1992
  574. ***************
  575. *** 1,4 ****
  576. ! /* s_elm.h created from s_elm.us by gencat on Sat Nov  7 14:37:14 EST 1992 */
  577.   
  578.   #define ElmSet    0x3
  579.   #define ElmYes    0x1
  580. --- 1,4 ----
  581. ! /* s_elm.h created from s_elm.us by gencat on Sat Nov 14 16:48:42 EST 1992 */
  582.   
  583.   #define ElmSet    0x3
  584.   #define ElmYes    0x1
  585. ***************
  586. *** 748,750 ****
  587. --- 748,751 ----
  588.   #define ElmPrintJobSpooled    0x333
  589.   #define ElmPrintFailCode    0x334
  590.   #define ElmPrintFailStatus    0x335
  591. + #define ElmCouldntSeekBytesIntoTempFile    0x336
  592.  
  593. Index: hdrs/s_filter.h
  594. *** ../elm2.4/hdrs/s_filter.h    Tue Oct 27 11:17:25 1992
  595. --- hdrs/s_filter.h    Sat Nov 14 20:42:26 1992
  596. ***************
  597. *** 1,4 ****
  598. ! /* s_filter.h created from s_filter.us by gencat on Sat Oct  3 18:34:14 EDT 1992 */
  599.   
  600.   #define FilterSet    0x10
  601.   #define FilterCantGetPasswdEntry    0x1
  602. --- 1,4 ----
  603. ! /* s_filter.h created from s_filter.us by gencat on Sat Nov 14 21:02:00 EST 1992 */
  604.   
  605.   #define FilterSet    0x10
  606.   #define FilterCantGetPasswdEntry    0x1
  607. ***************
  608. *** 33,39 ****
  609.   #define FilterCouldntMallocNew    0x1e
  610.   #define FilterErrorReadingRules2    0x1f
  611.   #define FilterErrorReadingRules3    0x20
  612. ! #define FilterCantAllocRules 0x21
  613.   #define FilterContainsNotImplemented    0x22
  614.   #define FilterSender    0x23
  615.   #define FilterReturnAddress    0x24
  616. --- 33,39 ----
  617.   #define FilterCouldntMallocNew    0x1e
  618.   #define FilterErrorReadingRules2    0x1f
  619.   #define FilterErrorReadingRules3    0x20
  620. ! #define FilterCantAllocRules    0x21
  621.   #define FilterContainsNotImplemented    0x22
  622.   #define FilterSender    0x23
  623.   #define FilterReturnAddress    0x24
  624. ***************
  625. *** 93,96 ****
  626.   #define FilterTheDefaultAction    0x5a
  627.   #define FilterForkSaveFailed    0x5b
  628.   #define FilterRuleNum    0x5c
  629. ! #define FilterOutOfMemory 0x5d
  630. --- 93,110 ----
  631.   #define FilterTheDefaultAction    0x5a
  632.   #define FilterForkSaveFailed    0x5b
  633.   #define FilterRuleNum    0x5c
  634. ! #define FilterOutOfMemory    0x5d
  635. ! #define FilterExecuteAndSave    0x5e
  636. ! #define FilterExecCMesg    0x5f
  637. ! #define FilterExecutedSMesg    0x60
  638. ! #define FilterCantCompileRegexp    0x61
  639. ! #define FilterWholeRegsub    0x62
  640. ! #define FilterRegsubOne    0x63
  641. ! #define FilterRegsubTwo    0x64
  642. ! #define FilterRegsubThree    0x65
  643. ! #define FilterRegsubFour    0x66
  644. ! #define FilterRegsubFive    0x67
  645. ! #define FilterRegsubSix    0x68
  646. ! #define FilterRegsubSeven    0x69
  647. ! #define FilterRegsubEight    0x6a
  648. ! #define FilterRegsubNine    0x6b
  649.  
  650. Index: lib/mk_aliases.c
  651. Prereq: 5.3
  652. *** ../elm2.4/lib/mk_aliases.c    Tue Nov 10 15:20:25 1992
  653. --- lib/mk_aliases.c    Sat Nov 14 20:15:28 1992
  654. ***************
  655. *** 1,8 ****
  656.   
  657. ! static char rcsid[] = "@(#)$Id: mk_aliases.c,v 5.3 1992/11/07 16:32:14 syd Exp $";
  658.   
  659.   /*******************************************************************************
  660. !  *  The Elm Mail System  -  $Revision: 5.3 $   $State: Exp $
  661.    *
  662.    *            Copyright (c) 1988-1992 USENET Community Trust
  663.    *            Copyright (c) 1986,1987 Dave Taylor
  664. --- 1,8 ----
  665.   
  666. ! static char rcsid[] = "@(#)$Id: mk_aliases.c,v 5.4 1992/11/15 01:15:28 syd Exp $";
  667.   
  668.   /*******************************************************************************
  669. !  *  The Elm Mail System  -  $Revision: 5.4 $   $State: Exp $
  670.    *
  671.    *            Copyright (c) 1988-1992 USENET Community Trust
  672.    *            Copyright (c) 1986,1987 Dave Taylor
  673. ***************
  674. *** 14,19 ****
  675. --- 14,34 ----
  676.    *
  677.    *******************************************************************************
  678.    * $Log: mk_aliases.c,v $
  679. +  * Revision 5.4  1992/11/15  01:15:28  syd
  680. +  * The alias message_count isn't set to zero if the last alias has
  681. +  * been deleted from the alias table. As no aliases are reread from
  682. +  * the aliases database the message_count is left as it was before.
  683. +  *
  684. +  * Fixed that the function do_newalias() sometimes returns without freeing
  685. +  * the buffer allocated before. The patch adds these free calls.
  686. +  *
  687. +  * When you erroneously type a number in your folder elm asks you for
  688. +  * a new current message number. But now if you erase this one number
  689. +  * and leave the string empty elm will set the new current message to
  690. +  * the second message on our sun4! The patch adds a check for an empty
  691. +  * string and returns the current number if no number was entered.
  692. +  * From: vogt@isa.de (Gerald Vogt)
  693. +  *
  694.    * Revision 5.3  1992/11/07  16:32:14  syd
  695.    * comments should be allowed anywhere in the alias file.
  696.    * From: "Robert L. Howard" <robert.howard@matd.gatech.edu>
  697. ***************
  698. *** 518,523 ****
  699. --- 533,539 ----
  700.                   "Couldn't open %s for input!"), inputname);
  701.               error(msg_buff);
  702.           }
  703. +         free(buffer);
  704.           return(-1);
  705.       }
  706.   
  707. ***************
  708. *** 527,532 ****
  709. --- 543,549 ----
  710.               "Couldn't open %s.pag or %s.dir for output!"),
  711.               dataname, dataname);
  712.           error(msg_buff);
  713. +         free(buffer);
  714.           return(-1);
  715.       }
  716.   
  717. ***************
  718. *** 535,540 ****
  719. --- 552,558 ----
  720.                   NewaliasSet, NewaliasNoOpenOut,
  721.                   "Couldn't open %s for output!"), dataname);
  722.           error(msg_buff);
  723. +         free(buffer);
  724.           return(-1);
  725.       }
  726.   
  727. ***************
  728. *** 550,555 ****
  729. --- 568,574 ----
  730.           if (fromelm) sleep(2);
  731.           error(catgets(elm_msg_cat, NewaliasSet, NewaliasNoSave,
  732.                   "** Not saving tables!  Please fix and re-run!"));
  733. +         free(buffer);
  734.           return(-1);
  735.       }
  736.       else {
  737.  
  738. Index: nls/C/C/C/s_aliases.m
  739. *** ../elm2.4/nls/C/C/C/s_aliases.m    Sat Oct  3 18:35:18 1992
  740. --- nls/C/C/C/s_aliases.m    Sat Nov 14 17:59:30 1992
  741. ***************
  742. *** 1,9 ****
  743.   $set 5 #Aliases
  744.   $quote "
  745.   $ #Delete
  746. ! 1    "Delete 1 alias? (%s/%s) "
  747.   $ #DeletePlural
  748. ! 2    "Delete %d aliases? (%s/%s) "
  749.   $ #KeepDelete
  750.   3    [Keeping 1 alias and deleting %d.]
  751.   $ #KeepDeletePlural
  752. --- 1,9 ----
  753.   $set 5 #Aliases
  754.   $quote "
  755.   $ #Delete
  756. ! 1    "Delete 1 alias? (%c/%c) "
  757.   $ #DeletePlural
  758. ! 2    "Delete %d aliases? (%c/%c) "
  759.   $ #KeepDelete
  760.   3    [Keeping 1 alias and deleting %d.]
  761.   $ #KeepDeletePlural
  762.  
  763. Index: nls/C/C/C/s_elm.m
  764. *** ../elm2.4/nls/C/C/C/s_elm.m    Tue Nov 10 15:20:25 1992
  765. --- nls/C/C/C/s_elm.m    Sat Nov 14 16:48:36 1992
  766. ***************
  767. *** 1588,1590 ****
  768. --- 1588,1592 ----
  769.   820    Printout failed with return code %d.
  770.   $ #PrintFailStatus
  771.   821    Printout failed with status 0x%04x.
  772. + $ #CouldntSeekBytesIntoTempFile
  773. + 822    \r\nCouldn't seek %ld bytes into temp file.\r\n
  774.  
  775. Index: nls/C/C/C/s_filter.m
  776. *** ../elm2.4/nls/C/C/C/s_filter.m    Tue Oct 27 11:17:27 1992
  777. --- nls/C/C/C/s_filter.m    Sat Nov 14 20:34:45 1992
  778. ***************
  779. *** 193,195 ****
  780. --- 193,223 ----
  781.   $quote 
  782.   $ #OutOfMemory
  783.   93    filter (%s): Out of memory [malloc failed]\n
  784. + $ #ExecuteAndSave
  785. + 94    Execute and Save
  786. + $ #ExecCMesg
  787. + 95    (left in mailbox and given to command "%s")
  788. + $ #ExecutedSMesg
  789. + 96    \tEXECUTED "%s" AND PUT in mailbox
  790. + $ #CantCompileRegexp
  791. + 97    filter (%s): Error: can't compile regexp: "%s"\n
  792. + $ #WholeRegsub
  793. + 98    <match>
  794. + $ #RegsubOne
  795. + 99    <submatch-1>
  796. + $ #RegsubTwo
  797. + 100    <submatch-2>
  798. + $ #RegsubThree
  799. + 101    <submatch-3>
  800. + $ #RegsubFour
  801. + 102    <submatch-4>
  802. + $ #RegsubFive
  803. + 103    <submatch-5>
  804. + $ #RegsubSix
  805. + 104    <submatch-6>
  806. + $ #RegsubSeven
  807. + 105    <submatch-7>
  808. + $ #RegsubEight
  809. + 106    <submatch-8>
  810. + $ #RegsubNine
  811. + 107    <submatch-9>
  812.  
  813. Index: nls/gencat/genlib.c
  814. *** ../elm2.4/nls/gencat/genlib.c    Sun Oct 20 09:59:51 1991
  815. --- nls/gencat/genlib.c    Sat Nov 14 20:05:11 1992
  816. ***************
  817. *** 709,714 ****
  818. --- 709,715 ----
  819.           newSet->next = set;
  820.           if (set->prev) set->prev->next = newSet;
  821.           else cat->first = newSet;
  822. +         set->prev = newSet;
  823.           set = newSet;
  824.           break;
  825.       }
  826. ***************
  827. *** 769,774 ****
  828. --- 770,776 ----
  829.           newMsg->next = msg;
  830.           if (msg->prev) msg->prev->next = newMsg;
  831.           else curSet->first = newMsg;
  832. +         msg->prev = newMsg;
  833.           msg = newMsg;
  834.           break;
  835.       }
  836.  
  837. Index: src/alias.c
  838. Prereq: 5.9
  839. *** ../elm2.4/src/alias.c    Tue Oct 27 11:17:27 1992
  840. --- src/alias.c    Sat Nov 14 20:24:35 1992
  841. ***************
  842. *** 1,8 ****
  843.   
  844. ! static char rcsid[] = "@(#)$Id: alias.c,v 5.9 1992/10/24 13:35:39 syd Exp $";
  845.   
  846.   /*******************************************************************************
  847. !  *  The Elm Mail System  -  $Revision: 5.9 $   $State: Exp $
  848.    *
  849.    *             Copyright (c) 1988-1992 USENET Community Trust
  850.    *             Copyright (c) 1986,1987 Dave Taylor
  851. --- 1,8 ----
  852.   
  853. ! static char rcsid[] = "@(#)$Id: alias.c,v 5.11 1992/11/15 01:24:34 syd Exp $";
  854.   
  855.   /*******************************************************************************
  856. !  *  The Elm Mail System  -  $Revision: 5.11 $   $State: Exp $
  857.    *
  858.    *             Copyright (c) 1988-1992 USENET Community Trust
  859.    *             Copyright (c) 1986,1987 Dave Taylor
  860. ***************
  861. *** 14,19 ****
  862. --- 14,44 ----
  863.    *
  864.    *******************************************************************************
  865.    * $Log: alias.c,v $
  866. +  * Revision 5.11  1992/11/15  01:24:34  syd
  867. +  * The situation is that the .elm/aliases file is missing, but
  868. +  * .elm/aliases.dir and .elm/aliases.pag exist (isn't serendipity
  869. +  * wonderful?).  The ndbz functions tolerate this and just put a NULL
  870. +  * pointer in the db structure for the data file FILE pointer.  However,
  871. +  * get_one_alias() in listalias and elm doesn't account for the db_open()
  872. +  * succeeding but the dbz_basef field being NULL, so it passes the NULL
  873. +  * pointer to fread().  Detect null and return 0
  874. +  * From: dwolfe@pffft.sps.mot.com (Dave Wolfe)
  875. +  *
  876. +  * Revision 5.10  1992/11/15  01:15:28  syd
  877. +  * The alias message_count isn't set to zero if the last alias has
  878. +  * been deleted from the alias table. As no aliases are reread from
  879. +  * the aliases database the message_count is left as it was before.
  880. +  *
  881. +  * Fixed that the function do_newalias() sometimes returns without freeing
  882. +  * the buffer allocated before. The patch adds these free calls.
  883. +  *
  884. +  * When you erroneously type a number in your folder elm asks you for
  885. +  * a new current message number. But now if you erase this one number
  886. +  * and leave the string empty elm will set the new current message to
  887. +  * the second message on our sun4! The patch adds a check for an empty
  888. +  * string and returns the current number if no number was entered.
  889. +  * From: vogt@isa.de (Gerald Vogt)
  890. +  *
  891.    * Revision 5.9  1992/10/24  13:35:39  syd
  892.    * changes found by using codecenter on Elm 2.4.3
  893.    * From: Graham Hudspith <gwh@inmos.co.uk>
  894. ***************
  895. *** 1043,1048 ****
  896. --- 1068,1074 ----
  897.        *  message that was put to the screen by the do_newalias()
  898.        *  call.
  899.        */
  900. +         message_count = 0;
  901.           sleep(2);
  902.       }
  903.   }
  904. ***************
  905. *** 1284,1289 ****
  906. --- 1310,1318 ----
  907.       register struct alias_rec    **new_aliases, *a;
  908.       struct alias_rec    ar;
  909.       FILE *data_file = db->dbz_basef;
  910. + 
  911. +     if (data_file == NULL)
  912. +         return(0);    /* no alias file, but hash exists, error condition */
  913.   
  914.       if (fread((char *) &ar, sizeof(ar), 1, data_file) <= 0)
  915.           return(0);
  916.  
  917. Index: src/edit.c
  918. Prereq: 5.1
  919. *** ../elm2.4/src/edit.c    Sat Oct  3 18:58:49 1992
  920. --- src/edit.c    Sat Nov 14 16:53:49 1992
  921. ***************
  922. *** 1,8 ****
  923.   
  924. ! static char rcsid[] = "@(#)$Id: edit.c,v 5.1 1992/10/03 22:58:40 syd Exp $";
  925.   
  926.   /*******************************************************************************
  927. !  *  The Elm Mail System  -  $Revision: 5.1 $   $State: Exp $
  928.    *
  929.    *             Copyright (c) 1988-1992 USENET Community Trust
  930.    *             Copyright (c) 1986,1987 Dave Taylor
  931. --- 1,8 ----
  932.   
  933. ! static char rcsid[] = "@(#)$Id: edit.c,v 5.2 1992/11/14 21:53:49 syd Exp $";
  934.   
  935.   /*******************************************************************************
  936. !  *  The Elm Mail System  -  $Revision: 5.2 $   $State: Exp $
  937.    *
  938.    *             Copyright (c) 1988-1992 USENET Community Trust
  939.    *             Copyright (c) 1986,1987 Dave Taylor
  940. ***************
  941. *** 14,19 ****
  942. --- 14,28 ----
  943.    *
  944.    *******************************************************************************
  945.    * $Log: edit.c,v $
  946. +  * Revision 5.2  1992/11/14  21:53:49  syd
  947. +  * When elm copies the temp mailbox back to the mail spool to resync or
  948. +  * quit, it changes to the mailgroup before attempting to diddle in the
  949. +  * mail spool, but when it copies the temp mailbox back to the mail spool
  950. +  * after editing, it forgets to change to mailgroup.  This patch appears
  951. +  * to work, but I haven't exhaustively checked for some path that leaves
  952. +  * the gid set
  953. +  * wrong.  From: dwolfe@pffft.sps.mot.com (Dave Wolfe)
  954. +  *
  955.    * Revision 5.1  1992/10/03  22:58:40  syd
  956.    * Initial checkin as of 2.4 Release at PL0
  957.    *
  958. ***************
  959. *** 21,27 ****
  960.    ******************************************************************************/
  961.   
  962.   /** This routine is for allowing the user to edit their current folder
  963. !     as they wish. 
  964.   
  965.   **/
  966.   
  967. --- 30,36 ----
  968.    ******************************************************************************/
  969.   
  970.   /** This routine is for allowing the user to edit their current folder
  971. !     as they wish.
  972.   
  973.   **/
  974.   
  975. ***************
  976. *** 45,51 ****
  977.           file.  The mailer will ALWAYS resync on the folder
  978.           even if nothing has changed since, not unreasonably, it's
  979.           hard to figure out what occurred in the edit session...
  980. !     
  981.           Also note that if the user wants to edit their incoming
  982.           mailbox they'll actually be editing the tempfile that is
  983.           an exact copy.  More on how we resync in that case later
  984. --- 54,60 ----
  985.           file.  The mailer will ALWAYS resync on the folder
  986.           even if nothing has changed since, not unreasonably, it's
  987.           hard to figure out what occurred in the edit session...
  988. ! 
  989.           Also note that if the user wants to edit their incoming
  990.           mailbox they'll actually be editing the tempfile that is
  991.           an exact copy.  More on how we resync in that case later
  992. ***************
  993. *** 65,71 ****
  994.           return(0);
  995.         }
  996.       }
  997. !       
  998.       strcpy(edited_file,
  999.           (folder_type == NON_SPOOL ? cur_folder : cur_tempfolder));
  1000.       if (edit_a_file(edited_file) == 0) {
  1001. --- 74,80 ----
  1002.           return(0);
  1003.         }
  1004.       }
  1005. ! 
  1006.       strcpy(edited_file,
  1007.           (folder_type == NON_SPOOL ? cur_folder : cur_tempfolder));
  1008.       if (edit_a_file(edited_file) == 0) {
  1009. ***************
  1010. *** 85,103 ****
  1011.            CleartoEOLN();
  1012.   
  1013.            if ((temp_folder = fopen(edited_file, "a")) == NULL) {
  1014. !            dprint(1, (debugfile, 
  1015. !             "Attempt to open \"%s\" to append failed in %s\n", 
  1016.               edited_file, "edit_mailbox"));
  1017.              set_error(catgets(elm_msg_cat, ElmSet, ElmCouldntReopenTemp,
  1018.            "Couldn't reopen tempfile. Edit LOST!"));
  1019.              return(1);
  1020.            }
  1021. !          /** Now let's lock the folder up and stream the new stuff 
  1022.            into the temp file... **/
  1023.   
  1024. !          lock(OUTGOING);    
  1025.            if ((real_folder = fopen(cur_folder, "r")) == NULL) {
  1026. !            dprint(1, (debugfile, 
  1027.                  "Attempt to open \"%s\" for reading new mail failed in %s\n",
  1028.               cur_folder, "edit_mailbox"));
  1029.              sprintf(buffer, catgets(elm_msg_cat, ElmSet, ElmCouldntOpenFolder,
  1030. --- 94,112 ----
  1031.            CleartoEOLN();
  1032.   
  1033.            if ((temp_folder = fopen(edited_file, "a")) == NULL) {
  1034. !            dprint(1, (debugfile,
  1035. !             "Attempt to open \"%s\" to append failed in %s\n",
  1036.               edited_file, "edit_mailbox"));
  1037.              set_error(catgets(elm_msg_cat, ElmSet, ElmCouldntReopenTemp,
  1038.            "Couldn't reopen tempfile. Edit LOST!"));
  1039.              return(1);
  1040.            }
  1041. !          /** Now let's lock the folder up and stream the new stuff
  1042.            into the temp file... **/
  1043.   
  1044. !          lock(OUTGOING);
  1045.            if ((real_folder = fopen(cur_folder, "r")) == NULL) {
  1046. !            dprint(1, (debugfile,
  1047.                  "Attempt to open \"%s\" for reading new mail failed in %s\n",
  1048.               cur_folder, "edit_mailbox"));
  1049.              sprintf(buffer, catgets(elm_msg_cat, ElmSet, ElmCouldntOpenFolder,
  1050. ***************
  1051. *** 115,121 ****
  1052.              unlock();
  1053.              return(1);
  1054.            }
  1055. !     
  1056.            /** Now we can finally stream the new mail into the tempfile **/
  1057.   
  1058.            while ((len = mail_gets(buffer, SLEN, real_folder)) != 0)
  1059. --- 124,130 ----
  1060.              unlock();
  1061.              return(1);
  1062.            }
  1063. ! 
  1064.            /** Now we can finally stream the new mail into the tempfile **/
  1065.   
  1066.            while ((len = mail_gets(buffer, SLEN, real_folder)) != 0)
  1067. ***************
  1068. *** 140,145 ****
  1069. --- 149,158 ----
  1070.   
  1071.           } else lock(OUTGOING);
  1072.   
  1073. + #ifdef SAVE_GROUP_MAILBOX_ID
  1074. +              setgid(mailgroupid);
  1075. + #endif
  1076. + 
  1077.          /* remove real mail_file and then
  1078.           * link or copy the edited mailfile to real mail_file */
  1079.   
  1080. ***************
  1081. *** 180,192 ****
  1082.            Raw(ON);
  1083.            sleep(2);
  1084.          }
  1085. !           
  1086.          unlock();
  1087.          unlink(edited_file);    /* remove the edited mailfile */
  1088.          error(catgets(elm_msg_cat, ElmSet, ElmChangesIncorporated,
  1089.            "Changes incorporated into new mail..."));
  1090.   
  1091. !     } else 
  1092.         error(catgets(elm_msg_cat, ElmSet, ElmResyncingNewVersion,
  1093.           "Resynchronizing with new version of folder..."));
  1094.   
  1095. --- 193,209 ----
  1096.            Raw(ON);
  1097.            sleep(2);
  1098.          }
  1099. ! 
  1100. ! #ifdef SAVE_GROUP_MAILBOX_ID
  1101. !        setgid(groupid);
  1102. ! #endif
  1103. ! 
  1104.          unlock();
  1105.          unlink(edited_file);    /* remove the edited mailfile */
  1106.          error(catgets(elm_msg_cat, ElmSet, ElmChangesIncorporated,
  1107.            "Changes incorporated into new mail..."));
  1108.   
  1109. !     } else
  1110.         error(catgets(elm_msg_cat, ElmSet, ElmResyncingNewVersion,
  1111.           "Resynchronizing with new version of folder..."));
  1112.   
  1113.  
  1114. Index: src/in_utils.c
  1115. Prereq: 5.1
  1116. *** ../elm2.4/src/in_utils.c    Sat Oct  3 18:58:58 1992
  1117. --- src/in_utils.c    Sat Nov 14 20:15:30 1992
  1118. ***************
  1119. *** 1,8 ****
  1120.   
  1121. ! static char rcsid[] = "@(#)$Id: in_utils.c,v 5.1 1992/10/03 22:58:40 syd Exp $";
  1122.   
  1123.   /*******************************************************************************
  1124. !  *  The Elm Mail System  -  $Revision: 5.1 $   $State: Exp $
  1125.    *
  1126.    *            Copyright (c) 1988-1992 USENET Community Trust
  1127.    *            Copyright (c) 1986,1987 Dave Taylor
  1128. --- 1,8 ----
  1129.   
  1130. ! static char rcsid[] = "@(#)$Id: in_utils.c,v 5.2 1992/11/15 01:15:28 syd Exp $";
  1131.   
  1132.   /*******************************************************************************
  1133. !  *  The Elm Mail System  -  $Revision: 5.2 $   $State: Exp $
  1134.    *
  1135.    *            Copyright (c) 1988-1992 USENET Community Trust
  1136.    *            Copyright (c) 1986,1987 Dave Taylor
  1137. ***************
  1138. *** 14,19 ****
  1139. --- 14,34 ----
  1140.    *
  1141.    *******************************************************************************
  1142.    * $Log: in_utils.c,v $
  1143. +  * Revision 5.2  1992/11/15  01:15:28  syd
  1144. +  * The alias message_count isn't set to zero if the last alias has
  1145. +  * been deleted from the alias table. As no aliases are reread from
  1146. +  * the aliases database the message_count is left as it was before.
  1147. +  *
  1148. +  * Fixed that the function do_newalias() sometimes returns without freeing
  1149. +  * the buffer allocated before. The patch adds these free calls.
  1150. +  *
  1151. +  * When you erroneously type a number in your folder elm asks you for
  1152. +  * a new current message number. But now if you erase this one number
  1153. +  * and leave the string empty elm will set the new current message to
  1154. +  * the second message on our sun4! The patch adds a check for an empty
  1155. +  * string and returns the current number if no number was entered.
  1156. +  * From: vogt@isa.de (Gerald Vogt)
  1157. +  *
  1158.    * Revision 5.1  1992/10/03  22:58:40  syd
  1159.    * Initial checkin as of 2.4 Release at PL0
  1160.    *
  1161. ***************
  1162. *** 95,100 ****
  1163. --- 110,118 ----
  1164.       PutLine1(LINES-3, COLUMNS-40,catgets(elm_msg_cat, ElmSet, ElmSetCurrentTo,
  1165.           "Set current %s to :"), item);
  1166.       if (optionally_enter(buff, LINES-3, COLUMNS-15, TRUE, FALSE) == -1)
  1167. +       return(current);
  1168. + 
  1169. +     if (buff[0] == '\0')
  1170.         return(current);
  1171.   
  1172.       sscanf(buff,"%d", &num);
  1173.  
  1174. Index: src/newmbox.c
  1175. Prereq: 5.6
  1176. *** ../elm2.4/src/newmbox.c    Tue Nov 10 15:20:28 1992
  1177. --- src/newmbox.c    Sat Nov 14 16:49:43 1992
  1178. ***************
  1179. *** 1,8 ****
  1180.   
  1181. ! static char rcsid[] = "@(#)$Id: newmbox.c,v 5.6 1992/11/07 20:05:52 syd Exp $";
  1182.   
  1183.   /*******************************************************************************
  1184. !  *  The Elm Mail System  -  $Revision: 5.6 $   $State: Exp $
  1185.    *
  1186.    *            Copyright (c) 1988-1992 USENET Community Trust
  1187.    *            Copyright (c) 1986,1987 Dave Taylor
  1188. --- 1,8 ----
  1189.   
  1190. ! static char rcsid[] = "@(#)$Id: newmbox.c,v 5.7 1992/11/14 21:49:42 syd Exp $";
  1191.   
  1192.   /*******************************************************************************
  1193. !  *  The Elm Mail System  -  $Revision: 5.7 $   $State: Exp $
  1194.    *
  1195.    *            Copyright (c) 1988-1992 USENET Community Trust
  1196.    *            Copyright (c) 1986,1987 Dave Taylor
  1197. ***************
  1198. *** 14,19 ****
  1199. --- 14,25 ----
  1200.    *
  1201.    *******************************************************************************
  1202.    * $Log: newmbox.c,v $
  1203. +  * Revision 5.7  1992/11/14  21:49:42  syd
  1204. +  * I think that the code in 'newmbox.c' which handles bad 'Content-length'
  1205. +  * entries is incomplete. The file-ptr for the mail file is
  1206. +  * backed up, but the file-ptr of the temp file WAS LEFT UNMODIFIED !
  1207. +  * From langesw.ssw.de!root Wed Nov 11 14:28:57 1992
  1208. +  *
  1209.    * Revision 5.6  1992/11/07  20:05:52  syd
  1210.    * change to use header_cmp to allow for linear white space around the colon
  1211.    * From: Syd
  1212. ***************
  1213. *** 608,613 ****
  1214. --- 614,631 ----
  1215.              cur_folder, mailfile_size, error_description(err), "reset - read_headers"));
  1216.           emergency_exit();
  1217.             }
  1218. +           if (copyit)
  1219. +         if (fseek(temp, content_start, 0) == -1) {
  1220. +           err = errno;
  1221. +           Write_to_screen(catgets(elm_msg_cat, ElmSet, ElmCouldntSeekBytesIntoTempFile,
  1222. +              "\n\rCouldn't seek %ld bytes into temp file.\n\r"),
  1223. +              1, mailfile_size);
  1224. +           Write_to_screen("** %s. **\n\r", 1, error_description(err));
  1225. +           dprint(1, (debugfile,
  1226. +     "Error: Couldn't seek temp file %s: (offset %ld) Errno %s (%s)\n",
  1227. +              cur_tempfolder, mailfile_size, error_description(err), "reset - read_headers"));
  1228. +           emergency_exit();
  1229. +         }
  1230.             fbytes = content_start;
  1231.             line = lines_start;
  1232.             content_length_found = FALSE;
  1233.  
  1234. Index: src/showmsg.c
  1235. Prereq: 5.5
  1236. *** ../elm2.4/src/showmsg.c    Tue Nov 10 15:20:29 1992
  1237. --- src/showmsg.c    Sat Nov 14 20:29:37 1992
  1238. ***************
  1239. *** 1,8 ****
  1240.   
  1241. ! static char rcsid[] = "@(#)$Id: showmsg.c,v 5.5 1992/11/07 16:23:48 syd Exp $";
  1242.   
  1243.   /*******************************************************************************
  1244. !  *  The Elm Mail System  -  $Revision: 5.5 $   $State: Exp $
  1245.    *
  1246.    *             Copyright (c) 1988-1992 USENET Community Trust
  1247.    *             Copyright (c) 1986,1987 Dave Taylor
  1248. --- 1,8 ----
  1249.   
  1250. ! static char rcsid[] = "@(#)$Id: showmsg.c,v 5.6 1992/11/15 01:29:37 syd Exp $";
  1251.   
  1252.   /*******************************************************************************
  1253. !  *  The Elm Mail System  -  $Revision: 5.6 $   $State: Exp $
  1254.    *
  1255.    *             Copyright (c) 1988-1992 USENET Community Trust
  1256.    *             Copyright (c) 1986,1987 Dave Taylor
  1257. ***************
  1258. *** 14,19 ****
  1259. --- 14,23 ----
  1260.    *
  1261.    *******************************************************************************
  1262.    * $Log: showmsg.c,v $
  1263. +  * Revision 5.6  1992/11/15  01:29:37  syd
  1264. +  * Clear the screen before displaying MIME:
  1265. +  * From: marius@rhi.hi.is (Marius Olafsson)
  1266. +  *
  1267.    * Revision 5.5  1992/11/07  16:23:48  syd
  1268.    * fix null dereferences from patch 5
  1269.    * From: Jukka Ukkonen <ukkonen@csc.fi>
  1270. ***************
  1271. *** 148,153 ****
  1272. --- 152,158 ----
  1273.               copy_message("", fpout, FALSE, FALSE, FALSE, FALSE, FALSE);
  1274.               (void) fclose (fpout);
  1275.               sprintf(Cmd, "metamail -p -z -m Elm %s", fname);
  1276. +                   ClearScreen();
  1277.               Raw(OFF);
  1278.               code = system_call(Cmd, SY_ENAB_SIGINT);
  1279.               Raw(ON);
  1280.  
  1281. Index: utils/listalias.c
  1282. Prereq: 5.4
  1283. *** ../elm2.4/utils/listalias.c    Mon Nov  2 15:51:50 1992
  1284. --- utils/listalias.c    Sat Nov 14 20:24:36 1992
  1285. ***************
  1286. *** 1,8 ****
  1287.   
  1288. ! static char rcsid[] = "@(#)$Id: listalias.c,v 5.4 1992/11/02 20:49:19 syd Exp $";
  1289.   
  1290.   /*******************************************************************************
  1291. !  *  The Elm Mail System  -  $Revision: 5.4 $   $State: Exp $
  1292.    *
  1293.    *             Copyright (c) 1988-1992 USENET Community Trust
  1294.    *             Copyright (c) 1986,1987 Dave Taylor
  1295. --- 1,8 ----
  1296.   
  1297. ! static char rcsid[] = "@(#)$Id: listalias.c,v 5.5 1992/11/15 01:24:34 syd Exp $";
  1298.   
  1299.   /*******************************************************************************
  1300. !  *  The Elm Mail System  -  $Revision: 5.5 $   $State: Exp $
  1301.    *
  1302.    *             Copyright (c) 1988-1992 USENET Community Trust
  1303.    *             Copyright (c) 1986,1987 Dave Taylor
  1304. ***************
  1305. *** 14,19 ****
  1306. --- 14,29 ----
  1307.    *
  1308.    *******************************************************************************
  1309.    * $Log: listalias.c,v $
  1310. +  * Revision 5.5  1992/11/15  01:24:34  syd
  1311. +  * The situation is that the .elm/aliases file is missing, but
  1312. +  * .elm/aliases.dir and .elm/aliases.pag exist (isn't serendipity
  1313. +  * wonderful?).  The ndbz functions tolerate this and just put a NULL
  1314. +  * pointer in the db structure for the data file FILE pointer.  However,
  1315. +  * get_one_alias() in listalias and elm doesn't account for the db_open()
  1316. +  * succeeding but the dbz_basef field being NULL, so it passes the NULL
  1317. +  * pointer to fread().  Detect null and return 0
  1318. +  * From: dwolfe@pffft.sps.mot.com (Dave Wolfe)
  1319. +  *
  1320.    * Revision 5.4  1992/11/02  20:49:19  syd
  1321.    * Resolve a linking error in listalias when DEBUG is enabled.
  1322.    * From cs.utexas.edu!chinacat!chip Sun Nov  1 22:04:02 1992
  1323. ***************
  1324. *** 159,164 ****
  1325. --- 169,177 ----
  1326.    */
  1327.   
  1328.       FILE *data_file = db->dbz_basef;
  1329. + 
  1330. +     if (data_file == NULL)
  1331. +         return(0);    /* no alias file, but hash exists, error condition */
  1332.   
  1333.       if (fread((char *) ar, sizeof(struct alias_rec), 1, data_file) <= 0)
  1334.           return(0);
  1335.  
  1336. Index: filter/Makefile.SH
  1337. Prereq: 5.1
  1338. *** ../elm2.4/filter/Makefile.SH    Sat Oct  3 18:18:26 1992
  1339. --- filter/Makefile.SH    Sat Nov 14 20:40:45 1992
  1340. ***************
  1341. *** 21,27 ****
  1342.   fi
  1343.   cat >Makefile <<!GROK!THIS!
  1344.   #
  1345. ! # @(#)$Id: Makefile.SH,v 5.1 1992/10/03 22:18:09 syd Exp $
  1346.   #  Makefile for the Elm system filter program
  1347.   #
  1348.   #         (C) Copyright 1986,1987, by Dave Taylor
  1349. --- 21,27 ----
  1350.   fi
  1351.   cat >Makefile <<!GROK!THIS!
  1352.   #
  1353. ! # @(#)$Id: Makefile.SH,v 5.2 1992/11/15 01:40:43 syd Exp $
  1354.   #  Makefile for the Elm system filter program
  1355.   #
  1356.   #         (C) Copyright 1986,1987, by Dave Taylor
  1357. ***************
  1358. *** 33,38 ****
  1359. --- 33,43 ----
  1360.   #            dsinc!elm
  1361.   #
  1362.   #  $Log: Makefile.SH,v $
  1363. + # Revision 5.2  1992/11/15  01:40:43  syd
  1364. + # Add regexp processing to filter.
  1365. + # Add execc operator
  1366. + # From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  1367. + #
  1368.   # Revision 5.1  1992/10/03  22:18:09  syd
  1369.   # Initial checkin as of 2.4 Release at PL0
  1370.   #
  1371. ***************
  1372. *** 80,85 ****
  1373. --- 85,91 ----
  1374.               filter.c    \
  1375.               lock.c        \
  1376.               parse.c        \
  1377. +             regexp.c    \
  1378.               rules.c        \
  1379.               summarize.c    \
  1380.               utils.c
  1381. ***************
  1382. *** 89,94 ****
  1383. --- 95,101 ----
  1384.               filter.o    \
  1385.               lock.o        \
  1386.               parse.o        \
  1387. +             regexp.o    \
  1388.               rules.o        \
  1389.               summarize.o    \
  1390.               utils.o        \
  1391. ***************
  1392. *** 148,153 ****
  1393. --- 155,161 ----
  1394.   filter.o:        $(INCLDIR)/defs.h $(INCLDIR)/filter.h $(INCLDIR)/s_filter.h
  1395.   lock.o:            $(INCLDIR)/defs.h $(INCLDIR)/filter.h $(INCLDIR)/s_filter.h
  1396.   parse.o:        $(INCLDIR)/defs.h $(INCLDIR)/filter.h $(INCLDIR)/s_filter.h
  1397. + regexp.o:        $(INCLDIR)/defs.h $(INCLDIR)/regexp.h
  1398.   rules.o:        $(INCLDIR)/defs.h $(INCLDIR)/filter.h $(INCLDIR)/s_filter.h
  1399.   summarize.o:        $(INCLDIR)/defs.h $(INCLDIR)/filter.h $(INCLDIR)/s_filter.h
  1400.   utils.o:        $(INCLDIR)/defs.h $(INCLDIR)/filter.h $(INCLDIR)/s_filter.h
  1401.  
  1402. Index: filter/filter.c
  1403. Prereq: 5.2
  1404. *** ../elm2.4/filter/filter.c    Tue Nov 10 15:20:22 1992
  1405. --- filter/filter.c    Sat Nov 14 20:40:44 1992
  1406. ***************
  1407. *** 1,8 ****
  1408.   
  1409. ! static char rcsid[] ="@(#)$Id: filter.c,v 5.2 1992/11/07 16:20:56 syd Exp $";
  1410.   
  1411.   /*******************************************************************************
  1412. !  *  The Elm Mail System  -  $Revision: 5.2 $   $State: Exp $
  1413.    *
  1414.    *             Copyright (c) 1988-1992 USENET Community Trust
  1415.    *             Copyright (c) 1986,1987 Dave Taylor
  1416. --- 1,8 ----
  1417.   
  1418. ! static char rcsid[] ="@(#)$Id: filter.c,v 5.3 1992/11/15 01:40:43 syd Exp $";
  1419.   
  1420.   /*******************************************************************************
  1421. !  *  The Elm Mail System  -  $Revision: 5.3 $   $State: Exp $
  1422.    *
  1423.    *             Copyright (c) 1988-1992 USENET Community Trust
  1424.    *             Copyright (c) 1986,1987 Dave Taylor
  1425. ***************
  1426. *** 14,19 ****
  1427. --- 14,24 ----
  1428.    *
  1429.    *******************************************************************************
  1430.    * $Log: filter.c,v $
  1431. +  * Revision 5.3  1992/11/15  01:40:43  syd
  1432. +  * Add regexp processing to filter.
  1433. +  * Add execc operator
  1434. +  * From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  1435. +  *
  1436.    * Revision 5.2  1992/11/07  16:20:56  syd
  1437.    * The first is that when doing a summary, macros are expanded when printing the
  1438.    * rule. IMHO they should be printed as with the -r option (i.e. %t is
  1439. ***************
  1440. *** 77,82 ****
  1441. --- 82,88 ----
  1442.       struct passwd  *getpwuid();        /* for /etc/passwd          */
  1443.   #endif
  1444.       char filename[SLEN],            /* name of the temp file    */
  1445. +          action_argument[SLEN],         /* action arg, per rule    */
  1446.            buffer[MAX_LINE_LEN];        /* input buffer space       */
  1447.       int  in_header = TRUE,            /* for header parsing       */
  1448.            in_to     = FALSE,            /* are we on 'n' line To: ? */
  1449. ***************
  1450. *** 260,267 ****
  1451.       if (get_filter_rules() == -1)
  1452.         mail_message(username);
  1453.       else {
  1454. !       switch (action_from_ruleset()) {
  1455.   
  1456.           case DELETE_MSG : if (verbose && outfd != NULL)
  1457.                   fprintf(outfd,
  1458.                       catgets(elm_msg_cat,FilterSet,
  1459. --- 266,282 ----
  1460.       if (get_filter_rules() == -1)
  1461.         mail_message(username);
  1462.       else {
  1463. !       int action = action_from_ruleset();
  1464. ! 
  1465. !       if (rule_choosen >= 0) {
  1466. !         expand_macros(rules[rule_choosen].argument2, action_argument,
  1467. !             rules[rule_choosen].line, printing_rules);
  1468. !         /* Got to do this because log_msg() uses argument2 in rules[] */
  1469. !         strcpy(rules[rule_choosen].argument2, action_argument);
  1470. !       }
  1471.   
  1472. +       switch (action) {
  1473. + 
  1474.           case DELETE_MSG : if (verbose && outfd != NULL)
  1475.                   fprintf(outfd,
  1476.                       catgets(elm_msg_cat,FilterSet,
  1477. ***************
  1478. *** 291,296 ****
  1479. --- 306,316 ----
  1480.                         break;
  1481.           case FORWARD: mail_message(rules[rule_choosen].argument2);
  1482.                 log_msg(FORWARD);
  1483. +                       break;
  1484. + 
  1485. +         case EXECC    : mail_message(username);
  1486. +                   execute(rules[rule_choosen].argument2);
  1487. +               log_msg(EXECC);
  1488.                         break;
  1489.   
  1490.           case EXEC   : execute(rules[rule_choosen].argument2);
  1491.  
  1492. Index: filter/parse.c
  1493. Prereq: 5.3
  1494. *** ../elm2.4/filter/parse.c    Mon Nov  2 15:51:41 1992
  1495. --- filter/parse.c    Sat Nov 14 20:40:46 1992
  1496. ***************
  1497. *** 1,8 ****
  1498.   
  1499. ! static char rcsid[] ="@(#)$Id: parse.c,v 5.3 1992/10/28 14:52:25 syd Exp $";
  1500.   
  1501.   /*******************************************************************************
  1502. !  *  The Elm Mail System  -  $Revision: 5.3 $   $State: Exp $
  1503.    *
  1504.    *             Copyright (c) 1988-1992 USENET Community Trust
  1505.    *             Copyright (c) 1986,1987 Dave Taylor
  1506. --- 1,8 ----
  1507.   
  1508. ! static char rcsid[] ="@(#)$Id: parse.c,v 5.4 1992/11/15 01:40:43 syd Exp $";
  1509.   
  1510.   /*******************************************************************************
  1511. !  *  The Elm Mail System  -  $Revision: 5.4 $   $State: Exp $
  1512.    *
  1513.    *             Copyright (c) 1988-1992 USENET Community Trust
  1514.    *             Copyright (c) 1986,1987 Dave Taylor
  1515. ***************
  1516. *** 14,19 ****
  1517. --- 14,24 ----
  1518.    *
  1519.    *******************************************************************************
  1520.    * $Log: parse.c,v $
  1521. +  * Revision 5.4  1992/11/15  01:40:43  syd
  1522. +  * Add regexp processing to filter.
  1523. +  * Add execc operator
  1524. +  * From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  1525. +  *
  1526.    * Revision 5.3  1992/10/28  14:52:25  syd
  1527.    * fix compiler warning
  1528.    * From: steve@nshore.org (Stephen J. Walick)
  1529. ***************
  1530. *** 234,242 ****
  1531.   
  1532.               if (relop == NONE) relop = EQ;    /* otherwise can't do -relop */
  1533.               cond->relation  = (not_condition? - (relop) : relop);
  1534.   
  1535. !         for (i=strlen(cond_argument); --i >= 0;)
  1536. !               if (cond_argument[i] == '_') cond_argument[i] = ' ';
  1537.   
  1538.           strcpy(cond->argument1, cond_argument);
  1539.               if ((newcond = (struct condition_rec *)
  1540. --- 239,249 ----
  1541.   
  1542.               if (relop == NONE) relop = EQ;    /* otherwise can't do -relop */
  1543.               cond->relation  = (not_condition? - (relop) : relop);
  1544. +         cond->regex = NULL;
  1545.   
  1546. !         if (relop != RE)
  1547. !           for (i=strlen(cond_argument); --i >= 0;)
  1548. !                 if (cond_argument[i] == '_') cond_argument[i] = ' ';
  1549.   
  1550.           strcpy(cond->argument1, cond_argument);
  1551.               if ((newcond = (struct condition_rec *)
  1552. ***************
  1553. *** 273,278 ****
  1554. --- 280,286 ----
  1555.   
  1556.           cond->matchwhat = lasttype;
  1557.               cond->relation  = (not_condition? - (relop) : relop);
  1558. +         cond->regex = NULL;
  1559.           strcpy(cond->argument1, cond_argument);
  1560.               if ((newcond = (struct condition_rec *)
  1561.                    malloc(sizeof(struct condition_rec))) == NULL) {
  1562. ***************
  1563. *** 318,323 ****
  1564. --- 326,333 ----
  1565.                else if (the_same(word, "<>")||
  1566.                     the_same(word, "!="))    relop = NE;
  1567.                else if (the_same(word, "<"))    relop = LT;
  1568. +              else if (the_same(word, "~")||
  1569. +               the_same(word, "matches")) relop = RE;
  1570.   
  1571.            /* maybe there isn't a relop at all!! */
  1572.   
  1573. ***************
  1574. *** 327,340 ****
  1575.           }
  1576.            
  1577.           if (state == READING_ARGUMENT) {
  1578. !           if (relop != NONE) {
  1579. !             if ((word = strtok(str, " ()[]'\"\t\n")) == NULL)
  1580. !               continue;
  1581. !           }
  1582. !           for (i=strlen(word); --i>=0;)
  1583. !             if (word[i] == '_') word[i] = ' ';
  1584.   
  1585. !           strcpy(cond_argument, word);
  1586.             state = NEXT_CONDITION;
  1587.           }
  1588.   
  1589. --- 337,367 ----
  1590.           }
  1591.            
  1592.           if (state == READING_ARGUMENT) {
  1593. !           if (relop == RE){
  1594. !         /* Special for regular expressions (enclosed between //) */
  1595. !         cond_argument[0] = '\0';
  1596. !         for (;;) {
  1597. !               if ((word = strtok(str, "/")) == NULL)
  1598. !                 break;
  1599. !           strcat(cond_argument, word);
  1600. !           if (word[strlen(word)-1] == '\\') /* If / was escaped ... */
  1601. !             strcat(cond_argument, "/");
  1602. !           else
  1603. !             break;
  1604. !         }
  1605. !         if (word == NULL)
  1606. !           continue;
  1607. ! 
  1608. !           } else {
  1609. !         if (relop != NONE) {
  1610. !               if ((word = strtok(str, " ()[]'\"\t\n")) == NULL)
  1611. !                 continue;
  1612. !             }
  1613. !             for (i=strlen(word); --i>=0;)
  1614. !               if (word[i] == '_') word[i] = ' ';
  1615.   
  1616. !             strcpy(cond_argument, word);
  1617. !           }
  1618.             state = NEXT_CONDITION;
  1619.           }
  1620.   
  1621. ***************
  1622. *** 348,353 ****
  1623. --- 375,381 ----
  1624.             else if (the_same(word, "save"))    action = SAVE;
  1625.             else if (the_same(word, "forwardc")) action = FORWARDC;
  1626.             else if (the_same(word, "forward")) action = FORWARD;
  1627. +           else if (the_same(word, "executec")) action = EXECC;
  1628.             else if (the_same(word, "exec"))    action = EXEC;
  1629.             else if (the_same(word, "leave"))   action = LEAVE;
  1630.             else {
  1631. ***************
  1632. *** 394,401 ****
  1633.             /** add this to the rules section and alloc next... **/
  1634.   
  1635.             rules[total_rules].action = action;
  1636. !           expand_macros(action_argument, rules[total_rules].argument2,line,
  1637. !                 printing_rules);
  1638.   
  1639.             if (++total_rules >= sizeof_rules)
  1640.               sizeof_rules = grow(&rules, sizeof_rules, RULESINC);
  1641. --- 422,437 ----
  1642.             /** add this to the rules section and alloc next... **/
  1643.   
  1644.             rules[total_rules].action = action;
  1645. !           rules[total_rules].line = line;
  1646. ! 
  1647. !           /** if we are not printing rules we can't expand macros
  1648. !           until after we applied the rule, due to the regexp macros
  1649. !           **/
  1650. !           if (printing_rules)
  1651. !             expand_macros(action_argument, rules[total_rules].argument2,
  1652. !                   line, printing_rules);
  1653. !           else
  1654. !         strcpy(rules[total_rules].argument2, action_argument);
  1655.   
  1656.             if (++total_rules >= sizeof_rules)
  1657.               sizeof_rules = grow(&rules, sizeof_rules, RULESINC);
  1658.  
  1659. Index: Patchlist
  1660. *** ../elm2.4/Patchlist    Tue Nov 10 15:20:31 1992
  1661. --- Patchlist    Sat Nov 14 21:34:54 1992
  1662. ***************
  1663. *** 1,4 ****
  1664. --- 1,64 ----
  1665.   =========================================================
  1666. + Patch Set - Patches 9 and 10 : Sat Nov 14 21:34:44 EST 1992
  1667. + Elm 2.4PL8 -> Elm 2.4PL10
  1668. + 
  1669. + I think that the code in 'newmbox.c' which handles bad 'Content-length'
  1670. + entries is incomplete. The file-ptr for the mail file is
  1671. + backed up, but the file-ptr of the temp file WAS LEFT UNMODIFIED !
  1672. + From langesw.ssw.de!root Wed Nov 11 14:28:57 1992
  1673. + 
  1674. + When elm copies the temp mailbox back to the mail spool to resync or
  1675. + quit, it changes to the mailgroup before attempting to diddle in the
  1676. + mail spool, but when it copies the temp mailbox back to the mail spool
  1677. + after editing, it forgets to change to mailgroup.  This patch appears
  1678. + to work, but I haven't exhaustively checked for some path that leaves
  1679. + the gid set
  1680. + wrong.  From: dwolfe@pffft.sps.mot.com (Dave Wolfe)
  1681. + 
  1682. + There's an error in two messages in s_aliases.m which causes elm2.4
  1683. + to core dump when resyncronize aliases. (%s/%s) should be (%c/%c).
  1684. + 
  1685. + This bug doesn't show up unless you use message cataloges, since the default
  1686. + message in a_quit.c is correct.
  1687. + From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  1688. + 
  1689. + Fix how nls emulation lib gencat links prev pointers
  1690. + From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  1691. + 
  1692. + The alias message_count isn't set to zero if the last alias has
  1693. + been deleted from the alias table. As no aliases are reread from
  1694. + the aliases database the message_count is left as it was before.
  1695. + 
  1696. + Fixed that the function do_newalias() sometimes returns without freeing
  1697. + the buffer allocated before. The patch adds these free calls.
  1698. + 
  1699. + When you erroneously type a number in your folder elm asks you for
  1700. + a new current message number. But now if you erase this one number
  1701. + and leave the string empty elm will set the new current message to
  1702. + the second message on our sun4! The patch adds a check for an empty
  1703. + string and returns the current number if no number was entered.
  1704. + From: vogt@isa.de (Gerald Vogt)
  1705. + 
  1706. + The situation is that the .elm/aliases file is missing, but
  1707. + .elm/aliases.dir and .elm/aliases.pag exist (isn't serendipity
  1708. + wonderful?).  The ndbz functions tolerate this and just put a NULL
  1709. + pointer in the db structure for the data file FILE pointer.  However,
  1710. + get_one_alias() in listalias and elm doesn't account for the db_open()
  1711. + succeeding but the dbz_basef field being NULL, so it passes the NULL
  1712. + pointer to fread().  Detect null and return 0
  1713. + From: dwolfe@pffft.sps.mot.com (Dave Wolfe)
  1714. + 
  1715. + Clear the screen before displaying MIME:
  1716. + From: marius@rhi.hi.is (Marius Olafsson)
  1717. + 
  1718. + Add regexp processing to filter.
  1719. + Add execc operator
  1720. + From: Jan Djarv <Jan.Djarv@sa.erisoft.se>
  1721. + 
  1722. + 
  1723. + 
  1724. + 
  1725. + =========================================================
  1726.   Patch Set - Patches 7 and 8 : Sat Nov  7 15:54:44 EST 1992
  1727.   Elm 2.4PL6 -> Elm 2.4PL8
  1728.   
  1729.  
  1730. -- 
  1731. ========================================================================
  1732. Sydney S. Weinstein, CDP, CCP          Elm Coordinator - Current 2.4PL08
  1733. Datacomp Systems, Inc.                 Projected 3.0 Release: ??? ?,1994
  1734. syd@DSI.COM or dsinc!syd      Voice: (215) 947-9900, FAX: (215) 938-0235
  1735.