Annotation of OpenXM/src/kan96xx/plugin/oxx.hh, Revision 1.9
1.9 ! takayama 1: /*$OpenXM: OpenXM/src/kan96xx/plugin/oxx.hh,v 1.8 2002/11/07 23:52:20 takayama Exp $*/
1.1 maekawa 2: else if (strcmp(key,"oxCreateClient") == 0) {
3: if (size != 4) errorKan1("%s\n","[(oxCreateClient) ip dataport controlport] extension client.");
1.3 takayama 4: if (SecureMode) errorKan1("%s\n","Security violation for oxCreateClient.");
1.1 maekawa 5: rob = KoxCreateClient(getoa(obj,1),getoa(obj,2),getoa(obj,3));
6: }
7: else if (strcmp(key,"oxCreateClientFile") == 0) {
8: if (size != 3) errorKan1("%s\n","[(oxCreateClientFile) fname mode] extension client.");
1.3 takayama 9: if (SecureMode) errorKan1("%s\n","Security violation for oxCreateClientFile.");
1.1 maekawa 10: rob = KoxCreateClient(getoa(obj,1),getoa(obj,2),getoa(obj,2));
11: /* dummy */
12: }
13: else if (strcmp(key,"oxReq") == 0) {
14: if (size == 4) {
15: lockCtrlCForOx();
16: rob = KoxReq(getoa(obj,1),getoa(obj,2),getoa(obj,3));
17: unlockCtrlCForOx();
18: }else if (size == 3) {
19: lockCtrlCForOx();
20: rob = KoxReq(getoa(obj,1),getoa(obj,2),rob); /* rob is a dummy. */
21: unlockCtrlCForOx();
22: }else {
23: errorKan1("%s\n","[(oxReq) client func arg] extension result.");
24: }
25: }
26: else if (strcmp(key,"oxGet") == 0) {
27: if (size != 2) errorKan1("%s\n","[(oxGet) client] extension obj.");
28: lockCtrlCForOx();
29: obj1 = getoa(obj,1);
30: rob = KoxGet(obj1); /* Note that lock and unlock are also temporary done in
31: oxGetHeader(). */
32: unlockCtrlCForOx();
33: }
34: else if (strcmp(key,"oxGetFromControl") == 0) {
35: if (size != 2) errorKan1("%s\n","[(oxGetFromControl) client] extension obj.");
36: obj1 = getoa(obj,1);
37: rob = KoxGetFromControl(obj1);
38: }
39: else if (strcmp(key,"oxMultiSelect") == 0) {
40: if (size != 3) errorKan1("%s\n","[(oxMultiSelect) client t] extension obj.");
41: rob = KoxMultiSelect(getoa(obj,1),getoa(obj,2));
42: }
43: else if (strcmp(key,"oxWatch") == 0) {
1.2 takayama 44: if (size > 2) errorKan1("%s\n","[(oxWatch) client] extension obj");
45: if (size == 2) {
46: rob = KoxWatch(getoa(obj,1),rob); /* rob is dummy for now. */
47: }else {
48: rob = KoxWatch(KpoInteger(1),rob);
49: }
1.9 ! takayama 50: }
! 51: else if (strcmp(key,"oxLog") == 0) {
! 52: if (size != 4) errorKan1("%s\n","[(oxLog) client file_in file_out] extension obj");
! 53: rob = KoxLog(getoa(obj,1),getoa(obj,2),getoa(obj,3));
! 54: }
! 55: else if (strcmp(key,"oxLogStop") == 0) {
! 56: if (size != 2) errorKan1("%s\n","[(oxLogStop) client] extension obj ");
! 57: rob = KoxLogStop(getoa(obj,1));
1.1 maekawa 58: }
59: else if (strcmp(key,"oxCloseClient") == 0) {
60: if (size != 2) errorKan1("%s\n","[(oxCloseClient) client] extension obj");
61: rob = KoxCloseClient(getoa(obj,1));
62: }
63: else if (strcmp(key,"oxSerial") == 0) {
64: if (size != 1) errorKan1("%s\n","[(oxSerial)] extension obj");
65: rob = KpoInteger(SerialOX);
66: }
67: else if (strcmp(key,"oxGenPortFile") == 0) {
68: if (size != 1) errorKan1("%s\n","[(oxGenPortFile)] extension obj");
69: rob = KoxGenPortFile();
70: }
71: else if (strcmp(key,"oxRemovePortFile") == 0) {
72: if (size != 1) errorKan1("%s\n","[(oxRemovePortFile)] extension obj");
73: KoxRemovePortFile();
74: }
75: else if (strcmp(key,"oxGenPass") == 0) {
76: if (size != 1) errorKan1("%s\n","[(oxGenPass)] extension obj");
77: rob = KoxGenPass();
78: }
79: else if (strcmp(key,"oxGetPort") == 0) {
80: if (size != 2) errorKan1("%s\n","[(oxGetPort) host] extension obj");
1.6 takayama 81: if (SecureMode) errorKan1("%s\n","Security violation for oxGetPort.");
82: rob = KoxGetPort(getoa(obj,1));
83: }
84: else if (strcmp(key,"oxGetPort1") == 0) {
85: if (size != 2) errorKan1("%s\n","[(oxGetPort1) host] extension obj");
1.3 takayama 86: if (SecureMode) errorKan1("%s\n","Security violation for oxGetPort.");
1.7 takayama 87: rob = KoxGetPort1(getoa(obj,1));
1.1 maekawa 88: }
89: else if (strcmp(key,"oxCreateClient2") == 0) {
90: if (size != 4) errorKan1("%s\n","[(oxCreateClient2) peer ipmask pass] extension client.");
1.3 takayama 91: if (SecureMode) errorKan1("%s\n","Security violation for oxCreateClient2.");
1.1 maekawa 92: rob = KoxCreateClient2(getoa(obj,1),getoa(obj,2),getoa(obj,3));
93: }
94: else if (strcmp(key,"oxPrintMessage") == 0) {
95: if (size == 1) {
96: rob = KpoInteger(OXprintMessage);
97: }else{
98: if (size != 2) errorKan1("%s\n","[(oxPrintMessge) level] extension obj");
99: obj1 = getoa(obj,1);
100: if (obj1.tag != Sinteger)
101: errorKan1("%s\n","[(oxPrintMessge) level] extension obj, integer level");
102: OXprintMessage = KopInteger(obj1);
103: rob = KpoInteger(OXprintMessage);
104: }
105: }
106: else if (strcmp(key,"oxPrintMessage") == 0) {
107: if (size == 1) {
108: rob = KpoInteger(OXprintMessage);
109: }else{
110: if (size != 2) errorKan1("%s\n","[(oxPrintMessge) level] extension obj");
111: obj1 = getoa(obj,1);
112: if (obj1.tag != Sinteger)
113: errorKan1("%s\n","[(oxPrintMessge) level] extension obj, integer level");
114: OXprintMessage = KopInteger(obj1);
115: rob = KpoInteger(OXprintMessage);
1.4 takayama 116: }
117: }
118: else if (strcmp(key,"oxPushCMD") == 0) {
119: if (size == 3) {
120: lockCtrlCForOx();
121: rob = KoxPushCMD(getoa(obj,1),getoa(obj,2));
122: unlockCtrlCForOx();
123: }else {
124: errorKan1("%s\n","[(oxPushCMD) client SM_id] extension result.");
125: }
126: }
127: else if (strcmp(key,"oxPushCMO") == 0) {
128: if (size == 3) {
129: lockCtrlCForOx();
130: rob = KoxPushCMO(getoa(obj,1),getoa(obj,2));
131: unlockCtrlCForOx();
132: }else {
133: errorKan1("%s\n","[(oxPushCMO) client obj] extension result.");
1.1 maekawa 134: }
1.5 takayama 135: }
136: else if (strcmp(key,"oxCreateControl_RFC_101") == 0) {
137: if (size != 4) errorKan1("%s\n","[(oxCreateControl_RFC_101) peer ipmask pass] extension client.");
138: if (SecureMode) errorKan1("%s\n","Security violation for oxCreateControl_RFC_101.");
139: rob = KoxCreateControl_RFC_101(getoa(obj,1),getoa(obj,2),getoa(obj,3));
1.7 takayama 140: }
141: else if (strcmp(key,"oxCreateEngine_RFC_101") == 0) {
142: if (size != 5) errorKan1("%s\n","[(oxCreateEngine_RFC_101) peer ipmask pass engineID] extension client.");
143: if (SecureMode) errorKan1("%s\n","Security violation for oxCreateEngine_RFC_101.");
144: rob = KoxCreateEngine_RFC_101(getoa(obj,1),getoa(obj,2),getoa(obj,3),getoa(obj,4));
1.1 maekawa 145: }
1.8 takayama 146: else if (strcmp(key,"oxGetClientList") == 0) {
147: if (size != 1) errorKan1("%s\n","[(oxClientList)] extension list_of_clients.");
148: rob = KoxGetClientList();
149: }
1.1 maekawa 150:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>