MkExceptionC_jv.c File Reference

tag: nhi1-release-250425 More...

#include <jni.h>
#include "LibMkKernel_jv.h"

Include dependency graph for MkExceptionC_jv.c:

Go to the source code of this file.

Macros
#define	META_FILE_NAME   "MkExceptionC_jv.c"

Functions
void	jvmkkernel_MkExceptionC_Raise (JNIEnv *env, MK_MNGN mng, MK_STRN const doc, MK_STRN const file, MK_I32 const line)
JNIEXPORT void JNICALL	Java_jvmkkernel_MkExceptionC_Dispose (JNIEnv *env, jobject self)
MK_ERR	jvmkkernel_MkExceptionC_Catch (JNIEnv *env, MK_MNGN mng, jthrowable ex, MK_STRN const proc, MK_STRN const stop)

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

Macro Definition Documentation

META_FILE_NAME

#define META_FILE_NAME   "MkExceptionC_jv.c"

Definition at line 10 of file MkExceptionC_jv.c.

Function Documentation

Java_jvmkkernel_MkExceptionC_Dispose()

JNIEXPORT void JNICALL Java_jvmkkernel_MkExceptionC_Dispose	(	JNIEnv *	env,
		jobject	self )

Definition at line 40 of file MkExceptionC_jv.c.

{
  MK_ERR hdl = MkErr((MK_MNG)(*env)->GetLongField(env,self,NS(FID_MkExceptionC_hdl)));
  MkRtSetup_X(hdl);
  if (hdl) MkRefDecr_X(hdl);
  (*env)->SetLongField(env,self,NS(FID_MkExceptionC_hdl),0);
  return;
}

jvmkkernel_MkExceptionC_Catch()

MK_ERR jvmkkernel_MkExceptionC_Catch	(	JNIEnv *	env,
		MK_MNGN	mng,
		jthrowable	ex,
		MK_STRN const	proc,
		MK_STRN const	stop )

Definition at line 49 of file MkExceptionC_jv.c.

{
  if (ex == NULL) ex = (*env)->ExceptionOccurred(env);
  MK_ERR const err = MkErrorFORMAT_1M(mng);
  MkRtSetup_XN(err);
 
  // is the ERROR from "java" or "jvmkkernel"
  if (OT_LNG_OBJ_CLASS_IS(ex, NS(Class_MkExceptionC))) {
    // error is from "jvmkkernel"
    MK_ERR newerr = (MK_ERR) (*env)->GetLongField(env,ex,NS(FID_MkExceptionC_hdl));
    if (newerr) {
      MkErrorSetE(err, newerr);
      (*env)->CallObjectMethod(env,ex,NS(MID_MkExceptionC_EXIT));
    }
 
  } else {
    (*env)->CallStaticVoidMethod( 
      env, MK(Class_MkExceptionC), MK(MID_MkExceptionC_Catch), 
        MK(MkErrorC_ObjNew)(MK_RT_CALL env,err), ex, JC2O(env, proc), JC2O(env, stop)
    );
  }
  (*env)->ExceptionClear(env);
 
  return err;
}

jvmkkernel_MkExceptionC_Raise()

void jvmkkernel_MkExceptionC_Raise	(	JNIEnv *	env,
		MK_MNGN	mng,
		MK_STRN const	doc,
		MK_STRN const	file,
		MK_I32 const	line )

Definition at line 17 of file MkExceptionC_jv.c.

{
  MK_ERR err = MkErrorFORMAT_1M(mng);
  MkRtSetup_XN(err);
  MkErrorStackFormat(err,doc,file,line);
  NS(pGetCallerStack)(MK_RT_CALL env, err);
  MK_ERR newerr = MkErrCheck(mng) && mng != err ? (MK_ERR)mng : MkErrorDup(err);
  MkRefIncr_1X(newerr);
 
  jthrowable exp = (*env)->NewObject(env, NS(Class_MkExceptionC), NS(MID_MkExceptionC_INIT), 
                      (jlong) newerr, JC2O(env, (MK_STRN)MkErrorGetTextI(err)));
 
  (*env)->Throw(env, exp);
 
  MkErrorReset_1(err);
}