src/java/jmsg_task.c

   1 /*
   2  * $Id$
   3  *
   4  * Copyright 2006,2007 Martin Quinson, Malek Cherier All right 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  * This contains the implementation of the functions in relation with the java
  10  * task instance.
  11  */
  12
  13 #include "jmsg.h"
  14 #include "jmsg_task.h"
  15 #include "jxbt_utilities.h"
  16
  17 jobject
  18 jtask_new_global_ref(jobject jtask,JNIEnv* env) {
  19   return (*env)->NewGlobalRef(env,jtask);
  20 }
  21
  22 void
  23 jtask_delete_global_ref(jobject jtask,JNIEnv* env) {
  24   (*env)->DeleteGlobalRef(env,jtask);
  25 }
  26
  27 void
  28 jtask_bind(jobject jtask,m_task_t task,JNIEnv* env) {
  29   jfieldID id = jxbt_get_sfield(env,"simgrid/msg/Task","bind", "J");
  30
  31   if(!id)
  32     return;
  33
  34   (*env)->SetLongField(env,jtask,id,(jlong)(long)(task));
  35 }
  36
  37 m_task_t
  38 jtask_to_native_task(jobject jtask,JNIEnv* env) {
  39   jfieldID id = jxbt_get_sfield(env,"simgrid/msg/Task","bind", "J");
  40
  41   if(!id)
  42     return NULL;
  43
  44   return (m_task_t)(long)(*env)->GetLongField(env,jtask,id);
  45 }
  46
  47 jboolean
  48 jtask_is_valid(jobject jtask,JNIEnv* env) {
  49   jfieldID id = jxbt_get_sfield(env,"simgrid/msg/Task","bind", "J");
  50
  51   if(!id)
  52     return JNI_FALSE;
  53
  54   return (*env)->GetLongField(env,jtask,id) ? JNI_TRUE : JNI_FALSE;
  55 }