| version 1.6, 2002/04/05 01:49:09 |
version 1.15, 2004/02/13 03:10:19 |
|
|
| /* $OpenXM: OpenXM/rc/repl.c,v 1.5 2001/09/18 08:29:26 takayama Exp $ */ |
/* $OpenXM: OpenXM/rc/repl.c,v 1.14 2003/02/02 01:52:50 takayama Exp $ */ |
| |
|
| #include <stdio.h> |
#include <stdio.h> |
| #include <unistd.h> |
#include <stdlib.h> |
| |
|
| |
#include <errno.h> |
| |
#include <fcntl.h> |
| #include <string.h> |
#include <string.h> |
| |
#include <unistd.h> |
| |
|
| #define BUFSIZE 10000 |
#define BUFSIZE 10000 |
| |
#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[]) { |
main(int argc,char *argv[]) { |
| char s[BUFSIZE]; |
char s[BUFSIZE]; |
| char cwd[BUFSIZE]; |
char cwd[BUFSIZE]; |
| char *slash; |
char *slash; |
| char type = 'b'; |
char type = 'b'; |
| FILE *fp; |
FILE *fp; |
| |
int fd; |
| |
char sss_png[SSIZE]; |
| |
char sss_gif[SSIZE]; |
| |
|
| if (argc >= 2) { |
if (argc >= 2) { |
| if (strcmp(argv[1],"csh")==0) { |
if (strcmp(argv[1],"csh")==0) { |
| Line 17 main(int argc,char *argv[]) { |
|
| Line 32 main(int argc,char *argv[]) { |
|
| } |
} |
| } |
} |
| |
|
| getcwd(cwd,BUFSIZE); |
if (getcwd(cwd, sizeof(cwd)) == NULL) { |
| slash = strrchr(cwd,'/'); |
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; |
*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) { |
| Line 32 main(int argc,char *argv[]) { |
|
| Line 53 main(int argc,char *argv[]) { |
|
| |
|
| /* Configuring environmental variables. */ |
/* Configuring environmental variables. */ |
| /* Check if pstoimg (src/asir-contrib) supports png format. */ |
/* Check if pstoimg (src/asir-contrib) supports png format. */ |
| fp = fopen("/tmp/repl_test.ps","w"); |
if ((fp = fopen(REPL_PSFILE,"w")) == NULL) { |
| if (fp == NULL) { |
fprintf(stderr, "fopen: %s", strerror(errno)); |
| fprintf(stderr,"Open error of /tmp/repl_test.ps\n"); |
exit(EXIT_FAILURE); |
| exit(10); |
|
| } |
} |
| fprintf(fp,"/Times-Roman findfont 10 scalefont setfont\n"); |
fprintf(fp,"/Times-Roman findfont 10 scalefont setfont\n"); |
| fprintf(fp," 390 290 moveto (F) show \n"); |
fprintf(fp," 390 290 moveto (F) show \n"); |
| fprintf(fp,"showpage \n"); |
fprintf(fp,"showpage \n"); |
| fclose(fp); |
while (fclose(fp) != 0) { |
| if (!system("pstoimg -type png /tmp/repl_test.ps -out /tmp/repl_test.png >/dev/null")) { |
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') { |
if (type == 'b') { |
| printf("export OpenXM_PSTOIMG_TYPE=png\n"); |
printf("export OpenXM_PSTOIMG_TYPE=png\n"); |
| }else{ |
}else{ |
| printf("setenv OpenXM_PSTOIMG_TYPE png\n"); |
printf("setenv OpenXM_PSTOIMG_TYPE png\n"); |
| } |
} |
| }else if (!system("pstoimg -type gif /tmp/repl_test.ps -out /tmp/repl_test.gif >/dev/null")) { |
}else if (!system(sss_gif)) { |
| if (type == 'b') { |
if (type == 'b') { |
| printf("OpenXM_PSTOIMG_TYPE=gif\n"); |
printf("OpenXM_PSTOIMG_TYPE=gif\n"); |
| printf("export OpenXM_PSTOIMG_TYPE\n"); |
printf("export OpenXM_PSTOIMG_TYPE\n"); |
| Line 58 main(int argc,char *argv[]) { |
|
| Line 86 main(int argc,char *argv[]) { |
|
| printf("OpenXM_PSTOIMG_TYPE=no\n"); |
printf("OpenXM_PSTOIMG_TYPE=no\n"); |
| printf("export OpenXM_PSTOIMG_TYPE\n"); |
printf("export OpenXM_PSTOIMG_TYPE\n"); |
| } |
} |
| system("rm -f /tmp/repl_test.*"); |
|
| |
|
| |
while (unlink(REPL_IMGFILE) != 0) { |
| exit(0); |
if (errno == EINTR) |
| } |
continue; |
| |
break; |
| |
} |
| |
while (unlink(REPL_PSFILE) != 0) { |
| |
if (errno == EINTR) |
| |
continue; |
| |
break; |
| |
} |
| |
|
| |
exit(EXIT_SUCCESS); |
| |
} |