Annotation of OpenXM/src/kxx/ox100start.c, Revision 1.3
1.3 ! takayama 1: /* $OpenXM: OpenXM/src/kxx/ox100start.c,v 1.2 2003/07/21 11:56:33 takayama Exp $ */
1.1 takayama 2: /* Moved from misc-2003/07/cygwin/test.c */
3: #include <stdio.h>
4: #include <sys/types.h>
5: #include <sys/stat.h>
6: #include <fcntl.h>
7: #include <stdlib.h>
8: #include <unistd.h>
9: #include <sys/wait.h>
10: #include <signal.h>
11: #include <ctype.h>
1.2 takayama 12: #include "ox_pathfinder.h"
1.1 takayama 13:
1.2 takayama 14: static void usage(void);
1.1 takayama 15: static int forkExec(char **argv);
1.3 ! takayama 16: void *sGC_malloc(int size) {
! 17: return ((void *)malloc(size));
! 18: }
1.1 takayama 19:
1.2 takayama 20: extern char **environ;
1.1 takayama 21:
22: main(int argc,char *argv[]) {
23: char *s;
24: char s2[1024];
25: char buf[1024];
26: FILE *fp;
27: char **aaa;
28: char **eee;
29: int i;
30: char *serverName;
31:
1.2 takayama 32: /*
1.1 takayama 33: if (Verbose_get_home) {
34: printf("ostype=%s\n",getOStypes());
35: printf("OpenXM_HOME=%s\n",getOpenXM_HOME());
36: printf("sm lib =%s\n",get_sm1_lib_path());
37: printf("k0 lib =%s\n",get_k0_lib_path());
38: printf("ox_asir =%s\n",get_ox_asir_path());
39: }
1.2 takayama 40: */
1.1 takayama 41:
42: /* Initialize parameters */
43: serverName = NULL;
44: aaa = NULL;
45:
46: for (i=1 ; i<argc; i++) {
47: if (strcmp(argv[i],"-e")==0) {
48: if (aaa == NULL) {
49: fprintf(stderr,"Server is not found or not specified by -oxserver options.\n");
50: exit(1);
51: }
52: aaa = catArgv(aaa,&(argv[i+1]));
53: break;
54: }else if (strcmp(argv[i],"-oxserver")==0) {
55: i++;
56: serverName = argv[i];
57: aaa = getServerEnv(serverName);
58: }else if (strcmp(argv[i],"-nox")==0) {
1.2 takayama 59: ox_pathfinderNoX(1);
1.1 takayama 60: }else{
61: fprintf(stderr,"Unknown option.\n");
62: usage();
63: exit(10);
64: }
65: }
66:
67: forkExec(aaa);
1.2 takayama 68: }
1.1 takayama 69:
1.2 takayama 70: #define MYFORKCP_SIZE 100
71: static int Myforkchildren[MYFORKCP_SIZE];
72: static int Myforkcp=0;
73: static void myforkwait() {
74: int status;
75: int pid;
76: int i,j;
77: signal(SIGCHLD,SIG_IGN);
78: pid = wait(&status);
79: fprintf(stderr,"Child process %d is exiting.\n",pid);
80: for (i=0; i<Myforkcp; i++) {
81: if (Myforkchildren[i] == pid) {
82: for (j=i; j<Myforkcp-1; j++) {
83: Myforkchildren[j] = Myforkchildren[j+1];
84: }
85: if (Myforkcp > 0) Myforkcp--;
86: }
87: }
88: signal(SIGCHLD,myforkwait);
1.1 takayama 89: }
90:
91: static void usage() {
92: fprintf(stderr,"oxstart100 -oxserver xxx [-e args]\n");
93: fprintf(stderr,"Examples: \n");
94: fprintf(stderr," oxstart100 -oxserver bin/ox_sm1 -e -reverse -data 3010 --control 3012 -pass 1121343432434 \n");
95: }
96:
97: static int forkExec(char **argv) {
98: int pid;
99: char **eee;
100: int m;
101: m = 0;
102: if (argv == NULL) {
103: fprintf(stderr,"Cannot fork and exec.\n"); return -1;
104: }
105: if ((pid = fork()) > 0) {
106: if (m&2) {
107: /* Do not call singal to turn around a trouble on cygwin. BUG. */
108: }else{
109: signal(SIGCHLD,myforkwait); /* to kill Zombie */
110: }
111: Myforkchildren[Myforkcp++] = pid;
112: if (Myforkcp >= MYFORKCP_SIZE-1) {
113: fprintf(stderr,"Child process table is full.\n");
114: Myforkcp = 0;
115: }
116: }else{
117: /* close the specified files */
118: if (m&1) {
119: sigset_t sss;
120: sigemptyset(&sss);
121: sigaddset(&sss,SIGINT);
122: sigprocmask(SIG_BLOCK,&sss,NULL);
123: }
1.2 takayama 124: if (ox_pathfinderNoX(-1)) {
1.1 takayama 125: FILE *null;
126: null = fopen("/dev/null","wb");
127: dup2(fileno(null),1);
128: dup2(fileno(null),2);
129: }
130: execve(argv[0],argv,environ);
131: /* This place will never be reached unless execv fails. */
132: fprintf(stderr,"forkExec fails: ");
133: }
134: }
135:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>