text: /*
   * Copyright (c) 2006, Oracle and/or its affiliates. All rights reserved.
   *
   * Redistribution and use in source and binary forms, with or without
   * modification, are permitted provided that the following conditions
   * are met:
   *
   *   - Redistributions of source code must retain the above copyright
   *     notice, this list of conditions and the following disclaimer.
   *
   *   - Redistributions in binary form must reproduce the above copyright
   *     notice, this list of conditions and the following disclaimer in the
   *     documentation and/or other materials provided with the distribution.
   *
   *   - Neither the name of Oracle nor the names of its
   *     contributors may be used to endorse or promote products derived
   *     from this software without specific prior written permission.
   *
   * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
   * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
   * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
   * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT OWNER OR
   * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
   * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
   * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
   * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
   * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
   * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
   * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
   */
  
  #include <memory.h>
  #include <stdlib.h>
  #include "jinvokerExp.h"
  
  static int g_nExitCode = 0;
  
  void system_exit(jint nCode){
      g_nExitCode = nCode;
  }
  
  /*
  Allocating and providing the JVM init argumets.
  By MakeJavaVMInitArgs() it is provided two options: providing CLASSPATH
  environment variable value and function java.lang.System.exit()
  redefinition in order to get the exit code.
  See the description of the JNI API in
  http://jre.sfbay/java/re/jdk/6/promoted/latest/docs/technotes/guides/jni/spec/invocation.html#wp9502
  */
  
  int MakeJavaVMInitArgs( void** ppArgs ){
  
      int nOptSize = 2;
      JavaVMInitArgs* pArgs    = new JavaVMInitArgs();
      JavaVMOption*   pOptions = new JavaVMOption[nOptSize];
  
      //provide CLASSPATH value to java.class.path
  
      char* szClassPath = getenv("CLASSPATH");
      if( szClassPath == NULL )
          szClassPath = ".";
  
      pOptions[0].optionString = new char[strlen("-Djava.class.path=")+
                                          strlen(szClassPath)+1];
      sprintf( pOptions[0].optionString, "-Djava.class.path=%s", szClassPath );
  
      //redefine java.lang.System.exit()
  
      pOptions[1].optionString = "exit";
      pOptions[1].extraInfo    = system_exit;
  
      //Fill the arguments
  
      memset(pArgs, 0, sizeof(JavaVMInitArgs));
      pArgs->version = 0x00010002;
      pArgs->options = pOptions;
      pArgs->nOptions = nOptSize;
      pArgs->ignoreUnrecognized = JNI_TRUE;
  
      *ppArgs = pArgs;
  
      return 0;
  }
  
  /*
  Free the allocated JVM init argumets
  */
  
  void FreeJavaVMInitArgs( void* pArgs ){
      delete ((JavaVMInitArgs*)pArgs)->options[0].optionString;
      delete ((JavaVMInitArgs*)pArgs)->options;
      delete pArgs;
  }
  
  /*
  Static wrapper on FindClass() JNI function.
  See the description in
  http://jre.sfbay/java/re/jdk/6/promoted/latest/docs/technotes/guides/jni/spec/functions.html#wp16027
  */
  
  int FindClass( JNIEnv*     pEnv,
                 const char* szClass,
                 jclass*     pClass ){
  
      *pClass = pEnv->FindClass( szClass );
  
      if(pEnv->ExceptionCheck() == JNI_TRUE){
          pEnv->ExceptionDescribe();
          return -1;
      }
      if(*pClass != NULL)
          return 0;
      else
          return -2;
  
  }
  
  /*
  Static wrapper on GetStaticMethodID() JNI function.
  See the description in
  http://jre.sfbay/java/re/jdk/6/promoted/latest/docs/technotes/guides/jni/spec/functions.html#wp20949
  */
  
  int GetStaticMethodID(JNIEnv*     pEnv,
                        jclass      pClass,
                        const char* szName,
                        const char* szArgs,
                        jmethodID*  pMid){
  
      *pMid = pEnv->GetStaticMethodID( pClass, szName, szArgs);
  
      if(pEnv->ExceptionCheck() == JNI_TRUE){
          pEnv->ExceptionDescribe();
          return -1;
      }
  
      if( *pMid != NULL )
          return 0;
      else
          return -2;
  }
  
  /*
  Static wrapper on NewObjectArray() JNI function.
  See the description in
  http://jre.sfbay/java/re/jdk/6/promoted/latest/docs/technotes/guides/jni/spec/functions.html#wp21619
  */
  
  int NewObjectArray( JNIEnv*       pEnv,
                      int           nDimension,
                      const char*   szType,
                      jobjectArray* pArray ){
  
      *pArray = pEnv->NewObjectArray( nDimension, pEnv->FindClass( szType ), NULL);
  
      if(pEnv->ExceptionCheck() == JNI_TRUE){
          pEnv->ExceptionDescribe();
          return -1;
      }
  
      if( pArray != NULL )
          return 0;
      else
          return -2;
  
  }
  
  /*
  Static wrapper on CallStaticVoidMethod() JNI function.
  See the description in
  http://jre.sfbay/java/re/jdk/6/promoted/latest/docs/technotes/guides/jni/spec/functions.html#wp4796
  */
  
  int CallStaticVoidMethod( JNIEnv*   pEnv,
                            jclass    pClass,
                            jmethodID pMid,
                            void*     pArgs){
  
      g_nExitCode = 0;
      pEnv->CallStaticVoidMethod( pClass, pMid, pArgs);
      if( pEnv->ExceptionCheck() == JNI_TRUE ){
          pEnv->ExceptionDescribe();
          return -1;
      }else
          return g_nExitCode;
  }
  
  /*
  Static wrapper on DestroyJavaVM() JNI function.
  See the description in
  http://jre.sfbay/java/re/jdk/6/promoted/latest/docs/technotes/guides/jni/spec/invocation.html#destroy_java_vm
  */
  
  int DestroyJavaVM( JavaVM* pJVM ){
      pJVM->DestroyJavaVM();
      return 0;
  }
  