version 1.11, 2003/11/18 11:08:27 |
version 1.12, 2003/11/19 01:02:40 |
|
|
/* $OpenXM: OpenXM/src/kxx/oxserver00.c,v 1.10 2003/08/22 16:08:23 ohara Exp $ */ |
/* $OpenXM: OpenXM/src/kxx/oxserver00.c,v 1.11 2003/11/18 11:08:27 takayama Exp $ */ |
/* nullserver01 */ |
/* nullserver01 */ |
#include <stdio.h> |
#include <stdio.h> |
#include <sys/types.h> |
#include <sys/types.h> |
Line 27 jmp_buf EnvOfChildServer; |
|
Line 27 jmp_buf EnvOfChildServer; |
|
#endif |
#endif |
|
|
int JmpMessage = 0; |
int JmpMessage = 0; |
|
extern int Lisplike; |
|
|
static char *getSuffix(char *s); |
static char *getSuffix(char *s); |
main(int argc, char *argv[]) { |
main(int argc, char *argv[]) { |
Line 43 main(int argc, char *argv[]) { |
|
Line 44 main(int argc, char *argv[]) { |
|
if (strcmp(argv[1],"-monitor")==0) { |
if (strcmp(argv[1],"-monitor")==0) { |
fprintf(stderr,"Taking the packet monitor.\n"); |
fprintf(stderr,"Taking the packet monitor.\n"); |
PacketMonitor = 1; |
PacketMonitor = 1; |
|
}else if (strcmp(argv[1],"-lispLike")==0) { |
|
fprintf(stderr,"Output lispLike expression.\n"); |
|
Lisplike = 1; |
}else{ |
}else{ |
fprintf(stderr,"Unknown option. Possible options are -monitor\n"); |
fprintf(stderr,"Unknown option. Possible options are -monitor\n"); |
} |
} |
Line 96 nullserver(int fdStreamIn,int fdStreamOut) { |
|
Line 100 nullserver(int fdStreamIn,int fdStreamOut) { |
|
#endif |
#endif |
int engineByteOrder; |
int engineByteOrder; |
|
|
/* for debug */ |
/* for debug, use -monitor |
PacketMonitor = 1; |
PacketMonitor = 1; */ |
|
|
fflush(NULL); |
fflush(NULL); |
engineByteOrder = oxTellMyByteOrder(fdStreamOut,fdStreamIn); |
engineByteOrder = oxTellMyByteOrder(fdStreamOut,fdStreamIn); |
Line 237 nullserverCommand(ox_stream ostreamIn,ox_stream ostrea |
|
Line 241 nullserverCommand(ox_stream ostreamIn,ox_stream ostrea |
|
message = OXprintMessage; |
message = OXprintMessage; |
/* message_body */ |
/* message_body */ |
id = oxGetInt32(ostreamIn); /* get the function_id */ |
id = oxGetInt32(ostreamIn); /* get the function_id */ |
if (message) {fprintf(stderr,"\nfunction_id is %d\n",id);} |
if (message) {fprintf(stderr,"\nfunction_id is %d; %s\n",id,oxFIDtoStr(id));} |
switch( id ) { |
switch( id ) { |
case SM_mathcap: |
case SM_mathcap: |
if (message) fprintf(stderr," mathcap\n"); |
if (message) fprintf(stderr," mathcap\n"); |