home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume24 / elm2.3patches / part01 next >
Text File  |  1991-03-05  |  29KB  |  949 lines
  1. Subject:  v24i025:  Elm mail system, release 2.3, patches, Part01/11
  2. Newsgroups: comp.sources.unix
  3. Approved: rsalz@uunet.UU.NET
  4. X-Checksum-Snefru: c9c545f7 3724c740 68cc405e 8f9f84ac
  5.  
  6. Submitted-by: Syd Weinstein <syd@DSI.COM>
  7. Posting-number: Volume 24, Issue 25
  8. Archive-name: elm2.3patches/part01
  9.  
  10. Subject: elm 2.3 Patch #1
  11. Summary: This is an official patch for elm 2.3 system.  Please apply it.
  12. Priority: HIGH
  13.  
  14. Fix:    From rn, say "| patch -p -N -d DIR", where DIR is your elm source
  15.     directory.  Outside of rn, say "cd DIR; patch -p -N <thisarticle".
  16.     If you don't have the patch program, apply the following by hand,
  17.     or get patch (version 2.0, latest patchlevel).
  18.  
  19.     After patching:
  20.         Configure -d    (only if you had htons or signal problems)
  21.         make
  22.         make install
  23.  
  24.     If patch indicates that patchlevel is the wrong version, you may need
  25.     to apply one or more previous patches, or the patch may already
  26.     have been applied.  See the patchlevel.h file to find out what has or
  27.     has not been applied.  In any event, don't continue with the patch.
  28.  
  29.     If you are missing previous patches they can be obtained from our:
  30.     archive server.
  31.  
  32.     Syd Weinstein
  33.     elm@DSI.COM
  34.  
  35.     The patches are available from the dsinc archive server
  36.     Send the following message to archive-server@DSI.COM for
  37.     a list of available patches:
  38.  
  39.     Subject: patch list
  40.     send index elm
  41.  
  42. Fixed Metaconfig prototype for voidsig, the test was backwards
  43. (had a -z where a -n should have been)
  44. From: Syd
  45.  
  46. The open system call in actions.c for EMERGENCY_MAILBOX and EMER_MBOX
  47. were tested with the inequality >= 0 exactly backwards.
  48. If the user's system mail box (/usr/spool/mail/user_id) is
  49. removed the attempt of filter to flock it fails.  If it does not exist then
  50. it should create it and then lock it.
  51. From: john@hopf.math.nwu.edu (John Franks)
  52.  
  53. Allow nesting on () in comment in address
  54. From: Chip Rosenthal <chip@chinacat.Unicom.COM>
  55.  
  56. Fix boundary condition in add_name_to_list() where it fails to
  57. print error message.
  58. From: Chip Rosenthal <chip@chinacat.Unicom.COM>
  59.  
  60. Fixes the 'g' Group Reply command to send to the cc list also.
  61. A bad variable name caused it to be ignored.
  62. From: chip@chinacat.Unicom.COM (Chip Rosenthal)
  63.  
  64. Fixes when ALLOW_SUBSHELL #define'd and you are in the
  65. Message Header Edit Screen and the mail you just composed
  66. is not a reply THEN the subshell command is executed.
  67. From: zvr@natasha.cs.wisc.EDU (Alexios Zavras)
  68.  
  69. Fixes where src/curses.c attempts to set the screen size via the ioctl
  70. TIOCGWINSIZ if it exsists. It should only use the row or col size as
  71. returned from the ioctl if they are not 0.
  72. From: muller%sdcc10@ucsd.edu (Keith Muller)
  73.  
  74. alias command in ELM2.3 fails because of the wrong sized aliases.hash
  75. newalias did not truncate existing file (aliases.hash)
  76. From: Toshinori Maeno <tmaeno@cc.titech.ac.jp>
  77.  
  78. Fix htonl() double define problems
  79. From: Syd
  80.  
  81. Fix aliases.hash.tmp being over 14 chars and causing rename problems
  82. on a 14 character limit system.
  83. From: Syd
  84.  
  85. Fix now spurious error message for alias recursive expansion
  86. when alias lookup is on a string over 20 chars long.  If that
  87. long, its just not an alias, so just return.
  88. From: Syd
  89.  
  90. Index: hdrs/patchlevel.h
  91. Prereq: 0
  92. *** ../elm2.3/hdrs/patchlevel.h    Sat Apr 28 22:29:41 1990
  93. --- hdrs/patchlevel.h    Tue Jun  5 21:26:16 1990
  94. ***************
  95. *** 1 ****
  96. ! #define PATCHLEVEL 0
  97. --- 1 ----
  98. ! #define PATCHLEVEL 1
  99.  
  100. Index: Configure
  101. Prereq: 4.1
  102. *** ../elm2.3/Configure    Sat Apr 28 22:40:52 1990
  103. --- Configure    Thu May 31 20:47:07 1990
  104. ***************
  105. *** 8,14 ****
  106.   # and edit it to reflect your system.  Some packages may include samples
  107.   # of config.h for certain machines, so you might look for one of those.)
  108.   #
  109. ! # $Header: /files/home/users/syd/elm.dev/RCS/Configure,v 4.1 90/04/28 22:40:46 syd Exp $
  110.   #
  111.   # Yes, you may rip this off to use in other distribution packages.
  112.   # (Note: this Configure script was generated automatically.  Rather than
  113. --- 8,14 ----
  114.   # and edit it to reflect your system.  Some packages may include samples
  115.   # of config.h for certain machines, so you might look for one of those.)
  116.   #
  117. ! # $Header: /files/home/users/syd/elm.rel/RCS/Configure,v 4.1.1.1 90/05/31 20:46:41 syd Exp $
  118.   #
  119.   # Yes, you may rip this off to use in other distribution packages.
  120.   # (Note: this Configure script was generated automatically.  Rather than
  121. ***************
  122. *** 2701,2725 ****
  123.   set rename d_rename
  124.   eval $inlibc
  125.   
  126. - : ask about setgid running of Elm
  127. - case "$d_setgid" in
  128. - "$define")    dflt=y;;
  129. - "$undef")    dflt=n;;
  130. - *)        dflt=y;;
  131. - esac
  132. - echo " "
  133. - rp="Am I going to be running as a setgid program? [$dflt]"
  134. - $echo $n "$rp $c"
  135. - . myread
  136. - case "$ans" in
  137. - y*) d_setgid="$define";;
  138. - *)  d_setgid="$undef";;
  139. - esac
  140. - case "$d_setgid" in
  141. - "$define")    mailermode=2755;;
  142. - *)        mailermode=755;;
  143. - esac
  144. - 
  145.   : see if sigvector exists -- since sigvec will match the substring
  146.   echo " "
  147.   if $contains sigvector libc.list >/dev/null 2>&1; then
  148. --- 2701,2706 ----
  149. ***************
  150. *** 3163,3169 ****
  151.   elif $contains 'void.*signal' $$.tmp >/dev/null 2>&1 ; then
  152.       echo "You have void (*signal())() instead of int."
  153.       d_voidsig="$define"
  154. ! elif $test -z "$d_voidsig"; then
  155.       echo $n "As you already told me, signal handlers return "
  156.       if $test "$d_voidsig" = "$define"; then
  157.       echo void
  158. --- 3144,3150 ----
  159.   elif $contains 'void.*signal' $$.tmp >/dev/null 2>&1 ; then
  160.       echo "You have void (*signal())() instead of int."
  161.       d_voidsig="$define"
  162. ! elif $test -n "$d_voidsig"; then
  163.       echo $n "As you already told me, signal handlers return "
  164.       if $test "$d_voidsig" = "$define"; then
  165.       echo void
  166. ***************
  167. *** 3443,3448 ****
  168. --- 3424,3448 ----
  169.       esac
  170.       fi
  171.   done
  172. + 
  173. + : ask about setgid running of Elm
  174. + case "$d_setgid" in
  175. + "$define")    dflt=y;;
  176. + "$undef")    dflt=n;;
  177. + *)        dflt=y;;
  178. + esac
  179. + echo " "
  180. + rp="Am I going to be running as a setgid program? [$dflt]"
  181. + $echo $n "$rp $c"
  182. + . myread
  183. + case "$ans" in
  184. + y*) d_setgid="$define";;
  185. + *)  d_setgid="$undef";;
  186. + esac
  187. + case "$d_setgid" in
  188. + "$define")    mailermode=2755;;
  189. + *)        mailermode=755;;
  190. + esac
  191.   
  192.   : determine the group of the mail directory- what group elm should use
  193.   mailgrp=`$ls -lgd $maildir`
  194.  
  195. Index: filter/actions.c
  196. Prereq: 4.1
  197. *** ../elm2.3/filter/actions.c    Sat Apr 28 22:41:54 1990
  198. --- filter/actions.c    Tue Jun  5 20:28:52 1990
  199. ***************
  200. *** 1,8 ****
  201.   
  202. ! static char rcsid[] ="@(#)$Id: actions.c,v 4.1 90/04/28 22:41:53 syd Exp $";
  203.   
  204.   /*******************************************************************************
  205. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  206.    *
  207.    *             Copyright (c) 1986, 1987 Dave Taylor
  208.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  209. --- 1,8 ----
  210.   
  211. ! static char rcsid[] ="@(#)$Id: actions.c,v 4.1.1.1 90/06/05 20:28:51 syd Exp $";
  212.   
  213.   /*******************************************************************************
  214. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  215.    *
  216.    *             Copyright (c) 1986, 1987 Dave Taylor
  217.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  218. ***************
  219. *** 14,19 ****
  220. --- 14,27 ----
  221.    *
  222.    *******************************************************************************
  223.    * $Log:    actions.c,v $
  224. +  * Revision 4.1.1.1  90/06/05  20:28:51  syd
  225. +  * The open system call in actions.c for EMERGENCY_MAILBOX and EMER_MBOX
  226. +  * were tested with the inequality >= 0 exactly backwards.
  227. +  * If the user's system mail box (/usr/spool/mail/user_id) is
  228. +  * removed the attempt of filter to flock it fails.  If it does not exist then
  229. +  * it should create it and then lock it.
  230. +  * From: john@hopf.math.nwu.edu (John Franks)
  231. +  * 
  232.    * Revision 4.1  90/04/28  22:41:53  syd
  233.    * checkin of Elm 2.3 as of Release PL0
  234.    * 
  235. ***************
  236. *** 225,231 ****
  237.   
  238.       sprintf(mailbox, "%s/%s", home, EMERGENCY_MAILBOX);
  239.   
  240. !     if ((mailunit = open(mailbox, O_APPEND | O_WRONLY | O_CREAT, 0600)) >= 0) {
  241.         if (outfd != NULL)
  242.           fprintf(outfd, "filter (%s): Can't open %s either!!\n",
  243.               username, mailbox);
  244. --- 233,239 ----
  245.   
  246.       sprintf(mailbox, "%s/%s", home, EMERGENCY_MAILBOX);
  247.   
  248. !     if ((mailunit = open(mailbox, O_APPEND | O_WRONLY | O_CREAT, 0600)) < 0) {
  249.         if (outfd != NULL)
  250.           fprintf(outfd, "filter (%s): Can't open %s either!!\n",
  251.               username, mailbox);
  252. ***************
  253. *** 232,238 ****
  254.   
  255.         sprintf(mailbox,"%s/%s", home, EMERG_MBOX); 
  256.   
  257. !       if ((mailunit = open(mailbox, O_APPEND | O_WRONLY | O_CREAT, 0600)) >= 0) {
  258.   
  259.           if (outfd != NULL) {
  260.             fprintf(outfd,"filter (%s): Can't open %s either!!!!\n",
  261. --- 240,246 ----
  262.   
  263.         sprintf(mailbox,"%s/%s", home, EMERG_MBOX); 
  264.   
  265. !       if ((mailunit = open(mailbox, O_APPEND | O_WRONLY | O_CREAT, 0600)) < 0) {
  266.   
  267.           if (outfd != NULL) {
  268.             fprintf(outfd,"filter (%s): Can't open %s either!!!!\n",
  269.  
  270. Index: filter/lock.c
  271. Prereq: 4.1
  272. *** ../elm2.3/filter/lock.c    Sat Apr 28 22:41:58 1990
  273. --- filter/lock.c    Tue Jun  5 20:28:54 1990
  274. ***************
  275. *** 1,8 ****
  276.   
  277. ! static char rcsid[] ="@(#)$Id: lock.c,v 4.1 90/04/28 22:41:57 syd Exp $";
  278.   
  279.   /*******************************************************************************
  280. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  281.    *
  282.    *             Copyright (c) 1986, 1987 Dave Taylor
  283.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  284. --- 1,8 ----
  285.   
  286. ! static char rcsid[] ="@(#)$Id: lock.c,v 4.1.1.1 90/06/05 20:28:53 syd Exp $";
  287.   
  288.   /*******************************************************************************
  289. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  290.    *
  291.    *             Copyright (c) 1986, 1987 Dave Taylor
  292.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  293. ***************
  294. *** 14,19 ****
  295. --- 14,27 ----
  296.    *
  297.    *******************************************************************************
  298.    * $Log:    lock.c,v $
  299. +  * Revision 4.1.1.1  90/06/05  20:28:53  syd
  300. +  * The open system call in actions.c for EMERGENCY_MAILBOX and EMER_MBOX
  301. +  * were tested with the inequality >= 0 exactly backwards.
  302. +  * If the user's system mail box (/usr/spool/mail/user_id) is
  303. +  * removed the attempt of filter to flock it fails.  If it does not exist then
  304. +  * it should create it and then lock it.
  305. +  * From: john@hopf.math.nwu.edu (John Franks)
  306. +  * 
  307.    * Revision 4.1  90/04/28  22:41:57  syd
  308.    * checkin of Elm 2.3 as of Release PL0
  309.    * 
  310. ***************
  311. *** 94,100 ****
  312.   #endif                    /* } !LOCK_FLOCK_ONLY    */
  313.   #ifdef    LOCK_BY_FLOCK            /* { LOCK_BY_FLOCK    */
  314.       (void)sprintf(flock_name,"%s%s",mailhome,username);
  315. !     flock_fd = open(flock_name,O_RDONLY);
  316.       if ( flock_fd >= 0 )
  317.         for (attempts = 0; attempts < 10; attempts++) {
  318.           if ( (ret = flock(flock_fd,LOCK_NB|LOCK_EX)) != -1 )
  319. --- 102,108 ----
  320.   #endif                    /* } !LOCK_FLOCK_ONLY    */
  321.   #ifdef    LOCK_BY_FLOCK            /* { LOCK_BY_FLOCK    */
  322.       (void)sprintf(flock_name,"%s%s",mailhome,username);
  323. !     flock_fd = open(flock_name, O_RDONLY | O_CREAT, 0600);
  324.       if ( flock_fd >= 0 )
  325.         for (attempts = 0; attempts < 10; attempts++) {
  326.           if ( (ret = flock(flock_fd,LOCK_NB|LOCK_EX)) != -1 )
  327.  
  328. Index: hdrs/defs.h
  329. Prereq: 4.1
  330. *** ../elm2.3/hdrs/defs.h    Sat Apr 28 22:42:07 1990
  331. --- hdrs/defs.h    Tue Jun  5 21:23:28 1990
  332. ***************
  333. *** 1,8 ****
  334.   
  335. ! /* $Id: defs.h,v 4.1 90/04/28 22:42:06 syd Exp $ */
  336.   
  337.   /*******************************************************************************
  338. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  339.    *
  340.    *             Copyright (c) 1986, 1987 Dave Taylor
  341.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  342. --- 1,8 ----
  343.   
  344. ! /* $Id: defs.h,v 4.1.1.2 90/06/05 21:23:19 syd Exp $ */
  345.   
  346.   /*******************************************************************************
  347. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  348.    *
  349.    *             Copyright (c) 1986, 1987 Dave Taylor
  350.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  351. ***************
  352. *** 14,19 ****
  353. --- 14,29 ----
  354.    *
  355.    *******************************************************************************
  356.    * $Log:    defs.h,v $
  357. +  * Revision 4.1.1.2  90/06/05  21:23:19  syd
  358. +  * Fix other side of same problem
  359. +  * From: Syd
  360. +  * 
  361. +  * Revision 4.1.1.1  90/06/05  21:16:42  syd
  362. +  * Try and avoid double definitions for the null
  363. +  * macro for htonl when the system includes aready
  364. +  * have it
  365. +  * From: Syd
  366. +  * 
  367.    * Revision 4.1  90/04/28  22:42:06  syd
  368.    * checkin of Elm 2.3 as of Release PL0
  369.    * 
  370. ***************
  371. *** 327,341 ****
  372.   
  373.   /*
  374.    * Macros for network/external number representation conversion.
  375.    */
  376.   #ifdef NETWORK_ORDER
  377.   unsigned short    ntohs(), htons();
  378.   unsigned long    ntohl(), htonl();
  379.   #else
  380. ! #define    ntohl(x)    (x)
  381. ! #define    ntohs(x)    (x)
  382. ! #define    htonl(x)    (x)
  383. ! #define    htons(x)    (x)
  384.   #endif
  385.   
  386.   char *argv_zero();
  387. --- 337,357 ----
  388.   
  389.   /*
  390.    * Macros for network/external number representation conversion.
  391. +  *    Note, some system include files already have htonl defined
  392. +  *    as this same macro, the ifndef should prevent conflicts.
  393.    */
  394.   #ifdef NETWORK_ORDER
  395. + #  ifndef ntohl
  396.   unsigned short    ntohs(), htons();
  397.   unsigned long    ntohl(), htonl();
  398. + #  endif
  399.   #else
  400. ! #  ifndef ntohl
  401. ! #     define    ntohl(x)    (x)
  402. ! #     define    ntohs(x)    (x)
  403. ! #     define    htonl(x)    (x)
  404. ! #     define    htons(x)    (x)
  405. ! #  endif
  406.   #endif
  407.   
  408.   char *argv_zero();
  409.  
  410. Index: src/alias.c
  411. Prereq: 4.1
  412. *** ../elm2.3/src/alias.c    Sat Apr 28 22:42:27 1990
  413. --- src/alias.c    Tue Jun  5 21:20:46 1990
  414. ***************
  415. *** 1,8 ****
  416.   
  417. ! static char rcsid[] = "@(#)$Id: alias.c,v 4.1 90/04/28 22:42:25 syd Exp $";
  418.   
  419.   /*******************************************************************************
  420. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  421.    *
  422.    *             Copyright (c) 1986, 1987 Dave Taylor
  423.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  424. --- 1,8 ----
  425.   
  426. ! static char rcsid[] = "@(#)$Id: alias.c,v 4.1.1.1 90/06/05 21:20:26 syd Exp $";
  427.   
  428.   /*******************************************************************************
  429. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  430.    *
  431.    *             Copyright (c) 1986, 1987 Dave Taylor
  432.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  433. ***************
  434. *** 14,19 ****
  435. --- 14,24 ----
  436.    *
  437.    *******************************************************************************
  438.    * $Log:    alias.c,v $
  439. +  * Revision 4.1.1.1  90/06/05  21:20:26  syd
  440. +  * Make temp file name less than 14 chars to allow deleting
  441. +  * aliases on a 14 char limit file system
  442. +  * From: Syd
  443. +  * 
  444.    * Revision 4.1  90/04/28  22:42:25  syd
  445.    * checkin of Elm 2.3 as of Release PL0
  446.    * 
  447. ***************
  448. *** 437,443 ****
  449.       strcat(name_with_equals, " ="); 
  450.   
  451.       sprintf(fname,"%s/%s", home, ALIAS_TEXT);
  452. !     sprintf(tmpfname,"%s/%s.tmp", home, ALIAS_TEXT);
  453.       
  454.       save_file_stats(fname);
  455.   
  456. --- 442,448 ----
  457.       strcat(name_with_equals, " ="); 
  458.   
  459.       sprintf(fname,"%s/%s", home, ALIAS_TEXT);
  460. !     sprintf(tmpfname,"%s/%s.t", home, ALIAS_TEXT);
  461.       
  462.       save_file_stats(fname);
  463.   
  464.  
  465. Index: src/aliaslib.c
  466. Prereq: 4.1
  467. *** ../elm2.3/src/aliaslib.c    Sat Apr 28 22:42:30 1990
  468. --- src/aliaslib.c    Tue Jun  5 21:32:08 1990
  469. ***************
  470. *** 1,8 ****
  471.   
  472. ! static char rcsid[] = "@(#)$Id: aliaslib.c,v 4.1 90/04/28 22:42:29 syd Exp $";
  473.   
  474.   /*******************************************************************************
  475. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  476.    *
  477.    *             Copyright (c) 1986, 1987 Dave Taylor
  478.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  479. --- 1,8 ----
  480.   
  481. ! static char rcsid[] = "@(#)$Id: aliaslib.c,v 4.1.1.2 90/06/05 21:31:34 syd Exp $";
  482.   
  483.   /*******************************************************************************
  484. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  485.    *
  486.    *             Copyright (c) 1986, 1987 Dave Taylor
  487.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  488. ***************
  489. *** 14,19 ****
  490. --- 14,30 ----
  491.    *
  492.    *******************************************************************************
  493.    * $Log:    aliaslib.c,v $
  494. +  * Revision 4.1.1.2  90/06/05  21:31:34  syd
  495. +  * Fix now spurious error message for alias recursive expansion
  496. +  * when alias lookup is on a string over 20 chars long.  If that
  497. +  * long, its just not an alias, so just return.
  498. +  * From: Syd
  499. +  * 
  500. +  * Revision 4.1.1.1  90/06/05  20:41:25  syd
  501. +  * Fix boundary condition in add_name_to_list() where it fails to
  502. +  * print error message.
  503. +  * From: Chip Rosenthal <chip@chinacat.Unicom.COM>
  504. +  * 
  505.    * Revision 4.1  90/04/28  22:42:29  syd
  506.    * checkin of Elm 2.3 as of Release PL0
  507.    * 
  508. ***************
  509. *** 214,246 ****
  510.    */
  511.   int add_name_to_list(name,bufptr,bufsizep)
  512.   register char *name;    /* name to append to buffer            */
  513. ! char **bufptr;        /* pointer to pointer to end of buffer        */
  514. ! int *bufsizep;        /* pointer to space remaining in buffer        */
  515.   {
  516. !     register char *dest = *bufptr;
  517. !     register int bufsize = *bufsizep;
  518.   
  519. !     if ( bufsize < 2 )
  520. !       return FALSE;
  521. !     *dest++ = ','; --bufsize;
  522. !     *dest++ = ' '; --bufsize;
  523. ! 
  524. !     while ( *name != '\0' && --bufsize > 0 )
  525. !       *dest++ = *name++ ;
  526. !     *dest = '\0';
  527. ! 
  528. !     *bufptr = dest;
  529. !     *bufsizep = bufsize;
  530. !     if ( bufsize <= 0 ) {
  531. !       error("Alias expansion is too long.");
  532. !       return FALSE;
  533.       }
  534.   
  535.       return TRUE;
  536.   }
  537.   
  538.   
  539. - 
  540.   #ifndef DONT_TOUCH_ADDRESSES
  541.   char *expand_system(buffer, show_errors)
  542.   char *buffer;
  543. --- 225,253 ----
  544.    */
  545.   int add_name_to_list(name,bufptr,bufsizep)
  546.   register char *name;    /* name to append to buffer            */
  547. ! register char **bufptr;    /* pointer to pointer to end of buffer        */
  548. ! register int *bufsizep;    /* pointer to space remaining in buffer        */
  549.   {
  550. !     if ( *bufsizep < 0 )
  551. !         return FALSE;
  552.   
  553. !     *bufsizep -= strlen(name)+2;
  554. !     if ( *bufsizep <= 0 ) {
  555. !         *bufsizep = -1;
  556. !         error("Alias expansion is too long.");
  557. !         return FALSE;
  558.       }
  559.   
  560. +     *(*bufptr)++ = ',';
  561. +     *(*bufptr)++ = ' ';
  562. +     while ( *name != '\0' )
  563. +       *(*bufptr)++ = *name++ ;
  564. +     **bufptr = '\0';
  565. + 
  566.       return TRUE;
  567.   }
  568.   
  569.   
  570.   #ifndef DONT_TOUCH_ADDRESSES
  571.   char *expand_system(buffer, show_errors)
  572.   char *buffer;
  573. ***************
  574. *** 269,279 ****
  575.       /** find word and return loc, or -1 **/
  576.       register int loc;
  577.   
  578. !     if (strlen(word) > 20) {
  579. !       dprint(3, (debugfile, "Overly long alias name entered: %s\n", word));
  580. !       error1("Bad alias name: %s.  Too long.\n", word);
  581.         return(-1);
  582. -     }
  583.   
  584.       loc = hash_it(word, size);
  585.   
  586. --- 276,284 ----
  587.       /** find word and return loc, or -1 **/
  588.       register int loc;
  589.   
  590. !     /** cannot be an alias if its longer than 20 chars **/
  591. !     if (strlen(word) > 20)
  592.         return(-1);
  593.   
  594.       loc = hash_it(word, size);
  595.   
  596.  
  597. Index: src/curses.c
  598. Prereq: 4.1
  599. *** ../elm2.3/src/curses.c    Sat Apr 28 22:42:40 1990
  600. --- src/curses.c    Tue Jun  5 21:05:24 1990
  601. ***************
  602. *** 1,8 ****
  603.   
  604. ! static char rcsid[] = "@(#)$Id: curses.c,v 4.1 90/04/28 22:42:39 syd Exp $";
  605.   
  606.   /*******************************************************************************
  607. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  608.    *
  609.    *             Copyright (c) 1986, 1987 Dave Taylor
  610.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  611. --- 1,8 ----
  612.   
  613. ! static char rcsid[] = "@(#)$Id: curses.c,v 4.1.1.1 90/06/05 21:05:22 syd Exp $";
  614.   
  615.   /*******************************************************************************
  616. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  617.    *
  618.    *             Copyright (c) 1986, 1987 Dave Taylor
  619.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  620. ***************
  621. *** 14,19 ****
  622. --- 14,25 ----
  623.    *
  624.    *******************************************************************************
  625.    * $Log:    curses.c,v $
  626. +  * Revision 4.1.1.1  90/06/05  21:05:22  syd
  627. +  * Fixes where src/curses.c attempts to set the screen size via the ioctl
  628. +  * TIOCGWINSIZ if it exsists. It should only use the row or col size as
  629. +  * returned from the ioctl if they are not 0.
  630. +  * From: muller%sdcc10@ucsd.edu (Keith Muller)
  631. +  * 
  632.    * Revision 4.1  90/04/28  22:42:39  syd
  633.    * checkin of Elm 2.3 as of Release PL0
  634.    * 
  635. ***************
  636. *** 258,265 ****
  637.       struct winsize w;
  638.   
  639.       if (ioctl(1,TIOCGWINSZ,&w) != -1) {
  640. !         _lines = w.ws_row;
  641. !         _columns = w.ws_col;
  642.       }
  643.   #endif
  644.   
  645. --- 264,273 ----
  646.       struct winsize w;
  647.   
  648.       if (ioctl(1,TIOCGWINSZ,&w) != -1) {
  649. !         if (w.ws_row > 0)
  650. !             _lines = w.ws_row;
  651. !         if (w.ws_col > 0)
  652. !             _columns = w.ws_col;
  653.       }
  654.   #endif
  655.   
  656.  
  657. Index: src/hdrconfg.c
  658. Prereq: 4.1
  659. *** ../elm2.3/src/hdrconfg.c    Sat Apr 28 22:43:11 1990
  660. --- src/hdrconfg.c    Tue Jun  5 20:59:33 1990
  661. ***************
  662. *** 1,8 ****
  663.   
  664. ! static char rcsid[] = "@(#)$Id: hdrconfg.c,v 4.1 90/04/28 22:43:10 syd Exp $";
  665.   
  666.   /*******************************************************************************
  667. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  668.    *
  669.    *             Copyright (c) 1986, 1987 Dave Taylor
  670.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  671. --- 1,8 ----
  672.   
  673. ! static char rcsid[] = "@(#)$Id: hdrconfg.c,v 4.1.1.2 90/06/05 20:59:30 syd Exp $";
  674.   
  675.   /*******************************************************************************
  676. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  677.    *
  678.    *             Copyright (c) 1986, 1987 Dave Taylor
  679.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  680. ***************
  681. *** 14,19 ****
  682. --- 14,28 ----
  683.    *
  684.    *******************************************************************************
  685.    * $Log:    hdrconfg.c,v $
  686. +  * Revision 4.1.1.2  90/06/05  20:59:30  syd
  687. +  * Fix log
  688. +  * 
  689. +  * Revision 4.1.1.1  90/06/05  20:58:23  syd
  690. +  * Fixes when ALLOW_SUBSHELL #define'd and you are in the
  691. +  * Message Header Edit Screen and the mail you just composed
  692. +  * is not a reply THEN the subshell command is executed.
  693. +  * From: zvr@natasha.cs.wisc.EDU (Alexios Zavras)
  694. +  * 
  695.    * Revision 4.1  90/04/28  22:43:10  syd
  696.    * checkin of Elm 2.3 as of Release PL0
  697.    * 
  698. ***************
  699. *** 192,211 ****
  700.               ClearLine(EXTRA_PROMPT_LINE);
  701.               break;
  702.   
  703. -         case 'i' : if (strlen(in_reply_to) > 0) {
  704. -              PutLine0(INPUT_LINE, 0, "In-Reply-To: "); CleartoEOLN();
  705. -                      if (optionally_enter(in_reply_to,
  706. -                  INPUT_LINE, 13, FALSE, FALSE) == -1)
  707. -                return(0);
  708. -              put_inreplyto();
  709. -              break;        
  710. -                }
  711. - 
  712.   #ifdef ALLOW_SUBSHELL
  713. !         case '!':  if (subshell())
  714. !              display_headers();
  715. !                continue;
  716.   #endif
  717.   
  718.           default  : Centerline(ERROR_LINE, "No such header!");
  719.                  displayed_error = YES;
  720. --- 201,220 ----
  721.               ClearLine(EXTRA_PROMPT_LINE);
  722.               break;
  723.   
  724.   #ifdef ALLOW_SUBSHELL
  725. !         case '!':   if (subshell())
  726. !               display_headers();
  727. !                 break;
  728.   #endif
  729. + 
  730. +         case 'i' :  if (strlen(in_reply_to) > 0) {
  731. +               PutLine0(INPUT_LINE, 0, "In-Reply-To: "); CleartoEOLN();
  732. +                       if (optionally_enter(in_reply_to,
  733. +                   INPUT_LINE, 13, FALSE, FALSE) == -1)
  734. +                 return(0);
  735. +               put_inreplyto();
  736. +               break;        
  737. +                }
  738.   
  739.           default  : Centerline(ERROR_LINE, "No such header!");
  740.                  displayed_error = YES;
  741.  
  742. Index: src/mailmsg1.c
  743. Prereq: 4.1
  744. *** ../elm2.3/src/mailmsg1.c    Sat Apr 28 22:43:27 1990
  745. --- src/mailmsg1.c    Tue Jun  5 20:52:22 1990
  746. ***************
  747. *** 1,8 ****
  748.   
  749. ! static char rcsid[] = "@(#)$Id: mailmsg1.c,v 4.1 90/04/28 22:43:26 syd Exp $";
  750.   
  751.   /*******************************************************************************
  752. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  753.    *
  754.    *             Copyright (c) 1986, 1987 Dave Taylor
  755.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  756. --- 1,8 ----
  757.   
  758. ! static char rcsid[] = "@(#)$Id: mailmsg1.c,v 4.1.1.1 90/06/05 20:52:21 syd Exp $";
  759.   
  760.   /*******************************************************************************
  761. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  762.    *
  763.    *             Copyright (c) 1986, 1987 Dave Taylor
  764.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  765. ***************
  766. *** 14,19 ****
  767. --- 14,24 ----
  768.    *
  769.    *******************************************************************************
  770.    * $Log:    mailmsg1.c,v $
  771. +  * Revision 4.1.1.1  90/06/05  20:52:21  syd
  772. +  * Fixes the 'g' Group Reply command to send to the cc list also.
  773. +  * A bad variable name caused it to be ignored.
  774. +  * From: chip@chinacat.Unicom.COM (Chip Rosenthal)
  775. +  * 
  776.    * Revision 4.1  90/04/28  22:43:26  syd
  777.    * checkin of Elm 2.3 as of Release PL0
  778.    * 
  779. ***************
  780. *** 69,74 ****
  781. --- 74,81 ----
  782.   
  783.       if (get_to(to, expanded_to) == 0)   /* get the To: address and expand */
  784.         return(0);
  785. +     if ( cc[0] != '\0' )            /* expand out CC addresses */
  786. +       build_address(strip_commas(cc), expanded_cc);
  787.   
  788.       /** if we're batchmailing, let's send it and GET OUTTA HERE! **/
  789.   
  790.  
  791. Index: src/strings.c
  792. Prereq: 4.1
  793. *** ../elm2.3/src/strings.c    Sat Apr 28 22:44:17 1990
  794. --- src/strings.c    Tue Jun  5 20:38:59 1990
  795. ***************
  796. *** 1,8 ****
  797.   
  798. ! static char rcsid[] = "@(#)$Id: strings.c,v 4.1 90/04/28 22:44:16 syd Exp $";
  799.   
  800.   /*******************************************************************************
  801. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  802.    *
  803.    *             Copyright (c) 1986, 1987 Dave Taylor
  804.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  805. --- 1,8 ----
  806.   
  807. ! static char rcsid[] = "@(#)$Id: strings.c,v 4.1.1.1 90/06/05 20:38:58 syd Exp $";
  808.   
  809.   /*******************************************************************************
  810. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  811.    *
  812.    *             Copyright (c) 1986, 1987 Dave Taylor
  813.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  814. ***************
  815. *** 14,19 ****
  816. --- 14,23 ----
  817.    *
  818.    *******************************************************************************
  819.    * $Log:    strings.c,v $
  820. +  * Revision 4.1.1.1  90/06/05  20:38:58  syd
  821. +  * Allow nesting on () in comment in address
  822. +  * From: Chip Rosenthal <chip@chinacat.Unicom.COM>
  823. +  * 
  824.    * Revision 4.1  90/04/28  22:44:16  syd
  825.    * checkin of Elm 2.3 as of Release PL0
  826.    * 
  827. ***************
  828. *** 273,295 ****
  829.   char *strip_parens(string)
  830.   char *string;
  831.   {
  832. !     /** Return string with all parenthesized information removed.
  833. !         This is a non-destructive algorithm... **/
  834. ! 
  835.       static char  buffer[VERY_LONG_STRING];
  836. !     register int depth = 0, buffer_index = 0;
  837.   
  838. !     for (; *string; string++) {
  839. !       if (*string == '(')
  840. !         depth++;
  841. !       else if (*string == ')') 
  842. !         depth--;
  843. !       else if (depth == 0)
  844. !         buffer[buffer_index++] = *string;
  845.       }
  846. !     
  847. !     buffer[buffer_index] = '\0';
  848. ! 
  849.       return( (char *) buffer);
  850.   }
  851.   
  852. --- 277,315 ----
  853.   char *strip_parens(string)
  854.   char *string;
  855.   {
  856. !     /**
  857. !         Remove parenthesized information from a string.  More specifically,
  858. !         comments as defined in RFC822 are removed.  This procedure is
  859. !         non-destructive - a pointer to static data is returned.
  860. !     **/
  861.       static char  buffer[VERY_LONG_STRING];
  862. !     register char *bufp;
  863. !     register int depth;
  864.   
  865. !     for ( bufp = buffer, depth = 0 ; *string != '\0' ; ++string ) {
  866. !       switch ( *string ) {
  867. !       case '(':            /* begin comment on '('        */
  868. !         ++depth;
  869. !         break;
  870. !       case ')':            /* decr nesting level on ')'    */
  871. !         --depth;
  872. !         break;
  873. !       case '\\':            /* treat next char literally    */
  874. !         if ( *++string == '\0' ) {        /* gracefully handle    */
  875. !           *bufp++ = '\\';            /* '\' at end of string    */
  876. !           --string;                /* even tho it's wrong    */
  877. !         } else if ( depth == 0 ) {
  878. !           *bufp++ = '\\';
  879. !           *bufp++ = *string;
  880. !         }
  881. !         break;
  882. !       default:            /* a regular char        */
  883. !         if ( depth == 0 )
  884. !           *bufp++ = *string;
  885. !         break;
  886. !       }
  887.       }
  888. !     *bufp = '\0';
  889.       return( (char *) buffer);
  890.   }
  891.   
  892.  
  893. Index: utils/newalias.c
  894. Prereq: 4.1
  895. *** ../elm2.3/utils/newalias.c    Sat Apr 28 22:44:48 1990
  896. --- utils/newalias.c    Tue Jun  5 21:11:22 1990
  897. ***************
  898. *** 1,8 ****
  899.   
  900. ! static char rcsid[] = "@(#)$Id: newalias.c,v 4.1 90/04/28 22:44:46 syd Exp $";
  901.   
  902.   /*******************************************************************************
  903. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  904.    *
  905.    *             Copyright (c) 1986, 1987 Dave Taylor
  906.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  907. --- 1,8 ----
  908.   
  909. ! static char rcsid[] = "@(#)$Id: newalias.c,v 4.1.1.1 90/06/05 21:11:20 syd Exp $";
  910.   
  911.   /*******************************************************************************
  912. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  913.    *
  914.    *             Copyright (c) 1986, 1987 Dave Taylor
  915.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  916. ***************
  917. *** 14,19 ****
  918. --- 14,24 ----
  919.    *
  920.    *******************************************************************************
  921.    * $Log:    newalias.c,v $
  922. +  * Revision 4.1.1.1  90/06/05  21:11:20  syd
  923. +  * alias command in ELM2.3 fails because of the wrong sized aliases.hash
  924. +  * newalias did not truncate existing file (aliases.hash)
  925. +  * From: Toshinori Maeno <tmaeno@cc.titech.ac.jp>
  926. +  * 
  927.    * Revision 4.1  90/04/28  22:44:46  syd
  928.    * checkin of Elm 2.3 as of Release PL0
  929.    * 
  930. ***************
  931. *** 126,132 ****
  932.         }
  933.       }
  934.   
  935. !     if ((hash = open(hashname, O_WRONLY | O_CREAT, 0644)) == -1) {
  936.         printf("Couldn't open %s for output!\n", hashname);
  937.         exit(1);
  938.       }
  939. --- 131,137 ----
  940.         }
  941.       }
  942.   
  943. !     if ((hash = open(hashname, O_WRONLY | O_TRUNC | O_CREAT, 0644)) == -1) {
  944.         printf("Couldn't open %s for output!\n", hashname);
  945.         exit(1);
  946.       }
  947.  
  948. exit 0 # Just in case...
  949.