/* * File: sidl_BaseClass_jniStub.c * Symbol: sidl.BaseClass-v0.9.1 * Symbol Type: class * Babel Version: 0.10.2 * Release: $Name: $ * Revision: @(#) $Id: $ * Description: Client-side JNI glue code for sidl.BaseClass * * Copyright (c) 2000-2002, The Regents of the University of California. * Produced at the Lawrence Livermore National Laboratory. * Written by the Components Team * All rights reserved. * * This file is part of Babel. For more information, see * http://www.llnl.gov/CASC/components/. Please read the COPYRIGHT file * for Our Notice and the LICENSE file for the GNU Lesser General Public * License. * * This program is free software; you can redistribute it and/or modify it * under the terms of the GNU Lesser General Public License (as published by * the Free Software Foundation) version 2.1 dated February 1999. * * This program is distributed in the hope that it will be useful, but * WITHOUT ANY WARRANTY; without even the IMPLIED WARRANTY OF * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the terms and * conditions of the GNU Lesser General Public License for more details. * * You should have recieved a copy of the GNU Lesser General Public License * along with this program; if not, write to the Free Software Foundation, * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * WARNING: Automatically generated; changes will be lost * * babel-version = 0.10.2 */ #include "sidl_Java.h" #include "sidl_Loader.h" #include "sidl_String.h" #include "sidl_BaseClass_IOR.h" #include "babel_config.h" /* * Convert between jlong and void* pointers. */ #if (SIZEOF_VOID_P == 8) #define JLONG_TO_POINTER(x) ((void*)(x)) #define POINTER_TO_JLONG(x) ((jlong)(x)) #else #define JLONG_TO_POINTER(x) ((void*)(int32_t)(x)) #define POINTER_TO_JLONG(x) ((jlong)(int32_t)(x)) #endif #ifndef NULL #define NULL 0 #endif /* * Function to extract IOR reference from the Java object. */ static struct sidl_BaseClass__object* _get_ior( JNIEnv* env, jobject obj) { void* ptr = NULL; static jmethodID mid = (jmethodID) NULL; if (mid == (jmethodID) NULL) { jclass cls = (*env)->GetObjectClass(env, obj); mid = (*env)->GetMethodID(env, cls, "_get_ior", "()J"); (*env)->DeleteLocalRef(env, cls); } ptr = JLONG_TO_POINTER((*env)->CallLongMethod(env, obj, mid)); return (struct sidl_BaseClass__object*) ptr; } /* * External reference to IOR methods. */ static const struct sidl_BaseClass__external* s_external = NULL; /* * Create object instance and return reference. */ static jlong jni__create_ior( JNIEnv* env, jclass cls) { (void) env; (void) cls; return POINTER_TO_JLONG((*s_external->createObject)()); } /* *

* Add one to the intrinsic reference count in the underlying object. * Object in sidl have an intrinsic reference count. * Objects continue to exist as long as the reference count is * positive. Clients should call this method whenever they * create another ongoing reference to an object or interface. *

*

* This does not have a return value because there is no language * independent type that can refer to an interface or a * class. *

*/ static void jni_addRef( JNIEnv* env, jobject obj) { /* * Declare return and temporary variables. */ struct sidl_BaseClass__object* _ior = NULL; /* * Preprocess Java types and convert into IOR. */ _ior = _get_ior(env, obj); /* * Call the IOR method through the EPV. */ (*(_ior->d_epv->f_addRef))( _ior); /* * Postprocess OUT, INOUT, returns, and exceptions. */ } /* * Decrease by one the intrinsic reference count in the underlying * object, and delete the object if the reference is non-positive. * Objects in sidl have an intrinsic reference count. * Clients should call this method whenever they remove a * reference to an object or interface. */ static void jni_deleteRef( JNIEnv* env, jobject obj) { /* * Declare return and temporary variables. */ struct sidl_BaseClass__object* _ior = NULL; /* * Preprocess Java types and convert into IOR. */ _ior = _get_ior(env, obj); /* * Call the IOR method through the EPV. */ (*(_ior->d_epv->f_deleteRef))( _ior); /* * Postprocess OUT, INOUT, returns, and exceptions. */ } /* * Return true if and only if obj refers to the same * object as this object. */ static jboolean jni_isSame( JNIEnv* env, jobject obj, jobject _arg_iobj) { /* * Declare return and temporary variables. */ struct sidl_BaseClass__object* _ior = NULL; struct sidl_BaseInterface__object* _tmp_iobj = (struct sidl_BaseInterface__object*) NULL; sidl_bool _ior_res = FALSE; jboolean _res = JNI_FALSE; /* * Preprocess Java types and convert into IOR. */ _ior = _get_ior(env, obj); _tmp_iobj = (struct sidl_BaseInterface__object*) sidl_Java_J2I_ifc(env, _arg_iobj, "sidl.BaseInterface"); /* * Call the IOR method through the EPV. */ _ior_res = (*(_ior->d_epv->f_isSame))( _ior, _tmp_iobj); /* * Postprocess OUT, INOUT, returns, and exceptions. */ _res = (jboolean) _ior_res; return _res; } /* * Check whether the object can support the specified interface or * class. If the sidl type name in name * is supported, then a reference to that object is returned with the * reference count incremented. The callee will be responsible for * calling deleteRef on the returned object. If * the specified type is not supported, then a null reference is * returned. */ static jobject jni_queryInt( JNIEnv* env, jobject obj, jstring _arg_name) { /* * Declare return and temporary variables. */ struct sidl_BaseClass__object* _ior = NULL; char* _tmp_name = (char*) NULL; struct sidl_BaseInterface__object* _ior_res = (struct sidl_BaseInterface__object*) NULL; jobject _res = (jobject) NULL; /* * Preprocess Java types and convert into IOR. */ _ior = _get_ior(env, obj); _tmp_name = sidl_Java_J2I_string(env, _arg_name); /* * Call the IOR method through the EPV. */ _ior_res = (*(_ior->d_epv->f_queryInt))( _ior, _tmp_name); /* * Postprocess OUT, INOUT, returns, and exceptions. */ sidl_String_free(_tmp_name); _res = sidl_Java_I2J_ifc(env, _ior_res, "sidl.BaseInterface"); return _res; } /* * Return whether this object is an instance of the specified type. * The string name must be the sidl type name. This * routine will return true if and only if a cast to * the string type name would succeed. */ static jboolean jni_isType( JNIEnv* env, jobject obj, jstring _arg_name) { /* * Declare return and temporary variables. */ struct sidl_BaseClass__object* _ior = NULL; char* _tmp_name = (char*) NULL; sidl_bool _ior_res = FALSE; jboolean _res = JNI_FALSE; /* * Preprocess Java types and convert into IOR. */ _ior = _get_ior(env, obj); _tmp_name = sidl_Java_J2I_string(env, _arg_name); /* * Call the IOR method through the EPV. */ _ior_res = (*(_ior->d_epv->f_isType))( _ior, _tmp_name); /* * Postprocess OUT, INOUT, returns, and exceptions. */ sidl_String_free(_tmp_name); _res = (jboolean) _ior_res; return _res; } /* * Return the meta-data about the class implementing this interface. */ static jobject jni_getClassInfo( JNIEnv* env, jobject obj) { /* * Declare return and temporary variables. */ struct sidl_BaseClass__object* _ior = NULL; struct sidl_ClassInfo__object* _ior_res = (struct sidl_ClassInfo__object*) NULL; jobject _res = (jobject) NULL; /* * Preprocess Java types and convert into IOR. */ _ior = _get_ior(env, obj); /* * Call the IOR method through the EPV. */ _ior_res = (*(_ior->d_epv->f_getClassInfo))( _ior); /* * Postprocess OUT, INOUT, returns, and exceptions. */ _res = sidl_Java_I2J_ifc(env, _ior_res, "sidl.ClassInfo"); return _res; } /* * Register JNI methods with the Java JVM. */ void sidl_BaseClass__register(JNIEnv* env) { JNINativeMethod methods[7]; jclass cls; s_external = sidl_BaseClass__externals(); methods[0].name = "_create_ior"; methods[0].signature = "()J"; methods[0].fnPtr = (void *)jni__create_ior; methods[1].name = "addRef"; methods[1].signature = "()V"; methods[1].fnPtr = (void *)jni_addRef; methods[2].name = "deleteRef"; methods[2].signature = "()V"; methods[2].fnPtr = (void *)jni_deleteRef; methods[3].name = "isSame"; methods[3].signature = "(Lsidl/BaseInterface;)Z"; methods[3].fnPtr = (void *)jni_isSame; methods[4].name = "queryInt"; methods[4].signature = "(Ljava/lang/String;)Lsidl/BaseInterface;"; methods[4].fnPtr = (void *)jni_queryInt; methods[5].name = "isType"; methods[5].signature = "(Ljava/lang/String;)Z"; methods[5].fnPtr = (void *)jni_isType; methods[6].name = "getClassInfo"; methods[6].signature = "()Lsidl/ClassInfo;"; methods[6].fnPtr = (void *)jni_getClassInfo; cls = (*env)->FindClass(env, "sidl/BaseClass"); if (cls) { (*env)->RegisterNatives(env, cls, methods, 7); (*env)->DeleteLocalRef(env, cls); } }