MkRuntimeC_jv.c

Go to the documentation of this file.

 
/* LABEL-START */
#define META_FILE_NAME "MkRuntimeC_jv.c"
 
#include "jni_h/jvmkkernel_MkRuntimeC.h"
#include "LibMkKernel_private_jv.h"
 
 
jobject NS(MkRuntimeC_ObjNew) (MK_RT_ARGS JNIEnv *env, MK_RT hdl) {
  static MkThreadLocal jobject NS_NULL = NULL;
  return (hdl ? MK(AtomObjNew)(MK_RT_CALL env, MkRuntimeC_X2obj(hdl)) : MK_GET__NS_NULL(MkRuntimeC));
}
 
MK_UNUSED
static jobject NS(MkRuntimeC_ObjCreate) (MK_RT_ARGS JNIEnv *env, MK_RT hdl) {
  return MK(AtomObjCreate)(MK_RT_CALL env, MkRuntimeC_X2obj(hdl));
}
 
static MK_PTR NS(MkRuntimeC_selfCreate) (MK_RT_ARGS MK_OBJ obj, MK_PTR envP) {
  JNIEnv *env = (JNIEnv*) envP;
  return (*env)->NewObject(env, NS(Class_MkRuntimeC), NS(MID_MkRuntimeC_INIT), (jlong) obj, JNI_TRUE);
}
 
#define ClassInit \
 
//  printTxt("init: MkRuntimeC");
 
/* LABEL-END */
 
 
// BEGIN-MkRuntimeC - created by 'jv_MqC.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
 
 
// doc-key: MkRuntimeC,MkRuntimeC-Config,sm_
 
JNIEXPORT jint JNICALL Java_jvmkkernel_MkRuntimeC_DebugGet (JNIEnv *env, jclass class)  {
  MkRtSetup_NULL;
  MK_I32 __retVal__L = MkRuntimeDebugGet();
  jint __retVal__S = __retVal__L;
  return __retVal__S;
}
 
JNIEXPORT void JNICALL Java_jvmkkernel_MkRuntimeC_DebugSet (JNIEnv *env, jclass class, jint dbg)  {
  MkRtSetup_NULL;
  MkRuntimeDebugSet(dbg);
}
 
JNIEXPORT jobject JNICALL Java_jvmkkernel_MkRuntimeC_ErrorGetCode (JNIEnv *env, jclass class)  {
  MkRtSetup_NULL;
  enum MkErrorE errVal = MkRuntimeErrorGetCode();
  jobject __retVal__S = MK(pGetEnumFromString)(env,MK(Class_MkErrorE),"Ljvmkkernel/MkErrorE;",MkErrorE_ToString(errVal));
  return __retVal__S;
}
 
JNIEXPORT jboolean JNICALL Java_jvmkkernel_MkRuntimeC_IsSilentGet (JNIEnv *env, jclass class)  {
  MkRtSetup_NULL;
  MK_BOOL __retVal__L = MkRuntimeIsSilentGet();
  jboolean __retVal__S = __retVal__L;
  return __retVal__S;
}
 
JNIEXPORT void JNICALL Java_jvmkkernel_MkRuntimeC_IsSilentSet (JNIEnv *env, jclass class, jboolean silent)  {
  MkRtSetup_NULL;
  MkRuntimeIsSilentSet(silent);
}
 
JNIEXPORT jstring JNICALL Java_jvmkkernel_MkRuntimeC_LogTargetGet (JNIEnv *env, jclass class)  {
  MkRtSetup_NULL;
  MK_STRN __retVal__L = MkRuntimeLogTargetGet();
  jstring __retVal__S = JC2O(env,__retVal__L);
  return __retVal__S;
}
 
JNIEXPORT void JNICALL Java_jvmkkernel_MkRuntimeC_LogTargetReset (JNIEnv *env, jclass class)  {
  MkRtSetup_NULL;
  enum MkErrorE errVal = MkRuntimeLogTargetReset();
  MkErrorC_Check(NULL, errVal)
error:
  return;
}
 
JNIEXPORT void JNICALL Java_jvmkkernel_MkRuntimeC_LogTargetSet (JNIEnv *env, jclass class, jstring logTgt)  {
  MkRtSetup_NULL;
  MK_STRN logTgt_ptr = (logTgt?(*env)->GetStringUTFChars(env,logTgt,NULL):NULL);
  JavaErrorCheck;
  enum MkErrorE errVal = MkRuntimeLogTargetSet(logTgt_ptr);
  MkErrorC_Check(NULL, errVal)
  if (logTgt_ptr) (*env)->ReleaseStringUTFChars(env,logTgt,logTgt_ptr);
error:
  return;
}
 
JNIEXPORT void JNICALL Java_jvmkkernel_MkRuntimeC_NoDecoSet (JNIEnv *env, jclass class, jboolean noDeco)  {
  MkRtSetup_NULL;
  MkRuntimeNoDecoSet(noDeco);
}
 
// MkRuntimeC_Config_JV_API
 
 
// doc-key: MkRuntimeC,MkRuntimeC-Info,sm_
 
JNIEXPORT void JNICALL Java_jvmkkernel_MkRuntimeC_Log0 (JNIEnv *env, jclass class, jobject fmtobj, jint debug, jstring callfunc, jint lvl)  {
  MkRtSetup_NULL;
  MK_OBJN fmtobj_hdl = (MK_OBJN)pObj2Hdl__null_allow(env,fmtobj);
  JavaErrorCheck;
  if (callfunc == NULL) {
    (*env)->CallStaticVoidMethod(env,MK(Class_MkKernel),MK(MID_MkKernel_getCallerStack));
  }
  if (callfunc == NULL) {callfunc = MK(pGetCallerProc)(env);}
  if (debug > (jint)(MkRuntimeDebugGet())) {return;}
  MK_STRN callfunc_ptr = (callfunc?(*env)->GetStringUTFChars(env,callfunc,NULL):NULL);
  JavaErrorCheck;
  MkRuntimeLog0(fmtobj_hdl, debug, callfunc_ptr, lvl);
  if (callfunc_ptr) (*env)->ReleaseStringUTFChars(env,callfunc,callfunc_ptr);
error:
  return;
}
 
// MkRuntimeC_Info_JV_API
 
// END-MkRuntimeC - created by 'jv_MqC.tcl -i NHI1_HOME/theKernel/c/gen/c_mkkernel.meta' - DO NOT change
 
// +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 
void NS(MkRuntimeC_Init)(MK_RT_ARGS_ONLY) {
  ClassInit
 
  MkRuntimeC_TT->selfCreate    = NS(MkRuntimeC_selfCreate);
  MkRuntimeC_TT->selfUnlink    = MK(AtomSelfUnlink);
}