home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume6 / showhook.mh < prev    next >
Text File  |  1989-03-07  |  5KB  |  230 lines
  1. Newsgroups: comp.sources.misc
  2. From: allbery@uunet.UU.NET (Brandon S. Allbery - comp.sources.misc)
  3. Subject: v06i057: MH Mail patch to allow some action to be taken when mail is read
  4. Reply-To: pbrown@gldsyd.oz.au (Peter Brown)
  5.  
  6. Posting-number: Volume 6, Issue 57
  7. Submitted-by: pbrown@gldsyd.oz.au (Peter Brown)
  8. Archive-name: showhook.mh
  9.  
  10. [On looking this over, I note a few bugs:  specifically, the use of $s instead
  11. of %s in printf()'s (!).  It also requires that MH be configured with RPATHS,
  12. at least for the sample showhook.  Oh, well  ++bsa]
  13.  
  14. The following patch to mh's show.c and the associated code allow you to set up
  15. the mail so that some action can be taken when the mail is actually read using
  16. show, prev, or next.
  17.  
  18. The file regm.c is one that I set up to send a return receipt when the mail
  19. being read has a field "Classification:  Registered" such as Qoffice lets you
  20. put in.
  21.  
  22. The file regm.c could be easily modified to take care of other circumstances.
  23.  
  24.  
  25.  
  26. # This is a shell archive.  Remove anything before this line, then
  27. # unpack it by saving it in a file and typing "sh file".  (Files
  28. # unpacked will be owned by you and have default permissions.)
  29. #
  30. # This archive contains:
  31. # show.diff regm.c
  32.  
  33. echo x - show.diff
  34. cat > "show.diff" << '//E*O*F show.diff//'
  35. 39,41d38
  36. < #define SHOWHOOKSW 12
  37. <     "showhook", 5,
  38. < 
  39. 66,67c63
  40. <             msgnum,
  41. <             showhook = 0;
  42. ---
  43. >             msgnum;
  44. 115,117d110
  45. <                 case SHOWHOOKSW:
  46. <                     showhook = 1;
  47. <                     continue;
  48. 243d235
  49. < 
  50. 251,261d242
  51. < /* The following fork exec code was put in to set up automatic responce to
  52. <    registered mail
  53. < */
  54. <     if (showhook)
  55. <            if ( fork () == 0 )
  56. <             {
  57. <             vec[0] = "showhook";
  58. <             execvp ("showhook", vec);
  59. <             adios ("showhook", "unable to exec");
  60. <             }
  61. < 
  62. 268c249
  63. <             (void) mhl (vecp, vec);
  64. ---
  65. >         (void) mhl (vecp, vec);
  66. //E*O*F show.diff//
  67.  
  68. echo x - regm.c
  69. cat > "regm.c" << '//E*O*F regm.c//'
  70. #define RETURNT        0x01
  71. #define FROMT        0x02
  72. #define DATET        0x04
  73. #define SUBJECTT    0x08
  74. #define CLASST        0x10
  75.  
  76. #include <stdio.h>
  77. #include <string.h>
  78.  
  79. static char    msgfname[] = { "/tmp/REGMXXXXXX" },
  80.         outfname[] = { "/tmp/REGMXXXXXX" };
  81.  
  82. main (argc, argv)
  83. int argc;
  84. char *argv[];
  85. {
  86.  
  87.     static char *args[] = { "sendmail", "-i", "-t", (char *) 0 };
  88.  
  89.     char    sender[256],
  90.         time[256],
  91.         subject[256],
  92.         buf[256],
  93.         copybuf[BUFSIZ],
  94.         **argsp,
  95.         *tokp,
  96.         c;
  97.  
  98.     int    n,
  99.         passflag = 0;
  100.  
  101.     FILE    *msgf,
  102.         *outf,
  103.         *inf;
  104.  
  105.     while (argc-- > 1)
  106.     {
  107.         mktemp (msgfname);
  108.         if ((msgf = fopen (msgfname, "w+"))  ==  (FILE *) NULL)
  109.         {
  110.             fprintf (stderr, "$s: Couldn't open file\n", argv[0]);
  111.             lgooh (1);
  112.         }
  113.         mktemp (outfname);
  114.         if ((outf = fopen (outfname, "w+"))  ==  (FILE *) NULL)
  115.         {
  116.             fprintf (stderr, "$s: Couldn't open file\n", argv[0]);
  117.             lgooh (1);
  118.         }
  119.         if ((inf = fopen (argv[argc], "r+"))  ==  (FILE *) NULL)
  120.         {
  121.             fprintf (stderr, "$s: Couldn't open %s\n",
  122.                 argv[0], argv[argc]);
  123.             lgooh (1);
  124.         }
  125.  
  126.         while (fgets (buf, 256, inf)  !=  (char *) NULL)
  127.         {
  128.             fputs (buf, outf);
  129.  
  130.             tokp = strtok (buf, " ");
  131.             if ((strcmp (tokp, "Return-Path:")) == 0)
  132.             {
  133.                 tokp = strtok (((char *) NULL), "\n");
  134.                 strcpy (sender, tokp);
  135.                 passflag |= RETURNT;
  136.                 continue;
  137.             }
  138.             if ((strcmp (tokp, "From:")) == 0  &&
  139.                 (passflag & RETURNT) != RETURNT)
  140.             {
  141.                 tokp = strtok (((char *) NULL), " \n");
  142.                 strcpy (sender, tokp);
  143.                 passflag |= FROMT;
  144.                 continue;
  145.             }
  146.             if ((strcmp (tokp, "Date:")) == 0)
  147.             {
  148.                 tokp = strtok (((char *) NULL), "\n");
  149.                 strcpy (time, tokp);
  150.                 passflag |= DATET;
  151.                 continue;
  152.             }
  153.             if ((strcmp (tokp, "Subject:")) == 0)
  154.             {
  155.                 tokp = strtok (((char *) NULL), "\n");
  156.                 strcpy (subject, tokp);
  157.                 passflag |= SUBJECTT;
  158.                 continue;
  159.             }
  160.             if ((strcmp (tokp, "Classification:")) == 0)
  161.             {
  162.                 tokp = strtok (((char *) NULL), " \n");
  163.                 if ((strcmp (tokp, "Registered")) == 0)
  164.                 {
  165.                     fseek (outf, -11L, 1);
  166.                     fprintf (outf, "Return Receipt Sent\n");
  167.                     passflag = CLASST;
  168.                 }
  169.                 else
  170.                     lgooh (0);
  171.             }
  172.  
  173.         }
  174.         if ((passflag & CLASST) != CLASST)
  175.             lgooh (0);
  176.  
  177.         fprintf (msgf, "To: %s\n", sender);
  178.         fprintf (msgf, "Subject:  Return Receipt for: %s\n", time);
  179.         fprintf (msgf, "--------\n");
  180.         fprintf (msgf, "This message acknowledges receipt of your ");
  181.         fprintf (msgf, "message of %s ", time);
  182.         fprintf (msgf, "on the subject of: %s\n", subject);
  183.  
  184.         if ( freopen( msgfname, "r", stdin) == (FILE *) NULL)
  185.         {
  186.             fprintf (stderr, "\n\n%s: unable to reopen %s\n\n",
  187.                 argv[0], msgfname);
  188.             lgooh (1);
  189.         }
  190.  
  191.         rewind (inf);
  192.         rewind (outf);
  193.  
  194.         do
  195.             {
  196.             n = fread (copybuf, sizeof (char), BUFSIZ, outf);
  197.             fwrite (copybuf, sizeof (char), n, inf);
  198.         }
  199.         while (n == BUFSIZ);
  200.  
  201.         fclose (inf);
  202.  
  203.  
  204.         if (fork ()  ==  0)
  205.         {
  206.             execv ("/usr/lib/sendmail", args);
  207.             fprintf (stderr,
  208.                 "%s: Unable to exec /usr/lib/sendmail\n",
  209.                 argv[0]);
  210.         }
  211.         else lgooh (0);
  212.     }
  213. }
  214.  
  215. lgooh (exitval)
  216. int exitval;
  217. {
  218.  
  219.     if ((unlink (msgfname)) < 0)
  220.         fprintf (stderr, "Unable to unlink %s\n", msgfname);
  221.     if ((unlink (outfname)) < 0)
  222.         fprintf (stderr, "Unable to unlink %s\n", outfname);
  223.     exit (exitval);
  224. }
  225. //E*O*F regm.c//
  226.  
  227. exit 0
  228.  
  229.  
  230.