MqHigh_rb.c File Reference

tag: nhi1-release-250425 More...

#include "LibMqMsgque_private_rb.h"
#include "tmpl/high_lng.h"

Include dependency graph for MqHigh_rb.c:

Go to the source code of this file.

Macros
#define	META_FILE_NAME   "high_rb.c"
#define	SetupRtFromObj_XN(o)
#define	highSELF   "ctx.Send"
#define	highSKIP   __skip
#define	highSKIP_SHIFT   0
#define	highSIZE   objc
#define	highSIZE_AVAILABLE   1
#define	highREAD_RETURN_LIST   1
#define	highREAD_HAS_REFERENCE   0
#define	highINITcstr   OT_CHECK_STR(cstr)
#define	highRETok   goto end;
#define	highRETerror   OT_ERROR_META_2_LNG(mqctx); OT_retObj_SET_Error
#define	highCMD   "%s '%s' ... '%s' ..."
#define	highRETURN   highRETURN_type_S
#define	highFARGS(f)
#define	highTRAN(str)
#define	highTOKEN(str)
#define	highTIME(t)
#define	highCALL(f)
#define	highERRORnative
#define	MkErrorC_CheckD(p)
#define	highSend(T)
#define	highSend2(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   highSend2(BUF)
#define	highSend_BFL
#define	highSend_BIN
#define	highREADprepare   OT_CHECK_NOARGS
#define	highREADinit
#define	mqctx   hdl
#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	high_T_BIN   MK_BIN
#define	high_T_BUF   MK_BUF
#define	high_T_BFL   MK_BFL
#define	high_T_A   MK_BAC
#define	MqReadA   MqReadALL

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_rb.c.

Macro Definition Documentation

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_T_A

#define high_T_A   MK_BAC

high_T_BFL

#define high_T_BFL   MK_BFL

high_T_BIN

#define high_T_BIN   MK_BIN

high_T_BOL

#define high_T_BOL   MK_BOL

high_T_BUF

#define high_T_BUF   MK_BUF

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:

OT_CHECK_CALLABLE(f)

highCMD

#define highCMD   "%s '%s' ... '%s' ..."

HighErrorC

#define HighErrorC	(		cls,
			fmt )

Value:

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

highERRORnative

#define highERRORnative

HighErrorV

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

Value:

  MkErrorSetV_3M(obj, cls, fmt, args)

highFARGS

#define highFARGS

(

f

)

Value:

NS(ServiceCall),f,NS(ServiceFree)

highINITcstr

#define highINITcstr   OT_CHECK_STR(cstr)

highREAD_HAS_REFERENCE

#define highREAD_HAS_REFERENCE   0

highREAD_RETURN_LIST

#define highREAD_RETURN_LIST   1

highREADinit

#define highREADinit

highREADprepare

#define highREADprepare   OT_CHECK_NOARGS

highRETerror

#define highRETerror   OT_ERROR_META_2_LNG(mqctx); OT_retObj_SET_Error

highRETok

#define highRETok   goto end;

highRETURN

#define highRETURN   highRETURN_type_S

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   "ctx.Send"

highSend

#define highSend

(

T

)

Value:

  {                      \
  high_T_##T val;                          \
  OT_CHECK_REQUIRED(OT_CHECK_##T(val));    \
  MkErrorCheck(MqSend##T(mqctx,val));      \
  break;                                   \
}

highSend2

#define highSend2

(

T

)

Value:

  {                                \
  high_T_##T val;                                     \
  OT_CHECK_REQUIRED(OT_CHECK_##T(val,MK_NULL_NO));    \
  MkErrorCheck(MqSend##T(mqctx,val));                 \
  break;                                              \
}

highSend_BFL

#define highSend_BFL

Value:

  {                               \
  MkBufferListCreateTLS_T(bfl,5);                    \
  OT_CHECK_REQUIRED(OT_CHECK_BFL(bfl,MK_NULL_NO))    \
  enum MkErrorE ret = MqSendBFL(mqctx, bfl);         \
  MkErrorCheck(ret);                                 \
}

highSend_BIN

#define highSend_BIN

Value:

  {                                  \
  MkBinaryR cbi = {0};                                  \
  OT_CHECK_REQUIRED(OT_CHECK__ME_REF_MkBinaryR(cbi))    \
  MkErrorCheck(MqSendBIN(mqctx, cbi));                  \
}

highSend_BOL

#define highSend_BOL   highSend(BOL)

highSend_BUF

#define highSend_BUF   highSend2(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   objc

highSIZE_AVAILABLE

#define highSIZE_AVAILABLE   1

highSKIP

#define highSKIP   __skip

highSKIP_SHIFT

#define highSKIP_SHIFT   0

highTIME

#define highTIME

(

t

)

Value:

OT_CHECK_TIME_T(timeout)

highTOKEN

#define highTOKEN

(

str

)

Value:

OT_CHECK_C_COPY(str,MQ_SEND_TOKEN_SIGNATURE_SIZE)

highTRAN

#define highTRAN

(

str

)

Value:

OT_CHECK_C_COPY(str,MQ_SEND_TRANSACTION_TOKEN_SIZE)

META_FILE_NAME

#define META_FILE_NAME   "high_rb.c"

Definition at line 11 of file MqHigh_rb.c.

MkErrorC_CheckD

#define MkErrorC_CheckD

(

p

)

Value:

MkErrorCheck(p)

mqctx

#define mqctx   hdl

MqReadA

#define MqReadA   MqReadALL

SetupRtFromObj_XN

#define SetupRtFromObj_XN

(

o

)

Value:

AllRtSetup_XN(o)

Definition at line 17 of file MqHigh_rb.c.