version 1.9, 2003/01/16 07:57:42 |
version 1.11, 2003/01/17 00:41:05 |
|
|
/* $OpenXM: OpenXM/rc/repl.c,v 1.8 2003/01/16 07:50:57 maekawa 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 <stdlib.h> |
|
|
#include <errno.h> |
#include <errno.h> |
|
#include <fcntl.h> |
#include <string.h> |
#include <string.h> |
#include <unistd.h> |
#include <unistd.h> |
|
|
#define BUFSIZE 10000 |
#define BUFSIZE 10000 |
|
|
|
#define REPL_PSFILE "/tmp/repl_test.ps" |
|
|
int |
int |
main(int argc,char *argv[]) { |
main(int argc,char *argv[]) { |
char s[BUFSIZE]; |
char s[BUFSIZE]; |
Line 16 main(int argc,char *argv[]) { |
|
Line 19 main(int argc,char *argv[]) { |
|
char *slash; |
char *slash; |
char type = 'b'; |
char type = 'b'; |
FILE *fp; |
FILE *fp; |
|
int fd; |
|
|
if (argc >= 2) { |
if (argc >= 2) { |
if (strcmp(argv[1],"csh")==0) { |
if (strcmp(argv[1],"csh")==0) { |
Line 25 main(int argc,char *argv[]) { |
|
Line 29 main(int argc,char *argv[]) { |
|
|
|
if (getcwd(cwd, sizeof(cwd)) == NULL) { |
if (getcwd(cwd, sizeof(cwd)) == NULL) { |
fprintf(stderr, "getcwd: %s\n", strerror(errno)); |
fprintf(stderr, "getcwd: %s\n", strerror(errno)); |
exit(1); |
exit(EXIT_FAILURE); |
} |
} |
slash = strrchr(cwd,'/'); |
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 41 main(int argc,char *argv[]) { |
|
Line 48 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 ((fd = open("/tmp/repl_test.ps", O_WRONLY|O_CREAT|O_EXCL|O_TRUNC, |
if (fp == NULL) { |
S_IRUSR|S_IWUSR)) < 0) { |
fprintf(stderr,"Open error of /tmp/repl_test.ps. Use the existing file.\n"); |
fprintf(stderr, "open: %s: %s\n", REPL_PSFILE, strerror(errno)); |
}else{ |
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 ((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 (!system("pstoimg -type png /tmp/repl_test.ps -out /tmp/repl_test.png >/dev/null")) { |
if (type == 'b') { |
if (type == 'b') { |
printf("export OpenXM_PSTOIMG_TYPE=png\n"); |
printf("export OpenXM_PSTOIMG_TYPE=png\n"); |
Line 70 main(int argc,char *argv[]) { |
|
Line 82 main(int argc,char *argv[]) { |
|
system("rm -f /tmp/repl_test.*"); |
system("rm -f /tmp/repl_test.*"); |
|
|
|
|
exit(0); |
exit(EXIT_SUCCESS); |
} |
} |