home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume32 / mush / patch05b < prev    next >
Text File  |  1992-10-18  |  47KB  |  1,666 lines
  1. Newsgroups: comp.sources.misc
  2. From: bart@zigzag.z-code.com (Bart Schaefer)
  3. Subject:  v32i102:  mush - Mail User's Shell, Patch05b/3
  4. Message-ID: <1992Oct16.141335.6872@sparky.imd.sterling.com>
  5. X-Md4-Signature: 887782b73a72f6f74abd4268fff88cc2
  6. Date: Fri, 16 Oct 1992 14:13:35 GMT
  7. Approved: kent@sparky.imd.sterling.com
  8.  
  9. Submitted-by: bart@zigzag.z-code.com (Bart Schaefer)
  10. Posting-number: Volume 32, Issue 102
  11. Archive-name: mush/patch05b
  12. Environment: UNIX
  13. Patch-To: mush: Volume 18, Issue 58-79
  14.  
  15. This is Part 02 of Official Patch #5 for Mush 7.2.  To apply this patch,
  16. save this message to a file in your mush source directory and type:
  17.  
  18.     patch -N -p1 < file
  19.  
  20. See Part 01 for a description of the changes in this patch.  You can apply
  21. the two parts in any order, but you must apply both parts before applying
  22. the additional Apollo patches that are included in Part 01.
  23.  
  24. Prereq: "2/2/92"
  25. *** 7.2.4/version.h    Sun Feb  2 14:08:19 1992
  26. --- 7.2.5/version.h    Wed Oct 14 00:05:07 1992
  27. ***************
  28. *** 1,7 ****
  29.   /* @(#)version.h    (c) Copyright 1989, 1990, 1991 (Dan Heller) */
  30.   
  31.   #define MUSHNAME    "Mail User's Shell"
  32. ! #define RELEASE_DATE    "2/2/92"
  33.   #define RELEASE        7
  34.   #define REVISION    "2"
  35. ! #define PATCHLEVEL    4
  36. --- 1,7 ----
  37.   /* @(#)version.h    (c) Copyright 1989, 1990, 1991 (Dan Heller) */
  38.   
  39.   #define MUSHNAME    "Mail User's Shell"
  40. ! #define RELEASE_DATE    "10/14/92"
  41.   #define RELEASE        7
  42.   #define REVISION    "2"
  43. ! #define PATCHLEVEL    5
  44. *** 7.2.4/addrs.c    Wed Nov 13 00:53:20 1991
  45. --- 7.2.5/addrs.c    Sat Aug 22 11:46:57 1992
  46. ***************
  47. *** 188,194 ****
  48.   char *addr;
  49.   char *naddr;
  50.   {
  51. !     char *i, *r, *at;
  52.       char s[BUFSIZ], t[BUFSIZ];
  53.       int anglebrace = 0;
  54.   
  55. --- 188,194 ----
  56.   char *addr;
  57.   char *naddr;
  58.   {
  59. !     char *i, *r, *at = NULL;
  60.       char s[BUFSIZ], t[BUFSIZ];
  61.       int anglebrace = 0;
  62.   
  63. ***************
  64. *** 201,208 ****
  65.           return NULL;
  66.       /* Skip any leading double-quoted comment. */
  67.       if (*i == '"') {
  68. !         if ((i = index(i + 1, '"')) && (*i == '\0' || *(++i) == '\0'))
  69. !             return NULL;
  70.       }
  71.       /* Skip any more whitespace. */
  72.       while (*i && index(" \t", *i))
  73. --- 201,209 ----
  74.           return NULL;
  75.       /* Skip any leading double-quoted comment. */
  76.       if (*i == '"') {
  77. !         at = i;
  78. !         if (!(i = index(i + 1, '"')) || *(++i) == '\0')
  79. !         return NULL;
  80.       }
  81.       /* Skip any more whitespace. */
  82.       while (*i && index(" \t", *i))
  83. ***************
  84. *** 214,219 ****
  85. --- 215,222 ----
  86.           if (*(++i) == '\0')
  87.           return NULL;
  88.           ++anglebrace;
  89. +     } else if ((*i == '@' || *i == '!') && at) {
  90. +         i = at; /* The "comment" was actually a quoted token */
  91.       }
  92.       /*
  93.        * Look for a route.  A route is a comma-separated set of @-tagged
  94. ***************
  95. *** 713,719 ****
  96.           (void) strcpy(p2, login);
  97.           (void) reverse(tmp);
  98.           if (!lcase_strncmp(tmp, addr, (len = strlen(tmp))) &&
  99. !             (!addr[len] || addr[len] == '!')) {
  100.               Debug("\t%s\n", reverse(addr));
  101.               rm_me = TRUE;
  102.           }
  103. --- 716,723 ----
  104.           (void) strcpy(p2, login);
  105.           (void) reverse(tmp);
  106.           if (!lcase_strncmp(tmp, addr, (len = strlen(tmp))) &&
  107. !             (!addr[len] || addr[len] == '!' ||
  108. !             addr[len] == '.' && index(p2, '!'))) {
  109.               Debug("\t%s\n", reverse(addr));
  110.               rm_me = TRUE;
  111.           }
  112. ***************
  113. *** 930,936 ****
  114.           *p = '<';
  115.       }
  116.       if (!(p2 = index(p+1, '>'))) {
  117. !         wprint("Warning! Malformed address: \"%s\"\n", str);
  118.           return NULL;
  119.       }
  120.       if (addr) {
  121. --- 934,941 ----
  122.           *p = '<';
  123.       }
  124.       if (!(p2 = index(p+1, '>'))) {
  125. !         if (name || addr)
  126. !         wprint("Warning! Malformed address: \"%s\"\n", str);
  127.           return NULL;
  128.       }
  129.       if (addr) {
  130. ***************
  131. *** 956,962 ****
  132.               *name++ = p[1];
  133.           }
  134.           if (p_cnt) {
  135. !         wprint("Warning! Malformed name: \"%s\"\n", name);
  136.           return NULL;
  137.           }
  138.       }
  139. --- 961,968 ----
  140.               *name++ = p[1];
  141.           }
  142.           if (p_cnt) {
  143. !         if (name || addr)
  144. !             wprint("Warning! Malformed name: \"%s\"\n", name);
  145.           return NULL;
  146.           }
  147.       }
  148. ***************
  149. *** 986,993 ****
  150.       }
  151.       while (comment) {
  152.           if (c == '"' && !(p = index(p+1, '"')) ||
  153. !         c == '(' && !(p = any(p+1, "()"))) {
  154. !         wprint("Warning! Malformed address: \"%s\"\n", str);
  155.           return NULL;
  156.           }
  157.           if (*p == '(') /* loop again on parenthesis. quote ends loop */
  158. --- 992,1000 ----
  159.       }
  160.       while (comment) {
  161.           if (c == '"' && !(p = index(p+1, '"')) ||
  162. !             c == '(' && !(p = any(p+1, "()"))) {
  163. !         if (name || addr)
  164. !             wprint("Warning! Malformed address: \"%s\"\n", str);
  165.           return NULL;
  166.           }
  167.           if (*p == '(') /* loop again on parenthesis. quote ends loop */
  168. ***************
  169. *** 1001,1007 ****
  170.        */
  171.       if ((p2 = any(p+1, "<,")) && *p2 == '<') {
  172.           if (!(p = index(p2, '>'))) {
  173. !         wprint("Warning! Malformed address: \"%s\"\n", str);
  174.           return NULL;
  175.           }
  176.           if (addr = beg_addr) { /* reassign addr and compare to null */
  177. --- 1008,1015 ----
  178.        */
  179.       if ((p2 = any(p+1, "<,")) && *p2 == '<') {
  180.           if (!(p = index(p2, '>'))) {
  181. !         if (name || addr)
  182. !             wprint("Warning! Malformed address: \"%s\"\n", str);
  183.           return NULL;
  184.           }
  185.           if (addr = beg_addr) { /* reassign addr and compare to null */
  186. *** 7.2.4/bind.c    Sat Dec  7 16:51:57 1991
  187. --- 7.2.5/bind.c    Sat Aug 22 11:46:56 1992
  188. ***************
  189. *** 1,7 ****
  190.   /* bind.c */
  191.   
  192. - #include "bindings.h"
  193.   #include "mush.h"
  194.   
  195.   extern char *c_macro();
  196.   static un_bind();
  197. --- 1,7 ----
  198.   /* bind.c */
  199.   
  200.   #include "mush.h"
  201. + #include "bindings.h"
  202.   
  203.   extern char *c_macro();
  204.   static un_bind();
  205. *** 7.2.4/command2.c    Sun Dec 15 10:03:34 1991
  206. --- 7.2.5/command2.c    Sat Aug 22 11:46:58 1992
  207. ***************
  208. *** 145,150 ****
  209. --- 145,151 ----
  210.   int n;
  211.   char **argv;
  212.   {
  213. +     static int new;
  214.       char **envp, **last;
  215.   
  216.       if (n != 2 || !strcmp(argv[1], "-?"))
  217. ***************
  218. *** 152,157 ****
  219. --- 153,182 ----
  220.   
  221.       n = strlen(argv[1]);
  222.       for (last = environ; *last; last++);
  223. + 
  224. +     /* Allocate a copy of the environment so we can free() strings we unset */
  225. +     if (new == 0) {
  226. +     if (!(envp = (char **)calloc((last - environ) + 1, sizeof(char *)))) {
  227. +         error("Unsetenv: out of memory");
  228. +         return -1;
  229. +     }
  230. +     while (environ[new]) {
  231. +         envp[new] = savestr(environ[new]);
  232. +         if (!envp[new++]) {
  233. +         error("Unsetenv: out of memory");
  234. +         free_vec(envp);
  235. +         new = 0;
  236. +         return -1;
  237. +         }
  238. +     }
  239. +     environ = envp;
  240. +     last = &envp[new];
  241. +     new = 1;
  242. +     }
  243. + 
  244. +     if (last == environ) /* Empty environment? */
  245. +     return 0;
  246. + 
  247.       last--;
  248.   
  249.       for (envp = environ; envp <= last; envp++) {
  250. *** 7.2.4/commands.c    Wed Nov 13 01:25:17 1991
  251. --- 7.2.5/commands.c    Sat Aug 22 12:15:06 1992
  252. ***************
  253. *** 103,108 ****
  254. --- 103,111 ----
  255.       register char *p = x? *argv : NULL;
  256.       register long flg = 0;
  257.       extern FILE *ed_fp;
  258. + #ifdef SUNTOOL
  259. +     SIGRET (*oldint)(), (*oldquit)();
  260. + #endif /* SUNTOOL */
  261.   
  262.       if (x && *++argv && !strcmp(*argv, "-?"))
  263.       return help(0, "readmsg", cmd_help);
  264. ***************
  265. *** 169,186 ****
  266.       if (isoff(glob_flags, IS_PIPE))
  267.           set_msg_bit(list, current_msg);
  268.       }
  269.       current_msg = 0;
  270. !     for (x = 0; x < msg_cnt; x++)
  271.       if (msg_bit(list, x)) {
  272.           current_msg = x;
  273.   #ifdef SUNTOOL
  274.           if (istool > 1) {
  275.           read_mail(NO_ITEM, 0, NO_EVENT);
  276. !         return 0;
  277.           }
  278.   #endif /* SUNTOOL */
  279.           display_msg(x, flg);
  280.       }
  281.       return 0;
  282.   }
  283.   
  284. --- 172,200 ----
  285.       if (isoff(glob_flags, IS_PIPE))
  286.           set_msg_bit(list, current_msg);
  287.       }
  288. + #ifdef SUNTOOL
  289. +     if (istool > 1)
  290. +     on_intr();
  291. + #endif /* SUNTOOL */
  292.       current_msg = 0;
  293. !     for (x = 0; x < msg_cnt && isoff(glob_flags, WAS_INTR); x++)
  294.       if (msg_bit(list, x)) {
  295. +         if (current_msg > 0 && istool > 1 && isoff(flg, NO_PAGE) &&
  296. +             c_more("Type RETURN for next message, q to quit:") == 'q')
  297. +         break;
  298.           current_msg = x;
  299.   #ifdef SUNTOOL
  300.           if (istool > 1) {
  301.           read_mail(NO_ITEM, 0, NO_EVENT);
  302. !         break;
  303.           }
  304.   #endif /* SUNTOOL */
  305.           display_msg(x, flg);
  306.       }
  307. + #ifdef SUNTOOL
  308. +     if (istool > 1)
  309. +     off_intr();
  310. + #endif /* SUNTOOL */
  311.       return 0;
  312.   }
  313.   
  314. *** 7.2.4/config.h-dist    Sun Feb  2 14:03:44 1992
  315. --- 7.2.5/config.h-dist    Sat Aug 22 11:46:46 1992
  316. ***************
  317. *** 74,79 ****
  318. --- 74,89 ----
  319.   /* mail delivery system macros and defines... */
  320.   
  321.   /*
  322. +  * For POP3_SUPPORT, define this.  Mush will act as a POP-3 client,
  323. +  * periodically calling the server on the machine described by the
  324. +  * environment variable MAILHOST to pick up new mail.
  325. +  */
  326. + /* #define POP3_SUPPORT /**/
  327. + #ifdef POP3_SUPPORT
  328. + #define HOMEMAIL
  329. + #endif /* POP3_SUPPORT */
  330. + 
  331. + /*
  332.    * If you are using MMDF, define MMDF here.
  333.    */
  334.   /* #define MMDF /**/
  335. *** 7.2.4/curs_io.c    Thu May 16 18:28:43 1991
  336. --- 7.2.5/curs_io.c    Sun Sep 20 14:14:37 1992
  337. ***************
  338. *** 33,41 ****
  339.   
  340.   tty_settings()
  341.   {
  342. !     savetty();
  343.   
  344. ! #ifdef SYSV
  345.       eofc = _tty.c_cc[VEOF];
  346.   #else
  347.   #ifdef BSD
  348. --- 33,44 ----
  349.   
  350.   tty_settings()
  351.   {
  352. !     int is_tty = isatty(0);
  353.   
  354. !     if (is_tty)
  355. !     savetty();
  356. ! 
  357. ! #if defined(SYSV) || defined(AIX)
  358.       eofc = _tty.c_cc[VEOF];
  359.   #else
  360.   #ifdef BSD
  361. ***************
  362. *** 46,52 ****
  363.       eofc = CTRL('D');
  364.   #endif /* SYSV */
  365.   
  366. !     if (!isatty(0)) {
  367.       del_line = CTRL('U');
  368.       del_char = CTRL('H');
  369.       } else {
  370. --- 49,55 ----
  371.       eofc = CTRL('D');
  372.   #endif /* SYSV */
  373.   
  374. !     if (!is_tty) {
  375.       del_line = CTRL('U');
  376.       del_char = CTRL('H');
  377.       } else {
  378. ***************
  379. *** 55,60 ****
  380. --- 58,64 ----
  381.       }
  382.   
  383.   #ifdef TIOCGLTC
  384. + #ifndef AIX    /* Just in case */
  385.   #ifndef AUX    /* AUX defines TIOCGLTC but doesn't use it */
  386.       if (ioctl(0, TIOCGLTC, <chars) != -1) {
  387.       del_word = ltchars.t_werasc;
  388. ***************
  389. *** 62,67 ****
  390. --- 66,72 ----
  391.       lit_next = ltchars.t_lnextc;
  392.       } else
  393.   #endif /* AUX */
  394. + #endif /* AIX */
  395.   #endif /* TIOCGLTC */
  396.       {
  397.       del_word = CTRL('W');
  398. *** 7.2.4/curses.c    Tue Mar  3 10:46:01 1992
  399. --- 7.2.5/curses.c    Sat Aug 22 11:46:55 1992
  400. ***************
  401. *** 1,9 ****
  402.   /* @(#)curses.c    (c) copyright 3/18/87 (Dan Heller) */
  403.   
  404.   /* curses.c -- routine to deal with the curses interface */
  405. - #ifdef CURSES
  406.   
  407.   #include "mush.h"
  408.   #include "bindings.h"
  409.   
  410.   curses_init(argc, argv)
  411. --- 1,9 ----
  412.   /* @(#)curses.c    (c) copyright 3/18/87 (Dan Heller) */
  413.   
  414.   /* curses.c -- routine to deal with the curses interface */
  415.   
  416.   #include "mush.h"
  417. + #ifdef CURSES
  418.   #include "bindings.h"
  419.   
  420.   curses_init(argc, argv)
  421. ***************
  422. *** 804,809 ****
  423. --- 804,810 ----
  424.   scrn_line(line, buf)
  425.   char *buf;
  426.   {
  427. + #ifndef AIX
  428.   #ifndef A_CHARTEXT
  429.       (void) strncpy(buf, stdscr->_y[line], COLS-1);
  430.       buf[COLS-1] = 0; /* strncpy does not null terminate */
  431. ***************
  432. *** 815,820 ****
  433. --- 816,824 ----
  434.           break;
  435.       buf[n] = '\0';
  436.   #endif /* A_CHARTEXT */
  437. + #else /* AIX */
  438. +     (void) strncpy(buf, compose_hdr(n_array[line-1]), COLS - 1);
  439. + #endif /* AIX */
  440.   }
  441.   
  442.   /*
  443. *** 7.2.4/file.c    Thu Jan 30 20:50:48 1992
  444. --- 7.2.5/file.c    Sat Aug 22 11:46:56 1992
  445. ***************
  446. *** 402,412 ****
  447.       c = *p, *p = 0;
  448.       /* See if it's a file.  This doesn't get written back
  449.        * onto "buf" since it is supposed to be extracted anyway.
  450. !      * The check for '@' in names beginning with '/' is to
  451.        * avoid mis-identifying X.400 addresses as file names.
  452.        */
  453.       if (force || *file == '+' || *file == '~' ||
  454. !         *file == '|' || *file == '/' && !index(file, '@')) {
  455.           int isdir;
  456.           /* open either "file" or &file[1] */
  457.           if (*file == '|') {
  458. --- 402,414 ----
  459.       c = *p, *p = 0;
  460.       /* See if it's a file.  This doesn't get written back
  461.        * onto "buf" since it is supposed to be extracted anyway.
  462. !      * The check for '=' in names beginning with '/' is to
  463.        * avoid mis-identifying X.400 addresses as file names.
  464. +      *
  465. +      * \052 is a * for broken compilers that would do a comment.
  466.        */
  467.       if (force || *file == '+' || *file == '~' ||
  468. !         *file == '|' || *file == '/' && !glob(file, "/?*=*?/\052")) {
  469.           int isdir;
  470.           /* open either "file" or &file[1] */
  471.           if (*file == '|') {
  472. *** 7.2.4/hdrs.c    Wed Nov 13 01:27:59 1991
  473. --- 7.2.5/hdrs.c    Sat Aug 22 11:46:49 1992
  474. ***************
  475. *** 614,622 ****
  476.   reply_to(n, all, buf)
  477.   char buf[];
  478.   {
  479. !     register char *p = NULL, *p2, *b = buf, *field;
  480.       char line[256], name[256], addr[256], *unscramble_addr();
  481.   
  482.       if (field = do_set(set_options, "reply_to_hdr")) {
  483.   #ifndef MSG_SEPARATOR
  484.       if (!*field)
  485. --- 614,624 ----
  486.   reply_to(n, all, buf)
  487.   char buf[];
  488.   {
  489. !     register char *p = NULL, *p2 = NULL, *b = buf, *field;
  490.       char line[256], name[256], addr[256], *unscramble_addr();
  491.   
  492. +     name[0] = addr[0] = '\0';
  493. + 
  494.       if (field = do_set(set_options, "reply_to_hdr")) {
  495.   #ifndef MSG_SEPARATOR
  496.       if (!*field)
  497. ***************
  498. *** 643,666 ****
  499.       }
  500.       if (p || (!p && ((p = header_field(n, field = "reply-to")) ||
  501.               (p = header_field(n, field = "from")) ||
  502. !             (p = header_field(n, field = "return-path")))))
  503.       skipspaces(0);
  504. !     else if (!p) {
  505. ! #ifndef MSG_SEPARATOR
  506.   DoFrom:
  507.       field = "from_";
  508.       /* if all else fails, then get the first token in "From" line */
  509.       if (p2 = msg_get(n, line, sizeof line))
  510.           p = index(p2, ' ');
  511. !     else
  512.           return "";
  513.       skipspaces(1);
  514. !     if (p2 = index(p, ' '))
  515.           *p2 = 0;
  516. !     (void) unscramble_addr(p, line); /* p is safely recopied to line */
  517. !     p = line;
  518.   #else /* MSG_SEPARATOR */
  519.       wprint("Warning: unable to find who msg %d is from!\n", n+1);
  520.   #endif /* MSG_SEPARATOR */
  521.       }
  522.       (void) get_name_n_addr(p, name, addr);
  523. --- 645,683 ----
  524.       }
  525.       if (p || (!p && ((p = header_field(n, field = "reply-to")) ||
  526.               (p = header_field(n, field = "from")) ||
  527. !             (p = header_field(n, field = "return-path"))))) {
  528.       skipspaces(0);
  529. !     } else if (!p) {
  530.   DoFrom:
  531.       field = "from_";
  532. + #ifndef MSG_SEPARATOR
  533.       /* if all else fails, then get the first token in "From" line */
  534.       if (p2 = msg_get(n, line, sizeof line))
  535.           p = index(p2, ' ');
  536. !     if (!p2 || !p)
  537.           return "";
  538.       skipspaces(1);
  539. !     /* Extra work to handle quoted tokens */
  540. !     while (p2 = any(p, "\" ")) {
  541. !         if (*p2 == '"') {
  542. !         if (p2 = index(p2 + 1, '"'))
  543. !             p2++;
  544. !         else
  545. !             return "";
  546. !         } else
  547. !         break;
  548. !     }
  549. !     if (p2)
  550.           *p2 = 0;
  551. !     if (!unscramble_addr(p, line)) { /* p is safely recopied to line */
  552. !         p2 = addr;
  553. !         goto BrokenFrom;
  554. !     } else
  555. !         p2 = NULL;
  556.   #else /* MSG_SEPARATOR */
  557.       wprint("Warning: unable to find who msg %d is from!\n", n+1);
  558. +     p2 = addr;
  559. +     goto BrokenFrom;
  560.   #endif /* MSG_SEPARATOR */
  561.       }
  562.       (void) get_name_n_addr(p, name, addr);
  563. ***************
  564. *** 675,685 ****
  565.        * Check Resent-From: if the address came from the from_ line, else
  566.        * check From:, and finally Sender: or Name:.
  567.        */
  568.       if (!lcase_strncmp(field, "from_", -1) &&
  569.           (p = header_field(n, "resent-from")) ||
  570.               (p = header_field(n, "from")) ||
  571. !             (p = header_field(n, "sender")))
  572. !         (void) get_name_n_addr(p, name, NULL);
  573.       if (!name[0] && (p = header_field(n, "name")))
  574.           (void) strcpy(name, p);
  575.       if (name[0]) {
  576. --- 692,705 ----
  577.        * Check Resent-From: if the address came from the from_ line, else
  578.        * check From:, and finally Sender: or Name:.
  579.        */
  580. + BrokenFrom:
  581.       if (!lcase_strncmp(field, "from_", -1) &&
  582.           (p = header_field(n, "resent-from")) ||
  583.               (p = header_field(n, "from")) ||
  584. !             (p = header_field(n, "sender"))) {
  585. !         /* p2 is either NULL or addr (BrokenFrom) */
  586. !         (void) get_name_n_addr(p, name, p2);
  587. !     }
  588.       if (!name[0] && (p = header_field(n, "name")))
  589.           (void) strcpy(name, p);
  590.       if (name[0]) {
  591. ***************
  592. *** 743,752 ****
  593.       if (!*p)
  594.       if (p2) /* take_me_off() was not done */
  595.           (void) strcpy(buf, login);
  596. !     else if (index(name, '"'))
  597. !         (void) sprintf(buf, "<%s> (%s)", addr, name);
  598. !     else
  599. !         (void) sprintf(buf, "\"%s\" <%s>", name, addr);
  600.       return buf;
  601.   }
  602.   
  603. --- 763,776 ----
  604.       if (!*p)
  605.       if (p2) /* take_me_off() was not done */
  606.           (void) strcpy(buf, login);
  607. !     else {
  608. !         if (!*name)
  609. !         (void) sprintf(buf, "<%s>", addr);
  610. !         else if (index(name, '"'))
  611. !         (void) sprintf(buf, "<%s> (%s)", addr, name);
  612. !         else
  613. !         (void) sprintf(buf, "\"%s\" <%s>", name, addr);
  614. !     }
  615.       return buf;
  616.   }
  617.   
  618. *** 7.2.4/init.c    Thu Jan 30 00:14:42 1992
  619. --- 7.2.5/init.c    Sat Aug 22 13:36:35 1992
  620. ***************
  621. *** 73,94 ****
  622.       (void) add_option(&set_options, argv);
  623.       }
  624.   
  625.   #ifdef HOMEMAIL
  626.       strdup(spoolfile, sprintf(buf, "%s/%s", home, MAILFILE));
  627.   #else /* HOMEMAIL */
  628.       if ((p = getenv("MAIL")) && *p)
  629.       strdup(spoolfile, p);
  630.       else
  631.       strdup(spoolfile, sprintf(buf, "%s/%s", MAILDIR, login));
  632.   #endif /* HOMEMAIL */
  633.       mailfile = "";
  634.   
  635. -     if (realname && *buf) {
  636. -     /* realname has already been copied to buf */
  637. -     argv[0] = "realname";
  638. -     argv[2] = buf;
  639. -     (void) add_option(&set_options, argv);
  640. -     }
  641.       crt = 24;
  642.       screen = 18;
  643.       wrapcolumn = 0; /* Default is no wrap */
  644. --- 73,97 ----
  645.       (void) add_option(&set_options, argv);
  646.       }
  647.   
  648. +     if (realname && *buf) {
  649. +     /* realname has already been copied to buf */
  650. +     argv[0] = "realname";
  651. +     argv[2] = buf;
  652. +     (void) add_option(&set_options, argv);
  653. +     }
  654. + 
  655.   #ifdef HOMEMAIL
  656.       strdup(spoolfile, sprintf(buf, "%s/%s", home, MAILFILE));
  657.   #else /* HOMEMAIL */
  658. + #ifdef ENV_MAIL
  659.       if ((p = getenv("MAIL")) && *p)
  660.       strdup(spoolfile, p);
  661.       else
  662. + #endif /* ENV_MAIL */
  663.       strdup(spoolfile, sprintf(buf, "%s/%s", MAILDIR, login));
  664.   #endif /* HOMEMAIL */
  665.       mailfile = "";
  666.   
  667.       crt = 24;
  668.       screen = 18;
  669.       wrapcolumn = 0; /* Default is no wrap */
  670. ***************
  671. *** 101,118 ****
  672.       if (ourname = (char **)calloc((unsigned)2, sizeof (char *)))
  673.           strdup(ourname[0], ourhost);
  674.       } else {
  675. !     int n = 0;
  676.       cnt = 2; /* 1 for ourhost and 1 for NULL terminator */
  677. !     for (p = hp->h_name; p && *p; p = hp->h_aliases[n++])
  678. !         if (strcmp(ourhost, p)) /* if host name is different */
  679. !         cnt++;
  680. !     if (ourname = (char **)calloc((unsigned)cnt, sizeof (char *))) {
  681. !         ourname[--cnt] = NULL;
  682. !         for (p = hp->h_name; p && *p && n >= 0; p = hp->h_aliases[--n])
  683. !         if (strcmp(ourhost, p)) /* if host name is different */
  684. !             ourname[--cnt] = savestr(p);
  685. !         strdup(ourname[0], ourhost); /* cnt better be 0! */
  686. !     }
  687.       }
  688.   #else
  689.   #ifdef SYSV
  690. --- 104,125 ----
  691.       if (ourname = (char **)calloc((unsigned)2, sizeof (char *)))
  692.           strdup(ourname[0], ourhost);
  693.       } else {
  694. !     int n = -1;
  695.       cnt = 2; /* 1 for ourhost and 1 for NULL terminator */
  696. ! 
  697. !         for (p = hp->h_name; p && *p; p = hp->h_aliases[++n])
  698. !             if (strcmp(ourhost, p)) /* if host name is different */
  699. !                 cnt++;
  700. ! 
  701. !         if (ourname = (char **)malloc((unsigned)cnt * sizeof (char *))) {
  702. !             n = -1;
  703. !             cnt = 0;
  704. !             ourname[cnt++] = savestr(ourhost);
  705. !             for (p = hp->h_name; p && *p; p = hp->h_aliases[++n])
  706. !                 if (strcmp(ourhost, p)) /* if host name is different */
  707. !                     ourname[cnt++] = savestr(p);
  708. !             ourname[cnt++] = NULL;
  709. !         }
  710.       }
  711.   #else
  712.   #ifdef SYSV
  713. *** 7.2.4/lock.c    Sun Feb  2 19:43:53 1992
  714. --- 7.2.5/lock.c    Sun Oct 11 18:14:56 1992
  715. ***************
  716. *** 32,39 ****
  717.    * permission on /usr/mail).  Instead, we need an external program that
  718.    * can be setgid, which mush then runs to create and remove lock files.
  719.    * Compiling this file with -DDOT_LOCK -DLOCK_PROG added to your CFLAGS
  720. !  * will generate such a program.
  721.    *
  722.    * For mush purposes, you should hardwire the DOLOCK_PATH to the full path
  723.    * name of the installed executable.  This helps prevent malicious users
  724.    * from substituting a different program.
  725. --- 32,41 ----
  726.    * permission on /usr/mail).  Instead, we need an external program that
  727.    * can be setgid, which mush then runs to create and remove lock files.
  728.    * Compiling this file with -DDOT_LOCK -DLOCK_PROG added to your CFLAGS
  729. !  * will generate such a program:
  730.    *
  731. +  *    cc -o dotlock -DDOT_LOCK -DLOCK_PROG lock.c xcreat.c
  732. +  *
  733.    * For mush purposes, you should hardwire the DOLOCK_PATH to the full path
  734.    * name of the installed executable.  This helps prevent malicious users
  735.    * from substituting a different program.
  736. ***************
  737. *** 129,135 ****
  738.       SIGRET (*oldint)(), (*oldquit)();
  739.   
  740.   #ifndef LOCK_PROG
  741. ! #ifdef SYSV
  742.       /* Only the spoolfile needs to be dot_locked -- other files are
  743.        * handled by lock_fopen, below.  To avoid collisions with 14-char
  744.        * file name limits, we allow dot_locking ONLY of the spoolfile.
  745. --- 131,137 ----
  746.       SIGRET (*oldint)(), (*oldquit)();
  747.   
  748.   #ifndef LOCK_PROG
  749. ! #if defined(SYSV) && !defined(HPUX) && !defined(IRIX4)
  750.       /* Only the spoolfile needs to be dot_locked -- other files are
  751.        * handled by lock_fopen, below.  To avoid collisions with 14-char
  752.        * file name limits, we allow dot_locking ONLY of the spoolfile.
  753. ***************
  754. *** 139,145 ****
  755.   #ifdef SVR2
  756.       return lock_proc(filename, DOLOCKIT);
  757.   #endif /* SVR2 */
  758. ! #endif /* SYSV */
  759.   #ifdef BSD
  760.       setregid(rgid, sgid);
  761.   #else /* BSD */
  762. --- 141,147 ----
  763.   #ifdef SVR2
  764.       return lock_proc(filename, DOLOCKIT);
  765.   #endif /* SVR2 */
  766. ! #endif /* SYSV && !HPUX && !IRIX4 */
  767.   #ifdef BSD
  768.       setregid(rgid, sgid);
  769.   #else /* BSD */
  770. ***************
  771. *** 152,158 ****
  772.       (void) sprintf(buf, "%s.lock", filename);
  773.   #endif /* M_XENIX */
  774.       on_intr();
  775. !     while ((lockfd = open(buf, O_CREAT|O_WRONLY|O_EXCL, 0444)) == -1) {
  776.       if (errno != EEXIST) {
  777.           error("unable to lock %s", filename);
  778.           break;
  779. --- 154,160 ----
  780.       (void) sprintf(buf, "%s.lock", filename);
  781.   #endif /* M_XENIX */
  782.       on_intr();
  783. !     while ((lockfd = xcreat(buf, 0444)) == -1) {
  784.       if (errno != EEXIST) {
  785.           error("unable to lock %s", filename);
  786.           break;
  787. ***************
  788. *** 208,214 ****
  789.           return 0;
  790.       (void) strcpy(buf, p);
  791.       }
  792. ! #ifdef SYSV
  793.       if (strncmp(spoolfile, buf, strlen(spoolfile)) != 0)
  794.       return 0;
  795.   #ifdef SVR2
  796. --- 210,216 ----
  797.           return 0;
  798.       (void) strcpy(buf, p);
  799.       }
  800. ! #if defined(SYSV)  && !defined(HPUX) && !defined(IRIX4)
  801.       if (strncmp(spoolfile, buf, strlen(spoolfile)) != 0)
  802.       return 0;
  803.   #ifdef SVR2
  804. ***************
  805. *** 216,222 ****
  806.       *p = 0;
  807.       return lock_proc(buf, UNLOCKIT);
  808.   #endif /* SVR2 */
  809. ! #endif /* SYSV */
  810.   #else /* LOCK_PROG */
  811.       errno = 0;
  812.   #endif /* !LOCK_PROG */
  813. --- 218,224 ----
  814.       *p = 0;
  815.       return lock_proc(buf, UNLOCKIT);
  816.   #endif /* SVR2 */
  817. ! #endif /* SYSV && !HPUX && !IRIX4 */
  818.   #else /* LOCK_PROG */
  819.       errno = 0;
  820.   #endif /* !LOCK_PROG */
  821. *** 7.2.4/loop.c    Wed Nov 13 09:58:26 1991
  822. --- 7.2.5/loop.c    Sat Aug 22 11:46:54 1992
  823. ***************
  824. *** 859,867 ****
  825.   
  826.       while (*str && b < sizeof buf - 1) {
  827.       if (*str == '~' && (str == start || isspace(*(str-1)))) {
  828. !         register char *p = any(str, " \t"), *tmp;
  829.           int x = 1;
  830. !         if (p)
  831.           *p = 0;
  832.           tmp = getpath(str, &x);
  833.           /* if error, print message and return 0 */
  834. --- 859,872 ----
  835.   
  836.       while (*str && b < sizeof buf - 1) {
  837.       if (*str == '~' && (str == start || isspace(*(str-1)))) {
  838. !         register char *p, *tmp;
  839.           int x = 1;
  840. !         /* Is it ever possible to have a user name start with tilde?
  841. !          * On the assumption it isn't, recur in case of ~$foo or ~/$foo
  842. !          */
  843. !         if (str[1] != '~' && variable_expand(&str[1]) == 0)
  844. !         return 0;
  845. !         if (p = any(str, " \t"))
  846.           *p = 0;
  847.           tmp = getpath(str, &x);
  848.           /* if error, print message and return 0 */
  849. ***************
  850. *** 869,880 ****
  851.           wprint("%s: %s\n", str, tmp);
  852.           return 0;
  853.           }
  854. !         b += Strcpy(buf+b, tmp);
  855. !         if (p)
  856. !         *p = ' ', str = p;
  857. !         else
  858. !         str += strlen(str);
  859.           expanded = 1;
  860.       }
  861.       /* if single-quotes, just copy byte by byte, char by char ... */
  862.       if ((buf[b] = *str++) == '\'' && !inquotes) {
  863. --- 874,888 ----
  864.           wprint("%s: %s\n", str, tmp);
  865.           return 0;
  866.           }
  867. !         /* Use strncat instead of strncpy to get \0 terminator */
  868. !         buf[b] = 0; /* Just in case */
  869. !         b += strlen(strncat(buf + b, tmp, sizeof buf - 1 - b));
  870. !         if (p && b < sizeof buf - 1) {
  871. !         *p = ' ';
  872. !         b += strlen(strncat(buf + b, p, sizeof buf - 1 - b));
  873. !         }
  874.           expanded = 1;
  875. +         break;
  876.       }
  877.       /* if single-quotes, just copy byte by byte, char by char ... */
  878.       if ((buf[b] = *str++) == '\'' && !inquotes) {
  879. ***************
  880. *** 895,908 ****
  881.           struct expand expansion;
  882.           expansion.orig = str - 1;
  883.           if (varexp(&expansion)) {
  884. !         b += Strcpy(&buf[b], expansion.exp);
  885.           xfree(expansion.exp);
  886.           str = expansion.rest;
  887.           expanded = 1;
  888.           } else
  889.           return 0;
  890. !     } else if (!inquotes && buf[b] == ';') {
  891. !         while (buf[++b] = *str++)
  892.           ;
  893.           b++;
  894.           break;
  895. --- 903,917 ----
  896.           struct expand expansion;
  897.           expansion.orig = str - 1;
  898.           if (varexp(&expansion)) {
  899. !         b += Strcpy(&buf[b],
  900. !                 quoteit(expansion.exp, inquotes? '"' : 0, FALSE));
  901.           xfree(expansion.exp);
  902.           str = expansion.rest;
  903.           expanded = 1;
  904.           } else
  905.           return 0;
  906. !     } else if (!inquotes && (buf[b] == ';' || buf[b] == '|')) {
  907. !         while ((buf[++b] = *str++) && b < sizeof buf - 2)
  908.           ;
  909.           b++;
  910.           break;
  911. *** 7.2.4/mail.c    Mon Mar  2 20:59:14 1992
  912. --- 7.2.5/mail.c    Sat Aug 22 11:46:48 1992
  913. ***************
  914. *** 1236,1246 ****
  915.       if (isoff(flags, VERBOSE) && debug < 3)
  916.       switch (fork_pid = fork()) {
  917.           case  0:  /* the child will send the letter. ignore signals */
  918. ! #if defined(SYSV) && !defined(AUX)
  919.           if (setpgrp() == -1)
  920. ! #else /* !SYSV || AUX */
  921.           if (setpgrp(0, getpid()) == -1)
  922. ! #endif /* SYSV && !AUX */
  923.               error("setpgrp");
  924.           /* NOTE: No special case needed for tool here because
  925.            * this is the sending child -- it's going to pclose()
  926. --- 1236,1246 ----
  927.       if (isoff(flags, VERBOSE) && debug < 3)
  928.       switch (fork_pid = fork()) {
  929.           case  0:  /* the child will send the letter. ignore signals */
  930. ! #if defined(SYSV) && !defined(AUX) && !defined(IRIX4)
  931.           if (setpgrp() == -1)
  932. ! #else /* !SYSV || AUX || IRIX4 */
  933.           if (setpgrp(0, getpid()) == -1)
  934. ! #endif /* SYSV && !AUX || IRIX4 */
  935.               error("setpgrp");
  936.           /* NOTE: No special case needed for tool here because
  937.            * this is the sending child -- it's going to pclose()
  938. *** 7.2.4/main.c    Wed Jan 29 23:34:31 1992
  939. --- 7.2.5/main.c    Mon Sep 21 10:32:25 1992
  940. ***************
  941. *** 71,76 ****
  942. --- 71,79 ----
  943.       /* check for any mail at all and exit if we're not continuing */
  944.       if (!n) {
  945.       struct stat statb;
  946. + #ifdef POP3_SUPPORT
  947. +     popgetmail(); /*Load mailbox with new mail, if any*/
  948. + #endif /* POP3_SUPPORT*/
  949.       if (stat(spoolfile, &statb) || statb.st_size == 0) {
  950.           (void) printf("No mail for %s.\n", login);
  951.           exit(0);
  952. ***************
  953. *** 200,206 ****
  954.       turnoff(glob_flags, IS_SENDING); /* no longer sending mail; running shell */
  955.   
  956.       if (ison(glob_flags, REDIRECT)
  957. !         && (!Flags.src_file || !Flags.src_n_exit)) {
  958.       puts("You can't redirect input unless you're sending mail.");
  959.       puts("If you want to run a shell with redirection, use \"-i\"");
  960.       cleanup(0);
  961. --- 203,209 ----
  962.       turnoff(glob_flags, IS_SENDING); /* no longer sending mail; running shell */
  963.   
  964.       if (ison(glob_flags, REDIRECT)
  965. !         && (!Flags.src_file || !Flags.src_n_exit) && !hdrs_only) {
  966.       puts("You can't redirect input unless you're sending mail.");
  967.       puts("If you want to run a shell with redirection, use \"-i\"");
  968.       cleanup(0);
  969. ***************
  970. *** 270,275 ****
  971. --- 273,279 ----
  972.       }
  973.   
  974.       if (hdrs_only) {
  975. +     (void) mail_status(0);
  976.       (void) sprintf(buf, "headers %s", hdrs_only);
  977.       if (argv = make_command(buf, TRPL_NULL, &argc))
  978.           (void) do_hdrs(argc, argv, NULL);
  979. ***************
  980. *** 287,298 ****
  981.           cleanup(0);
  982.       }
  983.   
  984.   #ifdef SUNTOOL
  985.       if (istool) {
  986.       char buf[16];
  987.       n = 0;
  988. !     if (time_out < 30)
  989. !         time_out = 30;
  990.       turnoff(glob_flags, IGN_SIGS);
  991.       (void) do_hdrs(0, DUBL_NULL, NULL);
  992.       timerclear(&(mail_timer.it_interval));
  993. --- 291,308 ----
  994.           cleanup(0);
  995.       }
  996.   
  997. + #ifdef POP3_SUPPORT
  998. +     if (time_out < MIN_TIME_OUT)
  999. +     time_out = MIN_TIME_OUT;
  1000. + #endif /* POP3_SUPPORT */
  1001.   #ifdef SUNTOOL
  1002.       if (istool) {
  1003.       char buf[16];
  1004.       n = 0;
  1005. ! #ifndef POP3_SUPPORT
  1006. !     if (time_out < MIN_TIME_OUT)
  1007. !         time_out = MIN_TIME_OUT;
  1008. ! #endif /* POP3_SUPPORT */
  1009.       turnoff(glob_flags, IGN_SIGS);
  1010.       (void) do_hdrs(0, DUBL_NULL, NULL);
  1011.       timerclear(&(mail_timer.it_interval));
  1012. *** 7.2.4/misc.c    Fri Feb 14 07:51:54 1992
  1013. --- 7.2.5/misc.c    Sat Aug 22 11:46:47 1992
  1014. ***************
  1015. *** 413,418 ****
  1016. --- 413,419 ----
  1017.   char *buf;
  1018.   {
  1019.       static FILE *pp;
  1020. +     static SIGRET (*oldchld)();
  1021.       static int cnt, len;
  1022.       static u_long save_echo_flag;
  1023.   #ifdef SUNTOOL
  1024. ***************
  1025. *** 511,520 ****
  1026.           echo_on();
  1027.           if (!(pp = popen(buf, "w")))
  1028.           error(buf);
  1029.       }
  1030.       } else if (!buf) {
  1031. !     if (pp && pp != stdout)
  1032.           (void) pclose(pp);
  1033.       pp = NULL_FILE;
  1034.       if (save_echo_flag) {
  1035.           echo_on();
  1036. --- 512,525 ----
  1037.           echo_on();
  1038.           if (!(pp = popen(buf, "w")))
  1039.           error(buf);
  1040. +         else /* Don't reap popen()'s child */
  1041. +         oldchld = signal(SIGCHLD, SIG_DFL);
  1042.       }
  1043.       } else if (!buf) {
  1044. !     if (pp && pp != stdout) {
  1045.           (void) pclose(pp);
  1046. +         (void) signal(SIGCHLD, oldchld);
  1047. +     }
  1048.       pp = NULL_FILE;
  1049.       if (save_echo_flag) {
  1050.           echo_on();
  1051. *** 7.2.4/msgs.c    Sun Feb  2 13:59:14 1992
  1052. --- 7.2.5/msgs.c    Sat Aug 22 11:46:51 1992
  1053. ***************
  1054. *** 8,13 ****
  1055. --- 8,14 ----
  1056.   u_long flg;
  1057.   {
  1058.       char buf[32], *pager = NULL;
  1059. +     int intro = TRUE;
  1060.   
  1061.       if (ison(msg[n].m_flags, DELETE) && !do_set(set_options, "show_deleted")) {
  1062.       print("Message %d deleted; ", n+1);
  1063. ***************
  1064. *** 31,37 ****
  1065.   #ifdef MSG_SEPARATOR
  1066.       turnon(flg, NO_SEPARATOR);
  1067.   #endif /* MMDF */
  1068. !     if (!istool && isoff(flg, NO_PAGE) &&
  1069.           crt < msg[n].m_lines && isoff(flg, M_TOP)) {
  1070.       if (!(pager = do_set(set_options, "pager")))
  1071.           pager = DEF_PAGER;
  1072. --- 32,44 ----
  1073.   #ifdef MSG_SEPARATOR
  1074.       turnon(flg, NO_SEPARATOR);
  1075.   #endif /* MMDF */
  1076. !     if (ison(msg[n].m_flags, METAMAIL) && isoff(flg, NO_PAGE) &&
  1077. !         (pager = do_set(set_options, "metamail"))) {
  1078. !     intro = FALSE;
  1079. !     turnoff(flg, NO_HEADER);
  1080. !     turnoff(flg, M_TOP);
  1081. !     turnon(flg, NO_IGNORE);
  1082. !     } else if (!istool && isoff(flg, NO_PAGE) &&
  1083.           crt < msg[n].m_lines && isoff(flg, M_TOP)) {
  1084.       if (!(pager = do_set(set_options, "pager")))
  1085.           pager = DEF_PAGER;
  1086. ***************
  1087. *** 38,46 ****
  1088.       if (!*pager || !strcmp(pager, "internal"))
  1089.           pager = NULL; /* default to internal pager if pager set to "" */
  1090.       }
  1091. !     (void) do_pager(pager, TRUE); /* start pager */
  1092. !     (void) do_pager(sprintf(buf, "Message #%d (%d lines)\n",
  1093. !              n+1, msg[n].m_lines), FALSE);
  1094.       (void) copy_msg(n, NULL_FILE, flg, NULL);
  1095.       (void) do_pager(NULL, FALSE); /* end pager */
  1096.   }
  1097. --- 45,54 ----
  1098.       if (!*pager || !strcmp(pager, "internal"))
  1099.           pager = NULL; /* default to internal pager if pager set to "" */
  1100.       }
  1101. !     (void) do_pager(pager, intro? 1 : -1); /* start pager */
  1102. !     if (intro)
  1103. !     (void) do_pager(sprintf(buf, "Message #%d (%d lines)\n",
  1104. !                  n+1, msg[n].m_lines), FALSE);
  1105.       (void) copy_msg(n, NULL_FILE, flg, NULL);
  1106.       (void) do_pager(NULL, FALSE); /* end pager */
  1107.   }
  1108. ***************
  1109. *** 505,514 ****
  1110.        * bogus "new mail" messages from the shell.
  1111.        */
  1112.   #ifdef POSIX_UTIME
  1113. !     struct utimbuf times;
  1114.       (void) fflush(mail_fp); /* just in case */
  1115. !     times.modtime = time(×.actime) - 2;
  1116. !     times.ausec = times.modusec = 0;
  1117.   #else /* !POSIX_UTIME */
  1118.       long times[2];
  1119.       (void) fflush(mail_fp); /* just in case */
  1120. --- 513,522 ----
  1121.        * bogus "new mail" messages from the shell.
  1122.        */
  1123.   #ifdef POSIX_UTIME
  1124. !     struct utimbuf times[1];
  1125.       (void) fflush(mail_fp); /* just in case */
  1126. !     times[0].modtime = time(×[0].actime) - 2;
  1127. !     times[0].ausec = times[0].modusec = 0;
  1128.   #else /* !POSIX_UTIME */
  1129.       long times[2];
  1130.       (void) fflush(mail_fp); /* just in case */
  1131. ***************
  1132. *** 828,839 ****
  1133.   #ifndef MSG_SEPARATOR
  1134.       turnoff(glob_flags, WARNING);
  1135.       if (!strncmp(buf, "From ", 5)) {
  1136.           p = buf + 5;    /* skip "From " */
  1137.           skipspaces(0);
  1138. !         p = any(p, " \t");    /* skip the address */
  1139.       } else
  1140. !         p = buf;
  1141. !     if (p > buf && (p = parse_date(p + 1)) && strcpy(date, p))
  1142.   #else /* MSG_SEPARATOR */
  1143.       if (!strncmp(buf, MSG_SEPARATOR, strlen(MSG_SEPARATOR)))
  1144.   #endif /* MSG_SEPARATOR */
  1145. --- 836,852 ----
  1146.   #ifndef MSG_SEPARATOR
  1147.       turnoff(glob_flags, WARNING);
  1148.       if (!strncmp(buf, "From ", 5)) {
  1149. +         /* skip the address to find the date */
  1150.           p = buf + 5;    /* skip "From " */
  1151.           skipspaces(0);
  1152. !         if ((p = any(p, " \t")) && (p = parse_date(p + 1)) ||
  1153. !             /* Try once more the hard way */
  1154. !             (p = get_name_n_addr(buf + 5, NULL, NULL)) &&
  1155. !             (p = parse_date(p + 1)))
  1156. !         (void) strcpy(date, p);
  1157.       } else
  1158. !         p = NULL;
  1159. !     if (p)
  1160.   #else /* MSG_SEPARATOR */
  1161.       if (!strncmp(buf, MSG_SEPARATOR, strlen(MSG_SEPARATOR)))
  1162.   #endif /* MSG_SEPARATOR */
  1163. ***************
  1164. *** 897,905 ****
  1165.            */
  1166.           while (fgets(buf, sizeof (buf), fp) && (*buf != '\n')) {
  1167.               p = buf;
  1168.               if (!strncmp(buf, "Date:", 5))
  1169.               strdup(msg[cnt].m_date_sent, parse_date(p+5));
  1170. !             if (!strncmp(buf, "Priority:", 9)) {
  1171.               for (p += 9 ; *p != '\n'; p++) {
  1172.                   if (!isalpha(*p) || upper(*p) > 'A' + MAX_PRIORITY)
  1173.                   continue;
  1174. --- 910,935 ----
  1175.            */
  1176.           while (fgets(buf, sizeof (buf), fp) && (*buf != '\n')) {
  1177.               p = buf;
  1178. + #ifdef MMDF
  1179. +             /* MMDF might keep the From_ line, so check for it */
  1180. +             if (!msg[cnt].m_date_recv && !strncmp(buf, "From ", 5)) {
  1181. +             p = buf + 5;    /* skip "From " */
  1182. +             skipspaces(0);
  1183. +             if ((p = any(p, " \t")) && (p = parse_date(p + 1)) ||
  1184. +                 /* Try once more the hard way */
  1185. +                 (p = get_name_n_addr(buf + 5, NULL, NULL)) &&
  1186. +                 (p = parse_date(p + 1)))
  1187. +                 strdup(msg[cnt].m_date_recv, p);
  1188. +             } else
  1189. + #endif /* MMDF */
  1190.               if (!strncmp(buf, "Date:", 5))
  1191.               strdup(msg[cnt].m_date_sent, parse_date(p+5));
  1192. !             else if (!msg[cnt].m_date_sent &&
  1193. !                 !strncmp(buf, "Resent-Date:", 12))
  1194. !             msg[cnt].m_date_sent = savestr(parse_date(p+12));
  1195. !             else if (!strncmp(buf, "Content-Type:", 13))
  1196. !             turnon(msg[cnt].m_flags, METAMAIL);
  1197. !             else if (!strncmp(buf, "Priority:", 9)) {
  1198.               for (p += 9 ; *p != '\n'; p++) {
  1199.                   if (!isalpha(*p) || upper(*p) > 'A' + MAX_PRIORITY)
  1200.                   continue;
  1201. ***************
  1202. *** 906,913 ****
  1203.                   turnon(msg[cnt].m_flags,
  1204.                   M_PRIORITY(upper(*p) - 'A' + 1));
  1205.               }
  1206. !             }
  1207. !             if (get_status &&
  1208.                   !(get_status = strncmp(p, "Status:", 7))) {
  1209.               /* new mail should not have a Status: field! */
  1210.               turnon(msg[cnt].m_flags, OLD);
  1211. --- 936,942 ----
  1212.                   turnon(msg[cnt].m_flags,
  1213.                   M_PRIORITY(upper(*p) - 'A' + 1));
  1214.               }
  1215. !             } else if (get_status &&
  1216.                   !(get_status = strncmp(p, "Status:", 7))) {
  1217.               /* new mail should not have a Status: field! */
  1218.               turnon(msg[cnt].m_flags, OLD);
  1219. *** 7.2.4/mush.h    Sun Feb  2 13:50:50 1992
  1220. --- 7.2.5/mush.h    Sun Sep 20 14:12:32 1992
  1221. ***************
  1222. *** 30,36 ****
  1223.   
  1224.   #else /* CURSES */
  1225.   #include <stdio.h>
  1226. ! #if defined(SYSV) && defined(USG)
  1227.   #include <termio.h>
  1228.   #endif /* SYSV && USG */
  1229.   #endif /* CURSES */
  1230. --- 30,36 ----
  1231.   
  1232.   #else /* CURSES */
  1233.   #include <stdio.h>
  1234. ! #if defined(SYSV) && defined(USG) || defined(AIX)
  1235.   #include <termio.h>
  1236.   #endif /* SYSV && USG */
  1237.   #endif /* CURSES */
  1238. ***************
  1239. *** 166,172 ****
  1240.   #endif /* TIOCSETN */
  1241.   
  1242.   /* for system-V machines that run termio */
  1243. ! #if defined(SYSV) && defined(USG)
  1244.   #ifdef crmode
  1245.   #undef crmode
  1246.   #undef nocrmode
  1247. --- 166,172 ----
  1248.   #endif /* TIOCSETN */
  1249.   
  1250.   /* for system-V machines that run termio */
  1251. ! #if defined(SYSV) && defined(USG) || defined(AIX)
  1252.   #ifdef crmode
  1253.   #undef crmode
  1254.   #undef nocrmode
  1255. ***************
  1256. *** 209,217 ****
  1257.   #define crmode()   ((iscurses) ? cbreak() : cbrkon())
  1258.   #define nocrmode() ((iscurses) ? nocbreak() : cbrkoff())
  1259.   #endif /* CURSES */
  1260. ! #endif /* SYSV && USG */
  1261.   
  1262. ! #if !defined(USG)
  1263.   #ifndef CURSES
  1264.   /* if curses is not defined, simulate the same tty based macros */
  1265.   typedef struct sgttyb SGTTY;
  1266. --- 209,217 ----
  1267.   #define crmode()   ((iscurses) ? cbreak() : cbrkon())
  1268.   #define nocrmode() ((iscurses) ? nocbreak() : cbrkoff())
  1269.   #endif /* CURSES */
  1270. ! #endif /* SYSV && USG || AIX */
  1271.   
  1272. ! #if !defined(USG) && !defined(AIX)
  1273.   #ifndef CURSES
  1274.   /* if curses is not defined, simulate the same tty based macros */
  1275.   typedef struct sgttyb SGTTY;
  1276. ***************
  1277. *** 368,374 ****
  1278.   #define skipdigits(n)     for(p += (n); isdigit(*p); ++p)
  1279.   #define ismsgnum(c)       (isdigit(c)||c=='.'||c=='^'||c=='$'||c=='*')
  1280.   #define skipmsglist(n)\
  1281. !     for(p += (n); ismsgnum(*p) || index(" \t,-{`}", *p); ++p)\
  1282.       if (*p != '`' || !p[1]) {;} else do ++p; while (*p && *p != '`')
  1283.   
  1284.   /* define a macro to declare unsigned-long bits */
  1285. --- 368,374 ----
  1286.   #define skipdigits(n)     for(p += (n); isdigit(*p); ++p)
  1287.   #define ismsgnum(c)       (isdigit(c)||c=='.'||c=='^'||c=='$'||c=='*')
  1288.   #define skipmsglist(n)\
  1289. !     for(p += (n); *p && (ismsgnum(*p) || index(" \t,-{`}", *p)); p += !!*p)\
  1290.       if (*p != '`' || !p[1]) {;} else do ++p; while (*p && *p != '`')
  1291.   
  1292.   /* define a macro to declare unsigned-long bits */
  1293. ***************
  1294. *** 430,441 ****
  1295.   #define REPLIED        ULBIT(17) /* Messages that have been replied to */
  1296.   #define NEW_SUBJECT    ULBIT(18) /* new subject regardless of $ask (mail -s) */
  1297.   #define SAVED        ULBIT(19) /* when message has been saved */
  1298. - #ifdef MSG_SEPARATOR
  1299.   #define NO_SEPARATOR    ULBIT(20) /* don't include message separator lines */
  1300. ! #endif /* MSG_SEPARATOR */
  1301.   
  1302. ! #define M_PRIORITY(n)    ULBIT(21+(n))
  1303. ! /* It is possible to reset MAX_PRIORITY to as high as 10 */
  1304.   #define MAX_PRIORITY    5
  1305.   
  1306.   #define    MAXMSGS_BITS    MAXMSGS/sizeof(char)    /* number of bits for bitmap */
  1307. --- 430,440 ----
  1308.   #define REPLIED        ULBIT(17) /* Messages that have been replied to */
  1309.   #define NEW_SUBJECT    ULBIT(18) /* new subject regardless of $ask (mail -s) */
  1310.   #define SAVED        ULBIT(19) /* when message has been saved */
  1311.   #define NO_SEPARATOR    ULBIT(20) /* don't include message separator lines */
  1312. ! #define METAMAIL    ULBIT(21) /* message can display with "metamail" */
  1313.   
  1314. ! #define M_PRIORITY(n)    ULBIT(22+(n))
  1315. ! /* It is possible to reset MAX_PRIORITY to as high as 9 */
  1316.   #define MAX_PRIORITY    5
  1317.   
  1318.   #define    MAXMSGS_BITS    MAXMSGS/sizeof(char)    /* number of bits for bitmap */
  1319. ***************
  1320. *** 590,598 ****
  1321.   #ifdef TIOCGLTC
  1322.   struct ltchars ltchars;            /* tty character settings */
  1323.   #endif /* TIOCGLTC */
  1324. ! #ifdef BSD /* (TIOCGETC) */
  1325.   struct tchars  tchars;            /* more tty character settings */
  1326. ! #endif /* BSD (TIOCGETC) */
  1327.   
  1328.   #ifdef CURSES
  1329.   
  1330. --- 589,597 ----
  1331.   #ifdef TIOCGLTC
  1332.   struct ltchars ltchars;            /* tty character settings */
  1333.   #endif /* TIOCGLTC */
  1334. ! #if defined(BSD) && !defined(AIX) /* (TIOCGETC) */
  1335.   struct tchars  tchars;            /* more tty character settings */
  1336. ! #endif /* BSD && !AIX (TIOCGETC) */
  1337.   
  1338.   #ifdef CURSES
  1339.   
  1340. ***************
  1341. *** 610,615 ****
  1342. --- 609,627 ----
  1343.   void
  1344.       mac_flush();    /* Abandon macro processing (on error) */
  1345.   
  1346. + #if defined(SUNTOOL) || defined(POP3_SUPPORT)
  1347. + #ifdef POP3_SUPPORT
  1348. + #define MIN_TIME_OUT    (15 * 60)    /* 15 min. checks */
  1349. + extern void popchkmail();
  1350. + extern void popgetmail();
  1351. + #else
  1352. + #define MIN_TIME_OUT    30        /* 30 sec. checks */
  1353. + #endif /* POP3_SUPPORT */
  1354. + 
  1355. + int
  1356. +     time_out;        /* time out interval to wait for new mail */
  1357. + #endif /* SUNTOOL || POP3_SUPPORT */
  1358. + 
  1359.   #ifdef SUNTOOL
  1360.   void
  1361.       timeout_cursors(), do_file_dir(), toggle_mail_items(), ok_box(),
  1362. ***************
  1363. *** 624,630 ****
  1364.       blank[128];        /* use to clear to end of line */
  1365.   
  1366.   int
  1367. -     time_out,        /* time out interval to wait for new mail */
  1368.       is_iconic;        /* set if the mushview window is iconic. */
  1369.   
  1370.   Notify_value
  1371. --- 636,641 ----
  1372. *** 7.2.4/options.c    Thu May  3 12:40:56 1990
  1373. --- 7.2.5/options.c    Thu Oct  1 13:11:42 1992
  1374. ***************
  1375. *** 91,100 ****
  1376.           fix_word_flag(&args[0]);
  1377.   DoNext:
  1378.           switch (args[0][next]) {
  1379. ! #ifdef SUNTOOL
  1380.           case 'T' :
  1381.               if (args[1])
  1382.               args++;
  1383.           case 't' :
  1384.               /* Note: we won't ever get here if started as
  1385.                * "mushtool" or "mushview" because istool is true.
  1386. --- 91,104 ----
  1387.           fix_word_flag(&args[0]);
  1388.   DoNext:
  1389.           switch (args[0][next]) {
  1390. ! #if defined(SUNTOOL) || defined(POP3_SUPPORT)
  1391.           case 'T' :
  1392.               if (args[1])
  1393.               args++;
  1394. + #ifdef POP3_SUPPORT
  1395. +             break;
  1396. + #endif /* POP3_SUPPORT */
  1397. + #ifdef SUNTOOL
  1398.           case 't' :
  1399.               /* Note: we won't ever get here if started as
  1400.                * "mushtool" or "mushview" because istool is true.
  1401. ***************
  1402. *** 105,110 ****
  1403. --- 109,115 ----
  1404.               return TRUE;
  1405.               /* break; */
  1406.   #endif /* SUNTOOL */
  1407. + #endif /* SUNTOOL || POP3_SUPPORT */
  1408.           case 'S' :
  1409.               turnon(glob_flags, DO_SHELL);
  1410.               n = TRUE;
  1411. ***************
  1412. *** 301,314 ****
  1413.           turnon(flags->flg, VERBOSE);
  1414.           break;
  1415.   #endif /* VERBOSE_ARG */
  1416. ! #ifdef SUNTOOL
  1417.           case 'T':
  1418. !         if ((time_out = atoi(*(*argvp))) <= 29)
  1419. !             time_out = 30;
  1420.           look_again = FALSE;
  1421.           /* -T implies -t */
  1422.           case 't': istool = 1;
  1423.   #endif /* SUNTOOL */
  1424.           case 'S': turnon(glob_flags, DO_SHELL);
  1425.           when 'n':
  1426.           if ((*argvp)[0][2] == '!') {
  1427. --- 306,324 ----
  1428.           turnon(flags->flg, VERBOSE);
  1429.           break;
  1430.   #endif /* VERBOSE_ARG */
  1431. ! #if defined(SUNTOOL) || defined(POP3_SUPPORT)
  1432.           case 'T':
  1433. !         if ((time_out = atoi(*(*argvp))) < MIN_TIME_OUT)
  1434. !             time_out = MIN_TIME_OUT;
  1435.           look_again = FALSE;
  1436. + #ifdef POP3_SUPPORT
  1437. +         break;
  1438. + #endif /* POP3_SUPPORT */
  1439. + #ifdef SUNTOOL
  1440.           /* -T implies -t */
  1441.           case 't': istool = 1;
  1442.   #endif /* SUNTOOL */
  1443. + #endif /* SUNTOOL || POP3_SUPPORT */
  1444.           case 'S': turnon(glob_flags, DO_SHELL);
  1445.           when 'n':
  1446.           if ((*argvp)[0][2] == '!') {
  1447. *** 7.2.4/pick.c    Wed Nov 20 23:42:33 1991
  1448. --- 7.2.5/pick.c    Mon Sep  7 09:56:57 1992
  1449. ***************
  1450. *** 74,80 ****
  1451.       head_cnt = tail_cnt = -1;
  1452.       match_priority = 0;
  1453.       icase = before = after = search_from = search_subj = search_to = xflg = 0;
  1454. !     mdy[0] = mdy[1] = search_hdr[0] = 0;
  1455.       while (*argv && *++argv && (**argv == '-' || **argv == '+'))
  1456.       if (**argv == '+' || isdigit(argv[0][1])) {
  1457.           if (**argv == '+')
  1458. --- 74,80 ----
  1459.       head_cnt = tail_cnt = -1;
  1460.       match_priority = 0;
  1461.       icase = before = after = search_from = search_subj = search_to = xflg = 0;
  1462. !     pattern[0] = mdy[0] = mdy[1] = search_hdr[0] = 0;
  1463.       while (*argv && *++argv && (**argv == '-' || **argv == '+'))
  1464.       if (**argv == '+' || isdigit(argv[0][1])) {
  1465.           if (**argv == '+')
  1466. ***************
  1467. *** 166,172 ****
  1468.       return -1;
  1469.       }
  1470.       if (!mdy[1]) {
  1471. -     pattern[0] = 0;
  1472.       (void) argv_to_string(pattern, argv);
  1473.       if (pattern[0] == '\0' && match_priority == 0 &&
  1474.           head_cnt + tail_cnt < 0) {
  1475. --- 166,171 ----
  1476. *** 7.2.4/setopts.c    Thu Nov 21 10:06:23 1991
  1477. --- 7.2.5/setopts.c    Wed Oct 14 00:03:24 1992
  1478. ***************
  1479. *** 604,609 ****
  1480. --- 604,690 ----
  1481.       return 0;
  1482.   }
  1483.   
  1484. + char *
  1485. + quoteit(str, in_quotes, fix_vars)
  1486. + char *str;
  1487. + int in_quotes;    /* Type of quote the string is in, if any */
  1488. + int fix_vars;    /* Variables will be expanded, so quote $ */
  1489. + {
  1490. + #define other_quote(x) ((x == '"')? '\'' : '"')
  1491. +     static char *buf;
  1492. +     static int bufsiz;
  1493. +     char *s = str, *d;
  1494. +     int len = str? strlen(str) : 0, was_magic = FALSE;
  1495. + 
  1496. +     if (!len)
  1497. +     return str;
  1498. +     if (bufsiz < 2 * len) {
  1499. +     xfree(buf);
  1500. +     buf = malloc(bufsiz = 2 * len);
  1501. +     }
  1502. +     if (!buf)
  1503. +     return NULL;
  1504. +     for (d = buf; *d = *s; d++, s++) {
  1505. +     if ((*s == '\'' || *s == '"') &&
  1506. +         (was_magic || in_quotes != other_quote(*s))) {
  1507. +         if (was_magic) {
  1508. +         if (*s == '\'')
  1509. +             continue;
  1510. +         /* else '"' */
  1511. +         ++d;
  1512. +         was_magic = FALSE;
  1513. +         }
  1514. +         if (in_quotes == *s)
  1515. +         *d++ = *s;
  1516. +         *d = other_quote(*s);
  1517. +         *++d = *s;
  1518. +         *++d = other_quote(*s);
  1519. +         if (in_quotes == *s)
  1520. +         *++d = *s;
  1521. +     } else if (*s == '$' && fix_vars && (was_magic || in_quotes != '\'')) {
  1522. +        if (was_magic || in_quotes == '"') {
  1523. +         *d++ = '"';
  1524. +         was_magic = FALSE;
  1525. +         }
  1526. +         *d = '\'';
  1527. +         *++d = *s;
  1528. +         *++d = '\'';
  1529. +         if (in_quotes == '"')
  1530. +         *++d = in_quotes;
  1531. +     } else if (fix_vars && isspace(*s)) {
  1532. +         /* backslash-newline may get stripped when fix_vars */
  1533. +         if (*s == '\n' || *s == '\r') {
  1534. +         *d = '\\';
  1535. +         *++d = *s;
  1536. +         *++d = ' ';    /* XXX not perfect, but ... */
  1537. +         } else if (!was_magic && !in_quotes) {
  1538. +         *d = '"';
  1539. +         *++d = *s;
  1540. +         was_magic = TRUE;
  1541. +         }
  1542. +     } else if (!in_quotes && index("#;|~", *s)) {
  1543. +         if (*s == '~' && !fix_vars) {
  1544. +         /* !fix_vars implies !fix_tildes */
  1545. +         if (was_magic) {
  1546. +             *d = '"';
  1547. +             *++d = *s;
  1548. +             was_magic = FALSE;
  1549. +         }
  1550. +         } else if (!was_magic && (s == str || *s != '~')) {
  1551. +         *d = '"';
  1552. +         *++d = *s;
  1553. +         was_magic = TRUE;
  1554. +         }
  1555. +     }
  1556. +     }
  1557. +     if (was_magic) {
  1558. +     *d = '"';
  1559. +     *++d = '\0';
  1560. +     }
  1561. +     return buf;
  1562. + #undef other_quote
  1563. + }
  1564. + 
  1565.   save_list(title, list, command, equals, fp)
  1566.   struct options *list;
  1567.   register char *command, *title, equals;
  1568. ***************
  1569. *** 634,640 ****
  1570.           else
  1571.               quote = "'";
  1572.           (void) fputc(equals? equals: ' ', fp);
  1573. !         (void) fprintf(fp, "%s%s%s", quote, opts->value, quote);
  1574.       }
  1575.       (void) fputc('\n', fp);
  1576.       }
  1577. --- 715,724 ----
  1578.           else
  1579.               quote = "'";
  1580.           (void) fputc(equals? equals: ' ', fp);
  1581. !         (void) fprintf(fp, "%s%s%s",
  1582. !                 quote,
  1583. !                 quoteit(opts->value, quote, TRUE),
  1584. !                 quote);
  1585.       }
  1586.       (void) fputc('\n', fp);
  1587.       }
  1588. ***************
  1589. *** 661,668 ****
  1590.           quote = "\"";
  1591.       else
  1592.           quote = "'";
  1593. !     (void) fprintf(fp, "%s %s%s%s", command, quote,
  1594. !             ctrl_strcpy(buf, opts->m_str, TRUE), quote);
  1595.       if (equals && map_func_names[opts->m_cmd].m_str)
  1596.           (void) fprintf(fp, " %s", map_func_names[opts->m_cmd].m_str);
  1597.       if (opts->x_str && *opts->x_str) {
  1598. --- 745,754 ----
  1599.           quote = "\"";
  1600.       else
  1601.           quote = "'";
  1602. !     (void) fprintf(fp, "%s %s%s%s", command,
  1603. !             quote,
  1604. !             quoteit(ctrl_strcpy(buf, opts->m_str, TRUE), quote, TRUE),
  1605. !             quote);
  1606.       if (equals && map_func_names[opts->m_cmd].m_str)
  1607.           (void) fprintf(fp, " %s", map_func_names[opts->m_cmd].m_str);
  1608.       if (opts->x_str && *opts->x_str) {
  1609. ***************
  1610. *** 670,677 ****
  1611.           quote = "\"";
  1612.           else
  1613.           quote = "'";
  1614. !         (void) fprintf(fp, " %s%s%s", quote,
  1615. !             ctrl_strcpy(buf, opts->x_str, TRUE), quote);
  1616.       }
  1617.       (void) fputc('\n', fp);
  1618.       }
  1619. --- 756,765 ----
  1620.           quote = "\"";
  1621.           else
  1622.           quote = "'";
  1623. !         (void) fprintf(fp, " %s%s%s",
  1624. !             quote,
  1625. !             quoteit(ctrl_strcpy(buf, opts->x_str, TRUE), quote, TRUE),
  1626. !             quote);
  1627.       }
  1628.       (void) fputc('\n', fp);
  1629.       }
  1630. *** 7.2.4/signals.c    Sun Feb  2 14:07:38 1992
  1631. --- 7.2.5/signals.c    Sat Aug 22 11:46:50 1992
  1632. ***************
  1633. *** 418,424 ****
  1634.    */
  1635.   check_new_mail()
  1636.   {
  1637. !     int        ret_value;
  1638.   
  1639.       if (ret_value = mail_size()) {
  1640.   #ifdef SUNTOOL
  1641. --- 418,435 ----
  1642.    */
  1643.   check_new_mail()
  1644.   {
  1645. !     int ret_value;
  1646. ! #ifdef POP3_SUPPORT
  1647. !     static long last_check = -1;  /* We checked at startup */
  1648. ! 
  1649. !     if (last_check < 0)
  1650. !     last_check = time((long *)0);
  1651. !     
  1652. !     if (istool || time((long *)0) - last_check > time_out) {
  1653. !     popchkmail();
  1654. !     last_check = time((long *)0);
  1655. !     }
  1656. ! #endif /* POP3_SUPPORT */
  1657.   
  1658.       if (ret_value = mail_size()) {
  1659.   #ifdef SUNTOOL
  1660.  
  1661. -- 
  1662. Bart Schaefer                                     schaefer@zigzag.z-code.com
  1663. Z-Code Software Corp.                             schaefer@z-code.com
  1664.  
  1665. exit 0 # Just in case...
  1666.