home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / OSK / APPS / elm.lzh / ELM / PATCH_1 < prev    next >
Text File  |  1991-01-11  |  46KB  |  1,437 lines
  1. diff -c -r elm.dist/config.h elm.new/config.h
  2. *** elm.dist/config.h    Sat Sep 15 14:45:00 1990
  3. --- elm.new/config.h    Tue Sep 11 20:27:00 1990
  4. ***************
  5. *** 159,172 ****
  6.   /* CONFIGURE_DATE
  7.    *    This symbol contains the last date that configure was run for elm -v output.
  8.    */
  9. ! #define        CONFIGURE_DATE    "Fri Jun 29 19:23:57 1990"
  10.   
  11.   /* ENABLE_CALENDAR:
  12.    *    This symbol, if defined, indicates that the calendar feature
  13.    *    should be supported.
  14.    */
  15. ! /* #define    ENABLE_CALENDAR    /**/
  16. ! #define dflt_calendar_file    "calendar"
  17.   
  18.   /* NEED_CUSERID:
  19.    *    This symbol, if defined, means to include our own cuserid().
  20. --- 159,172 ----
  21.   /* CONFIGURE_DATE
  22.    *    This symbol contains the last date that configure was run for elm -v output.
  23.    */
  24. ! #define        CONFIGURE_DATE    "Tue Sep 11 20:20:32 1990"
  25.   
  26.   /* ENABLE_CALENDAR:
  27.    *    This symbol, if defined, indicates that the calendar feature
  28.    *    should be supported.
  29.    */
  30. ! #define    ENABLE_CALENDAR        /**/
  31. ! #define dflt_calendar_file    ".calendar"
  32.   
  33.   /* NEED_CUSERID:
  34.    *    This symbol, if defined, means to include our own cuserid().
  35. ***************
  36. *** 415,427 ****
  37.    *    the /etc/passwd file in Berkeley format (name first thing, everything
  38.    *    up to first comma, with & replaced by capitalized login id, yuck).
  39.    */
  40.   /* USGNAMES:
  41.    *    This symbol, if defined, indicates that full names are stored in
  42.    *    the /etc/passwd file in USG format (everything after - and before ( is
  43.    *    the name).
  44.    */
  45.   #define    PASSNAMES     /*  (undef to take name from ~/.fullname) */
  46. ! #define    BERKNAMES    /* (that is, ":name,stuff:") */
  47.   /* #define    USGNAMES    /* (that is, ":stuff-name(stuff):") */
  48.   
  49.   /* XENIX:
  50. --- 415,437 ----
  51.    *    the /etc/passwd file in Berkeley format (name first thing, everything
  52.    *    up to first comma, with & replaced by capitalized login id, yuck).
  53.    */
  54. + /* OSKTOPNAMES:
  55. +  *    This symbol, if defined, indicates that full names are stored in
  56. +  *    the /etc/passwd file in OSK TOP format (name first thing, everything
  57. +  *    up to first colon, with & replaced by capitalized login id, yuck).
  58. +  */
  59.   /* USGNAMES:
  60.    *    This symbol, if defined, indicates that full names are stored in
  61.    *    the /etc/passwd file in USG format (everything after - and before ( is
  62.    *    the name).
  63. +  *
  64. +  *    OSKTOPNAMES:    OS-9/68k and TOP-Munich environment: use (and
  65. +  *            handle correctly) the user name from gecos-field
  66. +  *            in the password-file        (Ralf Schuettau)
  67.    */
  68.   #define    PASSNAMES     /*  (undef to take name from ~/.fullname) */
  69. ! /* #define    BERKNAMES    /* (that is, ":name,stuff:") */
  70. ! #define    OSKTOPNAMES    /* (that is, "name:stuff:") */
  71.   /* #define    USGNAMES    /* (that is, ":stuff-name(stuff):") */
  72.   
  73.   /* XENIX:
  74. diff -c -r elm.dist/hdrs/defs.h elm.new/hdrs/defs.h
  75. *** elm.dist/hdrs/defs.h    Sat Sep 15 14:44:00 1990
  76. --- elm.new/hdrs/defs.h    Tue Sep 11 20:33:00 1990
  77. ***************
  78. *** 37,43 ****
  79.   
  80.   
  81.   # define VERSION     "2.3"        /* Version number... */
  82. ! # define OVERSION    "(OS-9 1.01)"    /* my version number .. */
  83.   # define VERS_DATE    "May 1, 1990"    /* for elm -v option */
  84.   # define WHAT_STRING    \
  85.       "@(#) Version 2.3, USENET supported version, released May 1990"
  86. --- 37,43 ----
  87.   
  88.   
  89.   # define VERSION     "2.3"        /* Version number... */
  90. ! # define OVERSION    "(OS-9 1.10)"    /* my version number .. */
  91.   # define VERS_DATE    "May 1, 1990"    /* for elm -v option */
  92.   # define WHAT_STRING    \
  93.       "@(#) Version 2.3, USENET supported version, released May 1990"
  94. diff -c -r elm.dist/hdrs/patchlevel.h elm.new/hdrs/patchlevel.h
  95. *** elm.dist/hdrs/patchlevel.h    Sat Sep 15 14:41:00 1990
  96. --- elm.new/hdrs/patchlevel.h    Tue Sep 11 20:07:00 1990
  97. ***************
  98. *** 1,1 ****
  99. ! #define PATCHLEVEL 4
  100. --- 1,1 ----
  101. ! #define PATCHLEVEL 6
  102. diff -c -r elm.dist/src/addr_util.c elm.new/src/addr_util.c
  103. *** elm.dist/src/addr_util.c    Sat Sep 15 14:47:00 1990
  104. --- elm.new/src/addr_util.c    Tue Sep 11 20:50:00 1990
  105. ***************
  106. *** 161,168 ****
  107. --- 161,183 ----
  108.       return(firstcp);
  109.   
  110.   #else
  111. + #ifdef OSKTOPNAMES
  112. + 
  113. +     char *lastcp;
  114. + 
  115. +     /* The last character of the full name is the one preceding the first
  116. +      * ':'. If there is no ':', then the full name ends at the end of the
  117. +      * gcos field.
  118. +      */
  119. +      
  120. +     if(lastcp = index(gcos_field, ':'))
  121. +     *lastcp = '\0';
  122. + 
  123. +     return (gcos_field);
  124. + #else
  125.       /* use full gcos field */
  126.       return(gcos_field);
  127. + #endif
  128.   #endif
  129.   #endif
  130.   }
  131. diff -c -r elm.dist/src/aliaslib.c elm.new/src/aliaslib.c
  132. *** elm.dist/src/aliaslib.c    Sat Sep 15 14:43:00 1990
  133. --- elm.new/src/aliaslib.c    Tue Sep 11 20:50:00 1990
  134. ***************
  135. *** 1,8 ****
  136.   
  137. ! static char rcsid[] = "@(#)$Id: aliaslib.c,v 4.1.1.2 90/06/05 21:31:34 syd Exp $";
  138.   
  139.   /*******************************************************************************
  140. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  141.    *
  142.    *             Copyright (c) 1986, 1987 Dave Taylor
  143.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  144. --- 1,8 ----
  145.   
  146. ! static char rcsid[] = "@(#)$Id: aliaslib.c,v 4.1.1.4 90/08/02 21:57:53 syd Exp $";
  147.   
  148.   /*******************************************************************************
  149. !  *  The Elm Mail System  -  $Revision: 4.1.1.4 $   $State: Exp $
  150.    *
  151.    *             Copyright (c) 1986, 1987 Dave Taylor
  152.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  153. ***************
  154. *** 14,19 ****
  155. --- 14,28 ----
  156.    *
  157.    *******************************************************************************
  158.    * $Log:    aliaslib.c,v $
  159. +  * Revision 4.1.1.4  90/08/02  21:57:53  syd
  160. +  * The newly introduced function 'stricmp' has a name conflict with a libc
  161. +  * function under SunOS 4.1.  Changed name to istrcmp.
  162. +  * From: scs@lokkur.dexter.mi.us (Steve Simmons)
  163. +  * 
  164. +  * Revision 4.1.1.3  90/07/12  23:18:17  syd
  165. +  * Make domain name checking case independent
  166. +  * From: Syd, reported by Steven Baur
  167. +  * 
  168.    * Revision 4.1.1.2  90/06/05  21:31:34  syd
  169.    * Fix now spurious error message for alias recursive expansion
  170.    * when alias lookup is on a string over 20 chars long.  If that
  171. ***************
  172. *** 282,288 ****
  173.   
  174.       loc = hash_it(word, size);
  175.   
  176. !     while (stricmp(word, table[loc].name) != 0) {
  177.         if (table[loc].name[0] == '\0')
  178.           return(-1);
  179.         loc = (loc + 1) % size;
  180. --- 291,297 ----
  181.   
  182.       loc = hash_it(word, size);
  183.   
  184. !     while (istrcmp(word, table[loc].name) != 0) {
  185.         if (table[loc].name[0] == '\0')
  186.           return(-1);
  187.         loc = (loc + 1) % size;
  188. ***************
  189. *** 292,298 ****
  190.   }
  191.   
  192.   int
  193. ! stricmp(s1,s2)
  194.   register char *s1, *s2;
  195.   {
  196.       /* case insensitive comparison */
  197. --- 301,307 ----
  198.   }
  199.   
  200.   int
  201. ! istrcmp(s1,s2)
  202.   register char *s1, *s2;
  203.   {
  204.       /* case insensitive comparison */
  205. ***************
  206. *** 306,311 ****
  207. --- 315,338 ----
  208.         ++s2;
  209.       }
  210.       /*NOTREACHED*/
  211. + }
  212. + 
  213. + int
  214. + strincmp(s1,s2,n)
  215. + register char *s1, *s2;
  216. + register int n;
  217. + {
  218. +     /* case insensitive comparison */
  219. +     register int d;
  220. +     while (--n >= 0) {
  221. +       d = ( isupper(*s1) ? tolower(*s1) : *s1 )
  222. +           - ( isupper(*s2) ? tolower(*s2) : *s2 ) ;
  223. +       if ( d != 0 || *s1 == '\0' || *s2 == '\0' )
  224. +         return d;
  225. +       ++s1;
  226. +       ++s2;
  227. +     }
  228. +     return(0);
  229.   }
  230.   
  231.   int
  232. diff -c -r elm.dist/src/curses.c elm.new/src/curses.c
  233. *** elm.dist/src/curses.c    Sat Sep 15 14:46:00 1990
  234. --- elm.new/src/curses.c    Tue Sep 11 20:50:00 1990
  235. ***************
  236. *** 1,8 ****
  237.   
  238. ! static char rcsid[] = "@(#)$Id: curses.c,v 4.1.1.2 90/06/26 20:09:09 syd Exp $";
  239.   
  240.   /*******************************************************************************
  241. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  242.    *
  243.    *             Copyright (c) 1986, 1987 Dave Taylor
  244.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  245. --- 1,8 ----
  246.   
  247. ! static char rcsid[] = "@(#)$Id: curses.c,v 4.1.1.3 90/07/12 20:18:02 syd Exp $";
  248.   
  249.   /*******************************************************************************
  250. !  *  The Elm Mail System  -  $Revision: 4.1.1.3 $   $State: Exp $
  251.    *
  252.    *             Copyright (c) 1986, 1987 Dave Taylor
  253.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  254. ***************
  255. *** 14,19 ****
  256. --- 14,23 ----
  257.    *
  258.    *******************************************************************************
  259.    * $Log:    curses.c,v $
  260. +  * Revision 4.1.1.3  90/07/12  20:18:02  syd
  261. +  * Be sure that output characters are not negative integers.
  262. +  * From: tct!chip@uunet.UU.NET (Chip Salzenberg)
  263. +  * 
  264.    * Revision 4.1.1.2  90/06/26  20:09:09  syd
  265.    * Add 8 bit support via ascii_ctype
  266.    * From: Robert Claeson <prc@erbe.se>
  267. ***************
  268. *** 653,658 ****
  269. --- 657,663 ----
  270.       static int wrappedlastchar = 0;
  271.       register int justwrapped, nt;
  272.   
  273. +     ch &= 0xFF;
  274.       justwrapped = 0;
  275.   
  276.       /* if return, just go to left column. */
  277. diff -c -r elm.dist/src/domains.c elm.new/src/domains.c
  278. *** elm.dist/src/domains.c    Sat Sep 15 14:43:00 1990
  279. --- elm.new/src/domains.c    Tue Sep 11 20:51:00 1990
  280. ***************
  281. *** 1,8 ****
  282.   
  283. ! static char rcsid[] = "@(#)$Id: domains.c,v 4.1 90/04/28 22:42:44 syd Exp $";
  284.   
  285.   /*******************************************************************************
  286. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  287.    *
  288.    *             Copyright (c) 1986, 1987 Dave Taylor
  289.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  290. --- 1,8 ----
  291.   
  292. ! static char rcsid[] = "@(#)$Id: domains.c,v 4.1.1.1 90/07/12 23:19:14 syd Exp $";
  293.   
  294.   /*******************************************************************************
  295. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  296.    *
  297.    *             Copyright (c) 1986, 1987 Dave Taylor
  298.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  299. ***************
  300. *** 14,19 ****
  301. --- 14,23 ----
  302.    *
  303.    *******************************************************************************
  304.    * $Log:    domains.c,v $
  305. +  * Revision 4.1.1.1  90/07/12  23:19:14  syd
  306. +  * Make domain name checking case independent
  307. +  * From: Syd, reported by Steven Baur
  308. +  * 
  309.    * Revision 4.1  90/04/28  22:42:44  syd
  310.    * checkin of Elm 2.3 as of Release PL0
  311.    * 
  312. ***************
  313. *** 184,190 ****
  314.       while (fgets(buffer, SLEN, domainfd) != NULL) {
  315.         if (buffer[0] == '#')                  /* skip comments */
  316.           continue;
  317. !       if (strncmp(buffer, mydomain, strlen(mydomain)) == 0) { /* match? */
  318.            matched++;    /* Gotcha!  Remember this momentous event! */
  319.            break;
  320.         }
  321. --- 188,194 ----
  322.       while (fgets(buffer, SLEN, domainfd) != NULL) {
  323.         if (buffer[0] == '#')                  /* skip comments */
  324.           continue;
  325. !       if (strincmp(buffer, mydomain, strlen(mydomain)) == 0) { /* match? */
  326.            matched++;    /* Gotcha!  Remember this momentous event! */
  327.            break;
  328.         }
  329. diff -c -r elm.dist/src/edit.c elm.new/src/edit.c
  330. *** elm.dist/src/edit.c    Sat Sep 15 14:42:00 1990
  331. --- elm.new/src/edit.c    Tue Sep 11 20:51:00 1990
  332. ***************
  333. *** 1,8 ****
  334.   
  335. ! static char rcsid[] = "@(#)$Id: edit.c,v 4.1 90/04/28 22:42:46 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. ! static char rcsid[] = "@(#)$Id: edit.c,v 4.1.1.1 90/07/12 22:43:05 syd Exp $";
  345.   
  346.   /*******************************************************************************
  347. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $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,25 ----
  354.    *
  355.    *******************************************************************************
  356.    * $Log:    edit.c,v $
  357. +  * Revision 4.1.1.1  90/07/12  22:43:05  syd
  358. +  * Make it aware of the fact that we loose the cursor position on
  359. +  * some system calls, so set it far enough off an absolute move will
  360. +  * be done on the next cursor address, and then place it where we want it.
  361. +  * From: Syd, reported by Douglas Lamb
  362. +  * 
  363.    * Revision 4.1  90/04/28  22:42:46  syd
  364.    * checkin of Elm 2.3 as of Release PL0
  365.    * 
  366. ***************
  367. *** 78,83 ****
  368. --- 84,90 ----
  369.       }
  370.   
  371.       Raw(ON);
  372. +     SetXYLocation(0, 40);    /* a location not near the next request, so an absolute is used */
  373.   
  374.       if (folder_type == SPOOL) {    /* uh oh... now the toughie...  */
  375.   
  376. diff -c -r elm.dist/src/editmsg.c elm.new/src/editmsg.c
  377. *** elm.dist/src/editmsg.c    Sat Sep 15 14:46:00 1990
  378. --- elm.new/src/editmsg.c    Tue Sep 11 20:51:00 1990
  379. ***************
  380. *** 1,8 ****
  381.   
  382. ! static char rcsid[] = "@(#)$Id: editmsg.c,v 4.1.1.2 90/06/21 21:14:09 syd Exp $";
  383.   
  384.   /*******************************************************************************
  385. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  386.    *
  387.    *             Copyright (c) 1986, 1987 Dave Taylor
  388.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  389. --- 1,8 ----
  390.   
  391. ! static char rcsid[] = "@(#)$Id: editmsg.c,v 4.1.1.3 90/07/12 22:43:08 syd Exp $";
  392.   
  393.   /*******************************************************************************
  394. !  *  The Elm Mail System  -  $Revision: 4.1.1.3 $   $State: Exp $
  395.    *
  396.    *             Copyright (c) 1986, 1987 Dave Taylor
  397.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  398. ***************
  399. *** 14,19 ****
  400. --- 14,25 ----
  401.    *
  402.    *******************************************************************************
  403.    * $Log:    editmsg.c,v $
  404. +  * Revision 4.1.1.3  90/07/12  22:43:08  syd
  405. +  * Make it aware of the fact that we loose the cursor position on
  406. +  * some system calls, so set it far enough off an absolute move will
  407. +  * be done on the next cursor address, and then place it where we want it.
  408. +  * From: Syd, reported by Douglas Lamb
  409. +  * 
  410.    * Revision 4.1.1.2  90/06/21  21:14:09  syd
  411.    * Force Carriage return on return from editor, as column is lost
  412.    * From: Steve Cambell
  413. ***************
  414. *** 99,105 ****
  415.       if (old_raw == ON)
  416.          Raw(ON);
  417.   
  418. !     CarriageReturn();        /* don't know where we are, force col 0 */
  419.   
  420.       if (cursor_control)
  421.         transmit_functions(ON);        /* function keys are local */
  422. --- 105,112 ----
  423.       if (old_raw == ON)
  424.          Raw(ON);
  425.   
  426. !     SetXYLocation(0, 40);    /* a location not near the next request, so an absolute is used */
  427. !     MoveCursor(LINES, 0);    /* dont know where we are, force last row, col 0 */
  428.   
  429.       if (cursor_control)
  430.         transmit_functions(ON);        /* function keys are local */
  431. ***************
  432. *** 283,288 ****
  433. --- 290,297 ----
  434.                    sprintf(buffer, "~r %s%s.%d", temp_dir, temp_edit, getpid());
  435.                              read_in_file(edit_fd, (char *) buffer + 3, 0);
  436.                    (void) unlink((char *) buffer+3);
  437. +                  SetXYLocation(0, 40);    /* a location not near the next request, so an absolute is used */
  438. +                  MoveCursor(LINES, 0);    /* and go to a known location, last row col 0 */
  439.                  }
  440.                          goto more_input; 
  441.   
  442. ***************
  443. *** 295,300 ****
  444. --- 304,311 ----
  445.                            (void) system_call((char *) buffer+2, USER_SHELL, TRUE, TRUE);
  446.                  if (old_raw == ON)
  447.                     Raw(ON);
  448. +                SetXYLocation(0, 40);    /* a location not near the next request, so an absolute is used */
  449. +                MoveCursor(LINES, 0);    /* and go to a known location, last row col 0 */
  450.                      Write_to_screen(simple_continue, 0);
  451.                  goto more_input;
  452.   
  453. diff -c -r elm.dist/src/init.c elm.new/src/init.c
  454. *** elm.dist/src/init.c    Sat Sep 15 14:44:00 1990
  455. --- elm.new/src/init.c    Tue Sep 11 20:51:00 1990
  456. ***************
  457. *** 1,8 ****
  458.   
  459. ! static char rcsid[] = "@(#)$Id: init.c,v 4.1 90/04/28 22:43:15 syd Exp $";
  460.   
  461.   /*******************************************************************************
  462. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  463.    *
  464.    *             Copyright (c) 1986, 1987 Dave Taylor
  465.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  466. --- 1,8 ----
  467.   
  468. ! static char rcsid[] = "@(#)$Id: init.c,v 4.1.1.2 90/08/02 21:57:56 syd Exp $";
  469.   
  470.   /*******************************************************************************
  471. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  472.    *
  473.    *             Copyright (c) 1986, 1987 Dave Taylor
  474.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  475. ***************
  476. *** 14,19 ****
  477. --- 14,28 ----
  478.    *
  479.    *******************************************************************************
  480.    * $Log:    init.c,v $
  481. +  * Revision 4.1.1.2  90/08/02  21:57:56  syd
  482. +  * The newly introduced function 'stricmp' has a name conflict with a libc
  483. +  * function under SunOS 4.1.  Changed name to istrcmp.
  484. +  * From: scs@lokkur.dexter.mi.us (Steve Simmons)
  485. +  * 
  486. +  * Revision 4.1.1.1  90/07/12  23:19:17  syd
  487. +  * Make domain name checking case independent
  488. +  * From: Syd, reported by Steven Baur
  489. +  * 
  490.    * Revision 4.1  90/04/28  22:43:15  syd
  491.    * checkin of Elm 2.3 as of Release PL0
  492.    * 
  493. ***************
  494. *** 268,274 ****
  495.       hostlen = strlen(hostname);
  496.       domlen = strlen(hostdomain);
  497.       if (hostlen >= domlen) {
  498. !       if (strcmp(&hostname[hostlen - domlen], hostdomain) == 0)
  499.           strcpy(hostfullname, hostname);
  500.         else {
  501.           strcpy(hostfullname, hostname);
  502. --- 277,283 ----
  503.       hostlen = strlen(hostname);
  504.       domlen = strlen(hostdomain);
  505.       if (hostlen >= domlen) {
  506. !       if (istrcmp(&hostname[hostlen - domlen], hostdomain) == 0)
  507.           strcpy(hostfullname, hostname);
  508.         else {
  509.           strcpy(hostfullname, hostname);
  510. ***************
  511. *** 275,281 ****
  512.           strcat(hostfullname, hostdomain);
  513.         }
  514.       } else {
  515. !       if (strcmp(hostname, hostdomain + 1) == 0)
  516.           strcpy(hostfullname, hostname);
  517.         else {
  518.           strcpy(hostfullname, hostname);
  519. --- 284,290 ----
  520.           strcat(hostfullname, hostdomain);
  521.         }
  522.       } else {
  523. !       if (istrcmp(hostname, hostdomain + 1) == 0)
  524.           strcpy(hostfullname, hostname);
  525.         else {
  526.           strcpy(hostfullname, hostname);
  527. diff -c -r elm.dist/src/leavembox.c elm.new/src/leavembox.c
  528. *** elm.dist/src/leavembox.c    Sat Sep 15 14:46:00 1990
  529. --- elm.new/src/leavembox.c    Tue Sep 11 22:48:00 1990
  530. ***************
  531. *** 1,8 ****
  532.   
  533. ! static char rcsid[] = "@(#)$Id: leavembox.c,v 4.1.1.3 90/06/21 22:51:52 syd Exp $";
  534.   
  535.   /*******************************************************************************
  536. !  *  The Elm Mail System  -  $Revision: 4.1.1.3 $   $State: Exp $
  537.    *
  538.    *             Copyright (c) 1986, 1987 Dave Taylor
  539.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  540. --- 1,8 ----
  541.   
  542. ! static char rcsid[] = "@(#)$Id: leavembox.c,v 4.1.1.4 90/08/15 21:00:07 syd Exp $";
  543.   
  544.   /*******************************************************************************
  545. !  *  The Elm Mail System  -  $Revision: 4.1.1.4 $   $State: Exp $
  546.    *
  547.    *             Copyright (c) 1986, 1987 Dave Taylor
  548.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  549. ***************
  550. *** 14,19 ****
  551. --- 14,23 ----
  552.    *
  553.    *******************************************************************************
  554.    * $Log:    leavembox.c,v $
  555. +  * Revision 4.1.1.4  90/08/15  21:00:07  syd
  556. +  * Change elm to not delete empty folders on a resync
  557. +  * From: Syd
  558. +  * 
  559.    * Revision 4.1.1.3  90/06/21  22:51:52  syd
  560.    * Add time.h to includes as some OSs include needed substructure only
  561.    * from time.h
  562. ***************
  563. *** 454,465 ****
  564.         }
  565.         dprint(2, (debugfile, "\n\n"));
  566.   
  567. !     } else if (folder_type == NON_SPOOL && !keep_empty_files) {
  568.   
  569.         /* i.e. if no messages were to be kept and this is not a spool
  570.          * folder and we aren't keeping empty non-spool folders,
  571.          * simply remove the old original folder and that's it!
  572.          */
  573.         (void)unlink(cur_folder);
  574.         return(1);
  575.       }
  576. --- 458,470 ----
  577.         }
  578.         dprint(2, (debugfile, "\n\n"));
  579.   
  580. !     } else if (folder_type == NON_SPOOL && !keep_empty_files && !resyncing) {
  581.   
  582.         /* i.e. if no messages were to be kept and this is not a spool
  583.          * folder and we aren't keeping empty non-spool folders,
  584.          * simply remove the old original folder and that's it!
  585.          */
  586. +       fclose(mailfile);           /* -hm (hint from hp...) */
  587.         (void)unlink(cur_folder);
  588.         return(1);
  589.       }
  590. ***************
  591. *** 535,541 ****
  592.         /* link or copy complete - remove temp keep file */
  593.         unlink(temp_keep_file);
  594.   
  595. !     } else if(folder_type == SPOOL || keep_empty_files) {
  596.   
  597.         /* if this is an empty spool file, or if this is an empty non spool 
  598.          * file and we keep empty non spool files (we always keep empty
  599. --- 540,546 ----
  600.         /* link or copy complete - remove temp keep file */
  601.         unlink(temp_keep_file);
  602.   
  603. !     } else if(folder_type == SPOOL || keep_empty_files || resyncing) {
  604.   
  605.         /* if this is an empty spool file, or if this is an empty non spool 
  606.          * file and we keep empty non spool files (we always keep empty
  607. diff -c -r elm.dist/src/mailmsg2.c elm.new/src/mailmsg2.c
  608. *** elm.dist/src/mailmsg2.c    Sat Sep 15 14:47:00 1990
  609. --- elm.new/src/mailmsg2.c    Tue Sep 11 20:51:00 1990
  610. ***************
  611. *** 1,8 ****
  612.   
  613. ! static char rcsid[] = "@(#)$Id: mailmsg2.c,v 4.1.1.4 90/06/26 16:18:24 syd Exp $";
  614.   
  615.   /*******************************************************************************
  616. !  *  The Elm Mail System  -  $Revision: 4.1.1.4 $   $State: Exp $
  617.    *
  618.    *             Copyright (c) 1986, 1987 Dave Taylor
  619.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  620. --- 1,8 ----
  621.   
  622. ! static char rcsid[] = "@(#)$Id: mailmsg2.c,v 4.1.1.7 90/08/15 22:02:36 syd Exp $";
  623.   
  624.   /*******************************************************************************
  625. !  *  The Elm Mail System  -  $Revision: 4.1.1.7 $   $State: Exp $
  626.    *
  627.    *             Copyright (c) 1986, 1987 Dave Taylor
  628.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  629. ***************
  630. *** 14,19 ****
  631. --- 14,36 ----
  632.    *
  633.    *******************************************************************************
  634.    * $Log:    mailmsg2.c,v $
  635. +  * Revision 4.1.1.7  90/08/15  22:02:36  syd
  636. +  * deal with several of the problems that have come up trying to use the MMDF
  637. +  * submit program directly rather than going through the sendmail stub
  638. +  * included with MMDF.  This should take care of the problem of not being
  639. +  * able to send mail to usernames beginning with "i" and with the
  640. +  * 'No valid author specified' problem.
  641. +  * From: jac%brahms.tinton.ccur.com@RELAY.CS.NET
  642. +  * 
  643. +  * Revision 4.1.1.6  90/07/12  23:19:20  syd
  644. +  * Make domain name checking case independent
  645. +  * From: Syd, reported by Steven Baur
  646. +  * 
  647. +  * Revision 4.1.1.5  90/07/12  22:52:42  syd
  648. +  * When Elm is compiled with the NO_XHEADER symbol defined, it failed
  649. +  * to put a blank line between the message header and message body.
  650. +  * From: mca@medicus.medicus.com (Mark Adams)
  651. +  * 
  652.    * Revision 4.1.1.4  90/06/26  16:18:24  syd
  653.    * Make it encode lines that are [...] if not one of the reserved lines.
  654.    * It was messing up decoding
  655. ***************
  656. *** 365,372 ****
  657.         else
  658.           mailerflags[0] ='\0';
  659.   
  660. !       quote_args(very_long_buffer, strip_parens(strip_commas(expanded_to)));
  661. !       strcpy(expanded_to, very_long_buffer);
  662.   
  663.   /*      sprintf(very_long_buffer,"( (%s %s %s ; %s %s) & ) < %s", 
  664.           mailer, mailerflags, expanded_to,
  665. --- 382,393 ----
  666.         else
  667.           mailerflags[0] ='\0';
  668.   
  669. !       if (strcmp(submitmail, mailer) == 0)
  670. !         strcpy(expanded_to, " ");
  671. !       else {
  672. !         quote_args(very_long_buffer, strip_parens(strip_commas(expanded_to)));
  673. !         strcpy(expanded_to, very_long_buffer);
  674. !       }
  675.   
  676.   /*      sprintf(very_long_buffer,"( (%s %s %s ; %s %s) & ) < %s", 
  677.           mailer, mailerflags, expanded_to,
  678. ***************
  679. *** 672,677 ****
  680. --- 693,701 ----
  681.       char  buffer[SLEN];
  682.       int   is_hidden_user;        /* someone we should know about?  */
  683.   #endif
  684. + #ifdef MMDF
  685. +     int   is_submit_mailer;        /* using submit means change From: */
  686. + #endif /* MMDF */
  687.   
  688.       char  *get_arpa_date();
  689.   
  690. ***************
  691. *** 737,757 ****
  692.       fprintf(filedesc,"Date: %s\n", get_arpa_date());
  693.   
  694.   #ifndef DONT_ADD_FROM
  695.   # ifdef SITE_HIDING
  696.       if (is_hidden_user)
  697.         fprintf(filedesc,"From: %s <%s!%s!%s>\n", full_username,
  698.             hostname, HIDDEN_SITE_NAME, username);
  699.       else
  700.   # else
  701.   #  ifdef  INTERNET
  702.   #   ifdef  USE_DOMAIN
  703. !     fprintf(filedesc,"From: %s <%s@%s>\n", full_username, 
  704.           username, hostfullname);
  705.   #   else
  706.       fprintf(filedesc,"From: %s <%s@%s>\n", full_username,
  707.           username, hostname);
  708.   #   endif
  709.   #  else
  710.       fprintf(filedesc,"From: %s <%s!%s>\n", full_username,
  711.           hostname, username);
  712.   #  endif
  713. --- 761,806 ----
  714.       fprintf(filedesc,"Date: %s\n", get_arpa_date());
  715.   
  716.   #ifndef DONT_ADD_FROM
  717. + #ifdef MMDF
  718. +     is_submit_mailer = (strcmp(submitmail,mailer) == 0);
  719. + #endif /* MMDF */
  720.   # ifdef SITE_HIDING
  721. + #    ifdef MMDF
  722. +     if (is_submit_mailer)
  723. +       fprintf(filedesc,"From: %s <%s>\n", full_username, username);
  724. +     else
  725. + #    endif /* MMDF */
  726.       if (is_hidden_user)
  727.         fprintf(filedesc,"From: %s <%s!%s!%s>\n", full_username,
  728.             hostname, HIDDEN_SITE_NAME, username);
  729.       else
  730. +       fprintf(filedesc,"From: %s <%s!%s>\n", full_username,
  731. +           hostname, username);
  732.   # else
  733.   #  ifdef  INTERNET
  734.   #   ifdef  USE_DOMAIN
  735. ! #    ifdef MMDF
  736. !     if (is_submit_mailer)
  737. !       fprintf(filedesc,"From: %s <%s>\n", full_username, username);
  738. !     else
  739. ! #    endif /* MMDF */
  740. !       fprintf(filedesc,"From: %s <%s@%s>\n", full_username, 
  741.           username, hostfullname);
  742.   #   else
  743. + #    ifdef MMDF
  744. +     if (is_submit_mailer)
  745. +       fprintf(filedesc,"From: %s <%s>\n", full_username, username);
  746. +     else
  747. + #    endif /* MMDF */
  748.       fprintf(filedesc,"From: %s <%s@%s>\n", full_username,
  749.           username, hostname);
  750.   #   endif
  751.   #  else
  752. + #    ifdef MMDF
  753. +     if (is_submit_mailer)
  754. +       fprintf(filedesc,"From: %s <%s>\n", full_username, username);
  755. +     else
  756. + #    endif /* MMDF */
  757.       fprintf(filedesc,"From: %s <%s!%s>\n", full_username,
  758.           hostname, username);
  759.   #  endif
  760. ***************
  761. *** 788,796 ****
  762.         fprintf(filedesc, "Content-Type: mailform\n");
  763.   
  764.   #ifndef NO_XHEADER
  765. !     fprintf(filedesc, "X-Mailer: ELM [version %s]\n\n", version_buff);
  766.   #endif /* !NO_XHEADER */
  767.   
  768.       return((FILE *) filedesc);
  769.   }
  770.   
  771. --- 837,847 ----
  772.         fprintf(filedesc, "Content-Type: mailform\n");
  773.   
  774.   #ifndef NO_XHEADER
  775. !     fprintf(filedesc, "X-Mailer: ELM [version %s]\n", version_buff);
  776.   #endif /* !NO_XHEADER */
  777.   
  778. +     putc('\n', filedesc);
  779. + 
  780.       return((FILE *) filedesc);
  781.   }
  782.   
  783. ***************
  784. *** 928,934 ****
  785.                 sig = local_signature;
  786.                 for (ptr = index(expanded_to,'@'); ptr;  /* check To: list */
  787.                 ptr = index(ptr+1,'@')) {
  788. !         if (strncmp(ptr,sitename,len) != 0
  789.               || (*(ptr+len) != ',' && *(ptr+len) != 0
  790.               && *(ptr+len) != ' ')) {
  791.                 sig = remote_signature;
  792. --- 979,985 ----
  793.                 sig = local_signature;
  794.                 for (ptr = index(expanded_to,'@'); ptr;  /* check To: list */
  795.                 ptr = index(ptr+1,'@')) {
  796. !         if (strincmp(ptr,sitename,len) != 0
  797.               || (*(ptr+len) != ',' && *(ptr+len) != 0
  798.               && *(ptr+len) != ' ')) {
  799.                 sig = remote_signature;
  800. ***************
  801. *** 938,944 ****
  802.                 if (sig == local_signature)           /* still local? */ 
  803.                   for (ptr = index(expanded_cc,'@'); ptr;   /* check Cc: */
  804.               ptr = index(ptr+1,'@')) {
  805. !           if (strncmp(ptr,sitename,len) != 0
  806.                 || (*(ptr+len) != ',' && *(ptr+len) != 0 
  807.                 && *(ptr+len) != ' ')) {
  808.                   sig = remote_signature;
  809. --- 989,995 ----
  810.                 if (sig == local_signature)           /* still local? */ 
  811.                   for (ptr = index(expanded_cc,'@'); ptr;   /* check Cc: */
  812.               ptr = index(ptr+1,'@')) {
  813. !           if (strincmp(ptr,sitename,len) != 0
  814.                 || (*(ptr+len) != ',' && *(ptr+len) != 0 
  815.                 && *(ptr+len) != ' ')) {
  816.                   sig = remote_signature;
  817. diff -c -r elm.dist/src/opt_utils.c elm.new/src/opt_utils.c
  818. *** elm.dist/src/opt_utils.c    Sat Sep 15 14:43:00 1990
  819. --- elm.new/src/opt_utils.c    Tue Sep 11 20:51:00 1990
  820. ***************
  821. *** 107,112 ****
  822. --- 107,115 ----
  823.       if (size < 2)
  824.         return -1;
  825.   
  826. + #ifdef OSK
  827. +     if ( ! info_str( "hostdomain" , buf , sizeof(buf) ) )
  828. + #endif
  829.       if ((fp = fopen(hostdomfile, "r")) != 0) {
  830.         fgets(buf, sizeof(buf) - 1, fp);
  831.         fclose(fp);
  832. diff -c -r elm.dist/src/quit.c elm.new/src/quit.c
  833. *** elm.dist/src/quit.c    Sat Sep 15 14:42:00 1990
  834. --- elm.new/src/quit.c    Tue Sep 11 20:59:00 1990
  835. ***************
  836. *** 115,135 ****
  837.             if(!*helpmsg) {    /* format helpmsg if not yet done */
  838.   
  839.           strcpy(helpmsg,
  840. !           "\l\r\l\rEnter: <nothing> to not change to a new folder,");
  841.           strcat(helpmsg,
  842. !           "\l\r       '!' to change to your incoming mailbox (");
  843.           strcat(helpmsg, defaultfile);
  844.           strcat(helpmsg,
  845. !           ")\l\r       '>' to change to your \"received\" folder (");
  846.           strcat(helpmsg, nameof(recvd_mail));
  847.           strcat(helpmsg,
  848. !           ")\l\r       '<' to change to your \"sent\" folder (");
  849.           strcat(helpmsg, nameof(sent_mail));
  850. !         strcat(helpmsg, ")\l\r       or a filename");
  851.           strcat(helpmsg,
  852. !           " (leading '=' denotes your folder directory ");
  853.           strcat(helpmsg, folders);
  854. !         strcat(helpmsg, ").\l\r");
  855.             }
  856.             list_folders(4, helpmsg);
  857.             PutLine0(LINES-2,0,"Change to which folder: ");    /* reprompt */
  858. --- 115,135 ----
  859.             if(!*helpmsg) {    /* format helpmsg if not yet done */
  860.   
  861.           strcpy(helpmsg,
  862. !           "\n\nEnter: <nothing> to not change to a new folder,");
  863.           strcat(helpmsg,
  864. !           "\n       '!' to change to your incoming mailbox (");
  865.           strcat(helpmsg, defaultfile);
  866.           strcat(helpmsg,
  867. !           ")\n       '>' to change to your \"received\" folder (");
  868.           strcat(helpmsg, nameof(recvd_mail));
  869.           strcat(helpmsg,
  870. !           ")\n       '<' to change to your \"sent\" folder (");
  871.           strcat(helpmsg, nameof(sent_mail));
  872. !         strcat(helpmsg, ")\n       or a filename");
  873.           strcat(helpmsg,
  874. !           "\n       (leading '=' denotes your folder directory ");
  875.           strcat(helpmsg, folders);
  876. !         strcat(helpmsg, ").\n");
  877.             }
  878.             list_folders(4, helpmsg);
  879.             PutLine0(LINES-2,0,"Change to which folder: ");    /* reprompt */
  880. diff -c -r elm.dist/src/showmsg.c elm.new/src/showmsg.c
  881. *** elm.dist/src/showmsg.c    Sat Sep 15 14:45:00 1990
  882. --- elm.new/src/showmsg.c    Tue Sep 11 20:51:00 1990
  883. ***************
  884. *** 1,8 ****
  885.   
  886. ! static char rcsid[] = "@(#)$Id: showmsg.c,v 4.1 90/04/28 22:44:06 syd Exp $";
  887.   
  888.   /*******************************************************************************
  889. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  890.    *
  891.    *             Copyright (c) 1986, 1987 Dave Taylor
  892.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  893. --- 1,8 ----
  894.   
  895. ! static char rcsid[] = "@(#)$Id: showmsg.c,v 4.1.1.1 90/07/12 23:04:26 syd Exp $";
  896.   
  897.   /*******************************************************************************
  898. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  899.    *
  900.    *             Copyright (c) 1986, 1987 Dave Taylor
  901.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  902. ***************
  903. *** 14,19 ****
  904. --- 14,24 ----
  905.    *
  906.    *******************************************************************************
  907.    * $Log:    showmsg.c,v $
  908. +  * Revision 4.1.1.1  90/07/12  23:04:26  syd
  909. +  * Fix MMDF case, where MSG_SEPERATOR has newline, buffer check
  910. +  * didnt, thus it didnt detect the MSG_SEPERATOR.
  911. +  * From: jbwaters@bsu-cs.bsu.edu (J. Brian Waters)
  912. +  * 
  913.    * Revision 4.1  90/04/28  22:44:06  syd
  914.    * checkin of Elm 2.3 as of Release PL0
  915.    * 
  916. ***************
  917. *** 466,481 ****
  918.           a command other than continuing with the display (only possible
  919.           with the builtin pager), otherwise 0. **/
  920.   
  921.   #ifdef MMDF
  922.       if (strcmp(buffer, MSG_SEPERATOR) == 0)
  923. !       strcpy(buffer," ");
  924.   #endif /* MMDF */
  925.       if (builtin) {
  926. -       strcat(buffer, "\n");
  927.         return(display_line(buffer));
  928.       }
  929.       errno = 0;
  930. !     fprintf(pipe_wr_fp, "%s\n", buffer);
  931.       if (errno != 0)
  932.         dprint(1, (debugfile, "\terror %s hit!\n", error_name(errno)));
  933.       return(0);
  934. --- 471,486 ----
  935.           a command other than continuing with the display (only possible
  936.           with the builtin pager), otherwise 0. **/
  937.   
  938. +     strcat(buffer, "\n");
  939.   #ifdef MMDF
  940.       if (strcmp(buffer, MSG_SEPERATOR) == 0)
  941. !       return(0);    /* no reason to show the ending terminator */
  942.   #endif /* MMDF */
  943.       if (builtin) {
  944.         return(display_line(buffer));
  945.       }
  946.       errno = 0;
  947. !     fprintf(pipe_wr_fp, "%s", buffer);
  948.       if (errno != 0)
  949.         dprint(1, (debugfile, "\terror %s hit!\n", error_name(errno)));
  950.       return(0);
  951. diff -c -r elm.dist/src/strings.c elm.new/src/strings.c
  952. *** elm.dist/src/strings.c    Sat Sep 15 14:45:00 1990
  953. --- elm.new/src/strings.c    Tue Sep 11 20:51:00 1990
  954. ***************
  955. *** 1,8 ****
  956.   
  957. ! static char rcsid[] = "@(#)$Id: strings.c,v 4.1.1.2 90/06/21 22:45:06 syd Exp $";
  958.   
  959.   /*******************************************************************************
  960. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  961.    *
  962.    *             Copyright (c) 1986, 1987 Dave Taylor
  963.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  964. --- 1,8 ----
  965.   
  966. ! static char rcsid[] = "@(#)$Id: strings.c,v 4.1.1.3 90/08/15 21:48:07 syd Exp $";
  967.   
  968.   /*******************************************************************************
  969. !  *  The Elm Mail System  -  $Revision: 4.1.1.3 $   $State: Exp $
  970.    *
  971.    *             Copyright (c) 1986, 1987 Dave Taylor
  972.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  973. ***************
  974. *** 14,19 ****
  975. --- 14,24 ----
  976.    *
  977.    *******************************************************************************
  978.    * $Log:    strings.c,v $
  979. +  * Revision 4.1.1.3  90/08/15  21:48:07  syd
  980. +  * the user's (unmodified) limit criteria was being compared w/
  981. +  * the lower-case version of the header contents.
  982. +  * From: dwolfe@earth.sps.mot.com (Dave Wolfe)
  983. +  * 
  984.    * Revision 4.1.1.2  90/06/21  22:45:06  syd
  985.    * Make display not show To user if user is also sender
  986.    * From: Marius Olafsson
  987. ***************
  988. *** 364,372 ****
  989.   
  990.       for (; *buffer && ! whitespace(*buffer); buffer++, first++)
  991.         if (islower(*buffer))
  992. -         *first = tolower(*buffer);
  993. -       else
  994.           *first = *buffer;
  995.   
  996.       *first = '\0';
  997.       
  998. --- 369,377 ----
  999.   
  1000.       for (; *buffer && ! whitespace(*buffer); buffer++, first++)
  1001.         if (islower(*buffer))
  1002.           *first = *buffer;
  1003. +       else
  1004. +         *first = tolower(*buffer);
  1005.   
  1006.       *first = '\0';
  1007.       
  1008. ***************
  1009. *** 374,382 ****
  1010.   
  1011.       for (; *buffer; buffer++, rest++)
  1012.         if (islower(*buffer))
  1013. -         *rest = tolower(*buffer);
  1014. -       else
  1015.           *rest = *buffer;
  1016.   
  1017.       *rest = '\0';
  1018.   
  1019. --- 379,387 ----
  1020.   
  1021.       for (; *buffer; buffer++, rest++)
  1022.         if (islower(*buffer))
  1023.           *rest = *buffer;
  1024. +       else
  1025. +         *rest = tolower(*buffer);
  1026.   
  1027.       *rest = '\0';
  1028.   
  1029. diff -c -r elm.dist/src/syscall.c elm.new/src/syscall.c
  1030. *** elm.dist/src/syscall.c    Sat Sep 15 14:43:00 1990
  1031. --- elm.new/src/syscall.c    Tue Sep 11 21:04:00 1990
  1032. ***************
  1033. *** 1,8 ****
  1034.   
  1035. ! static char rcsid[] = "@(#)$Id: syscall.c,v 4.1.1.3 90/06/21 22:48:17 syd Exp $";
  1036.   
  1037.   /*******************************************************************************
  1038. !  *  The Elm Mail System  -  $Revision: 4.1.1.3 $   $State: Exp $
  1039.    *
  1040.    *             Copyright (c) 1986, 1987 Dave Taylor
  1041.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  1042. --- 1,8 ----
  1043.   
  1044. ! static char rcsid[] = "@(#)$Id: syscall.c,v 4.1.1.4 90/07/12 22:41:55 syd Exp $";
  1045.   
  1046.   /*******************************************************************************
  1047. !  *  The Elm Mail System  -  $Revision: 4.1.1.4 $   $State: Exp $
  1048.    *
  1049.    *             Copyright (c) 1986, 1987 Dave Taylor
  1050.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  1051. ***************
  1052. *** 14,19 ****
  1053. --- 14,25 ----
  1054.    *
  1055.    *******************************************************************************
  1056.    * $Log:    syscall.c,v $
  1057. +  * Revision 4.1.1.4  90/07/12  22:41:55  syd
  1058. +  * Make it aware of the fact that we loose the cursor position on
  1059. +  * some system calls, so set it far enough off an absolute move will
  1060. +  * be done on the next cursor address, and then place it where we want it.
  1061. +  * From: Syd, reported by Douglas Lamb
  1062. +  * 
  1063.    * Revision 4.1.1.3  90/06/21  22:48:17  syd
  1064.    * patch to fix up the Log headers.
  1065.    * From: pdc%lunch.wpd@sgi.com (Paul Close)
  1066. ***************
  1067. *** 88,93 ****
  1068. --- 94,100 ----
  1069.       ret = system_call(command, USER_SHELL, TRUE, TRUE);
  1070.       umask(077);        /* now put it back to private for mail files */
  1071.   
  1072. +     SetXYLocation(0, 40);    /* a location not near the next request, so an absolute is used */
  1073.       PutLine0(LINES, 0, "\n\nPress any key to return to ELM: ");
  1074.       Raw(ON);
  1075.   /*    (void) getchar();    */
  1076. ***************
  1077. *** 142,147 ****
  1078. --- 149,155 ----
  1079.       
  1080.       ret = system_call(buffer, USER_SHELL, TRUE, TRUE);
  1081.   
  1082. +     SetXYLocation(0, 40);    /* a location not near the next request, so an absolute is used */
  1083.       PutLine0(LINES, 0, "\n\nPress any key to return to ELM.");
  1084.       if (old_raw == ON)
  1085.          Raw(ON);
  1086. ***************
  1087. *** 247,257 ****
  1088.       MoveCursor(LINES, 0);
  1089.       if(helpmsg)
  1090.         printf(helpmsg);
  1091. !     sprintf(buffer, "chd %s;dir -e", folders);
  1092. !     printf("\l\rContents of your folder directory:\l\r\l\r");
  1093.       system_call(buffer, SH, FALSE, FALSE); 
  1094.       while(numlines--)
  1095. !         printf("\l\r");
  1096.       Raw(ON);
  1097.   }
  1098.   
  1099. --- 255,265 ----
  1100.       MoveCursor(LINES, 0);
  1101.       if(helpmsg)
  1102.         printf(helpmsg);
  1103. !     sprintf(buffer, "chd %s;dir ", folders);
  1104. !     printf("\nContents of your folder directory:\n\n");
  1105.       system_call(buffer, SH, FALSE, FALSE); 
  1106.       while(numlines--)
  1107. !         printf("\n");
  1108.       Raw(ON);
  1109.   }
  1110.   
  1111. diff -c -r elm.dist/utils/arepdaem.c elm.new/utils/arepdaem.c
  1112. *** elm.dist/utils/arepdaem.c    Sat Sep 15 14:45:00 1990
  1113. --- elm.new/utils/arepdaem.c    Tue Sep 11 20:07:00 1990
  1114. ***************
  1115. *** 1,8 ****
  1116.   
  1117. ! static char rcsid[] = "@(#)$Id: arepdaem.c,v 4.1 90/04/28 22:44:33 syd Exp $";
  1118.   
  1119.   /*******************************************************************************
  1120. !  *  The Elm Mail System  -  $Revision: 4.1 $   $State: Exp $
  1121.    *
  1122.    *             Copyright (c) 1986, 1987 Dave Taylor
  1123.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  1124. --- 1,8 ----
  1125.   
  1126. ! static char rcsid[] = "@(#)$Id: arepdaem.c,v 4.1.1.2 90/08/15 22:50:14 syd Exp $";
  1127.   
  1128.   /*******************************************************************************
  1129. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  1130.    *
  1131.    *             Copyright (c) 1986, 1987 Dave Taylor
  1132.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  1133. ***************
  1134. *** 14,19 ****
  1135. --- 14,28 ----
  1136.    *
  1137.    *******************************************************************************
  1138.    * $Log:    arepdaem.c,v $
  1139. +  * Revision 4.1.1.2  90/08/15  22:50:14  syd
  1140. +  * Fix last size to time call
  1141. +  * From: Syd
  1142. +  * 
  1143. +  * Revision 4.1.1.1  90/08/15  22:33:54  syd
  1144. +  * Fix to use time instead of bytes for changes to file and to process
  1145. +  * each entry on delete properly
  1146. +  * From: Denis Lambot <d241s016!lde@swn.siemens.be>
  1147. +  * 
  1148.    * Revision 4.1  90/04/28  22:44:33  syd
  1149.    * checkin of Elm 2.3 as of Release PL0
  1150.    * 
  1151. ***************
  1152. *** 93,104 ****
  1153.         } reply_table[MAX_PEOPLE];
  1154.   
  1155.   FILE  *logfd;                /* logfile (log action)   */
  1156. ! long  autoreply_size = 0L;        /* size of autoreply file */
  1157.   int   active = 0;            /* # of people 'enrolled' */
  1158.   
  1159.   FILE  *open_logfile();            /* forward declaration    */
  1160.   
  1161.   long  bytes();                /*       ditto           */
  1162.   
  1163.   #ifdef VOIDSIG
  1164.   void    term_signal();
  1165. --- 102,114 ----
  1166.         } reply_table[MAX_PEOPLE];
  1167.   
  1168.   FILE  *logfd;                /* logfile (log action)   */
  1169. ! time_t autoreply_time = 0L;        /* modif date of autoreply file */
  1170.   int   active = 0;            /* # of people 'enrolled' */
  1171.   
  1172.   FILE  *open_logfile();            /* forward declaration    */
  1173.   
  1174.   long  bytes();                /*       ditto           */
  1175. + time_t ModTime();            /*       ditto          */
  1176.   
  1177.   #ifdef VOIDSIG
  1178.   void    term_signal();
  1179. ***************
  1180. *** 110,115 ****
  1181. --- 120,126 ----
  1182.   {
  1183.       long size;
  1184.       int  person, data_changed;
  1185. +     time_t time;
  1186.   
  1187.       if (fork()) exit(0);
  1188.   
  1189. ***************
  1190. *** 133,141 ****
  1191.   
  1192.         /* 1. check to see if autoreply table has changed.. */
  1193.   
  1194. !       if ((size = bytes(autoreply_file)) != autoreply_size) {
  1195.           read_autoreply_file(); 
  1196. !         autoreply_size = size;
  1197.         }
  1198.   
  1199.         /* 2. now for each active person... */
  1200. --- 144,152 ----
  1201.   
  1202.         /* 1. check to see if autoreply table has changed.. */
  1203.   
  1204. !       if ((time = ModTime(autoreply_file)) != autoreply_time) {
  1205.           read_autoreply_file(); 
  1206. !         autoreply_time = time;
  1207.         }
  1208.   
  1209.         /* 2. now for each active person... */
  1210. ***************
  1211. *** 169,175 ****
  1212.   int
  1213.   read_autoreply_file()
  1214.   {
  1215. !     /** We're here because the autoreply file has changed size!!  It
  1216.           could either be because someone has been added or because
  1217.           someone has been removed...since the list will always be in
  1218.           order (nice, eh?) we should have a pretty easy time of it...
  1219. --- 180,186 ----
  1220.   int
  1221.   read_autoreply_file()
  1222.   {
  1223. !     /** We're here because the autoreply file has changed!!  It
  1224.           could either be because someone has been added or because
  1225.           someone has been removed...since the list will always be in
  1226.           order (nice, eh?) we should have a pretty easy time of it...
  1227. ***************
  1228. *** 217,226 ****
  1229.   
  1230.       /** now check to see if anyone has been removed... **/
  1231.   
  1232. !     for (person = 0; person < active; person++)
  1233. !       if (reply_table[person].in_list == 0) {
  1234. !          log("removing %s from the active list", 
  1235. !           reply_table[person].username);
  1236.           strcpy(reply_table[person].username, 
  1237.              reply_table[active-1].username);
  1238.           strcpy(reply_table[person].mailfile, 
  1239. --- 228,241 ----
  1240.   
  1241.       /** now check to see if anyone has been removed... **/
  1242.   
  1243. !     person = 0;
  1244. !     while (person < active)
  1245. !       if (reply_table[person].in_list) {
  1246. !         person++;
  1247. !       }
  1248. !       else {
  1249. !         log("removing %s from the active list",
  1250. !            reply_table[person].username);
  1251.           strcpy(reply_table[person].username, 
  1252.              reply_table[active-1].username);
  1253.           strcpy(reply_table[person].mailfile, 
  1254. ***************
  1255. *** 253,259 ****
  1256.       fclose(file);
  1257.   
  1258.   /*    printf("updated autoreply file\n"); */
  1259. !     autoreply_size = bytes(autoreply_file);
  1260.   }
  1261.   
  1262.   int
  1263. --- 268,274 ----
  1264.       fclose(file);
  1265.   
  1266.   /*    printf("updated autoreply file\n"); */
  1267. !     autoreply_time = ModTime(autoreply_file);
  1268.   }
  1269.   
  1270.   int
  1271. ***************
  1272. *** 462,467 ****
  1273. --- 477,504 ----
  1274.           ok = 0;
  1275.       
  1276.       return(ok ? buffer.st_size : 0);
  1277. + }
  1278. + 
  1279. + time_t
  1280. + ModTime(name)
  1281. + char *name;
  1282. + {
  1283. +     /** return the modification time in the specified file.
  1284. +         This is to check to see if autoreply has changed....  **/
  1285. + 
  1286. +     int ok = 1;
  1287. +     extern int errno;    /* system error number! */
  1288. +     struct stat buffer;
  1289. + 
  1290. +     if (stat(name, &buffer) != 0)
  1291. +       if (errno != 2) {
  1292. +        unlock();
  1293. +        exit(fprintf(stderr,"Error %d attempting fstat on %s", errno, name));
  1294. +       }
  1295. +       else
  1296. +         ok = 0;
  1297. + 
  1298. +     return(ok ? buffer.st_mtime : (time_t) 0);
  1299.   }
  1300.   
  1301.   mail(to, subject, filename, person)
  1302. diff -c -r elm.dist/utils/makefile elm.new/utils/makefile
  1303. *** elm.dist/utils/makefile    Sat Sep 15 14:41:00 1990
  1304. --- elm.new/utils/makefile    Sat Jun 30 15:01:00 1990
  1305. ***************
  1306. *** 43,51 ****
  1307.   READMSG_OBJ    =    readmsg.r expand.r ../../src/rels/opt_utils.r ../../src/rels/string2.r
  1308.   
  1309.   
  1310. - all:        newalias readmsg
  1311. -         touch all
  1312. - 
  1313.   newalias:    newalias.r
  1314.           chd $(RDIR); $(CC) $(LFLAGS) -f=newalias $(NEWALIAS_OBJ) $(LIB)
  1315.   
  1316. --- 43,48 ----
  1317. diff -c -r elm.dist/utils/newalias.c elm.new/utils/newalias.c
  1318. *** elm.dist/utils/newalias.c    Sat Sep 15 14:46:00 1990
  1319. --- elm.new/utils/newalias.c    Tue Sep 11 20:08:00 1990
  1320. ***************
  1321. *** 1,8 ****
  1322.   
  1323. ! static char rcsid[] = "@(#)$Id: newalias.c,v 4.1.1.1 90/06/05 21:11:20 syd Exp $";
  1324.   
  1325.   /*******************************************************************************
  1326. !  *  The Elm Mail System  -  $Revision: 4.1.1.1 $   $State: Exp $
  1327.    *
  1328.    *             Copyright (c) 1986, 1987 Dave Taylor
  1329.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  1330. --- 1,8 ----
  1331.   
  1332. ! static char rcsid[] = "@(#)$Id: newalias.c,v 4.1.1.2 90/08/02 21:57:58 syd Exp $";
  1333.   
  1334.   /*******************************************************************************
  1335. !  *  The Elm Mail System  -  $Revision: 4.1.1.2 $   $State: Exp $
  1336.    *
  1337.    *             Copyright (c) 1986, 1987 Dave Taylor
  1338.    *             Copyright (c) 1988, 1989, 1990 USENET Community Trust
  1339. ***************
  1340. *** 14,19 ****
  1341. --- 14,24 ----
  1342.    *
  1343.    *******************************************************************************
  1344.    * $Log:    newalias.c,v $
  1345. +  * Revision 4.1.1.2  90/08/02  21:57:58  syd
  1346. +  * The newly introduced function 'stricmp' has a name conflict with a libc
  1347. +  * function under SunOS 4.1.  Changed name to istrcmp.
  1348. +  * From: scs@lokkur.dexter.mi.us (Steve Simmons)
  1349. +  * 
  1350.    * Revision 4.1.1.1  90/06/05  21:11:20  syd
  1351.    * alias command in ELM2.3 fails because of the wrong sized aliases.hash
  1352.    * newalias did not truncate existing file (aliases.hash)
  1353. ***************
  1354. *** 408,414 ****
  1355.   
  1356.       loc = hash_it(word, size);
  1357.   
  1358. !     while (table[loc].name[0] != '\0' && stricmp(table[loc].name,word) != 0)
  1359.         loc = (loc + 1) % size; 
  1360.   
  1361.       if (table[loc].name[0] == '\0') {
  1362. --- 413,419 ----
  1363.   
  1364.       loc = hash_it(word, size);
  1365.   
  1366. !     while (table[loc].name[0] != '\0' && istrcmp(table[loc].name,word) != 0)
  1367.         loc = (loc + 1) % size; 
  1368.   
  1369.       if (table[loc].name[0] == '\0') {
  1370. ***************
  1371. *** 421,427 ****
  1372.   }
  1373.   
  1374.   int
  1375. ! stricmp(s1,s2)
  1376.   register char *s1, *s2;
  1377.   {
  1378.       /* case insensitive comparison */
  1379. --- 426,432 ----
  1380.   }
  1381.   
  1382.   int
  1383. ! istrcmp(s1,s2)
  1384.   register char *s1, *s2;
  1385.   {
  1386.       /* case insensitive comparison */
  1387. ***************
  1388. *** 534,544 ****
  1389.       if (hash_table_loaded || is_system) {
  1390.         loc = hash_it(name, MAX_SALIASES);
  1391.   
  1392. !       while (stricmp(name, shash_table[loc].name) != 0 && 
  1393.                    shash_table[loc].name[0] != '\0')
  1394.           loc = (loc + 1) % MAX_SALIASES; 
  1395.     
  1396. !       if (stricmp(name, shash_table[loc].name) == 0)
  1397.           return(1);    /* found it! */
  1398.       }
  1399.   
  1400. --- 539,549 ----
  1401.       if (hash_table_loaded || is_system) {
  1402.         loc = hash_it(name, MAX_SALIASES);
  1403.   
  1404. !       while (istrcmp(name, shash_table[loc].name) != 0 && 
  1405.                    shash_table[loc].name[0] != '\0')
  1406.           loc = (loc + 1) % MAX_SALIASES; 
  1407.     
  1408. !       if (istrcmp(name, shash_table[loc].name) == 0)
  1409.           return(1);    /* found it! */
  1410.       }
  1411.   
  1412. ***************
  1413. *** 545,555 ****
  1414.       if (! is_system) {    /* okay! Let's check the user alias file! */
  1415.         loc = hash_it(name, MAX_UALIASES);
  1416.   
  1417. !       while (stricmp(name, uhash_table[loc].name) != 0 && 
  1418.                    uhash_table[loc].name[0] != '\0')
  1419.           loc = (loc + 1) % MAX_UALIASES; 
  1420.   
  1421. !       if (stricmp(name, uhash_table[loc].name) == 0)
  1422.           return(1);    /* found it! */
  1423.       }
  1424.   
  1425. --- 550,560 ----
  1426.       if (! is_system) {    /* okay! Let's check the user alias file! */
  1427.         loc = hash_it(name, MAX_UALIASES);
  1428.   
  1429. !       while (istrcmp(name, uhash_table[loc].name) != 0 && 
  1430.                    uhash_table[loc].name[0] != '\0')
  1431.           loc = (loc + 1) % MAX_UALIASES; 
  1432.   
  1433. !       if (istrcmp(name, uhash_table[loc].name) == 0)
  1434.           return(1);    /* found it! */
  1435.       }
  1436.   
  1437.