X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/12e4e9a1fd538aafa6a0df2de705041063740834..2c206253e897f7ec2159f89a9811a7fed3e77c2c:/src/bindings/java/jmsg.cpp diff --git a/src/bindings/java/jmsg.cpp b/src/bindings/java/jmsg.cpp index 1bb1487fd6..010838b7fe 100644 --- a/src/bindings/java/jmsg.cpp +++ b/src/bindings/java/jmsg.cpp @@ -1,34 +1,32 @@ -/* Java Wrappers to the MSG API. */ - -/* Copyright (c) 2007-2017. The SimGrid Team. All rights reserved. */ +/* Copyright (c) 2007-2021. 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 #include +#include -#include "simgrid/msg.h" +#include "simgrid/Exception.hpp" #include "simgrid/plugins/energy.h" -#include "simgrid/simix.h" +#include "simgrid/plugins/file_system.h" +#include "simgrid/plugins/live_migration.h" +#include "simgrid/plugins/load.h" +#include "simgrid/s4u/Actor.hpp" #include "simgrid/s4u/Host.hpp" -#include "src/simix/smx_private.h" - -#include "jmsg_process.h" -#include "jmsg_as.h" +#include "jmsg.hpp" +#include "jmsg_as.hpp" #include "jmsg_host.h" -#include "jmsg_storage.h" +#include "jmsg_process.h" #include "jmsg_task.h" -#include "jxbt_utilities.h" -#include "jmsg.h" +#include "jxbt_utilities.hpp" #include "JavaContext.hpp" -#include - /* Shut up some errors in eclipse online compiler. I wish such a pimple wouldn't be needed */ #ifndef JNIEXPORT #define JNIEXPORT @@ -38,24 +36,20 @@ #endif /* end of eclipse-mandated pimple */ -SG_BEGIN_DECL() - int JAVA_HOST_LEVEL = -1; XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(java); JavaVM *__java_vm = nullptr; -JavaVM *get_java_VM() -{ - return __java_vm; -} - JNIEnv *get_current_thread_env() { using simgrid::kernel::context::JavaContext; - JavaContext* ctx = static_cast(xbt_os_thread_get_extra_data()); - return ctx->jenv; + const JavaContext* ctx = static_cast(simgrid::kernel::context::Context::self()); + if (ctx) + return ctx->jenv_; + else + return nullptr; } void jmsg_throw_status(JNIEnv *env, msg_error_t status) { @@ -81,97 +75,91 @@ void jmsg_throw_status(JNIEnv *env, msg_error_t status) { * Unsortable functions * ***************************************************************************************/ -JNIEXPORT jdouble JNICALL Java_org_simgrid_msg_Msg_getClock(JNIEnv * env, jclass cls) +JNIEXPORT jdouble JNICALL Java_org_simgrid_msg_Msg_getClock(JNIEnv*, jclass) { - return (jdouble) MSG_get_clock(); + return (jdouble)simgrid_get_clock(); } -static void __JAVA_host_priv_free(void *host) +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_init(JNIEnv* env, jclass, jobjectArray jargs) { -} - -JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_init(JNIEnv * env, jclass cls, jobjectArray jargs) -{ - int argc = 0; - - XBT_LOG_CONNECT(java); - XBT_LOG_CONNECT(jtrace); - env->GetJavaVM(&__java_vm); simgrid::kernel::context::factory_initializer = &simgrid::kernel::context::java_factory; - jthrowable exc = env->ExceptionOccurred(); + const _jthrowable* exc = env->ExceptionOccurred(); if (exc) { env->ExceptionClear(); } setlocale(LC_NUMERIC,"C"); + int argc = 1; if (jargs) - argc = static_cast(env->GetArrayLength(jargs)); - - argc++; - char** argv = new char*[argc + 1]; - argv[0] = xbt_strdup("java"); - - for (int index = 0; index < argc - 1; index++) { - jstring jval = (jstring)env->GetObjectArrayElement(jargs, index); - const char* tmp = env->GetStringUTFChars(jval, 0); - argv[index + 1] = xbt_strdup(tmp); + argc += static_cast(env->GetArrayLength(jargs)); + xbt_assert(argc > 0); + + // Need a static storage because the XBT layer saves the arguments in xbt::binary_name and xbt::cmdline. + static std::vector args; + args.reserve(argc); + + args.emplace_back("java"); + for (int index = 1; index < argc; index++) { + auto jval = (jstring)env->GetObjectArrayElement(jargs, index - 1); + const char* tmp = env->GetStringUTFChars(jval, nullptr); + args.emplace_back(tmp); env->ReleaseStringUTFChars(jval, tmp); } + + std::unique_ptr argv(new char*[argc + 1]); + std::transform(begin(args), end(args), argv.get(), [](std::string& s) { return &s.front(); }); argv[argc] = nullptr; - MSG_init(&argc, argv); + int argc2 = argc; + MSG_init(&argc2, argv.get()); + xbt_assert(argc2 <= argc); - JAVA_HOST_LEVEL = simgrid::s4u::Host::extension_create(__JAVA_host_priv_free); + for (int index = 1; index < argc2; index++) + env->SetObjectArrayElement(jargs, index - 1, (jstring)env->NewStringUTF(argv[index])); - for (int index = 0; index < argc - 1; index++) { - env->SetObjectArrayElement(jargs, index, (jstring)env->NewStringUTF(argv[index + 1])); - free(argv[index]); - } - free(argv[argc]); - delete[] argv; + sg_vm_live_migration_plugin_init(); + JAVA_HOST_LEVEL = simgrid::s4u::Host::extension_create(nullptr); } -JNIEXPORT void JNICALL JNICALL Java_org_simgrid_msg_Msg_run(JNIEnv * env, jclass cls) +JNIEXPORT void JNICALL JNICALL Java_org_simgrid_msg_Msg_run(JNIEnv* env, jclass) { /* Run everything */ - XBT_DEBUG("Ready to run MSG_MAIN"); - msg_error_t rv = MSG_main(); - XBT_DEBUG("Done running MSG_MAIN"); - jxbt_check_res("MSG_main()", rv, MSG_OK, - xbt_strdup("unexpected error : MSG_main() failed .. please report this bug ")); - - XBT_INFO("MSG_main finished; Cleaning up the simulation..."); + XBT_DEBUG("Ready to run"); + simgrid_run(); + XBT_DEBUG("Done running"); + XBT_INFO("Terminating the simulation..."); /* Cleanup java hosts */ - xbt_dynar_t hosts = MSG_hosts_as_dynar(); - for (unsigned long index = 0; index < xbt_dynar_length(hosts) - 1; index++) { - msg_host_t msg_host = xbt_dynar_get_as(hosts,index,msg_host_t); - jobject jhost = (jobject) msg_host->extension(JAVA_HOST_LEVEL); + sg_host_t* hosts = sg_host_list(); + size_t host_count = sg_host_count(); + for (size_t index = 0; index < host_count - 1; index++) { + auto jhost = (jobject)hosts[index]->extension(JAVA_HOST_LEVEL); if (jhost) jhost_unref(env, jhost); - } - xbt_dynar_free(&hosts); + xbt_free(hosts); - /* Cleanup java storages */ - for (auto const& elm : java_storage_map) - jstorage_unref(env, elm.second); + /* Display the status of remaining threads. None should survive, but who knows */ + jclass clsProcess = jxbt_get_class(env, "org/simgrid/msg/Process"); + jmethodID idDebug = jxbt_get_static_jmethod(env, clsProcess, "debugAllThreads", "()V"); + xbt_assert(idDebug != nullptr, "Method Process.debugAllThreads() not found..."); + env->CallStaticVoidMethod(clsProcess, idDebug); } -JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_createEnvironment(JNIEnv * env, jclass cls, jstring jplatformFile) +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_createEnvironment(JNIEnv* env, jclass, jstring jplatformFile) { - const char *platformFile = env->GetStringUTFChars(jplatformFile, 0); + const char* platformFile = env->GetStringUTFChars(jplatformFile, nullptr); - MSG_create_environment(platformFile); + simgrid_load_platform(platformFile); env->ReleaseStringUTFChars(jplatformFile, platformFile); } -JNIEXPORT jobject JNICALL Java_org_simgrid_msg_Msg_environmentGetRoutingRoot(JNIEnv * env, jclass cls) +JNIEXPORT jobject JNICALL Java_org_simgrid_msg_Msg_environmentGetRoutingRoot(JNIEnv* env, jclass) { - msg_netzone_t as = MSG_zone_get_root(); + sg_netzone_t as = sg_zone_get_root(); jobject jas = jnetzone_new_instance(env); if (not jas) { jxbt_throw_jni(env, "java As instantiation failed"); @@ -187,65 +175,65 @@ JNIEXPORT jobject JNICALL Java_org_simgrid_msg_Msg_environmentGetRoutingRoot(JNI return (jobject) jas; } -JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_debug(JNIEnv * env, jclass cls, jstring js) +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_debug(JNIEnv* env, jclass, jstring js) { - const char *s = env->GetStringUTFChars(js, 0); + const char* s = env->GetStringUTFChars(js, nullptr); XBT_DEBUG("%s", s); env->ReleaseStringUTFChars(js, s); } -JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_verb(JNIEnv * env, jclass cls, jstring js) +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_verb(JNIEnv* env, jclass, jstring js) { - const char *s = env->GetStringUTFChars(js, 0); + const char* s = env->GetStringUTFChars(js, nullptr); XBT_VERB("%s", s); env->ReleaseStringUTFChars(js, s); } -JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_info(JNIEnv * env, jclass cls, jstring js) +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_info(JNIEnv* env, jclass, jstring js) { - const char *s = env->GetStringUTFChars(js, 0); + const char* s = env->GetStringUTFChars(js, nullptr); XBT_INFO("%s", s); env->ReleaseStringUTFChars(js, s); } -JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_warn(JNIEnv * env, jclass cls, jstring js) +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_warn(JNIEnv* env, jclass, jstring js) { - const char *s = env->GetStringUTFChars(js, 0); + const char* s = env->GetStringUTFChars(js, nullptr); XBT_WARN("%s", s); env->ReleaseStringUTFChars(js, s); } -JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_error(JNIEnv * env, jclass cls, jstring js) +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_error(JNIEnv* env, jclass, jstring js) { - const char *s = env->GetStringUTFChars(js, 0); + const char* s = env->GetStringUTFChars(js, nullptr); XBT_ERROR("%s", s); env->ReleaseStringUTFChars(js, s); } -JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_critical(JNIEnv * env, jclass cls, jstring js) +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_critical(JNIEnv* env, jclass, jstring js) { - const char *s = env->GetStringUTFChars(js, 0); + const char* s = env->GetStringUTFChars(js, nullptr); XBT_CRITICAL("%s", s); env->ReleaseStringUTFChars(js, s); } -static int java_main(int argc, char *argv[]); +static void java_main(int argc, char* argv[]); -JNIEXPORT void JNICALL -Java_org_simgrid_msg_Msg_deployApplication(JNIEnv * env, jclass cls, jstring jdeploymentFile) +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_deployApplication(JNIEnv* env, jclass, jstring jdeploymentFile) { - const char *deploymentFile = env->GetStringUTFChars(jdeploymentFile, 0); + const char* deploymentFile = env->GetStringUTFChars(jdeploymentFile, nullptr); - SIMIX_function_register_default(java_main); - MSG_launch_application(deploymentFile); + simgrid_register_default(java_main); + simgrid_load_deployment(deploymentFile); } JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_energyInit() { sg_host_energy_plugin_init(); } -SG_END_DECL() - +JNIEXPORT void JNICALL Java_org_simgrid_msg_Msg_loadInit() { + sg_host_load_plugin_init(); +} /** Run a Java org.simgrid.msg.Process * * If needed, this waits for the process starting time. @@ -256,19 +244,27 @@ static void run_jprocess(JNIEnv *env, jobject jprocess) // wait for the process's start time jfieldID jprocess_field_Process_startTime = jxbt_get_sfield(env, "org/simgrid/msg/Process", "startTime", "D"); jdouble startTime = env->GetDoubleField(jprocess, jprocess_field_Process_startTime); - if (startTime > MSG_get_clock()) - MSG_process_sleep(startTime - MSG_get_clock()); + if (startTime > simgrid_get_clock()) + simgrid::s4u::this_actor::sleep_for(startTime - simgrid_get_clock()); + //Execution of the "run" method. jmethodID id = jxbt_get_smethod(env, "org/simgrid/msg/Process", "run", "()V"); - xbt_assert((id != nullptr), "Method run() not found..."); + xbt_assert((id != nullptr), "Method Process.run() not found..."); + env->CallVoidMethod(jprocess, id); + if (env->ExceptionOccurred()) { + XBT_DEBUG("Something went wrong in this Java actor, forget about it."); + env->ExceptionClear(); + xbt_assert(__java_vm->DetachCurrentThread() == JNI_OK, "Cannot detach failing thread"); + simgrid::ForcefulKillException::do_throw(); + } } /** Create a Java org.simgrid.msg.Process with the arguments and run it */ -static int java_main(int argc, char *argv[]) +static void java_main(int argc, char* argv[]) { JNIEnv *env = get_current_thread_env(); - simgrid::kernel::context::JavaContext* context = static_cast(SIMIX_context_self()); + auto* context = static_cast(simgrid::kernel::context::Context::self()); //Change the "." in class name for "/". std::string arg0 = argv[0]; @@ -282,28 +278,27 @@ static int java_main(int argc, char *argv[]) //Retrieve the name of the process. jstring jname = env->NewStringUTF(argv[0]); //Build the arguments - jobjectArray args = static_cast(env->NewObjectArray(argc - 1, env->FindClass("java/lang/String"), - env->NewStringUTF(""))); + auto args = static_cast( + env->NewObjectArray(argc - 1, env->FindClass("java/lang/String"), env->NewStringUTF(""))); for (int i = 1; i < argc; i++) env->SetObjectArrayElement(args,i - 1, env->NewStringUTF(argv[i])); //Retrieve the host for the process. - jstring jhostName = env->NewStringUTF(MSG_host_self()->getCname()); + jstring jhostName = env->NewStringUTF(simgrid::s4u::Host::current()->get_cname()); jobject jhost = Java_org_simgrid_msg_Host_getByName(env, nullptr, jhostName); //creates the process jobject jprocess = env->NewObject(class_Process, constructor_Process, jhost, jname, args); xbt_assert((jprocess != nullptr), "Process allocation failed."); jprocess = env->NewGlobalRef(jprocess); //bind the process to the context - msg_process_t process = MSG_process_self(); + const_sg_actor_t actor = sg_actor_self(); - context->jprocess = jprocess; + context->jprocess_ = jprocess; /* sets the PID and the PPID of the process */ - env->SetIntField(jprocess, jprocess_field_Process_pid, static_cast(MSG_process_get_PID(process))); - env->SetIntField(jprocess, jprocess_field_Process_ppid, static_cast(MSG_process_get_PPID(process))); - jprocess_bind(jprocess, process, env); + env->SetIntField(jprocess, jprocess_field_Process_pid, static_cast(actor->get_pid())); + env->SetIntField(jprocess, jprocess_field_Process_ppid, static_cast(actor->get_ppid())); + jprocess_bind(jprocess, actor, env); - run_jprocess(env, context->jprocess); - return 0; + run_jprocess(env, context->jprocess_); } namespace simgrid { @@ -314,10 +309,12 @@ namespace context { void java_main_jprocess(jobject jprocess) { JNIEnv *env = get_current_thread_env(); - simgrid::kernel::context::JavaContext* context = static_cast(SIMIX_context_self()); - context->jprocess = jprocess; - jprocess_bind(context->jprocess, MSG_process_self(), env); + auto* context = static_cast(Context::self()); + context->jprocess_ = jprocess; + jprocess_bind(context->jprocess_, sg_actor_self(), env); - run_jprocess(env, context->jprocess); + run_jprocess(env, context->jprocess_); } -}}} +} // namespace context +} // namespace kernel +} // namespace simgrid