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) {
67 jclass cls = jxbt_get_class(env,classname);
72 id = (*env)->GetMethodID(env, cls, name,signature);
75 char *m=bprintf("Cannot find method %s(%s) in %s", name, signature,classname);
77 jxbt_throw_jni(env,m);
86 jfieldID jxbt_get_jfield(JNIEnv* env, jclass cls,
87 const char *name, const char *signature) {
93 id = (*env)->GetFieldID(env, cls, name, signature);
96 jmethodID getname_id = (*env)->GetMethodID(env, cls, "getName", "()Ljava/lang/String;");
97 jstring jclassname = (jstring) (*env)->CallObjectMethod(env,cls, getname_id, NULL);
98 const char *classname = (*env)->GetStringUTFChars(env, jclassname, 0);
99 char *m=bprintf("Cannot find field %s %s in %s",signature, name, classname);
101 (*env)->ReleaseStringUTFChars(env, jclassname, classname);
103 jxbt_throw_jni(env,m);
112 jfieldID jxbt_get_sfield(JNIEnv* env, const char *classname,
113 const char *name, const char *signature) {
114 jclass cls = jxbt_get_class(env,classname);
120 id = (*env)->GetFieldID(env, cls, name, signature);
123 char *m=bprintf("Cannot find field %s %s in %s",signature, name, classname);
125 jxbt_throw_jni(env,m);
134 /* ***************** */
135 /* EXCEPTION RAISING */
136 /* ***************** */
137 static void jxbt_throw_by_name(JNIEnv* env,const char* name, char *msg) {
138 jclass cls = (*env)->FindClass(env, name);
140 xbt_assert2(cls,"%s (Plus severe error: class %s not found)\n",
143 (*env)->ThrowNew(env,cls,msg);
150 void jxbt_throw_jni(JNIEnv* env,const char* msg) {
151 jxbt_throw_by_name(env,
152 "simgrid/msg/JniException",
153 bprintf("Internal or JNI error: %s",msg));
155 void jxbt_throw_notbound(JNIEnv* env,const char* kind, void *pointer) {
156 jxbt_throw_by_name(env,
157 "simgrid/msg/JniException",
158 bprintf("Internal error: %s %p not bound",kind, pointer));
161 void jxbt_throw_native(JNIEnv* env,char* msg) {
162 jxbt_throw_by_name(env, "simgrid/msg/NativeException", msg);
166 void jxbt_throw_null(JNIEnv* env, char* msg) {
167 jxbt_throw_by_name(env, "java/lang/NullPointerException", msg);
171 /* Errors on user side */
172 void jxbt_throw_illegal(JNIEnv* env, char* msg) {
173 jxbt_throw_by_name(env, "java/lang/IllegalArgumentException", msg);
175 void jxbt_throw_host_not_found(JNIEnv* env, const char *invalid_name) {
176 jxbt_throw_by_name(env,
177 "simgrid/msg/HostNotFoundException",
178 bprintf("No such host: %s",invalid_name));
180 void jxbt_throw_process_not_found(JNIEnv* env, const char *invalid_name) {
181 jxbt_throw_by_name(env,
182 "simgrid/msg/ProcessNotFoundException",
183 bprintf("No such process: %s",invalid_name));