home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume15 / mush6.2.pch / Diffs-6.2 next >
Text File  |  1988-05-22  |  39KB  |  1,307 lines
  1. *** OLD/cmd_help    Wed Mar  2 12:05:28 1988
  2. --- cmd_help    Wed May 11 14:06:12 1988
  3. ***************
  4. *** 174,193 ****
  5.   %%
  6.   
  7.   %pick%
  8. ! use: pick [-r msg_list] [-d [-][date] ] [-s|f|t]] [-x] [-i] [-h hdr] [<pat>]
  9.   Search for patterns within messages. Entire messages are searched
  10.   for <pattern> unless -s, -f, -t, or -h is specified.
  11. ! Only one of -s, -f, -t, -d and -h can be specified at once.
  12.   -r msg_list  restrict the range of messages search to msg_list
  13. - -d: print message headers on or after [`-' before] `date' (no patterns).
  14.   -h hdr   requires a header to be searched for.  Pattern searched in that hdr.
  15. !      `date' is of the form: month/date/year
  16.         Omitted fields default to today's values. Examples:
  17. !       pick -d 4/20     msgs on or after Apr 20, this year
  18.         pick -d -/2/85   on or before the 2nd, this month, 1985
  19. !       pick -d /        finds today's messages only.
  20.       At least one `/' char must be used in date.
  21.       There is no strong date checking; 2/30 would be considered valid
  22.   -s search for pattern in the "subject" headers only.
  23.   -f search for pattern in the "from" field (author) only.
  24.   -t search for pattern in the "to" field.
  25. --- 174,196 ----
  26.   %%
  27.   
  28.   %pick%
  29. ! use: pick [-r msg_list] [-d [-][date] ] [-s|f|t]] [-x] [-i]
  30. !       [-h hdr] [-ago [n days] [n weeks] [n months] ] [<pat>]
  31.   Search for patterns within messages. Entire messages are searched
  32.   for <pattern> unless -s, -f, -t, or -h is specified.
  33. ! Only one of -s, -f, -t, -d, -ago and -h can be specified at once.
  34.   -r msg_list  restrict the range of messages search to msg_list
  35.   -h hdr   requires a header to be searched for.  Pattern searched in that hdr.
  36. ! -d: print headers on or [+ after] [- before] `date' (no pattern search).
  37. !      `date' is of the form: [+-] [month]/[date/year]
  38.         Omitted fields default to today's values. Examples:
  39. !       pick -d 4/20     messages on Apr 20, this year
  40.         pick -d -/2/85   on or before the 2nd, this month, 1985
  41. !       pick -d +5/4     on or after May 4, this year
  42. !       pick -d /        finds today's messages only
  43.       At least one `/' char must be used in date.
  44.       There is no strong date checking; 2/30 would be considered valid
  45. + -ago search for messages relative to the current date (see manual).
  46.   -s search for pattern in the "subject" headers only.
  47.   -f search for pattern in the "from" field (author) only.
  48.   -t search for pattern in the "to" field.
  49. *** OLD/commands.c    Thu May 12 13:51:57 1988
  50. --- commands.c    Wed May 11 21:47:30 1988
  51. ***************
  52. *** 752,758 ****
  53.   {
  54.       char **e;
  55.       for (e = environ; *e; e++)
  56. !     if (argc < 1 || !strncmp(*e, argv[1]))
  57.           wprint("%s\n", *e);
  58.       return -1;
  59.   }
  60. --- 752,758 ----
  61.   {
  62.       char **e;
  63.       for (e = environ; *e; e++)
  64. !     if (argc < 2 || !strncmp(*e, argv[1]))
  65.           wprint("%s\n", *e);
  66.       return -1;
  67.   }
  68. *** OLD/curs_io.c    Mon Mar  7 14:57:23 1988
  69. --- curs_io.c    Wed May 11 20:38:32 1988
  70. ***************
  71. *** 135,140 ****
  72. --- 135,141 ----
  73.           Addch(c);
  74.       }
  75.       }
  76. +     fflush(stdout); /* for sys-v folks */
  77.       if (c == CTRL(D) || c == EOF || ison(glob_flags, WAS_INTR)) {
  78.       if (feof(stdin))
  79.           clearerr(stdin);
  80. *** OLD/curses.c    Thu May 12 13:52:00 1988
  81. --- curses.c    Wed May 11 10:39:41 1988
  82. ***************
  83. *** 718,724 ****
  84.       int n;
  85.   
  86.       for (n = 0; n < COLS; n++)
  87. !     if ((buf = mvinch(curline, n) & A_CHARTEXT) == '\0')
  88.           break;
  89.       buf[n] = '\0';
  90.   #endif /* A_CHARTEXT */
  91. --- 718,724 ----
  92.       int n;
  93.   
  94.       for (n = 0; n < COLS; n++)
  95. !     if ((buf = mvinch(line, n) & A_CHARTEXT) == '\0')
  96.           break;
  97.       buf[n] = '\0';
  98.   #endif /* A_CHARTEXT */
  99. *** OLD/execute.c    Sat Apr  2 16:14:19 1988
  100. --- execute.c    Wed May 11 16:17:13 1988
  101. ***************
  102. *** 68,74 ****
  103.        * if other forks die (sendmail), then this wait will catch them,
  104.        * This loop will really get -1, cuz sigchldcatcher will catch all else.
  105.        */
  106. !     while ((pid = wait(&status) != -1) && pid != exec_pid)
  107.       Debug("The exec loop caught a signal? (pid = %d)\n", pid);
  108.       /* reset our ttymodes */
  109.       echo_off();
  110. --- 68,74 ----
  111.        * if other forks die (sendmail), then this wait will catch them,
  112.        * This loop will really get -1, cuz sigchldcatcher will catch all else.
  113.        */
  114. !     while ((pid = wait(&status)) != -1 && pid != exec_pid)
  115.       Debug("The exec loop caught a signal? (pid = %d)\n", pid);
  116.       /* reset our ttymodes */
  117.       echo_off();
  118. *** OLD/help.c    Mon Dec  7 18:37:47 1987
  119. --- help.c    Wed May 11 16:08:07 1988
  120. ***************
  121. *** 72,77 ****
  122. --- 72,79 ----
  123.   #include <sys/types.h>
  124.   #define wprint printf
  125.   #define print  printf
  126. + #define TRUE   1
  127. + #define FALSE  0
  128.   
  129.   #endif /* SUNTOOL */
  130.   
  131. ***************
  132. *** 311,320 ****
  133.       if (height == MAXLINES - 1)
  134.       print("Help message is too long!\n");
  135.   
  136.       for (n = 0; n < height; n++) {
  137.       (void) no_newln(args[n]);
  138. !     wprint("%s\n", args[n]);
  139.       }
  140.   
  141.       return 0;
  142.   }
  143. --- 313,326 ----
  144.       if (height == MAXLINES - 1)
  145.       print("Help message is too long!\n");
  146.   
  147. +     do_pager(NULL, TRUE);
  148.       for (n = 0; n < height; n++) {
  149.       (void) no_newln(args[n]);
  150. !     (void) do_pager(args[n], FALSE);
  151. !     if (do_pager("\n", FALSE) == EOF)
  152. !         break;
  153.       }
  154. +     do_pager(NULL, FALSE);
  155.   
  156.       return 0;
  157.   }
  158. *** OLD/loop.c    Thu May 12 13:52:05 1988
  159. --- loop.c    Wed May 11 21:31:42 1988
  160. ***************
  161. *** 106,112 ****
  162.       if (Getstr(line, sizeof(line), 0) > -1)
  163.           p = line;
  164.       else {
  165. !         if (p = do_set(set_options, "ignoreeof")) {
  166.           if (!*p)
  167.               continue;
  168.           else
  169. --- 106,112 ----
  170.       if (Getstr(line, sizeof(line), 0) > -1)
  171.           p = line;
  172.       else {
  173. !         if (isatty(0) && (p = do_set(set_options, "ignoreeof"))) {
  174.           if (!*p)
  175.               continue;
  176.           else
  177. *** OLD/mail.c    Sat May 21 10:53:59 1988
  178. --- mail.c    Sat May 21 10:56:08 1988
  179. ***************
  180. *** 10,17 ****
  181.    *    mail_someone()    called from do_mail() or from the shell.
  182.    *    add_to_letter()    adds the next line to letter --determine ~ escapes.
  183.    *    finish_up_letter()  prompts for Cc:, verifies user really wants to send
  184. !  *    send_it()        invokes mailer, sends to record file, adds signature,
  185. !  *            fortune, expands aliases, adds own_hdrs.
  186.    *    rm_edfile()    signals are directed here. remove letter, longjmp
  187.    *
  188.    * The flow of control in this file is NOT obvious to allow for both text
  189. --- 10,18 ----
  190.    *    mail_someone()    called from do_mail() or from the shell.
  191.    *    add_to_letter()    adds the next line to letter --determine ~ escapes.
  192.    *    finish_up_letter()  prompts for Cc:, verifies user really wants to send
  193. !  *    send_it()        invokes mailer, sends to record file, expands aliases,
  194. !  *            adds own_hdrs.
  195. !  *    sign_letter()    adds signature and fortunes.
  196.    *    rm_edfile()    signals are directed here. remove letter, longjmp
  197.    *
  198.    * The flow of control in this file is NOT obvious to allow for both text
  199. ***************
  200. *** 283,296 ****
  201.   start_file(list)
  202.   char *list;
  203.   {
  204. !     register char  *home;
  205.       register int   i;
  206.       char         line[MAXPATHLEN];
  207.   
  208. !     if (!(home = do_set(set_options, "home")) || !*home)
  209.   alted:
  210. !     home = ALTERNATE_HOME;
  211. !     (void) mktemp(sprintf(line, "%s/%s", home, EDFILE));
  212.       strdup(edfile, line);
  213.       {
  214.       int omask = umask(077);
  215. --- 284,298 ----
  216.   start_file(list)
  217.   char *list;
  218.   {
  219. !     register char  *dir;
  220.       register int   i;
  221.       char         line[MAXPATHLEN];
  222.   
  223. !     if (!(dir = do_set(set_options, "tmpdir")) &&
  224. !     !(dir = do_set(set_options, "home")))
  225.   alted:
  226. !     dir = ALTERNATE_HOME;
  227. !     (void) mktemp(sprintf(line, "%s/%s", dir, EDFILE));
  228.       strdup(edfile, line);
  229.       {
  230.       int omask = umask(077);
  231. ***************
  232. *** 297,303 ****
  233.       ed_fp = fopen(edfile, "w+");
  234.       (void) umask(omask);
  235.       if (!ed_fp) {
  236. !         if (home != ALTERNATE_HOME)
  237.           goto alted;
  238.   #ifdef SUNTOOL
  239.           if (istool)
  240. --- 299,305 ----
  241.       ed_fp = fopen(edfile, "w+");
  242.       (void) umask(omask);
  243.       if (!ed_fp) {
  244. !         if (dir != ALTERNATE_HOME)
  245.           goto alted;
  246.   #ifdef SUNTOOL
  247.           if (istool)
  248. ***************
  249. *** 407,415 ****
  250.        * be cleared cuz it's a new call.
  251.        */
  252.       (void) setjmp(cntrl_c_buf);
  253. !     while (Getstr(line, sizeof(line), 0) > -1)
  254.           if ((i = add_to_letter(line)) <= 0)
  255.           break;
  256.       } while (i >= 0 && !finish_up_letter());
  257.       return i; /* return -1 if ~x or ~q to terminate letter */
  258.   }
  259. --- 409,419 ----
  260.        * be cleared cuz it's a new call.
  261.        */
  262.       (void) setjmp(cntrl_c_buf);
  263. !     while (Getstr(line, sizeof(line), 0) > -1) {
  264. !         (void) check_new_mail(); /* if new mail comes in, get it */
  265.           if ((i = add_to_letter(line)) <= 0)
  266.           break;
  267. +     }
  268.       } while (i >= 0 && !finish_up_letter());
  269.       return i; /* return -1 if ~x or ~q to terminate letter */
  270.   }
  271. ***************
  272. *** 513,519 ****
  273.           if (!*p || *p == 'i' && !p[1])
  274.           switch (line[1]) {
  275.               case 'p' :
  276. !             if (!(p = do_set(set_options, "pager")))
  277.                   p = DEF_PAGER;
  278.               if (!*p || !strcmp(p, "internal"))
  279.                   p = NULL;
  280. --- 517,523 ----
  281.           if (!*p || *p == 'i' && !p[1])
  282.           switch (line[1]) {
  283.               case 'p' :
  284. !             if (!*p && !(p = do_set(set_options, "pager")))
  285.                   p = DEF_PAGER;
  286.               if (!*p || !strcmp(p, "internal"))
  287.                   p = NULL;
  288. ***************
  289. *** 1043,1049 ****
  290.       /* Sign the letter before adding the Bcc list since they aren't
  291.        * considered when adding a signature.
  292.        */
  293. !     if (ison(flags, SIGN) && isoff(glob_flags, REDIRECT))
  294.       sign_letter(addr_list);
  295.   
  296.       if (*Bcc) {
  297. --- 1047,1054 ----
  298.       /* Sign the letter before adding the Bcc list since they aren't
  299.        * considered when adding a signature.
  300.        */
  301. !     if ((ison(flags, SIGN) || ison(flags, FORTUNE)) &&
  302. !     isoff(glob_flags, REDIRECT) && isoff(flags, FORWARD))
  303.       sign_letter(addr_list);
  304.   
  305.       if (*Bcc) {
  306. ***************
  307. *** 1351,1357 ****
  308.   register char *list; /* list of addresses -- no comment fields */
  309.   {
  310.       char buf[BUFSIZ];
  311. !     register char *p, *p2, *signature, *addr;
  312.       FILE     *pp2;
  313.       int     lines = 0;
  314.   
  315. --- 1356,1362 ----
  316.   register char *list; /* list of addresses -- no comment fields */
  317.   {
  318.       char buf[BUFSIZ];
  319. !     register char *p = NULL, *p2, *signature, *addr;
  320.       FILE     *pp2;
  321.       int     lines = 0;
  322.   
  323. ***************
  324. *** 1358,1424 ****
  325.       buf[0] = 0;
  326.       while (isspace(*list))
  327.       list++;
  328. !     if (p = do_set(set_options, "autosign2")) {
  329. !     if (!(signature = index(p, ':')))
  330. !         wprint("\"autosign2\" incorrectly set (missing `:').\n");
  331. !     else {
  332. !         int ret_val = 0;
  333. !         *signature = 0;
  334. !         /* p now points to a list of addresses and p2 points to the
  335. !          * signature format to use. Check that each address contains
  336. !          * the stuff in alternate sign.
  337. !          */
  338. !         skipspaces(0);
  339. !         if (!*p)
  340. !         /* autosign2 = " : <signature>"  send to all recipients */
  341. !         ret_val = 1;
  342. !         else if (p = alias_to_address(p)) {
  343. !         rm_cmts_in_addr(p);
  344. !         for (addr = list;;) {
  345. !             char c;
  346. !             if (p2 = any(addr, ", ")) {
  347. !             c = *p2;
  348. !             *p2 = 0;
  349.               }
  350. -             ret_val = chk_two_lists(addr, p, ", ");
  351. -             if (p2)
  352. -             for (*p2++ = c; isspace(*p2) || *p2 == ','; p2++)
  353. -                 ;
  354. -             if (!ret_val || !(addr = p2))
  355. -             break;
  356.           }
  357.           }
  358. -         *signature++ = ':'; /* must reset first! */
  359. -         if (ret_val) {
  360. -         while (isspace(*signature))
  361. -             signature++;
  362. -         if (!*strcpy(buf, signature))
  363. -             return;
  364. -         }
  365.       }
  366. !     }
  367. !     if (!buf[0]) {
  368. !     if (!(p = do_set(set_options, "autosign")) || !*p) {
  369. !         char *home;
  370. !         if (!(home = do_set(set_options, "home")) || !*home)
  371. !         home = ALTERNATE_HOME;
  372. !         (void) sprintf(buf, "%s/%s", home, SIGNATURE);
  373.       } else
  374. !         (void) strcpy(buf, p);
  375. !     wprint("Signing letter... ");
  376. !     } else
  377. !     wprint("Using alternate signature... ");
  378. !     fputc('\n', ed_fp), fflush(ed_fp);
  379. !     (void) fseek(ed_fp, 0L, 2); /* guarantee position at end of file */
  380. !     if (*buf == '$')
  381. !     if (!(p = do_set(set_options, buf)))
  382. !         wprint("(%s isn't set -- letter not signed)\n", buf);
  383.       else
  384. !         fprintf(ed_fp, "%s\n", p), wprint("\n"), fflush(ed_fp);
  385. !     else if (*buf == '\\')
  386. !     fprintf(ed_fp, "%s\n", buf+1), wprint("\n"), fflush(ed_fp);
  387. !     else
  388. !     file_to_fp(buf, ed_fp, "r");
  389.   
  390.       /* if fortune is set, check to see if fortunates is set. If so,
  391.        * check to see if all the recipient are on the fortunates list.
  392. --- 1363,1431 ----
  393.       buf[0] = 0;
  394.       while (isspace(*list))
  395.       list++;
  396. !     if (ison(flags, SIGN)) {
  397. !     if (p = do_set(set_options, "autosign2")) {
  398. !         if (!(signature = index(p, ':')))
  399. !         (void) strcpy(buf, p); /* No colon; use entire string as sig */
  400. !         else {
  401. !         int ret_val = 0;
  402. !         *signature = 0;
  403. !         /* p now points to a list of addresses and p2 points to the
  404. !          * signature format to use. Check that each address contains
  405. !          * the stuff in alternate sign.
  406. !          */
  407. !         skipspaces(0);
  408. !         if (!*p)
  409. !             /* autosign2 = " : <signature>"  send to all recipients */
  410. !             ret_val = 1;
  411. !         else if (p = alias_to_address(p)) {
  412. !             rm_cmts_in_addr(p);
  413. !             for (addr = list;;) {
  414. !             char c;
  415. !             if (p2 = any(addr, ", ")) {
  416. !                 c = *p2;
  417. !                 *p2 = 0;
  418. !             }
  419. !             ret_val = chk_two_lists(addr, p, ", ");
  420. !             if (p2)
  421. !                 for (*p2++ = c; isspace(*p2) || *p2 == ','; p2++)
  422. !                 ;
  423. !             if (!ret_val || !(addr = p2))
  424. !                 break;
  425.               }
  426.           }
  427. +         *signature++ = ':'; /* must reset first! */
  428. +         if (ret_val) {
  429. +             while (isspace(*signature))
  430. +             signature++;
  431. +             if (!*strcpy(buf, signature))
  432. +             return;
  433. +         }
  434.           }
  435.       }
  436. !     if (!buf[0]) {
  437. !         if (!(p = do_set(set_options, "autosign")) || !*p) {
  438. !         char *home;
  439. !         if (!(home = do_set(set_options, "home")) || !*home)
  440. !             home = ALTERNATE_HOME;
  441. !         (void) sprintf(buf, "%s/%s", home, SIGNATURE);
  442. !         } else
  443. !         (void) strcpy(buf, p);
  444. !         wprint("Signing letter... ");
  445.       } else
  446. !         wprint("Using alternate signature... ");
  447. !     fputs("\n-- \n", ed_fp), fflush(ed_fp);
  448. !     (void) fseek(ed_fp, 0L, 2); /* guarantee position at end of file */
  449. !     if (*buf == '$')
  450. !         if (!(p = do_set(set_options, buf)))
  451. !         wprint("(%s isn't set -- letter not signed)\n", buf);
  452. !         else
  453. !         fprintf(ed_fp, "%s\n", p), wprint("\n"), fflush(ed_fp);
  454. !     else if (*buf == '\\')
  455. !         fprintf(ed_fp, "%s\n", buf+1), wprint("\n"), fflush(ed_fp);
  456.       else
  457. !         file_to_fp(buf, ed_fp, "r");
  458. !     }
  459.   
  460.       /* if fortune is set, check to see if fortunates is set. If so,
  461.        * check to see if all the recipient are on the fortunates list.
  462. *** OLD/main.c    Thu Apr  7 22:47:31 1988
  463. --- main.c    Thu May 12 17:14:16 1988
  464. ***************
  465. *** 25,32 ****
  466.   char **argv;
  467.   {
  468.       u_long         flg = NO_FLG;
  469. !     int            n, source_rc = TRUE;
  470. !     char         f_flags[10], buf[256], *Cc = NULL, *Subj = NULL;
  471.       register char  *p;
  472.       char      **args;
  473.   
  474. --- 25,33 ----
  475.   char **argv;
  476.   {
  477.       u_long         flg = NO_FLG;
  478. !     int            n, source_rc = TRUE, src_n_exit;
  479. !     char         f_flags[10], buf[256];
  480. !     char       *Cc = NULL, *Subj = NULL, *src_file = NULL;
  481.       register char  *p;
  482.       char      **args;
  483.   
  484. ***************
  485. *** 93,98 ****
  486. --- 94,100 ----
  487.   #endif /* SUNTOOL */
  488.           case 'S' : turnon(glob_flags, DO_SHELL);
  489.           case 'f' :
  490. +         case 'F' :
  491.           case 'u' :
  492.               if (args[1])
  493.               args++;
  494. ***************
  495. *** 147,153 ****
  496.           else
  497.               turnon(glob_flags, PRE_CURSES);
  498.   #endif /* CURSES */
  499. !         when 'N':
  500.           (void) strcat(f_flags, "-N ");
  501.           when 'r':
  502.           (void) strcat(f_flags, "-r "); /* folder() argument */
  503. --- 149,160 ----
  504.           else
  505.               turnon(glob_flags, PRE_CURSES);
  506.   #endif /* CURSES */
  507. !         when 'F':
  508. !         src_n_exit = (argv[0][2] == '!');
  509. !         if (!(src_file = *++argv))
  510. !             puts("specify filename to source"), exit(1);
  511. !         /* fall thru! */
  512. !         case 'N':
  513.           (void) strcat(f_flags, "-N ");
  514.           when 'r':
  515.           (void) strcat(f_flags, "-r "); /* folder() argument */
  516. ***************
  517. *** 228,233 ****
  518. --- 235,241 ----
  519.       }
  520.   
  521.       if (source_rc) {
  522. +     /* use cmd_line() in case DEFAULT_RC has expandable chars */
  523.       (void) cmd_line(sprintf(buf, "source %s", DEFAULT_RC), msg_list);
  524.       (void) source(0, DUBL_NULL);
  525.       }
  526. ***************
  527. *** 322,328 ****
  528.       }
  529.   
  530.       /* find a free tmpfile */
  531. !     if (!(p = do_set(set_options, "home")) || !*p)
  532.   alted:
  533.       p = ALTERNATE_HOME;
  534.       flg = getpid();
  535. --- 330,337 ----
  536.       }
  537.   
  538.       /* find a free tmpfile */
  539. !     if (!(p = do_set(set_options, "tmpdir")) &&
  540. !     !(p = do_set(set_options, "home")))
  541.   alted:
  542.       p = ALTERNATE_HOME;
  543.       flg = getpid();
  544. ***************
  545. *** 348,354 ****
  546.       (void) signal(SIGQUIT, catch);
  547.       (void) signal(SIGHUP,  catch);
  548.   
  549. !     if (!hdrs_only && !istool && !do_set(set_options, "quiet"))
  550.       printf("%s: Type '?' for help.\n", VERSION);
  551.   
  552.       (void) sprintf(buf, "folder %s %s", f_flags, mailfile);
  553. --- 357,364 ----
  554.       (void) signal(SIGQUIT, catch);
  555.       (void) signal(SIGHUP,  catch);
  556.   
  557. !     if (!hdrs_only && !istool && (!src_file || !src_n_exit) &&
  558. !     !do_set(set_options, "quiet"))
  559.       printf("%s: Type '?' for help.\n", VERSION);
  560.   
  561.       (void) sprintf(buf, "folder %s %s", f_flags, mailfile);
  562. ***************
  563. *** 368,373 ****
  564. --- 378,392 ----
  565.       turnon(glob_flags, DO_SHELL);
  566.       if (istool && msg_cnt)
  567.       set_isread(current_msg);
  568. + 
  569. +     /* finally, if the user wanted to source a file to execute, do it now */
  570. +     if (src_file) {
  571. +     char *s_argv[2];
  572. +     s_argv[1] = src_file;
  573. +     (void) source(2, s_argv);
  574. +     if (!istool && src_n_exit)
  575. +         cleanup(0);
  576. +     }
  577.   
  578.   #ifdef SUNTOOL
  579.       if (istool) {
  580. *** OLD/makefile.bsd    Thu Apr  7 22:47:37 1988
  581. --- makefile.bsd    Wed May 11 15:53:44 1988
  582. ***************
  583. *** 7,13 ****
  584.   OBJS= main.o init.o misc.o mail.o hdrs.o execute.o commands.o print.o file.o \
  585.         signals.o aliases.o setopts.o msgs.o pick.o sort.o expr.o strings.o \
  586.         folders.o dates.o loop.o help.o viewopts.o curses.o curs_io.o bind.o
  587. ! HELP_FILES= README-6.0 README cmd_help mush.1
  588.   MAKES= makefile.bsd makefile.x286 makefile.x386 makefile.sys.v
  589.   
  590.   CFLAGS= -O -DCURSES -DBSD
  591. --- 7,15 ----
  592.   OBJS= main.o init.o misc.o mail.o hdrs.o execute.o commands.o print.o file.o \
  593.         signals.o aliases.o setopts.o msgs.o pick.o sort.o expr.o strings.o \
  594.         folders.o dates.o loop.o help.o viewopts.o curses.o curs_io.o bind.o
  595. ! 
  596. ! HELP_FILES= README README-6.0 README-6.1 README-6.2 mush.1 cmd_help
  597. ! 
  598.   MAKES= makefile.bsd makefile.x286 makefile.x386 makefile.sys.v
  599.   
  600.   CFLAGS= -O -DCURSES -DBSD
  601. *** OLD/makefile.sun    Thu Apr  7 22:47:40 1988
  602. --- makefile.sun    Wed May 11 15:53:25 1988
  603. ***************
  604. *** 17,23 ****
  605.   IMAGES= mail.icon.1 mail.icon.2 check.pr cycle.pr envelope.pr glasses.pr \
  606.       write.pr up.arrow.pr dn.arrow.pr coffee.cup.pr
  607.   
  608. ! HELP_FILES= README-6.0 README cmd_help tool_help mush.1
  609.   
  610.   MAKES= makefile.sun makefile.bsd makefile.sys.v makefile.x286 makefile.x386
  611.   
  612. --- 17,23 ----
  613.   IMAGES= mail.icon.1 mail.icon.2 check.pr cycle.pr envelope.pr glasses.pr \
  614.       write.pr up.arrow.pr dn.arrow.pr coffee.cup.pr
  615.   
  616. ! HELP_FILES= README README-6.0 README-6.1 README-6.2 mush.1 cmd_help tool_help
  617.   
  618.   MAKES= makefile.sun makefile.bsd makefile.sys.v makefile.x286 makefile.x386
  619.   
  620. *** OLD/makefile.x286    Tue Apr 12 22:00:18 1988
  621. --- makefile.x286    Wed May 11 15:54:23 1988
  622. ***************
  623. *** 10,16 ****
  624.   OBJS= main.o init.o misc.o mail.o hdrs.o execute.o commands.o print.o file.o \
  625.         signals.o aliases.o setopts.o msgs.o pick.o sort.o expr.o strings.o \
  626.         folders.o dates.o loop.o help.o viewopts.o bind.o curses.o curs_io.o
  627. ! DOCS= README cmd_help mush.1
  628.   MAKES= makefile.sys.v makefile.xenix makefile.bsd
  629.   
  630.   CFLAGS= -O -DSYSV -Mle -DCURSES -DREGCMP -DUSG
  631. --- 10,16 ----
  632.   OBJS= main.o init.o misc.o mail.o hdrs.o execute.o commands.o print.o file.o \
  633.         signals.o aliases.o setopts.o msgs.o pick.o sort.o expr.o strings.o \
  634.         folders.o dates.o loop.o help.o viewopts.o bind.o curses.o curs_io.o
  635. ! HELP_FILES= README README-6.0 README-6.1 README-6.2 mush.1 cmd_help
  636.   MAKES= makefile.sys.v makefile.xenix makefile.bsd
  637.   
  638.   CFLAGS= -O -DSYSV -Mle -DCURSES -DREGCMP -DUSG
  639. ***************
  640. *** 28,34 ****
  641.       cc $(CFLAGS) -LARGE -c bind.c
  642.   
  643.   shar:
  644. !     shar ${DOCS} ${MAKES} ${HDRS}>hdr.shr
  645.       shar ${SRCS1} > src1.shr
  646.       shar ${SRCS2} > src2.shr
  647.       shar ${SRCS3} > src3.shr
  648. --- 28,34 ----
  649.       cc $(CFLAGS) -LARGE -c bind.c
  650.   
  651.   shar:
  652. !     shar ${HELP_FILES} ${MAKES} ${HDRS}>hdr.shr
  653.       shar ${SRCS1} > src1.shr
  654.       shar ${SRCS2} > src2.shr
  655.       shar ${SRCS3} > src3.shr
  656. ***************
  657. *** 39,45 ****
  658.       shar ${SRCS8} > src8.shr
  659.   
  660.   tar:
  661. !     tar fcv MUSH ${MAKES} ${HDRS} ${DOCS} ${SRCS1} \
  662.       ${SRCS2} ${SRCS3} ${SRCS4} ${SRCS5} ${SRCS6} ${SRCS7} ${SRCS}8
  663.   
  664.   clean:
  665. --- 39,45 ----
  666.       shar ${SRCS8} > src8.shr
  667.   
  668.   tar:
  669. !     tar fcv MUSH ${MAKES} ${HDRS} ${HELP_FILES} ${SRCS1} \
  670.       ${SRCS2} ${SRCS3} ${SRCS4} ${SRCS5} ${SRCS6} ${SRCS7} ${SRCS}8
  671.   
  672.   clean:
  673. *** OLD/makefile.x386    Tue Apr 12 21:59:57 1988
  674. --- makefile.x386    Wed May 11 15:54:42 1988
  675. ***************
  676. *** 10,16 ****
  677.   OBJS= main.o init.o misc.o mail.o hdrs.o execute.o commands.o print.o file.o \
  678.         signals.o aliases.o setopts.o msgs.o pick.o sort.o expr.o strings.o \
  679.         folders.o dates.o loop.o help.o viewopts.o bind.o curses.o curs_io.o
  680. ! DOCS= README cmd_help mush.1
  681.   MAKES= makefile.sys.v makefile.xenix makefile.bsd
  682.   
  683.   CFLAGS= -O -DSYSV -M3e -DCURSES -DREGCMP -DUSG 
  684. --- 10,16 ----
  685.   OBJS= main.o init.o misc.o mail.o hdrs.o execute.o commands.o print.o file.o \
  686.         signals.o aliases.o setopts.o msgs.o pick.o sort.o expr.o strings.o \
  687.         folders.o dates.o loop.o help.o viewopts.o bind.o curses.o curs_io.o
  688. ! HELP_FILES= README README-6.0 README-6.1 README-6.2 mush.1 cmd_help
  689.   MAKES= makefile.sys.v makefile.xenix makefile.bsd
  690.   
  691.   CFLAGS= -O -DSYSV -M3e -DCURSES -DREGCMP -DUSG 
  692. ***************
  693. *** 25,31 ****
  694.       cc $(CFLAGS) -LARGE -c bind.c
  695.   
  696.   shar:
  697. !     shar ${DOCS} ${MAKES} ${HDRS}>hdr.shr
  698.       shar ${SRCS1} > src1.shr
  699.       shar ${SRCS2} > src2.shr
  700.       shar ${SRCS3} > src3.shr
  701. --- 25,31 ----
  702.       cc $(CFLAGS) -LARGE -c bind.c
  703.   
  704.   shar:
  705. !     shar ${HELP_FILES} ${MAKES} ${HDRS}>hdr.shr
  706.       shar ${SRCS1} > src1.shr
  707.       shar ${SRCS2} > src2.shr
  708.       shar ${SRCS3} > src3.shr
  709. ***************
  710. *** 36,42 ****
  711.       shar ${SRCS8} > src8.shr
  712.   
  713.   tar:
  714. !     tar fcv MUSH ${MAKES} ${HDRS} ${DOCS} ${SRCS1} \
  715.       ${SRCS2} ${SRCS3} ${SRCS4} ${SRCS5} ${SRCS6} ${SRCS7} ${SRCS8}
  716.   
  717.   clean:
  718. --- 36,42 ----
  719.       shar ${SRCS8} > src8.shr
  720.   
  721.   tar:
  722. !     tar fcv MUSH ${MAKES} ${HDRS} ${HELP_FILES} ${SRCS1} \
  723.       ${SRCS2} ${SRCS3} ${SRCS4} ${SRCS5} ${SRCS6} ${SRCS7} ${SRCS8}
  724.   
  725.   clean:
  726. *** OLD/misc.c    Thu Apr  7 22:47:54 1988
  727. --- misc.c    Wed May 11 14:01:36 1988
  728. ***************
  729. *** 354,363 ****
  730.       turnon(glob_flags, IGN_SIGS);
  731.       if (!buf)
  732.           pp = stdout;
  733. !     else if (!(pp = popen(buf, "w")))
  734. !         error(buf);
  735. !     else
  736.           echo_on();
  737.       cnt = 0;
  738.       } else if (!buf) {
  739.       if (pp && pp != stdout)
  740. --- 354,364 ----
  741.       turnon(glob_flags, IGN_SIGS);
  742.       if (!buf)
  743.           pp = stdout;
  744. !     else {
  745.           echo_on();
  746. +         if (!(pp = popen(buf, "w")))
  747. +         error(buf);
  748. +     }
  749.       cnt = 0;
  750.       } else if (!buf) {
  751.       if (pp && pp != stdout)
  752. *** OLD/mush.1    Wed Apr  6 00:34:07 1988
  753. --- mush.1    Thu May 12 17:08:32 1988
  754. ***************
  755. *** 60,65 ****
  756. --- 60,70 ----
  757.   .B \-f
  758.   [ folder ]
  759.   ]
  760. + [
  761. + .B \-F
  762. + [!]
  763. + [ file ]
  764. + ]
  765.   .br
  766.   .B mush
  767.   [
  768. ***************
  769. *** 126,131 ****
  770. --- 131,140 ----
  771.   .B \-f
  772.   [ folder ]
  773.   ]
  774. + [
  775. + .B \-F
  776. + [ file ]
  777. + ]
  778.   .br
  779.   .B mush
  780.   [
  781. ***************
  782. *** 218,223 ****
  783. --- 227,244 ----
  784.   .B debug
  785.   command.
  786.   .TP
  787. + \-F[!] filename
  788. + This file is the same type as the initialization file read on startup
  789. + (see INITIALIZATION) with the exception that commands which manipulate
  790. + or search messages may be given.  Normally, such commands may not exist
  791. + in the initialization file since that file is read before the folder
  792. + is scanned.  This file is read after the folder is scanned, so commands
  793. + which change folders are allowed.
  794. + The optional `!' argument prevents the shell from running after the file
  795. + has been sourced.  Otherwise,
  796. + .I Mush
  797. + continues into whatever interface has been specified.
  798. + .TP
  799.   \-f [ filename ]
  800.   The optional filename argument specifies a folder containing mail messages.
  801.   With no argument,
  802. ***************
  803. *** 2069,2091 ****
  804.   Options:
  805.   .ta 1.5i
  806.   .in +2
  807. ! \-d [\-]date    messages sent on or after [`\-' before] date
  808. ! \-f    search for pattern in \*QFrom\*U field only
  809. ! \-h header    search for pattern in specified header only
  810. ! \-i    ignore case of letters when searching
  811. ! \-r msg_list    search only the listed messages
  812. ! \-s    search for pattern in \*QSubject\*U field only
  813. ! \-t    search for pattern in \*QTo\*U field only
  814. ! \-x    select messages not containing the pattern
  815.   .in -2
  816.   .fi
  817.   .sp
  818. ! Only one of \-d, \-f, \-h, \-s and \-t can be specified at once.
  819.   Entire messages are scanned for the <pattern>
  820. ! unless \-f, \-h, \-s or \-t is specified.
  821.   Messages marked for deletion are also searched.
  822. ! No patterns can be specified with the \-d option,
  823. ! and the \-x option may not be used with \-d.
  824.   .sp
  825.   For the \-d option, \*Qdate\*U is of the form:
  826.   .sp
  827. --- 2090,2112 ----
  828.   Options:
  829.   .ta 1.5i
  830.   .in +2
  831. ! \-d [+-]date    messages sent on or [+ after] [`\-' before] date.
  832. ! \-ago <format>    search for messages relative to today's date.
  833. ! \-f    search for pattern in \*QFrom\*U field only.
  834. ! \-i    ignore case of letters when searching.
  835. ! \-r msg_list    search only the listed messages.
  836. ! \-s    search for pattern in \*QSubject\*U field only.
  837. ! \-t    search for pattern in \*QTo\*U field only.
  838. ! \-h header    search for pattern in specified header only.
  839. ! \-x    select messages not containing the pattern.
  840.   .in -2
  841.   .fi
  842.   .sp
  843. ! Only one of \-d, \-a, \-f, \-h, \-s and \-t can be specified at once.
  844.   Entire messages are scanned for the <pattern>
  845. ! unless \-d, \-a, \-f, \-h, \-s or \-t is specified.
  846.   Messages marked for deletion are also searched.
  847. ! No patterns can be specified with the \-d or \-a options.
  848.   .sp
  849.   For the \-d option, \*Qdate\*U is of the form:
  850.   .sp
  851. ***************
  852. *** 2100,2108 ****
  853.   .in +2
  854.   .ta 2.0i
  855.   .sp
  856. ! pick \-d 4/20    on or after April 20, this year
  857. ! pick \-d \-/2/85    on or before the 2nd, this month, 1985
  858. ! pick \-d /    today only
  859.   .fi
  860.   .in -2
  861.   .sp
  862. --- 2121,2130 ----
  863.   .in +2
  864.   .ta 2.0i
  865.   .sp
  866. ! pick \-d 4/20    on April 20, this year.
  867. ! pick \-d \-/2/85    on or before the 2nd, this month, 1985.
  868. ! pick \-d +5/4    on or after May 4 of this year.
  869. ! pick \-d /    today only.
  870.   .fi
  871.   .in -2
  872.   .sp
  873. ***************
  874. *** 2109,2114 ****
  875. --- 2131,2159 ----
  876.   At least one `/' char must be used in a date.
  877.   There is no strong date checking; 2/30 would be considered a valid date.
  878.   .sp
  879. + For the \-ago option, the format is very simple.  Specify the number of
  880. + days followed by the word \*Qdays\*U, or the number of weeks followed by
  881. + the word \*Qweeks\*U, and so on with months and years.  Truncation is allowed,
  882. + since only the first character is examined, so all of the following are
  883. + equivalent:
  884. + .sp
  885. + .in +2
  886. + pick -ago 1 day, 2 weeks
  887. + pick -ago 2Weeks 1Day
  888. + pick -ago 2w,1day
  889. + pick -a 2w1d
  890. + .in -2
  891. + These examples will find all messages that are exactly 2 weeks and 1 day
  892. + old.  All \*Qago\*U dates collapse into \*Qday\*U time segments.  This
  893. + means that months are 30.5 days long.  If more precise date selection is
  894. + required, use the \-d option and specify specific dates.
  895. + .sp
  896. + Also note that the -ago option allows the \*Qbefore\*U (-) and \*Qafter\*U (+)
  897. + arguments.  Thus, you may pick for all messages older than 1 week with:
  898. + .sp
  899. + .ti +2
  900. + pick -ago -1 week
  901. + .sp
  902.   Other examples of
  903.   .B pick:
  904.   .sp
  905. ***************
  906. *** 2116,2127 ****
  907.   pick \-d 2/5/86 | pick \-d \-2/5/87 | pick \-s "mail stuff" | lpr
  908.   .sp
  909.   will find all the messages between the dates February 5, 1986 and
  910. ! February 5, 1987 that contain the subject "mail stuff" and print them.
  911.   .sp
  912.   .ti +2
  913.   pick -s Re: | delete
  914.   .sp
  915. ! deletes messages that have \*QRe:\*U in the subject
  916.   .sp
  917.   .ti +2
  918.   folder +project | pick -f frank
  919. --- 2161,2173 ----
  920.   pick \-d 2/5/86 | pick \-d \-2/5/87 | pick \-s "mail stuff" | lpr
  921.   .sp
  922.   will find all the messages between the dates February 5, 1986 and
  923. ! February 5, 1987 that contain the subject "mail stuff" and send them
  924. ! to the printer.
  925.   .sp
  926.   .ti +2
  927.   pick -s Re: | delete
  928.   .sp
  929. ! deletes messages that have \*QRe:\*U in the Subject header.
  930.   .sp
  931.   .ti +2
  932.   folder +project | pick -f frank
  933. ***************
  934. *** 2135,2140 ****
  935. --- 2181,2192 ----
  936.   if the string \*Qucbvax\*U is in the header.
  937.   Note that case sensitivity
  938.   applies only to the pattern searched, not the header itself.
  939. + .sp
  940. + .ti +2
  941. + pick -ago +1w | save +current
  942. + .sp
  943. + This finds all messages that are a week or less old and saves them in the file
  944. + called \fIcurrent\fR, which is found in the user's \fIfolder\fR variable.
  945.   .TP
  946.   .B preserve
  947.   .RB ( pre )
  948. ***************
  949. *** 3287,3292 ****
  950. --- 3339,3353 ----
  951.   (Boolean)
  952.   Whenever messages are read, piped, or saved, if this variable is set,
  953.   all consecutive blank lines are squeezed into one blank line.
  954. + .TP
  955. + .B tmpdir
  956. + (String)
  957. + This variable describes the path to use as the directory to use
  958. + for all tempfiles that
  959. + .I Mush
  960. + uses.  By default, the user's home directory is used.  If that
  961. + cannot be accessed, a directory writable by all is used (typically, /tmp).
  962. + If \fBtmpdir\fR is set, then it is used first.
  963.   .TP
  964.   .B toplines
  965.   (Numeric)
  966. *** OLD/mush.h    Thu May 12 13:52:11 1988
  967. --- mush.h    Wed May 11 15:19:26 1988
  968. ***************
  969. *** 1,6 ****
  970.   /* @(#)mush.h    (c) copyright 1986 (Dan Heller) */
  971.   
  972. ! #define VERSION "Mail User's Shell (6.1 4/26/88)"
  973.   
  974.   #include "config.h"
  975.   
  976. --- 1,6 ----
  977.   /* @(#)mush.h    (c) copyright 1986 (Dan Heller) */
  978.   
  979. ! #define VERSION "Mail User's Shell (6.2 5/11/88)"
  980.   
  981.   #include "config.h"
  982.   
  983. *** OLD/pick.c    Tue Mar  1 14:59:20 1988
  984. --- pick.c    Wed May 11 15:51:46 1988
  985. ***************
  986. *** 2,9 ****
  987.   
  988.   #include "mush.h"
  989.   
  990. ! static int before, mdy[3], search_from, search_subj, search_to, xflg, icase;
  991. ! static search_hdr[64];
  992.   
  993.   do_pick(n, argv, list)
  994.   register int n;
  995. --- 2,9 ----
  996.   
  997.   #include "mush.h"
  998.   
  999. ! static int before, after, search_from, search_subj, search_to, xflg, icase;
  1000. ! static mdy[3], search_hdr[64];
  1001.   
  1002.   do_pick(n, argv, list)
  1003.   register int n;
  1004. ***************
  1005. *** 38,45 ****
  1006.   register char **argv, list[];
  1007.   {
  1008.       register char c;
  1009. !     int o_before = before, o_mdy[3], o_search_from = search_from,
  1010. !     o_search_subj = search_subj, o_search_to = search_to, o_xflg = xflg, n;
  1011.   
  1012.       for (c = 0; c < 3; c++)
  1013.       o_mdy[c] = mdy[c];
  1014. --- 38,46 ----
  1015.   register char **argv, list[];
  1016.   {
  1017.       register char c;
  1018. !     int o_before = before, o_after = after, o_search_from = search_from,
  1019. !     o_search_subj = search_subj, o_search_to = search_to, o_xflg = xflg,
  1020. !     o_mdy[3], n;
  1021.   
  1022.       for (c = 0; c < 3; c++)
  1023.       o_mdy[c] = mdy[c];
  1024. ***************
  1025. *** 50,56 ****
  1026.       goto bad;
  1027.       }
  1028.   
  1029. !     icase = before = search_from = search_subj = xflg = 0;
  1030.       mdy[0] = search_hdr[0] = 0;
  1031.       while (*argv && *++argv && **argv == '-')
  1032.       switch(c = argv[0][1]) {
  1033. --- 51,57 ----
  1034.       goto bad;
  1035.       }
  1036.   
  1037. !     icase = before = after = search_from = search_subj = xflg = 0;
  1038.       mdy[0] = search_hdr[0] = 0;
  1039.       while (*argv && *++argv && **argv == '-')
  1040.       switch(c = argv[0][1]) {
  1041. ***************
  1042. *** 76,81 ****
  1043. --- 77,88 ----
  1044.               goto bad;
  1045.           argv += (n-1); /* we're going to increment another up top */
  1046.           }
  1047. +         when 'a': {
  1048. +         int n = ago_date(++argv);
  1049. +         if (n == -1)
  1050. +             goto bad;
  1051. +         argv += n;
  1052. +         }
  1053.           when 'd':
  1054.           if (!*++argv) {
  1055.               print("specify a date for -%c\n", c);
  1056. ***************
  1057. *** 108,129 ****
  1058.       }
  1059.       if (verbose) {
  1060.       print_more("Searching for messages");
  1061. !     if (mdy[1] == 0)
  1062.           print(" that %s \"%s\"", (xflg)? "doesn't contain": "contains",
  1063.                   (*argv)? *argv: "<previous expression>");
  1064. !     if (search_subj)
  1065. !         print_more(" in subject line");
  1066. !     else if (search_from)
  1067. !         print_more(" from author names");
  1068. !     else if (search_to)
  1069. !         print_more(" from the To: field");
  1070. !     else if (search_hdr[0])
  1071. !         print_more(" from the message header: \"%s:\"", search_hdr);
  1072. !     if (mdy[1] > 0) {
  1073.           extern char *month_names[]; /* from dates.c */
  1074. !         print_more(" dated on or %s %s. %d, 19%d.",
  1075. !           (before)? "before": "after",
  1076. !           month_names[mdy[0]], mdy[1], mdy[2]);
  1077.       }
  1078.       print_more("\n");
  1079.       }
  1080. --- 115,138 ----
  1081.       }
  1082.       if (verbose) {
  1083.       print_more("Searching for messages");
  1084. !     if (mdy[1] == 0) {
  1085.           print(" that %s \"%s\"", (xflg)? "doesn't contain": "contains",
  1086.                   (*argv)? *argv: "<previous expression>");
  1087. !         if (search_subj)
  1088. !         print_more(" in subject line");
  1089. !         else if (search_from)
  1090. !         print_more(" from author names");
  1091. !         else if (search_to)
  1092. !         print_more(" from the To: field");
  1093. !         else if (search_hdr[0])
  1094. !         print_more(" from the message header: \"%s:\"", search_hdr);
  1095. !     } else {
  1096.           extern char *month_names[]; /* from dates.c */
  1097. !         print_more(" dated ");
  1098. !         if (before || after)
  1099. !         print_more("on or %s ", (before)? "before": "after");
  1100. !         print_more("%s. %d, 19%d.",
  1101. !               month_names[mdy[0]], mdy[1], mdy[2]);
  1102.       }
  1103.       print_more("\n");
  1104.       }
  1105. ***************
  1106. *** 131,137 ****
  1107.       print("using date: -i flag ignored.\n");
  1108.       ret = find_pattern(*argv, list);
  1109.   bad:
  1110. !     before = o_before, search_from = o_search_from;
  1111.       search_subj = o_search_subj, search_to = o_search_to, xflg = o_xflg;
  1112.       for (c = 0; c < 3; c++)
  1113.       mdy[c] = o_mdy[c];
  1114. --- 140,146 ----
  1115.       print("using date: -i flag ignored.\n");
  1116.       ret = find_pattern(*argv, list);
  1117.   bad:
  1118. !     before = o_before, after = o_after, search_from = o_search_from;
  1119.       search_subj = o_search_subj, search_to = o_search_to, xflg = o_xflg;
  1120.       for (c = 0; c < 3; c++)
  1121.       mdy[c] = o_mdy[c];
  1122. ***************
  1123. *** 197,204 ****
  1124.            */
  1125.           for (i = 2; i < 5; i++)
  1126.               if (before && msg_mdy[i%3] < mdy[i%3]
  1127. !             || !before && msg_mdy[i%3] > mdy[i%3]
  1128. !             || i == 4 && (msg_mdy[i%3] == mdy[i%3])) {
  1129.                   Debug("matched (%s).\n",
  1130.                   (i == 2)? "year" : (i == 3)? "month" : "day");
  1131.                   break;
  1132. --- 206,213 ----
  1133.            */
  1134.           for (i = 2; i < 5; i++)
  1135.               if (before && msg_mdy[i%3] < mdy[i%3]
  1136. !             ||  after  && msg_mdy[i%3] > mdy[i%3]
  1137. !             ||  i == 4 && (msg_mdy[i%3] == mdy[i%3])) {
  1138.                   Debug("matched (%s).\n",
  1139.                   (i == 2)? "year" : (i == 3)? "month" : "day");
  1140.                   break;
  1141. ***************
  1142. *** 373,380 ****
  1143.       int       i;
  1144.       struct tm       *today;
  1145.   
  1146. !     if (*p == '-') {
  1147. !     before = 1;
  1148.       skipspaces(1);
  1149.       }
  1150.       if (!isdigit(*p) && *p != '/') {
  1151. --- 382,389 ----
  1152.       int       i;
  1153.       struct tm       *today;
  1154.   
  1155. !     if (*p == '-' || *p == '+') {
  1156. !     before = !(after = *p == '+');
  1157.       skipspaces(1);
  1158.       }
  1159.       if (!isdigit(*p) && *p != '/') {
  1160. ***************
  1161. *** 406,409 ****
  1162. --- 415,484 ----
  1163.           p++;
  1164.       }
  1165.       return 1;
  1166. + }
  1167. + 
  1168. + /*
  1169. +  * Parse arguments specifying days/months/years "ago" (relative to today).
  1170. +  * Legal syntax: -ago [+-][args]
  1171. +  *    where "args" is defined to be:
  1172. +  *    [0-9]+[ ]*[dD][a-Z]*[ ,]*[0-9]+[mM][a-Z]*[ ,]*[0-9]+[ ]*[yY][a-Z]*
  1173. +  *    1 or more digits, 0 or more spaces, d or D followed by 0 or more chars,
  1174. +  *    0 or more whitespaces or commas, repeat for months and years...
  1175. +  * Examples:
  1176. +  *    1 day, 2 months, 0 years
  1177. +  *    2 weeks 1 year
  1178. +  *    10d, 5m
  1179. +  *    3w
  1180. +  *    1d 1Y
  1181. +  *
  1182. +  * Return number of args parsed; -1 on error.
  1183. +  */
  1184. + ago_date(argv)
  1185. + char **argv;
  1186. + {
  1187. + #define SECS_PER_DAY   (60 * 60 * 24)
  1188. + #define SECS_PER_WEEK  (SECS_PER_DAY * 7)
  1189. + #define SECS_PER_MONTH ((int)(SECS_PER_DAY * 30.5))
  1190. + #define SECS_PER_YEAR  (SECS_PER_DAY * 365)
  1191. +     register char *p;
  1192. +     char       buf[256];
  1193. +     int           n = 0, value, mdy_index = 0;
  1194. +     long       t;
  1195. +     struct tm       *today;
  1196. + 
  1197. +     (void) argv_to_string(buf, argv);
  1198. +     p = buf;
  1199. +     (void) time (&t); /* get current time in seconds and subtract new values */
  1200. +     if (*p == '-')
  1201. +     before = TRUE;
  1202. +     else if (*p == '+')
  1203. +     after = TRUE;
  1204. +     skipspaces(before || after);
  1205. +     while (*p) {
  1206. +     if (!isdigit(*p))
  1207. +         break; /* really a syntax error, but it could be other pick ars */
  1208. +     p = my_atoi(p, &value); /* get 1 or more digits */
  1209. +     skipspaces(0); /* 0 or more spaces */
  1210. +     switch (lower(*p)) {   /* d, m, or y */
  1211. +         when 'd' : t -= value * SECS_PER_DAY;
  1212. +         when 'w' : t -= value * SECS_PER_WEEK;
  1213. +         when 'm' : t -= value * SECS_PER_MONTH;
  1214. +         when 'y' : t -= value * SECS_PER_YEAR;
  1215. +         otherwise: return -1;
  1216. +     }
  1217. +     for (p++; Lower(*p) >= 'a' && *p <= 'z'; p++)
  1218. +         ; /* skip the rest of this token */
  1219. +     while (*p == ',' || isspace(*p))
  1220. +         ; /* 0 or more whitespaces or commas */
  1221. +     }
  1222. +     today = localtime(&t);
  1223. +     mdy[0] = today->tm_mon;
  1224. +     mdy[1] = today->tm_mday;
  1225. +     mdy[2] = today->tm_year;
  1226. + 
  1227. +     /* Count the number of args parsed */
  1228. +     for (n = 0; p > buf && *argv; n++)
  1229. +     p -= (strlen(*argv++)+1);
  1230. +     Debug("parsed %d args\n", n);
  1231. +     return n;
  1232.   }
  1233. *** OLD/print.c    Thu May 12 13:52:13 1988
  1234. --- print.c    Thu Apr 28 21:47:54 1988
  1235. ***************
  1236. *** 1,4 ****
  1237. - 
  1238.   /* @(#)print.c    2.4    (c) copyright 10/15/86 (Dan Heller) */
  1239.   
  1240.   #include "mush.h"
  1241. --- 1,3 ----
  1242. ***************
  1243. *** 185,188 ****
  1244.   {
  1245.       print("");
  1246.   }
  1247. - 
  1248. --- 184,186 ----
  1249. *** OLD/strings.c    Thu Apr  7 09:51:46 1988
  1250. --- strings.c    Tue Apr 26 19:01:20 1988
  1251. ***************
  1252. *** 219,229 ****
  1253.   }
  1254.   
  1255.   #ifdef SYSV
  1256.   char *
  1257. ! Sprintf(buf, fmt, args)
  1258.   register char *buf, *fmt;
  1259.   {
  1260. !     vsprintf(buf, fmt, &args);
  1261.       return buf;
  1262.   }
  1263.   #endif /* SYSV */
  1264. --- 219,247 ----
  1265.   }
  1266.   
  1267.   #ifdef SYSV
  1268. + #include <varargs.h>
  1269.   char *
  1270. ! Sprintf(buf, fmt, va_alist)
  1271.   register char *buf, *fmt;
  1272. + va_dcl
  1273.   {
  1274. !     va_list ap;
  1275. ! #ifdef VPRINTF
  1276. !     va_start(ap);
  1277. !     (void) vsprintf(buf, fmt, ap);
  1278. !     va_end(ap);
  1279. ! #else
  1280. !     {
  1281. !     FILE foo;
  1282. !     foo._cnt = BUFSIZ;
  1283. !     foo._base = foo._ptr = buf; /* may have to be cast (unsigned char *) */
  1284. !     foo._flag = _IOWRT+_IOSTRG;
  1285. !     va_start(ap);
  1286. !     (void) _doprnt(fmt, ap, &foo);
  1287. !     va_end(ap);
  1288. !     *foo._ptr = '\0'; /* plant terminating null character */
  1289. !     }
  1290. ! #endif /* VPRINTF */
  1291.       return buf;
  1292.   }
  1293.   #endif /* SYSV */
  1294. *** OLD/viewopts.c    Sat Apr  2 21:12:48 1988
  1295. --- viewopts.c    Wed May 11 20:48:41 1988
  1296. ***************
  1297. *** 129,134 ****
  1298. --- 129,136 ----
  1299.         "When reading messages, squeeze all blank lines into one." },
  1300.       { "top", "Lines", TOOL | TEXT,
  1301.         "Number of lines to print of a message for the 'top' command."  },
  1302. +     { "tmpdir", "Directory", TOOL | TEXT,
  1303. +       "Directory to use for temporary files used by Mush." },
  1304.       { "unix", NULL, TEXT,
  1305.         "Non-mush commands are considered to be UNIX commands." },
  1306.       { "verify", NULL, TEXT,
  1307.