[BACK]Return to oxx.hh CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / plugin

Annotation of OpenXM/src/kan96xx/plugin/oxx.hh, Revision 1.1.1.1

1.1       maekawa     1: else if (strcmp(key,"oxCreateClient") == 0) {
                      2:   if (size != 4) errorKan1("%s\n","[(oxCreateClient) ip dataport controlport] extension client.");
                      3:   rob = KoxCreateClient(getoa(obj,1),getoa(obj,2),getoa(obj,3));
                      4: }
                      5: else if (strcmp(key,"oxCreateClientFile") == 0) {
                      6:   if (size != 3) errorKan1("%s\n","[(oxCreateClientFile) fname mode] extension client.");
                      7:   rob = KoxCreateClient(getoa(obj,1),getoa(obj,2),getoa(obj,2));
                      8:                                                  /* dummy */
                      9: }
                     10: else if (strcmp(key,"oxReq") == 0) {
                     11:   if (size == 4) {
                     12:     lockCtrlCForOx();
                     13:     rob = KoxReq(getoa(obj,1),getoa(obj,2),getoa(obj,3));
                     14:     unlockCtrlCForOx();
                     15:   }else if (size == 3) {
                     16:     lockCtrlCForOx();
                     17:     rob = KoxReq(getoa(obj,1),getoa(obj,2),rob); /* rob is a dummy. */
                     18:     unlockCtrlCForOx();
                     19:   }else {
                     20:     errorKan1("%s\n","[(oxReq) client func arg] extension result.");
                     21:   }
                     22: }
                     23: else if (strcmp(key,"oxGet") == 0) {
                     24:   if (size != 2) errorKan1("%s\n","[(oxGet)  client] extension obj.");
                     25:   lockCtrlCForOx();
                     26:   obj1 = getoa(obj,1);
                     27:   rob = KoxGet(obj1);  /* Note that lock and unlock are also temporary done in
                     28:                          oxGetHeader(). */
                     29:   unlockCtrlCForOx();
                     30: }
                     31: else if (strcmp(key,"oxGetFromControl") == 0) {
                     32:   if (size != 2) errorKan1("%s\n","[(oxGetFromControl)  client] extension obj.");
                     33:   obj1 = getoa(obj,1);
                     34:   rob = KoxGetFromControl(obj1);
                     35: }
                     36: else if (strcmp(key,"oxMultiSelect") == 0) {
                     37:   if (size != 3) errorKan1("%s\n","[(oxMultiSelect) client t] extension obj.");
                     38:   rob = KoxMultiSelect(getoa(obj,1),getoa(obj,2));
                     39: }
                     40: else if (strcmp(key,"oxWatch") == 0) {
                     41:   if (size != 2) errorKan1("%s\n","[(oxWatch) client] extension obj");
                     42:   rob = KoxWatch(getoa(obj,1),rob); /* rob is dummy for now. */
                     43: }
                     44: else if (strcmp(key,"oxCloseClient") == 0) {
                     45:   if (size != 2) errorKan1("%s\n","[(oxCloseClient) client] extension obj");
                     46:   rob = KoxCloseClient(getoa(obj,1));
                     47: }
                     48: else if (strcmp(key,"oxSerial") == 0) {
                     49:   if (size != 1) errorKan1("%s\n","[(oxSerial)] extension obj");
                     50:   rob = KpoInteger(SerialOX);
                     51: }
                     52: else if (strcmp(key,"oxGenPortFile") == 0) {
                     53:   if (size != 1) errorKan1("%s\n","[(oxGenPortFile)] extension obj");
                     54:   rob = KoxGenPortFile();
                     55: }
                     56: else if (strcmp(key,"oxRemovePortFile") == 0) {
                     57:   if (size != 1) errorKan1("%s\n","[(oxRemovePortFile)] extension obj");
                     58:   KoxRemovePortFile();
                     59: }
                     60: else if (strcmp(key,"oxGenPass") == 0) {
                     61:   if (size != 1) errorKan1("%s\n","[(oxGenPass)] extension obj");
                     62:   rob = KoxGenPass();
                     63: }
                     64: else if (strcmp(key,"oxGetPort") == 0) {
                     65:   if (size != 2) errorKan1("%s\n","[(oxGetPort) host] extension obj");
                     66:   rob = KoxGetPort(getoa(obj,1));
                     67: }
                     68: else if (strcmp(key,"oxCreateClient2") == 0) {
                     69:   if (size != 4) errorKan1("%s\n","[(oxCreateClient2) peer ipmask pass] extension client.");
                     70:   rob = KoxCreateClient2(getoa(obj,1),getoa(obj,2),getoa(obj,3));
                     71: }
                     72: else if (strcmp(key,"oxPrintMessage") == 0) {
                     73:   if (size == 1) {
                     74:     rob = KpoInteger(OXprintMessage);
                     75:   }else{
                     76:     if (size != 2) errorKan1("%s\n","[(oxPrintMessge) level] extension obj");
                     77:     obj1 = getoa(obj,1);
                     78:     if (obj1.tag != Sinteger)
                     79:       errorKan1("%s\n","[(oxPrintMessge) level] extension obj, integer level");
                     80:     OXprintMessage = KopInteger(obj1);
                     81:     rob = KpoInteger(OXprintMessage);
                     82:   }
                     83: }
                     84: else if (strcmp(key,"oxPrintMessage") == 0) {
                     85:   if (size == 1) {
                     86:     rob = KpoInteger(OXprintMessage);
                     87:   }else{
                     88:     if (size != 2) errorKan1("%s\n","[(oxPrintMessge) level] extension obj");
                     89:     obj1 = getoa(obj,1);
                     90:     if (obj1.tag != Sinteger)
                     91:       errorKan1("%s\n","[(oxPrintMessge) level] extension obj, integer level");
                     92:     OXprintMessage = KopInteger(obj1);
                     93:     rob = KpoInteger(OXprintMessage);
                     94:   }
                     95: }
                     96:
                     97:

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>