/*
 * Carla Bridge Toolkit, Gtk version
 * Copyright (C) 2011-2013 Filipe Coelho <falktx@falktx.com>
 *
 * This program 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 of
 * the License, or any later version.
 *
 * This program 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.
 *
 * For a full copy of the GNU General Public License see the GPL.txt file
 */

#include "CarlaBridgeClient.hpp"
#include "CarlaBridgeToolkit.hpp"

#if defined(BRIDGE_COCOA) || defined(BRIDGE_HWND) || defined(BRIDGE_X11)
# error Embed UI uses Qt
#endif

#include <gtk/gtk.h>
#include <QtCore/QSettings>

CARLA_BRIDGE_START_NAMESPACE

// -------------------------------------------------------------------------

#if defined(BRIDGE_GTK2)
static const char* const appName = "Carla-Gtk2UIs";
#elif defined(BRIDGE_GTK3)
static const char* const appName = "Carla-Gtk3UIs";
#else
static const char* const appName = "Carla-UIs";
#endif

static int    gargc = 0;
static char** gargv = {};

// -------------------------------------------------------------------------

class CarlaToolkitGtk : public CarlaBridgeToolkit
{
public:
    CarlaToolkitGtk(CarlaBridgeClient* const client, const char* const uiTitle)
        : CarlaBridgeToolkit(client, uiTitle),
          settings("falkTX", appName)
    {
        carla_debug("CarlaToolkitGtk::CarlaToolkitGtk(%p, \"%s\")", client, uiTitle);

        window = nullptr;

        lastX = 0;
        lastY = 0;
        lastWidth  = 0;
        lastHeight = 0;
    }

    ~CarlaToolkitGtk() override
    {
        carla_debug("CarlaToolkitGtk::~CarlaToolkitGtk()");

        if (window)
            gtk_widget_destroy(window);
    }

    void init() override
    {
        carla_debug("CarlaToolkitGtk::init()");
        CARLA_ASSERT(! window);

        gtk_init(&gargc, &gargv);

        window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
        gtk_window_resize(GTK_WINDOW(window), 30, 30);
        gtk_widget_hide(window);
    }

    void exec(const bool showGui) override
    {
        carla_debug("CarlaToolkitGtk::exec(%s)", bool2str(showGui));
        CARLA_ASSERT(window);
        CARLA_ASSERT(kClient);

        GtkWidget* const widget = (GtkWidget*)kClient->getWidget();

        gtk_container_add(GTK_CONTAINER(window), widget);

        gtk_window_set_resizable(GTK_WINDOW(window), kClient->isResizable());
        gtk_window_set_title(GTK_WINDOW(window), kUiTitle);

        if (settings.contains(QString("%1/pos_x").arg(kUiTitle)))
        {
            gtk_window_get_position(GTK_WINDOW(window), &lastX, &lastY);

            bool hasX, hasY;
            lastX = settings.value(QString("%1/pos_x").arg(kUiTitle), lastX).toInt(&hasX);
            lastY = settings.value(QString("%1/pos_y").arg(kUiTitle), lastY).toInt(&hasY);

            if (hasX && hasY)
                gtk_window_move(GTK_WINDOW(window), lastX, lastY);

            if (kClient->isResizable())
            {
                gtk_window_get_size(GTK_WINDOW(window), &lastWidth, &lastHeight);

                bool hasWidth, hasHeight;
                lastWidth  = settings.value(QString("%1/width").arg(kUiTitle), lastWidth).toInt(&hasWidth);
                lastHeight = settings.value(QString("%1/height").arg(kUiTitle), lastHeight).toInt(&hasHeight);

                if (hasWidth && hasHeight)
                    gtk_window_resize(GTK_WINDOW(window), lastWidth, lastHeight);
            }
        }

        if (showGui)
            show();
        else
            kClient->sendOscUpdate();

        // Timer
        g_timeout_add(50, gtk_ui_timeout, this);
        g_signal_connect(window, "destroy", G_CALLBACK(gtk_ui_destroy), this);

        // First idle
        handleTimeout();

        // Main loop
        gtk_main();
    }

    void quit() override
    {
        carla_debug("CarlaToolkitGtk::quit()");

        if (window)
        {
            gtk_widget_destroy(window);
            gtk_main_quit();

            window = nullptr;
        }
    }

    void show() override
    {
        carla_debug("CarlaToolkitGtk::show()");
        CARLA_ASSERT(window);

        if (window)
            gtk_widget_show_all(window);
    }

    void hide() override
    {
        carla_debug("CarlaToolkitGtk::hide()");
        CARLA_ASSERT(window);

        if (window)
        {
#ifdef BRIDGE_GTK2
            gtk_widget_hide_all(window);
#else
            gtk_widget_hide(window);
#endif
        }
    }

    void resize(int width, int height) override
    {
        carla_debug("CarlaToolkitGtk::resize(%i, %i)", width, height);
        CARLA_ASSERT(window);

        if (window)
            gtk_window_resize(GTK_WINDOW(window), width, height);
    }

    // ---------------------------------------------------------------------

protected:
    GtkWidget* window;
    QSettings settings;

    gint lastX, lastY, lastWidth, lastHeight;

    void handleDestroy()
    {
        carla_debug("CarlaToolkitGtk::handleDestroy()");

        window = nullptr;

        settings.setValue(QString("%1/pos_x").arg(kUiTitle), lastX);
        settings.setValue(QString("%1/pos_y").arg(kUiTitle), lastY);
        settings.setValue(QString("%1/width").arg(kUiTitle), lastWidth);
        settings.setValue(QString("%1/height").arg(kUiTitle), lastHeight);
        settings.sync();
    }

    gboolean handleTimeout()
    {
        if (window)
        {
            gtk_window_get_position(GTK_WINDOW(window), &lastX, &lastY);
            gtk_window_get_size(GTK_WINDOW(window), &lastWidth, &lastHeight);
        }

        // FIXME?
        return kClient->isOscControlRegistered() ? kClient->oscIdle() : false;
    }

    // ---------------------------------------------------------------------

private:
    static void gtk_ui_destroy(GtkWidget*, gpointer data)
    {
        CARLA_ASSERT(data);

        if (CarlaToolkitGtk* const _this_ = (CarlaToolkitGtk*)data)
            _this_->handleDestroy();

        gtk_main_quit();
    }

    static gboolean gtk_ui_timeout(gpointer data)
    {
        CARLA_ASSERT(data);

        if (CarlaToolkitGtk* const _this_ = (CarlaToolkitGtk*)data)
            return _this_->handleTimeout();

        return false;
    }
};

// -------------------------------------------------------------------------

CarlaBridgeToolkit* CarlaBridgeToolkit::createNew(CarlaBridgeClient* const client, const char* const uiTitle)
{
    return new CarlaToolkitGtk(client, uiTitle);
}

CARLA_BRIDGE_END_NAMESPACE