MqHigh_cc.cc File Reference

tag: nhi1-release-250425 More...

#include "private_cc.hh"
#include "MqCall_cc.hh"
#include "tmpl/high_lng.h"

Include dependency graph for MqHigh_cc.cc:

Go to the source code of this file.

Namespaces
namespace	ccmqmsgque
	namespace for the CcMqMsgque "C++"-API

Macros
#define	META_FILE_NAME   "MqHigh_cc.cc"
#define	META_CONTEXT_S   mqctx
#define	highSELF   "Send"
#define	highSKIP   skip
#define	highSKIP_SHIFT   0
#define	highSIZE   4
#define	highSIZE_AVAILABLE   0
#define	highREAD_RETURN_LIST   1
#define	highREAD_HAS_REFERENCE   1
#define	highINITcstr
#define	highCMD   "%s('%s', ..., '%s', ...)"
#define	highFARGS(f)
#define	highRETURN
#define	highRETok   goto end
#define	highERRORnative   /* c++ has long-jump */
#define	highRETerror   MkExceptionC::Raise(mqctx);
#define	highTIME(t)
#define	highCALL(f)
#define	highTRAN(str)
#define	highTOKEN(str)
#define	high_N_BOL   int
#define	high_N_I8   int
#define	high_N_I16   int
#define	high_N_I32   MK_I32
#define	high_N_I64   MK_I64
#define	high_N_HDL   MK_HDL
#define	high_N_FLT   double
#define	high_N_DBL   MK_DBL
#define	high_N_STR   MK_STRN
#define	high_N_BIN   MK_BNP
#define	high_N_BUF   MkBufferC*
#define	high_N_BFL   MkBufferListC*
#define	high_T_BIN   MK_BNP
#define	high_T_BUF   MkBufferC*
#define	high_T_BFL   MkBufferListC*
#define	high_T_A   MkBufferListC*
#define	highSend(T)
#define	highSend_I8   highSend(I8)
#define	highSend_BOL   highSend(BOL)
#define	highSend_I16   highSend(I16)
#define	highSend_I32   highSend(I32)
#define	highSend_I64   highSend(I64)
#define	highSend_HDL   highSend(HDL)
#define	highSend_FLT   highSend(FLT)
#define	highSend_DBL   highSend(DBL)
#define	highSend_STR   highSend(STR)
#define	highSend_BUF   highSend(BUF)
#define	highSend_BFL   highSend(BFL)
#define	highSend_BIN   highSend(BIN)
#define	highREADprepare
#define	highREADinit
#define	ReadA   ReadALL
#define	highReadRef(T)
#define	highReadRef_I8   highReadRef(I8)
#define	highReadRef_BOL   highReadRef(BOL)
#define	highReadRef_I16   highReadRef(I16)
#define	highReadRef_I32   highReadRef(I32)
#define	highReadRef_I64   highReadRef(I64)
#define	highReadRef_HDL   highReadRef(H)
#define	highReadRef_FLT   highReadRef(FLT)
#define	highReadRef_DBL   highReadRef(DBL)
#define	highReadRef_STR   highReadRef(STR)
#define	highReadRef_BUF   highReadRef(BUF)
#define	highReadRef_BFL   highReadRef(BFL)
#define	highReadRef_ARGS   highReadRef(A)
#define	highReadRef_BIN   highReadRef(BIN)
#define	compile_as_cc_method
#define	HighErrorV(cls, fmt, args...)
#define	HighErrorC(cls, fmt)
#define	highRETURN_type_S
#define	high_3_O   BOL
#define	high_3_Y   I8
#define	high_3_S   I16
#define	high_3_I   I32
#define	high_3_W   I64
#define	high_3_H   HDL
#define	high_3_F   FLT
#define	high_3_D   DBL
#define	high_3_C   STRN
#define	high_3_B   BIN
#define	high_3_U   BUF
#define	high_3_L   BFL
#define	high_3_A   BAC
#define	high_C_BOL   OT_TMP_BOL_OBJ
#define	high_C_I8   OT_TMP_I8_OBJ
#define	high_C_I16   OT_TMP_I16_OBJ
#define	high_C_I32   OT_TMP_I32_OBJ
#define	high_C_I64   OT_TMP_I64_OBJ
#define	high_C_H   OT_TMP_HDL_OBJ
#define	high_C_FLT   OT_TMP_FLT_OBJ
#define	high_C_DBL   OT_TMP_DBL_OBJ
#define	high_C_STR   OT_TMP_CST_OBJ
#define	high_C_BIN   OT_TMP_BIN_OBJ
#define	high_C_BUF   OT_TMP_BUF_OBJ
#define	high_C_BFL   OT_TMP_BFL_OBJ
#define	high_C_A   OT_TMP_BAC_OBJ
#define	high_T_BOL   MK_BOL
#define	high_T_I8   MK_I8
#define	high_T_I16   MK_I16
#define	high_T_I32   MK_I32
#define	high_T_I64   MK_I64
#define	high_T_HDL   MK_HDL
#define	high_T_FLT   MK_FLT
#define	high_T_DBL   MK_DBL
#define	high_T_STR   MK_STRN
#define	MqReadA   MqReadALL
#define	sendCB(cbt)

Detailed Description

tag: nhi1-release-250425

Copyright

(C) NHI - #1 - Project - Group This software has NO permission to copy, please contact AUTHOR for additional information

Definition in file MqHigh_cc.cc.

Macro Definition Documentation

compile_as_cc_method

#define compile_as_cc_method

high_3_A

#define high_3_A   BAC

high_3_B

#define high_3_B   BIN

high_3_C

#define high_3_C   STRN

high_3_D

#define high_3_D   DBL

high_3_F

#define high_3_F   FLT

high_3_H

#define high_3_H   HDL

high_3_I

#define high_3_I   I32

high_3_L

#define high_3_L   BFL

high_3_O

#define high_3_O   BOL

high_3_S

#define high_3_S   I16

high_3_U

#define high_3_U   BUF

high_3_W

#define high_3_W   I64

high_3_Y

#define high_3_Y   I8

high_C_A

#define high_C_A   OT_TMP_BAC_OBJ

high_C_BFL

#define high_C_BFL   OT_TMP_BFL_OBJ

high_C_BIN

#define high_C_BIN   OT_TMP_BIN_OBJ

high_C_BOL

#define high_C_BOL   OT_TMP_BOL_OBJ

high_C_BUF

#define high_C_BUF   OT_TMP_BUF_OBJ

high_C_DBL

#define high_C_DBL   OT_TMP_DBL_OBJ

high_C_FLT

#define high_C_FLT   OT_TMP_FLT_OBJ

high_C_H

#define high_C_H   OT_TMP_HDL_OBJ

high_C_I16

#define high_C_I16   OT_TMP_I16_OBJ

high_C_I32

#define high_C_I32   OT_TMP_I32_OBJ

high_C_I64

#define high_C_I64   OT_TMP_I64_OBJ

high_C_I8

#define high_C_I8   OT_TMP_I8_OBJ

high_C_STR

#define high_C_STR   OT_TMP_CST_OBJ

high_N_BFL

#define high_N_BFL   MkBufferListC*

high_N_BIN

#define high_N_BIN   MK_BNP

high_N_BOL

#define high_N_BOL   int

high_N_BUF

#define high_N_BUF   MkBufferC*

high_N_DBL

#define high_N_DBL   MK_DBL

high_N_FLT

#define high_N_FLT   double

high_N_HDL

#define high_N_HDL   MK_HDL

high_N_I16

#define high_N_I16   int

high_N_I32

#define high_N_I32   MK_I32

high_N_I64

#define high_N_I64   MK_I64

high_N_I8

#define high_N_I8   int

high_N_STR

#define high_N_STR   MK_STRN

high_T_A

#define high_T_A   MkBufferListC*

high_T_BFL

#define high_T_BFL   MkBufferListC*

high_T_BIN

#define high_T_BIN   MK_BNP

high_T_BOL

#define high_T_BOL   MK_BOL

high_T_BUF

#define high_T_BUF   MkBufferC*

high_T_DBL

#define high_T_DBL   MK_DBL

high_T_FLT

#define high_T_FLT   MK_FLT

high_T_HDL

#define high_T_HDL   MK_HDL

high_T_I16

#define high_T_I16   MK_I16

high_T_I32

#define high_T_I32   MK_I32

high_T_I64

#define high_T_I64   MK_I64

high_T_I8

#define high_T_I8   MK_I8

high_T_STR

#define high_T_STR   MK_STRN

highCALL

#define highCALL

(

f

)

Value:

/* not used */

highCMD

#define highCMD   "%s('%s', ..., '%s', ...)"

HighErrorC

#define HighErrorC	(		cls,
			fmt )

Value:

  MkErrorSetV_3M(obj, cls, "%s", fmt)

highERRORnative

#define highERRORnative   /* c++ has long-jump */

HighErrorV

#define HighErrorV	(		cls,
			fmt,
			args... )

Value:

  MkErrorSetV_3M(obj, cls, fmt, args)

highFARGS

#define highFARGS

(

f

)

Value:

f,data,fFree

highINITcstr

#define highINITcstr

highREAD_HAS_REFERENCE

#define highREAD_HAS_REFERENCE   1

highREAD_RETURN_LIST

#define highREAD_RETURN_LIST   1

highREADinit

#define highREADinit

Value:

                                va_val = (highSKIP < highSIZE ? va_arg(ap, MK_PTR*) : NULL); \
                                if (va_val == NULL) highSKIP = highSIZE;

highREADprepare

#define highREADprepare

highReadRef

#define highReadRef

(

T

)

Value:

*(high_T_##T*)va_val = Read##T(); break;

highReadRef_ARGS

#define highReadRef_ARGS   highReadRef(A)

highReadRef_BFL

#define highReadRef_BFL   highReadRef(BFL)

highReadRef_BIN

#define highReadRef_BIN   highReadRef(BIN)

highReadRef_BOL

#define highReadRef_BOL   highReadRef(BOL)

highReadRef_BUF

#define highReadRef_BUF   highReadRef(BUF)

highReadRef_DBL

#define highReadRef_DBL   highReadRef(DBL)

highReadRef_FLT

#define highReadRef_FLT   highReadRef(FLT)

highReadRef_HDL

#define highReadRef_HDL   highReadRef(H)

highReadRef_I16

#define highReadRef_I16   highReadRef(I16)

highReadRef_I32

#define highReadRef_I32   highReadRef(I32)

highReadRef_I64

#define highReadRef_I64   highReadRef(I64)

highReadRef_I8

#define highReadRef_I8   highReadRef(I8)

highReadRef_STR

#define highReadRef_STR   highReadRef(STR)

highRETerror

#define highRETerror   MkExceptionC::Raise(mqctx);

highRETok

#define highRETok   goto end

highRETURN

#define highRETURN

highRETURN_type_S

#define highRETURN_type_S

Value:

  if (MkBufferListSizeI(RET) == 0 && highLastReturnListType != '*') {            \
    OT_retObj_SET_None;                                                          \
  } else if (MkBufferListSizeI(RET) == 1 && highLastReturnListType != '*' ) {    \
    switch (highLastReturnListType) {                                            \
      case 'U': OT_retObj_SET_BUF(RET->data[0]); break;                          \
/* >>>> disable MkBufferListReserve at startup from Send <<<< */                 \
/* OLD !! BUG FIX: high2-1-2-U-O-*                              */               \
/* Return 'U' without 'Temp'orary object make return UNUSEABLE  */               \
/* as input for an other "Send", because "MkBufferListCreateTLS"   */            \
/* reset the return "U"                                         */               \
/*    SEND_ONE_TYP_O {                                          */               \
/*      set t [$ctx ReadSTR]                                      */             \
/*      set RET [$ctx Send "W" "ECOA:$t@$t" [$ctx Read$t]]      */               \
/*      $ctx Send "R" $t $RET                                   */               \
/*    }                                                         */               \
/* => "RET" is broken WITHOUT "temp"                            */               \
/*    case 'U': OT_MK_CALL_0(RET->data[0],MkBufferC,Temp,retObj); break;  */     \
      case 'L': OT_MK_CALL_0(RET->data[0],MkBufferC,GetBFL,retObj); break;       \
      default : OT_MK_CALL_0(RET->data[0],MkBufferC,ToObject,retObj); break;     \
    }                                                                            \
  } else {                                                                       \
    OT_retObj_SET_BFL(RET);                                                      \
  }

highSELF

#define highSELF   "Send"

highSend

#define highSend

(

T

)

Value:

Send##T((high_T_##T)va_arg(ap, high_N_##T)); break

highSend_BFL

#define highSend_BFL   highSend(BFL)

highSend_BIN

#define highSend_BIN   highSend(BIN)

highSend_BOL

#define highSend_BOL   highSend(BOL)

highSend_BUF

#define highSend_BUF   highSend(BUF)

highSend_DBL

#define highSend_DBL   highSend(DBL)

highSend_FLT

#define highSend_FLT   highSend(FLT)

highSend_HDL

#define highSend_HDL   highSend(HDL)

highSend_I16

#define highSend_I16   highSend(I16)

highSend_I32

#define highSend_I32   highSend(I32)

highSend_I64

#define highSend_I64   highSend(I64)

highSend_I8

#define highSend_I8   highSend(I8)

highSend_STR

#define highSend_STR   highSend(STR)

highSIZE

#define highSIZE   4

highSIZE_AVAILABLE

#define highSIZE_AVAILABLE   0

highSKIP

#define highSKIP   skip

highSKIP_SHIFT

#define highSKIP_SHIFT   0

highTIME

#define highTIME

(

t

)

Value:

t = va_arg(ap, MK_I32)

highTOKEN

#define highTOKEN

(

str

)

Value:

  do {                                             \
  MK_STRN tstr = va_arg(ap, MK_STRN);                                              \
  /* problem, C++ use 'va_args' and this does NOT provide any length-check */    \
  /* Send("R") is valid but 'high' read token and get "random" data */           \
  /* workaround 'isalnum' just check for useable character */                    \
  if (!isprint(*tstr)) goto call; /* A-Z0-9%.. */                                \
  strncpy(str,tstr,MQ_SEND_TOKEN_SIGNATURE_SIZE);                                \
} while (0)

highTRAN

#define highTRAN

(

str

)

Value:

strncpy(str,va_arg(ap, MK_STRN),MQ_SEND_TRANSACTION_TOKEN_SIZE)

META_CONTEXT_S

#define META_CONTEXT_S   mqctx

META_FILE_NAME

#define META_FILE_NAME   "MqHigh_cc.cc"

Definition at line 11 of file MqHigh_cc.cc.

MqReadA

#define MqReadA   MqReadALL

ReadA

#define ReadA   ReadALL

sendCB

#define sendCB

(

cbt

)

Value:

  MkBufferListC* MqContextC::Send (MK_STRN cstr, cbt const callback, ...) {                \
    MkRtSetup_O(hdl);                                                                      \
    MkBufferListC*   ret;                                                                  \
    va_list       va;                                                                      \
    va_start(va, callback);                                                                \
    try {                                                                                  \
      ret = SendVA(cstr, MqServiceCallbackC::Call,                                         \
        MqServiceCallbackC::Create(MK_RT_CALL callback), MqServiceCallbackC::Free, va);    \
    } catch (...) {                                                                        \
      va_end(va);                                                                          \
      throw;                                                                               \
    }                                                                                      \
    va_end(va);                                                                            \
    return ret;                                                                            \
  }                                                                                        \
  MkBufferListC* MqContextC::Send (const std::string& str, cbt const callback, ...) {    \
    MkRtSetup_O(hdl);                                                                      \
    MkBufferListC*   ret;                                                                  \
    va_list       va;                                                                      \
    va_start(va, callback);                                                                \
    try {                                                                                  \
      ret = SendVA(str.c_str(), MqServiceCallbackC::Call,                                  \
        MqServiceCallbackC::Create(MK_RT_CALL callback), MqServiceCallbackC::Free, va);    \
    } catch (...) {                                                                        \
      va_end(va);                                                                          \
      throw;                                                                               \
    }                                                                                      \
    va_end(va);                                                                            \
    return ret;                                                                            \
  }

Definition at line 159 of file MqHigh_cc.cc.

#define sendCB(cbt)                                                                        \
  MkBufferListC* MqContextC::Send (MK_STRN cstr, cbt const callback, ...) {                \
    MkRtSetup_O(hdl);                                                                      \
    MkBufferListC*   ret;                                                                  \
    va_list       va;                                                                      \
    va_start(va, callback);                                                                \
    try {                                                                                  \
      ret = SendVA(cstr, MqServiceCallbackC::Call,                                         \
        MqServiceCallbackC::Create(MK_RT_CALL callback), MqServiceCallbackC::Free, va);    \
    } catch (...) {                                                                        \
      va_end(va);                                                                          \
      throw;                                                                               \
    }                                                                                      \
    va_end(va);                                                                            \
    return ret;                                                                            \
  }                                                                                        \
  MkBufferListC* MqContextC::Send (const std::string& str, cbt const callback, ...) {    \
    MkRtSetup_O(hdl);                                                                      \
    MkBufferListC*   ret;                                                                  \
    va_list       va;                                                                      \
    va_start(va, callback);                                                                \
    try {                                                                                  \
      ret = SendVA(str.c_str(), MqServiceCallbackC::Call,                                  \
        MqServiceCallbackC::Create(MK_RT_CALL callback), MqServiceCallbackC::Free, va);    \
    } catch (...) {                                                                        \
      va_end(va);                                                                          \
      throw;                                                                               \
    }                                                                                      \
    va_end(va);                                                                            \
    return ret;                                                                            \
  }