/*

 * Copyright 2004-2006 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 <stdlib.h>

#include <string.h>

#include <unistd.h>

#include <dlfcn.h>

#include <jni.h>

#include "sun_awt_UNIXToolkit.h"

#ifndef HEADLESS

#include "awt.h"

#include "gtk2_interface.h"

#endif /* !HEADLESS */

static jclass this_class = NULL;

static jmethodID icon_upcall_method = NULL;

/*

 * Class:     sun_awt_UNIXToolkit

 * Method:    check_gtk

 * Signature: ()Z

 */

JNIEXPORT jboolean JNICALL

Java_sun_awt_UNIXToolkit_check_1gtk(JNIEnv *env, jclass klass)

{

#ifndef HEADLESS

    return (jboolean)gtk2_check_version();

#else

    return JNI_FALSE;

#endif /* !HEADLESS */

}

/*

 * Class:     sun_awt_UNIXToolkit

 * Method:    load_gtk

 * Signature: ()Z

 */

JNIEXPORT jboolean JNICALL

Java_sun_awt_UNIXToolkit_load_1gtk(JNIEnv *env, jclass klass)

{

#ifndef HEADLESS

    return (jboolean)gtk2_load();

#else

    return JNI_FALSE;

#endif /* !HEADLESS */

}

/*

 * Class:     sun_awt_UNIXToolkit

 * Method:    unload_gtk

 * Signature: ()Z

 */

JNIEXPORT jboolean JNICALL

Java_sun_awt_UNIXToolkit_unload_1gtk(JNIEnv *env, jclass klass)

{

#ifndef HEADLESS

    return (jboolean)gtk2_unload();

#else

    return JNI_FALSE;

#endif /* !HEADLESS */

}

jboolean _icon_upcall(JNIEnv *env, jobject this, GdkPixbuf *pixbuf)

{

    jboolean result = JNI_FALSE;

    if (this_class == NULL) {

        this_class = (*env)->NewGlobalRef(env,

                                          (*env)->GetObjectClass(env, this));

        icon_upcall_method = (*env)->GetMethodID(env, this_class,

                                 "loadIconCallback", "([BIIIIIZ)V");

    }

    if (pixbuf != NULL)

    {

        guchar *pixbuf_data = (*fp_gdk_pixbuf_get_pixels)(pixbuf);

        int row_stride = (*fp_gdk_pixbuf_get_rowstride)(pixbuf);

        int width = (*fp_gdk_pixbuf_get_width)(pixbuf);

        int height = (*fp_gdk_pixbuf_get_height)(pixbuf);

        int bps = (*fp_gdk_pixbuf_get_bits_per_sample)(pixbuf);

        int channels = (*fp_gdk_pixbuf_get_n_channels)(pixbuf);

        gboolean alpha = (*fp_gdk_pixbuf_get_has_alpha)(pixbuf);

        /* Copy the data array into a Java structure so we can pass it back. */

        jbyteArray data = (*env)->NewByteArray(env, (row_stride * height));

        (*env)->SetByteArrayRegion(env, data, 0, (row_stride * height),

                                   pixbuf_data);

        /* Release the pixbuf. */

        (*fp_g_object_unref)(pixbuf);

        /* Call the callback method to create the image on the Java side. */

        (*env)->CallVoidMethod(env, this, icon_upcall_method, data,

                width, height, row_stride, bps, channels, alpha);

        result = JNI_TRUE;

    }

    return result;

}

/*

 * Class:     sun_awt_UNIXToolkit

 * Method:    load_gtk_icon

 * Signature: (Ljava/lang/String)Z

 *

 * This method assumes that GTK libs are present.

 */

JNIEXPORT jboolean JNICALL

Java_sun_awt_UNIXToolkit_load_1gtk_1icon(JNIEnv *env, jobject this,

        jstring filename)

{

#ifndef HEADLESS

    int len;

    char *filename_str = NULL;

    GError **error = NULL;

    GdkPixbuf *pixbuf;

    if (filename == NULL)

    {

        return JNI_FALSE;

    }

    len = (*env)->GetStringUTFLength(env, filename);

    filename_str = (char *)malloc(sizeof(char) * (len + 1));

    if (filename_str == NULL) {

        JNU_ThrowOutOfMemoryError(env, "OutOfMemoryError");

        return JNI_FALSE;

    }

    (*env)->GetStringUTFRegion(env, filename, 0, len, filename_str);

    pixbuf = (*fp_gdk_pixbuf_new_from_file)(filename_str, error);

    /* Release the strings we've allocated. */

    free(filename_str);

    return _icon_upcall(env, this, pixbuf);

#else /* HEADLESS */

    return JNI_FALSE;

#endif /* !HEADLESS */

}

/*

 * Class:     sun_awt_UNIXToolkit

 * Method:    load_stock_icon

 * Signature: (ILjava/lang/String;IILjava/lang/String;)Z

 *

 * This method assumes that GTK libs are present.

 */

JNIEXPORT jboolean JNICALL

Java_sun_awt_UNIXToolkit_load_1stock_1icon(JNIEnv *env, jobject this,

        jint widget_type, jstring stock_id, jint icon_size,

        jint text_direction, jstring detail)

{

#ifndef HEADLESS

    int len;

    char *stock_id_str = NULL;

    char *detail_str = NULL;

    GdkPixbuf *pixbuf;

    if (stock_id == NULL)

    {

        return JNI_FALSE;

    }

    len = (*env)->GetStringUTFLength(env, stock_id);

    stock_id_str = (char *)malloc(sizeof(char) * (len + 1));

    if (stock_id_str == NULL) {

        JNU_ThrowOutOfMemoryError(env, "OutOfMemoryError");

        return JNI_FALSE;

    }

    (*env)->GetStringUTFRegion(env, stock_id, 0, len, stock_id_str);

    /* Detail isn't required so check for NULL. */

    if (detail != NULL)

    {

        len = (*env)->GetStringUTFLength(env, detail);

        detail_str = (char *)malloc(sizeof(char) * (len + 1));

        if (detail_str == NULL) {

            JNU_ThrowOutOfMemoryError(env, "OutOfMemoryError");

            return JNI_FALSE;

        }

        (*env)->GetStringUTFRegion(env, detail, 0, len, detail_str);

    }

    pixbuf = gtk2_get_stock_icon(widget_type, stock_id_str, icon_size,

                                 text_direction, detail_str);

    /* Release the strings we've allocated. */

    free(stock_id_str);

    if (detail_str != NULL)

    {

        free(detail_str);

    }

    return _icon_upcall(env, this, pixbuf);

#else /* HEADLESS */

    return JNI_FALSE;

#endif /* !HEADLESS */

}

/*

 * Class:     sun_awt_UNIXToolkit

 * Method:    nativeSync

 * Signature: ()V

 */

JNIEXPORT void JNICALL

Java_sun_awt_UNIXToolkit_nativeSync(JNIEnv *env, jobject this)

{

#ifndef HEADLESS

    AWT_LOCK();

    XSync(awt_display, False);

    AWT_UNLOCK();

#endif /* !HEADLESS */

}

/*

 * Class:     sun_awt_SunToolkit

 * Method:    closeSplashScreen

 * Signature: ()V

 */

JNIEXPORT void JNICALL

Java_sun_awt_SunToolkit_closeSplashScreen(JNIEnv *env, jclass cls)

{

    typedef void (*SplashClose_t)();

    SplashClose_t splashClose;

    void* hSplashLib = dlopen(0, RTLD_LAZY);

    if (!hSplashLib) {

        return;

    }

    splashClose = (SplashClose_t)dlsym(hSplashLib,

        "SplashClose");

    if (splashClose) {

        splashClose();

    }

    dlclose(hSplashLib);

}