MqFactoryC_rb.c File Reference

tag: nhi1-release-250425 More...

#include "LibMqMsgque_private_rb.h"

Include dependency graph for MqFactoryC_rb.c:

Go to the source code of this file.

Macros
#define	SetupRtFromObj(hd)
#define	META_FILE_NAME   "MqFactoryC_rb.c"
#define	OT_CLASS   NS(MqFactoryC)
#define	OT_CLASS_NAME   "MqFactoryC"
#define	OT_LNG2META(O)
#define	S_INIT   NS(sInit)(MK_RT_CALL_ONLY)
#define	OT_SETUP_hdl   OT_SETUP_hdl_tmpl(MqFactoryC);
#define	OT_SETUP_hdl__null_allow   OT_SETUP_hdl_tmpl__null_allow(MqFactoryC);
#define	OT_SETUP_hdl_constr
#define	OT_SETUP_hdl_destr   OT_SETUP_hdl_tmpl__null_allow(MqFactoryC);
#define	OT_SETUP_hdl_static
#define	OT_SETUP_hdl_static_constr   OT_SETUP_hdl_static
#define	SetupRtFromObj_X(hdl)
#define	SetupRtFromObj_XN(hdl)
#define	Add_doc   "MqFactoryC MqFactoryC.Add(constructor:class, ?ident:string=\"MK_NULL\"?)"
#define	new_doc   "MqFactoryC MqFactoryC.new(constructor:class, ?ident:string=\"MK_NULL\"?)"
#define	Get_doc   "MqFactoryC MqFactoryC.Get(?ident:string=\"\"?)"
#define	GetCalled_doc   "MqFactoryC MqFactoryC.GetCalled(?ident:string=\"\"?)"
#define	GetCalledL_doc   "MqFactoryC MqFactoryC.GetCalledL(largs:MkBufferListC)"
#define	GetNull_doc   "MqFactoryC MqFactoryC.GetNull()"
#define	HandleResolve_doc   "MqFactoryC MqFactoryC.HandleResolve(netHdl:MK_HDL)"
#define	Instances_doc   "MqFactoryC MqFactoryC.Instances()"
#define	DefaultIdent_doc   "string MqFactoryC.DefaultIdent()"
#define	InitialIdent_doc   "string MqFactoryC.InitialIdent()"
#define	LogAll_doc   "MqFactoryC.LogAll(?callfunc:string=\"MK_NULL\"?)"
#define	Dup2_doc   "MqFactoryC fct.Dup2(ident:string) (const)"
#define	Default_doc   "MqFactoryC fct.Default()"
#define	Initial_doc   "MqFactoryC fct.Initial()"
#define	Next_doc   "MqFactoryC fct.Next()"
#define	Prev_doc   "MqFactoryC fct.Prev()"
#define	New_doc   "MqContextC fct.New()"
#define	GetOriginalIdent_doc   "string fct.GetOriginalIdent() (const)"

Functions
static void	rbmqmsgque_sMark (MK_PTR)
static OT_OBJ_T	rbmqmsgque_LNG_CONSTR (OT_CLS_T clazz, MK_MNG mng, int objc, VALUE *objv)
static MK_PTR	rbmqmsgque_MqFactoryC_selfCreate (MK_RT mkrt, MK_OBJ obj, MK_PTR envP)
static void	rbmqmsgque_MqFactoryC_selfDelete (MK_RT mkrt, MK_PTR ptr, MK_PTR envP)
static void	rbmqmsgque_MqFactoryC_selfUnlink (MK_RT mkrt, MK_PTR ptr, MK_PTR envP)
static void	rbmqmsgque_sInit (MK_RT mkrt)
static VALUE	rbmqmsgque_sFactoryCall (VALUE args)
static enum MkErrorE	rbmqmsgque_sFactoryCTor (MQ_CALLBACK_FACTORY_CTOR_ARGS)
static void	rbmqmsgque_sFactoryDTor (MK_RT mkrt, MQ_CTX mqctx, bool doFactoryDelete, MQ_FCT const fct)
static void	rbmqmsgque_sFactoryDataFree (MK_RT mkrt, MK_PTR *dataP)
static void	rbmqmsgque_sFactoryDataCopy (MK_RT mkrt, MK_PTR *dataP)
static OT_ProcRet	rbmqmsgque_MqFactoryC_HandleResolve (OtClass_ARGS)
	Ruby: (static) MqFactoryC MqFactoryC.HandleResolve(netHdl:MK_HDL) → C-API Handle-Resolve-Slot - return a MqFactoryC from netHdl or nil if invalid…
MK_DEPRECATED static MK_UNUSED OT_ProcRet	rbmqmsgque_MqFactoryC_HandleGet (MqFactoryC_ARGS)
static OT_ProcRet	rbmqmsgque_MqFactoryC_Next (MqFactoryC_ARGS)
	Ruby: MqFactoryC fct.Next() → C-API get next instance from linked-list of MqFactoryS type
static OT_ProcRet	rbmqmsgque_MqFactoryC_Prev (MqFactoryC_ARGS)
	Ruby: MqFactoryC fct.Prev() → C-API get previous instance from linked-list of MqFactoryS type
static OT_ProcRet	rbmqmsgque_MqFactoryC_Instances (OtClass_ARGS)
	Ruby: (static) MqFactoryC MqFactoryC.Instances() → C-API get head-instance from linked-list of MqFactoryS type …
static OT_ProcRet	rbmqmsgque_MqFactoryC_GetNull (OtClass_ARGS)
	Ruby: (static) MqFactoryC MqFactoryC.GetNull() → C-API Null-Slot - return a MqFactoryC typed NULL instance …
static OT_ProcRet	rbmqmsgque_MqFactoryC_Get (OtClass_ARGS)
	Ruby: (static) MqFactoryC MqFactoryC.Get(?ident:string=""?) → C-API return the MqFactoryC
static OT_ProcRet	rbmqmsgque_MqFactoryC_GetCalled (OtClass_ARGS)
	Ruby: (static) MqFactoryC MqFactoryC.GetCalled(?ident:string=""?) → C-API returns the MqFactoryC identified by ident …
static OT_ProcRet	rbmqmsgque_MqFactoryC_GetCalledL (OtClass_ARGS)
	Ruby: (static) MqFactoryC MqFactoryC.GetCalledL(largs:MkBufferListC) → C-API returns the MqFactoryC identified as first argument in the largs MkBufferListC …
static OT_ProcRet	rbmqmsgque_MqFactoryC_GetOriginalIdent (MqFactoryC_ARGS)
	Ruby: string fct.GetOriginalIdent() → C-API helper function to return MqFactoryS::originalIdent
static OT_ProcRet	rbmqmsgque_MqFactoryC_Default (MqFactoryC_ARGS)
	Ruby: MqFactoryC fct.Default() → C-API set the default-attribute to the factory …
static OT_ProcRet	rbmqmsgque_MqFactoryC_Initial (MqFactoryC_ARGS)
	Ruby: MqFactoryC fct.Initial() → C-API set the initial-attribut to fct …
static OT_ProcRet	rbmqmsgque_MqFactoryC_New (MqFactoryC_ARGS)
	Ruby: MqContextC fct.New() → C-API create a new MqContextC from a MqFactoryC …
MK_DEPRECATED static MK_UNUSED OT_ProcRet	rbmqmsgque_MqFactoryC_Log (MqFactoryC_ARGS)
static OT_ProcRet	rbmqmsgque_MqFactoryC_DefaultIdent (OtClass_ARGS)
	Ruby: (static) string MqFactoryC.DefaultIdent() → C-API return the factory-identifier of the default MqFactoryC
static OT_ProcRet	rbmqmsgque_MqFactoryC_InitialIdent (OtClass_ARGS)
	Ruby: (static) string MqFactoryC.InitialIdent() → C-API return the factory-identifier of the initial MqFactoryC
static OT_ProcRet	rbmqmsgque_MqFactoryC_LogAll (OtClass_ARGS)
	Ruby: (static) MqFactoryC.LogAll(?callfunc:string="MK_NULL"?) → C-API log all "factories" to stderr
static OT_ProcRet	rbmqmsgque_MqFactoryC_Dup2 (MqFactoryC_ARGS)
	Ruby: (constructor) MqFactoryC fct.Dup2(ident:string) → C-API create a duplicate of the singleton object MqFactoryC using a new factory-identifer
static OT_ProcRet	rbmqmsgque_MqFactoryC_Add (OtClass_ARGS)
	Ruby: (constructor,static) MqFactoryC MqFactoryC.Add(constructor:class, ?ident:string="MK_NULL"?) → C-API Add a new MqFactoryC identified by factory-identifier and defined by factory-constructor …
static OT_ProcRet	rbmqmsgque_MqFactoryC_new (CONSTR_ARGS)
	Ruby: (constructor,static) MqFactoryC MqFactoryC.new(constructor:class, ?ident:string="MK_NULL"?) → C-API Add a new MqFactoryC identified by factory-identifier and defined by factory-constructor …
void	rbmqmsgque_MqFactoryC_Init (MK_RT mkrt, MQ_RT mqrt)

Variables
OT_CLS_T	OT_CLASS
static MK_TYP	MqFactoryCTT = NULL
OT_OBJ_T	rbmqmsgque_MqFactoryC_MK_NULL = 0
static rb_data_type_t	rbmqmsgque_MqFactoryC_T
static ID	rbmqmsgque_id_new

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

Macro Definition Documentation

Add_doc

#define Add_doc   "MqFactoryC MqFactoryC.Add(constructor:class, ?ident:string=\"MK_NULL\"?)"

doc definition

Definition at line 117 of file MqFactoryC_rb.c.

Default_doc

#define Default_doc   "MqFactoryC fct.Default()"

Definition at line 137 of file MqFactoryC_rb.c.

DefaultIdent_doc

#define DefaultIdent_doc   "string MqFactoryC.DefaultIdent()"

Definition at line 129 of file MqFactoryC_rb.c.

Dup2_doc

#define Dup2_doc   "MqFactoryC fct.Dup2(ident:string) (const)"

Definition at line 134 of file MqFactoryC_rb.c.

Get_doc

#define Get_doc   "MqFactoryC MqFactoryC.Get(?ident:string=\"\"?)"

Definition at line 121 of file MqFactoryC_rb.c.

GetCalled_doc

#define GetCalled_doc   "MqFactoryC MqFactoryC.GetCalled(?ident:string=\"\"?)"

Definition at line 122 of file MqFactoryC_rb.c.

GetCalledL_doc

#define GetCalledL_doc   "MqFactoryC MqFactoryC.GetCalledL(largs:MkBufferListC)"

Definition at line 123 of file MqFactoryC_rb.c.

GetNull_doc

#define GetNull_doc   "MqFactoryC MqFactoryC.GetNull()"

Definition at line 124 of file MqFactoryC_rb.c.

GetOriginalIdent_doc

#define GetOriginalIdent_doc   "string fct.GetOriginalIdent() (const)"

Definition at line 146 of file MqFactoryC_rb.c.

HandleResolve_doc

#define HandleResolve_doc   "MqFactoryC MqFactoryC.HandleResolve(netHdl:MK_HDL)"

Definition at line 125 of file MqFactoryC_rb.c.

Initial_doc

#define Initial_doc   "MqFactoryC fct.Initial()"

Definition at line 138 of file MqFactoryC_rb.c.

InitialIdent_doc

#define InitialIdent_doc   "string MqFactoryC.InitialIdent()"

Definition at line 130 of file MqFactoryC_rb.c.

Instances_doc

#define Instances_doc   "MqFactoryC MqFactoryC.Instances()"

Definition at line 126 of file MqFactoryC_rb.c.

LogAll_doc

#define LogAll_doc   "MqFactoryC.LogAll(?callfunc:string=\"MK_NULL\"?)"

Definition at line 131 of file MqFactoryC_rb.c.

META_FILE_NAME

#define META_FILE_NAME   "MqFactoryC_rb.c"

Definition at line 14 of file MqFactoryC_rb.c.

New_doc

#define New_doc   "MqContextC fct.New()"

Definition at line 143 of file MqFactoryC_rb.c.

new_doc

#define new_doc   "MqFactoryC MqFactoryC.new(constructor:class, ?ident:string=\"MK_NULL\"?)"

Definition at line 118 of file MqFactoryC_rb.c.

Next_doc

#define Next_doc   "MqFactoryC fct.Next()"

Definition at line 139 of file MqFactoryC_rb.c.

OT_CLASS

#define OT_CLASS   NS(MqFactoryC)

Definition at line 18 of file MqFactoryC_rb.c.

OT_CLASS_NAME

#define OT_CLASS_NAME   "MqFactoryC"

Definition at line 19 of file MqFactoryC_rb.c.

OT_LNG2META

#define OT_LNG2META

(

O

)

Value:

MqFct(VAL2MNG(O))

Definition at line 21 of file MqFactoryC_rb.c.

OT_SETUP_hdl

#define OT_SETUP_hdl   OT_SETUP_hdl_tmpl(MqFactoryC);

Definition at line 91 of file MqFactoryC_rb.c.

OT_SETUP_hdl__null_allow

#define OT_SETUP_hdl__null_allow   OT_SETUP_hdl_tmpl__null_allow(MqFactoryC);

Definition at line 92 of file MqFactoryC_rb.c.

OT_SETUP_hdl_constr

#define OT_SETUP_hdl_constr

Value:

                                    AllRtSetup_NULL; \
                                    OT_OBJ_T clazz = self; \
                                    MqFactoryC_type hdl = (MqFactoryC_type) &MkERROR;

Definition at line 93 of file MqFactoryC_rb.c.

#define OT_SETUP_hdl_constr         AllRtSetup_NULL; \
                                    OT_OBJ_T clazz = self; \
                                    MqFactoryC_type hdl = (MqFactoryC_type) &MkERROR;

OT_SETUP_hdl_destr

#define OT_SETUP_hdl_destr   OT_SETUP_hdl_tmpl__null_allow(MqFactoryC);

Definition at line 96 of file MqFactoryC_rb.c.

OT_SETUP_hdl_static

#define OT_SETUP_hdl_static

Value:

                                    AllRtSetup_NULL; \
                                    __attribute__((unused)) MK_TYP hdl = MqFactoryC##_TT;

Definition at line 97 of file MqFactoryC_rb.c.

#define OT_SETUP_hdl_static         AllRtSetup_NULL; \
                                    __attribute__((unused)) MK_TYP hdl = MqFactoryC##_TT;

OT_SETUP_hdl_static_constr

#define OT_SETUP_hdl_static_constr   OT_SETUP_hdl_static

Definition at line 99 of file MqFactoryC_rb.c.

Prev_doc

#define Prev_doc   "MqFactoryC fct.Prev()"

Definition at line 140 of file MqFactoryC_rb.c.

S_INIT

#define S_INIT   NS(sInit)(MK_RT_CALL_ONLY)

Definition at line 73 of file MqFactoryC_rb.c.

SetupRtFromObj

#define SetupRtFromObj

(

hd

)

Value:

AllRtSetup_NULL

Definition at line 11 of file MqFactoryC_rb.c.

SetupRtFromObj_X

#define SetupRtFromObj_X

(

hdl

)

Value:

AllRtSetup_X(hdl)

Definition at line 102 of file MqFactoryC_rb.c.

SetupRtFromObj_XN

#define SetupRtFromObj_XN

(

hdl

)

Value:

AllRtSetup_XN(hdl)

Definition at line 103 of file MqFactoryC_rb.c.

Function Documentation

rbmqmsgque_LNG_CONSTR()

static OT_OBJ_T rbmqmsgque_LNG_CONSTR ( OT_CLS_T clazz, MK_MNG mng, int objc, VALUE * objv )

inlinestatic

Definition at line 50 of file MqFactoryC_rb.c.

                                                                                      {
  return MK(AtomObjCrt)(clazz,&NS(MqFactoryC_T),mng,objc,objv);
}

rbmqmsgque_MqFactoryC_Init()

void rbmqmsgque_MqFactoryC_Init	(	MK_RT	mkrt,
		MQ_RT	mqrt )

Definition at line 592 of file MqFactoryC_rb.c.

                                          {
 
  // init type
  MqFactoryCTT = MqFactoryC_TT;
  S_INIT;
 
  // BEGIN-CLASS - created by 'rb_MqS.tcl -i NHI1_HOME/theLink/c/gen/c_mqmsgque.meta' - DO NOT change
 
  // doc-key: MqFactoryC,MqFactory,sCc
  OT_METH_S ( MqFactoryC, Add,                       MqFactoryC_Add                      )
  OT_METH_C ( MqFactoryC, new,                       MqFactoryC_new                      )
 
  // doc-key: MqFactoryC,MqFactory,sc_
  OT_METH_O ( MqFactoryC, Get,                       MqFactoryC_Get                      )
  OT_METH_S ( MqFactoryC, Get,                       MqFactoryC_Get                      )
  OT_METH_O ( MqFactoryC, GetCalled,                 MqFactoryC_GetCalled                )
  OT_METH_S ( MqFactoryC, GetCalled,                 MqFactoryC_GetCalled                )
  OT_METH_O ( MqFactoryC, GetCalledL,                MqFactoryC_GetCalledL               )
  OT_METH_S ( MqFactoryC, GetCalledL,                MqFactoryC_GetCalledL               )
  OT_METH_O ( MqFactoryC, GetNull,                   MqFactoryC_GetNull                  )
  OT_METH_S ( MqFactoryC, GetNull,                   MqFactoryC_GetNull                  )
  OT_METH_O ( MqFactoryC, HandleResolve,             MqFactoryC_HandleResolve            )
  OT_METH_S ( MqFactoryC, HandleResolve,             MqFactoryC_HandleResolve            )
  OT_METH_O ( MqFactoryC, Instances,                 MqFactoryC_Instances                )
  OT_METH_S ( MqFactoryC, Instances,                 MqFactoryC_Instances                )
 
  // doc-key: MqFactoryC,MqFactory,sm_
  OT_METH_O ( MqFactoryC, DefaultIdent,              MqFactoryC_DefaultIdent             )
  OT_METH_S ( MqFactoryC, DefaultIdent,              MqFactoryC_DefaultIdent             )
  OT_METH_O ( MqFactoryC, InitialIdent,              MqFactoryC_InitialIdent             )
  OT_METH_S ( MqFactoryC, InitialIdent,              MqFactoryC_InitialIdent             )
  OT_METH_O ( MqFactoryC, LogAll,                    MqFactoryC_LogAll                   )
  OT_METH_S ( MqFactoryC, LogAll,                    MqFactoryC_LogAll                   )
 
  // END-CLASS - created by 'rb_MqS.tcl -i NHI1_HOME/theLink/c/gen/c_mqmsgque.meta' - DO NOT change
 
  // BEGIN-OBJ - created by 'rb_MqS.tcl -i NHI1_HOME/theLink/c/gen/c_mqmsgque.meta' - DO NOT change
 
  // doc-key: MqFactoryC,MqFactory,oCx
  OT_METH_O ( MqFactoryC, Dup2,                      MqFactoryC_Dup2                     )
 
  // doc-key: MqFactoryC,MqFactory,oc_
  OT_METH_O ( MqFactoryC, Default,                   MqFactoryC_Default                  )
  OT_METH_O ( MqFactoryC, Initial,                   MqFactoryC_Initial                  )
  OT_METH_O ( MqFactoryC, Next,                      MqFactoryC_Next                     )
  OT_METH_O ( MqFactoryC, Prev,                      MqFactoryC_Prev                     )
 
  // doc-key: MqFactoryC,MqFactory,oco
  OT_METH_O ( MqFactoryC, New,                       MqFactoryC_New                      )
 
  // doc-key: MqFactoryC,MqFactory,om_
  OT_METH_O ( MqFactoryC, GetOriginalIdent,          MqFactoryC_GetOriginalIdent         )
  // skip class-overload: MqFactoryHandleGet → HandleGet, MqFactoryC_HandleGet
  // skip class-overload: MqFactoryLog → Log, MqFactoryC_Log
 
  // END-OBJ - created by 'rb_MqS.tcl -i NHI1_HOME/theLink/c/gen/c_mqmsgque.meta' - DO NOT change
 
  // setup default factory… required for objects created WITHOUT factory
  // example: Filter3.rb
  if (!strcmp(MqFactoryDefaultIdent(), "libmqmsgque")) {
 
    if  ( MqFactoryDefault(
            MqFactoryInitial(
              MqFactoryAdd (NULL, 
                NS(sFactoryCTor), (MK_PTR)NS(MqContextC), NULL, NULL, 
                  NS(sFactoryDTor), NULL, NULL, NULL, 
                    "rbmsgque"
              )
            )
          ) == NULL
        ) 
    {         
      OT_ERROR_RUNTIME("MqFactoryC", "create default factory failed")
    }
  }
 
  NS(id_new) = rb_intern("new");
}

rbmqmsgque_MqFactoryC_selfCreate()

static MK_PTR rbmqmsgque_MqFactoryC_selfCreate ( MK_RT mkrt, MK_OBJ obj, MK_PTR envP )

static

Definition at line 59 of file MqFactoryC_rb.c.

                                                                             {
  OT_OBJ_T self = NS(LNG_CONSTR) (OT_CLASS, obj, 0, NULL);
  return VAL2PTR(self);
}

rbmqmsgque_MqFactoryC_selfDelete()

static void rbmqmsgque_MqFactoryC_selfDelete ( MK_RT mkrt, MK_PTR ptr, MK_PTR envP )

static

Definition at line 64 of file MqFactoryC_rb.c.

                                                                           {
  OT_OBJECT_DELETE_HARD(PTR2VAL(ptr));
}

rbmqmsgque_MqFactoryC_selfUnlink()

static void rbmqmsgque_MqFactoryC_selfUnlink ( MK_RT mkrt, MK_PTR ptr, MK_PTR envP )

static

Definition at line 68 of file MqFactoryC_rb.c.

                                                                           {
  OT_OBJ_T self =  PTR2VAL(ptr);
  RDATA(self)->data = NULL;
}

rbmqmsgque_sFactoryCall()

static VALUE rbmqmsgque_sFactoryCall ( VALUE args )

static

Definition at line 160 of file MqFactoryC_rb.c.

                                           {
  const VALUE *argsP = rb_array_const_ptr(args);
  // return MK(OtNewInstanceWithOneArg)(argsP[0],argsP[1]);
  return rb_funcall(argsP[0], NS(id_new), 1, argsP[1]);
}

rbmqmsgque_sFactoryCTor()

static enum MkErrorE rbmqmsgque_sFactoryCTor ( MQ_CALLBACK_FACTORY_CTOR_ARGS )

static

Definition at line 167 of file MqFactoryC_rb.c.

{
  MQ_CTX mqctx = NULL;
  VALUE args;
  VALUE tmplO;
  VALUE self;
  VALUE class;
 
//printXV(tmpl, "RUBY: Factory[%s] -> %s\n", MqFactoryGetOriginalIdent(fct), MqLogFactoryE(create))
 
  // setup tmpl
  tmplO = CTX2VAL(tmpl);
 
  // a child use the class of the "parent" and NOT the class from the "factory"
  if (create & (MQ_FACTORY_NEW_CHILD)) {
    class = CLASS_OF(tmplO);
  } else {
    class = PTR2VAL(fct->fct_ctor.data);
  }
 
  // call "new"
  args = rb_ary_new3(2, class, tmplO);
  int status;
  self = rb_protect(NS(sFactoryCall), args, &status);
  if (status) {
    MK(MkExceptionC_Catch) (OT_Prefix_CALL NULL, NULL, __func__, "ProcessEvent");
  }
  rb_ary_free(args);
 
  if (NIL_P(self) || MkErrorCheckE_0E() ) {
    // special:  RUBY does NOT call the destructor of a "broken" instance, this create a "left-over"
    //           MkRuntimeS::cid (not bad but different from other languages)
    // set at:   MqContextInit->MQ_RT_REF.cid = context
    MkRuntimeSetCID(NULL);
    goto error;
  }
  mqctx = VAL2CTX(self);
 
  if (create & (MQ_FACTORY_NEW_CHILD)) {
    MqSetupDup(mqctx, tmpl);
  }
 
  // a MQ_FACTORY_NEW_FILTER has "mqctx->obj.self" as ONLY reference… incr "refCnt"
  // related to "NS(sFactoryDTor)→MQ_FACTORY_NEW_INIT→DECR_REG"
  if (create & MQ_FACTORY_NEW_FILTER) {
    INCR_REF((VALUE*)(&mqctx->super.obj.self));
  }
 
  // ruby-special: default event handler has !no! data and calling just the
  // ruby-event-update function. CHILD does not need to call it too
  if (create & MQ_FACTORY_NEW_CHILD && mqctx->setup.Event.data == NULL) {
    mqctx->setup.Event.fCall = NULL;
  }
  
  *contextP = mqctx;
  return MK_OK;
 
error:
  *contextP = NULL;
  return MkErrorStack_0E();
}

rbmqmsgque_sFactoryDataCopy()

static void rbmqmsgque_sFactoryDataCopy ( MK_RT mkrt, MK_PTR * dataP )

static

Definition at line 256 of file MqFactoryC_rb.c.

                                                             {
  if (*dataP != NULL) {
    INCR_REF((VALUE*)dataP);  // THREAD → no DEEP copy
  }
}

rbmqmsgque_sFactoryDataFree()

static void rbmqmsgque_sFactoryDataFree ( MK_RT mkrt, MK_PTR * dataP )

static

Definition at line 247 of file MqFactoryC_rb.c.

                                                             {
  if (*dataP != NULL) {
    /* I have NOT found any RUBY function to check if VM is still active !!
    DECR_REF((VALUE*)dataP);
    */
  }
  *dataP = NULL;
}

rbmqmsgque_sFactoryDTor()

static void rbmqmsgque_sFactoryDTor ( MK_RT mkrt, MQ_CTX mqctx, bool doFactoryDelete, MQ_FCT const fct )

static

Definition at line 230 of file MqFactoryC_rb.c.

{
  // related to "NS(sFactoryCTor)→MQ_FACTORY_NEW_INIT→INCR_REG"
  if (doFactoryDelete && mqctx->setup.factoryCall == MQ_FACTORY_NEW_FILTER) {
    // DECR_REG does NOT call the destructor… just delete the "reference"
    DECR_REF ((VALUE*)(&mqctx->super.obj.self));
  }
 
  // delete final -> only if not already done
  MqContextDelete (mqctx);
}

rbmqmsgque_sInit()

static void rbmqmsgque_sInit ( MK_RT mkrt )

static

Definition at line 74 of file MqFactoryC_rb.c.

                                       {
 
  // add "selfCreate" and "selfDelete" feature to the MQ-MqFactoryC-Type
  MqFactoryCTT->selfCreate    = NS(MqFactoryC_selfCreate);
  MqFactoryCTT->selfDelete    = NS(MqFactoryC_selfDelete);
  MqFactoryCTT->selfUnlink    = NS(MqFactoryC_selfUnlink);
 
  // create the RUBY class
  OT_CLASS = rb_define_class_under(OT_PKG, "MqFactoryC", MK_BASE_CLASS);
  rb_undef_alloc_func(OT_CLASS);
 
  /* define the "NULL" object */
  VALUE nullO = TypedData_Wrap_Struct (OT_CLASS, &NS(MqFactoryC_T), MK_NULL);
  NS(MqFactoryC_MK_NULL) = nullO;
  INCR_REF(&NS(MqFactoryC_MK_NULL));
}

rbmqmsgque_sMark()

static void rbmqmsgque_sMark ( MK_PTR mng )

static

Definition at line 584 of file MqFactoryC_rb.c.

{
  MQ_FCT fct = MqFct(mng);
  if (fct == NULL) return;
  if (fct->fct_ctor.data) rb_gc_mark((VALUE)fct->fct_ctor.data);
  if (fct->fct_dtor.data) rb_gc_mark((VALUE)fct->fct_dtor.data);
}

Variable Documentation

MqFactoryCTT

MK_TYP MqFactoryCTT = NULL

static

Definition at line 26 of file MqFactoryC_rb.c.

OT_CLASS

OT_CLS_T OT_CLASS

Definition at line 23 of file MqFactoryC_rb.c.

rbmqmsgque_id_new

ID rbmqmsgque_id_new

static

Method definition

Definition at line 158 of file MqFactoryC_rb.c.

rbmqmsgque_MqFactoryC_MK_NULL

OT_OBJ_T rbmqmsgque_MqFactoryC_MK_NULL = 0

Definition at line 27 of file MqFactoryC_rb.c.

rbmqmsgque_MqFactoryC_T

rb_data_type_t rbmqmsgque_MqFactoryC_T

static

Initial value:

= {
  "MqFactoryC",
  {
     rbmqmsgque_sMark ,
     rbmkkernel_AtomDeleteSoft ,
    0, 
    0, 
  },
  NULL, 
  NULL, 
  RUBY_TYPED_FREE_IMMEDIATELY
}

Definition at line 33 of file MqFactoryC_rb.c.

                                         {
  "MqFactoryC",
  {
    NS(sMark),
    MK(AtomDeleteSoft),
    0, /* dsize */
    0, /* reserved[1] */
  },
  NULL, /* parent */
  NULL, /* data */
  RUBY_TYPED_FREE_IMMEDIATELY
};