1 /* Java bindings of the NetZones. */
3 /* Copyright (c) 2007-2017. The SimGrid Team. All rights reserved. */
5 /* This program is free software; you can redistribute it and/or modify it
6 * under the terms of the license (GNU LGPL) which comes with this package. */
8 #include "simgrid/kernel/routing/NetZoneImpl.hpp"
9 #include "simgrid/s4u/Host.hpp"
10 #include "simgrid/s4u/NetZone.hpp"
13 #include "jmsg_as.hpp"
14 #include "jmsg_host.h"
15 #include "jxbt_utilities.hpp"
17 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(java);
21 static jmethodID jas_method_As_constructor;
22 static jfieldID jas_field_As_bind;
24 jobject jnetzone_new_instance(JNIEnv* env)
26 jclass cls = jxbt_get_class(env, "org/simgrid/msg/As");
27 return env->NewObject(cls, jas_method_As_constructor);
30 jobject jnetzone_ref(JNIEnv* env, jobject jas)
32 return env->NewGlobalRef(jas);
35 void jnetzone_unref(JNIEnv* env, jobject jas)
37 env->DeleteGlobalRef(jas);
40 void jnetzone_bind(jobject jas, simgrid::s4u::NetZone* netzone, JNIEnv* env)
42 env->SetLongField(jas, jas_field_As_bind, (jlong)(uintptr_t)(netzone));
45 simgrid::s4u::NetZone* jnetzone_get_native(JNIEnv* env, jobject jas)
47 return (simgrid::s4u::NetZone*)(uintptr_t)env->GetLongField(jas, jas_field_As_bind);
50 JNIEXPORT void JNICALL Java_org_simgrid_msg_As_nativeInit(JNIEnv* env, jclass cls)
52 jclass class_As = env->FindClass("org/simgrid/msg/As");
53 jas_method_As_constructor = env->GetMethodID(class_As, "<init>", "()V");
54 jas_field_As_bind = jxbt_get_jfield(env,class_As, "bind", "J");
55 xbt_assert(class_As && jas_method_As_constructor && jas_field_As_bind,
56 "Native initialization of msg/AS failed. Please report that bug");
59 JNIEXPORT jobject JNICALL Java_org_simgrid_msg_As_getName(JNIEnv * env, jobject jas) {
60 simgrid::s4u::NetZone* as = jnetzone_get_native(env, jas);
61 return env->NewStringUTF(as->getCname());
64 JNIEXPORT jobjectArray JNICALL Java_org_simgrid_msg_As_getSons(JNIEnv * env, jobject jas) {
67 sg_netzone_t self_as = jnetzone_get_native(env, jas);
69 jclass cls = env->FindClass("org/simgrid/msg/As");
74 jtable = env->NewObjectArray(static_cast<jsize>(self_as->getChildren()->size()), cls, nullptr);
77 jxbt_throw_jni(env, "Hosts table allocation failed");
81 for (auto const& tmp_as : *self_as->getChildren()) {
82 jobject tmp_jas = jnetzone_new_instance(env);
84 jxbt_throw_jni(env, "java As instantiation failed");
87 tmp_jas = jnetzone_ref(env, tmp_jas);
89 jxbt_throw_jni(env, "new global ref allocation failed");
92 jnetzone_bind(tmp_jas, tmp_as, env);
94 env->SetObjectArrayElement(jtable, index, tmp_jas);
100 JNIEXPORT jobject JNICALL Java_org_simgrid_msg_As_getProperty(JNIEnv *env, jobject jas, jobject jname) {
101 simgrid::s4u::NetZone* as = jnetzone_get_native(env, jas);
104 jxbt_throw_notbound(env, "as", jas);
107 const char *name = env->GetStringUTFChars(static_cast<jstring>(jname), 0);
109 const char* property = MSG_zone_get_property_value(as, name);
114 jobject jproperty = env->NewStringUTF(property);
116 env->ReleaseStringUTFChars(static_cast<jstring>(jname), name);
121 JNIEXPORT jobjectArray JNICALL Java_org_simgrid_msg_As_getHosts(JNIEnv * env, jobject jas)
126 simgrid::s4u::NetZone* as = jnetzone_get_native(env, jas);
128 jclass cls = jxbt_get_class(env, "org/simgrid/msg/Host");
132 std::vector<sg_host_t> table;
133 as->getHosts(&table);
135 jtable = env->NewObjectArray(static_cast<jsize>(table.size()), cls, nullptr);
138 jxbt_throw_jni(env, "Hosts table allocation failed");
143 for (auto const& host : table) {
144 jhost = static_cast<jobject>(host->extension(JAVA_HOST_LEVEL));
146 jname = env->NewStringUTF(host->getCname());
148 jhost = Java_org_simgrid_msg_Host_getByName(env, cls, jname);
150 env->ReleaseStringUTFChars(static_cast<jstring>(jname), host->getCname());
153 env->SetObjectArrayElement(jtable, index, jhost);