MkObjectC_atl.c File Reference

tag: nhi1-release-250425 More...

#include "LibMkKernel_private_atl.h"

Include dependency graph for MkObjectC_atl.c:

Go to the source code of this file.

Macros
#define	SetupRtFromHdl_X(hd)
#define	SetupRtFromHdl_XN(hd)
#define	META_FILE_NAME   "MkObjectC_atl.c"
#define	OT_CLASS   amkrt->AtlMkObjectC
#define	OT_NULL   amkrt->AtlMkObjectC_MK_NULL
#define	OT_CLASS_NAME   "MkObjectC"
#define	SELF2HDL(O)
#define	OT_SETUP_hdl   SetupHdlFromMetaData_2(MK_OBJ)
#define	OT_SETUP_hdl__null_allow   SetupHdlFromMetaData__null_allow_2(MK_OBJ)
#define	OT_SETUP_hdl_destr   SetupHdlFromMetaData__null_allow_2(MK_OBJ)
#define	OT_SETUP_hdl_constr   SetupHdlConstr(MkObjectC)
#define	OT_SETUP_hdl_static_constr   OT_SETUP_hdl_static
#define	OT_SETUP_hdl_static   SetupHdlStatic(MkObjectC)
#define	OT_retObj_CONSTR(x)
#define	ClassInit
#define	DbgM_doc   "MkObjectC::DbgM message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0?"
#define	DbgDump_doc   "MkObjectC::DbgDump $obj ?message:string=\"var\"? ?callfunc:string=\"MK_NULL\"? (const)"
#define	DbgL_doc   "MkObjectC::DbgL $fmtobj message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"
#define	DbgLogC_doc   "MkObjectC::DbgLogC $obj ?callfunc:string=\"MK_NULL\"? (const)"
#define	DbgO_doc   "MkObjectC::DbgO $obj ?callfunc:string=\"MK_NULL\"? (const)"
#define	DbgSTACK_doc   "MkObjectC::DbgSTACK $fmtobj ?skip:int32=0? ?num:int32=-1? ?callfunc:string=\"MK_NULL\"? (const)"
#define	LogC_doc   "MkObjectC::LogC $fmtobj message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? (const)"
#define	LogHEX_doc   "MkObjectC::LogHEX $fmtobj callfunc:string data:binary (const)"
#define	RefGet_doc   "int32 [MkObjectC::RefGet $obj]"
#define	GetNull_doc   "MkObjectC [MkObjectC::GetNull]"
#define	HandleResolve_doc   "MkObjectC [MkObjectC::HandleResolve netHdl:MK_HDL]"
#define	Instances_doc   "MkObjectC [MkObjectC::Instances]"
#define	DeleteCallbackCleanup_doc   "MkObjectC::DeleteCallbackCleanup ident:string"
#define	DeleteCallbackSetup_doc   "MkObjectC::DeleteCallbackSetup ident:string ?callback:callable=NULL? ?filter:string=\"NULL\"?"
#define	HandleDeleteByNetHdl_doc   "MkObjectC::HandleDeleteByNetHdl netHdl:MK_HDL"
#define	Delete_doc   "MkObjectC::Delete $obj"
#define	Dispose_doc   "MkObjectC::Dispose $obj"
#define	ErrorCatch_doc   "MkErrorC [MkObjectC::ErrorCatch $obj ?exception:errorCode=NULL? ?callfunc:string=\"MK_NULL\"?] (const)"
#define	Next_doc   "MkObjectC [MkObjectC::Next $obj]"
#define	Prev_doc   "MkObjectC [MkObjectC::Prev $obj]"
#define	ToError_doc   "MkErrorC [MkObjectC::ToError $obj]"
#define	HandleDelete_doc   "MkObjectC::HandleDelete $netObj"
#define	HandleExists_doc   "bool [MkObjectC::HandleExists $obj]"
#define	HandleGet_doc   "MK_HDL [MkObjectC::HandleGet $obj]"
#define	HandleGetOfType_doc   "MK_HDL [MkObjectC::HandleGetOfType $obj]"
#define	HandleGetOr0_doc   "MK_HDL [MkObjectC::HandleGetOr0 $obj]"
#define	IsNull_doc   "bool [MkObjectC::IsNull $obj]"
#define	Log_doc   "MkObjectC::Log $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"
#define	LogLong_doc   "MkObjectC::LogLong $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"
#define	LogShort_doc   "MkObjectC::LogShort $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"
#define	LogType_doc   "MkObjectC::LogType $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"
#define	ToName_doc   "string [MkObjectC::ToName $obj] (const)"
#define	ToNameOfClass_doc   "string [MkObjectC::ToNameOfClass $obj]"
#define	ToNameOfType_doc   "string [MkObjectC::ToNameOfType $obj] (const)"
#define	ToString_doc   "string [MkObjectC::ToString $inst] (const)"
#define	SysHashI32_doc   "int32 [MkObjectC::SysHashI32 key:string ?length:int32=-1?]"
#define	SysHashSTR_doc   "string [MkObjectC::SysHashSTR key:string ?length:int32=-1?]"
#define	SysKill_doc   "MkObjectC::SysKill $fmtobj pid:int32 signal:int32 (const)"
#define	SysGetPid_doc   "int32 [MkObjectC::SysGetPid $fmtobj] (const)"
#define	MkDbgO_O(hdl, call)
#define	MkDbgDumpTmpl(...)
#define	MkObjectToNameOfClassTmpl(hdl)
#define	MkObjectErrorCatchTmpl(...)

Functions
static MK_PTR	atlmkkernel_MkObjectC_selfCreate (MK_RT mkrt, MK_OBJ const obj, MK_PTR const env)
static void	atlmkkernel_MkObjectC_selfDelete (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)
static void	atlmkkernel_MkObjectC_selfUnlink (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)
static enum MkErrorE	TclDbgDump (OT_Prefix_ARGS MK_OBJ const obj, MK_STRN const message, MK_STRN const callfunc)
static OT_ProcRet	atlmkkernel_MkObjectC_HandleResolve (OtClass_ARGS)
	Atl: (static) MkObjectC [MkObjectC::HandleResolve netHdl:MK_HDL] → C-API Handle-Resolve-Slot - return a MkObjectC from netHdl or "MK_NULL" if invalid…
static OT_ProcRet	atlmkkernel_MkObjectC_HandleDelete (MkObjectC_ARGS)
	Atl: MkObjectC::HandleDelete $netObj → C-API Handle-Delete-Slot - delete a netObj from handle-storage …
static OT_ProcRet	atlmkkernel_MkObjectC_HandleExists (MkObjectC_ARGS)
	Atl: bool [MkObjectC::HandleExists $obj] → C-API check if obj has already a handle defined…
static OT_ProcRet	atlmkkernel_MkObjectC_HandleGet (MkObjectC_ARGS)
	Atl: MK_HDL [MkObjectC::HandleGet $obj] → C-API Handle-Get-Slot - returns a export-hdl to the MkObjectC useable for external storage
static OT_ProcRet	atlmkkernel_MkObjectC_HandleGetOfType (MkObjectC_ARGS)
	Atl: MK_HDL [MkObjectC::HandleGetOfType $obj] → C-API Export-Slot - returns typeHdl of the obj .
static OT_ProcRet	atlmkkernel_MkObjectC_HandleGetOr0 (MkObjectC_ARGS)
	Atl: MK_HDL [MkObjectC::HandleGetOr0 $obj] → C-API return export-hdl or 0 in not created…
static OT_ProcRet	atlmkkernel_MkObjectC_HandleDeleteByNetHdl (OtClass_ARGS)
	Atl: (static) MkObjectC::HandleDeleteByNetHdl netHdl:MK_HDL → C-API Handle-Delete-Slot - delete a netHdl from handle-storage …
static OT_ProcRet	atlmkkernel_MkObjectC_Next (MkObjectC_ARGS)
	Atl: MkObjectC [MkObjectC::Next $obj] → C-API get next instance from linked-list of MkObjectS type
static OT_ProcRet	atlmkkernel_MkObjectC_Prev (MkObjectC_ARGS)
	Atl: MkObjectC [MkObjectC::Prev $obj] → C-API get previous instance from linked-list of MkObjectS type
static OT_ProcRet	atlmkkernel_MkObjectC_Instances (OtClass_ARGS)
	Atl: (static) MkObjectC [MkObjectC::Instances] → C-API get head-instance from linked-list of MkObjectS type …
static OT_ProcRet	atlmkkernel_MkObjectC_GetNull (OtClass_ARGS)
	Atl: (static) MkObjectC [MkObjectC::GetNull] → C-API Null-Slot - return a MkObjectC typed NULL instance …
static OT_ProcRet	atlmkkernel_MkObjectC_DbgDump (MkObjectC_ARGS)
	Atl: MkObjectC::DbgDump $obj ?message:string="var"? ?callfunc:string="MK_NULL"? → C-API debug: Dump a instance to stderr with LNG and MQ internal data…
static OT_ProcRet	atlmkkernel_MkObjectC_DbgL (MkObjectC_ARGS)
	Atl: MkObjectC::DbgL $fmtobj message:string ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API debug: write a instance-marker to the MkLogFileC (default: stderr) using the fmtobj as prefix …
static OT_ProcRet	atlmkkernel_MkObjectC_DbgLogC (MkObjectC_ARGS)
	Atl: MkObjectC::DbgLogC $obj ?callfunc:string="MK_NULL"? → C-API debug: write a short-obj-summary to MkLogFileC (default: stderr) …
static OT_ProcRet	atlmkkernel_MkObjectC_DbgO (MkObjectC_ARGS)
	Atl: MkObjectC::DbgO $obj ?callfunc:string="MK_NULL"? → C-API debug: write the object-details to MkLogFileC (default: stderr) …
static OT_ProcRet	atlmkkernel_MkObjectC_DbgSTACK (MkObjectC_ARGS)
	Atl: MkObjectC::DbgSTACK $fmtobj ?skip:int32=0? ?num:int32=-1? ?callfunc:string="MK_NULL"? → C-API debug: write the stack-trace to MkLogFileC (default: stderr) …
static OT_ProcRet	atlmkkernel_MkObjectC_DbgM (OtClass_ARGS)
	Atl: (static) MkObjectC::DbgM message:string ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API debug: write a static-marker to the MkLogFileC (default: stderr) …
static OT_ProcRet	atlmkkernel_MkObjectC_LogC (MkObjectC_ARGS)
	Atl: MkObjectC::LogC $fmtobj message:string ?debug:int32=0? ?callfunc:string="MK_NULL"? → C-API write a logging-message to MkLogFileC (default: stderr) using the internal format …
static OT_ProcRet	atlmkkernel_MkObjectC_LogHEX (MkObjectC_ARGS)
	Atl: MkObjectC::LogHEX $fmtobj callfunc:string data:binary → C-API log binaray data as HEX into the MkLogFileC (default: stderr) …
static OT_ProcRet	atlmkkernel_MkObjectC_Log (MkObjectC_ARGS)
	Atl: MkObjectC::Log $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API Log-Slot - log a summary of an object to the MkLogFileC (default: stderr) target …
static OT_ProcRet	atlmkkernel_MkObjectC_LogLong (MkObjectC_ARGS)
	Atl: MkObjectC::LogLong $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API log the MkObjectS verbose into the MkLogFileC (default: stderr) …
static OT_ProcRet	atlmkkernel_MkObjectC_LogShort (MkObjectC_ARGS)
	Atl: MkObjectC::LogShort $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API log the MkObjectS into the MkLogFileC (default: stderr) …
static OT_ProcRet	atlmkkernel_MkObjectC_LogType (MkObjectC_ARGS)
	Atl: MkObjectC::LogType $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string="MK_NULL"? ?lvl:int32=0? → C-API log the tyoe of the MkObjectS into the MkLogFileC (default: stderr) …
static OT_ProcRet	atlmkkernel_MkObjectC_ErrorCatch (MkObjectC_ARGS)
	Atl: MkErrorC [MkObjectC::ErrorCatch $obj ?exception:errorCode=NULL? ?callfunc:string="MK_NULL"?] → C-API convert a programming-language-error into an atlmkkernel error …
static OT_ProcRet	atlmkkernel_MkObjectC_ToError (MkObjectC_ARGS)
	Atl: MkErrorC [MkObjectC::ToError $obj] → C-API Error-Slot - return an error-object pre initialized with obj data.
static OT_ProcRet	atlmkkernel_MkObjectC_IsNull (MkObjectC_ARGS)
	Atl: bool [MkObjectC::IsNull $obj] → C-API ckeck if the object is "MK_NULL"
static OT_ProcRet	atlmkkernel_MkObjectC_ToName (MkObjectC_ARGS)
	Atl: string [MkObjectC::ToName $obj] → C-API Info-Slot - returns brief information about the obj as a string
static OT_ProcRet	atlmkkernel_MkObjectC_ToNameOfClass (MkObjectC_ARGS)
	Atl: string [MkObjectC::ToNameOfClass $obj] → C-API Class-Slot - returns the Atl-Class-Name of the obj as string
static OT_ProcRet	atlmkkernel_MkObjectC_ToNameOfType (MkObjectC_ARGS)
	Atl: string [MkObjectC::ToNameOfType $obj] → C-API Type-Slot - returns the LibMkKernel-Type-Name of the obj as a string
static OT_ProcRet	atlmkkernel_MkObjectC_ToString (MkObjectC_ARGS)
	Atl: string [MkObjectC::ToString $inst] → C-API String-Slot - returns the string representation of the inst …
static OT_ProcRet	atlmkkernel_MkObjectC_RefGet (MkObjectC_ARGS)
	internal function: MkRefGet
static OT_ProcRet	atlmkkernel_MkObjectC_SysKill (MkObjectC_ARGS)
	internal function: MkSysKill
static OT_ProcRet	atlmkkernel_MkObjectC_SysGetPid (MkObjectC_ARGS)
	internal function: MkSysGetPid
static OT_ProcRet	atlmkkernel_MkObjectC_SysHashI32 (OtClass_ARGS)
	internal function: MkSysHashI32
static OT_ProcRet	atlmkkernel_MkObjectC_SysHashSTR (OtClass_ARGS)
	internal function: MkSysHashSTR
static OT_ProcRet	atlmkkernel_MkObjectC_Dispose (MkObjectC_ARGS)
	Atl: (destructor) MkObjectC::Dispose $obj → C-API Dispose-Slot - untie the connection between the Native-Atl-Instance and the atlmkkernel-Instance.
static OT_ProcRet	atlmkkernel_MkObjectC_Delete (MkObjectC_ARGS)
	Atl: (destructor) MkObjectC::Delete $obj → C-API Delete-Slot - delete an instance.
static OT_ProcRet	atlmkkernel_MkObjectC_DeleteCallbackCleanup (OtClass_ARGS)
	Atl: (static) MkObjectC::DeleteCallbackCleanup ident:string → C-API cleanup the DeleteCallback installed with MkObjectDeleteCallbackSetup …
static OT_ProcRet	atlmkkernel_MkObjectC_DeleteCallbackSetup (OtClass_ARGS)
	Atl: (static) MkObjectC::DeleteCallbackSetup ident:string ?callback:callable=NULL? ?filter:string="NULL"? → C-API Create/Delete the instance-delete-callback …
int	atlmkkernel_pMkObjectC_Init (OT_MK_ARGS OT_NS_T ns)

Variables
static const OtObjProcDefS	atlmkkernel_sOtClassDef []
static const OtObjProcDefS	atlmkkernel_sInstanceDef []

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

Macro Definition Documentation

ClassInit

#define ClassInit

Definition at line 62 of file MkObjectC_atl.c.

#define   ClassInit \
  /* if not already done, initialize NEW META type */ \
  if (MkObjectCTT == NULL) MkObjectCTT = MkObjectSTT; \
 \
  /* protect against double call */ \
  if (MkObjectCTT->selfCreate == NS(MkObjectC_selfCreate)) return MK_OK; \
 \
  /* add "selfCreate" and "selfDelete" feature to the META-Class */ \
  MkObjectCTT->selfCreate    = NS(MkObjectC_selfCreate); \
  MkObjectCTT->selfDelete    = NS(MkObjectC_selfDelete); \
  MkObjectCTT->selfUnlink    = NS(MkObjectC_selfUnlink); \
 \
  /* create the ATL-class */ \
  OT_CLASS = AltClassDef(MkObjectCTT,&amkrt->AtlMkObjectC_NS); \
    if (OT_CLASS == NULL) goto error; \
    OT_REF_INCR(OT_CLASS); \
 \
  /* create the ATL static Methods */ \
  check_LNG(AtlUnknownSetup (NS(sOtClassDef),amkrt)) goto error; \
 \
  /* create the ATL instance Methods */ \
  check_LNG(AtlUnknownSetup (NS(sInstanceDef),amkrt)) goto error; \
 \
  /* after class was modified, recompile the class */ \
  RL_init(2, recompile, RL_T(0,RecompileN)); RL_O(1,OT_CLASS) ; \
    int retI = RL_EvalEx(0); \
      if (retI != TCL_OK) return retI; \
 \
  /* define the "NULL" object */ \
  OT_NULL = AtomCreateNULL(OT_CLASS, "::MkObjectC::MK_NULL", (MK_PTR)amkrt); \
    if (OT_NULL == NULL) goto error; \
    OT_REF_INCR(OT_NULL);

DbgDump_doc

#define DbgDump_doc   "MkObjectC::DbgDump $obj ?message:string=\"var\"? ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 102 of file MkObjectC_atl.c.

DbgL_doc

#define DbgL_doc   "MkObjectC::DbgL $fmtobj message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 103 of file MkObjectC_atl.c.

DbgLogC_doc

#define DbgLogC_doc   "MkObjectC::DbgLogC $obj ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 104 of file MkObjectC_atl.c.

DbgM_doc

#define DbgM_doc   "MkObjectC::DbgM message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0?"

Definition at line 99 of file MkObjectC_atl.c.

DbgO_doc

#define DbgO_doc   "MkObjectC::DbgO $obj ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 105 of file MkObjectC_atl.c.

DbgSTACK_doc

#define DbgSTACK_doc   "MkObjectC::DbgSTACK $fmtobj ?skip:int32=0? ?num:int32=-1? ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 106 of file MkObjectC_atl.c.

Delete_doc

#define Delete_doc   "MkObjectC::Delete $obj"

Definition at line 126 of file MkObjectC_atl.c.

DeleteCallbackCleanup_doc

#define DeleteCallbackCleanup_doc   "MkObjectC::DeleteCallbackCleanup ident:string"

Definition at line 121 of file MkObjectC_atl.c.

DeleteCallbackSetup_doc

#define DeleteCallbackSetup_doc   "MkObjectC::DeleteCallbackSetup ident:string ?callback:callable=NULL? ?filter:string=\"NULL\"?"

Definition at line 122 of file MkObjectC_atl.c.

Dispose_doc

#define Dispose_doc   "MkObjectC::Dispose $obj"

Definition at line 129 of file MkObjectC_atl.c.

ErrorCatch_doc

#define ErrorCatch_doc   "MkErrorC [MkObjectC::ErrorCatch $obj ?exception:errorCode=NULL? ?callfunc:string=\"MK_NULL\"?] (const)"

Definition at line 132 of file MkObjectC_atl.c.

GetNull_doc

#define GetNull_doc   "MkObjectC [MkObjectC::GetNull]"

Definition at line 116 of file MkObjectC_atl.c.

HandleDelete_doc

#define HandleDelete_doc   "MkObjectC::HandleDelete $netObj"

Definition at line 138 of file MkObjectC_atl.c.

HandleDeleteByNetHdl_doc

#define HandleDeleteByNetHdl_doc   "MkObjectC::HandleDeleteByNetHdl netHdl:MK_HDL"

Definition at line 123 of file MkObjectC_atl.c.

HandleExists_doc

#define HandleExists_doc   "bool [MkObjectC::HandleExists $obj]"

Definition at line 139 of file MkObjectC_atl.c.

HandleGet_doc

#define HandleGet_doc   "MK_HDL [MkObjectC::HandleGet $obj]"

Definition at line 140 of file MkObjectC_atl.c.

HandleGetOfType_doc

#define HandleGetOfType_doc   "MK_HDL [MkObjectC::HandleGetOfType $obj]"

Definition at line 141 of file MkObjectC_atl.c.

HandleGetOr0_doc

#define HandleGetOr0_doc   "MK_HDL [MkObjectC::HandleGetOr0 $obj]"

Definition at line 142 of file MkObjectC_atl.c.

HandleResolve_doc

#define HandleResolve_doc   "MkObjectC [MkObjectC::HandleResolve netHdl:MK_HDL]"

Definition at line 117 of file MkObjectC_atl.c.

Instances_doc

#define Instances_doc   "MkObjectC [MkObjectC::Instances]"

Definition at line 118 of file MkObjectC_atl.c.

IsNull_doc

#define IsNull_doc   "bool [MkObjectC::IsNull $obj]"

Definition at line 143 of file MkObjectC_atl.c.

Log_doc

#define Log_doc   "MkObjectC::Log $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 144 of file MkObjectC_atl.c.

LogC_doc

#define LogC_doc   "MkObjectC::LogC $fmtobj message:string ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? (const)"

Definition at line 109 of file MkObjectC_atl.c.

LogHEX_doc

#define LogHEX_doc   "MkObjectC::LogHEX $fmtobj callfunc:string data:binary (const)"

Definition at line 110 of file MkObjectC_atl.c.

LogLong_doc

#define LogLong_doc   "MkObjectC::LogLong $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 145 of file MkObjectC_atl.c.

LogShort_doc

#define LogShort_doc   "MkObjectC::LogShort $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 146 of file MkObjectC_atl.c.

LogType_doc

#define LogType_doc   "MkObjectC::LogType $obj ?fmtobj:MkObjectC=NULL? ?debug:int32=0? ?callfunc:string=\"MK_NULL\"? ?lvl:int32=0? (const)"

Definition at line 147 of file MkObjectC_atl.c.

META_FILE_NAME

#define META_FILE_NAME   "MkObjectC_atl.c"

Definition at line 16 of file MkObjectC_atl.c.

MkDbgDumpTmpl

#define MkDbgDumpTmpl

(

...

)

Value:

TclDbgDump(OT_Prefix_CALL __VA_ARGS__)

Definition at line 173 of file MkObjectC_atl.c.

MkDbgO_O

#define MkDbgO_O	(		hdl,
			call )

Value:

MkLogV(hdl,call,0,"%s\n",MK(PrintObj)(OT_Prefix_CALL NULL,META2VAL_O(hdl)))

Definition at line 172 of file MkObjectC_atl.c.

MkObjectErrorCatchTmpl

#define MkObjectErrorCatchTmpl

(

...

)

Value:

MK(MkExceptionC_Catch)(OT_Prefix_CALL __VA_ARGS__)

Definition at line 175 of file MkObjectC_atl.c.

MkObjectToNameOfClassTmpl

#define MkObjectToNameOfClassTmpl

(

hdl

)

Value:

OT_LNG_OBJ_CLASSNAME(META2VAL_O(hdl))

Definition at line 174 of file MkObjectC_atl.c.

Next_doc

#define Next_doc   "MkObjectC [MkObjectC::Next $obj]"

Definition at line 133 of file MkObjectC_atl.c.

OT_CLASS

#define OT_CLASS   amkrt->AtlMkObjectC

Definition at line 20 of file MkObjectC_atl.c.

OT_CLASS_NAME

#define OT_CLASS_NAME   "MkObjectC"

Definition at line 22 of file MkObjectC_atl.c.

OT_NULL

#define OT_NULL   amkrt->AtlMkObjectC_MK_NULL

Definition at line 21 of file MkObjectC_atl.c.

OT_retObj_CONSTR

#define OT_retObj_CONSTR

(

x

)

Value:

OT_retObj_SET(AtomInit(OT_SELF,MkObjectC_X2obj(x),amkrt))

Definition at line 59 of file MkObjectC_atl.c.

OT_SETUP_hdl

#define OT_SETUP_hdl   SetupHdlFromMetaData_2(MK_OBJ)

Definition at line 52 of file MkObjectC_atl.c.

OT_SETUP_hdl__null_allow

#define OT_SETUP_hdl__null_allow   SetupHdlFromMetaData__null_allow_2(MK_OBJ)

Definition at line 53 of file MkObjectC_atl.c.

OT_SETUP_hdl_constr

#define OT_SETUP_hdl_constr   SetupHdlConstr(MkObjectC)

Definition at line 55 of file MkObjectC_atl.c.

OT_SETUP_hdl_destr

#define OT_SETUP_hdl_destr   SetupHdlFromMetaData__null_allow_2(MK_OBJ)

Definition at line 54 of file MkObjectC_atl.c.

OT_SETUP_hdl_static

#define OT_SETUP_hdl_static   SetupHdlStatic(MkObjectC)

Definition at line 57 of file MkObjectC_atl.c.

OT_SETUP_hdl_static_constr

#define OT_SETUP_hdl_static_constr   OT_SETUP_hdl_static

Definition at line 56 of file MkObjectC_atl.c.

Prev_doc

#define Prev_doc   "MkObjectC [MkObjectC::Prev $obj]"

Definition at line 134 of file MkObjectC_atl.c.

RefGet_doc

#define RefGet_doc   "int32 [MkObjectC::RefGet $obj]"

Definition at line 113 of file MkObjectC_atl.c.

SELF2HDL

#define SELF2HDL

(

O

)

Value:

MkObj(VAL2MNG(O))

Definition at line 24 of file MkObjectC_atl.c.

SetupRtFromHdl_X

#define SetupRtFromHdl_X

(

hd

)

Value:

MkRtSetup_O(hd)

Definition at line 11 of file MkObjectC_atl.c.

SetupRtFromHdl_XN

#define SetupRtFromHdl_XN

(

hd

)

Value:

MkRtSetup_ON(hd)

Definition at line 12 of file MkObjectC_atl.c.

SysGetPid_doc

#define SysGetPid_doc   "int32 [MkObjectC::SysGetPid $fmtobj] (const)"

Definition at line 161 of file MkObjectC_atl.c.

SysHashI32_doc

#define SysHashI32_doc   "int32 [MkObjectC::SysHashI32 key:string ?length:int32=-1?]"

Definition at line 154 of file MkObjectC_atl.c.

SysHashSTR_doc

#define SysHashSTR_doc   "string [MkObjectC::SysHashSTR key:string ?length:int32=-1?]"

Definition at line 155 of file MkObjectC_atl.c.

SysKill_doc

#define SysKill_doc   "MkObjectC::SysKill $fmtobj pid:int32 signal:int32 (const)"

Definition at line 158 of file MkObjectC_atl.c.

ToError_doc

#define ToError_doc   "MkErrorC [MkObjectC::ToError $obj]"

Definition at line 135 of file MkObjectC_atl.c.

ToName_doc

#define ToName_doc   "string [MkObjectC::ToName $obj] (const)"

Definition at line 148 of file MkObjectC_atl.c.

ToNameOfClass_doc

#define ToNameOfClass_doc   "string [MkObjectC::ToNameOfClass $obj]"

Definition at line 149 of file MkObjectC_atl.c.

ToNameOfType_doc

#define ToNameOfType_doc   "string [MkObjectC::ToNameOfType $obj] (const)"

Definition at line 150 of file MkObjectC_atl.c.

ToString_doc

#define ToString_doc   "string [MkObjectC::ToString $inst] (const)"

Definition at line 151 of file MkObjectC_atl.c.

Function Documentation

atlmkkernel_MkObjectC_selfCreate()

static MK_PTR atlmkkernel_MkObjectC_selfCreate ( MK_RT mkrt, MK_OBJ const obj, MK_PTR const env )

static

Definition at line 33 of file MkObjectC_atl.c.

                                                                                       {
  SETUP_amkrt(env);
  return AtomMake(obj,OT_CLASS,NULL,NULL,env);
}

atlmkkernel_MkObjectC_selfDelete()

static void atlmkkernel_MkObjectC_selfDelete ( MK_RT mkrt, MK_PTR selfP, MK_PTR const env )

static

Definition at line 39 of file MkObjectC_atl.c.

                                                                                 {
  OT_SELF_T selfO = selfP;
  SETUP_amkrt(env);
  MK(AtomDeleteHard) (OT_MK_CALL selfO);
}

atlmkkernel_MkObjectC_selfUnlink()

static void atlmkkernel_MkObjectC_selfUnlink ( MK_RT mkrt, MK_PTR selfP, MK_PTR const env )

static

Definition at line 46 of file MkObjectC_atl.c.

                                                                                 {
  OT_SELF_T selfO = selfP;
  SETUP_amkrt(env);
  return MK(AtomUnlink) (OT_MK_CALL selfO);
}

atlmkkernel_pMkObjectC_Init()

int atlmkkernel_pMkObjectC_Init

(

OT_MK_ARGS OT_NS_T

ns

)

Public API

Definition at line 1083 of file MkObjectC_atl.c.

{
  ClassInit
 
  return TCL_OK;
error:
  return TCL_ERROR;
}

TclDbgDump()

static enum MkErrorE TclDbgDump ( OT_Prefix_ARGS MK_OBJ const obj, MK_STRN const message, MK_STRN const callfunc )

static

Definition at line 178 of file MkObjectC_atl.c.

{
  OT_OBJ_T self = META2VAL_O(obj);
  MkLogV(obj,callfunc,0,MK_COLOR_CYAN" >>> "MK_COLOR_RESET"\n");
 
  fprintf(MK_RT_REF.log.logFILE,"  > " MK_COLOR_YELLOW "%s"MK_COLOR_RESET"\n", MK(PrintObj)(OT_Prefix_CALL message,self));
 
  MkObjectLog(obj,NULL,0,callfunc,1);
 
  MkLogV(obj,callfunc,0,MK_COLOR_CYAN" <<< "MK_COLOR_RESET"\n");
 
  return MK_OK;
}

Variable Documentation

atlmkkernel_sInstanceDef

const OtObjProcDefS atlmkkernel_sInstanceDef[]

static

Definition at line 1021 of file MkObjectC_atl.c.

                                                {
 
  // BEGIN-OBJ - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
 
  // doc-key: MkObjectC,MkDbg,om_
  { "::MkObjectC::DbgDump"               , NS(MkObjectC_DbgDump)               },
  { "::MkObjectC::DbgL"                  , NS(MkObjectC_DbgL)                  },
  { "::MkObjectC::DbgLogC"               , NS(MkObjectC_DbgLogC)               },
  { "::MkObjectC::DbgO"                  , NS(MkObjectC_DbgO)                  },
  { "::MkObjectC::DbgSTACK"              , NS(MkObjectC_DbgSTACK)              },
 
  // doc-key: MkObjectC,MkLog,om_
  { "::MkObjectC::LogC"                  , NS(MkObjectC_LogC)                  },
  { "::MkObjectC::LogHEX"                , NS(MkObjectC_LogHEX)                },
 
  // doc-key: MkObjectC,MkObj,om_
  { "::MkObjectC::RefGet"                , NS(MkObjectC_RefGet)                },
 
  // doc-key: MkObjectC,MkObject,oD_
  { "::MkObjectC::~MkObjectC"            , NS(MkObjectC_Delete)                },
 
  // doc-key: MkObjectC,MkObject,od_
  { "::MkObjectC::Dispose"               , NS(MkObjectC_Dispose)               },
 
  // doc-key: MkObjectC,MkObject,oc_
  { "::MkObjectC::ErrorCatch"            , NS(MkObjectC_ErrorCatch)            },
  { "::MkObjectC::Next"                  , NS(MkObjectC_Next)                  },
  { "::MkObjectC::Prev"                  , NS(MkObjectC_Prev)                  },
  { "::MkObjectC::ToError"               , NS(MkObjectC_ToError)               },
 
  // doc-key: MkObjectC,MkObject,om_
  { "::MkObjectC::HandleDelete"          , NS(MkObjectC_HandleDelete)          },
  { "::MkObjectC::HandleExists"          , NS(MkObjectC_HandleExists)          },
  { "::MkObjectC::HandleGet"             , NS(MkObjectC_HandleGet)             },
  { "::MkObjectC::HandleGetOfType"       , NS(MkObjectC_HandleGetOfType)       },
  { "::MkObjectC::HandleGetOr0"          , NS(MkObjectC_HandleGetOr0)          },
  { "::MkObjectC::IsNull"                , NS(MkObjectC_IsNull)                },
  { "::MkObjectC::Log"                   , NS(MkObjectC_Log)                   },
  { "::MkObjectC::LogLong"               , NS(MkObjectC_LogLong)               },
  { "::MkObjectC::LogShort"              , NS(MkObjectC_LogShort)              },
  { "::MkObjectC::LogType"               , NS(MkObjectC_LogType)               },
  { "::MkObjectC::ToName"                , NS(MkObjectC_ToName)                },
  { "::MkObjectC::ToNameOfClass"         , NS(MkObjectC_ToNameOfClass)         },
  { "::MkObjectC::ToNameOfType"          , NS(MkObjectC_ToNameOfType)          },
  { "::MkObjectC::ToString"              , NS(MkObjectC_ToString)              },
 
  // doc-key: MkObjectC,MkSys,om_
  { "::MkObjectC::SysKill"               , NS(MkObjectC_SysKill)               },
 
  // doc-key: MkObjectC,MkSys,omo
  { "::MkObjectC::SysGetPid"             , NS(MkObjectC_SysGetPid)             },
 
  // END-OBJ - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
  { NULL }
};

atlmkkernel_sOtClassDef

const OtObjProcDefS atlmkkernel_sOtClassDef[]

static

Initial value:

= {
 
  
 
  
  { "::MkObjectC::DbgM"                  ,  atlmkkernel_MkObjectC_DbgM },
 
  
  { "::MkObjectC::GetNull"               ,  atlmkkernel_MkObjectC_GetNull },
  { "::MkObjectC::HandleResolve"         ,  atlmkkernel_MkObjectC_HandleResolve },
  { "::MkObjectC::Instances"             ,  atlmkkernel_MkObjectC_Instances },
 
  
  { "::MkObjectC::DeleteCallbackCleanup" ,  atlmkkernel_MkObjectC_DeleteCallbackCleanup },
  { "::MkObjectC::DeleteCallbackSetup"   ,  atlmkkernel_MkObjectC_DeleteCallbackSetup },
  { "::MkObjectC::HandleDeleteByNetHdl"  ,  atlmkkernel_MkObjectC_HandleDeleteByNetHdl },
 
  
  { "::MkObjectC::SysHashI32"            ,  atlmkkernel_MkObjectC_SysHashI32 },
  { "::MkObjectC::SysHashSTR"            ,  atlmkkernel_MkObjectC_SysHashSTR },
 
  
  { NULL }
}

Definition at line 994 of file MkObjectC_atl.c.

                                               {
 
  // BEGIN-CLASS - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
 
  // doc-key: MkObjectC,MkDbg,sm_
  { "::MkObjectC::DbgM"                  , NS(MkObjectC_DbgM)                  },
 
  // doc-key: MkObjectC,MkObject,sc_
  { "::MkObjectC::GetNull"               , NS(MkObjectC_GetNull)               },
  { "::MkObjectC::HandleResolve"         , NS(MkObjectC_HandleResolve)         },
  { "::MkObjectC::Instances"             , NS(MkObjectC_Instances)             },
 
  // doc-key: MkObjectC,MkObject,sm_
  { "::MkObjectC::DeleteCallbackCleanup" , NS(MkObjectC_DeleteCallbackCleanup) },
  { "::MkObjectC::DeleteCallbackSetup"   , NS(MkObjectC_DeleteCallbackSetup)   },
  { "::MkObjectC::HandleDeleteByNetHdl"  , NS(MkObjectC_HandleDeleteByNetHdl)  },
 
  // doc-key: MkObjectC,MkSys,sm_
  { "::MkObjectC::SysHashI32"            , NS(MkObjectC_SysHashI32)            },
  { "::MkObjectC::SysHashSTR"            , NS(MkObjectC_SysHashSTR)            },
 
  // END-CLASS - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
  { NULL }
};