Return to oxx.hh CVS log

Up to [local] / OpenXM / src / kan96xx / plugin

Annotation of OpenXM/src/kan96xx/plugin/oxx.hh, Revision 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: