home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / MISC / NETWORK / TEL23SRC.ZIP / REXEC / REXEC.C
Encoding:
C/C++ Source or Header  |  1991-07-23  |  14.1 KB  |  473 lines
  1. /*
  2.     rexec.c
  3.     Provides a rexec client services for NCSA 2.3.
  4.  
  5.     By James Nau, College of Engineering,
  6.     University of Nebraska--Lincoln
  7. */
  8.  
  9. #define EXEC_PORT 512
  10.  
  11. #define ALARM 128
  12.  
  13. #include <stdio.h>
  14. #include <conio.h>
  15. #include <string.h>
  16. #include <stdlib.h>
  17. #include <dos.h>
  18. #include <ctype.h>
  19. #ifdef __TURBOC__
  20. #include "turboc.h"
  21. #endif
  22. #ifdef MSC
  23. #include <signal.h>
  24. #include <time.h>
  25. #endif
  26.  
  27.  
  28. #ifdef MEMORY_DEBUG
  29. #include "memdebug.h"
  30. #endif
  31. #include "netevent.h"
  32. #include "hostform.h"
  33. #include "whatami.h"
  34. #include "externs.h"
  35.  
  36. #include "netutils.h"
  37.  
  38. int debug = 0;          /* enable with -D option */
  39. int bypass_passwd=0;    /* whether to bypass the password check, not used */
  40.  
  41. unsigned char path_name[_MAX_DRIVE+_MAX_DIR],        /* character storage for the path name */
  42.     temp_str[20],buf[_MAX_DIR],temp_data[30];
  43.  
  44. /* Function Prototypes */
  45. int main(int argc, char *argv[]);
  46. #ifndef __TURBOC__
  47. static void randomize(void );
  48. #endif
  49. void usage(void);
  50. void do_rexec(char *host, char *line);
  51. int rexec(char *host, int port, char *user, char *passwd, char *cmd,
  52.           int *errchan);
  53.  
  54. /*
  55.    rexec [-h filename] [-D] host command
  56.    -h        filename is alternative CONFIG.TEL file
  57.    -D        Debug Flag
  58.    host      the NAME (or Number?) of a machine to execute command
  59.    command   a command to pass to the remote host
  60. */
  61.  
  62. int main(int argc, char *argv[])
  63. {
  64.    int i;
  65.    int switchcount=1;   /* How many switches and switch args are present */
  66.    int switchlimit;     /* How far into argc am I allowed to find switches */
  67.  
  68.    char command[80];    /* Text to send to remote host */
  69.  
  70.    char *ptr=0;         /* pointer to CONFIG.TEL file */
  71.  
  72.    char remote_host[256];    /* address of remote host */
  73.  
  74. #ifdef __TURBOC__
  75.     fnsplit(argv[0],path_name,buf,temp_str,temp_data);     /* split path up */
  76. #else
  77.    _splitpath(argv[0],path_name,buf,temp_str,temp_data);   /* split path up */
  78. #endif
  79.    strcat(path_name,buf);         /* append the path name */
  80.    strcat(path_name,temp_str);    /* append filename */
  81.  
  82.    if (argc < 3) usage();    /* Oops, they haven't got it right */
  83. /* rexec host cmd [-args] */
  84. /* rexec -h file host cmd [-args] */
  85. /* rexec -h file -D host cmd [-args] */
  86. /* rexec -D host cmd [-args] */
  87.  
  88. /*     switchlimit = (argc<5 ? argc-2 : 4); */
  89.    switchlimit = 3;     /* Assume -D has to come first :) */
  90.    if (debug) printf("Switchlimit [%d]\n", switchlimit);
  91.  
  92. /* get the command line arguments */
  93. /* Can't parse entire command line-- what if command is ps -eaf
  94.    so, this appears to do the job for the number of switches allowed */
  95.    for (i=1; i< switchlimit; i++)     /* Switches have to be first 3 */
  96.       if (argv[i][0] == '-')
  97.       {
  98.          switch (argv[i][1])
  99.          {
  100.             case 'D':        /* Debug switch */
  101.                debug = 1;
  102.                if (debug) printf("Debugging now ON\n");
  103.                switchcount++;
  104.                break;
  105.             case 'h':        /* Alternate CONFIG.TEL file switch */
  106.                if (i+1 < switchlimit)
  107.                   ptr = argv[i+1];
  108.                else
  109.                   usage();
  110.                if (debug) printf("Using config file [%s]\n",ptr);
  111.                switchcount += 2;
  112.                break;
  113.             default:
  114.                usage ();   /* Tell user how to use it */
  115.          }
  116.          if (debug) printf("argv[%d][1]=-%c\n", i, argv[i][1]);
  117.       }
  118.  
  119.    if ((switchcount+2) > argc) usage ();    /* do we have the rest ?? */
  120.  
  121.    strcpy(remote_host, argv[switchcount++]);     /* the Host to execute */
  122.  
  123.    strcpy(command, argv[switchcount++]);         /* The Command */
  124.    for (; switchcount < argc;)    /* How much command */
  125.    {
  126.       strcat(command, " ");
  127.       strcat(command, argv[switchcount++]);
  128.    }
  129.  
  130.    if (debug) printf("sending [%s] to [%s]\n",command, remote_host);
  131.  
  132. /* exit (0);  */ /* For debugging if you have no network! (No E-Net at home :( */
  133.  
  134.    signal(SIGINT,SIG_IGN);   /* Microsoft intercept of break */
  135.  
  136. /* Do session initialization.  Snetinit reads config file. */
  137.    /* go find a valid CONFIG.TEL file */
  138.    if (ptr == (char *)NULL) ptr = getenv("CONFIG.TEL");
  139.    if (debug) printf("ptr after getenv [%s]\n",ptr);
  140.    if (ptr != (char *)NULL) Shostfile(ptr);
  141.  
  142.    if (Snetinit()) /* Should return 0 if network is OK */
  143.    {
  144.       printf("network init failed\n");
  145.       exit (1);
  146.    }
  147.  
  148. /* Just Do It */
  149.    do_rexec(remote_host, command);
  150.  
  151.    exit(0);
  152.    return(0);
  153. }
  154.  
  155.  
  156. void do_rexec(char *remote_host, char *cmd)
  157. {
  158.    char user[33];       /* Username */
  159.    char passwd[17];     /* Password for said user */
  160.    int errchan;         /* Dummy error channel, for now at least */
  161.    int conn_id;         /* Connection ID from rexec */
  162.  
  163.    char netbuf[512];    /* buffer for netread */
  164.    int netbuflen=512;   /* Length of netbuf */
  165.    int len;             /* length of data read from net */
  166.  
  167.    int event;           /* event from Sgetevent */
  168.    int theclass;        /* class that is returned */
  169.    int dat;             /* for Sgetevent info too */
  170.  
  171.    char ch;             /* Byte to send from kbhit()/getch */
  172.  
  173.    user[0] = '\0';           /* Init to NULL */
  174.    passwd[0] = '\0';         /* Init to NULL */
  175.  
  176. /* Establish connection and all that stuff... */
  177.    conn_id = rexec(remote_host, EXEC_PORT, user, passwd, cmd, &errchan);
  178.    if (conn_id < 0)
  179.    {
  180.       printf("Couldn't rexec\n");
  181.       printf("rexec returned %d\n", conn_id);
  182.       exit (1);
  183.    }
  184.  
  185.    theclass = 0;
  186.    event = 0;
  187.  
  188. /*     while ((theclass == CONCLASS && event != CONCLOSE)  && !netest(conn_id)) */
  189.    while (!netest(conn_id))
  190.                 /* No CONnection info and good connection */
  191.    {
  192.       if (kbhit())      /* Keyboard hit, let's send it */
  193.       {
  194.          ch = (char)getch();           /* gotta get it */
  195.          netwrite (conn_id, &ch, 1);   /* out it goes */
  196.          netpush(conn_id);
  197.       }
  198.  
  199.       Stask();     /* I think I have to call this to post my alarm? */
  200.       event = Sgetevent(CONCLASS | USERCLASS, &theclass, &dat);
  201.       if (debug)
  202.          printf("event[%d] theclass[%d] dat[%d] [%d]\n",event, theclass, dat, conn_id);
  203.       if (!event) continue;
  204.       if (conn_id != dat) continue;
  205.  
  206.       if (event == CONDATA)
  207.       {
  208.          len = netread(conn_id, netbuf, netbuflen);
  209.          if (!len) continue;
  210.          printf("%.*s", len, netbuf);
  211.       }
  212.       else if (event == CONCLOSE)      /* I guess we're done */
  213.       {
  214.          netshut();     /* Shut down the network */
  215.          break;
  216.       }
  217.       else
  218.       {
  219.          printf("Unexpected event: [%d]\n", event);
  220.       }
  221.    }
  222. /*     printf("out of while loop theclass[%d] event[%d] ntest[%d]\n",theclass, event, netest(conn_id)); */
  223. }
  224.  
  225.  
  226. #if defined(MSC) && !defined(__TURBOC__)
  227. /******************************************************************
  228. *
  229. * randomize()
  230. *
  231. * replicates the randomize function of Turbo C
  232. * MSC 5.1 does not contain it so we have to write it ourselves.
  233. *
  234. */
  235.  
  236. static void randomize(void )
  237. {
  238.     srand((unsigned)time(NULL));
  239. }
  240. #endif
  241.  
  242.  
  243. void filter (char *buffer, int buffer_len)
  244. /* filter out control characters, escape sequences, etc
  245.    keeps from reprogramming keys, ...
  246. */
  247. {
  248.    int i;
  249.    char ch;
  250.  
  251.    for (i=0; i<buffer_len; i++)
  252.    {
  253.       ch = *(buffer+i);
  254.       if (!(isprint(ch) || isspace(ch))) *(buffer+i) = '?';
  255.    }
  256. }
  257.  
  258.  
  259. void usage()
  260. {
  261. /*
  262.    rexec [-h filename] [-D] host command
  263.    -h        filename is alternative CONFIG.TEL file
  264.    -D        Debug Flag
  265.    host      the NAME (or Number?) of a machine to execute command
  266.    command   a command to pass to the remote host
  267. */
  268.  
  269.    printf("Usage: %s [-h filename] host command\n\n", path_name);
  270.  
  271.    printf("   -h        filename is alternative CONFIG.TEL file\n");
  272.    printf("   host      the host to execute command\n");
  273.    printf("   command   command for remote system to execute\n");
  274.    printf("\nNOTE:  This program (rexec) is flakey right now\n");
  275.    printf("       it seems to work fine for OUTPUT only commands\n");
  276.    printf("       (such as who, ps).  But, commands requiring input\n");
  277.    printf("       do NOT work correctly  (it seems to end properly, but\n");
  278.    printf("       it never kills the process).\n\n");
  279.    exit (-1);
  280. }
  281.  
  282.  
  283. int rexec(char *host, int port, char *user, char *passwd, char *cmd,
  284.           int *errchan)
  285. /* implement a Un*x like rexec function.
  286.       host is the host we want to rexec to
  287.       port is the destination port (usually 512 for rexec)
  288.       user is the username on host
  289.       passwd is the password on host
  290.       cmd is command to pass to host
  291.       errchan is where to route stderr to (see below)
  292.  
  293.    if username and passwd are NULL, then we prompt for them
  294.    from stdin.  Maybe should have a USER environ var for a default
  295.    user, but NEVER have a passwd scanned from anywhere since we're on
  296.    a PC with No File Security...
  297.  
  298.    Also, currently, errchan is ignored.  It's supposed to be:  If errchan
  299.    is non-zero, then open another socket back to the system to process
  300.    stderr on.
  301.  
  302.    Return value is the connection id that we established.
  303.                 or negative if an error somewhere.
  304.  
  305. */
  306.  
  307. {
  308.    int i;          /* scratch variable */
  309.    int from_port;  /* where to come from */
  310.    struct machinfo *host_info;    /* structure to return machine info in */
  311.    int conn_id;         /* Connection id from connect_sock */
  312.    char buff[256];      /* Command to send to remote host */
  313.    int ubase;           /* how far into buff we are */
  314.    int timeout=100;     /* timeout period */
  315.  
  316.    int event;           /* event from Sgetevent */
  317.    int theclass;        /* class that is returned */
  318.    int dat;             /* for Sgetevent info too */
  319.  
  320.    char nullbyte;       /* NULL byte we are supposed to get back */
  321.    int len;             /* length of data back from netread */
  322.  
  323.  
  324.    if (!*errchan) printf("Unsupported errchan right now--Continuing\n");
  325.  
  326.  
  327. /* Hmm, may get into trouble if we run out of space, or are passed
  328.    **pointers, instead of having space available???? */
  329.  
  330. /*     if (user == (char *)NULL)       */ /* no user specified, go get it */
  331.    if (!strlen(user))        /* no user specified, go get it */
  332.    {
  333.       printf("Enter Username: ");
  334.       gets(user);
  335.    }
  336. /*     if (passwd == (char *)NULL)   */ /* no passwd specified, go get one */
  337.    if (!strlen(passwd))      /* no passwd specified, go get one */
  338.    {
  339.       printf("Enter password: ");
  340.       i = 0;
  341.       while ((passwd[i] = (char)getch()) != '\xd') i++;    /* get w/o echo */
  342.       passwd[i] = '\0';
  343.       putchar('\n');
  344.    }
  345.  
  346.  
  347.    buff[0] = '\0';  /* Null, since we want to leave stderr alone */
  348.  
  349.    ubase = 1;
  350.    for (i=0; i<(int)strlen(user); i++)      /* Add username */
  351.       buff[i+ubase] = user[i];
  352.    ubase += strlen(user);
  353.  
  354.    buff[ubase] = '\0';       /* Terminate with NULL */
  355.    ubase++;
  356.  
  357.    for (i=0; i<(int)strlen(passwd); i++)  /* add the password */
  358.       buff[i+ubase] = passwd[i];
  359.    ubase += strlen(passwd);
  360.  
  361.    buff[ubase] = '\0';       /* Terminate with NULL */
  362.    ubase++;
  363.  
  364.    for (i=0; i<(int)strlen(cmd); i++)       /* add the command to execute */
  365.       buff[i+ubase] = cmd[i];
  366.    ubase += strlen(cmd);
  367.  
  368.    buff[ubase] = '\0';       /* Terminate with NULL */
  369.    ubase++;
  370.  
  371.    if (debug)
  372.    {
  373.       for (i=0; i<ubase; i++)
  374.          printf("%d ", buff[i]);
  375.       printf("\n");
  376.  
  377.       for (i=0; i<ubase; i++)
  378.          printf("%c", buff[i]);
  379.       printf("\n");
  380.    }
  381.  
  382.    /* pick a source port at random from the set of privileged ports */
  383.    randomize();
  384.    from_port = rand() % 1023;
  385.  
  386.    /* do name lookup for server */
  387.    host_info = gethostinfo(host);
  388.    if (host_info == (struct machinfo *)NULL)     /* couldn't do it, message in gethostinfo */
  389.    {
  390.       printf("Couldn't lookup host [%s]\n", host);
  391.       return(-1);
  392.    }
  393.  
  394. /* print out the IP number of the destination host */
  395. /* this should come out in production.  Leave for debugging though */
  396.    if (debug)
  397.    {
  398.       printf("[");
  399.       for (i=0; i<4; i++)
  400.          printf("%d.",host_info->hostip[i]);
  401.       printf("]\n");
  402.    }
  403.  
  404.    /* open the connection */
  405.    conn_id = connect_sock(host_info, port, EXEC_PORT);
  406.    if (conn_id < 0)
  407.    {
  408.       netshut();        /* Shut down the network */
  409.       printf("connect_sock returned %d, exiting\n",conn_id);
  410.       return (-2);
  411.    }
  412.    if (debug) printf("connection ident [%d]\n",conn_id);
  413.  
  414.    /* send the request */
  415.    netwrite(conn_id, buff, ubase);
  416.    if (debug) printf("netwrite succeeded--flushing buffer\n");
  417.  
  418.    netpush(conn_id);
  419.  
  420.    if (debug)
  421.       if (!netest(conn_id))
  422.          printf("Connection OK\n");
  423.       else
  424.          printf("nettest: %d\n", netest(conn_id));
  425.  
  426. /* OK, now, we'll attempt to set an alarm to time out in timeout seconds
  427.    if we get a connection, but no response */
  428.  
  429.    Stimerset(USERCLASS, ALARM, 0, timeout);
  430.    if (debug) printf("timer set to go off in %d seconds\n", timeout);
  431.  
  432.    theclass = 0;
  433.    event = 0;
  434.    while ((theclass != USERCLASS || event != ALARM) && !netest(conn_id))
  435.                 /* no alarm and good connection */
  436.    {
  437.       Stask();     /* I think I have to call this to post my alarm? */
  438.       event = Sgetevent(CONCLASS | USERCLASS, &theclass, &dat);
  439.       if (debug)
  440.          printf("event[%d] theclass[%d] dat[%d] [%d]\n",event, theclass, dat, conn_id);
  441.       if (!event) continue;
  442.       if (conn_id != dat) continue;
  443.  
  444.       if (event == CONDATA)
  445.       {
  446.          len = netread(conn_id, &nullbyte, 1);
  447.          if (len == 0) continue;
  448.          if (nullbyte != 0) printf( "Byte != 0 [%d]\n", nullbyte);
  449.          Stimerunset(USERCLASS, ALARM, 0);
  450.          return (conn_id);
  451.       }
  452.       else if (event == CONCLOSE)
  453.       {
  454.          printf("Unexpected closing of connection!\n");
  455.          netshut();          /* Shut down the network */
  456.          return (-3);
  457.       }
  458.       else
  459.       {
  460.          printf("Unexpected event: [%d]\n", event);
  461.       }
  462.    }
  463.    if (theclass == USERCLASS && event == ALARM)
  464.    {
  465.       printf("Connection timed out in %d seconds\n", timeout);
  466.       netshut();        /* Shut down the network */
  467.       return (-4);
  468.    }
  469.    netshut();      /* Shut down the network */
  470.    return (-5);
  471. }
  472.  
  473.