version 1.2, 2000/01/19 06:10:33 |
version 1.11, 2003/01/17 00:41:05 |
|
|
/* $OpenXM: OpenXM/rc/repl.c,v 1.1 2000/01/18 09:38:58 takayama Exp $ */ |
/* $OpenXM: OpenXM/rc/repl.c,v 1.10 2003/01/16 08:27:23 maekawa 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 REPL_PSFILE "/tmp/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; |
|
|
|
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 ((fd = open("/tmp/repl_test.ps", O_WRONLY|O_CREAT|O_EXCL|O_TRUNC, |
|
S_IRUSR|S_IWUSR)) < 0) { |
|
fprintf(stderr, "open: %s: %s\n", REPL_PSFILE, strerror(errno)); |
|
exit(EXIT_FAILURE); |
|
} |
|
if ((fp = fdopen(fd, "w")) == NULL) { |
|
fprintf(stderr, "fdopen: %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"); |
|
fclose(fp); |
|
|
|
if (!system("pstoimg -type png /tmp/repl_test.ps -out /tmp/repl_test.png >/dev/null")) { |
|
if (type == 'b') { |
|
printf("export OpenXM_PSTOIMG_TYPE=png\n"); |
|
}else{ |
|
printf("setenv OpenXM_PSTOIMG_TYPE png\n"); |
|
} |
|
}else if (!system("pstoimg -type gif /tmp/repl_test.ps -out /tmp/repl_test.gif >/dev/null")) { |
|
if (type == 'b') { |
|
printf("OpenXM_PSTOIMG_TYPE=gif\n"); |
|
printf("export OpenXM_PSTOIMG_TYPE\n"); |
|
}else{ |
|
printf("setenv OpenXM_PSTOIMG_TYPE=gif\n"); |
|
} |
|
}else { |
|
printf("OpenXM_PSTOIMG_TYPE=no\n"); |
|
printf("export OpenXM_PSTOIMG_TYPE\n"); |
|
} |
|
system("rm -f /tmp/repl_test.*"); |
|
|
|
|
|
exit(EXIT_SUCCESS); |
|
} |