src/bindings/java/jtrace.cpp

   1 /* Java Wrappers to the TRACE API.                                           */
   2
   3 /* Copyright (c) 2012-2015. The SimGrid Team.
   4  * All rights reserved.                                                     */
   5
   6 /* This program is free software; you can redistribute it and/or modify it
   7  * under the terms of the license (GNU LGPL) which comes with this package. */
   8
   9 // Please note, this file strongly relies on the jmsg.cpp,
  10 // It will be great that a JNI expert gives a look to validate it - Adrien ;)
  11
  12 #include "jtrace.h"
  13 #include <simgrid/instr.h>
  14
  15 /* Shut up some errors in eclipse online compiler. I wish such a pimple wouldn't be needed */
  16 #ifndef JNIEXPORT
  17 #define JNIEXPORT
  18 #endif
  19 #ifndef JNICALL
  20 #define JNICALL
  21 #endif
  22 /* end of eclipse-mandated pimple */
  23
  24 // Define a new category
  25 XBT_LOG_NEW_DEFAULT_CATEGORY (jtrace, "TRACE for Java(TM)");
  26
  27 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_hostStateDeclare(JNIEnv * env, jclass cls, jstring js)
  28 {
  29   const char *s = env->GetStringUTFChars(js, 0);
  30   TRACE_host_state_declare(s);
  31   env->ReleaseStringUTFChars(js, s);
  32 }
  33
  34 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_hostStateDeclareValue (JNIEnv *env, jclass cls, jstring js_state,
  35                                                                            jstring js_value, jstring js_color)
  36 {
  37   const char *state = env->GetStringUTFChars(js_state, 0);
  38   const char *value = env->GetStringUTFChars(js_value, 0);
  39   const char *color = env->GetStringUTFChars(js_color, 0);
  40
  41   TRACE_host_state_declare_value(state, value, color);
  42
  43   env->ReleaseStringUTFChars(js_state, state);
  44   env->ReleaseStringUTFChars(js_value, value);
  45   env->ReleaseStringUTFChars(js_color, color);
  46 }
  47
  48 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_hostSetState (JNIEnv *env, jclass cls, jstring js_host,
  49                                                                   jstring js_state, jstring js_value)
  50 {
  51   const char *host = env->GetStringUTFChars(js_host, 0);
  52   const char *state = env->GetStringUTFChars(js_state, 0);
  53   const char *value = env->GetStringUTFChars(js_value, 0);
  54
  55   TRACE_host_set_state(host, state, value);
  56
  57   env->ReleaseStringUTFChars(js_host, host);
  58   env->ReleaseStringUTFChars(js_state, state);
  59   env->ReleaseStringUTFChars(js_value, value);
  60 }
  61
  62 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_hostPushState (JNIEnv *env, jclass cls, jstring js_host,
  63                                                                    jstring js_state, jstring js_value)
  64 {
  65   const char *host = env->GetStringUTFChars(js_host, 0);
  66   const char *state = env->GetStringUTFChars(js_state, 0);
  67   const char *value = env->GetStringUTFChars(js_value, 0);
  68
  69   TRACE_host_push_state(host, state, value);
  70
  71   env->ReleaseStringUTFChars(js_host, host);
  72   env->ReleaseStringUTFChars(js_state, state);
  73   env->ReleaseStringUTFChars(js_value, value);
  74 }
  75
  76 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_hostPopState (JNIEnv *env, jclass cls, jstring js_host,
  77                                                                   jstring js_state)
  78 {
  79   const char *host = env->GetStringUTFChars(js_host, 0);
  80   const char *state = env->GetStringUTFChars(js_state, 0);
  81
  82   TRACE_host_pop_state(host, state);
  83
  84   env->ReleaseStringUTFChars(js_host, host);
  85   env->ReleaseStringUTFChars(js_state, state);
  86 }
  87
  88 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_hostVariableDeclare (JNIEnv *env, jclass cls, jstring js_state)
  89 {
  90   const char *state = env->GetStringUTFChars(js_state, 0);
  91
  92   TRACE_host_variable_declare(state);
  93
  94   env->ReleaseStringUTFChars(js_state, state);
  95 }
  96
  97 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_hostVariableSet (JNIEnv *env, jclass cls, jstring js_host,
  98                                                                      jstring js_state, jdouble value)
  99 {
 100   const char *host = env->GetStringUTFChars(js_host, 0);
 101   const char *state = env->GetStringUTFChars(js_state, 0);
 102
 103   TRACE_host_variable_set(host, state, value);
 104
 105   env->ReleaseStringUTFChars(js_host, host);
 106   env->ReleaseStringUTFChars(js_state, state);
 107 }
 108
 109 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_hostVariableSub (JNIEnv *env, jclass cls, jstring js_host,
 110                                                                      jstring js_state, jdouble value)
 111 {
 112   const char *host = env->GetStringUTFChars(js_host, 0);
 113   const char *state = env->GetStringUTFChars(js_state, 0);
 114
 115   TRACE_host_variable_sub(host, state, value);
 116
 117   env->ReleaseStringUTFChars(js_host, host);
 118   env->ReleaseStringUTFChars(js_state, state);
 119 }
 120
 121 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_vmVariableDeclare (JNIEnv *env, jclass cls, jstring js_state)
 122 {
 123   const char *state = env->GetStringUTFChars(js_state, 0);
 124
 125   TRACE_vm_variable_declare(state);
 126
 127   env->ReleaseStringUTFChars(js_state, state);
 128 }
 129
 130 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_vmVariableSet (JNIEnv *env, jclass cls, jstring js_vm,
 131                                                                    jstring js_state, jdouble value)
 132 {
 133   const char *vm = env->GetStringUTFChars(js_vm, 0);
 134   const char *state = env->GetStringUTFChars(js_state, 0);
 135
 136   TRACE_vm_variable_set(vm, state, value);
 137
 138   env->ReleaseStringUTFChars(js_vm, vm);
 139   env->ReleaseStringUTFChars(js_state, state);
 140 }
 141
 142 JNIEXPORT void JNICALL Java_org_simgrid_trace_Trace_hostVariableAdd (JNIEnv *env, jclass cls, jstring js_host,
 143                                                                      jstring js_state, jdouble value)
 144 {
 145   const char *host = env->GetStringUTFChars(js_host, 0);
 146   const char *state = env->GetStringUTFChars(js_state, 0);
 147
 148   TRACE_host_variable_set(host, state, value);
 149
 150   env->ReleaseStringUTFChars(js_host, host);
 151   env->ReleaseStringUTFChars(js_state, state);
 152 }