home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / b / bmh02src.zip / FORW.C < prev    next >
C/C++ Source or Header  |  1992-08-16  |  1KB  |  50 lines
  1. /*
  2.    forw.c : Copyright Paul Healy, EI9GL, 1992.
  3.  
  4.    920802 : Created.
  5. */
  6. #include <stdio.h>
  7. #include "rc.h"
  8. #include "misc.h"
  9. #include "help.h"
  10. #include "current.h"
  11. #include "buffer.h"
  12. #include "mailer.h"
  13.  
  14. #ifdef BMH
  15. #define main forw_main
  16. #endif
  17.  
  18. int
  19. main(int argc, char *argv[])
  20. {
  21.    int msg;
  22.    char *folder, *start, *end, filename[256];
  23.    FILE *fp;
  24.  
  25.    dohelp(argc, argv, "forw [msg]");
  26.  
  27.    if (loadconfig()==-1)
  28.       return -1;
  29.    if (getcurrent(argc, argv, &folder, &msg) == -1)
  30.       return -1;
  31.    if (loadmail("forw", folder, &start, &end) == -1)
  32.       return -1;
  33.    if ( (fp = tempfile("forw", filename, "w")) == NULL)
  34.       return -1;
  35.  
  36.    fprintf(fp, "To: \nCc: \nSubject: \n--------\n----- Forwarded message -----\n");
  37.  
  38.    (void) msg2file(start, end, fp, msg, 1);
  39.  
  40.    fprintf(fp, "----- End of forwarded message -----\n");
  41.    fclose(fp);
  42.  
  43.    if (call_ed("forw", filename) == -1) {
  44.       unlink(filename);
  45.       return -1;
  46.       }
  47.  
  48.    return dowhatnow("forw", filename, 1);
  49. }
  50.