LibLcConfig_tcl.c File Reference

tag: nhi1-release-250425 More...

#include "LibLcConfig_private_tcl.h"
#include "tmpl/lc_misc_check_lng.h"

Include dependency graph for LibLcConfig_tcl.c:

Go to the source code of this file.

Macros
#define	META_FILE_NAME   "LibLcConfig_tcl.c"
#define	VER   TCL_OO_METHOD_VERSION_CURRENT
#define	OtClass_ARGS   OBJCMD_ARGS
#define	OT_SETUP_hdl_static
#define	LcSetupTmpl()
#define	LcCleanupTmpl()
#define	ConfigFormatE_FromInt_doc   "LcConfigFormatE [LcConfig ConfigFormatE_FromInt value:int32]"
#define	ConfigOptionsEF_FromInt_doc   "LcConfigOptionsEF [LcConfig ConfigOptionsEF_FromInt value:int32]"
#define	ConfigTypeE_FromInt_doc   "LcConfigTypeE [LcConfig ConfigTypeE_FromInt value:int32]"
#define	ErrorE_FromInt_doc   "LcErrorE [LcConfig ErrorE_FromInt value:int32]"
#define	ErrorTypeE_FromInt_doc   "LcErrorTypeE [LcConfig ErrorTypeE_FromInt value:int32]"
#define	ConfigFormatE_ToInt_doc   "int32 [LcConfig ConfigFormatE_ToInt value:LcConfigFormatE]"
#define	ConfigFormatE_ToString_doc   "string [LcConfig ConfigFormatE_ToString value:LcConfigFormatE]"
#define	ConfigOptionsEF_ToInt_doc   "int32 [LcConfig ConfigOptionsEF_ToInt value:LcConfigOptionsEF]"
#define	ConfigOptionsEF_ToString_doc   "string [LcConfig ConfigOptionsEF_ToString value:LcConfigOptionsEF]"
#define	ConfigTypeE_ToInt_doc   "int32 [LcConfig ConfigTypeE_ToInt value:LcConfigTypeE]"
#define	ConfigTypeE_ToString_doc   "string [LcConfig ConfigTypeE_ToString value:LcConfigTypeE]"
#define	ErrorE_ToInt_doc   "int32 [LcConfig ErrorE_ToInt value:LcErrorE]"
#define	ErrorE_ToString_doc   "string [LcConfig ErrorE_ToString value:LcErrorE]"
#define	ErrorTypeE_ToInt_doc   "int32 [LcConfig ErrorTypeE_ToInt value:LcErrorTypeE]"
#define	ErrorTypeE_ToString_doc   "string [LcConfig ErrorTypeE_ToString value:LcErrorTypeE]"
#define	Cleanup_doc   "LcConfig Cleanup"
#define	Setup_doc   "LcConfig Setup"

Functions
static OT_ProcRet	tcllcconfig_LcConfig_ConfigFormatE_FromInt (OtClass_ARGS)
	Tcl: (static) LcConfigFormatE [LcConfig ConfigFormatE_FromInt value:int32] → C-API return the LcConfigFormatE from integer …
static OT_ProcRet	tcllcconfig_LcConfig_ConfigOptionsEF_FromInt (OtClass_ARGS)
	Tcl: (static) LcConfigOptionsEF [LcConfig ConfigOptionsEF_FromInt value:int32] → C-API return the LcConfigOptionsEF from integer …
static OT_ProcRet	tcllcconfig_LcConfig_ConfigTypeE_FromInt (OtClass_ARGS)
	Tcl: (static) LcConfigTypeE [LcConfig ConfigTypeE_FromInt value:int32] → C-API return the LcConfigTypeE from integer …
static OT_ProcRet	tcllcconfig_LcConfig_ErrorE_FromInt (OtClass_ARGS)
	Tcl: (static) LcErrorE [LcConfig ErrorE_FromInt value:int32] → C-API return the LcErrorE from integer …
static OT_ProcRet	tcllcconfig_LcConfig_ErrorTypeE_FromInt (OtClass_ARGS)
	Tcl: (static) LcErrorTypeE [LcConfig ErrorTypeE_FromInt value:int32] → C-API return the LcErrorTypeE from integer …
static OT_ProcRet	tcllcconfig_LcConfig_ConfigFormatE_ToInt (OtClass_ARGS)
	Tcl: (static) int32 [LcConfig ConfigFormatE_ToInt value:LcConfigFormatE] → C-API return the LcConfigFormatE as integer …
static OT_ProcRet	tcllcconfig_LcConfig_ConfigFormatE_ToString (OtClass_ARGS)
	Tcl: (static) string [LcConfig ConfigFormatE_ToString value:LcConfigFormatE] → C-API return the LcConfigFormatE as string …
static OT_ProcRet	tcllcconfig_LcConfig_ConfigOptionsEF_ToInt (OtClass_ARGS)
	Tcl: (static) int32 [LcConfig ConfigOptionsEF_ToInt value:LcConfigOptionsEF] → C-API return the LcConfigOptionsEF as integer …
static OT_ProcRet	tcllcconfig_LcConfig_ConfigOptionsEF_ToString (OtClass_ARGS)
	Tcl: (static) string [LcConfig ConfigOptionsEF_ToString value:LcConfigOptionsEF] → C-API return the LcConfigOptionsEF as string …
static OT_ProcRet	tcllcconfig_LcConfig_ConfigTypeE_ToInt (OtClass_ARGS)
	Tcl: (static) int32 [LcConfig ConfigTypeE_ToInt value:LcConfigTypeE] → C-API return the LcConfigTypeE as integer …
static OT_ProcRet	tcllcconfig_LcConfig_ConfigTypeE_ToString (OtClass_ARGS)
	Tcl: (static) string [LcConfig ConfigTypeE_ToString value:LcConfigTypeE] → C-API return the LcConfigTypeE as string …
static OT_ProcRet	tcllcconfig_LcConfig_ErrorE_ToInt (OtClass_ARGS)
	Tcl: (static) int32 [LcConfig ErrorE_ToInt value:LcErrorE] → C-API return the LcErrorE as integer …
static OT_ProcRet	tcllcconfig_LcConfig_ErrorE_ToString (OtClass_ARGS)
	Tcl: (static) string [LcConfig ErrorE_ToString value:LcErrorE] → C-API return the LcErrorE as string …
static OT_ProcRet	tcllcconfig_LcConfig_ErrorTypeE_ToInt (OtClass_ARGS)
	Tcl: (static) int32 [LcConfig ErrorTypeE_ToInt value:LcErrorTypeE] → C-API return the LcErrorTypeE as integer …
static OT_ProcRet	tcllcconfig_LcConfig_ErrorTypeE_ToString (OtClass_ARGS)
	Tcl: (static) string [LcConfig ErrorTypeE_ToString value:LcErrorTypeE] → C-API return the LcErrorTypeE as string …
static OT_ProcRet	tcllcconfig_LcConfig_Cleanup (OtClass_ARGS)
	Tcl: (static) LcConfig Cleanup → C-API cleanup tcllcconfig internal memory …
static OT_ProcRet	tcllcconfig_LcConfig_Setup (OtClass_ARGS)
	Tcl: (static) LcConfig Setup → C-API setup tcllcconfig internal memory …
OT_TCL_EXTERN int	Tcllcconfig_Init (Tcl_Interp *interp)
	initialize the LcConfig package
OT_TCL_EXTERN int	Tcllcconfig_Unload (Tcl_Interp *interp, int flags)
Enum To String
OT_OBJ_T	tcllcconfig_LcConfigFormatE_ToString (const enum LcConfigFormatE type)
OT_OBJ_T	tcllcconfig_LcConfigOptionsEF_ToString (const enum LcConfigOptionsEF type)
OT_OBJ_T	tcllcconfig_LcConfigTypeE_ToString (const enum LcConfigTypeE type)
OT_OBJ_T	tcllcconfig_LcErrorE_ToString (const enum LcErrorE type)
OT_OBJ_T	tcllcconfig_LcErrorTypeE_ToString (const enum LcErrorTypeE type)
Enum From Obj
int	tcllcconfig_Get_LcConfigFormatE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcConfigFormatE *ret)
int	tcllcconfig_Get_LcConfigOptionsEF_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcConfigOptionsEF *ret)
int	tcllcconfig_Get_LcConfigTypeE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcConfigTypeE *ret)
int	tcllcconfig_Get_LcErrorE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcErrorE *ret)
int	tcllcconfig_Get_LcErrorTypeE_FromObj (MK_RT mkrt, OT_ENV_T interp, OT_OBJ_T enumE, enum LcErrorTypeE *ret)

Variables
static const OtObjProcDefS	tcllcconfig_sOtClassDef []
static const OtObjProcDefS	tcllcconfig_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 LibLcConfig_tcl.c.

Macro Definition Documentation

Cleanup_doc

#define Cleanup_doc   "LcConfig Cleanup"

Definition at line 99 of file LibLcConfig_tcl.c.

ConfigFormatE_FromInt_doc

#define ConfigFormatE_FromInt_doc   "LcConfigFormatE [LcConfig ConfigFormatE_FromInt value:int32]"

Definition at line 80 of file LibLcConfig_tcl.c.

ConfigFormatE_ToInt_doc

#define ConfigFormatE_ToInt_doc   "int32 [LcConfig ConfigFormatE_ToInt value:LcConfigFormatE]"

Definition at line 87 of file LibLcConfig_tcl.c.

ConfigFormatE_ToString_doc

#define ConfigFormatE_ToString_doc   "string [LcConfig ConfigFormatE_ToString value:LcConfigFormatE]"

Definition at line 88 of file LibLcConfig_tcl.c.

ConfigOptionsEF_FromInt_doc

#define ConfigOptionsEF_FromInt_doc   "LcConfigOptionsEF [LcConfig ConfigOptionsEF_FromInt value:int32]"

Definition at line 81 of file LibLcConfig_tcl.c.

ConfigOptionsEF_ToInt_doc

#define ConfigOptionsEF_ToInt_doc   "int32 [LcConfig ConfigOptionsEF_ToInt value:LcConfigOptionsEF]"

Definition at line 89 of file LibLcConfig_tcl.c.

ConfigOptionsEF_ToString_doc

#define ConfigOptionsEF_ToString_doc   "string [LcConfig ConfigOptionsEF_ToString value:LcConfigOptionsEF]"

Definition at line 90 of file LibLcConfig_tcl.c.

ConfigTypeE_FromInt_doc

#define ConfigTypeE_FromInt_doc   "LcConfigTypeE [LcConfig ConfigTypeE_FromInt value:int32]"

Definition at line 82 of file LibLcConfig_tcl.c.

ConfigTypeE_ToInt_doc

#define ConfigTypeE_ToInt_doc   "int32 [LcConfig ConfigTypeE_ToInt value:LcConfigTypeE]"

Definition at line 91 of file LibLcConfig_tcl.c.

ConfigTypeE_ToString_doc

#define ConfigTypeE_ToString_doc   "string [LcConfig ConfigTypeE_ToString value:LcConfigTypeE]"

Definition at line 92 of file LibLcConfig_tcl.c.

ErrorE_FromInt_doc

#define ErrorE_FromInt_doc   "LcErrorE [LcConfig ErrorE_FromInt value:int32]"

Definition at line 83 of file LibLcConfig_tcl.c.

ErrorE_ToInt_doc

#define ErrorE_ToInt_doc   "int32 [LcConfig ErrorE_ToInt value:LcErrorE]"

Definition at line 93 of file LibLcConfig_tcl.c.

ErrorE_ToString_doc

#define ErrorE_ToString_doc   "string [LcConfig ErrorE_ToString value:LcErrorE]"

Definition at line 94 of file LibLcConfig_tcl.c.

ErrorTypeE_FromInt_doc

#define ErrorTypeE_FromInt_doc   "LcErrorTypeE [LcConfig ErrorTypeE_FromInt value:int32]"

Definition at line 84 of file LibLcConfig_tcl.c.

ErrorTypeE_ToInt_doc

#define ErrorTypeE_ToInt_doc   "int32 [LcConfig ErrorTypeE_ToInt value:LcErrorTypeE]"

Definition at line 95 of file LibLcConfig_tcl.c.

ErrorTypeE_ToString_doc

#define ErrorTypeE_ToString_doc   "string [LcConfig ErrorTypeE_ToString value:LcErrorTypeE]"

Definition at line 96 of file LibLcConfig_tcl.c.

LcCleanupTmpl

#define LcCleanupTmpl

(

)

Definition at line 31 of file LibLcConfig_tcl.c.

LcSetupTmpl

#define LcSetupTmpl

(

)

Definition at line 30 of file LibLcConfig_tcl.c.

META_FILE_NAME

#define META_FILE_NAME   "LibLcConfig_tcl.c"

Definition at line 11 of file LibLcConfig_tcl.c.

OT_SETUP_hdl_static

#define OT_SETUP_hdl_static

Value:

  int __skip=1;\
  /* printAry2("cmd",objc,objv); */ \
  __attribute__((unused)) MK_RT mkrt = MkRT; \
  __attribute__((unused)) MK_ERR hdl = &MkERROR;

Definition at line 19 of file LibLcConfig_tcl.c.

#define OT_SETUP_hdl_static \
  int __skip=1;\
  /* printAry2("cmd",objc,objv); */ \
  __attribute__((unused)) MK_RT mkrt = MkRT; \
  __attribute__((unused)) MK_ERR hdl = &MkERROR;

OtClass_ARGS

#define OtClass_ARGS   OBJCMD_ARGS

Definition at line 17 of file LibLcConfig_tcl.c.

Setup_doc

#define Setup_doc   "LcConfig Setup"

Definition at line 100 of file LibLcConfig_tcl.c.

VER

#define VER   TCL_OO_METHOD_VERSION_CURRENT

Definition at line 12 of file LibLcConfig_tcl.c.

Function Documentation

Tcllcconfig_Init()

OT_TCL_EXTERN int Tcllcconfig_Init

(

Tcl_Interp *

interp

)

initialize the LcConfig package

The tcllcconfig package is created and one new command "msgque" is added to the Tcl interpreter.

Parameters

[in]

interp

the current interpreter

Returns

Tcl error-code

Definition at line 750 of file LibLcConfig_tcl.c.

{
  // check for the right tcl version
  if (Tcl_InitStubs (interp, "8.6", true) == NULL) {
    return TCL_ERROR;
  }
  if (Tcl_OOInitStubs (interp) == NULL) {
    return TCL_ERROR;
  }
 
  // setup liblcconfig
  LcSetup();
  MkRtSetup_NULL;
 
  // announce my package
  OtErrorCheckLng (Tcl_PkgProvide (interp, "tcllcconfig", META_VERSION    ));
 
  // pkg_mkIndex hack → only "Tcl_PkgProvide" is required
  if (Tcl_GetVar(interp,"::tcl::newPkgs", TCL_GLOBAL_ONLY) != NULL) return TCL_OK;
 
  // dependency.
  MK_STRN ver = Tcl_PkgRequire(interp, "tclmkkernel", META_VERSION, 1);
  check_NULL(ver) return TCL_ERROR;
 
  // toplevel namespace
  Tcl_Namespace *ns = Tcl_CreateNamespace (interp, "tcllcconfig", NULL, NULL);
  check_NULL(ns) return TCL_ERROR;
 
  // add PACKAGE commands
  OtErrorCheckLng( MK(FillNamespace)          (interp,ns,LC(sOtClassDef),NULL));
 
  // BEGIN-CLASS-call-init - created by 'tcl_MqS.tcl -i NHI1_HOME/theConfig/c/gen/c_lcconfig.meta' - DO NOT change
 
  OtErrorCheckLng( NS(pLcConfigC_Init)  (MK_RT_CALL interp, ns)) ;
  OtErrorCheckLng( NS(pLcSettingC_Init) (MK_RT_CALL interp, ns)) ;
 
  // END-CLASS-call-init - created by 'tcl_MqS.tcl -i NHI1_HOME/theConfig/c/gen/c_lcconfig.meta' - DO NOT change
 
  // export namespace
  OtErrorCheckLng( Tcl_Export(interp, ns, "Lc*C", false ) ) ;
 
  return TCL_OK;
}

Tcllcconfig_Unload()

OT_TCL_EXTERN int Tcllcconfig_Unload	(	Tcl_Interp *	interp,
		int	flags )

Definition at line 797 of file LibLcConfig_tcl.c.

{
  LcCleanup();
 
  return TCL_OK;
}

Variable Documentation

tcllcconfig_sInstanceDef

const OtObjProcDefS tcllcconfig_sInstanceDef[]

static

Initial value:

= {
 
 
 
 
 
  {0, NULL, NULL, NULL, NULL}
}

Definition at line 730 of file LibLcConfig_tcl.c.

                                                                         {
// BEGIN-OBJ - created by 'tcl_MqS.tcl -i NHI1_HOME/theConfig/c/gen/c_lcconfig.meta' - DO NOT change
 
// → no data
 
// END-OBJ - created by 'tcl_MqS.tcl -i NHI1_HOME/theConfig/c/gen/c_lcconfig.meta' - DO NOT change
  {0, NULL, NULL, NULL, NULL}
};

tcllcconfig_sOtClassDef

const OtObjProcDefS tcllcconfig_sOtClassDef[]

static

Initial value:

= {
 
 
 
  {VER, "ConfigFormatE_FromInt",  tcllcconfig_LcConfig_ConfigFormatE_FromInt , NULL, NULL},
  {VER, "ConfigOptionsEF_FromInt",  tcllcconfig_LcConfig_ConfigOptionsEF_FromInt , NULL, NULL},
  {VER, "ConfigTypeE_FromInt" ,  tcllcconfig_LcConfig_ConfigTypeE_FromInt , NULL, NULL},
  {VER, "ErrorE_FromInt"      ,  tcllcconfig_LcConfig_ErrorE_FromInt , NULL, NULL},
  {VER, "ErrorTypeE_FromInt"  ,  tcllcconfig_LcConfig_ErrorTypeE_FromInt , NULL, NULL},
 
 
  {VER, "ConfigFormatE_ToInt" ,  tcllcconfig_LcConfig_ConfigFormatE_ToInt , NULL, NULL},
  {VER, "ConfigFormatE_ToString",  tcllcconfig_LcConfig_ConfigFormatE_ToString , NULL, NULL},
  {VER, "ConfigOptionsEF_ToInt",  tcllcconfig_LcConfig_ConfigOptionsEF_ToInt , NULL, NULL},
  {VER, "ConfigOptionsEF_ToString",  tcllcconfig_LcConfig_ConfigOptionsEF_ToString , NULL, NULL},
  {VER, "ConfigTypeE_ToInt"   ,  tcllcconfig_LcConfig_ConfigTypeE_ToInt , NULL, NULL},
  {VER, "ConfigTypeE_ToString",  tcllcconfig_LcConfig_ConfigTypeE_ToString , NULL, NULL},
  {VER, "ErrorE_ToInt"        ,  tcllcconfig_LcConfig_ErrorE_ToInt , NULL, NULL},
  {VER, "ErrorE_ToString"     ,  tcllcconfig_LcConfig_ErrorE_ToString , NULL, NULL},
  {VER, "ErrorTypeE_ToInt"    ,  tcllcconfig_LcConfig_ErrorTypeE_ToInt , NULL, NULL},
  {VER, "ErrorTypeE_ToString" ,  tcllcconfig_LcConfig_ErrorTypeE_ToString , NULL, NULL},
 
 
  {VER, "Cleanup"             ,  tcllcconfig_LcConfig_Cleanup , NULL, NULL},
  {VER, "Setup"               ,  tcllcconfig_LcConfig_Setup , NULL, NULL},
 
 
  {0, NULL, NULL, NULL, NULL}
}

Definition at line 697 of file LibLcConfig_tcl.c.

                                                                       {
// BEGIN-CLASS - created by 'tcl_MqS.tcl -i NHI1_HOME/theConfig/c/gen/c_lcconfig.meta' - DO NOT change
 
// doc-key: LcConfig,EnumFunc,sco
  {VER, "ConfigFormatE_FromInt", NS(LcConfig_ConfigFormatE_FromInt)      , NULL, NULL},
  {VER, "ConfigOptionsEF_FromInt", NS(LcConfig_ConfigOptionsEF_FromInt)    , NULL, NULL},
  {VER, "ConfigTypeE_FromInt" , NS(LcConfig_ConfigTypeE_FromInt)        , NULL, NULL},
  {VER, "ErrorE_FromInt"      , NS(LcConfig_ErrorE_FromInt)             , NULL, NULL},
  {VER, "ErrorTypeE_FromInt"  , NS(LcConfig_ErrorTypeE_FromInt)         , NULL, NULL},
 
// doc-key: LcConfig,EnumFunc,sm_
  {VER, "ConfigFormatE_ToInt" , NS(LcConfig_ConfigFormatE_ToInt)        , NULL, NULL},
  {VER, "ConfigFormatE_ToString", NS(LcConfig_ConfigFormatE_ToString)     , NULL, NULL},
  {VER, "ConfigOptionsEF_ToInt", NS(LcConfig_ConfigOptionsEF_ToInt)      , NULL, NULL},
  {VER, "ConfigOptionsEF_ToString", NS(LcConfig_ConfigOptionsEF_ToString)   , NULL, NULL},
  {VER, "ConfigTypeE_ToInt"   , NS(LcConfig_ConfigTypeE_ToInt)          , NULL, NULL},
  {VER, "ConfigTypeE_ToString", NS(LcConfig_ConfigTypeE_ToString)       , NULL, NULL},
  {VER, "ErrorE_ToInt"        , NS(LcConfig_ErrorE_ToInt)               , NULL, NULL},
  {VER, "ErrorE_ToString"     , NS(LcConfig_ErrorE_ToString)            , NULL, NULL},
  {VER, "ErrorTypeE_ToInt"    , NS(LcConfig_ErrorTypeE_ToInt)           , NULL, NULL},
  {VER, "ErrorTypeE_ToString" , NS(LcConfig_ErrorTypeE_ToString)        , NULL, NULL},
 
// doc-key: LcConfig,Setup,sm_
  {VER, "Cleanup"             , NS(LcConfig_Cleanup)                    , NULL, NULL},
  {VER, "Setup"               , NS(LcConfig_Setup)                      , NULL, NULL},
 
// END-CLASS - created by 'tcl_MqS.tcl -i NHI1_HOME/theConfig/c/gen/c_lcconfig.meta' - DO NOT change
  {0, NULL, NULL, NULL, NULL}
};