src/bindings/java/jmsg_file.cpp

   1 /* Java bindings of the file API.                                           */
   2
   3 /* Copyright (c) 2012-2017. 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 "jmsg_file.h"
   9 #include "jxbt_utilities.hpp"
  10
  11 extern "C" {
  12
  13 void jfile_bind(JNIEnv *env, jobject jfile, msg_file_t fd) {
  14   env->SetLongField(jfile, jfile_field_bind, reinterpret_cast<std::intptr_t>(fd));
  15 }
  16
  17 msg_file_t jfile_get_native(JNIEnv *env, jobject jfile) {
  18   return reinterpret_cast<msg_file_t>(env->GetLongField(jfile, jfile_field_bind));
  19 }
  20
  21 JNIEXPORT void JNICALL Java_org_simgrid_msg_File_nativeInit(JNIEnv *env, jclass cls) {
  22   jclass class_File = env->FindClass("org/simgrid/msg/File");
  23   jfile_field_bind = jxbt_get_jfield(env , class_File, "bind", "J");
  24   xbt_assert((jfile_field_bind != nullptr), "Can't find 'bind' field in File class.");
  25 }
  26
  27 JNIEXPORT void JNICALL Java_org_simgrid_msg_File_open(JNIEnv *env, jobject jfile, jobject jpath) {
  28   const char *path = env->GetStringUTFChars((jstring) jpath, 0);
  29   msg_file_t file  = MSG_file_open(path, nullptr);
  30   jfile_bind(env, jfile, file);
  31
  32   env->ReleaseStringUTFChars(static_cast<jstring>(jpath), path);
  33 }
  34
  35 JNIEXPORT jlong JNICALL Java_org_simgrid_msg_File_read(JNIEnv *env, jobject jfile, jlong jsize) {
  36   msg_file_t file = jfile_get_native(env, jfile);
  37   return static_cast<jlong>(MSG_file_read(file, static_cast<sg_size_t>(jsize)));
  38 }
  39
  40 JNIEXPORT jlong JNICALL Java_org_simgrid_msg_File_write(JNIEnv *env, jobject jfile, jlong jsize) {
  41   msg_file_t file = jfile_get_native(env, jfile);
  42   return static_cast<jlong>(MSG_file_write(file, static_cast<sg_size_t>(jsize)));
  43 }
  44
  45 JNIEXPORT void JNICALL Java_org_simgrid_msg_File_seek(JNIEnv *env, jobject jfile, jlong offset, jlong origin) {
  46   msg_file_t file = jfile_get_native(env, jfile);
  47   MSG_file_seek(file, static_cast<sg_offset_t>(offset), static_cast<int>(origin));
  48 }
  49
  50 JNIEXPORT void JNICALL Java_org_simgrid_msg_File_close(JNIEnv *env, jobject jfile) {
  51   msg_file_t file = jfile_get_native(env, jfile);
  52
  53   MSG_file_close(file);
  54   jfile_bind(env, jfile, nullptr);
  55 }
  56 }