fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2012-11-11 20:39 UTC+0100 Viktor Szakats (harbour syenar.net)

Browse Source 
* extras/hbdroid/msginfo.c
    ! fixed to pass strings to Java in UTF-8
    ! additional NULL checks to avoid GPFs
    ; Anybody remembers how to run/try this thing?
This commit is contained in:
Viktor Szakats
2012-11-11 19:41:00 +00:00
parent 36539ca52b
commit 6f397a5123
2 changed files with 21 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -16,6 +16,12 @@
The license applies to all entries newer than 2009-04-28.
*/
2012-11-11 20:39 UTC+0100 Viktor Szakats (harbour syenar.net)
* extras/hbdroid/msginfo.c
! fixed to pass strings to Java in UTF-8
! additional NULL checks to avoid GPFs
; Anybody remembers how to run/try this thing?
2012-11-11 11:18 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/*/doc/en/*.txt
! Changed: $FUNCNAME$ => $NAME$.

19
harbour/extras/hbdroid/msginfo.c
View File

@@ -3,6 +3,8 @@
*/
#include "hbapi.h"
#include "hbapistr.h"
#include "hbdroid.h"
HB_FUNC( JNI_MSGINFO )
@@ -10,9 +12,18 @@ HB_FUNC( JNI_MSGINFO )
JNIEnv * jni_env = __hbdroid_jni_env();
jobject jni_obj = __hbdroid_jni_obj();
jclass cls = ( *jni_env )->GetObjectClass( jni_env, jni_obj );
jmethodID mid = ( *jni_env )->GetMethodID( jni_env, cls, "MsgInfo", "(Ljava/lang/String;)V" );
if( jni_env && jni_obj )
{
jclass cls = ( *jni_env )->GetObjectClass( jni_env, jni_obj );
jmethodID mid = ( *jni_env )->GetMethodID( jni_env, cls, "MsgInfo", "(Ljava/lang/String;)V" );
if( mid )
( *jni_env )->CallVoidMethod( jni_env, jni_obj, mid, ( *jni_env )->NewStringUTF( jni_env, hb_parcx( 1 ) ) );
if( cls && mid )
{
void * hPar1;
( *jni_env )->CallVoidMethod( jni_env, jni_obj, mid, ( *jni_env )->NewStringUTF( jni_env, hb_parstr_utf8( 1, &hPar1, NULL ) ) );
hb_strfree( hPar1 );
}
}
}