#include <jni.h>
#include <stdlib.h>
#include <dlfcn.h>

main() {
JNIEnv *env;
JavaVM *jvm;
JavaVMInitArgs vm_args;
JavaVMOption options[5];
jint res;
jclass cls;
jmethodID mid;
jstring jstr;
jobjectArray args;
char classpath[1024];

vm_args.version = 0x00010004;
vm_args.options = options;
vm_args.nOptions = 5;
vm_args.ignoreUnrecognized = JNI_FALSE;

options[0].optionString = "-Xms4M";
options[1].optionString = "-Xmx64M";
options[2].optionString = "-Xss512K";
options[3].optionString = "-Xoss400K";
options[4].optionString = "-Djava.class.path=.";


void* lib_handle = 0;
void* (*lib_func)() = 0;
lib_handle = dlopen("/opt/IBMJava2-ppc64-
142/jre/bin/classic/libjvm.so", RTLD_NOW);
if (!lib_handle)
{
fprintf(stderr, "dlopen failed\n");
goto destroy;
}

lib_func = (void*(*)())dlsym(lib_handle,
"JNI_GetDefaultJavaVMInitArgs");

lib_func(&vm_args);

lib_func = (void*(*)())dlsym(lib_handle, "JNI_CreateJavaVM");
lib_func(&jvm,&env,&vm_args);

cls = (*env)->FindClass(env, "Prog");
if (cls == 0) {
fprintf(stderr, "Can't find Prog class\n");
goto destroy;
}

mid = (*env)->GetStaticMethodID(env, cls, "main",
"([Ljava/lang/String;)V");
if (mid == 0) {
fprintf(stderr, "Can't find Prog.main\n");
goto destroy;
}

jstr = (*env)->NewStringUTF(env, " from C!");
if (jstr == 0) {
fprintf(stderr, "Out of memory\n");
goto destroy;
}
args = (*env)->NewObjectArray(env, 1,
(*env)->FindClass(env, "java/lang/String"), jstr);
if (args == 0) {
fprintf(stderr, "Out of memory\n");
goto destroy;
}
(*env)->CallStaticVoidMethod(env, cls, mid, args);

destroy:
if ((*env)->ExceptionOccurred(env)) {
(*env)->ExceptionDescribe(env);
}

(*jvm)->DestroyJavaVM(jvm);
}