home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume36 / msend / part01 / msend.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-03-22  |  13.5 KB  |  592 lines
  1. /* msend.c:
  2.  *
  3.  * user interface
  4.  *
  5.  * (c) Copyright 1988, 1989, 1990 Jim Frost.  All Rights Reserved.  Please see
  6.  * the accompanying file "Copyright" for more information.
  7.  */
  8.  
  9. #include "Copyright"
  10. #include "config.h"
  11. #include "msend.h"
  12. #include "patchlevel"
  13.  
  14. static void huh(i)
  15. int i;
  16. { char   d[10];
  17.   char   spoolfile[MAXFILENAME+1];
  18.   struct stat   stb;
  19.  
  20.   sprintf(d,"-%d",i);
  21.  
  22. #ifdef SPOOLDIR
  23.   if (getuid() == ROOTUID)
  24.     seteuid(ROOTUID);
  25.   sprintf(spoolfile,"%s/%s",SPOOLDIR,whoami());
  26. #else
  27.   if (gethome(whoami()))
  28.     sprintf(spoolfile,"%s/.msendmsgs",gethome(whoami()));
  29.   else {
  30.     printf("Can't find your home directory\n");
  31.     exit(1);
  32.   }
  33. #endif
  34.  
  35.   if (stat(spoolfile,&stb) == -1) {
  36.     printf("No old messages\n");
  37.     exit(0);
  38.   }
  39.  
  40.   execlp("tail","tail",d,spoolfile,0);
  41.   perror("huh");
  42.   exit(0);
  43. }
  44.  
  45. /* wipe out a user's spool file on demand
  46.  */
  47.  
  48. static void rmspool()
  49. { char s[MAXFILENAME+1];
  50.  
  51. #ifdef SPOOLDIR
  52.   if (getuid() == ROOTUID)
  53.     seteuid(ROOTUID);
  54.   sprintf(s,"%s/%s",SPOOLDIR,whoami());
  55. #else
  56.   if (gethome(whoami()))
  57.     sprintf(s,"%s/.msendmsgs",gethome(whoami()));
  58.   else {
  59.     printf("Can't find your home directory\n");
  60.     exit(1);
  61.   }
  62. #endif
  63.  
  64.   if (unlink(s) < 0)
  65.     perror(s);
  66.   exit(0);
  67. }
  68.  
  69. /* "documentation"
  70.  */
  71.  
  72. static void version() {
  73.   printf("   msend version %s patchlevel %s\n",VERSION,PATCHLEVEL);
  74.   printf("   by Jim Frost (%s) & Joe Ilacqua (%s)\n",MADD,SPIKE);
  75.   printf("   %s\n",Copyright);
  76. }
  77.  
  78. static void usage()
  79. { 
  80.   version();
  81. #ifndef GNUREADLINE
  82.   printf("Usage: msend username[@host] [message]\n");
  83.   printf("       msend . [message]\n");
  84. #else
  85.   printf("Usage: msend [-edit] username[@host] [message]\n");
  86.   printf("       msend [-edit] . [message]\n");
  87. #endif
  88.   printf("       msend -huh [# of messages to display]\n");
  89.   printf("       msend -clean\n");
  90.   printf("       msend -T tty [@host] [message]\n");
  91.   printf("       msend -version [@host]\n");
  92. #ifdef CBROADCAST
  93.   printf("       msend -B @host [message]\n");
  94. #endif
  95.   exit(0);
  96. }
  97.  
  98. static void bigsig()
  99. { printf("Signature too big\n");
  100.   exit(1);
  101. }
  102.  
  103. static void sigalrm()
  104. {
  105.   printf("Inactivity timeout\n");
  106.   exit(1);
  107. }
  108.  
  109. /* user breaks aren't really wanted, but we let the user break out if
  110.  * he or she REALLY wants to
  111.  */
  112.  
  113. static void sigint()
  114. { static wasint= 0;
  115.  
  116.   if (wasint) {
  117.     printf("\nConnection broken\n");
  118.     exit(1);
  119.   }
  120.   else {
  121.     wasint= 1;
  122.     printf("\nInterrupt received -- one more to kill\n");
  123.   }
  124. }
  125.  
  126. main(argc,argv)
  127. int  argc;
  128. char *argv[];
  129. { int    a,b;
  130.   int    broadcast;
  131.   int    totty;
  132.   int    uid;
  133.   long   when;
  134.   char   sig[MAXSIGNATURE+1];
  135.   char   sigfmt[MAXSIGNATURE+1];
  136.   char   line[MAXLINE+1];
  137.   char   token[MAXTOKEN+1];
  138.   char   fname[MAXFILENAME+1];
  139.   char   localhost[MAXHOSTNAME+1];
  140.   char   tmphost[MAXHOSTNAME+1];
  141.   struct hostent *hp;
  142. #ifdef GNUREADLINE
  143.   char *gnubuf, *GNUGets();
  144.   extern int rl_insert();
  145.   short edit = EDIT;
  146. #endif
  147.   FILE   *f;
  148.   struct simsg  si;
  149.   struct rimsg  ri;
  150.  
  151.   /* find out who we really are before becoming effectively root
  152.    */
  153.  
  154.   whoami();
  155.  
  156.   /* since tty termination requests can leave hanging daemons, ignore
  157.    * them.  user can still force termination, but not so easy.
  158.    */
  159.  
  160.   signal(SIGINT,sigint);
  161.  
  162.   /* daemon will timeout after 10 minutes of inactivity, so we might
  163.    * as well do it too.
  164.    */
  165.  
  166.   alarm(LIFETIME);
  167.   signal(SIGALRM,sigalrm);
  168.  
  169.   /* swap ruid and euid so our real id is root.  this enables us to toggle
  170.    * between root uid-ness and nonroot uid-ness as necessary.
  171.    */
  172.  
  173.   if (geteuid() == ROOTUID) {
  174.     uid= getuid();
  175.     setruid(geteuid());
  176.     seteuid(uid);
  177.   }
  178.  
  179.   /* please, no piping
  180.    */
  181.  
  182.   if (!isatty(0)) {
  183.     printf("Input must be a tty\n");
  184.     exit(1);
  185.   }
  186.  
  187.   gethostname(tmphost,MAXHOSTNAME);
  188.   if ((hp = gethostbyname(tmphost)) != NULL)
  189.     (void) strncpy(localhost,hp->h_name,MAXHOSTNAME);
  190.   else /* better than nothing */
  191.     (void) strncpy(localhost,tmphost,MAXHOSTNAME);
  192.   /* defaults
  193.    */
  194.  
  195.   broadcast= 0;
  196.   totty= 0;
  197.   sprintf(sig,"%s@%s (%s): ",whoami(),localhost,ttyname(0)+5);
  198.   si.ttty[0]= '\0';                /* ttyname(0)+5 to strip "/dev/" */
  199.  
  200.   /* look at options file
  201.    */
  202.  
  203.   sprintf(fname,"%s/.msendrc",gethome(whoami()));
  204.   if ((f= fopen(fname,"r")) != NULL) {
  205.     while (fgets(line,MAXLINE,f) != NULL) {
  206.       sscanf(line,"%s",token);
  207.  
  208.  
  209.       /* user define history size - the default is unlimited
  210.        */
  211.       if (!strcmp(token,"history")) {
  212.     /* If we are not using the GNU readline stuff history is meaningless,
  213.      * but that is no reason for it to cause an error...
  214.      */
  215. #ifdef GNUREADLINE
  216.     int n;
  217.     if (sscanf (line, "%*s %d", &n) == 1) 
  218.       stifle_history (n);
  219.     else {
  220.       printf("Bad history value in .msendrc\n");
  221.       exit(1);
  222.     }
  223. #endif
  224.     continue;
  225.       }
  226.       if (!strcmp(token,"editing_mode")) {
  227.     /* If we are not using the GNU readline stuff history is meaningless,
  228.      * but that is no reason for it to cause an error...
  229.      */
  230. #ifdef GNUREADLINE
  231.     char buf[10];
  232.     if (sscanf (line, "%*s \"%s\"", buf) == 1) {
  233.       if (!strncmp(buf,"vi",2))
  234.         rl_vi_editing_mode();
  235.       else if (!strncmp(buf,"emacs",5)) /* The default is emacs, but...*/
  236.         rl_emacs_editing_mode();
  237.       else {
  238.         printf("Bad editor value in .msendrc\n");
  239.         exit(1);
  240.       }
  241.     }
  242.     else {
  243.       printf("Bad editor value in .msendrc\n");
  244.       exit(1);
  245.     }
  246. #endif
  247.     continue;
  248.       }
  249.       if (!strcmp(token,"edit")) {
  250.     /* If we are not using the GNU readline stuff history is meaningless,
  251.      * but that is no reason for it to cause an error...
  252.      */
  253. #ifdef GNUREADLINE
  254.     char buf[10];
  255.     if (sscanf (line, "%*s \"%s\"", buf) == 1) {
  256.       if (!strncmp(buf,"on",2))
  257.         edit = 1;
  258.       else if (!strncmp(buf,"off",3)) /* The default is emacs, but...*/
  259.         edit = 0;
  260.       else {
  261.         printf("Bad editor value in .msendrc\n");
  262.         exit(1);
  263.       }
  264.     }
  265.     else {
  266.       printf("Bad editor value in .msendrc\n");
  267.       exit(1);
  268.     }
  269. #endif
  270.     continue;
  271.       }
  272.  
  273.       /* user defined signature
  274.        */
  275.  
  276.       if (!strcmp(token,"signature")) {
  277.         for (a= 0; (line[a] != '\0') && (line[a] != '"'); a++)
  278.           ;
  279.         if (line[a] == '\0') {
  280.           printf("Signature needs a quoted string\n");
  281.           exit(1);
  282.         }
  283.         for (a++, b= 0; (line[a] != '\0') && (line[a] != '"')
  284.                          && (b <= MAXSIGNATURE); a++)
  285.           sigfmt[b++]= line[a];
  286.         if (line[a] != '"') {
  287.           printf("Signature format string has no end quotes or is too long\n");
  288.           exit(1);
  289.         }
  290.         sigfmt[b]= '\0';
  291.  
  292.         /* parse signature format and build the signature
  293.          */
  294.  
  295.         sprintf(sig,"%s@%s ",whoami(),localhost); /* always include this */
  296.         for (b= 0; sigfmt[b] != '\0'; b++)
  297.           if (sigfmt[b] == '%')
  298.             switch (sigfmt[++b]) {
  299.               case '%' :
  300.                 if (strlen(sig) >= MAXSIGNATURE)
  301.                   bigsig();
  302.                 strcat(sig,"%");
  303.                 break;
  304.               case 'd' : /* date and time */
  305.                 if (strlen(sig) + strlen(ctime(&when)) > MAXSIGNATURE)
  306.                   bigsig();
  307.                 time(&when);
  308.                 strcat(sig,ctime(&when));
  309.                 sig[strlen(sig)-9]= '\0';
  310.                 break;
  311.               case 't' : /* tty */
  312.                 if (strlen(sig) + strlen(ttyname(0)+5) > MAXSIGNATURE)
  313.                   bigsig();
  314.                 strcat(sig,ttyname(0)+5);
  315.                 break;
  316.               default :
  317.                 a= strlen(sig);
  318.                 sig[a]= sigfmt[b];
  319.                 sig[a+1]= '\0';
  320.             }
  321.           else {
  322.             a= strlen(sig);
  323.             sig[a]= sigfmt[b];
  324.             sig[a+1]= '\0';
  325.           }
  326.         strcat(sig,": ");
  327.       }
  328.     }
  329.   fclose(f);
  330.   }
  331.  
  332.   /* figure out options
  333.    */
  334.  
  335.   for (a= 1; (a < argc) && (*argv[a] == '-'); a++) {
  336.  
  337.     /* the "huh" function
  338.      */
  339.  
  340.     if (!strcmp(argv[a],"-huh")) {
  341.       if (++a < argc)
  342.         huh(atoi(argv[a]));
  343.       else
  344.         huh(1);
  345.     }
  346.  
  347.     /* deliberate forgetfulness option
  348.      */
  349.  
  350.     if (!strcmp(argv[a],"-clean"))
  351.       rmspool();
  352.  
  353.     else if (!strcmp(argv[a],"-edit"))
  354. #ifdef GNUREADLINE
  355.       edit = !edit;
  356. #else
  357.     ;
  358. #endif
  359.     else if ((!strcmp(argv[a],"-version")) || *(argv[a]+1) == 'v') {
  360.       if (argc == 2) {
  361.     version();
  362.     exit(0);
  363.       } else if ( argc == 3 ) {
  364.     if (*argv[2] != '@')
  365.       usage();
  366.     strcpy(si.taddr,argv[2]);
  367.         (void) striphost(si.taddr,si.tohost);
  368.     si.fwdcount= 0;
  369.     si.msg[0]= '\0';
  370.     sendmessage(&si,&ri,SM_CLOSE|SM_VERSION);
  371.     if (ri.msg[0] == '\0') {
  372.       while(striphost(si.taddr,si.tohost))
  373.         strcpy(si.taddr,si.tohost);
  374.       printf ("%s is running a pre-1.0 version of msend\n",si.taddr);
  375.     } else
  376.       printf("%s\n",ri.msg);
  377.     exit(0);
  378.       } else
  379.     usage();
  380.     }
  381.  
  382.     /* decode option(s)
  383.      */
  384.  
  385.     else switch (*(argv[a]+1)) {
  386.       case 'B' :
  387. #ifdef CBROADCAST
  388.         broadcast= SM_BROADCAST;
  389.         break;
  390. #else
  391.         printf("Broadcasting is not allowed from this host\n");
  392.         exit(1);
  393. #endif
  394.       case 'c' : /* short form of -clean for lazy people like me */
  395.         rmspool();
  396.     break;
  397.       case 'e' : /* short form of -edit for lazy people like jim */
  398. #ifdef GNUREADLINE
  399.     edit = !edit;
  400. #endif
  401.     break;
  402.       case 'T' :
  403.         totty= SM_TTY;
  404.         if (*(argv[a]+2) == '\0') {
  405.           if (++a == argc) {
  406.             printf("Tty name missing\n");
  407.             exit(1);
  408.           }
  409.           else if (strlen(argv[a]) > MAXTTY) {
  410.             printf("Tty name too long\n");
  411.             exit(1);
  412.           }
  413.           else
  414.             strcpy(si.ttty,argv[a]);
  415.         }
  416.         else if (strlen(argv[a]+2) > MAXTTY) {
  417.           printf("Tty name too long\n");
  418.           exit(1);
  419.         }
  420.         else
  421.           strcpy(si.ttty,argv[a]+2);
  422.         break;
  423.       default :
  424.         usage();
  425.     }
  426.   }
  427.  
  428.   if ((!totty) && (a == argc))
  429.     usage();
  430.  
  431.   if (broadcast && totty) {
  432.     printf("Broadcast and tty selection functions are mutually exclusive\n");
  433.     exit(1);
  434.   }
  435.  
  436.   /* argument verification and "last send" function
  437.    */
  438.  
  439.   if ((!totty) && (!broadcast)) {
  440.     sprintf(fname,"%s/.lastmsend",gethome(whoami()));
  441.     if (!strcmp(argv[a],".")) {
  442.       if ((f= fopen(fname,"r")) == NULL) {
  443.         printf("Last recipient name unknown\n");
  444.         exit(1);
  445.       }
  446.       else {
  447.         fscanf(f,"%s",si.taddr);
  448.         fclose(f);
  449.         if (!striphost(si.taddr,si.tohost))
  450.           strcpy(si.tohost,localhost);
  451.       }
  452.       a++;
  453.     }
  454.     else {
  455.  
  456.       /* get name from command line argument and save it if we can
  457.        */
  458.  
  459.       if (*argv[a] == '@') {
  460.         printf("You must specify a username\n");
  461.         exit(1);
  462.       }
  463.       strcpy(si.taddr,argv[a]);
  464.       if ((f= fopen(fname,"w")) != NULL) {
  465.         fprintf(f,"%s\n",argv[a]);
  466.         fclose(f);
  467.       }
  468.       if (!striphost(si.taddr,si.tohost))
  469.         strcpy(si.tohost,localhost);
  470.       a++;
  471.     }
  472.   }
  473.   else if (totty) {
  474.     if ((a < argc) && (*argv[a] == '@'))
  475.       strcpy(si.tohost,argv[a++]+1);
  476.     else
  477.       strcpy(si.tohost,localhost);
  478.   }
  479.   else if (*argv[a] != '@') { /* broadcast */
  480.     printf("You must indicate '@host' for a broadcast\n");
  481.     exit(1);
  482.   }
  483.   else {
  484.     strcpy(si.taddr,argv[a++]);
  485.     (void) striphost(si.taddr,si.tohost);
  486.   }
  487.  
  488.   if (a < argc) {
  489.  
  490.     /* command line mode
  491.      */
  492.  
  493.     strcpy(&si.msg[0],sig); /* copy signature into message area */
  494.     for (; a < argc; a++) {
  495.       strcat(si.msg,argv[a]);
  496.       if (a != argc-1)
  497.         strcat(si.msg," ");
  498.     }
  499.     si.fwdcount= 0;
  500.     sendmessage(&si,&ri,SM_CLOSE|broadcast|totty);
  501.     if (ri.h.errno != RE_OK)
  502.       printf("%s\n",ri.msg);
  503.     exit(0);
  504.   }
  505.  
  506.   /* make initial connection to see if we can
  507.    */
  508.  
  509.   si.msg[0]= '\0';
  510.   sendmessage(&si,&ri,0);
  511.   if (ri.h.errno != RE_OK) {
  512.     printf("%s\n",ri.msg);
  513.     exit(1);
  514.   }
  515.  
  516.   strcpy(&si.msg[0],sig); /* copy signature into message area */
  517.  
  518.   for (;;) {
  519.     int once = 0;
  520. #ifdef GNUREADLINE
  521.     if (!edit) {
  522. #endif
  523.       printf("msend>");
  524.       if (fgets(&si.msg[strlen(sig)],MAXMSG-strlen(sig),stdin) == NULL) {
  525.     printf("^D\n");                       /* EOF */
  526.     si.msg[0]= '\0';                      /* send null message to close */
  527.     sendmessage(&si,&ri,SM_CLOSE);        /* the connection */
  528.     exit(0);
  529.       }
  530. #ifdef GNUREADLINE
  531.     } else {
  532.       rl_bind_key('\t',rl_insert); /* The default is "complete" */
  533.       bzero(&si.msg[strlen(sig)],MAXMSG-strlen(sig));
  534.       if((gnubuf = GNUGets("msend>")) == NULL) {
  535.     printf("^D\n");                       /* EOF */
  536.     si.msg[0]= '\0';                      /* send null message to close */
  537.     sendmessage(&si,&ri,SM_CLOSE);        /* the connection */
  538.     exit(0);
  539.       } else  {
  540.     strncpy(&si.msg[strlen(sig)],gnubuf,MAXMSG-strlen(sig)-1);
  541.     free(gnubuf);
  542.       }
  543.     }
  544. #endif
  545.     
  546.     alarm(LIFETIME);                         /* reset idle out timer */
  547. #ifdef GNUREADLINE
  548.     if (!edit)
  549. #endif
  550.       si.msg[strlen(si.msg)-1]= '\0';          /* strip newline */
  551.  
  552.     if (!strcmp(&si.msg[strlen(sig)],".")) { /* exit command */
  553.       si.msg[0]= '\0';
  554.       sendmessage(&si,&ri,SM_CLOSE);
  555.       exit(0);
  556.     }
  557.       
  558.     if (si.msg[strlen(sig)] != '\0') {
  559.       si.fwdcount= 0;
  560.       sendmessage(&si,&ri,broadcast|totty);
  561.       switch (ri.h.errno) {
  562.         case RE_OK :
  563.           break;
  564.     case RE_NOTFATAL:
  565.           printf("%s\n",ri.msg);
  566.       break;
  567.         default :
  568.           printf("%s\n",ri.msg);
  569.           exit(1);               /* connection is already broken */
  570.       }
  571.     }
  572.     if (!once) {
  573.       /* This is some code to strip off the domain name of the host 
  574.        * after we have sent one message.  It works because we know the 
  575.        * signature is in the form "<user>@<host><SPACE>...".  If that 
  576.        * format changes this will break...
  577.        */
  578.       int i,j;
  579.       once++;
  580.       for (i = 0; sig[i] != ' '; i++) {
  581.     if (sig[i] == '.') {
  582.       for (j = i+1; sig[j] != ' '; j++);
  583.       strcpy(&sig[i],&sig[j]);
  584.       strcpy(&si.msg[0],sig); /* copy signature into message area */
  585.       break;
  586.     }
  587.       }
  588.     }    
  589.   }
  590. }
  591.  
  592.