libjava/jni/classpath/jnilink.c

   1 /* JNILINK 1.1: JNI version.
   2    Copyright (C) 1998 Free Software Foundation, Inc.
   3
   4 This file is part of GNU Classpath.
   5
   6 GNU Classpath is free software; you can redistribute it and/or modify
   7 it under the terms of the GNU General Public License as published by
   8 the Free Software Foundation; either version 2, or (at your option)
   9 any later version.
  10
  11 GNU Classpath is distributed in the hope that it will be useful, but
  12 WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 General Public License for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with GNU Classpath; see the file COPYING.  If not, write to the
  18 Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  19 02111-1307 USA.
  20
  21 Linking this library statically or dynamically with other modules is
  22 making a combined work based on this library.  Thus, the terms and
  23 conditions of the GNU General Public License cover the whole
  24 combination.
  25
  26 As a special exception, the copyright holders of this library give you
  27 permission to link this library with independent modules to produce an
  28 executable, regardless of the license terms of these independent
  29 modules, and to copy and distribute the resulting executable under
  30 terms of your choice, provided that you also meet, for each linked
  31 independent module, the terms and conditions of the license of that
  32 module.  An independent module is a module which is not derived from
  33 or based on this library.  If you modify this library, you may extend
  34 this exception to your version of the library, but you are not
  35 obligated to do so.  If you do not wish to do so, delete this
  36 exception statement from your version. */
  37
  38
  39 #include "jnilink.h"
  40 #include <string.h>
  41 #include <jcl.h>
  42
  43 #include <malloc.h>
  44
  45 #define GETCLASS(c) *(jclass*)(c)
  46
  47 JNIEXPORT jclass JNICALL
  48 LINK_RelinkClass     (JNIEnv * env, linkedClass * c, char * name) {
  49         jclass found;
  50         LINK_UnlinkClass(env,*c);
  51
  52         found = (*env)->FindClass(env,name);
  53         if(found == NULL)
  54                 return NULL;
  55
  56         *c = JCL_malloc(env,sizeof(jclass));
  57         if(*c == NULL)
  58                 return NULL;
  59
  60         GETCLASS(*c) = (*env)->NewGlobalRef(env,found);
  61         return GETCLASS(*c);
  62 }
  63
  64 JNIEXPORT jclass JNICALL
  65 LINK_RelinkKnownClass(JNIEnv * env, linkedClass * c, jclass newClass) {
  66         LINK_UnlinkClass(env,*c);
  67
  68         *c = JCL_malloc(env,sizeof(jclass));
  69         if(*c == NULL)
  70                 return NULL;
  71
  72         GETCLASS(*c) = (*env)->NewGlobalRef(env,newClass);
  73         return newClass;
  74 }
  75
  76 JNIEXPORT jmethodID JNICALL
  77 LINK_RelinkMethod      (JNIEnv * env, jmethodID * m, linkedClass c,
  78                         char * name, char * sig) {
  79         *m = (*env)->GetMethodID(env,GETCLASS(c),name,sig);
  80         return *m;
  81 }
  82
  83 JNIEXPORT jmethodID JNICALL
  84 LINK_RelinkStaticMethod(JNIEnv * env, jmethodID * m, linkedClass c,
  85                         char * name, char * sig) {
  86         *m = (*env)->GetStaticMethodID(env,GETCLASS(c),name,sig);
  87         return *m;
  88 }
  89
  90 JNIEXPORT jfieldID JNICALL
  91 LINK_RelinkField       (JNIEnv * env, jfieldID * f, linkedClass c,
  92                         char * name, char * sig) {
  93         *f = (*env)->GetFieldID(env,GETCLASS(c),name,sig);
  94         return *f;
  95 }
  96
  97 JNIEXPORT jfieldID JNICALL
  98 LINK_RelinkStaticField (JNIEnv * env, jfieldID * f, linkedClass c,
  99                         char * name, char * sig) {
 100         *f = (*env)->GetStaticFieldID(env,GETCLASS(c),name,sig);
 101         return *f;
 102 }
 103
 104
 105 /* These are for when the class referencing the symbols is unloaded; it
 106 destroys any object references
 107  * the linker might have kept around.
 108  */
 109 JNIEXPORT void JNICALL LINK_UnlinkClass       (JNIEnv * env, linkedClass * c) {
 110         if(*c != NULL) {
 111                 if(GETCLASS(*c) != NULL)
 112                         (*env)->DeleteGlobalRef(env,GETCLASS(*c));
 113                 JCL_free(env,*c);
 114                 *c = NULL;
 115         }
 116 }
 117