src/bindings/java/jmsg_synchro.c

   1 /* Functions exporting the simgrid synchronization mechanisms to the Java world */
   2
   3 /* Copyright (c) 2012. The SimGrid Team. All rights reserved.                   */
   4
   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.    */
   7
   8 #include "xbt/synchro_core.h"
   9 #include "jmsg_synchro.h"
  10 #include "jxbt_utilities.h"
  11
  12 XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(jmsg);
  13
  14 static jfieldID jsyncro_field_Mutex_bind;
  15
  16 JNIEXPORT void JNICALL
  17 Java_org_simgrid_msg_Mutex_nativeInit(JNIEnv *env, jclass cls) {
  18   jsyncro_field_Mutex_bind = jxbt_get_sfield(env, "org/simgrid/msg/Mutex", "bind", "J");
  19   if (!jsyncro_field_Mutex_bind) {
  20     jxbt_throw_native(env,bprintf("Can't find some fields in Java class. You should report this bug."));
  21   }
  22 }
  23 JNIEXPORT void JNICALL
  24 Java_org_simgrid_msg_Mutex_init(JNIEnv * env, jobject obj) {
  25   xbt_mutex_t mutex = xbt_mutex_init();
  26
  27   (*env)->SetLongField(env, obj, jsyncro_field_Mutex_bind, (jlong) (long) (mutex));
  28 }
  29
  30 JNIEXPORT void JNICALL
  31 Java_org_simgrid_msg_Mutex_acquire(JNIEnv * env, jobject obj) {
  32   xbt_mutex_t mutex;
  33
  34   mutex = (xbt_mutex_t) (long) (*env)->GetLongField(env, obj, jsyncro_field_Mutex_bind);
  35   xbt_ex_t e;
  36   TRY {
  37     xbt_mutex_acquire(mutex);
  38   }
  39   CATCH(e) {
  40     xbt_ex_free(e);
  41   }
  42 }
  43
  44 JNIEXPORT void JNICALL
  45 Java_org_simgrid_msg_Mutex_release(JNIEnv * env, jobject obj) {
  46   xbt_mutex_t mutex;
  47
  48   mutex = (xbt_mutex_t) (long) (*env)->GetLongField(env, obj, jsyncro_field_Mutex_bind);
  49   xbt_mutex_release(mutex);
  50 }
  51
  52 JNIEXPORT void JNICALL
  53 Java_org_simgrid_msg_Mutex_exit(JNIEnv * env, jobject obj) {
  54   xbt_mutex_t mutex;
  55
  56   mutex = (xbt_mutex_t) (long) (*env)->GetLongField(env, obj, jsyncro_field_Mutex_bind);
  57   xbt_mutex_destroy(mutex);
  58 }
  59
  60 static jfieldID jsyncro_field_Semaphore_bind;
  61
  62 JNIEXPORT void JNICALL
  63 Java_org_simgrid_msg_Semaphore_nativeInit(JNIEnv *env, jclass cls) {
  64   jsyncro_field_Semaphore_bind = jxbt_get_sfield(env, "org/simgrid/msg/Semaphore", "bind", "J");
  65   if (!jsyncro_field_Semaphore_bind) {
  66     jxbt_throw_native(env,bprintf("Can't find some fields in Semaphore Java class. You should report this bug."));
  67   }
  68 }
  69 JNIEXPORT void JNICALL
  70 Java_org_simgrid_msg_Semaphore_init(JNIEnv * env, jobject obj, jint capacity) {
  71   msg_sem_t sem = MSG_sem_init((int) capacity);
  72
  73   (*env)->SetLongField(env, obj, jsyncro_field_Semaphore_bind, (jlong) (long) (sem));
  74 }
  75
  76
  77 JNIEXPORT void JNICALL
  78 Java_org_simgrid_msg_Semaphore_acquire(JNIEnv * env, jobject obj, jdouble timeout) {
  79   msg_sem_t sem;
  80
  81   sem = (msg_sem_t) (long) (*env)->GetLongField(env, obj, jsyncro_field_Semaphore_bind);
  82   msg_error_t res = MSG_sem_acquire_timeout(sem, (double) timeout);
  83   jmsg_throw_status(env, res);
  84 }
  85 JNIEXPORT void JNICALL
  86 Java_org_simgrid_msg_Semaphore_release(JNIEnv * env, jobject obj) {
  87   msg_sem_t sem;
  88
  89   sem = (msg_sem_t) (long) (*env)->GetLongField(env, obj, jsyncro_field_Semaphore_bind);
  90   MSG_sem_release(sem);
  91 }
  92 JNIEXPORT jboolean JNICALL
  93 Java_org_simgrid_msg_Semaphore_wouldBlock(JNIEnv * env, jobject obj) {
  94   msg_sem_t sem;
  95
  96   sem = (msg_sem_t) (long) (*env)->GetLongField(env, obj, jsyncro_field_Semaphore_bind);
  97   int res = MSG_sem_would_block(sem);
  98   return (jboolean) res;
  99 }
 100
 101 JNIEXPORT void JNICALL
 102 Java_org_simgrid_msg_Mutex_destroy(JNIEnv * env, jobject obj) {
 103   msg_sem_t sem;
 104
 105   sem = (msg_sem_t) (long) (*env)->GetLongField(env, obj, jsyncro_field_Semaphore_bind);
 106   MSG_sem_destroy(sem);
 107 }