theKernel 10.0
Loading...
Searching...
No Matches
MkLogFileC_atl.c File Reference

tag: nhi1-release-250425 More...

+ Include dependency graph for MkLogFileC_atl.c:

Go to the source code of this file.

Macros

#define META_FILE_NAME   "MkLogFileC_atl.c"
 
#define OT_CLASS   amkrt->AtlMkLogFileC
 
#define OT_NULL   amkrt->AtlMkLogFileC_MK_NULL
 
#define OT_CLASS_NAME   "MkLogFileC"
 
#define SELF2HDL(O)
 
#define OT_SETUP_hdl   SetupHdlFromMetaData_2(MK_LFL)
 
#define OT_SETUP_hdl__null_allow   SetupHdlFromMetaData__null_allow_2(MK_LFL)
 
#define OT_SETUP_hdl_destr   SetupHdlFromMetaData__null_allow_2(MK_LFL)
 
#define OT_SETUP_hdl_constr   SetupHdlConstr(MkLogFileC)
 
#define OT_SETUP_hdl_static_constr   OT_SETUP_hdl_static
 
#define OT_SETUP_hdl_static   SetupHdlStatic(MkLogFileC)
 
#define OT_retObj_CONSTR(x)
 
#define ClassInit
 
#define CTOR_doc   "MkLogFileC [MkLogFileC::CTOR fmtobj:MkObjectC file:string]"
 
#define Open_doc   "MkLogFileC [MkLogFileC::Open fmtobj:MkObjectC file:string]"
 
#define GetNull_doc   "MkLogFileC [MkLogFileC::GetNull]"
 
#define HandleResolve_doc   "MkLogFileC [MkLogFileC::HandleResolve netHdl:MK_HDL]"
 
#define Instances_doc   "MkLogFileC [MkLogFileC::Instances]"
 
#define Next_doc   "MkLogFileC [MkLogFileC::Next $lfl]"
 
#define Prev_doc   "MkLogFileC [MkLogFileC::Prev $lfl]"
 
#define WriteC_doc   "MkLogFileC::WriteC $lfl text:string (const)"
 
#define GetFile_doc   "string [MkLogFileC::GetFile $lfl] (const)"
 

Functions

static MK_PTR atlmkkernel_MkLogFileC_selfCreate (MK_RT mkrt, MK_OBJ const obj, MK_PTR const env)
 
static void atlmkkernel_MkLogFileC_selfDelete (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)
 
static void atlmkkernel_MkLogFileC_selfUnlink (MK_RT mkrt, MK_PTR selfP, MK_PTR const env)
 
static OT_ProcRet atlmkkernel_MkLogFileC_HandleResolve (OtClass_ARGS)
  Atl: (static) MkLogFileC [MkLogFileC::HandleResolve netHdl:MK_HDL] C-API
Handle-Resolve-Slot - return a MkLogFileC from netHdl or "MK_NULL" if invalid…
 
MK_DEPRECATED static MK_UNUSED OT_ProcRet atlmkkernel_MkLogFileC_HandleGet (MkLogFileC_ARGS)
 
static OT_ProcRet atlmkkernel_MkLogFileC_Next (MkLogFileC_ARGS)
  Atl: MkLogFileC [MkLogFileC::Next $lfl] C-API
get next instance from linked-list of MkLogFileS type
 
static OT_ProcRet atlmkkernel_MkLogFileC_Prev (MkLogFileC_ARGS)
  Atl: MkLogFileC [MkLogFileC::Prev $lfl] C-API
get previous instance from linked-list of MkLogFileS type
 
static OT_ProcRet atlmkkernel_MkLogFileC_Instances (OtClass_ARGS)
  Atl: (static) MkLogFileC [MkLogFileC::Instances] C-API
get head-instance from linked-list of MkLogFileS type …
 
static OT_ProcRet atlmkkernel_MkLogFileC_GetNull (OtClass_ARGS)
  Atl: (static) MkLogFileC [MkLogFileC::GetNull] C-API
Null-Slot - return a MkLogFileC typed NULL instance …
 
static OT_ProcRet atlmkkernel_MkLogFileC_CTOR (CONSTR_ARGS)
  Atl: (constructor,static) MkLogFileC [MkLogFileC::CTOR fmtobj:MkObjectC file:string] C-API
open the log-file in append mode …
 
static OT_ProcRet atlmkkernel_MkLogFileC_Open (OtClass_ARGS)
  Atl: (constructor,static) MkLogFileC [MkLogFileC::Open fmtobj:MkObjectC file:string] C-API
open the log-file in append mode …
 
static OT_ProcRet atlmkkernel_MkLogFileC_WriteC (MkLogFileC_ARGS)
  Atl: MkLogFileC::WriteC $lfl text:string C-API
write to log-file
 
static OT_ProcRet atlmkkernel_MkLogFileC_GetFile (MkLogFileC_ARGS)
  Atl: string [MkLogFileC::GetFile $lfl] C-API
get the log-file
 
int atlmkkernel_pMkLogFileC_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

Definition in file MkLogFileC_atl.c.

Macro Definition Documentation

◆ ClassInit

#define ClassInit

Definition at line 57 of file MkLogFileC_atl.c.

57#define ClassInit \
58 /* if not already done, initialize NEW META type */ \
59 if (MkLogFileCTT == NULL) MkLogFileCTT = MkLogFileSTT; \
60 \
61 /* protect against double call */ \
62 if (MkLogFileCTT->selfCreate == NS(MkLogFileC_selfCreate)) return MK_OK; \
63 \
64 /* add "selfCreate" and "selfDelete" feature to the META-Class */ \
65 MkLogFileCTT->selfCreate = NS(MkLogFileC_selfCreate); \
66 MkLogFileCTT->selfDelete = NS(MkLogFileC_selfDelete); \
67 MkLogFileCTT->selfUnlink = NS(MkLogFileC_selfUnlink); \
68 \
69 /* create the ATL-class */ \
70 OT_CLASS = AltClassDef(MkLogFileCTT,&amkrt->AtlMkLogFileC_NS); \
71 if (OT_CLASS == NULL) goto error; \
72 OT_REF_INCR(OT_CLASS); \
73 \
74 /* create the ATL static Methods */ \
75 check_LNG(AtlUnknownSetup (NS(sOtClassDef),amkrt)) goto error; \
76 \
77 /* create the ATL instance Methods */ \
78 check_LNG(AtlUnknownSetup (NS(sInstanceDef),amkrt)) goto error; \
79 \
80 /* after class was modified, recompile the class */ \
81 RL_init(2, recompile, RL_T(0,RecompileN)); RL_O(1,OT_CLASS) ; \
82 int retI = RL_EvalEx(0); \
83 if (retI != TCL_OK) return retI; \
84 \
85 /* define the "NULL" object */ \
86 OT_NULL = AtomCreateNULL(OT_CLASS, "::MkLogFileC::MK_NULL", (MK_PTR)amkrt); \
87 if (OT_NULL == NULL) goto error; \
88 OT_REF_INCR(OT_NULL);

◆ CTOR_doc

#define CTOR_doc   "MkLogFileC [MkLogFileC::CTOR fmtobj:MkObjectC file:string]"

Definition at line 94 of file MkLogFileC_atl.c.

◆ GetFile_doc

#define GetFile_doc   "string [MkLogFileC::GetFile $lfl] (const)"

Definition at line 111 of file MkLogFileC_atl.c.

◆ GetNull_doc

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

Definition at line 98 of file MkLogFileC_atl.c.

◆ HandleResolve_doc

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

Definition at line 99 of file MkLogFileC_atl.c.

◆ Instances_doc

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

Definition at line 100 of file MkLogFileC_atl.c.

◆ META_FILE_NAME

#define META_FILE_NAME   "MkLogFileC_atl.c"

Definition at line 11 of file MkLogFileC_atl.c.

◆ Next_doc

#define Next_doc   "MkLogFileC [MkLogFileC::Next $lfl]"

Definition at line 103 of file MkLogFileC_atl.c.

◆ Open_doc

#define Open_doc   "MkLogFileC [MkLogFileC::Open fmtobj:MkObjectC file:string]"

Definition at line 95 of file MkLogFileC_atl.c.

◆ OT_CLASS

#define OT_CLASS   amkrt->AtlMkLogFileC

Definition at line 15 of file MkLogFileC_atl.c.

◆ OT_CLASS_NAME

#define OT_CLASS_NAME   "MkLogFileC"

Definition at line 17 of file MkLogFileC_atl.c.

◆ OT_NULL

#define OT_NULL   amkrt->AtlMkLogFileC_MK_NULL

Definition at line 16 of file MkLogFileC_atl.c.

◆ OT_retObj_CONSTR

#define OT_retObj_CONSTR ( x)
Value:
#define OT_SELF
#define AtomInit(...)
#define OT_retObj_SET(val)
#define MkLogFileC_X2obj(x)

Definition at line 54 of file MkLogFileC_atl.c.

◆ OT_SETUP_hdl

#define OT_SETUP_hdl   SetupHdlFromMetaData_2(MK_LFL)

Definition at line 47 of file MkLogFileC_atl.c.

◆ OT_SETUP_hdl__null_allow

#define OT_SETUP_hdl__null_allow   SetupHdlFromMetaData__null_allow_2(MK_LFL)

Definition at line 48 of file MkLogFileC_atl.c.

◆ OT_SETUP_hdl_constr

#define OT_SETUP_hdl_constr   SetupHdlConstr(MkLogFileC)

Definition at line 50 of file MkLogFileC_atl.c.

◆ OT_SETUP_hdl_destr

#define OT_SETUP_hdl_destr   SetupHdlFromMetaData__null_allow_2(MK_LFL)

Definition at line 49 of file MkLogFileC_atl.c.

◆ OT_SETUP_hdl_static

#define OT_SETUP_hdl_static   SetupHdlStatic(MkLogFileC)

Definition at line 52 of file MkLogFileC_atl.c.

◆ OT_SETUP_hdl_static_constr

#define OT_SETUP_hdl_static_constr   OT_SETUP_hdl_static

Definition at line 51 of file MkLogFileC_atl.c.

◆ Prev_doc

#define Prev_doc   "MkLogFileC [MkLogFileC::Prev $lfl]"

Definition at line 104 of file MkLogFileC_atl.c.

◆ SELF2HDL

#define SELF2HDL ( O)
Value:
#define VAL2MNG(val)
static MK_LFL MkLfl(MK_MNG mng)
cast a unknown-object into an MkLogFileS pointer or NULL if not possible

Definition at line 19 of file MkLogFileC_atl.c.

◆ WriteC_doc

#define WriteC_doc   "MkLogFileC::WriteC $lfl text:string (const)"

Definition at line 108 of file MkLogFileC_atl.c.

Function Documentation

◆ atlmkkernel_MkLogFileC_selfCreate()

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

Definition at line 28 of file MkLogFileC_atl.c.

28 {
29 SETUP_amkrt(env);
30 return AtomMake(obj,OT_CLASS,NULL,NULL,env);
31}
#define AtomMake(...)
#define SETUP_amkrt(r)
#define OT_CLASS

◆ atlmkkernel_MkLogFileC_selfDelete()

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

Definition at line 34 of file MkLogFileC_atl.c.

34 {
35 OT_SELF_T selfO = selfP;
36 SETUP_amkrt(env);
37 MK(AtomDeleteHard) (OT_MK_CALL selfO);
38}
#define MK(n)
MOX_OBJ_T OT_SELF_T
#define OT_MK_CALL

◆ atlmkkernel_MkLogFileC_selfUnlink()

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

Definition at line 41 of file MkLogFileC_atl.c.

41 {
42 OT_SELF_T selfO = selfP;
43 SETUP_amkrt(env);
44 return MK(AtomUnlink) (OT_MK_CALL selfO);
45}

◆ atlmkkernel_pMkLogFileC_Init()

int atlmkkernel_pMkLogFileC_Init ( OT_MK_ARGS OT_NS_T ns)

Public API

Definition at line 368 of file MkLogFileC_atl.c.

369{
371
372 return TCL_OK;
373error:
374 return TCL_ERROR;
375}
#define ClassInit

Variable Documentation

◆ atlmkkernel_sInstanceDef

const OtObjProcDefS atlmkkernel_sInstanceDef[]
static
Initial value:
= {
{ "::MkLogFileC::MkLogFileC" , atlmkkernel_MkLogFileC_CTOR },
{ "::MkLogFileC::Next" , atlmkkernel_MkLogFileC_Next },
{ "::MkLogFileC::Prev" , atlmkkernel_MkLogFileC_Prev },
{ "::MkLogFileC::WriteC" , atlmkkernel_MkLogFileC_WriteC },
{ "::MkLogFileC::GetFile" , atlmkkernel_MkLogFileC_GetFile },
{ NULL }
}
static OT_ProcRet atlmkkernel_MkLogFileC_Prev(MkLogFileC_ARGS)
Atl: MkLogFileC [MkLogFileC::Prev $lfl] → C-API get previous instance from linked-list of MkLog...
static OT_ProcRet atlmkkernel_MkLogFileC_Next(MkLogFileC_ARGS)
Atl: MkLogFileC [MkLogFileC::Next $lfl] → C-API get next instance from linked-list of MkLogFile...
static OT_ProcRet atlmkkernel_MkLogFileC_CTOR(CONSTR_ARGS)
Atl: (constructor,static) MkLogFileC [MkLogFileC::CTOR fmtobj:MkObjectC file:string] → C-API ope...
static OT_ProcRet atlmkkernel_MkLogFileC_WriteC(MkLogFileC_ARGS)
Atl: MkLogFileC::WriteC $lfl text:string → C-API write to log-file …
static OT_ProcRet atlmkkernel_MkLogFileC_GetFile(MkLogFileC_ARGS)
Atl: string [MkLogFileC::GetFile $lfl] → C-API get the log-file …

Definition at line 341 of file MkLogFileC_atl.c.

341 {
342 // BEGIN-OBJ - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
343
344 // doc-key: MkLogFileC,MkLogFile,oC_
345 { "::MkLogFileC::MkLogFileC" , NS(MkLogFileC_CTOR) },
346
347 // doc-key: MkLogFileC,MkLogFile,oc_
348 { "::MkLogFileC::Next" , NS(MkLogFileC_Next) },
349 { "::MkLogFileC::Prev" , NS(MkLogFileC_Prev) },
350
351 // doc-key: MkLogFileC,MkLogFile,om_
352 // skip class-overload: HandleGet → MkObjectHandleGet
353 { "::MkLogFileC::WriteC" , NS(MkLogFileC_WriteC) },
354
355 // doc-key: MkLogFileC,MkLogFile,omo
356 { "::MkLogFileC::GetFile" , NS(MkLogFileC_GetFile) },
357
358 // END-OBJ - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
359 { NULL }
360};
#define NS(n)

◆ atlmkkernel_sOtClassDef

const OtObjProcDefS atlmkkernel_sOtClassDef[]
static
Initial value:
= {
{ "::MkLogFileC::Open" , atlmkkernel_MkLogFileC_Open },
{ "::MkLogFileC::GetNull" , atlmkkernel_MkLogFileC_GetNull },
{ "::MkLogFileC::HandleResolve" , atlmkkernel_MkLogFileC_HandleResolve },
{ "::MkLogFileC::Instances" , atlmkkernel_MkLogFileC_Instances },
{ NULL }
}
static OT_ProcRet atlmkkernel_MkLogFileC_GetNull(OtClass_ARGS)
Atl: (static) MkLogFileC [MkLogFileC::GetNull] → C-API Null-Slot - return a MkLogFileC typed NUL...
static OT_ProcRet atlmkkernel_MkLogFileC_HandleResolve(OtClass_ARGS)
Atl: (static) MkLogFileC [MkLogFileC::HandleResolve netHdl:MK_HDL] → C-API Handle-Resolve-Slot -...
static OT_ProcRet atlmkkernel_MkLogFileC_Instances(OtClass_ARGS)
Atl: (static) MkLogFileC [MkLogFileC::Instances] → C-API get head-instance from linked-list of M...
static OT_ProcRet atlmkkernel_MkLogFileC_Open(OtClass_ARGS)
Atl: (constructor,static) MkLogFileC [MkLogFileC::Open fmtobj:MkObjectC file:string] → C-API ope...

Definition at line 324 of file MkLogFileC_atl.c.

324 {
325 // BEGIN-CLASS - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
326
327 // doc-key: MkLogFileC,MkLogFile,sCo
328 { "::MkLogFileC::Open" , NS(MkLogFileC_Open) },
329
330 // doc-key: MkLogFileC,MkLogFile,sc_
331 { "::MkLogFileC::GetNull" , NS(MkLogFileC_GetNull) },
332 { "::MkLogFileC::HandleResolve" , NS(MkLogFileC_HandleResolve) },
333 { "::MkLogFileC::Instances" , NS(MkLogFileC_Instances) },
334
335 // END-CLASS - created by 'atl_MqS.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
336 { NULL }
337};