[BACK]Return to repl.c CVS log [TXT][DIR] Up to [local] / OpenXM / rc

Diff for /OpenXM/rc/repl.c between version 1.2 and 1.16

version 1.2, 2000/01/19 06:10:33 version 1.16, 2004/06/14 11:10:40
Line 1 
Line 1 
 /* $OpenXM: OpenXM/rc/repl.c,v 1.1 2000/01/18 09:38:58 takayama Exp $ */  /* $OpenXM: OpenXM/rc/repl.c,v 1.15 2004/02/13 03:10:19 takayama Exp $ */
   
 #include <stdio.h>  #include <stdio.h>
   #include <stdlib.h>
   
   #include <errno.h>
   #include <fcntl.h>
   #include <string.h>
 #include <unistd.h>  #include <unistd.h>
   
 #define BUFSIZE 10000  #define BUFSIZE 10000
 main() {  #define SSIZE  1024
   
   /* If you make the following two strings longer, increase the number SSIZE */
   #define REPL_IMGFILE    "repl_test.img"
   #define REPL_PSFILE         "repl_test.ps"
   
   int
   main(int argc,char *argv[]) {
   char s[BUFSIZE];    char s[BUFSIZE];
   char cwd[BUFSIZE];    char cwd[BUFSIZE];
   getcwd(cwd,BUFSIZE);    char *slash;
     char type = 'b';
     FILE *fp;
     int fd;
     char sss_png[SSIZE];
     char sss_gif[SSIZE];
   
     if (argc >= 2) {
           if (strcmp(argv[1],"csh")==0) {
             type = 'c';
           }
     }
   
     if (getcwd(cwd, sizeof(cwd)) == NULL) {
           fprintf(stderr, "getcwd: %s\n", strerror(errno));
           exit(EXIT_FAILURE);
     }
     if ((slash = strrchr(cwd, '/')) == cwd) {
           fprintf(stderr, "The current working directory is /.\n");
           exit(EXIT_FAILURE);
     }
     *slash = 0;
   while (fgets(s,BUFSIZE,stdin) != NULL) {    while (fgets(s,BUFSIZE,stdin) != NULL) {
         if (strcmp(s,"OpenXM_HOME=$HOME/OpenXM\n") == 0) {          if (strcmp(s,"OpenXM_HOME=$HOME/OpenXM\n") == 0) {
           printf("OpenXM_HOME=%s/../../OpenXM\n",cwd);            printf("OpenXM_HOME=%s\n",cwd);
         }else if (strcmp(s,"setenv OpenXM_HOME $HOME/OpenXM\n") == 0) {          }else if (strcmp(s,"setenv OpenXM_HOME $HOME/OpenXM\n") == 0) {
           printf("setenv OpenXM_HOME %s/../../OpenXM\n",cwd);            printf("setenv OpenXM_HOME %s\n",cwd);
         }else{          }else{
           printf("%s",s);            printf("%s",s);
         }          }
   }    }
   exit(0);  
 }  
   
     /* Configuring environmental variables. */
     /* Check if pstoimg (src/asir-contrib) supports png format. */
     if ((fp = fopen(REPL_PSFILE,"w")) == NULL) {
           fprintf(stderr, "fopen: %s", strerror(errno));
           exit(EXIT_FAILURE);
     }
     fprintf(fp,"/Times-Roman findfont 10 scalefont setfont\n");
     fprintf(fp," 390 290 moveto  (F) show \n");
     fprintf(fp,"showpage \n");
     while (fclose(fp) != 0) {
           if (errno == EINTR)
                   continue;
           break;
     }
   
     sprintf(sss_png,"pstoimg -type png %s -out %s >/dev/null",REPL_PSFILE,REPL_IMGFILE);
     sprintf(sss_gif,"pstoimg -type gif %s -out %s >/dev/null",REPL_PSFILE,REPL_IMGFILE);
   
     if (!system(sss_png)) {
           if (type == 'b') {
             printf("export OpenXM_PSTOIMG_TYPE=png\n");
           }else{
             printf("setenv OpenXM_PSTOIMG_TYPE png\n");
           }
     }else if (!system(sss_gif)) {
           if (type == 'b') {
             printf("OpenXM_PSTOIMG_TYPE=gif\n");
         printf("export OpenXM_PSTOIMG_TYPE\n");
           }else{
             printf("setenv OpenXM_PSTOIMG_TYPE=gif\n");
           }
     }else {
       if (type == 'b') {
         printf("OpenXM_PSTOIMG_TYPE=no\n");
         printf("export OpenXM_PSTOIMG_TYPE\n");
       }else{
         printf("setenv OpenXM_PSTOIMG_TYPE no\n");
       }
     }
   
     while (unlink(REPL_IMGFILE) != 0) {
           if (errno == EINTR)
                   continue;
           break;
     }
     while (unlink(REPL_PSFILE) != 0) {
           if (errno == EINTR)
                   continue;
           break;
     }
   
     exit(EXIT_SUCCESS);
   }
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.16
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>