587 lines
16 KiB
C
587 lines
16 KiB
C
/* gtkpeer.c -- Some GTK peer specific helper functions
|
|
Copyright (C) 2007 Free Software Foundation, Inc.
|
|
|
|
This file is part of GNU Classpath.
|
|
|
|
GNU Classpath is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2, or (at your option)
|
|
any later version.
|
|
|
|
GNU Classpath 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 GNU
|
|
General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with GNU Classpath; see the file COPYING. If not, write to the
|
|
Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
|
|
02110-1301 USA.
|
|
|
|
Linking this library statically or dynamically with other modules is
|
|
making a combined work based on this library. Thus, the terms and
|
|
conditions of the GNU General Public License cover the whole
|
|
combination.
|
|
|
|
As a special exception, the copyright holders of this library give you
|
|
permission to link this library with independent modules to produce an
|
|
executable, regardless of the license terms of these independent
|
|
modules, and to copy and distribute the resulting executable under
|
|
terms of your choice, provided that you also meet, for each linked
|
|
independent module, the terms and conditions of the license of that
|
|
module. An independent module is a module which is not derived from
|
|
or based on this library. If you modify this library, you may extend
|
|
this exception to your version of the library, but you are not
|
|
obligated to do so. If you do not wish to do so, delete this
|
|
exception statement from your version. */
|
|
|
|
#include "gtkpeer.h"
|
|
#include "jni.h"
|
|
|
|
/**
|
|
* The Pointer class.
|
|
*/
|
|
static jclass pointerClass;
|
|
|
|
/**
|
|
* The Pointer constructor.
|
|
*/
|
|
static jmethodID pointerConstructorMID;
|
|
|
|
/**
|
|
* The field ID of the data field in the Pointer class.
|
|
*/
|
|
static jfieldID pointerDataFID;
|
|
|
|
/**
|
|
* The field ID of the widget field in the GtkGenericPeer class.
|
|
*/
|
|
static jfieldID widgetFID;
|
|
|
|
/**
|
|
* The field ID of the globalRef field in the GtkGenericPeer class.
|
|
*/
|
|
static jfieldID globalRefFID;
|
|
|
|
/**
|
|
* The field ID of the display field in the GdkGraphicsEnvironment class.
|
|
*/
|
|
static jfieldID displayFID;
|
|
|
|
/**
|
|
* The field ID of the screen field in the GdkScreenGraphicsDevice class.
|
|
*/
|
|
static jfieldID screenFID;
|
|
|
|
/**
|
|
* The field ID of the nativeFont field in GdkFontPeer.
|
|
*/
|
|
static jfieldID fontFID;
|
|
|
|
/**
|
|
* The field ID of the nativeDecoder field in GdkPixbufDecoder.
|
|
*/
|
|
static jfieldID pixbufLoaderFID;
|
|
|
|
/**
|
|
* Initializes the IDs of the Pointer* classes.
|
|
*
|
|
* @param env the JNI environment
|
|
*/
|
|
void gtkpeer_init_pointer_IDs(JNIEnv* env)
|
|
{
|
|
#if SIZEOF_VOID_P == 8
|
|
pointerClass = (*env)->FindClass (env, "gnu/classpath/Pointer64");
|
|
if (pointerClass != NULL)
|
|
{
|
|
pointerClass = (*env)->NewGlobalRef (env, pointerClass);
|
|
pointerDataFID = (*env)->GetFieldID (env, pointerClass, "data", "J");
|
|
pointerConstructorMID = (*env)->GetMethodID (env, pointerClass, "<init>",
|
|
"(J)V");
|
|
}
|
|
#else
|
|
#if SIZEOF_VOID_P == 4
|
|
pointerClass = (*env)->FindClass(env, "gnu/classpath/Pointer32");
|
|
if (pointerClass != NULL)
|
|
{
|
|
pointerClass = (*env)->NewGlobalRef (env, pointerClass);
|
|
pointerDataFID = (*env)->GetFieldID (env, pointerClass, "data", "I");
|
|
pointerConstructorMID = (*env)->GetMethodID (env, pointerClass, "<init>",
|
|
"(I)V");
|
|
}
|
|
#else
|
|
#error "Pointer size is not supported."
|
|
#endif /* SIZEOF_VOID_P == 4 */
|
|
#endif /* SIZEOF_VOID_P == 8 */
|
|
}
|
|
|
|
/**
|
|
* Initializes the field IDs for the widget reference.
|
|
*
|
|
* @param env the JNI environment
|
|
*/
|
|
void gtkpeer_init_widget_IDs(JNIEnv *env)
|
|
{
|
|
jclass cls;
|
|
|
|
/* Find the widget field ID in GtkGenericPeer. */
|
|
cls = (*env)->FindClass(env, "gnu/java/awt/peer/gtk/GtkGenericPeer");
|
|
widgetFID = (*env)->GetFieldID(env, cls, "widget",
|
|
"Lgnu/classpath/Pointer;");
|
|
|
|
/* Find the globalRef field in GtkGenericPeer. */
|
|
globalRefFID = (*env)->GetFieldID(env, cls, "globalRef",
|
|
"Lgnu/classpath/Pointer;");
|
|
}
|
|
|
|
/**
|
|
* Stores the GTK widget reference in the GtkGenericPeer object.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param peer the actual peer object
|
|
* @param widget the widget reference to store
|
|
*/
|
|
void gtkpeer_set_widget(JNIEnv *env, jobject peer, void *widget)
|
|
{
|
|
jobject obj;
|
|
|
|
/* Fetch the widget field object. */
|
|
obj = (*env)->GetObjectField(env, peer, widgetFID);
|
|
if (obj == NULL)
|
|
{
|
|
/* Create if necessary. */
|
|
#if SIZEOF_VOID_P == 8
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jlong) widget);
|
|
#else
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jint) widget);
|
|
#endif
|
|
(*env)->SetObjectField(env, peer, widgetFID, obj);
|
|
}
|
|
else
|
|
{
|
|
#if SIZEOF_VOID_P == 8
|
|
(*env)->SetLongField(env, obj, pointerDataFID, (jlong) widget);
|
|
#else
|
|
(*env)->SetIntField(env, obj, pointerDataFID, (jint) widget);
|
|
#endif
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Retrieves the GTK widget reference from a GtkGenericPeer object.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param peer the actual peer object
|
|
*
|
|
* @return the widget reference
|
|
*/
|
|
void* gtkpeer_get_widget(JNIEnv *env, jobject peer)
|
|
{
|
|
jobject obj;
|
|
void *widget;
|
|
|
|
/* Fetch the widget field from the peer object. */
|
|
obj = (*env)->GetObjectField(env, peer, widgetFID);
|
|
|
|
/* Fetch actual widget pointer. */
|
|
#if SIZEOF_VOID_P == 8
|
|
widget = (void*) (*env)->GetLongField(env, obj, pointerDataFID);
|
|
#else
|
|
widget = (void*) (*env)->GetIntField(env, obj, pointerDataFID);
|
|
#endif
|
|
return widget;
|
|
}
|
|
|
|
|
|
/**
|
|
* Stores the global JNI reference of a peer inside the peer.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param peer the peer object
|
|
*/
|
|
void gtkpeer_set_global_ref(JNIEnv *env, jobject peer)
|
|
{
|
|
jobject obj;
|
|
void* globalRef;
|
|
|
|
/* Create global reference. */
|
|
globalRef = (*env)->NewGlobalRef(env, peer);
|
|
|
|
/* Fetch the globalRef field object. */
|
|
obj = (*env)->GetObjectField(env, peer, globalRefFID);
|
|
if (obj == NULL)
|
|
{
|
|
/* Create if necessary. */
|
|
#if SIZEOF_VOID_P == 8
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jlong) globalRef);
|
|
#else
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jint) globalRef);
|
|
#endif
|
|
(*env)->SetObjectField(env, peer, globalRefFID, obj);
|
|
}
|
|
else
|
|
{
|
|
#if SIZEOF_VOID_P == 8
|
|
(*env)->SetLongField(env, obj, pointerDataFID, (jlong) globalRef);
|
|
#else
|
|
(*env)->SetIntField(env, obj, pointerDataFID, (jint) globalRef);
|
|
#endif
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Retrieves the global reference from a peer.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param peer the peer object
|
|
*
|
|
* @return the global reference
|
|
*/
|
|
void* gtkpeer_get_global_ref(JNIEnv *env, jobject peer)
|
|
{
|
|
jobject obj;
|
|
void *globalRef;
|
|
|
|
/* Fetch the globalRef field from the peer object. */
|
|
obj = (*env)->GetObjectField(env, peer, globalRefFID);
|
|
|
|
/* Fetch actual globalRef pointer. */
|
|
#if SIZEOF_VOID_P == 8
|
|
globalRef = (void*) (*env)->GetLongField(env, obj, pointerDataFID);
|
|
#else
|
|
globalRef = (void*) (*env)->GetIntField(env, obj, pointerDataFID);
|
|
#endif
|
|
return globalRef;
|
|
}
|
|
|
|
/**
|
|
* Deletes the global reference of a peer. This is necessary in order to
|
|
* allow the peer to be garbage collected.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param peer the peer object.
|
|
*/
|
|
void gtkpeer_del_global_ref(JNIEnv* env, jobject peer)
|
|
{
|
|
jobject obj;
|
|
void *globalRef;
|
|
|
|
/* Fetch the globalRef field from the peer object. */
|
|
obj = (*env)->GetObjectField(env, peer, globalRefFID);
|
|
|
|
/* Fetch actual globalRef pointer. */
|
|
#if SIZEOF_VOID_P == 8
|
|
globalRef = (void*) (*env)->GetLongField(env, obj, pointerDataFID);
|
|
#else
|
|
globalRef = (void*) (*env)->GetIntField(env, obj, pointerDataFID);
|
|
#endif
|
|
(*env)->DeleteGlobalRef(env, globalRef);
|
|
}
|
|
|
|
/**
|
|
* Initializes the fieldIDs for the display and screen fields.
|
|
*
|
|
* @param env the JNI environment
|
|
*/
|
|
void gtkpeer_init_display_IDs(JNIEnv* env)
|
|
{
|
|
jclass cls;
|
|
|
|
/* Find the display field ID in GdkGraphicsEnvironment. */
|
|
cls = (*env)->FindClass(env, "gnu/java/awt/peer/gtk/GdkGraphicsEnvironment");
|
|
displayFID = (*env)->GetFieldID(env, cls, "display",
|
|
"Lgnu/classpath/Pointer;");
|
|
}
|
|
|
|
/**
|
|
* Sets the native display pointer in the GdkGraphicsEnvironment object.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param graphicsenv the GdkGraphicsEnvironment object
|
|
* @param display the native display pointer
|
|
*/
|
|
void gtkpeer_set_display(JNIEnv* env, jobject graphicsenv, void* display)
|
|
{
|
|
jobject obj;
|
|
|
|
/* Fetch the display field object. */
|
|
obj = (*env)->GetObjectField(env, graphicsenv, displayFID);
|
|
if (obj == NULL)
|
|
{
|
|
/* Create if necessary. */
|
|
#if SIZEOF_VOID_P == 8
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jlong) display);
|
|
#else
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jint) display);
|
|
#endif
|
|
(*env)->SetObjectField(env, graphicsenv, displayFID, obj);
|
|
}
|
|
else
|
|
{
|
|
#if SIZEOF_VOID_P == 8
|
|
(*env)->SetLongField(env, obj, pointerDataFID, (jlong) display);
|
|
#else
|
|
(*env)->SetIntField(env, obj, pointerDataFID, (jint) display);
|
|
#endif
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Fetches the native display pointer from the GdkGraphicsEnvironment object.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param graphicsenv the GdkGraphicsEnvironment object
|
|
*
|
|
* @return the native display pointer
|
|
*/
|
|
void* gtkpeer_get_display(JNIEnv* env, jobject graphicsenv)
|
|
{
|
|
jobject obj;
|
|
void *display;
|
|
|
|
/* Fetch the display field from the peer object. */
|
|
obj = (*env)->GetObjectField(env, graphicsenv, displayFID);
|
|
|
|
/* Fetch actual display pointer. */
|
|
#if SIZEOF_VOID_P == 8
|
|
display = (void*) (*env)->GetLongField(env, obj, pointerDataFID);
|
|
#else
|
|
display = (void*) (*env)->GetIntField(env, obj, pointerDataFID);
|
|
#endif
|
|
return display;
|
|
}
|
|
|
|
/**
|
|
* Initializes the fieldIDs for the screen field.
|
|
*
|
|
* @param env the JNI environment
|
|
*/
|
|
void gtkpeer_init_screen_IDs(JNIEnv* env)
|
|
{
|
|
jclass cls;
|
|
|
|
/* Find the display field ID in GdkScreenGraphicsDevice. */
|
|
cls = (*env)->FindClass(env,
|
|
"gnu/java/awt/peer/gtk/GdkScreenGraphicsDevice");
|
|
screenFID = (*env)->GetFieldID(env, cls, "screen",
|
|
"Lgnu/classpath/Pointer;");
|
|
}
|
|
|
|
/**
|
|
* Sets the native screen in the GdkScreenGraphicsDevice object.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param screen_graphics_device the GdkScreenGraphicsDevice object
|
|
* @param ptr the native screen pointer
|
|
*/
|
|
void gtkpeer_set_screen(JNIEnv* env, jobject screen_graphics_device,
|
|
void* ptr)
|
|
{
|
|
jobject obj;
|
|
|
|
/* Fetch the screen field object. */
|
|
obj = (*env)->GetObjectField(env, screen_graphics_device, screenFID);
|
|
if (obj == NULL)
|
|
{
|
|
/* Create if necessary. */
|
|
#if SIZEOF_VOID_P == 8
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jlong) ptr);
|
|
#else
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jint) ptr);
|
|
#endif
|
|
(*env)->SetObjectField(env, screen_graphics_device, screenFID, obj);
|
|
}
|
|
else
|
|
{
|
|
#if SIZEOF_VOID_P == 8
|
|
(*env)->SetLongField(env, obj, pointerDataFID, (jlong) ptr);
|
|
#else
|
|
(*env)->SetIntField(env, obj, pointerDataFID, (jint) ptr);
|
|
#endif
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Fetches the native screen pointer from the GdkScreenGraphicsDevice object.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param screen_graphics_device the GdkScreenGraphicsDevice object
|
|
*
|
|
* @return the native screen pointer
|
|
*/
|
|
void* gtkpeer_get_screen(JNIEnv* env, jobject screen_graphics_device)
|
|
{
|
|
jobject obj;
|
|
void *screen;
|
|
|
|
/* Fetch the display field from the peer object. */
|
|
obj = (*env)->GetObjectField(env, screen_graphics_device, screenFID);
|
|
|
|
/* Fetch actual display pointer. */
|
|
#if SIZEOF_VOID_P == 8
|
|
screen = (void*) (*env)->GetLongField(env, obj, pointerDataFID);
|
|
#else
|
|
screen = (void*) (*env)->GetIntField(env, obj, pointerDataFID);
|
|
#endif
|
|
return screen;
|
|
}
|
|
|
|
/**
|
|
* Initializes the field IDs for fonts.
|
|
*
|
|
* @param env the JNI environment
|
|
*/
|
|
void gtkpeer_init_font_IDs(JNIEnv* env)
|
|
{
|
|
jclass cls;
|
|
|
|
/* Find the nativeFont field ID in GdkFontPeer. */
|
|
cls = (*env)->FindClass(env, "gnu/java/awt/peer/gtk/GdkFontPeer");
|
|
fontFID = (*env)->GetFieldID(env, cls, "nativeFont",
|
|
"Lgnu/classpath/Pointer;");
|
|
}
|
|
|
|
/**
|
|
* Sets the native font in the nativeFont field in GdkFontPeer.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param font_peer the font peer object
|
|
* @param font the actual native font reference
|
|
*/
|
|
void gtkpeer_set_font(JNIEnv* env, jobject font_peer, void* font)
|
|
{
|
|
jobject obj;
|
|
|
|
/* Fetch the nativeFont field object. */
|
|
obj = (*env)->GetObjectField(env, font_peer, fontFID);
|
|
if (obj == NULL)
|
|
{
|
|
/* Create if necessary. */
|
|
#if SIZEOF_VOID_P == 8
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jlong) font);
|
|
#else
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jint) font);
|
|
#endif
|
|
(*env)->SetObjectField(env, font_peer, fontFID, obj);
|
|
}
|
|
else
|
|
{
|
|
#if SIZEOF_VOID_P == 8
|
|
(*env)->SetLongField(env, obj, pointerDataFID, (jlong) font);
|
|
#else
|
|
(*env)->SetIntField(env, obj, pointerDataFID, (jint) font);
|
|
#endif
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Fetches the native font reference from the GdkFontPeer object.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param font_peer the font peer object
|
|
*
|
|
* @return the native font structure
|
|
*/
|
|
void* gtkpeer_get_font(JNIEnv* env, jobject font_peer)
|
|
{
|
|
jobject obj;
|
|
void *font;
|
|
|
|
/* Fetch the nativeFont field from the peer object. */
|
|
obj = (*env)->GetObjectField(env, font_peer, fontFID);
|
|
|
|
/* Fetch actual font pointer. */
|
|
#if SIZEOF_VOID_P == 8
|
|
font = (void*) (*env)->GetLongField(env, obj, pointerDataFID);
|
|
#else
|
|
font = (void*) (*env)->GetIntField(env, obj, pointerDataFID);
|
|
#endif
|
|
return font;
|
|
}
|
|
|
|
/**
|
|
* Initializes the field IDs for pixbuf decoder.
|
|
*
|
|
* @param env the JNI environment
|
|
*/
|
|
void gtkpeer_init_pixbuf_IDs(JNIEnv* env)
|
|
{
|
|
jclass cls;
|
|
|
|
/* Find the nativeFont field ID in GdkFontPeer. */
|
|
cls = (*env)->FindClass(env, "gnu/java/awt/peer/gtk/GdkPixbufDecoder");
|
|
pixbufLoaderFID = (*env)->GetFieldID(env, cls, "nativeDecoder",
|
|
"Lgnu/classpath/Pointer;");
|
|
}
|
|
|
|
/**
|
|
* Sets the native font in the nativeFont field in GdkFontPeer.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param pixbuf_dec the pixbuf decoder object
|
|
* @param pixbuf_loader the native pixbuf loader
|
|
*/
|
|
void gtkpeer_set_pixbuf_loader(JNIEnv* env, jobject pixbuf_dec,
|
|
void* pixbuf_loader)
|
|
{
|
|
jobject obj;
|
|
|
|
/* Fetch the nativeDecoder field object. */
|
|
obj = (*env)->GetObjectField(env, pixbuf_dec, pixbufLoaderFID);
|
|
if (obj == NULL)
|
|
{
|
|
/* Create if necessary. */
|
|
#if SIZEOF_VOID_P == 8
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jlong) pixbuf_loader);
|
|
#else
|
|
obj = (*env)->NewObject(env, pointerClass, pointerConstructorMID,
|
|
(jint) pixbuf_loader);
|
|
#endif
|
|
(*env)->SetObjectField(env, pixbuf_dec, pixbufLoaderFID, obj);
|
|
}
|
|
else
|
|
{
|
|
#if SIZEOF_VOID_P == 8
|
|
(*env)->SetLongField(env, obj, pointerDataFID, (jlong) pixbuf_loader);
|
|
#else
|
|
(*env)->SetIntField(env, obj, pointerDataFID, (jint) pixbuf_loader);
|
|
#endif
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Fetches the native pixbuf loader reference from the GdkPixbufDecoder object.
|
|
*
|
|
* @param env the JNI environment
|
|
* @param pixbuf_dec the pixbuf decoder object
|
|
*
|
|
* @return the native pixbuf loader
|
|
*/
|
|
void* gtkpeer_get_pixbuf_loader(JNIEnv* env, jobject pixbuf_dec)
|
|
{
|
|
jobject obj;
|
|
void *loader;
|
|
|
|
/* Fetch the nativeFont field from the peer object. */
|
|
obj = (*env)->GetObjectField(env, pixbuf_dec, pixbufLoaderFID);
|
|
|
|
/* Fetch actual font pointer. */
|
|
#if SIZEOF_VOID_P == 8
|
|
loader = (void*) (*env)->GetLongField(env, obj, pointerDataFID);
|
|
#else
|
|
loader = (void*) (*env)->GetIntField(env, obj, pointerDataFID);
|
|
#endif
|
|
return loader;
|
|
}
|