MqMsgque_Enum_ATL_API

MqMsgque PACKAGE - enum definition … More...

Collaboration diagram for MqMsgque_Enum_ATL_API:

Functions
static OT_ProcRet	atlmqmsgque_MqMsgque_IdentE_FromInt (OtClass_ARGS)
	Atl: (static) MqIdentE [MqMsgque::IdentE_FromInt value:int32] → C-API return the MqIdentE from integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_SlaveE_FromInt (OtClass_ARGS)
	Atl: (static) MqSlaveE [MqMsgque::SlaveE_FromInt value:int32] → C-API return the MqSlaveE from integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_StartE_FromInt (OtClass_ARGS)
	Atl: (static) MqStartE [MqMsgque::StartE_FromInt value:int32] → C-API return the MqStartE from integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_StatusIsEF_FromInt (OtClass_ARGS)
	Atl: (static) MqStatusIsEF [MqMsgque::StatusIsEF_FromInt value:int32] → C-API return the MqStatusIsEF from integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_WaitOnEventE_FromInt (OtClass_ARGS)
	Atl: (static) MqWaitOnEventE [MqMsgque::WaitOnEventE_FromInt value:int32] → C-API return the MqWaitOnEventE from integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_IdentE_ToInt (OtClass_ARGS)
	Atl: (static) int32 [MqMsgque::IdentE_ToInt value:MqIdentE] → C-API return the MqIdentE as integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_IdentE_ToString (OtClass_ARGS)
	Atl: (static) string [MqMsgque::IdentE_ToString value:MqIdentE] → C-API return the MqIdentE as string …
static OT_ProcRet	atlmqmsgque_MqMsgque_SlaveE_ToInt (OtClass_ARGS)
	Atl: (static) int32 [MqMsgque::SlaveE_ToInt value:MqSlaveE] → C-API return the MqSlaveE as integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_SlaveE_ToString (OtClass_ARGS)
	Atl: (static) string [MqMsgque::SlaveE_ToString value:MqSlaveE] → C-API return the MqSlaveE as string …
static OT_ProcRet	atlmqmsgque_MqMsgque_StartE_ToInt (OtClass_ARGS)
	Atl: (static) int32 [MqMsgque::StartE_ToInt value:MqStartE] → C-API return the MqStartE as integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_StartE_ToString (OtClass_ARGS)
	Atl: (static) string [MqMsgque::StartE_ToString value:MqStartE] → C-API return the MqStartE as string …
static OT_ProcRet	atlmqmsgque_MqMsgque_StatusIsEF_ToInt (OtClass_ARGS)
	Atl: (static) int32 [MqMsgque::StatusIsEF_ToInt value:MqStatusIsEF] → C-API return the MqStatusIsEF as integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_StatusIsEF_ToString (OtClass_ARGS)
	Atl: (static) string [MqMsgque::StatusIsEF_ToString value:MqStatusIsEF] → C-API return the MqStatusIsEF as string …
static OT_ProcRet	atlmqmsgque_MqMsgque_WaitOnEventE_ToInt (OtClass_ARGS)
	Atl: (static) int32 [MqMsgque::WaitOnEventE_ToInt value:MqWaitOnEventE] → C-API return the MqWaitOnEventE as integer …
static OT_ProcRet	atlmqmsgque_MqMsgque_WaitOnEventE_ToString (OtClass_ARGS)
	Atl: (static) string [MqMsgque::WaitOnEventE_ToString value:MqWaitOnEventE] → C-API return the MqWaitOnEventE as string …

Enum To String
OT_OBJ_T	atlmqmsgque_MqFactoryE_ToString (const enum MqFactoryE type)
OT_OBJ_T	atlmqmsgque_MqHandShakeE_ToString (const enum MqHandShakeE type)
OT_OBJ_T	atlmqmsgque_MqIdentE_ToString (const enum MqIdentE type)
OT_OBJ_T	atlmqmsgque_MqIoComE_ToString (const enum MqIoComE type)
OT_OBJ_T	atlmqmsgque_MqSlaveE_ToString (const enum MqSlaveE type)
OT_OBJ_T	atlmqmsgque_MqStartE_ToString (const enum MqStartE type)
OT_OBJ_T	atlmqmsgque_MqStatusIsEF_ToString (const enum MqStatusIsEF type)
OT_OBJ_T	atlmqmsgque_MqTransTypeE_ToString (const enum MqTransTypeE type)
OT_OBJ_T	atlmqmsgque_MqWaitOnEventE_ToString (const enum MqWaitOnEventE type)

Enum From Obj
int	atlmqmsgque_Get_MqIdentE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum MqIdentE *ret)
int	atlmqmsgque_Get_MqSlaveE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum MqSlaveE *ret)
int	atlmqmsgque_Get_MqStartE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum MqStartE *ret)
int	atlmqmsgque_Get_MqStatusIsEF_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum MqStatusIsEF *ret)
int	atlmqmsgque_Get_MqWaitOnEventE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum MqWaitOnEventE *ret)

Detailed Description

MqMsgque PACKAGE - enum definition …

Atl has no build-in-enum-datatyp but theKernel support a enum using the data-type-checking API.

A C-enum like :

enum MqWaitOnEventE {
  MQ_WAIT_NO      = 0,
  MQ_WAIT_ONCE    = 1,
  MQ_WAIT_OWN     = 2,
  MQ_WAIT_FOREVER = 3,
};

will be compiled into a internal atl-c-check-proc :

int MQ(Get_MqWaitOnEventE_FromObj) (MK_RT_ARGS Tcl_Interp *interp, Tcl_Obj *enumE, enum MqWaitOnEventE *ret) {
  const static struct LookupEnumE keys[] = {
    { "NO"              , MQ_WAIT_NO      },
    { "OWN"             , MQ_WAIT_OWN     },
    { "ONCE"            , MQ_WAIT_ONCE    },
    { "FOREVER"         , MQ_WAIT_FOREVER },
    { "WAIT_NO"         , MQ_WAIT_NO      },
    { "WAIT_OWN"        , MQ_WAIT_OWN     },
    { "WAIT_ONCE"       , MQ_WAIT_ONCE    },
    { "MQ_WAIT_NO"      , MQ_WAIT_NO      },
    { "MQ_WAIT_OWN"     , MQ_WAIT_OWN     },
    { "WAIT_FOREVER"    , MQ_WAIT_FOREVER },
    { "MQ_WAIT_ONCE"    , MQ_WAIT_ONCE    },
    { "MQ_WAIT_FOREVER" , MQ_WAIT_FOREVER },
    { NULL              , 0               },
  };
  int index;
  OtErrorCheckLng (Tcl_GetIndexFromObjStruct (interp, enumE, &keys,
      sizeof(struct LookupClassS), "enum", TCL_EXACT, &index));
  *ret = keys[index].val;
  return TCL_OK;
}

to return the integer identifier for an enum-definition-string or an error if string is not valid.

• "MQ_WAIT_FOREVER" = MQ_WAIT_FOREVER = 3

A valid string for an enum-value is any unique abbreviation of the original enum-value:

• "MQ_WAIT_FOREVER" = "WAIT_FOREVER" = "FOREVER" = 3

The atl-c-check-proc is used in a atl-c-api-wrapper like :

static OT_ProcRet NS(MqMsgque_WaitOnEventE_ToString) (OtClass_ARGS) {
  OT_SETUP_hdl_static
  OT_SETUP_ONEARG(LogWaitOnEventE_doc)
  enum MqWaitOnEventE val = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqWaitOnEventE,val))   // <- atl-c-check-proc
  OT_CHECK_NOARGS
  OT_retObj_SET_STR(MqWaitOnEventE_String (val))
  goto end;
  error:
  OT_retObj_SET_Error
  end:
  OT_retObj_RETURN
}

The usage of an enum-value in the atl-code is quite simple, just use the string.

Example from Filter4.atl → use ProcessEvent MQ_WAIT_FOREVER

MqMsgque::Main {
  # !!ATTENTION!! if you put the "MqFactoryC::Add" outsite of "MqMsgque::Main"
  # you get a error like: "...factory identifer already in use..."
  # because in a "thread" startup... you try to create a factory with SAME NAME again.
  MqFactoryC::Initial [MqFactoryC::Add ::Filter4 ]
  set srv [myooX::NewN ::Filter4]

  try {
    MqContextC::LinkCreate $srv {*}$argv
    MqContextC::ProcessEvent $srv MQ_WAIT_FOREVER
  } on error {} {
    MqContextC::ErrorCatch $srv
  } finally {
    MqContextC::Exit $srv
  }
}

read more at: MkKernel_Enum_C_API

Function Documentation

atlmqmsgque_Get_MqIdentE_FromObj()

int atlmqmsgque_Get_MqIdentE_FromObj	(	MK_RT	mkrt,
		OT_ENV_T	interp,
		OT_OBJ_T	enumE,
		enum MqIdentE *	ret )

Definition at line 385 of file LibMqMsgque_atl.c.

                                                                                              {
  const static struct LookupEnumE keys[] = {
    { "PREFIX"           , MQ_IDENT_PREFIX  },
    { "FACTORY"          , MQ_IDENT_FACTORY },
    { "IDENT_PREFIX"     , MQ_IDENT_PREFIX  },
    { "IDENT_FACTORY"    , MQ_IDENT_FACTORY },
    { "MQ_IDENT_PREFIX"  , MQ_IDENT_PREFIX  },
    { "MQ_IDENT_FACTORY" , MQ_IDENT_FACTORY },
    { NULL               , 0                },
  };
 
  int index;
  check_LNG(Tcl_GetIndexFromObjStruct (interp, enumE, &keys,
      sizeof(struct LookupClassS), "enum", TCL_EXACT, &index)) return TCL_ERROR;
  *ret = keys[index].val;
  return TCL_OK;
}

atlmqmsgque_Get_MqSlaveE_FromObj()

int atlmqmsgque_Get_MqSlaveE_FromObj	(	MK_RT	mkrt,
		OT_ENV_T	interp,
		OT_OBJ_T	enumE,
		enum MqSlaveE *	ret )

Definition at line 403 of file LibMqMsgque_atl.c.

                                                                                              {
  const static struct LookupEnumE keys[] = {
    { "MAX"               , MQ_SLAVE_MAX      },
    { "USER"              , MQ_SLAVE_USER     },
    { "OTHER"             , MQ_SLAVE_OTHER    },
    { "MASTER"            , MQ_SLAVE_MASTER   },
    { "FILTER"            , MQ_SLAVE_FILTER   },
    { "LOOPBACK"          , MQ_SLAVE_LOOPBACK },
    { "SLAVE_MAX"         , MQ_SLAVE_MAX      },
    { "SLAVE_USER"        , MQ_SLAVE_USER     },
    { "SLAVE_OTHER"       , MQ_SLAVE_OTHER    },
    { "SLAVE_FILTER"      , MQ_SLAVE_FILTER   },
    { "SLAVE_MASTER"      , MQ_SLAVE_MASTER   },
    { "MQ_SLAVE_MAX"      , MQ_SLAVE_MAX      },
    { "MQ_SLAVE_USER"     , MQ_SLAVE_USER     },
    { "MQ_SLAVE_OTHER"    , MQ_SLAVE_OTHER    },
    { "SLAVE_LOOPBACK"    , MQ_SLAVE_LOOPBACK },
    { "MQ_SLAVE_FILTER"   , MQ_SLAVE_FILTER   },
    { "MQ_SLAVE_MASTER"   , MQ_SLAVE_MASTER   },
    { "MQ_SLAVE_LOOPBACK" , MQ_SLAVE_LOOPBACK },
    { NULL                , 0                 },
  };
 
  int index;
  check_LNG(Tcl_GetIndexFromObjStruct (interp, enumE, &keys,
      sizeof(struct LookupClassS), "enum", TCL_EXACT, &index)) return TCL_ERROR;
  *ret = keys[index].val;
  return TCL_OK;
}

atlmqmsgque_Get_MqStartE_FromObj()

int atlmqmsgque_Get_MqStartE_FromObj	(	MK_RT	mkrt,
		OT_ENV_T	interp,
		OT_OBJ_T	enumE,
		enum MqStartE *	ret )

Definition at line 433 of file LibMqMsgque_atl.c.

                                                                                              {
  const static struct LookupEnumE keys[] = {
    { "FORK"             , MQ_START_FORK    },
    { "SPAWN"            , MQ_START_SPAWN   },
    { "THREAD"           , MQ_START_THREAD  },
    { "DEFAULT"          , MQ_START_DEFAULT },
    { "START_FORK"       , MQ_START_FORK    },
    { "START_SPAWN"      , MQ_START_SPAWN   },
    { "START_THREAD"     , MQ_START_THREAD  },
    { "MQ_START_FORK"    , MQ_START_FORK    },
    { "START_DEFAULT"    , MQ_START_DEFAULT },
    { "MQ_START_SPAWN"   , MQ_START_SPAWN   },
    { "MQ_START_THREAD"  , MQ_START_THREAD  },
    { "MQ_START_DEFAULT" , MQ_START_DEFAULT },
    { NULL               , 0                },
  };
 
  int index;
  check_LNG(Tcl_GetIndexFromObjStruct (interp, enumE, &keys,
      sizeof(struct LookupClassS), "enum", TCL_EXACT, &index)) return TCL_ERROR;
  *ret = keys[index].val;
  return TCL_OK;
}

atlmqmsgque_Get_MqStatusIsEF_FromObj()

int atlmqmsgque_Get_MqStatusIsEF_FromObj	(	MK_RT	mkrt,
		OT_ENV_T	interp,
		OT_OBJ_T	enumE,
		enum MqStatusIsEF *	ret )

Definition at line 457 of file LibMqMsgque_atl.c.

                                                                                                      {
  const static struct LookupEnumE keys[] = {
    { "DUP"                  , MQ_STATUS_IS_DUP     },
    { "FORK"                 , MQ_STATUS_IS_FORK    },
    { "SPAWN"                , MQ_STATUS_IS_SPAWN   },
    { "THREAD"               , MQ_STATUS_IS_THREAD  },
    { "IS_DUP"               , MQ_STATUS_IS_DUP     },
    { "INITIAL"              , MQ_STATUS_IS_INITIAL },
    { "IS_FORK"              , MQ_STATUS_IS_FORK    },
    { "IS_SPAWN"             , MQ_STATUS_IS_SPAWN   },
    { "IS_THREAD"            , MQ_STATUS_IS_THREAD  },
    { "IS_INITIAL"           , MQ_STATUS_IS_INITIAL },
    { "STATUS_IS_DUP"        , MQ_STATUS_IS_DUP     },
    { "STATUS_IS_FORK"       , MQ_STATUS_IS_FORK    },
    { "STATUS_IS_SPAWN"      , MQ_STATUS_IS_SPAWN   },
    { "MQ_STATUS_IS_DUP"     , MQ_STATUS_IS_DUP     },
    { "STATUS_IS_THREAD"     , MQ_STATUS_IS_THREAD  },
    { "STATUS_IS_INITIAL"    , MQ_STATUS_IS_INITIAL },
    { "MQ_STATUS_IS_FORK"    , MQ_STATUS_IS_FORK    },
    { "MQ_STATUS_IS_SPAWN"   , MQ_STATUS_IS_SPAWN   },
    { "MQ_STATUS_IS_THREAD"  , MQ_STATUS_IS_THREAD  },
    { "MQ_STATUS_IS_INITIAL" , MQ_STATUS_IS_INITIAL },
    { NULL                   , 0                    },
  };
 
  int index;
  check_LNG(MK(EnumFlagWorker)(MK_RT_CALL interp,keys,enumE,&index)) return TCL_ERROR;
  *ret = (enum MqStatusIsEF) index;
  return TCL_OK;
}

atlmqmsgque_Get_MqWaitOnEventE_FromObj()

int atlmqmsgque_Get_MqWaitOnEventE_FromObj	(	MK_RT	mkrt,
		OT_ENV_T	interp,
		OT_OBJ_T	enumE,
		enum MqWaitOnEventE *	ret )

Definition at line 488 of file LibMqMsgque_atl.c.

                                                                                                          {
  const static struct LookupEnumE keys[] = {
    { "NO"              , MQ_WAIT_NO      },
    { "OWN"             , MQ_WAIT_OWN     },
    { "ONCE"            , MQ_WAIT_ONCE    },
    { "FOREVER"         , MQ_WAIT_FOREVER },
    { "WAIT_NO"         , MQ_WAIT_NO      },
    { "WAIT_OWN"        , MQ_WAIT_OWN     },
    { "WAIT_ONCE"       , MQ_WAIT_ONCE    },
    { "MQ_WAIT_NO"      , MQ_WAIT_NO      },
    { "MQ_WAIT_OWN"     , MQ_WAIT_OWN     },
    { "WAIT_FOREVER"    , MQ_WAIT_FOREVER },
    { "MQ_WAIT_ONCE"    , MQ_WAIT_ONCE    },
    { "MQ_WAIT_FOREVER" , MQ_WAIT_FOREVER },
    { NULL              , 0               },
  };
 
  int index;
  check_LNG(Tcl_GetIndexFromObjStruct (interp, enumE, &keys,
      sizeof(struct LookupClassS), "enum", TCL_EXACT, &index)) return TCL_ERROR;
  *ret = keys[index].val;
  return TCL_OK;
}

atlmqmsgque_MqFactoryE_ToString()

OT_OBJ_T atlmqmsgque_MqFactoryE_ToString

(

const enum MqFactoryE

type

)

Definition at line 272 of file LibMqMsgque_atl.c.

{
  OT_OBJ_T tmpO = Tcl_NewObj();
  if (mk_bit_compare(type,MQ_FACTORY_NEW_INIT  )) ot_enum_append(tmpO,"INIT"  ) ;
  if (mk_bit_compare(type,MQ_FACTORY_NEW_CHILD )) ot_enum_append(tmpO,"CHILD" ) ;
  if (mk_bit_compare(type,MQ_FACTORY_NEW_SLAVE )) ot_enum_append(tmpO,"SLAVE" ) ;
  if (mk_bit_compare(type,MQ_FACTORY_NEW_FORK  )) ot_enum_append(tmpO,"FORK"  ) ;
  if (mk_bit_compare(type,MQ_FACTORY_NEW_THREAD)) ot_enum_append(tmpO,"THREAD") ;
  if (mk_bit_compare(type,MQ_FACTORY_NEW_FILTER)) ot_enum_append(tmpO,"FILTER") ;
  return tmpO;
}

atlmqmsgque_MqHandShakeE_ToString()

OT_OBJ_T atlmqmsgque_MqHandShakeE_ToString

(

const enum MqHandShakeE

type

)

Definition at line 284 of file LibMqMsgque_atl.c.

{
  switch (type) {
    case MQ_HANDSHAKE_START : return ot_fixstrobj("START") ;
    case MQ_HANDSHAKE_OK    : return ot_fixstrobj("OK"   ) ;
    case MQ_HANDSHAKE_ERROR : return ot_fixstrobj("ERROR") ;
  }
  return ot_fixstrobj("NOTHING");
}

atlmqmsgque_MqIdentE_ToString()

OT_OBJ_T atlmqmsgque_MqIdentE_ToString

(

const enum MqIdentE

type

)

Definition at line 294 of file LibMqMsgque_atl.c.

{
  switch (type) {
    case MQ_IDENT_PREFIX  : return ot_fixstrobj("PREFIX" ) ;
    case MQ_IDENT_FACTORY : return ot_fixstrobj("FACTORY") ;
  }
  return ot_fixstrobj("NOTHING");
}

atlmqmsgque_MqIoComE_ToString()

OT_OBJ_T atlmqmsgque_MqIoComE_ToString

(

const enum MqIoComE

type

)

Definition at line 303 of file LibMqMsgque_atl.c.

{
  switch (type) {
    case MQ_IO_PIPE : return ot_fixstrobj("PIPE") ;
    case MQ_IO_UDS  : return ot_fixstrobj("UDS" ) ;
    case MQ_IO_TCP  : return ot_fixstrobj("TCP" ) ;
    case MQ_IO_INIT : return ot_fixstrobj("INIT") ;
    case MQ_IO_LOOP : return ot_fixstrobj("LOOP") ;
  }
  return ot_fixstrobj("NOTHING");
}

atlmqmsgque_MqMsgque_IdentE_FromInt()

static OT_ProcRet atlmqmsgque_MqMsgque_IdentE_FromInt ( OtClass_ARGS )

static

Atl: (static) MqIdentE [MqMsgque::IdentE_FromInt value:int32] → C-API
return the MqIdentE from integer …

Definition at line 580 of file LibMqMsgque_atl.c.

                                                             {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(IdentE_FromInt_doc);
  MK_I32 value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_NI4 (value))
  OT_CHECK_NOARGS;
  enum MqIdentE value_out;
  MkErrorC_Check(MK_ERROR_FORMAT,MqIdentE_FromInt (value, &value_out));
  OT_retObj_SET(OT_NEW_Mq_enum_OBJ(IdentE,value_out));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_IdentE_ToInt()

static OT_ProcRet atlmqmsgque_MqMsgque_IdentE_ToInt ( OtClass_ARGS )

static

Atl: (static) int32 [MqMsgque::IdentE_ToInt value:MqIdentE] → C-API
return the MqIdentE as integer …

Definition at line 667 of file LibMqMsgque_atl.c.

                                                           {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(IdentE_ToInt_doc);
  enum MqIdentE value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqIdentE,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_I32(MqIdentE_ToInt (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_IdentE_ToString()

static OT_ProcRet atlmqmsgque_MqMsgque_IdentE_ToString ( OtClass_ARGS )

static

Atl: (static) string [MqMsgque::IdentE_ToString value:MqIdentE] → C-API
return the MqIdentE as string …

Definition at line 682 of file LibMqMsgque_atl.c.

                                                              {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(IdentE_ToString_doc);
  enum MqIdentE value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqIdentE,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_STR(MqIdentE_ToString (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_SlaveE_FromInt()

static OT_ProcRet atlmqmsgque_MqMsgque_SlaveE_FromInt ( OtClass_ARGS )

static

Atl: (static) MqSlaveE [MqMsgque::SlaveE_FromInt value:int32] → C-API
return the MqSlaveE from integer …

Definition at line 597 of file LibMqMsgque_atl.c.

                                                             {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(SlaveE_FromInt_doc);
  MK_I32 value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_NI4 (value))
  OT_CHECK_NOARGS;
  enum MqSlaveE value_out;
  MkErrorC_Check(MK_ERROR_FORMAT,MqSlaveE_FromInt (value, &value_out));
  OT_retObj_SET(OT_NEW_Mq_enum_OBJ(SlaveE,value_out));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_SlaveE_ToInt()

static OT_ProcRet atlmqmsgque_MqMsgque_SlaveE_ToInt ( OtClass_ARGS )

static

Atl: (static) int32 [MqMsgque::SlaveE_ToInt value:MqSlaveE] → C-API
return the MqSlaveE as integer …

Definition at line 697 of file LibMqMsgque_atl.c.

                                                           {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(SlaveE_ToInt_doc);
  enum MqSlaveE value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqSlaveE,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_I32(MqSlaveE_ToInt (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_SlaveE_ToString()

static OT_ProcRet atlmqmsgque_MqMsgque_SlaveE_ToString ( OtClass_ARGS )

static

Atl: (static) string [MqMsgque::SlaveE_ToString value:MqSlaveE] → C-API
return the MqSlaveE as string …

Definition at line 712 of file LibMqMsgque_atl.c.

                                                              {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(SlaveE_ToString_doc);
  enum MqSlaveE value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqSlaveE,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_STR(MqSlaveE_ToString (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_StartE_FromInt()

static OT_ProcRet atlmqmsgque_MqMsgque_StartE_FromInt ( OtClass_ARGS )

static

Atl: (static) MqStartE [MqMsgque::StartE_FromInt value:int32] → C-API
return the MqStartE from integer …

Definition at line 614 of file LibMqMsgque_atl.c.

                                                             {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(StartE_FromInt_doc);
  MK_I32 value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_NI4 (value))
  OT_CHECK_NOARGS;
  enum MqStartE value_out;
  MkErrorC_Check(MK_ERROR_FORMAT,MqStartE_FromInt (value, &value_out));
  OT_retObj_SET(OT_NEW_Mq_enum_OBJ(StartE,value_out));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_StartE_ToInt()

static OT_ProcRet atlmqmsgque_MqMsgque_StartE_ToInt ( OtClass_ARGS )

static

Atl: (static) int32 [MqMsgque::StartE_ToInt value:MqStartE] → C-API
return the MqStartE as integer …

Definition at line 727 of file LibMqMsgque_atl.c.

                                                           {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(StartE_ToInt_doc);
  enum MqStartE value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqStartE,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_I32(MqStartE_ToInt (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_StartE_ToString()

static OT_ProcRet atlmqmsgque_MqMsgque_StartE_ToString ( OtClass_ARGS )

static

Atl: (static) string [MqMsgque::StartE_ToString value:MqStartE] → C-API
return the MqStartE as string …

Definition at line 742 of file LibMqMsgque_atl.c.

                                                              {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(StartE_ToString_doc);
  enum MqStartE value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqStartE,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_STR(MqStartE_ToString (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_StatusIsEF_FromInt()

static OT_ProcRet atlmqmsgque_MqMsgque_StatusIsEF_FromInt ( OtClass_ARGS )

static

Atl: (static) MqStatusIsEF [MqMsgque::StatusIsEF_FromInt value:int32] → C-API
return the MqStatusIsEF from integer …

Definition at line 631 of file LibMqMsgque_atl.c.

                                                                 {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(StatusIsEF_FromInt_doc);
  MK_I32 value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_NI4 (value))
  OT_CHECK_NOARGS;
  enum MqStatusIsEF value_out;
  MkErrorC_Check(MK_ERROR_FORMAT,MqStatusIsEF_FromInt (value, &value_out));
  OT_retObj_SET(OT_NEW_Mq_enum_OBJ(StatusIsEF,value_out));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_StatusIsEF_ToInt()

static OT_ProcRet atlmqmsgque_MqMsgque_StatusIsEF_ToInt ( OtClass_ARGS )

static

Atl: (static) int32 [MqMsgque::StatusIsEF_ToInt value:MqStatusIsEF] → C-API
return the MqStatusIsEF as integer …

Definition at line 757 of file LibMqMsgque_atl.c.

                                                               {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(StatusIsEF_ToInt_doc);
  enum MqStatusIsEF value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqStatusIsEF,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_I32(MqStatusIsEF_ToInt (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_StatusIsEF_ToString()

static OT_ProcRet atlmqmsgque_MqMsgque_StatusIsEF_ToString ( OtClass_ARGS )

static

Atl: (static) string [MqMsgque::StatusIsEF_ToString value:MqStatusIsEF] → C-API
return the MqStatusIsEF as string …

Definition at line 772 of file LibMqMsgque_atl.c.

                                                                  {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(StatusIsEF_ToString_doc);
  enum MqStatusIsEF value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqStatusIsEF,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_STR(MqStatusIsEF_ToString (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_WaitOnEventE_FromInt()

static OT_ProcRet atlmqmsgque_MqMsgque_WaitOnEventE_FromInt ( OtClass_ARGS )

static

Atl: (static) MqWaitOnEventE [MqMsgque::WaitOnEventE_FromInt value:int32] → C-API
return the MqWaitOnEventE from integer …

Definition at line 648 of file LibMqMsgque_atl.c.

                                                                   {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(WaitOnEventE_FromInt_doc);
  MK_I32 value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_NI4 (value))
  OT_CHECK_NOARGS;
  enum MqWaitOnEventE value_out;
  MkErrorC_Check(MK_ERROR_FORMAT,MqWaitOnEventE_FromInt (value, &value_out));
  OT_retObj_SET(OT_NEW_Mq_enum_OBJ(WaitOnEventE,value_out));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_WaitOnEventE_ToInt()

static OT_ProcRet atlmqmsgque_MqMsgque_WaitOnEventE_ToInt ( OtClass_ARGS )

static

Atl: (static) int32 [MqMsgque::WaitOnEventE_ToInt value:MqWaitOnEventE] → C-API
return the MqWaitOnEventE as integer …

Definition at line 787 of file LibMqMsgque_atl.c.

                                                                 {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(WaitOnEventE_ToInt_doc);
  enum MqWaitOnEventE value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqWaitOnEventE,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_I32(MqWaitOnEventE_ToInt (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqMsgque_WaitOnEventE_ToString()

static OT_ProcRet atlmqmsgque_MqMsgque_WaitOnEventE_ToString ( OtClass_ARGS )

static

Atl: (static) string [MqMsgque::WaitOnEventE_ToString value:MqWaitOnEventE] → C-API
return the MqWaitOnEventE as string …

Definition at line 802 of file LibMqMsgque_atl.c.

                                                                    {
  OT_SETUP_hdl_static;
  OT_SETUP_ONEARG(WaitOnEventE_ToString_doc);
  enum MqWaitOnEventE value = 0;
  OT_CHECK_REQUIRED(OT_CHECK_ENUM (MqWaitOnEventE,value))
  OT_CHECK_NOARGS;
  OT_retObj_SET_STR(MqWaitOnEventE_ToString (value));
  goto end;
  error:
  OT_retObj_SET_Error;
  end:
  OT_retObj_RETURN;
}

atlmqmsgque_MqSlaveE_ToString()

OT_OBJ_T atlmqmsgque_MqSlaveE_ToString

(

const enum MqSlaveE

type

)

Definition at line 315 of file LibMqMsgque_atl.c.

{
  switch (type) {
    case MQ_SLAVE_LOOPBACK : return ot_fixstrobj("LOOPBACK") ;
    case MQ_SLAVE_FILTER   : return ot_fixstrobj("FILTER"  ) ;
    case MQ_SLAVE_USER     : return ot_fixstrobj("USER"    ) ;
    case MQ_SLAVE_MAX      : return ot_fixstrobj("MAX"     ) ;
  }
  return ot_fixstrobj("NOTHING");
}

atlmqmsgque_MqStartE_ToString()

OT_OBJ_T atlmqmsgque_MqStartE_ToString

(

const enum MqStartE

type

)

Definition at line 326 of file LibMqMsgque_atl.c.

{
  switch (type) {
    case MQ_START_DEFAULT : return ot_fixstrobj("DEFAULT") ;
    case MQ_START_FORK    : return ot_fixstrobj("FORK"   ) ;
    case MQ_START_THREAD  : return ot_fixstrobj("THREAD" ) ;
    case MQ_START_SPAWN   : return ot_fixstrobj("SPAWN"  ) ;
  }
  return ot_fixstrobj("NOTHING");
}

atlmqmsgque_MqStatusIsEF_ToString()

OT_OBJ_T atlmqmsgque_MqStatusIsEF_ToString

(

const enum MqStatusIsEF

type

)

Definition at line 337 of file LibMqMsgque_atl.c.

{
  if (type == MQ_STATUS_IS_INITIAL) {
    return ot_fixstrobj("INITIAL");
  } else {
    OT_OBJ_T tmpO = Tcl_NewObj();
    if (mk_bit_compare(type,MQ_STATUS_IS_DUP    )) ot_enum_append(tmpO,"DUP"    ) ;
    if (mk_bit_compare(type,MQ_STATUS_IS_THREAD )) ot_enum_append(tmpO,"THREAD" ) ;
    if (mk_bit_compare(type,MQ_STATUS_IS_FORK   )) ot_enum_append(tmpO,"FORK"   ) ;
    if (mk_bit_compare(type,MQ_STATUS_IS_SPAWN  )) ot_enum_append(tmpO,"SPAWN"  ) ;
    return tmpO;
  }
}

atlmqmsgque_MqTransTypeE_ToString()

OT_OBJ_T atlmqmsgque_MqTransTypeE_ToString

(

const enum MqTransTypeE

type

)

Definition at line 351 of file LibMqMsgque_atl.c.

{
  switch (type) {
    case MQ_TRANS_TYPE_WAIT  : return ot_fixstrobj("WAIT" ) ;
    case MQ_TRANS_TYPE_SUB   : return ot_fixstrobj("SUB"  ) ;
    case MQ_TRANS_TYPE_CB    : return ot_fixstrobj("CB"   ) ;
    case MQ_TRANS_TYPE_TRANS : return ot_fixstrobj("TRANS") ;
    case MQ_TRANS_TYPE_NO    : return ot_fixstrobj("NO"   ) ;
  }
  return ot_fixstrobj("NOTHING");
}

atlmqmsgque_MqWaitOnEventE_ToString()

OT_OBJ_T atlmqmsgque_MqWaitOnEventE_ToString

(

const enum MqWaitOnEventE

type

)

Definition at line 363 of file LibMqMsgque_atl.c.

{
  switch (type) {
    case MQ_WAIT_NO      : return ot_fixstrobj("NO"     ) ;
    case MQ_WAIT_ONCE    : return ot_fixstrobj("ONCE"   ) ;
    case MQ_WAIT_OWN     : return ot_fixstrobj("OWN"    ) ;
    case MQ_WAIT_FOREVER : return ot_fixstrobj("FOREVER") ;
  }
  return ot_fixstrobj("NOTHING");
}