version 1.24, 2004/09/17 08:46:10 |
version 1.27, 2013/11/06 06:23:24 |
|
|
/* $OpenXM: OpenXM/src/kan96xx/plugin/oxmisc2.c,v 1.23 2004/09/17 07:27:28 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/kan96xx/plugin/oxmisc2.c,v 1.26 2005/07/03 11:08:54 ohara Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
|
#include <string.h> |
#include "ox_kan.h" |
#include "ox_kan.h" |
#include "oxmisc2.h" /* This file requires sm1 object description. */ |
#include "oxmisc2.h" /* This file requires sm1 object description. */ |
#include "cmo.h" |
#include "cmo.h" |
Line 23 int oxGet(oxclientp client, struct object *op,int *isO |
|
Line 24 int oxGet(oxclientp client, struct object *op,int *isO |
|
int ans; |
int ans; |
ox_stream os; |
ox_stream os; |
int m; |
int m; |
struct object rob; |
struct object rob = OINIT; |
int sss; /* Serial number of the recieved packet. */ |
int sss; /* Serial number of the recieved packet. */ |
*isObj = 0; |
*isObj = 0; |
op->tag = Snull; |
op->tag = Snull; |
Line 140 int oxReq(oxclientp client,int func,struct object ob) |
|
Line 141 int oxReq(oxclientp client,int func,struct object ob) |
|
ob3 ob2 */ |
ob3 ob2 */ |
/* oxtags [[OX_DATA, [cmo numbers]],[OX_DATA_LOCAL,[opt]],...]*/ |
/* oxtags [[OX_DATA, [cmo numbers]],[OX_DATA_LOCAL,[opt]],...]*/ |
{ |
{ |
struct object ob1; |
struct object ob1 = OINIT; |
struct object ob2; |
struct object ob2 = OINIT; |
struct object ob3; |
struct object ob3 = OINIT; |
struct object obm; |
struct object obm = OINIT; |
struct object smtags; |
struct object smtags = OINIT; |
struct object oxtags; |
struct object oxtags = OINIT; |
struct object ox; |
struct object ox = OINIT; |
int n,i; |
int n,i; |
struct mathCap mathcap; |
struct mathCap mathcap; |
|
|
Line 279 struct object KoxCreateClient(struct object ip, |
|
Line 280 struct object KoxCreateClient(struct object ip, |
|
struct object portStream, |
struct object portStream, |
struct object portControl,struct object pass) |
struct object portControl,struct object pass) |
{ |
{ |
struct object rob; |
struct object rob = OINIT; |
oxclientp client; |
oxclientp client; |
char *passControl; char *passData; |
char *passControl; char *passData; |
struct object tob; |
struct object tob = OINIT; |
passControl = NULL; passData = NULL; |
passControl = NULL; passData = NULL; |
rob.tag = Snull; |
rob.tag = Snull; |
if (ip.tag != Sdollar) { |
if (ip.tag != Sdollar) { |
Line 366 static int isItClientObject(struct object ob) |
|
Line 367 static int isItClientObject(struct object ob) |
|
|
|
struct object KoxIsThereErrorClient(struct object ob) |
struct object KoxIsThereErrorClient(struct object ob) |
{ |
{ |
struct object rob; |
struct object rob = OINIT; |
int ans; |
int ans; |
int size; |
int size; |
oxclient cc; |
oxclient cc; |
Line 382 struct object KoxIsThereErrorClient(struct object ob) |
|
Line 383 struct object KoxIsThereErrorClient(struct object ob) |
|
|
|
int oxClientToObject(oxclientp client,struct object rob) |
int oxClientToObject(oxclientp client,struct object rob) |
{ |
{ |
struct object ob; |
struct object ob = OINIT; |
if (client == NULL) return; |
if (client == NULL) return 0; |
/* rob = newObjectArray(N_OF_CLIENT_FIELDS); */ |
/* rob = newObjectArray(N_OF_CLIENT_FIELDS); */ |
if (rob.tag != Sarray) { |
if (rob.tag != Sarray) { |
errorOxmisc2("oxClientToObject(): the second argument must be an array."); |
errorOxmisc2("oxClientToObject(): the second argument must be an array."); |
Line 421 int oxClientToObject(oxclientp client,struct object ro |
|
Line 422 int oxClientToObject(oxclientp client,struct object ro |
|
|
|
int oxObjectToClient(struct object ob,oxclientp cp) |
int oxObjectToClient(struct object ob,oxclientp cp) |
{ |
{ |
struct object ob1; |
struct object ob1 = OINIT; |
struct object *obp; |
struct object *obp; |
if (cp == NULL) { |
if (cp == NULL) { |
errorOxmisc2("oxObjectToClient(): the second argument is NULL"); |
errorOxmisc2("oxObjectToClient(): the second argument is NULL"); |
Line 486 struct object KoxReq(struct object client, |
|
Line 487 struct object KoxReq(struct object client, |
|
{ |
{ |
int ans; |
int ans; |
static oxclientp cc1 = NULL; |
static oxclientp cc1 = NULL; |
struct object rob; |
struct object rob = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (cc1 == NULL) { |
if (cc1 == NULL) { |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
Line 517 struct object KoxGet(struct object client) |
|
Line 518 struct object KoxGet(struct object client) |
|
{ |
{ |
int ans,k; |
int ans,k; |
static oxclientp cc1 = NULL; |
static oxclientp cc1 = NULL; |
struct object rob; |
struct object rob = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (cc1 == NULL) { |
if (cc1 == NULL) { |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
Line 548 struct object KoxGetFromControl(struct object client) |
|
Line 549 struct object KoxGetFromControl(struct object client) |
|
{ |
{ |
int ans; |
int ans; |
static oxclientp cc1 = NULL; |
static oxclientp cc1 = NULL; |
struct object rob; |
struct object rob = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (cc1 == NULL) { |
if (cc1 == NULL) { |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
Line 578 struct object KoxMultiSelect(struct object oclients,st |
|
Line 579 struct object KoxMultiSelect(struct object oclients,st |
|
static int csize = 0; |
static int csize = 0; |
static oxclientp *clients = NULL; |
static oxclientp *clients = NULL; |
oxclientp cc1; |
oxclientp cc1; |
struct object rob; |
struct object rob = OINIT; |
int i; |
int i; |
int tt; |
int tt; |
struct object ob1; |
struct object ob1 = OINIT; |
struct object ob2; |
struct object ob2 = OINIT; |
struct object ob0; |
struct object ob0 = OINIT; |
int size; |
int size; |
int ans; |
int ans; |
int dataready[1024]; |
int dataready[1024]; |
Line 648 struct object KoxWatch(struct object client,struct obj |
|
Line 649 struct object KoxWatch(struct object client,struct obj |
|
{ |
{ |
int ans,k; |
int ans,k; |
static oxclientp cc1 = NULL; |
static oxclientp cc1 = NULL; |
struct object rob; |
struct object rob = OINIT; |
extern int WatchStream; |
extern int WatchStream; |
rob.tag = Snull; |
rob.tag = Snull; |
if (client.tag == Sinteger) { |
if (client.tag == Sinteger) { |
Line 657 struct object KoxWatch(struct object client,struct obj |
|
Line 658 struct object KoxWatch(struct object client,struct obj |
|
}else{ |
}else{ |
WatchStream = 0; |
WatchStream = 0; |
} |
} |
return; |
return rob; |
} |
} |
if (cc1 == NULL) { |
if (cc1 == NULL) { |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
Line 685 struct object KoxLog(struct object client,struct objec |
|
Line 686 struct object KoxLog(struct object client,struct objec |
|
{ |
{ |
int ans,k; |
int ans,k; |
static oxclientp cc1 = NULL; |
static oxclientp cc1 = NULL; |
struct object rob; |
struct object rob = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (cc1 == NULL) { |
if (cc1 == NULL) { |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
Line 720 struct object KoxLog(struct object client,struct objec |
|
Line 721 struct object KoxLog(struct object client,struct objec |
|
|
|
struct object KoxLogStop(struct object client) { |
struct object KoxLogStop(struct object client) { |
static oxclientp cc1 = NULL; |
static oxclientp cc1 = NULL; |
struct object rob; |
struct object rob = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (cc1 == NULL) { |
if (cc1 == NULL) { |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
Line 742 struct object KoxLogStop(struct object client) { |
|
Line 743 struct object KoxLogStop(struct object client) { |
|
struct object KoxCloseClient(struct object client) { |
struct object KoxCloseClient(struct object client) { |
oxclientp cc1 = NULL; |
oxclientp cc1 = NULL; |
oxclient cc; |
oxclient cc; |
struct object rob; |
struct object rob = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
cc1 = &cc; |
cc1 = &cc; |
if (oxObjectToClient(client,cc1) == -1) return(rob); |
if (oxObjectToClient(client,cc1) == -1) return(rob); |
Line 851 static int cmoCheck00(struct object obj,int cmo[], int |
|
Line 852 static int cmoCheck00(struct object obj,int cmo[], int |
|
|
|
int cmoCheckMathCap(struct object obj, struct object *obp) |
int cmoCheckMathCap(struct object obj, struct object *obp) |
{ |
{ |
struct object mathcap; |
struct object mathcap = OINIT; |
struct object cmolist; |
struct object cmolist = OINIT; |
struct object mathcapMain; |
struct object mathcapMain = OINIT; |
struct object mathcapThird; |
struct object mathcapThird = OINIT; |
struct object ox; |
struct object ox = OINIT; |
struct object oxtag; |
struct object oxtag = OINIT; |
struct object ob0; |
struct object ob0 = OINIT; |
int oxsize; |
int oxsize; |
int n; |
int n; |
int i; |
int i; |
Line 969 int cmoCheckMathCap(struct object obj, struct object * |
|
Line 970 int cmoCheckMathCap(struct object obj, struct object * |
|
|
|
|
|
struct object KoxGenPortFile(void) { |
struct object KoxGenPortFile(void) { |
struct object ob; |
struct object ob = OINIT; |
ob = KpoString(oxGenPortFile()); |
ob = KpoString(oxGenPortFile()); |
return(ob); |
return(ob); |
} |
} |
Line 979 void KoxRemovePortFile(void) { |
|
Line 980 void KoxRemovePortFile(void) { |
|
|
|
void oxPushMathCap(struct mathCap *mathcap) |
void oxPushMathCap(struct mathCap *mathcap) |
{ |
{ |
struct object rob; |
struct object rob = OINIT; |
rob = newMathCap(mathcap); |
rob = newMathCap(mathcap); |
Kpush(rob); |
Kpush(rob); |
} |
} |
|
|
struct object KoxGenPass(void) { |
struct object KoxGenPass(void) { |
struct object rob; |
struct object rob = OINIT; |
rob = KpoString(oxGenPass()); |
rob = KpoString(oxGenPass()); |
return(rob); |
return(rob); |
} |
} |
|
|
struct object KoxGetPort(struct object host) |
struct object KoxGetPort(struct object host) |
{ |
{ |
struct object rob; |
struct object rob = OINIT; |
int fdStream, fdControl; |
int fdStream, fdControl; |
int portStream, portControl; |
int portStream, portControl; |
extern int OpenedSocket; |
extern int OpenedSocket; |
Line 1016 struct object KoxGetPort(struct object host) |
|
Line 1017 struct object KoxGetPort(struct object host) |
|
} |
} |
struct object KoxGetPort1(struct object host) |
struct object KoxGetPort1(struct object host) |
{ |
{ |
struct object rob; |
struct object rob = OINIT; |
int fdStream; |
int fdStream; |
int portStream; |
int portStream; |
extern int OpenedSocket; |
extern int OpenedSocket; |
Line 1039 struct object KoxCreateClient2(struct object peer, |
|
Line 1040 struct object KoxCreateClient2(struct object peer, |
|
struct object ipmask, |
struct object ipmask, |
struct object pass) |
struct object pass) |
{ |
{ |
struct object rob; |
struct object rob = OINIT; |
oxclientp client; |
oxclientp client; |
int fdStream, portStream, fdControl, portControl; |
int fdStream, portStream, fdControl, portControl; |
int i; |
int i; |
struct object ob1; |
struct object ob1 = OINIT; |
struct object opassControl, opassData; |
struct object opassControl = OINIT; |
|
struct object opassData = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (peer.tag != Sarray) { |
if (peer.tag != Sarray) { |
errorOxmisc2("KoxCreateClient2(): The first argument must be an array [fdStream, portStream, fdControl, portControl]"); |
errorOxmisc2("KoxCreateClient2(): The first argument must be an array [fdStream, portStream, fdControl, portControl]"); |
Line 1109 errorOxmisc2(char *s) { |
|
Line 1111 errorOxmisc2(char *s) { |
|
struct object KoxPushCMD(struct object client,struct object cmd) { |
struct object KoxPushCMD(struct object client,struct object cmd) { |
int ans; |
int ans; |
static oxclientp cc1 = NULL; |
static oxclientp cc1 = NULL; |
struct object rob; |
struct object rob = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (cc1 == NULL) { |
if (cc1 == NULL) { |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
Line 1140 struct object KoxPushCMD(struct object client,struct o |
|
Line 1142 struct object KoxPushCMD(struct object client,struct o |
|
struct object KoxPushCMO(struct object client,struct object ob) { |
struct object KoxPushCMO(struct object client,struct object ob) { |
int ans; |
int ans; |
static oxclientp cc1 = NULL; |
static oxclientp cc1 = NULL; |
struct object rob; |
struct object rob = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (cc1 == NULL) { |
if (cc1 == NULL) { |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
cc1 = (oxclientp) mymalloc(sizeof(oxclient)); |
Line 1178 oxclientp oxCreateControl_RFC_101(int fdstream,int por |
|
Line 1180 oxclientp oxCreateControl_RFC_101(int fdstream,int por |
|
int ipmask,char *pass); |
int ipmask,char *pass); |
struct object KoxCreateControl_RFC_101(struct object peer,struct object ipmask,struct object pass) |
struct object KoxCreateControl_RFC_101(struct object peer,struct object ipmask,struct object pass) |
{ |
{ |
struct object rob; |
struct object rob = OINIT; |
oxclientp client; |
oxclientp client; |
int fdStream, portStream; |
int fdStream, portStream; |
int i; |
int i; |
struct object ob1; |
struct object ob1 = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (peer.tag != Sarray) { |
if (peer.tag != Sarray) { |
errorOxmisc2("KoxCreateControl_RFC_101(): The first argument must be an array [fdStream, portStream]"); |
errorOxmisc2("KoxCreateControl_RFC_101(): The first argument must be an array [fdStream, portStream]"); |
Line 1293 oxclientp oxCreateEngine_RFC_101(int fdstream,int port |
|
Line 1295 oxclientp oxCreateEngine_RFC_101(int fdstream,int port |
|
int ipmask,char *pass, int engineID); |
int ipmask,char *pass, int engineID); |
struct object KoxCreateEngine_RFC_101(struct object peer,struct object ipmask,struct object pass, struct object engineID) |
struct object KoxCreateEngine_RFC_101(struct object peer,struct object ipmask,struct object pass, struct object engineID) |
{ |
{ |
struct object rob; |
struct object rob = OINIT; |
oxclientp client; |
oxclientp client; |
int fdStream, portStream; |
int fdStream, portStream; |
int i; |
int i; |
struct object ob1; |
struct object ob1 = OINIT; |
rob.tag = Snull; |
rob.tag = Snull; |
if (peer.tag != Sarray) { |
if (peer.tag != Sarray) { |
errorOxmisc2("KoxCreateEngine_RFC_101(): The first argument must be an array [fdStream, portStream]"); |
errorOxmisc2("KoxCreateEngine_RFC_101(): The first argument must be an array [fdStream, portStream]"); |
Line 1435 static void KoxCleanClientList() { |
|
Line 1437 static void KoxCleanClientList() { |
|
extern int OxClientListn; |
extern int OxClientListn; |
extern struct object OxClientList[]; |
extern struct object OxClientList[]; |
int i,j,n; |
int i,j,n; |
struct object ob; |
struct object ob = OINIT; |
n = 0; |
n = 0; |
for (i=0; i<OxClientListn; i++) { |
for (i=0; i<OxClientListn; i++) { |
if ((OxClientList[i]).tag != Snull) { |
if ((OxClientList[i]).tag != Snull) { |
Line 1449 struct object KoxGetClientList() { |
|
Line 1451 struct object KoxGetClientList() { |
|
extern int OxClientListn; |
extern int OxClientListn; |
extern struct object OxClientList[]; |
extern struct object OxClientList[]; |
int i,j,n; |
int i,j,n; |
struct object rob; |
struct object rob = OINIT; |
KoxCleanClientList(); |
KoxCleanClientList(); |
n = 0; |
n = 0; |
for (i=0; i<OxClientListn; i++) { |
for (i=0; i<OxClientListn; i++) { |