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