[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.5 and 1.15.2.1

version 1.5, 2000/12/01 07:34:48 version 1.15.2.1, 2005/10/12 10:43:32
Line 1 
Line 1 
 /* -*- mode: C -*- */  /* -*- mode: C -*- */
 /* $OpenXM: OpenXM/src/oxc/oxc.c,v 1.4 2000/11/28 04:02:56 ohara Exp $ */  /* $OpenXM: OpenXM/src/oxc/oxc.c,v 1.15 2005/10/12 10:37:24 takayama 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 16  static char *password = "";
Line 17  static char *password = "";
   
 int oxf_connect_dup(char *remote, short port)  int oxf_connect_dup(char *remote, short port)
 {  {
     int fd = mysocketOpen(remote, port);    int fd = mysocketOpen(remote, port);
     /* Here do we need to confirm? */    /* Here do we need to confirm? */
     dup2(fd, 3);    dup2(fd, 3);
     dup2(fd, 4); /* is it necessary? maybe fd == 4. */    dup2(fd, 4); /* is it necessary? maybe fd == 4. */
     return fd;    return fd;
 }  }
   
 int lf_oxc_open_main(char *cmd, short port)  int lf_oxc_open_main(char *cmd, short port)
 {  {
     int pid = 0;    pid_t pid;
     if (cmd != NULL && (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);
     }    }
     fprintf(stderr, "oxc: cannnot oxc_open(%s, %d).\n", cmd, port);    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;
     }      }
     return oxfp;    }
     oxf_confirm_server(oxfp, password);
     oxf_determine_byteorder_server(oxfp);
     return oxfp;
 }  }
   
 /* xterm, kterm, rxvt, gnome-terminal, ... */  __inline__
 static char *xterminal()  static char *sskip(char *s)
 {  {
         char *e = getenv("OpenXM_XTERM");    while (isspace(*s)) {
         return (e != NULL)? e: "xterm";      s++;
     }
     return s;
 }  }
   
 static int basic0[] =  {  __inline__
         CMO_ERROR2,  static char *wskip(char *s)
         CMO_NULL,  {
         CMO_INT32,    while (!isspace(*s) && *s != '\0') {
         CMO_DATUM,      s++;
         CMO_STRING,    }
         CMO_MATHCAP,    return s;
         CMO_LIST,  }
         0  
 };  
   
   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, ... */
   static char **makeargs(char **oldargs)
   {
     char *e = getenv("OpenXM_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;
   }
   
 /* 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 73  void pipe_read_info(char **hostname, int *port, char *
Line 137  void pipe_read_info(char **hostname, int *port, char *
   
 int main(int argc, char *argv[])  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':
                 case 'x':        quiet = 1;
                         if (getenv("DISPLAY") != NULL) {        break;
                                 oxlog = 1;      case 'x':
                         }        if (getenv("DISPLAY") != NULL) {
             break;          oxlog = 1;
         default:        }
         }        break;
       case 'd':
         delay_s = optarg;
         delay = atoi(optarg);
         break;
       default:
         ;
     }      }
     argc -= optind;    }
     argv += optind;    argc -= optind;
     argv += optind;
   
     if (strlen(remote_host) == 0) {    if (!quiet) {
                 pipe_read_info(&remote_host, &port, &password);      ox_stderr_init(stderr);
                 port_s = malloc(32);    }
                 sprintf(port_s, "%d", port);  
     }  
         if (oxlog) {  
                 execlp(xterm, xterm, "-e", myname,  
                            "-h", remote_host, "-p", port_s, "-c", password);  
         }  
   
     fprintf(stderr, "start connection!\n");    if (strlen(remote_host) == 0) {
         if ((oxfp = connection()) == NULL) {      pipe_read_info(&remote_host, &port, &password);
         fprintf(stderr, "oxc: cannot connect.\n");      port_s = malloc(32);
     }else {      sprintf(port_s, "%d", port);
                 fprintf(stderr, "oxc: oxfp = %p, fd = %d\n", oxfp, oxfp->fd);    }
             mathcap_init(20001006, "v2000.10.06", "oxc", basic0, NULL);    if (oxlog) {
                 sm(oxfp);      char *common_args[] = {"-e", myname, "-d", delay_s,
         }                             "-h", remote_host, "-p", port_s, "-c",
     return 0;                             password, NULL};
       char **args = makeargs(common_args);
       execvp(args[0], args);
     }
   
     ox_printf("start connection!\n");
     usleep(delay);
     if ((oxfp = connection()) != NULL) {
       ox_printf("oxc: oxfp = %p, fd = %d\n", oxfp, oxfp->fd);
       mathcap_init("v2000.10.06", "oxc");
       sm(oxfp);
     }
     return 0;
 }  }
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.15.2.1
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>