X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/97755d8d350bdbc4e23d80a8ab70e17314b86db6..27d8dc3659e116a12b48fbde02eb4d6ae27f6328:/src/bindings/java/jmsg_storage.c diff --git a/src/bindings/java/jmsg_storage.c b/src/bindings/java/jmsg_storage.c deleted file mode 100644 index aadd0abec5..0000000000 --- a/src/bindings/java/jmsg_storage.c +++ /dev/null @@ -1,245 +0,0 @@ -/* Functions related to the java storage API. */ - -/* Copyright (c) 2012-2015. The SimGrid Team. - * All rights reserved. */ - -/* This program is free software; you can redistribute it and/or modify it - * under the terms of the license (GNU LGPL) which comes with this package. */ - -#include -#include - -#include "simgrid/msg.h" -#include "jmsg.h" -#include "jmsg_storage.h" -#include "jxbt_utilities.h" - -XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(jmsg); - -static jmethodID jstorage_method_Storage_constructor; -static jfieldID jstorage_field_Storage_bind; -static jfieldID jstorage_field_Storage_name; - -jobject jstorage_new_instance(JNIEnv * env) { - jclass cls = jxbt_get_class(env, "org/simgrid/msg/Storage"); - return (*env)->NewObject(env, cls, jstorage_method_Storage_constructor); -} - -msg_storage_t jstorage_get_native(JNIEnv * env, jobject jstorage) { - return (msg_storage_t) (uintptr_t) (*env)->GetLongField(env, jstorage, jstorage_field_Storage_bind); -} - -JNIEXPORT void JNICALL -Java_org_simgrid_msg_Storage_nativeInit(JNIEnv *env, jclass cls) { - jclass class_Storage = (*env)->FindClass(env, "org/simgrid/msg/Storage"); - jstorage_method_Storage_constructor = (*env)->GetMethodID(env, class_Storage, "", "()V"); - jstorage_field_Storage_bind = jxbt_get_jfield(env,class_Storage, "bind", "J"); - jstorage_field_Storage_name = jxbt_get_jfield(env, class_Storage, "name", "Ljava/lang/String;"); - if (!class_Storage || !jstorage_field_Storage_name || !jstorage_method_Storage_constructor || !jstorage_field_Storage_bind) { - jxbt_throw_native(env,bprintf("Can't find some fields in Java class. You should report this bug.")); - } -} - -void jstorage_bind(jobject jstorage, msg_storage_t storage, JNIEnv * env) { - (*env)->SetLongField(env, jstorage, jstorage_field_Storage_bind, (jlong) (uintptr_t) (storage)); -} - -jobject jstorage_ref(JNIEnv * env, jobject jstorage) { - return (*env)->NewGlobalRef(env, jstorage); -} - -void jstorage_unref(JNIEnv * env, jobject jstorage) { - (*env)->DeleteGlobalRef(env, jstorage); -} - -const char *jstorage_get_name(jobject jstorage, JNIEnv * env) { - msg_storage_t storage = jstorage_get_native(env, jstorage); - return MSG_storage_get_name(storage); -} - -JNIEXPORT jobject JNICALL -Java_org_simgrid_msg_Storage_getByName(JNIEnv * env, jclass cls, - jstring jname) { - msg_storage_t storage; - jobject jstorage; - - /* get the C string from the java string */ - if (jname == NULL) { - jxbt_throw_null(env,bprintf("No host can have a null name")); - return NULL; - } - const char *name = (*env)->GetStringUTFChars(env, jname, 0); - storage = MSG_storage_get_by_name(name); - - if (!storage) { /* invalid name */ - jxbt_throw_storage_not_found(env, name); - (*env)->ReleaseStringUTFChars(env, jname, name); - return NULL; - } - (*env)->ReleaseStringUTFChars(env, jname, name); - - if (!xbt_lib_get_level(storage, JAVA_STORAGE_LEVEL)) { /* native host not associated yet with java host */ - - /* Instantiate a new java storage */ - jstorage = jstorage_new_instance(env); - - if (!jstorage) { - jxbt_throw_jni(env, "java storage instantiation failed"); - return NULL; - } - - /* get a global reference to the newly created storage */ - jstorage = jstorage_ref(env, jstorage); - - if (!jstorage) { - jxbt_throw_jni(env, "new global ref allocation failed"); - return NULL; - } - /* Sets the java storage name */ - (*env)->SetObjectField(env, jstorage, jstorage_field_Storage_name, jname); - /* bind the java storage and the native storage */ - jstorage_bind(jstorage, storage, env); - - /* the native storage data field is set with the global reference to the - * java storage returned by this function - */ - xbt_lib_set(storage_lib, storage->key, JAVA_STORAGE_LEVEL, (void *) jstorage); - } - - /* return the global reference to the java storage instance */ - return (jobject) xbt_lib_get_level(storage, JAVA_STORAGE_LEVEL); -} - - -JNIEXPORT jlong JNICALL -Java_org_simgrid_msg_Storage_getSize(JNIEnv * env,jobject jstorage) { - msg_storage_t storage = jstorage_get_native(env, jstorage); - - if (!storage) { - jxbt_throw_notbound(env, "storage", jstorage); - return -1; - } - - return (jlong) MSG_storage_get_size(storage); -} - -JNIEXPORT jlong JNICALL -Java_org_simgrid_msg_Storage_getFreeSize(JNIEnv * env,jobject jstorage) { - msg_storage_t storage = jstorage_get_native(env, jstorage); - - if (!storage) { - jxbt_throw_notbound(env, "storage", jstorage); - return -1; - } - - return (jlong) MSG_storage_get_free_size(storage); -} - -JNIEXPORT jlong JNICALL -Java_org_simgrid_msg_Storage_getUsedSize(JNIEnv * env,jobject jstorage) { - msg_storage_t storage = jstorage_get_native(env, jstorage); - - if (!storage) { - jxbt_throw_notbound(env, "storage", jstorage); - return -1; - } - - return (jlong) MSG_storage_get_used_size(storage); -} - -JNIEXPORT jobject JNICALL -Java_org_simgrid_msg_Storage_getProperty(JNIEnv *env, jobject jstorage, jobject jname) { - msg_storage_t storage = jstorage_get_native(env, jstorage); - - if (!storage) { - jxbt_throw_notbound(env, "storage", jstorage); - return NULL; - } - const char *name = (*env)->GetStringUTFChars(env, jname, 0); - - const char *property = MSG_storage_get_property_value(storage, name); - if (!property) { - return NULL; - } - jobject jproperty = (*env)->NewStringUTF(env, property); - - (*env)->ReleaseStringUTFChars(env, jname, name); - - return jproperty; -} - -JNIEXPORT void JNICALL -Java_org_simgrid_msg_Storage_setProperty(JNIEnv *env, jobject jstorage, jobject jname, jobject jvalue) { - msg_storage_t storage = jstorage_get_native(env, jstorage); - - if (!storage) { - jxbt_throw_notbound(env, "storage", jstorage); - return; - } - const char *name = (*env)->GetStringUTFChars(env, jname, 0); - const char *value_java = (*env)->GetStringUTFChars(env, jvalue, 0); - char *value = xbt_strdup(value_java); - - MSG_storage_set_property_value(storage, name, value, xbt_free_f); - - (*env)->ReleaseStringUTFChars(env, jvalue, value); - (*env)->ReleaseStringUTFChars(env, jname, name); - -} - -JNIEXPORT jobject JNICALL -Java_org_simgrid_msg_Storage_getHost(JNIEnv * env,jobject jstorage) { - msg_storage_t storage = jstorage_get_native(env, jstorage); - - if (!storage) { - jxbt_throw_notbound(env, "storage", jstorage); - return NULL; - } - const char *host_name = MSG_storage_get_host(storage); - if (!host_name) { - return NULL; - } - jobject jhost_name = (*env)->NewStringUTF(env, host_name); - - return jhost_name; -} - -JNIEXPORT jobjectArray JNICALL -Java_org_simgrid_msg_Storage_all(JNIEnv * env, jclass cls_arg) -{ - int index; - jobjectArray jtable; - jobject jstorage; - jstring jname; - msg_storage_t storage; - - xbt_dynar_t table = MSG_storages_as_dynar(); - int count = xbt_dynar_length(table); - - jclass cls = jxbt_get_class(env, "org/simgrid/msg/Storage"); - - if (!cls) { - return NULL; - } - - jtable = (*env)->NewObjectArray(env, (jsize) count, cls, NULL); - - if (!jtable) { - jxbt_throw_jni(env, "Storages table allocation failed"); - return NULL; - } - - for (index = 0; index < count; index++) { - storage = xbt_dynar_get_as(table,index,msg_storage_t); - jstorage = (jobject) (xbt_lib_get_level(storage, JAVA_STORAGE_LEVEL)); - - if (!jstorage) { - jname = (*env)->NewStringUTF(env, MSG_storage_get_name(storage)); - jstorage = Java_org_simgrid_msg_Storage_getByName(env, cls_arg, jname); - } - - (*env)->SetObjectArrayElement(env, jtable, index, jstorage); - } - xbt_dynar_free(&table); - return jtable; -}