X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/b558f9b18c938af6a35ebea66ac2323a60178202..1283307f26e739e654d195f81cceee5ce1683d99:/simgrid-java/src/jmsg_rngstream.c diff --git a/simgrid-java/src/jmsg_rngstream.c b/simgrid-java/src/jmsg_rngstream.c deleted file mode 100644 index a51c4cc112..0000000000 --- a/simgrid-java/src/jmsg_rngstream.c +++ /dev/null @@ -1,135 +0,0 @@ -/* Functions related to the RngStream Java port */ - -/* Copyright (c) 2007-2012 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 "jmsg_rngstream.h" -#include "jxbt_utilities.h" - -jfieldID jrngstream_bind; - -RngStream jrngstream_to_native(JNIEnv *env, jobject jrngstream) { - RngStream rngstream = (RngStream) (*env)->GetLongField(env, jrngstream, jrngstream_bind); - if (!rngstream) { - jxbt_throw_notbound(env, "rngstream", jrngstream); - return NULL; - } - return rngstream; -} - -JNIEXPORT void JNICALL -Java_org_simgrid_msg_RngStream_nativeInit(JNIEnv *env, jclass cls) { - jclass class_RngStream = (*env)->FindClass(env, "org/simgrid/msg/RngStream"); - - jrngstream_bind = jxbt_get_jfield(env, class_RngStream, "bind", "J"); -} - -JNIEXPORT void JNICALL -Java_org_simgrid_msg_RngStream_create(JNIEnv *env, jobject jrngstream, jstring jname) { - const char *name = (*env)->GetStringUTFChars(env, jname, 0); - RngStream rngstream = RngStream_CreateStream(name); - //Bind the RngStream object - (*env)->SetLongField(env, jrngstream, jrngstream_bind, (jlong)rngstream); - - (*env)->ReleaseStringUTFChars(env, jname, name); -} -JNIEXPORT void JNICALL -Java_org_simgrid_msg_RngStream_destroy(JNIEnv *env, jobject jrngstream) { - RngStream rngstream = jrngstream_to_native(env, jrngstream); - RngStream_DeleteStream(&rngstream); - (*env)->SetLongField(env, jrngstream, jrngstream_bind, (jlong)NULL); -} -JNIEXPORT jboolean JNICALL -Java_org_simgrid_msg_RngStream_setPackageSeed(JNIEnv *env, jobject jrngstream, jintArray jseed) { - jint buffer[6]; - - (*env)->GetIntArrayRegion(env, jseed, 0, 6, buffer); - - RngStream rngstream = jrngstream_to_native(env, jrngstream); - if (!rngstream) - return JNI_FALSE; - - int result = RngStream_SetPackageSeed((unsigned long*)buffer); - - return result == -1 ? JNI_FALSE : JNI_TRUE; -} -JNIEXPORT void JNICALL -Java_org_simgrid_msg_RngStream_resetStart(JNIEnv *env, jobject jrngstream) { - RngStream rngstream = jrngstream_to_native(env, jrngstream); - if (!rngstream) - return; - - RngStream_ResetStartStream(rngstream); -} -JNIEXPORT void JNICALL -Java_org_simgrid_msg_RngStream_resetStartSubstream(JNIEnv *env, jobject jrngstream) { - RngStream rngstream = jrngstream_to_native(env, jrngstream); - if (!rngstream) - return; - - RngStream_ResetStartSubstream(rngstream); -} -JNIEXPORT void JNICALL -Java_org_simgrid_msg_RngStream_resetNextSubstream(JNIEnv *env, jobject jrngstream) { - RngStream rngstream = jrngstream_to_native(env, jrngstream); - if (!rngstream) - return; - - RngStream_ResetNextSubstream(rngstream); -} -JNIEXPORT void JNICALL -Java_org_simgrid_msg_RngStream_setAntithetic(JNIEnv *env, jobject jrngstream, jboolean ja) { - RngStream rngstream = jrngstream_to_native(env, jrngstream); - if (!rngstream) - return; - - if (ja == JNI_TRUE) { - RngStream_SetAntithetic(rngstream,-1); - } - else { - RngStream_SetAntithetic(rngstream,0); - } -} -JNIEXPORT jboolean JNICALL -Java_org_simgrid_msg_RngStream_setSeed(JNIEnv *env, jobject jrngstream, jintArray jseed) { - jint buffer[6]; - - (*env)->GetIntArrayRegion(env, jseed, 0, 6, buffer); - - RngStream rngstream = jrngstream_to_native(env, jrngstream); - if (!rngstream) - return JNI_FALSE; - - - int result = RngStream_SetSeed(rngstream, (unsigned long*)buffer); - - return result == -1 ? JNI_FALSE : JNI_TRUE; -} -JNIEXPORT void JNICALL -Java_org_simgrid_msg_RngStream_advanceState(JNIEnv *env, jobject jrngstream, jint e, jint g) { - RngStream rngstream = jrngstream_to_native(env, jrngstream); - if (!rngstream) - return; - - RngStream_AdvanceState(rngstream, (long)e, (long)g); -} -JNIEXPORT jdouble JNICALL -Java_org_simgrid_msg_RngStream_randU01(JNIEnv *env, jobject jrngstream) { - RngStream rngstream = jrngstream_to_native(env, jrngstream); - if (!rngstream) - return 0; - - return (jdouble)RngStream_RandU01(rngstream); -} -JNIEXPORT jint JNICALL -Java_org_simgrid_msg_RngStream_randInt(JNIEnv *env, jobject jrngstream, jint i, jint j) { - RngStream rngstream = jrngstream_to_native(env, jrngstream); - if (!rngstream) - return 0; - - return (jint)RngStream_RandInt(rngstream, (int)i, (int)j); -}