| version 1.13, 2005/06/16 05:07:24 |
version 1.17, 2020/10/04 06:10:36 |
|
|
| /*$OpenXM: OpenXM/src/kan96xx/plugin/cmo.c,v 1.12 2004/08/28 12:50:06 takayama Exp $*/ |
/*$OpenXM: OpenXM/src/kan96xx/plugin/cmo.c,v 1.16 2020/10/04 03:14:07 noro Exp $*/ |
| #include <stdio.h> |
#include <stdio.h> |
| #include <string.h> |
#include <string.h> |
| /* #include <netinet/in.h> */ |
/* #include <netinet/in.h> */ |
| Line 162 dumpCmoBuf(struct cmoBuffer *cb) |
|
| Line 162 dumpCmoBuf(struct cmoBuffer *cb) |
|
| char *s; |
char *s; |
| if (cb->isStream) { |
if (cb->isStream) { |
| printf("cmoBuffer is directed to a stream.\n"); |
printf("cmoBuffer is directed to a stream.\n"); |
| return; |
return 0; |
| } |
} |
| size = cb->pos; |
size = cb->pos; |
| s = (char *)(cb->buf); |
s = (char *)(cb->buf); |
| Line 173 dumpCmoBuf(struct cmoBuffer *cb) |
|
| Line 173 dumpCmoBuf(struct cmoBuffer *cb) |
|
| printf("%3x",(int)(unsigned char)s[i]); |
printf("%3x",(int)(unsigned char)s[i]); |
| } |
} |
| putchar('\n'); |
putchar('\n'); |
| |
return 0; |
| } |
} |
| |
|
| /* This obsolete function is used to write data |
/* This obsolete function is used to write data |
| Line 1462 void *KSmathCapByStruct(void) |
|
| Line 1463 void *KSmathCapByStruct(void) |
|
| mathcap->sm[10] = SM_dupErrors; |
mathcap->sm[10] = SM_dupErrors; |
| mathcap->sm[11] = SM_pushCMOtag; |
mathcap->sm[11] = SM_pushCMOtag; |
| mathcap->sm[12] = SM_executeFunctionWithOptionalArgument; |
mathcap->sm[12] = SM_executeFunctionWithOptionalArgument; |
| mathcap->smSize = 13; |
mathcap->sm[13] = SM_nop; |
| |
mathcap->smSize = 14; |
| |
|
| return((void *)mathcap); |
return((void *)mathcap); |
| } |
} |
| Line 1474 int cmoOutRawInt(int k) |
|
| Line 1476 int cmoOutRawInt(int k) |
|
| cmoOutputToBuf(CMOPUT,tmp,sizeof(cmoint)); |
cmoOutputToBuf(CMOPUT,tmp,sizeof(cmoint)); |
| } |
} |
| |
|
| warningCmo(char *s) { |
int warningCmo(char *s) { |
| fprintf(stderr,"Warning: plugin/cmo.c : %s\n",s); |
fprintf(stderr,"Warning: plugin/cmo.c : %s\n",s); |
| } |
} |
| |
|
| errorCmo(char *s) { |
int errorCmo(char *s) { |
| fprintf(stderr,"plugin/cmo.c : %s\n",s); |
fprintf(stderr,"plugin/cmo.c : %s\n",s); |
| errorKan1("%s\n","cmo fatal error. ox servers need SM_control_reset_connection."); |
errorKan1("%s\n","cmo fatal error. ox servers need SM_control_reset_connection."); |
| /* ErrorPacket is automatically push on the ErrorStack. |
/* ErrorPacket is automatically push on the ErrorStack. |