[BACK]Return to webasir2.c CVS log [TXT][DIR] Up to [local] / OpenXM / src / asir-port / cgi

Diff for /OpenXM/src/asir-port/cgi/webasir2.c between version 1.2 and 1.5

version 1.2, 2014/08/30 22:47:20 version 1.5, 2014/09/01 02:41:48
Line 1 
Line 1 
 /* $OpenXM: OpenXM/src/asir-port/cgi/webasir2.c,v 1.1 2014/08/30 12:25:56 takayama Exp $  /* $OpenXM: OpenXM/src/asir-port/cgi/webasir2.c,v 1.4 2014/08/31 10:20:33 takayama Exp $
  */   */
 /*  /*
   (httpd-asir2.sm1) run   webasir2   -(httpd-asir2.sm1) run   webasir2
      >log 2>&1
    - Todo, timer(limit, command, message) implement in sm1.
    - Example.  webasir2 --asir 'oxMessageBody=1%2B3%3B'
    - Example.  webasir2 --asir '3-2'
    - Error handling is not completed. Run src/kan96xx/Doc/httpd-asir2-kill.sh by cron.
  */   */
 #include <stdio.h>  #include <stdio.h>
 #include <stdlib.h>  #include <stdlib.h>
 #include <sys/types.h>  #include <sys/types.h>
   #include <unistd.h>
 #include <sys/socket.h>  #include <sys/socket.h>
 #include <sys/time.h>  #include <sys/time.h>
 #include <netinet/in.h>  #include <netinet/in.h>
Line 13 
Line 19 
 #include <string.h>  #include <string.h>
   
 #define SIZE 0x10000  #define SIZE 0x10000
   #define MKEY "oxMessageBody="
 char *byteArrayToUrlEncoding(char *s,int size);  char *byteArrayToUrlEncoding(char *s,int size);
   static int cgiHex(int p);
   char *urlEncodedStringToString(char *s);
   
 int Debug=1;  int Debug=1;
   int SetTimer=0;
 int main(int argc,char *argv[]) {  int main(int argc,char *argv[]) {
   int dataPort;    int dataPort;
   struct hostent *servhost;    struct hostent *servhost;
Line 23  int main(int argc,char *argv[]) {
Line 33  int main(int argc,char *argv[]) {
   FILE *fp;    FILE *fp;
   char s[1];    char s[1];
   char fname[SIZE];    char fname[SIZE];
   int i;    int i,j,c;
   char key[SIZE];    char key[SIZE];
   char comm[SIZE];    char comm[SIZE];
   char *asircomm;    char asircomm[SIZE];
   int quit;    int quit;
     char workf[SIZE];
   quit = 0;    quit = 0;
   asircomm="3-2;";    asircomm[0] = 0;
   for (i=1; i<argc; i++) {    for (i=1; i<argc; i++) {
     if (strcmp(argv[i],"--quit")==0) quit=1;      if (strcmp(argv[i],"--quit")==0) quit=1;
     else if (strcmp(argv[i],"--asir")==0) {      else if (strcmp(argv[i],"--asir")==0) {
       i++;        i++;
       if (i <argc) asircomm = argv[i];        if (i <argc) strcpy(asircomm,argv[i]);
       else { usage(); return(-1); }        else { usage(); return(-1); }
       }else if (strcmp(argv[i],"--debug")==0) {
         i++;
         if (i <argc) sscanf(argv[i],"%d",&Debug);
         else { usage(); return(-1); }
       }else if (strcmp(argv[i],"--settimer")==0) {
         i++;
         if (i <argc) sscanf(argv[i],"%d",&SetTimer);
         else { usage(); return(-1); }
       } else if (strcmp(argv[i],"--stdin")==0) {
         asircomm[0] = 0; j=0;
         while ((c=getchar()) != EOF) {
           asircomm[j] = c; j++; asircomm[j] = 0;
           if (j > SIZE-3) {
             fprintf(stderr,"error, too big input.\n"); return(-1);
           }
         }
       } else {
         usage(); return(0);
     }      }
   }    }
   
   system("ls /tmp/webasir*.txt >tmp-webasir.txt");    sprintf(workf,"/tmp/tmp-webasir-%d.txt",(int) getpid());
   fp = fopen("tmp-webasir.txt","r");    sprintf(comm,"ls /tmp/webasir*.txt >%s",workf);
     system(comm);
     fp = fopen(workf,"r");
   if (fp == NULL) {    if (fp == NULL) {
     fprintf(stderr,"No webasir2 is running.\n"); return(-1);      fprintf(stderr,"Failed ls\n"); return(-1);
   }    }
   fgets(fname,SIZE-2,fp);    fgets(fname,SIZE-2,fp);
   for (i=strlen(fname)-1; i>=0; i--) {    for (i=strlen(fname)-1; i>=0; i--) {
Line 50  int main(int argc,char *argv[]) {
Line 81  int main(int argc,char *argv[]) {
   }    }
   fclose(fp);    fclose(fp);
   if (strlen(fname)==0) {    if (strlen(fname)==0) {
     fprintf(stderr,"No webasir2 pid file.\n"); return(-1);      if (Debug) fprintf(stderr,"No webasir2 pid file.\n");
       if (Debug) {fprintf(stderr,"No webasir2 is running. Start server.\n");}
       startServer();
       sleep(5);
       system(comm);
       fp = fopen(workf,"r");
       if (fp == NULL) {
         fprintf(stderr,"Failed to start the server.\n"); return(-1);
       }
       fgets(fname,SIZE-2,fp);
       for (i=strlen(fname)-1; i>=0; i--) {
         if (fname[i] <= ' ') fname[i]=0; else break;
       }
       if (strlen(fname) == 0) {
         fprintf(stderr,"Failed to start the server. No webasir2 pid file.\n"); return(-1);
       }
       fclose(fp);
   }    }
   
   fp = fopen(fname,"r");    fp = fopen(fname,"r");
   if (fp == NULL) {    if (fp == NULL) {
     fprintf(stderr,"Open error of %s\n",fname); return(-1);      fprintf(stderr,"Open error of %s\n",fname); return(-1);
   }    }
     mylock(fname);
   fgets(key,SIZE-2,fp); sscanf(key,"%d",&dataPort);    fgets(key,SIZE-2,fp); sscanf(key,"%d",&dataPort);
   if (Debug) printf("dataPort=%d\n",dataPort);    if (Debug) printf("dataPort=%d\n",dataPort);
   fgets(key,SIZE-2,fp);    fgets(key,SIZE-2,fp);
Line 64  int main(int argc,char *argv[]) {
Line 113  int main(int argc,char *argv[]) {
   }    }
   if (Debug) printf("key=%s\n",key);    if (Debug) printf("key=%s\n",key);
   fclose(fp);    fclose(fp);
     sprintf(comm,"rm -f %s",workf);
     system(comm);
   
   if ((servhost = gethostbyname("localhost")) == NULL) {    if ((servhost = gethostbyname("localhost")) == NULL) {
     fprintf(stderr,"bad server name.\n"); return(-1);      fprintf(stderr,"bad server name.\n"); return(-1);
Line 81  int main(int argc,char *argv[]) {
Line 132  int main(int argc,char *argv[]) {
   if (Debug) fprintf(stderr,"Trying to connect port %d  ",ntohs(dServer.sin_port));    if (Debug) fprintf(stderr,"Trying to connect port %d  ",ntohs(dServer.sin_port));
   
   if (connect(dataPort,(struct sockaddr *)&dServer,sizeof(dServer)) == -1) {    if (connect(dataPort,(struct sockaddr *)&dServer,sizeof(dServer)) == -1) {
     fprintf(stderr,"cannot connect\n");      fprintf(stderr,"error: cannot connect\n");
   }else{  fprintf(stderr,"Connected\n"); }    }else{  if (Debug) fprintf(stderr,"Connected\n"); }
   
     if ((strlen(asircomm)==0) && (!quit)) {myunlock(fname); outputTop(); return(0); }
   
     /* If the input is MKEY=..., extract ... */
     if (strncmp(asircomm,MKEY,strlen(MKEY))==0) {
       strcpy(comm,&(asircomm[strlen(MKEY)]));
       strcpy(asircomm,comm);
       strcpy(asircomm,urlEncodedStringToString(asircomm));
       if (Debug) fprintf(stderr,"oxMessageBody, asircomm=%s\n",asircomm);
     }
   
     if (SetTimer) {
       strcpy(comm,asircomm);
       for (i=strlen(comm)-1; i>=0; i--) {
         if ((comm[i] == ';') || (comm[i] <= ' ')) comm[i] = 0;
         else break;
       }
       sprintf(asircomm,"timer(%d,%s,\"error(timeout %d sec)\");",
               SetTimer,comm,SetTimer);
     }
   if (quit) {    if (quit) {
     sprintf(comm,"GET /?msg=httpdAsirMeta+quit HTTP/1.1\n\n");      sprintf(comm,"GET /?msg=httpdAsirMeta+quit HTTP/1.1\n\n");
     write(dataPort,comm,strlen(comm));      write(dataPort,comm,strlen(comm));
Line 97  int main(int argc,char *argv[]) {
Line 167  int main(int argc,char *argv[]) {
   /* get result */    /* get result */
   for (i=0; i<SIZE; i++) comm[i]=0;    for (i=0; i<SIZE; i++) comm[i]=0;
   read(dataPort,comm,SIZE-2);    read(dataPort,comm,SIZE-2);
   printf("%s\n",comm);    /* remove newline(s) */
     for (i=strlen(comm)-1; i>0; i--) {
       if (comm[i] < ' ') comm[i] = 0;
       else break;
     }
     myunlock(fname);
     outputResult(comm);
 }  }
   
 /* from kan96xx/plugin/oxcgi.c */  /* from kan96xx/plugin/oxcgi.c */
Line 140  char *byteArrayToUrlEncoding(char *s,int size) {
Line 216  char *byteArrayToUrlEncoding(char *s,int size) {
 }  }
   
   
   char *urlEncodedStringToString(char *s)
   {
     char *ts;
     char *ts2;
     int i,j;
     int p;
     int vstart, vend;
     if (s == NULL) return(NULL);
     vstart = 0; vend = strlen(s)-1;
     ts = (char *) malloc(strlen(s)+2);
     if (ts == NULL)  ;
     j = 0; ts[j] = 0;
     for (i=vstart; i<=vend; i++,j++) {
       ts[j] = 0;
       if (s[i] == '+') {
         ts[j] = ' '; ts[j+1] = 0;
       }else if (s[i] == '%') {
         p = cgiHex(s[i+1])*16+cgiHex(s[i+2]);
         i = i+2;
         ts[j] = p; ts[j+1] = 0;
       }else {
         ts[j] = s[i]; ts[j+1] = 0;
       }
     }
     ts2 = (char *) malloc(j);
     if (ts2 == NULL) ;
     for (i=0; i<j; i++) {
       ts2[i] = ts[i];  ts2[i+1] = 0;
     }
     return (ts2);
   }
   
   static int cgiHex(int p) {
     if (p >= '0' && p <= '9') return (p-'0');
     if (p >= 'A' && p <= 'F') return (p-'A'+10);
     if (p >= 'a' && p <= 'f') return (p-'a'+10);
     if (Debug) fprintf(stderr,"%s\n","Invalid argument to cgiHex.");
   }
   
   outputTop() {
     printf("Content-Type: text/html\n\n");
     printf("<html><body>\nInput <br> asir-command <br> without semicolon. <br><br>\n");
     printf("<form method=\"POST\"> <input type=submit>\n");
     printf("<textarea name=\"oxMessageBody\" rows=10 cols=\"80\" wrap=\"soft\">\n");
     printf("</textarea>\n</form>\n");
     printf("</body></html>\n");
   }
   outputResult(char *s) {
     printf("Content-Type: text/plain\n\n");
     printf("%s\n",s);
   }
   startServer() {
     char comm[SIZE];
     char *r;
     r = getenv("CGI_ASIR_ALLOW");
     if (r == NULL) {
       setenv("CGI_ASIR_ALLOW","[(quit) (fctr)]",1);
     }
     sprintf(comm,"%s/src/kan96xx/Doc/httpd-asir2.sh >/dev/null 2>&1 &",getenv("OpenXM_HOME"));
     /* sprintf(comm,"echo $CGI_ASIR_ALLOW\n");  security check. */
     system(comm);
   }
   mylock(char *fname) {
     char comm[SIZE];
     sprintf(comm,"mv %s /tmp/lock-webasir-%d.txt",fname,getpid());
     system(comm);
   }
   myunlock(char *fname) {
     char comm[SIZE];
     sprintf(comm,"mv /tmp/lock-webasir-%d.txt %s",getpid(),fname);
     system(comm);
   }
 usage() {  usage() {
   fprintf(stderr,"webasir2 [--quit] [--asir command_string]\n");    fprintf(stderr,"webasir2 [--quit] [--asir command_string]\n");
     fprintf(stderr,"         [--debug level]\n");
     fprintf(stderr,"         [--settimer seconds]\n");
     fprintf(stderr,"webasir2 --stdin  ; command is obtained from the stdin.\n");
 }  }
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.5
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>