src/native/vm/cldc1.1/com_sun_cldchi_jvm_JVM.c

   1 /* src/native/vm/cldc1.1/com_sun_cldchi_jvm_JVM.c
   2
   3    Copyright (C) 2007, 2008
   4    CACAOVM - Verein zur Foerderung der freien virtuellen Maschine CACAO
   5
   6    This file is part of CACAO.
   7
   8    This program is free software; you can redistribute it and/or
   9    modify it under the terms of the GNU General Public License as
  10    published by the Free Software Foundation; either version 2, or (at
  11    your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful, but
  14    WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16    General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program; if not, write to the Free Software
  20    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  21    02110-1301, USA.
  22
  23 */
  24
  25
  26 #include "config.h"
  27 #include "vm/types.h"
  28
  29 #include "native/jni.h"
  30 #include "native/native.h"
  31
  32 #include "native/include/java_lang_String.h"
  33
  34 #include "native/include/com_sun_cldchi_jvm_JVM.h"
  35
  36 #include "vm/exceptions.hpp"
  37 #include "vm/string.hpp"
  38
  39
  40 /* native methods implemented by this file ************************************/
  41
  42 static JNINativeMethod methods[] = {
  43         { "loadLibrary", "(Ljava/lang/String;)V", (void *) (ptrint) &Java_com_sun_cldchi_jvm_JVM_loadLibrary },
  44 };
  45
  46
  47 /* _Jv_com_sun_cldchi_jvm_JVM_init *********************************************
  48
  49    Register native functions.
  50
  51 *******************************************************************************/
  52
  53 void _Jv_com_sun_cldchi_jvm_JVM_init(void)
  54 {
  55         utf *u;
  56
  57         u = utf_new_char("com/sun/cldchi/jvm/JVM");
  58
  59         native_method_register(u, methods, NATIVE_METHODS_COUNT);
  60 }
  61
  62
  63 /*
  64  * Class:     com/sun/cldchi/jvm/JVM
  65  * Method:    loadLibrary
  66  * Signature: (Ljava/lang/String;)V
  67  */
  68 JNIEXPORT void JNICALL Java_com_sun_cldchi_jvm_JVM_loadLibrary(JNIEnv *env, jclass clazz, java_lang_String *libName)
  69 {
  70         int  result;
  71         utf *name;
  72
  73         /* REMOVEME When we use Java-strings internally. */
  74
  75         if (libName == NULL) {
  76                 exceptions_throw_nullpointerexception();
  77                 return;
  78         }
  79
  80         name = javastring_toutf((java_handle_t *) libName, false);
  81
  82         result = native_library_load(env, name, NULL);
  83
  84         /* Check for error and throw an exception in case. */
  85
  86         if (result == 0) {
  87                 exceptions_throw_unsatisfiedlinkerror(name);
  88         }
  89 }
  90
  91
  92 /*
  93  * These are local overrides for various environment variables in Emacs.
  94  * Please do not remove this and leave it at the end of the file, where
  95  * Emacs will automagically detect them.
  96  * ---------------------------------------------------------------------
  97  * Local variables:
  98  * mode: c
  99  * indent-tabs-mode: t
 100  * c-basic-offset: 4
 101  * tab-width: 4
 102  * End:
 103  * vim:noexpandtab:sw=4:ts=4:
 104  */