[BACK]Return to oxc.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / oxc

Diff for /OpenXM/src/oxc/oxc.c between version 1.8 and 1.14

version 1.8, 2000/12/14 03:14:01 version 1.14, 2005/07/28 07:22:33
Line 1 
Line 1 
 /* -*- mode: C -*- */  /* -*- mode: C -*- */
 /* $OpenXM: OpenXM/src/oxc/oxc.c,v 1.7 2000/12/14 01:35:58 ohara Exp $ */  /* $OpenXM: OpenXM/src/oxc/oxc.c,v 1.13 2004/12/01 17:42:46 ohara Exp $ */
   
 #include <stdio.h>  #include <stdio.h>
 #include <stdlib.h>  #include <stdlib.h>
 #include <unistd.h>  #include <unistd.h>
   #include <ctype.h>
 #include <string.h>  #include <string.h>
 #include "mysocket.h"  #include "mysocket.h"
 #include "ox_toolkit.h"  #include "ox_toolkit.h"
Line 28  int lf_oxc_open_main(char *cmd, short port)
Line 29  int lf_oxc_open_main(char *cmd, short port)
     pid_t pid;      pid_t pid;
     if ((pid = fork()) == 0) {      if ((pid = fork()) == 0) {
         oxf_connect_dup(remote_host, port);          oxf_connect_dup(remote_host, port);
         fprintf(stderr, "oxc: oxc_open(%s, %d)\n", cmd, port);          ox_printf("oxc: oxc_open(%s, %d)\n", cmd, port);
         execlp(cmd, cmd, NULL);          execlp(cmd, cmd, NULL);
     }      }
     return pid; /* if error, pid == 0 */      return pid; /* if error, pid == 0 */
 }  }
   
   #define MAX_RETRY  2000
   
 OXFILE *connection()  OXFILE *connection()
 {  {
     OXFILE *oxfp = oxf_connect_active(remote_host, port);      OXFILE *oxfp;
     if (oxfp != NULL) {      int counter = MAX_RETRY;
         oxf_confirm_server(oxfp, password);      while((oxfp = oxf_connect_active(remote_host, port)) == NULL) {
         oxf_determine_byteorder_server(oxfp);          if (--counter > 0) {
               usleep(100); /* spends 100 micro seconds */
           }else {
               ox_printf("oxc: cannot connect.\n");
               return NULL;
           }
     }      }
       oxf_confirm_server(oxfp, password);
       oxf_determine_byteorder_server(oxfp);
     return oxfp;      return oxfp;
 }  }
   
   __inline__
   static char *sskip(char *s)
   {
       while (isspace(*s)) {
           s++;
       }
       return s;
   }
   
   __inline__
   static char *wskip(char *s)
   {
       while (!isspace(*s) && *s != '\0') {
           s++;
       }
       return s;
   }
   
   static int wc(char *s)
   {
       int n = 0;
       s = sskip(s);
       while(*s != '\0') {
           s = wskip(s);
           s = sskip(s);
           n++;
       }
       return n;
   }
   
   static void word(char *str, int argc, char *argv[])
   {
       int i;
       char *s = strcpy(malloc(strlen(str)+1), str);
       for(i=0; i<argc; i++) {
           s = sskip(s);
           argv[i] = s;
           s = wskip(s);
           *s++ = '\0';
       }
       argv[i] = NULL;
   }
   
   __inline__
   static int arglen(char *args[])
   {
       int len;
       for(len = 0; args[len] != NULL; len++) {
           ;
       }
       return len;
   }
   
 /* xterm, kterm, rxvt, gnome-terminal, ... */  /* xterm, kterm, rxvt, gnome-terminal, ... */
 static char *xterminal()  static char **makeargs(char **oldargs)
 {  {
     char *e = getenv("OpenXM_XTERM");      char *e = getenv("OpenXM_XTERM");
     return (e != NULL)? e: "xterm";      int argc;
       char **newargs;
       int len = arglen(oldargs);
       if (e == NULL) {
           argc = 1;
           newargs = malloc((len+1+argc)*sizeof(char *));
           newargs[0] = "xterm";
       }else {
           argc = wc(e);
           newargs = malloc((len+1+argc)*sizeof(char *));
           word(e, argc, newargs);
       }
       memcpy(newargs+argc, oldargs, (len+1)*sizeof(char *));
       return newargs;
 }  }
   
 static int basic0[] =  {  
     CMO_ERROR2,  
     CMO_NULL,  
     CMO_INT32,  
     CMO_DATUM,  
     CMO_STRING,  
     CMO_MATHCAP,  
     CMO_LIST,  
     0  
 };  
   
 /* We assume that data has the following format:  /* We assume that data has the following format:
    LENGTH hostname '\0' port '\0' password '\0'     LENGTH hostname '\0' port '\0' password '\0'
    where LENGTH is an integer with network byte order and its value     where LENGTH is an integer with network byte order and its value
Line 74  int main(int argc, char *argv[])
Line 139  int main(int argc, char *argv[])
 {  {
     OXFILE *oxfp;      OXFILE *oxfp;
     char *port_s = "";      char *port_s = "";
     char *xterm =  xterminal();  
     char *myname = argv[0];      char *myname = argv[0];
     int oxlog = 0;      int oxlog = 0;
     int c;      int c;
       int delay = 0;
       char *delay_s = "0";
           int quiet = 0;
   
     while ((c = getopt(argc, argv, "c:p:h:x")) != -1) {      while ((c = getopt(argc, argv, "c:d:h:p:qx")) != -1) {
         switch(c) {          switch(c) {
         case 'h':          case 'h':
             remote_host = optarg;              remote_host = optarg;
             break;              break;
         case 'c':          case 'c':
             password = optarg;              password = optarg;
   
             break;              break;
         case 'p':          case 'p':
             port = atoi(optarg);              port = atoi(optarg);
             port_s = optarg;              port_s = optarg;
             break;              break;
           case 'q':
               quiet = 1;
               break;
         case 'x':          case 'x':
             if (getenv("DISPLAY") != NULL) {              if (getenv("DISPLAY") != NULL) {
                 oxlog = 1;                  oxlog = 1;
             }              }
             break;              break;
           case 'd':
               delay_s = optarg;
               delay = atoi(optarg);
               break;
         default:          default:
               ;
         }          }
     }      }
     argc -= optind;      argc -= optind;
     argv += optind;      argv += optind;
   
       if (!quiet) {
           ox_stderr_init(stderr);
           }
   
     if (strlen(remote_host) == 0) {      if (strlen(remote_host) == 0) {
         pipe_read_info(&remote_host, &port, &password);          pipe_read_info(&remote_host, &port, &password);
         port_s = malloc(32);          port_s = malloc(32);
         sprintf(port_s, "%d", port);          sprintf(port_s, "%d", port);
     }      }
     if (oxlog) {      if (oxlog) {
         execlp(xterm, xterm, "-e", myname,          char *common_args[] = {"-e", myname, "-d", delay_s,
                "-h", remote_host, "-p", port_s, "-c", password, NULL);                            "-h", remote_host, "-p", port_s, "-c",
                 fprintf(stderr, "oxc:: cannot exec \"%s oxc ...\"\n", xterm);                            password, NULL};
           char **args = makeargs(common_args);
           execvp(args[0], args);
     }      }
   
     fprintf(stderr, "start connection!\n");      ox_printf("start connection!\n");
     if ((oxfp = connection()) == NULL) {      usleep(delay);
         fprintf(stderr, "oxc: cannot connect.\n");      if ((oxfp = connection()) != NULL) {
     }else {          ox_printf("oxc: oxfp = %p, fd = %d\n", oxfp, oxfp->fd);
         fprintf(stderr, "oxc: oxfp = %p, fd = %d\n", oxfp, oxfp->fd);          mathcap_init("v2000.10.06", "oxc");
         mathcap_init(20001006, "v2000.10.06", "oxc", basic0, NULL);  
         sm(oxfp);          sm(oxfp);
     }      }
     return 0;      return 0;
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.14
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>