Hi all,
I'm working on callbacks to Perl in Inline::Java. I need to define a
C function that Java will call, that in turn will call a perl sub.
Can anyone give me a hand with this:
Heres my function:
-----8<-----
JNIEXPORT jstring JNICALL Java_InlineJavaServer_jni_1callback(
JNIEnv *env, jobject obj, jstring cmd){
jstring resp = NULL ;
char *c = NULL ;
char *r = NULL ;
c = (char *)((*(env))->GetStringUTFChars(env, cmd, NULL)) ;
/*
Here's what's missing:
- Call a Perl sub, use c as parameter, put string result in r
r = Inline::Java::Callback::InterceptCallback(c) ;
*/
resp = (*(env))->NewStringUTF(env, r) ;
return resp ;
}
-----8<-----
I've never played around with the Perl stack before so I'm a bit confused.
Thanks a lot,
Patrick
-------------------------
Patrick LeBoutillier
Laval, Quebec, Canada
