/*

 * Copyright (c) 2005, 2018, Oracle and/or its affiliates. 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.  Oracle designates this

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

 * by Oracle 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 Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

 * or visit www.oracle.com if you need additional information or have any

 * questions.

 */

#include <dlfcn.h>

#include <setjmp.h>

#include <X11/Xlib.h>

#include <limits.h>

#include <string.h>

#include "gtk3_interface.h"

#include "java_awt_Transparency.h"

#include "sizecalc.h"

#include <jni_util.h>

#include <stdio.h>

#include "awt.h"

static void *gtk3_libhandle = NULL;

static void *gthread_libhandle = NULL;

static jmp_buf j;

/* Widgets */

static GtkWidget *gtk3_widget = NULL;

static GtkWidget *gtk3_window = NULL;

static GtkFixed  *gtk3_fixed  = NULL;

static GtkStyleProvider *gtk3_css = NULL;

/* Paint system */

static cairo_surface_t *surface = NULL;

static cairo_t *cr = NULL;

static const char ENV_PREFIX[] = "GTK_MODULES=";

static GtkWidget *gtk3_widgets[_GTK_WIDGET_TYPE_SIZE];

static void throw_exception(JNIEnv *env, const char* name, const char* message)

{

    jclass class = (*env)->FindClass(env, name);

    if (class != NULL)

        (*env)->ThrowNew(env, class, message);

    (*env)->DeleteLocalRef(env, class);

}

static void gtk3_add_state(GtkWidget *widget, GtkStateType state) {

    GtkStateType old_state = fp_gtk_widget_get_state(widget);

    fp_gtk_widget_set_state(widget, old_state | state);

}

static void gtk3_remove_state(GtkWidget *widget, GtkStateType state) {

    GtkStateType old_state = fp_gtk_widget_get_state(widget);

    fp_gtk_widget_set_state(widget, old_state & ~state);

}

/* 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(gtk3_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 gtk3_check(const char* lib_name, gboolean load)

{

    if (gtk3_libhandle != NULL) {

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

        return TRUE;

    } else {

#ifdef RTLD_NOLOAD

        void *lib = dlopen(lib_name, RTLD_LAZY | RTLD_NOLOAD);

        if (!load || lib != NULL) {

            return lib != NULL;

        }

#else

#ifdef _AIX

        /* On AIX we could implement this with the help of loadquery(L_GETINFO, ..)  */

        /* (see reload_table() in hotspot/src/os/aix/vm/loadlib_aix.cpp) but it is   */

        /* probably not worth it because most AIX servers don't have GTK libs anyway */

#endif

#endif

        return dlopen(lib_name, RTLD_LAZY | RTLD_LOCAL) != NULL;

    }

}

#define ADD_SUPPORTED_ACTION(actionStr)                                        \

do {                                                                           \

    jfieldID fld_action = (*env)->GetStaticFieldID(env, cls_action, actionStr, \

                                                 "Ljava/awt/Desktop$Action;"); \

    if (!(*env)->ExceptionCheck(env)) {                                        \

        jobject action = (*env)->GetStaticObjectField(env, cls_action,         \

                                                                  fld_action); \

        (*env)->CallBooleanMethod(env, supportedActions, mid_arrayListAdd,     \

                                                                      action); \

    } else {                                                                   \

        (*env)->ExceptionClear(env);                                           \

    }                                                                          \

} while(0);

static void update_supported_actions(JNIEnv *env) {

    GVfs * (*fp_g_vfs_get_default) (void);

    const gchar * const * (*fp_g_vfs_get_supported_uri_schemes) (GVfs * vfs);

    const gchar * const * schemes = NULL;

    jclass cls_action = (*env)->FindClass(env, "java/awt/Desktop$Action");

    CHECK_NULL(cls_action);

    jclass cls_xDesktopPeer = (*env)->

                                     FindClass(env, "sun/awt/X11/XDesktopPeer");

    CHECK_NULL(cls_xDesktopPeer);

    jfieldID fld_supportedActions = (*env)->GetStaticFieldID(env,

                      cls_xDesktopPeer, "supportedActions", "Ljava/util/List;");

    CHECK_NULL(fld_supportedActions);

    jobject supportedActions = (*env)->GetStaticObjectField(env,

                                        cls_xDesktopPeer, fld_supportedActions);

    jclass cls_arrayList = (*env)->FindClass(env, "java/util/ArrayList");

    CHECK_NULL(cls_arrayList);

    jmethodID mid_arrayListAdd = (*env)->GetMethodID(env, cls_arrayList, "add",

                                                       "(Ljava/lang/Object;)Z");

    CHECK_NULL(mid_arrayListAdd);

    jmethodID mid_arrayListClear = (*env)->GetMethodID(env, cls_arrayList,

                                                                "clear", "()V");

    CHECK_NULL(mid_arrayListClear);

    (*env)->CallVoidMethod(env, supportedActions, mid_arrayListClear);

    ADD_SUPPORTED_ACTION("OPEN");

    /**

     * gtk_show_uri() documentation says:

     *

     * > you need to install gvfs to get support for uri schemes such as http://

     * > or ftp://, as only local files are handled by GIO itself.

     *

     * So OPEN action was safely added here.

     * However, it looks like Solaris 11 have gvfs support only for 32-bit

     * applications only by default.

     */

    fp_g_vfs_get_default = dl_symbol("g_vfs_get_default");

    fp_g_vfs_get_supported_uri_schemes =

                           dl_symbol("g_vfs_get_supported_uri_schemes");

    dlerror();

    if (fp_g_vfs_get_default && fp_g_vfs_get_supported_uri_schemes) {

        GVfs * vfs = fp_g_vfs_get_default();

        schemes = vfs ? fp_g_vfs_get_supported_uri_schemes(vfs) : NULL;

        if (schemes) {

            int i = 0;

            while (schemes[i]) {

                if (strcmp(schemes[i], "http") == 0) {

                    ADD_SUPPORTED_ACTION("BROWSE");

                    ADD_SUPPORTED_ACTION("MAIL");

                    break;

                }

                i++;

            }

        }

    } else {

#ifdef DEBUG

        fprintf(stderr, "Cannot load g_vfs_get_supported_uri_schemes\n");

#endif /* DEBUG */

    }

}

/**

 * Functions for awt_Desktop.c

 */

static gboolean gtk3_show_uri_load(JNIEnv *env) {

    gboolean success = FALSE;

    dlerror();

    fp_gtk_show_uri = dl_symbol("gtk_show_uri");

    const char *dlsym_error = dlerror();

    if (dlsym_error) {

#ifdef DEBUG

        fprintf (stderr, "Cannot load symbol: %s \n", dlsym_error);

#endif /* DEBUG */

    } else if (fp_gtk_show_uri == NULL) {

#ifdef DEBUG

        fprintf(stderr, "dlsym(gtk_show_uri) returned NULL\n");

#endif /* DEBUG */

    } else {

        gtk->gtk_show_uri = fp_gtk_show_uri;

        update_supported_actions(env);

        success = TRUE;

    }

    return success;

}

/**

 * Functions for sun_awt_X11_GtkFileDialogPeer.c

 */

static void gtk3_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_chooser_set_current_name = dl_symbol(

            "gtk_file_chooser_set_current_name");

    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_do_overwrite_confirmation = dl_symbol(

                "gtk_file_chooser_set_do_overwrite_confirmation");

    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");

    fp_gdk_x11_drawable_get_xid = dl_symbol("gdk_x11_window_get_xid");

}

static void empty() {}

static gboolean gtk3_version_3_10 = TRUE;

static gboolean gtk3_version_3_14 = FALSE;

static gboolean gtk3_version_3_20 = FALSE;

GtkApi* gtk3_load(JNIEnv *env, const char* lib_name)

{

    gboolean result;

    int i;

    int (*handler)();

    int (*io_handler)();

    char *gtk_modules_env;

    gtk3_libhandle = dlopen(lib_name, RTLD_LAZY | RTLD_LOCAL);

    if (gtk3_libhandle == NULL) {

        return FALSE;

    }

    gthread_libhandle = dlopen(GTHREAD_LIB_VERSIONED, RTLD_LAZY | RTLD_LOCAL);

    if (gthread_libhandle == NULL) {

        gthread_libhandle = dlopen(GTHREAD_LIB, RTLD_LAZY | RTLD_LOCAL);

        if (gthread_libhandle == NULL)

            return FALSE;

    }

    if (setjmp(j) == 0)

    {

        fp_gtk_check_version = dl_symbol("gtk_check_version");

        /* GLib */

        fp_glib_check_version = dlsym(gtk3_libhandle, "glib_check_version");

        if (!fp_glib_check_version) {

            dlerror();

        }

        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_object_get = dl_symbol("g_object_get");

        fp_g_object_set = dl_symbol("g_object_set");

        fp_g_str_has_prefix = dl_symbol("g_str_has_prefix");

        fp_g_strsplit = dl_symbol("g_strsplit");

        fp_g_strfreev = dl_symbol("g_strfreev");

        /* GDK */

        fp_gdk_get_default_root_window =

            dl_symbol("gdk_get_default_root_window");

        /* 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_from_drawable =

                    dl_symbol("gdk_pixbuf_get_from_window");

        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 =

                dl_symbol("gdk_pixbuf_get_rowstride");

        fp_gdk_pixbuf_get_has_alpha =

                dl_symbol("gdk_pixbuf_get_has_alpha");

        fp_gdk_pixbuf_get_bits_per_sample =

                dl_symbol("gdk_pixbuf_get_bits_per_sample");

        fp_gdk_pixbuf_get_n_channels =

                dl_symbol("gdk_pixbuf_get_n_channels");

        fp_gdk_pixbuf_get_colorspace =

                dl_symbol("gdk_pixbuf_get_colorspace");

        fp_cairo_image_surface_create = dl_symbol("cairo_image_surface_create");

        fp_cairo_surface_destroy = dl_symbol("cairo_surface_destroy");

        fp_cairo_create = dl_symbol("cairo_create");

        fp_cairo_destroy = dl_symbol("cairo_destroy");

        fp_cairo_fill = dl_symbol("cairo_fill");

        fp_cairo_rectangle = dl_symbol("cairo_rectangle");

        fp_cairo_set_source_rgb = dl_symbol("cairo_set_source_rgb");

        fp_cairo_set_source_rgba = dl_symbol("cairo_set_source_rgba");

        fp_cairo_surface_flush = dl_symbol("cairo_surface_flush");

        fp_cairo_paint = dl_symbol("cairo_paint");

        fp_cairo_clip = dl_symbol("cairo_clip");

        fp_cairo_image_surface_get_data =

                       dl_symbol("cairo_image_surface_get_data");

        fp_cairo_image_surface_get_stride =

                       dl_symbol("cairo_image_surface_get_stride");

        fp_gdk_pixbuf_get_from_surface =

                       dl_symbol("gdk_pixbuf_get_from_surface");

        fp_gtk_widget_get_state = dl_symbol("gtk_widget_get_state");

        fp_gtk_widget_set_state = dl_symbol("gtk_widget_set_state");

        fp_gtk_widget_is_focus = dl_symbol("gtk_widget_is_focus");

        fp_gtk_widget_set_allocation = dl_symbol("gtk_widget_set_allocation");

        fp_gtk_widget_get_parent = dl_symbol("gtk_widget_get_parent");

        fp_gtk_widget_get_window = dl_symbol("gtk_widget_get_window");

        fp_gtk_widget_get_style_context =

                       dl_symbol("gtk_widget_get_style_context");

        fp_gtk_style_context_get_color =

                       dl_symbol("gtk_style_context_get_color");

        fp_gtk_style_context_get_background_color =

                       dl_symbol("gtk_style_context_get_background_color");

        fp_gtk_widget_get_state_flags = dl_symbol("gtk_widget_get_state_flags");

        fp_gtk_style_context_set_state =

                       dl_symbol("gtk_style_context_set_state");

        fp_gtk_style_context_add_class =

                       dl_symbol("gtk_style_context_add_class");

        fp_gtk_style_context_save = dl_symbol("gtk_style_context_save");

        fp_gtk_style_context_restore = dl_symbol("gtk_style_context_restore");

        fp_gtk_render_check = dl_symbol("gtk_render_check");

        fp_gtk_render_option = dl_symbol("gtk_render_option");

        fp_gtk_render_extension = dl_symbol("gtk_render_extension");

        fp_gtk_render_expander = dl_symbol("gtk_render_expander");

        fp_gtk_render_frame_gap = dl_symbol("gtk_render_frame_gap");

        fp_gtk_render_line = dl_symbol("gtk_render_line");

        fp_gtk_widget_render_icon_pixbuf =

                      dl_symbol("gtk_widget_render_icon_pixbuf");

        if (fp_gtk_check_version(3, 10, 0)) {

            gtk3_version_3_10 = FALSE;

        } else {

            fp_gdk_window_create_similar_image_surface =

                       dl_symbol("gdk_window_create_similar_image_surface");

            fp_gdk_window_get_scale_factor =

                    dl_symbol("gdk_window_get_scale_factor");

        }

        gtk3_version_3_14 = !fp_gtk_check_version(3, 14, 0);

        if (!fp_gtk_check_version(3, 20, 0)) {

            gtk3_version_3_20 = TRUE;

            fp_gtk_widget_path_copy = dl_symbol("gtk_widget_path_copy");

            fp_gtk_widget_path_new = dl_symbol("gtk_widget_path_new");

            fp_gtk_widget_path_append_type = dl_symbol("gtk_widget_path_append_type");

            fp_gtk_widget_path_iter_set_object_name = dl_symbol("gtk_widget_path_iter_set_object_name");

            fp_gtk_style_context_set_path = dl_symbol("gtk_style_context_set_path");

            fp_gtk_widget_path_unref = dl_symbol("gtk_widget_path_unref");

            fp_gtk_style_context_get_path = dl_symbol("gtk_style_context_get_path");

            fp_gtk_style_context_new = dl_symbol("gtk_style_context_new");

        }

        fp_gdk_window_create_similar_surface =

                      dl_symbol("gdk_window_create_similar_surface");

        fp_gtk_settings_get_for_screen =

                      dl_symbol("gtk_settings_get_for_screen");

        fp_gtk_widget_get_screen = dl_symbol("gtk_widget_get_screen");

        fp_gtk_css_provider_get_named = dl_symbol("gtk_css_provider_get_named");

        fp_gtk_style_context_add_provider =

                      dl_symbol("gtk_style_context_add_provider");

        fp_gtk_render_frame = dl_symbol("gtk_render_frame");

        fp_gtk_render_focus = dl_symbol("gtk_render_focus");

        fp_gtk_render_handle = dl_symbol("gtk_render_handle");

        fp_gtk_render_arrow = dl_symbol("gtk_render_arrow");

        fp_gtk_style_context_get_property =

                      dl_symbol("gtk_style_context_get_property");

        fp_gtk_scrolled_window_set_shadow_type =

                      dl_symbol("gtk_scrolled_window_set_shadow_type");

        fp_gtk_render_slider = dl_symbol("gtk_render_slider");

        fp_gtk_style_context_get_padding =

                      dl_symbol("gtk_style_context_get_padding");

        fp_gtk_range_set_inverted = dl_symbol("gtk_range_set_inverted");

        fp_gtk_style_context_get_font = dl_symbol("gtk_style_context_get_font");

        fp_gtk_widget_get_allocated_width =

                      dl_symbol("gtk_widget_get_allocated_width");

        fp_gtk_widget_get_allocated_height =

                      dl_symbol("gtk_widget_get_allocated_height");

        fp_gtk_icon_theme_get_default = dl_symbol("gtk_icon_theme_get_default");

        fp_gtk_icon_theme_load_icon = dl_symbol("gtk_icon_theme_load_icon");

        fp_gtk_adjustment_set_lower = dl_symbol("gtk_adjustment_set_lower");

        fp_gtk_adjustment_set_page_increment =

                      dl_symbol("gtk_adjustment_set_page_increment");

        fp_gtk_adjustment_set_page_size =

                      dl_symbol("gtk_adjustment_set_page_size");

        fp_gtk_adjustment_set_step_increment =

                      dl_symbol("gtk_adjustment_set_step_increment");

        fp_gtk_adjustment_set_upper = dl_symbol("gtk_adjustment_set_upper");

        fp_gtk_adjustment_set_value = dl_symbol("gtk_adjustment_set_value");

        fp_gtk_render_activity = dl_symbol("gtk_render_activity");

        fp_gtk_render_background = dl_symbol("gtk_render_background");

        fp_gtk_style_context_has_class =

                      dl_symbol("gtk_style_context_has_class");

        fp_gtk_style_context_set_junction_sides =

                      dl_symbol("gtk_style_context_set_junction_sides");

        fp_gtk_style_context_add_region =

                      dl_symbol("gtk_style_context_add_region");

        fp_gtk_init_check = dl_symbol("gtk_init_check");

        /* GTK widgets */

        fp_gtk_arrow_new = dl_symbol("gtk_arrow_new");

        fp_gtk_button_new = dl_symbol("gtk_button_new");

        fp_gtk_spin_button_new = dl_symbol("gtk_spin_button_new");

        fp_gtk_check_button_new = dl_symbol("gtk_check_button_new");

        fp_gtk_check_menu_item_new =

                dl_symbol("gtk_check_menu_item_new");

        fp_gtk_color_selection_dialog_new =

                dl_symbol("gtk_color_selection_dialog_new");

        fp_gtk_entry_new = dl_symbol("gtk_entry_new");

        fp_gtk_fixed_new = dl_symbol("gtk_fixed_new");

        fp_gtk_handle_box_new = dl_symbol("gtk_handle_box_new");

        fp_gtk_image_new = dl_symbol("gtk_image_new");

        fp_gtk_paned_new = dl_symbol("gtk_paned_new");

        fp_gtk_scale_new = dl_symbol("gtk_scale_new");

        fp_gtk_hscrollbar_new = dl_symbol("gtk_hscrollbar_new");

        fp_gtk_vscrollbar_new = dl_symbol("gtk_vscrollbar_new");

        fp_gtk_hseparator_new = dl_symbol("gtk_hseparator_new");

        fp_gtk_vseparator_new = dl_symbol("gtk_vseparator_new");

        fp_gtk_label_new = dl_symbol("gtk_label_new");

        fp_gtk_menu_new = dl_symbol("gtk_menu_new");

        fp_gtk_menu_bar_new = dl_symbol("gtk_menu_bar_new");

        fp_gtk_menu_item_new = dl_symbol("gtk_menu_item_new");

        fp_gtk_menu_item_set_submenu =

                dl_symbol("gtk_menu_item_set_submenu");

        fp_gtk_notebook_new = dl_symbol("gtk_notebook_new");

        fp_gtk_progress_bar_new =

            dl_symbol("gtk_progress_bar_new");

        fp_gtk_progress_bar_set_orientation =

            dl_symbol("gtk_orientable_set_orientation");

        fp_gtk_radio_button_new =

            dl_symbol("gtk_radio_button_new");

        fp_gtk_radio_menu_item_new =

            dl_symbol("gtk_radio_menu_item_new");

        fp_gtk_scrolled_window_new =

            dl_symbol("gtk_scrolled_window_new");

        fp_gtk_separator_menu_item_new =

            dl_symbol("gtk_separator_menu_item_new");

        fp_gtk_text_view_new = dl_symbol("gtk_text_view_new");

        fp_gtk_toggle_button_new =

            dl_symbol("gtk_toggle_button_new");

        fp_gtk_toolbar_new = dl_symbol("gtk_toolbar_new");

        fp_gtk_tree_view_new = dl_symbol("gtk_tree_view_new");

        fp_gtk_viewport_new = dl_symbol("gtk_viewport_new");

        fp_gtk_window_new = dl_symbol("gtk_window_new");

        fp_gtk_window_present = dl_symbol("gtk_window_present");

        fp_gtk_window_move = dl_symbol("gtk_window_move");

        fp_gtk_window_resize = dl_symbol("gtk_window_resize");

          fp_gtk_dialog_new = dl_symbol("gtk_dialog_new");

        fp_gtk_frame_new = dl_symbol("gtk_frame_new");

        fp_gtk_adjustment_new = dl_symbol("gtk_adjustment_new");

        fp_gtk_container_add = dl_symbol("gtk_container_add");

        fp_gtk_menu_shell_append =

            dl_symbol("gtk_menu_shell_append");