LibLcConfig_atl.h File Reference

tag: nhi1-release-250425 More...

#include "LibMkKernel_atl.h"
#include "LibLcConfig_lc.h"
#include "tmpl/lc_misc_check_lng.h"
#include "LibLcConfig_registry_atl.h"

Include dependency graph for LibLcConfig_atl.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Data Structures
struct	OT_LC_RT_S

Macros
#define	LC_DOC   __doc
#define	HEADER
#define	LC_ATL_EXTERN
	static library
#define	LC_ATL_EXTERN_DATA   extern
#define	LC(n)
#define	NS(n)
#define	LcConfigC_ARGS   OBJECT_ARGS
#define	LcConfigC_ARGS_CALL   OBJECT_ARGS_CALL
#define	LcSettingC_ARGS   OBJECT_ARGS
#define	LcSettingC_ARGS_CALL   OBJECT_ARGS_CALL
#define	OT_LC_RT_SIG   0x17254309
	identify the custom runtime
#define	regTclObj(t)
#define	regTclObj2(t, v)
#define	regTclCmd(t)
#define	regTclArray(m, t)
#define	OT_LC_ARGS   OT_LC_RT_T alcrt, OT_MK_RT_T amkrt, OT_ENV_T interp, MK_RT_ARGS
#define	OT_LC_CALL   alcrt, amkrt, interp, MK_RT_CALL
#define	SETUP_alcrt_2(r)
#define	SETUP_alcrt(r)
#define	LcConfigC_rt   (*alcrt)
#define	LcConfigC_lngO   (LcConfigC_rt.AtlLcConfigC)
#define	LcConfigCTT   (LcConfigC_rt.AtlLcConfigCTT)
#define	LcConfigC_ObjNew(nat)
#define	OT_TMP_CFG_OBJ(nat)
#define	OT_retObj_SET_CFG(nat)
#define	LcSettingC_rt   (*alcrt)
#define	LcSettingC_lngO   (LcSettingC_rt.AtlLcSettingC)
#define	LcSettingCTT   (LcSettingC_rt.AtlLcSettingCTT)
#define	LcSettingC_ObjNew(nat)
#define	OT_TMP_CFS_OBJ(nat)
#define	OT_retObj_SET_CFS(nat)
#define	OT_get_CFS_from_NAT(_nat)
#define	OT_get_CFG_from_NAT(_nat)
#define	Get_LcConfigFormatE_FromObj_path   LC(Get_LcConfigFormatE_FromObj)
#define	Get_LcConfigOptionsEF_FromObj_path   LC(Get_LcConfigOptionsEF_FromObj)
#define	Get_LcConfigTypeE_FromObj_path   LC(Get_LcConfigTypeE_FromObj)
#define	Get_LcErrorE_FromObj_path   LC(Get_LcErrorE_FromObj)
#define	Get_LcErrorTypeE_FromObj_path   LC(Get_LcErrorTypeE_FromObj)
#define	OT_NEW_Lc_enum_OBJ(typ, val)

Typedefs
typedef OT_LC_RT_S *	OT_LC_RT_T

Functions
int	atllcconfig_pLcConfigC_Init (OT_LC_ARGS OT_NS_T)
static MK_ARTIFICIAL OT_OBJ_T	atllcconfig_LcConfigC_ObjNew (OT_LC_ARGS LcConfigC_type hdl)
int	atllcconfig_pLcSettingC_Init (OT_LC_ARGS OT_NS_T)
static MK_ARTIFICIAL OT_OBJ_T	atllcconfig_LcSettingC_ObjNew (OT_LC_ARGS LcSettingC_type hdl)
enum MkErrorE	atllcconfig_ConfigIncludeCall (LcConfigIncludeCallF_ARGS)
void	atllcconfig_ConfigIncludeFree (LcConfigIncludeFreeF_ARGS)
enum MkErrorE	atllcconfig_SettingDeleteCall (LcSettingDeleteCallF_ARGS)
void	atllcconfig_SettingDeleteFree (LcSettingDeleteFreeF_ARGS)
LC_ATL_EXTERN int	atllcconfig_Get_LcConfigFormatE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcConfigFormatE *ret)
LC_ATL_EXTERN int	atllcconfig_Get_LcConfigOptionsEF_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcConfigOptionsEF *ret)
LC_ATL_EXTERN int	atllcconfig_Get_LcConfigTypeE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcConfigTypeE *ret)
LC_ATL_EXTERN int	atllcconfig_Get_LcErrorE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcErrorE *ret)
LC_ATL_EXTERN int	atllcconfig_Get_LcErrorTypeE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcErrorTypeE *ret)
LC_ATL_EXTERN OT_OBJ_T	atllcconfig_LcConfigFormatE_ToString (const enum LcConfigFormatE)
LC_ATL_EXTERN OT_OBJ_T	atllcconfig_LcConfigOptionsEF_ToString (const enum LcConfigOptionsEF)
LC_ATL_EXTERN OT_OBJ_T	atllcconfig_LcConfigTypeE_ToString (const enum LcConfigTypeE)
LC_ATL_EXTERN OT_OBJ_T	atllcconfig_LcErrorE_ToString (const enum LcErrorE)
LC_ATL_EXTERN OT_OBJ_T	atllcconfig_LcErrorTypeE_ToString (const enum LcErrorTypeE)

Variables
__thread OT_LC_RT_S	alcrtR

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 LibLcConfig_atl.h.

Macro Definition Documentation

Get_LcConfigFormatE_FromObj_path

#define Get_LcConfigFormatE_FromObj_path   LC(Get_LcConfigFormatE_FromObj)

Definition at line 229 of file LibLcConfig_atl.h.

Get_LcConfigOptionsEF_FromObj_path

#define Get_LcConfigOptionsEF_FromObj_path   LC(Get_LcConfigOptionsEF_FromObj)

Definition at line 232 of file LibLcConfig_atl.h.

Get_LcConfigTypeE_FromObj_path

#define Get_LcConfigTypeE_FromObj_path   LC(Get_LcConfigTypeE_FromObj)

Definition at line 235 of file LibLcConfig_atl.h.

Get_LcErrorE_FromObj_path

#define Get_LcErrorE_FromObj_path   LC(Get_LcErrorE_FromObj)

Definition at line 238 of file LibLcConfig_atl.h.

Get_LcErrorTypeE_FromObj_path

#define Get_LcErrorTypeE_FromObj_path   LC(Get_LcErrorTypeE_FromObj)

Definition at line 241 of file LibLcConfig_atl.h.

HEADER

#define HEADER

Definition at line 26 of file LibLcConfig_atl.h.

LC

#define LC

(

n

)

Value:

atllcconfig_ ## n

Definition at line 77 of file LibLcConfig_atl.h.

LC_ATL_EXTERN

#define LC_ATL_EXTERN

static library

Definition at line 50 of file LibLcConfig_atl.h.

LC_ATL_EXTERN_DATA

#define LC_ATL_EXTERN_DATA   extern

Definition at line 73 of file LibLcConfig_atl.h.

LC_DOC

#define LC_DOC   __doc

Definition at line 15 of file LibLcConfig_atl.h.

LcConfigC_ARGS

#define LcConfigC_ARGS   OBJECT_ARGS

Definition at line 85 of file LibLcConfig_atl.h.

LcConfigC_ARGS_CALL

#define LcConfigC_ARGS_CALL   OBJECT_ARGS_CALL

Definition at line 86 of file LibLcConfig_atl.h.

LcConfigC_lngO

#define LcConfigC_lngO   (LcConfigC_rt.AtlLcConfigC)

Definition at line 169 of file LibLcConfig_atl.h.

LcConfigC_ObjNew

#define LcConfigC_ObjNew

(

nat

)

Value:

LC(LcConfigC_ObjNew) (OT_LC_CALL nat)

Definition at line 175 of file LibLcConfig_atl.h.

LcConfigC_rt

#define LcConfigC_rt   (*alcrt)

Definition at line 168 of file LibLcConfig_atl.h.

LcConfigCTT

#define LcConfigCTT   (LcConfigC_rt.AtlLcConfigCTT)

Definition at line 171 of file LibLcConfig_atl.h.

LcSettingC_ARGS

#define LcSettingC_ARGS   OBJECT_ARGS

Definition at line 87 of file LibLcConfig_atl.h.

LcSettingC_ARGS_CALL

#define LcSettingC_ARGS_CALL   OBJECT_ARGS_CALL

Definition at line 88 of file LibLcConfig_atl.h.

LcSettingC_lngO

#define LcSettingC_lngO   (LcSettingC_rt.AtlLcSettingC)

Definition at line 188 of file LibLcConfig_atl.h.

LcSettingC_ObjNew

#define LcSettingC_ObjNew

(

nat

)

Value:

LC(LcSettingC_ObjNew) (OT_LC_CALL nat)

Definition at line 194 of file LibLcConfig_atl.h.

LcSettingC_rt

#define LcSettingC_rt   (*alcrt)

Definition at line 187 of file LibLcConfig_atl.h.

LcSettingCTT

#define LcSettingCTT   (LcSettingC_rt.AtlLcSettingCTT)

Definition at line 190 of file LibLcConfig_atl.h.

NS

#define NS

(

n

)

Value:

atllcconfig_ ## n

Definition at line 79 of file LibLcConfig_atl.h.

OT_get_CFG_from_NAT

#define OT_get_CFG_from_NAT

(

_nat

)

Value:

LcGetCfgFromNat(_nat)

Definition at line 212 of file LibLcConfig_atl.h.

OT_get_CFS_from_NAT

#define OT_get_CFS_from_NAT

(

_nat

)

Value:

LcGetCfsFromNat(_nat)

Definition at line 211 of file LibLcConfig_atl.h.

OT_LC_ARGS

#define OT_LC_ARGS   OT_LC_RT_T alcrt, OT_MK_RT_T amkrt, OT_ENV_T interp, MK_RT_ARGS

Definition at line 141 of file LibLcConfig_atl.h.

OT_LC_CALL

#define OT_LC_CALL   alcrt, amkrt, interp, MK_RT_CALL

Definition at line 142 of file LibLcConfig_atl.h.

OT_LC_RT_SIG

#define OT_LC_RT_SIG   0x17254309

identify the custom runtime

Definition at line 104 of file LibLcConfig_atl.h.

OT_NEW_Lc_enum_OBJ

#define OT_NEW_Lc_enum_OBJ	(		typ,
			val )

Value:

LC(Lc ## typ ## _ToString(val))

Definition at line 247 of file LibLcConfig_atl.h.

OT_retObj_SET_CFG

#define OT_retObj_SET_CFG

(

nat

)

Value:

retObj = LcConfigC_ObjNew (nat)

Definition at line 177 of file LibLcConfig_atl.h.

OT_retObj_SET_CFS

#define OT_retObj_SET_CFS

(

nat

)

Value:

retObj = LcSettingC_ObjNew (nat)

Definition at line 196 of file LibLcConfig_atl.h.

OT_TMP_CFG_OBJ

#define OT_TMP_CFG_OBJ

(

nat

)

Value:

LcConfigC_ObjNew (nat)

Definition at line 176 of file LibLcConfig_atl.h.

OT_TMP_CFS_OBJ

#define OT_TMP_CFS_OBJ

(

nat

)

Value:

LcSettingC_ObjNew (nat)

Definition at line 195 of file LibLcConfig_atl.h.

regTclArray

#define regTclArray	(		m,
			t )

Value:

OT_OBJ_T t[m];

Definition at line 116 of file LibLcConfig_atl.h.

regTclCmd

#define regTclCmd

(

t

)

Value:

OT_OBJ_T t;

Definition at line 115 of file LibLcConfig_atl.h.

regTclObj

#define regTclObj

(

t

)

Value:

OT_OBJ_T t;

Definition at line 113 of file LibLcConfig_atl.h.

regTclObj2

#define regTclObj2	(		t,
			v )

Value:

OT_OBJ_T t;

Definition at line 114 of file LibLcConfig_atl.h.

SETUP_alcrt

#define SETUP_alcrt

(

r

)

Value:

SETUP_alcrt_2(r)

Definition at line 155 of file LibLcConfig_atl.h.

SETUP_alcrt_2

#define SETUP_alcrt_2

(

r

)

Value:

                            MK_UNUSED OT_LC_RT_T alcrt = (r) ? (r) : &alcrtR; \
                            assert(alcrt && alcrt->signature == OT_LC_RT_SIG); \
                          MK_UNUSED OT_MK_RT_T amkrt = alcrt->amkrt; \
                            assert(amkrt && amkrt->signature == OT_MK_RT_SIG); \
                          MK_UNUSED OT_ENV_T interp = alcrt->interp; \
                          MK_UNUSED MOX_RT_T moxrt = amkrt->moxrt; \
                            assert(moxrt && moxrt->signature == MOX_RT_SIG);

Definition at line 147 of file LibLcConfig_atl.h.

#define SETUP_alcrt_2(r)  MK_UNUSED OT_LC_RT_T alcrt = (r) ? (r) : &alcrtR; \
                            assert(alcrt && alcrt->signature == OT_LC_RT_SIG); \
                          MK_UNUSED OT_MK_RT_T amkrt = alcrt->amkrt; \
                            assert(amkrt && amkrt->signature == OT_MK_RT_SIG); \
                          MK_UNUSED OT_ENV_T interp = alcrt->interp; \
                          MK_UNUSED MOX_RT_T moxrt = amkrt->moxrt; \
                            assert(moxrt && moxrt->signature == MOX_RT_SIG);

Typedef Documentation

OT_LC_RT_T

typedef OT_LC_RT_S* OT_LC_RT_T

Definition at line 137 of file LibLcConfig_atl.h.

Function Documentation

atllcconfig_ConfigIncludeCall()

enum MkErrorE atllcconfig_ConfigIncludeCall

(

LcConfigIncludeCallF_ARGS

)

Definition at line 45 of file LcCall_atl.c.

{
  LcConfigIncludeCallF_CHECK;
 
  // 1. setup arguments
  struct MkCallS *call = cfg->fConfigIncludeData ;
    assert(call->signature == MkCallS_SIG);
 
//MkCallLog(call);
 
  // 2. prolog
  CallProlog(cfg);
 
  // 3. setup args
  objv[objc++]  = STR2VAL(incDir);
  objv[objc++]  = STR2VAL(path);
  objv[objc++]  = OT_TMP_BFL_OBJ(ret_inout);
 
  // 4. setup user args
  if (call->args) MK(ProcResolveAppendArgs)(call,&objc,objv);
 
  // 5. call the callback
  int ret = MK(EvalObjv) (interp, objc, objv, 0); /* "MK(EvalObjv)" IS required !! */
    if (ret != TCL_OK) goto error;
 
  Tcl_ResetResult(interp);
  return MkErrorGetCode_0E();
 
error:
  OT_ERROR_LNG_2_META(cfg);
 
error_mq:
  return MkErrorStack_0E();
}

atllcconfig_ConfigIncludeFree()

void atllcconfig_ConfigIncludeFree

(

LcConfigIncludeFreeF_ARGS

)

Definition at line 80 of file LcCall_atl.c.

{
  MkCallFree(cfg->fConfigIncludeData);
 
  //OT_REF_DECR_AND_NULL(cfg->fConfigIncludeHook);
 
  cfg->fConfigIncludeCall = NULL;
  cfg->fConfigIncludeFree = NULL;
}

atllcconfig_LcConfigC_ObjNew()

static MK_ARTIFICIAL OT_OBJ_T atllcconfig_LcConfigC_ObjNew ( OT_LC_ARGS LcConfigC_type hdl )

inlinestatic

Definition at line 180 of file LibLcConfig_atl.h.

                                                                          {
    return ( hdl ? MK(AtomObjNew) (OT_MK_CALL LcConfigC_X2obj(hdl), alcrt) : LcConfigC_rt.AtlLcConfigC_MK_NULL );
  }

atllcconfig_LcSettingC_ObjNew()

static MK_ARTIFICIAL OT_OBJ_T atllcconfig_LcSettingC_ObjNew ( OT_LC_ARGS LcSettingC_type hdl )

inlinestatic

Definition at line 199 of file LibLcConfig_atl.h.

                                                                            {
    return ( hdl ? MK(AtomObjNew) (OT_MK_CALL LcSettingC_X2obj(hdl), alcrt) : LcSettingC_rt.AtlLcSettingC_MK_NULL );
  }

atllcconfig_pLcConfigC_Init()

int atllcconfig_pLcConfigC_Init

(

OT_LC_ARGS OT_NS_T

ns

)

Public API

Definition at line 964 of file LcConfigC_atl.c.

{
  ClassInit
  
  return TCL_OK;
error:
  return TCL_ERROR;
}

atllcconfig_pLcSettingC_Init()

int atllcconfig_pLcSettingC_Init

(

OT_LC_ARGS OT_NS_T

ns

)

Public API

Definition at line 1252 of file LcSettingC_atl.c.

{
  ClassInit
  
  return TCL_OK;
error:
  return TCL_ERROR;
}

atllcconfig_SettingDeleteCall()

enum MkErrorE atllcconfig_SettingDeleteCall

(

LcSettingDeleteCallF_ARGS

)

Definition at line 108 of file LcCall_atl.c.

{
  LcSettingDeleteCallF_CHECK;
 
  // test on recursion
  static MkThreadLocal bool onCall = false;
  if (onCall) {
printSTACK_1(cfg)
    return MkErrorSetC_2M(cfg,"REKURSIVE call on LcSettingC -> delete handler");
  }
  onCall=true;
 
  // 1. setup environment
  struct MkCallS *call = cfg->fSettingDeleteData;
    assert(call->signature == MkCallS_SIG);
 
  // 2. prolog
  CallProlog(cfg);
 
  // 3. setup args
  objv[objc++] = LONG2VAL(MkObjectHandleGet_1X(cfs));
 
  // 4. setup user args
  if (call->args) MK(ProcResolveAppendArgs)(call,&objc,objv);
 
  // 5. call the callback
  int ret = MK(EvalObjv) (interp, objc, objv, 0); /* "MK(EvalObjv)" IS required !! */
    if (ret != TCL_OK) goto error;
 
  Tcl_ResetResult(interp);
  onCall = false;
  return MkErrorGetCode_0E();
  
error:
  OT_ERROR_LNG_2_META(cfg);
 
error_mq:
  onCall = false;
  return MkErrorStack_0E();
}

atllcconfig_SettingDeleteFree()

void atllcconfig_SettingDeleteFree

(

LcSettingDeleteFreeF_ARGS

)

Definition at line 149 of file LcCall_atl.c.

{
  MK(CallFree) (&cfg->fSettingDeleteData);
 
  //OT_REF_DECR_AND_NULL(cfg->fSettingDeleteHook);
 
  cfg->fSettingDeleteData = NULL;
  cfg->fSettingDeleteCall = NULL;
  cfg->fSettingDeleteFree = NULL;
}

Variable Documentation

alcrtR

__thread OT_LC_RT_S alcrtR

extern

Definition at line 785 of file LibLcConfig_atl.c.

{0};