4 * Various JNI helper functions
6 * Copyright 2006,2007 Martin Quinson, Malek Cherier All right reserved.
8 * This program is free software; you can redistribute it and/or modify it
9 * under the terms of the license (GNU LGPL) which comes with this package.
13 #include <stdlib.h> /* abort */
15 #include "xbt/sysdep.h"
17 #include "jxbt_utilities.h"
19 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(jmsg);
25 jclass jxbt_get_class(JNIEnv* env, const char*name) {
26 jclass cls = (*env)->FindClass(env, name);
29 char *m=bprintf("Class %s not found",name);
30 jxbt_throw_jni(env, m);
38 jmethodID jxbt_get_jmethod(JNIEnv* env, jclass cls,
39 const char *name,const char *signature) {
44 id = (*env)->GetMethodID(env, cls, name,signature);
48 jmethodID tostr_id = (*env)->GetMethodID(env, cls, "getName", "()Ljava/lang/String;");
49 jstring jclassname = (jstring) (*env)->CallObjectMethod(env, cls, tostr_id, NULL);
50 const char *classname = (*env)->GetStringUTFChars(env, jclassname, 0);
52 char *m=bprintf("Cannot find method %s(%s) in %s", name, signature ,classname);
54 (*env)->ReleaseStringUTFChars(env, jclassname, classname);
56 jxbt_throw_jni(env,m);
65 jmethodID jxbt_get_smethod(JNIEnv* env, const char *classname,
66 const char *name,const char *signature) {
71 cls = jxbt_get_class(env,classname);
76 id = (*env)->GetMethodID(env, cls, name,signature);
79 char *m=bprintf("Cannot find method %s(%s) in %s", name, signature,classname);
81 jxbt_throw_jni(env,m);
89 jfieldID jxbt_get_jfield(JNIEnv* env, jclass cls,
90 const char *name, const char *signature) {
96 id = (*env)->GetFieldID(env, cls, name, signature);
99 jmethodID getname_id = (*env)->GetMethodID(env, cls, "getName", "()Ljava/lang/String;");
100 jstring jclassname = (jstring) (*env)->CallObjectMethod(env,cls, getname_id, NULL);
101 const char *classname = (*env)->GetStringUTFChars(env, jclassname, 0);
102 char *m=bprintf("Cannot find field %s %s in %s",signature, name, classname);
104 (*env)->ReleaseStringUTFChars(env, jclassname, classname);
106 jxbt_throw_jni(env,m);
115 jfieldID jxbt_get_sfield(JNIEnv* env, const char *classname,
116 const char *name, const char *signature) {
117 jclass cls = jxbt_get_class(env,classname);
123 id = (*env)->GetFieldID(env, cls, name, signature);
126 char *m=bprintf("Cannot find field %s %s in %s",signature, name, classname);
128 jxbt_throw_jni(env,m);
137 /* ***************** */
138 /* EXCEPTION RAISING */
139 /* ***************** */
140 static void jxbt_throw_by_name(JNIEnv* env,const char* name, char *msg) {
141 jclass cls = (*env)->FindClass(env, name);
143 xbt_assert2(cls,"%s (Plus severe error: class %s not found)\n",
146 (*env)->ThrowNew(env,cls,msg);
153 void jxbt_throw_jni(JNIEnv* env,const char* msg) {
154 jxbt_throw_by_name(env,
155 "simgrid/msg/JniException",
156 bprintf("Internal or JNI error: %s",msg));
158 void jxbt_throw_notbound(JNIEnv* env,const char* kind, void *pointer) {
159 jxbt_throw_by_name(env,
160 "simgrid/msg/JniException",
161 bprintf("Internal error: %s %p not bound",kind, pointer));
164 void jxbt_throw_native(JNIEnv* env,char* msg) {
165 jxbt_throw_by_name(env, "simgrid/msg/NativeException", msg);
169 void jxbt_throw_null(JNIEnv* env, char* msg) {
170 jxbt_throw_by_name(env, "java/lang/NullPointerException", msg);
174 /* Errors on user side */
175 void jxbt_throw_illegal(JNIEnv* env, char* msg) {
176 jxbt_throw_by_name(env, "java/lang/IllegalArgumentException", msg);
178 void jxbt_throw_host_not_found(JNIEnv* env, const char *invalid_name) {
179 jxbt_throw_by_name(env,
180 "simgrid/msg/HostNotFoundException",
181 bprintf("No such host: %s",invalid_name));
183 void jxbt_throw_process_not_found(JNIEnv* env, const char *invalid_name) {
184 jxbt_throw_by_name(env,
185 "simgrid/msg/ProcessNotFoundException",
186 bprintf("No such process: %s",invalid_name));