/*

 * Copyright 2005-2008 Sun Microsystems, Inc.  All Rights Reserved.

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 * published by the Free Software Foundation.  Sun designates this

 * particular file as subject to the "Classpath" exception as provided

 * by Sun in the LICENSE file that accompanied this code.

 *

 * This code 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

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

 * You should have received a copy of the GNU General Public License version

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,

 * CA 95054 USA or visit www.sun.com if you need additional information or

 * have any questions.

 */

#include <dlfcn.h>

#include <setjmp.h>

#include <X11/Xlib.h>

#include <limits.h>

#include <stdio.h>

#include <string.h>

#include "gtk2_interface.h"

#include "java_awt_Transparency.h"

#define GTK2_LIB "libgtk-x11-2.0.so.0"

#define GTHREAD_LIB "libgthread-2.0.so.0"

#define G_TYPE_INVALID                  G_TYPE_MAKE_FUNDAMENTAL (0)

#define G_TYPE_NONE                     G_TYPE_MAKE_FUNDAMENTAL (1)

#define G_TYPE_INTERFACE                G_TYPE_MAKE_FUNDAMENTAL (2)

#define G_TYPE_CHAR                     G_TYPE_MAKE_FUNDAMENTAL (3)

#define G_TYPE_UCHAR                    G_TYPE_MAKE_FUNDAMENTAL (4)

#define G_TYPE_BOOLEAN                  G_TYPE_MAKE_FUNDAMENTAL (5)

#define G_TYPE_INT                      G_TYPE_MAKE_FUNDAMENTAL (6)

#define G_TYPE_UINT                     G_TYPE_MAKE_FUNDAMENTAL (7)

#define G_TYPE_LONG                     G_TYPE_MAKE_FUNDAMENTAL (8)

#define G_TYPE_ULONG                    G_TYPE_MAKE_FUNDAMENTAL (9)

#define G_TYPE_INT64                    G_TYPE_MAKE_FUNDAMENTAL (10)

#define G_TYPE_UINT64                   G_TYPE_MAKE_FUNDAMENTAL (11)

#define G_TYPE_ENUM                     G_TYPE_MAKE_FUNDAMENTAL (12)

#define G_TYPE_FLAGS                    G_TYPE_MAKE_FUNDAMENTAL (13)

#define G_TYPE_FLOAT                    G_TYPE_MAKE_FUNDAMENTAL (14)

#define G_TYPE_DOUBLE                   G_TYPE_MAKE_FUNDAMENTAL (15)

#define G_TYPE_STRING                   G_TYPE_MAKE_FUNDAMENTAL (16)

#define G_TYPE_POINTER                  G_TYPE_MAKE_FUNDAMENTAL (17)

#define G_TYPE_BOXED                    G_TYPE_MAKE_FUNDAMENTAL (18)

#define G_TYPE_PARAM                    G_TYPE_MAKE_FUNDAMENTAL (19)

#define G_TYPE_OBJECT                   G_TYPE_MAKE_FUNDAMENTAL (20)

#define GTK_TYPE_BORDER                 ((*fp_gtk_border_get_type)())

#define G_TYPE_FUNDAMENTAL_SHIFT        (2)

#define G_TYPE_MAKE_FUNDAMENTAL(x)      ((GType) ((x) << G_TYPE_FUNDAMENTAL_SHIFT))

#define MIN(a, b)  (((a) < (b)) ? (a) : (b))

#define CONV_BUFFER_SIZE 128

#define NO_SYMBOL_EXCEPTION 1

/* SynthConstants */

const gint ENABLED    = 1 << 0;

const gint MOUSE_OVER = 1 << 1;

const gint PRESSED    = 1 << 2;

const gint DISABLED   = 1 << 3;

const gint FOCUSED    = 1 << 8;

const gint SELECTED   = 1 << 9;

const gint DEFAULT    = 1 << 10;

static void *gtk2_libhandle = NULL;

static void *gthread_libhandle = NULL;

static jmp_buf j;

/* Widgets */

static GtkWidget *gtk2_widget = NULL;

static GtkWidget *gtk2_window = NULL;

static GtkFixed  *gtk2_fixed  = NULL;

/* Paint system */

static GdkPixmap *gtk2_white_pixmap = NULL;

static GdkPixmap *gtk2_black_pixmap = NULL;

static GdkPixbuf *gtk2_white_pixbuf = NULL;

static GdkPixbuf *gtk2_black_pixbuf = NULL;

static int gtk2_pixbuf_width = 0;

static int gtk2_pixbuf_height = 0;

/* Static buffer for conversion from java.lang.String to UTF-8 */

static char convertionBuffer[CONV_BUFFER_SIZE];

static gboolean new_combo = TRUE;

const char ENV_PREFIX[] = "GTK_MODULES=";

/*******************/

enum GtkWidgetType

{

    _GTK_ARROW_TYPE,

    _GTK_BUTTON_TYPE,

    _GTK_CHECK_BUTTON_TYPE,

    _GTK_CHECK_MENU_ITEM_TYPE,

    _GTK_COLOR_SELECTION_DIALOG_TYPE,

    _GTK_COMBO_BOX_TYPE,

    _GTK_COMBO_BOX_ARROW_BUTTON_TYPE,

    _GTK_COMBO_BOX_TEXT_FIELD_TYPE,

    _GTK_CONTAINER_TYPE,

    _GTK_ENTRY_TYPE,

    _GTK_FRAME_TYPE,

    _GTK_HANDLE_BOX_TYPE,

    _GTK_HPANED_TYPE,

    _GTK_HPROGRESS_BAR_TYPE,

    _GTK_HSCALE_TYPE,

    _GTK_HSCROLLBAR_TYPE,

    _GTK_HSEPARATOR_TYPE,

    _GTK_IMAGE_TYPE,

    _GTK_MENU_TYPE,

    _GTK_MENU_BAR_TYPE,

    _GTK_MENU_ITEM_TYPE,

    _GTK_NOTEBOOK_TYPE,

    _GTK_LABEL_TYPE,

    _GTK_RADIO_BUTTON_TYPE,

    _GTK_RADIO_MENU_ITEM_TYPE,

    _GTK_SCROLLED_WINDOW_TYPE,

    _GTK_SEPARATOR_MENU_ITEM_TYPE,

    _GTK_SEPARATOR_TOOL_ITEM_TYPE,

    _GTK_SPIN_BUTTON_TYPE,

    _GTK_TEXT_VIEW_TYPE,

    _GTK_TOGGLE_BUTTON_TYPE,

    _GTK_TOOLBAR_TYPE,

    _GTK_TOOLTIP_TYPE,

    _GTK_TREE_VIEW_TYPE,

    _GTK_VIEWPORT_TYPE,

    _GTK_VPANED_TYPE,

    _GTK_VPROGRESS_BAR_TYPE,

    _GTK_VSCALE_TYPE,

    _GTK_VSCROLLBAR_TYPE,

    _GTK_VSEPARATOR_TYPE,

    _GTK_WINDOW_TYPE,

    _GTK_DIALOG_TYPE,

    _GTK_WIDGET_TYPE_SIZE

};

static GtkWidget *gtk2_widgets[_GTK_WIDGET_TYPE_SIZE];

/*************************

 * Glib function pointers

 *************************/

static gboolean (*fp_g_main_context_iteration)(GMainContext *context,

                                             gboolean may_block);

static GValue*      (*fp_g_value_init)(GValue *value, GType g_type);

static gboolean     (*fp_g_type_is_a)(GType type, GType is_a_type);

static gboolean     (*fp_g_value_get_boolean)(const GValue *value);

static gchar        (*fp_g_value_get_char)(const GValue *value);

static guchar       (*fp_g_value_get_uchar)(const GValue *value);

static gint         (*fp_g_value_get_int)(const GValue *value);

static guint        (*fp_g_value_get_uint)(const GValue *value);

static glong        (*fp_g_value_get_long)(const GValue *value);

static gulong       (*fp_g_value_get_ulong)(const GValue *value);

static gint64       (*fp_g_value_get_int64)(const GValue *value);

static guint64      (*fp_g_value_get_uint64)(const GValue *value);

static gfloat       (*fp_g_value_get_float)(const GValue *value);

static gdouble      (*fp_g_value_get_double)(const GValue *value);

static const gchar* (*fp_g_value_get_string)(const GValue *value);

static gint         (*fp_g_value_get_enum)(const GValue *value);

static guint        (*fp_g_value_get_flags)(const GValue *value);

static GParamSpec*  (*fp_g_value_get_param)(const GValue *value);

static gpointer*    (*fp_g_value_get_boxed)(const GValue *value);

static gpointer*    (*fp_g_value_get_pointer)(const GValue *value);

static GObject*     (*fp_g_value_get_object)(const GValue *value);

static GParamSpec*  (*fp_g_param_spec_int)(const gchar *name,

        const gchar *nick, const gchar *blurb,

        gint minimum, gint maximum, gint default_value,

        GParamFlags flags);

static void         (*fp_g_object_get)(gpointer object,

                                       const gchar* fpn, ...);

static void         (*fp_g_object_set)(gpointer object,

                                       const gchar *first_property_name,

                                       ...);

/************************

 * GDK function pointers

 ************************/

static GdkPixmap *(*fp_gdk_pixmap_new)(GdkDrawable *drawable,

        gint width, gint height, gint depth);

static GdkGC *(*fp_gdk_gc_new)(GdkDrawable*);

static void (*fp_gdk_rgb_gc_set_foreground)(GdkGC*, guint32);

static void (*fp_gdk_draw_rectangle)(GdkDrawable*, GdkGC*, gboolean,

        gint, gint, gint, gint);

static GdkPixbuf *(*fp_gdk_pixbuf_new)(GdkColorspace colorspace,

        gboolean has_alpha, int bits_per_sample, int width, int height);

static GdkPixbuf *(*fp_gdk_pixbuf_get_from_drawable)(GdkPixbuf *dest,

        GdkDrawable *src, GdkColormap *cmap, int src_x, int src_y,

        int dest_x, int dest_y, int width, int height);

static void (*fp_gdk_drawable_get_size)(GdkDrawable *drawable,

        gint* width, gint* height);

/************************

 * Gtk function pointers

 ************************/

static gboolean (*fp_gtk_init_check)(int* argc, char** argv);

/* Painting */

static void (*fp_gtk_paint_hline)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GdkRectangle* area, GtkWidget* widget,

        const gchar* detail, gint x1, gint x2, gint y);

static void (*fp_gtk_paint_vline)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GdkRectangle* area, GtkWidget* widget,

        const gchar* detail, gint y1, gint y2, gint x);

static void (*fp_gtk_paint_shadow)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height);

static void (*fp_gtk_paint_arrow)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        GtkArrowType arrow_type, gboolean fill, gint x, gint y,

        gint width, gint height);

static void (*fp_gtk_paint_diamond)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height);

static void (*fp_gtk_paint_box)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height);

static void (*fp_gtk_paint_flat_box)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height);

static void (*fp_gtk_paint_check)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height);

static void (*fp_gtk_paint_option)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height);

static void (*fp_gtk_paint_box_gap)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height,

        GtkPositionType gap_side, gint gap_x, gint gap_width);

static void (*fp_gtk_paint_extension)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height, GtkPositionType gap_side);

static void (*fp_gtk_paint_focus)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GdkRectangle* area, GtkWidget* widget,

        const gchar* detail, gint x, gint y, gint width, gint height);

static void (*fp_gtk_paint_slider)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height, GtkOrientation orientation);

static void (*fp_gtk_paint_handle)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GtkShadowType shadow_type,

        GdkRectangle* area, GtkWidget* widget, const gchar* detail,

        gint x, gint y, gint width, gint height, GtkOrientation orientation);

static void (*fp_gtk_paint_expander)(GtkStyle* style, GdkWindow* window,

        GtkStateType state_type, GdkRectangle* area, GtkWidget* widget,

        const gchar* detail, gint x, gint y, GtkExpanderStyle expander_style);

static void (*fp_gtk_style_apply_default_background)(GtkStyle* style,

        GdkWindow* window, gboolean set_bg, GtkStateType state_type,

        GdkRectangle* area, gint x, gint y, gint width, gint height);

/* Widget creation */

static GtkWidget* (*fp_gtk_arrow_new)(GtkArrowType arrow_type,

                                      GtkShadowType shadow_type);

static GtkWidget* (*fp_gtk_button_new)();

static GtkWidget* (*fp_gtk_check_button_new)();

static GtkWidget* (*fp_gtk_check_menu_item_new)();

static GtkWidget* (*fp_gtk_color_selection_dialog_new)(const gchar* title);

static GtkWidget* (*fp_gtk_combo_box_new)();

static GtkWidget* (*fp_gtk_combo_box_entry_new)();

static GtkWidget* (*fp_gtk_entry_new)();

static GtkWidget* (*fp_gtk_fixed_new)();

static GtkWidget* (*fp_gtk_handle_box_new)();

static GtkWidget* (*fp_gtk_hpaned_new)();

static GtkWidget* (*fp_gtk_vpaned_new)();

static GtkWidget* (*fp_gtk_hscale_new)(GtkAdjustment* adjustment);

static GtkWidget* (*fp_gtk_vscale_new)(GtkAdjustment* adjustment);

static GtkWidget* (*fp_gtk_hscrollbar_new)(GtkAdjustment* adjustment);

static GtkWidget* (*fp_gtk_vscrollbar_new)(GtkAdjustment* adjustment);

static GtkWidget* (*fp_gtk_hseparator_new)();

static GtkWidget* (*fp_gtk_vseparator_new)();

static GtkWidget* (*fp_gtk_image_new)();

static GtkWidget* (*fp_gtk_label_new)(const gchar* str);

static GtkWidget* (*fp_gtk_menu_new)();

static GtkWidget* (*fp_gtk_menu_bar_new)();

static GtkWidget* (*fp_gtk_menu_item_new)();

static GtkWidget* (*fp_gtk_notebook_new)();

static GtkWidget* (*fp_gtk_progress_bar_new)();

static GtkWidget* (*fp_gtk_progress_bar_set_orientation)(

        GtkProgressBar *pbar,

        GtkProgressBarOrientation orientation);

static GtkWidget* (*fp_gtk_radio_button_new)(GSList *group);

static GtkWidget* (*fp_gtk_radio_menu_item_new)(GSList *group);

static GtkWidget* (*fp_gtk_scrolled_window_new)(GtkAdjustment *hadjustment,

        GtkAdjustment *vadjustment);

static GtkWidget* (*fp_gtk_separator_menu_item_new)();

static GtkWidget* (*fp_gtk_separator_tool_item_new)();

static GtkWidget* (*fp_gtk_text_view_new)();

static GtkWidget* (*fp_gtk_toggle_button_new)();

static GtkWidget* (*fp_gtk_toolbar_new)();

static GtkWidget* (*fp_gtk_tree_view_new)();

static GtkWidget* (*fp_gtk_viewport_new)(GtkAdjustment *hadjustment,

        GtkAdjustment *vadjustment);

static GtkWidget* (*fp_gtk_window_new)(GtkWindowType type);

static GtkWidget* (*fp_gtk_dialog_new)();

static GtkWidget* (*fp_gtk_spin_button_new)(GtkAdjustment *adjustment,

        gdouble climb_rate, guint digits);

static GtkWidget* (*fp_gtk_frame_new)(const gchar *label);

/* Other widget operations */

static GtkObject* (*fp_gtk_adjustment_new)(gdouble value,

        gdouble lower, gdouble upper, gdouble step_increment,

        gdouble page_increment, gdouble page_size);

static void (*fp_gtk_container_add)(GtkContainer *window, GtkWidget *widget);

static void (*fp_gtk_menu_shell_append)(GtkMenuShell *menu_shell,

        GtkWidget *child);

static void (*fp_gtk_menu_item_set_submenu)(GtkMenuItem *menu_item,

        GtkWidget *submenu);

static void (*fp_gtk_widget_realize)(GtkWidget *widget);

static GdkPixbuf* (*fp_gtk_widget_render_icon)(GtkWidget *widget,

        const gchar *stock_id, GtkIconSize size, const gchar *detail);

static void (*fp_gtk_widget_set_name)(GtkWidget *widget, const gchar *name);

static void (*fp_gtk_widget_set_parent)(GtkWidget *widget, GtkWidget *parent);

static void (*fp_gtk_widget_set_direction)(GtkWidget *widget,

        GtkTextDirection direction);

static void (*fp_gtk_widget_style_get)(GtkWidget *widget,

        const gchar *first_property_name, ...);

static void (*fp_gtk_widget_class_install_style_property)(

        GtkWidgetClass* class, GParamSpec *pspec);

static GParamSpec* (*fp_gtk_widget_class_find_style_property)(

        GtkWidgetClass* class, const gchar* property_name);

static void (*fp_gtk_widget_style_get_property)(GtkWidget* widget,

        const gchar* property_name, GValue* value);

static char* (*fp_pango_font_description_to_string)(

        const PangoFontDescription* fd);

static GtkSettings* (*fp_gtk_settings_get_default)();

static GtkSettings* (*fp_gtk_widget_get_settings)(GtkWidget *widget);

static GType        (*fp_gtk_border_get_type)();

static void (*fp_gtk_arrow_set)(GtkWidget* arrow,

                                GtkArrowType arrow_type,

                                GtkShadowType shadow_type);

static void (*fp_gtk_widget_size_request)(GtkWidget *widget,

                                          GtkRequisition *requisition);

static GtkAdjustment* (*fp_gtk_range_get_adjustment)(GtkRange* range);

/* Method bodies */

const char *getStrFor(JNIEnv *env, jstring val)

{

    int length = (*env)->GetStringLength(env, val);

    if (length > CONV_BUFFER_SIZE-1)

    {

        length = CONV_BUFFER_SIZE-1;

#ifdef INTERNAL_BUILD

        fprintf(stderr, "Note: Detail is too long: %d chars\n", length);

#endif /* INTERNAL_BUILD */

    }

    (*env)->GetStringUTFRegion(env, val, 0, length, convertionBuffer);

    return convertionBuffer;

}

/* This is a workaround for the bug:

 * http://sourceware.org/bugzilla/show_bug.cgi?id=1814

 * (dlsym/dlopen clears dlerror state)

 * This bug is specific to Linux, but there is no harm in

 * applying this workaround on Solaris as well.

 */

static void* dl_symbol(const char* name)

{

    void* result = dlsym(gtk2_libhandle, name);

    if (!result)

        longjmp(j, NO_SYMBOL_EXCEPTION);

    return result;

}

static void* dl_symbol_gthread(const char* name)

{

    void* result = dlsym(gthread_libhandle, name);

    if (!result)

        longjmp(j, NO_SYMBOL_EXCEPTION);

    return result;

}

gboolean gtk2_check_version()

{

    if (gtk2_libhandle != NULL) {

        /* We've already successfully opened the GTK libs, so return true. */

        return TRUE;

    } else {

        void *lib = NULL;

        gboolean result = FALSE;

        lib = dlopen(GTK2_LIB, RTLD_LAZY | RTLD_LOCAL);

        if (lib == NULL) {

            return FALSE;

        }

        fp_gtk_check_version = dlsym(lib, "gtk_check_version");

        /* Check for GTK 2.2+ */

        if (!fp_gtk_check_version(2, 2, 0)) {

            result = TRUE;

        }

        dlclose(lib);

        return result;

    }

}

/**

 * Functions for sun_awt_X11_GtkFileDialogPeer.c

 */

void gtk2_file_chooser_load()

{

    fp_gtk_file_chooser_get_filename = dl_symbol(

            "gtk_file_chooser_get_filename");

    fp_gtk_file_chooser_dialog_new = dl_symbol("gtk_file_chooser_dialog_new");

    fp_gtk_file_chooser_set_current_folder = dl_symbol(

            "gtk_file_chooser_set_current_folder");

    fp_gtk_file_chooser_set_filename = dl_symbol(

            "gtk_file_chooser_set_filename");

    fp_gtk_file_filter_add_custom = dl_symbol("gtk_file_filter_add_custom");

    fp_gtk_file_chooser_set_filter = dl_symbol("gtk_file_chooser_set_filter");

    fp_gtk_file_chooser_get_type = dl_symbol("gtk_file_chooser_get_type");

    fp_gtk_file_filter_new = dl_symbol("gtk_file_filter_new");

    fp_gtk_file_chooser_set_select_multiple = dl_symbol(

            "gtk_file_chooser_set_select_multiple");

    fp_gtk_file_chooser_get_current_folder = dl_symbol(

            "gtk_file_chooser_get_current_folder");

    fp_gtk_file_chooser_get_filenames = dl_symbol(

            "gtk_file_chooser_get_filenames");

    fp_gtk_g_slist_length = dl_symbol("g_slist_length");

}

gboolean gtk2_load()

{

    gboolean result;

    int i;

    int (*handler)();

    int (*io_handler)();

    char *gtk_modules_env;

    gtk2_libhandle = dlopen(GTK2_LIB, RTLD_LAZY | RTLD_LOCAL);

    gthread_libhandle = dlopen(GTHREAD_LIB, RTLD_LAZY | RTLD_LOCAL);

    if (gtk2_libhandle == NULL || gthread_libhandle == NULL)

        return FALSE;

    if (setjmp(j) == 0)

    {

        fp_gtk_check_version = dl_symbol("gtk_check_version");

        /* Check for GTK 2.2+ */

        if (fp_gtk_check_version(2, 2, 0)) {

            longjmp(j, NO_SYMBOL_EXCEPTION);

        }

        /* GLib */

        fp_g_free = dl_symbol("g_free");

        fp_g_object_unref = dl_symbol("g_object_unref");

        fp_g_main_context_iteration =

            dl_symbol("g_main_context_iteration");

        fp_g_value_init = dl_symbol("g_value_init");

        fp_g_type_is_a = dl_symbol("g_type_is_a");

        fp_g_value_get_boolean = dl_symbol("g_value_get_boolean");

        fp_g_value_get_char = dl_symbol("g_value_get_char");

        fp_g_value_get_uchar = dl_symbol("g_value_get_uchar");

        fp_g_value_get_int = dl_symbol("g_value_get_int");

        fp_g_value_get_uint = dl_symbol("g_value_get_uint");

        fp_g_value_get_long = dl_symbol("g_value_get_long");

        fp_g_value_get_ulong = dl_symbol("g_value_get_ulong");

        fp_g_value_get_int64 = dl_symbol("g_value_get_int64");

        fp_g_value_get_uint64 = dl_symbol("g_value_get_uint64");

        fp_g_value_get_float = dl_symbol("g_value_get_float");

        fp_g_value_get_double = dl_symbol("g_value_get_double");

        fp_g_value_get_string = dl_symbol("g_value_get_string");

        fp_g_value_get_enum = dl_symbol("g_value_get_enum");

        fp_g_value_get_flags = dl_symbol("g_value_get_flags");

        fp_g_value_get_param = dl_symbol("g_value_get_param");

        fp_g_value_get_boxed = dl_symbol("g_value_get_boxed");

        fp_g_value_get_pointer = dl_symbol("g_value_get_pointer");

        fp_g_value_get_object = dl_symbol("g_value_get_object");

        fp_g_param_spec_int = dl_symbol("g_param_spec_int");

        fp_g_object_get = dl_symbol("g_object_get");

        fp_g_object_set = dl_symbol("g_object_set");

        /* GDK */

        fp_gdk_pixmap_new = dl_symbol("gdk_pixmap_new");

        fp_gdk_pixbuf_get_from_drawable =

            dl_symbol("gdk_pixbuf_get_from_drawable");

        fp_gdk_gc_new = dl_symbol("gdk_gc_new");

        fp_gdk_rgb_gc_set_foreground =

            dl_symbol("gdk_rgb_gc_set_foreground");

        fp_gdk_draw_rectangle = dl_symbol("gdk_draw_rectangle");

        fp_gdk_drawable_get_size = dl_symbol("gdk_drawable_get_size");

        /* Pixbuf */

        fp_gdk_pixbuf_new = dl_symbol("gdk_pixbuf_new");

        fp_gdk_pixbuf_new_from_file =

                dl_symbol("gdk_pixbuf_new_from_file");

        fp_gdk_pixbuf_get_width = dl_symbol("gdk_pixbuf_get_width");

        fp_gdk_pixbuf_get_height = dl_symbol("gdk_pixbuf_get_height");

        fp_gdk_pixbuf_get_pixels = dl_symbol("gdk_pixbuf_get_pixels");

        fp_gdk_pixbuf_get_rowstride =