/*
   Copyright (C) 1999-2006 Id Software, Inc. and contributors.
   For a list of contributors, see the accompanying CONTRIBUTORS file.

   This file is part of GtkRadiant.

   GtkRadiant 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
   (at your option) any later version.

   GtkRadiant 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 GtkRadiant; if not, write to the Free Software
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 */

//
// Base dialog class, provides a way to run modal dialogs and
// set/get the widget values in member variables.
//
// Leonardo Zide (leo@lokigames.com)
//

#include "dialog.h"

#include <gtk/gtk.h>

#include "debugging/debugging.h"


#include "mainframe.h"

#include <stdlib.h>

#include "stream/stringstream.h"
#include "convert.h"
#include "gtkutil/dialog.h"
#include "gtkutil/button.h"
#include "gtkutil/entry.h"
#include "gtkutil/image.h"

#include "gtkmisc.h"


ui::Entry DialogEntry_new()
{
    auto entry = ui::Entry(ui::New);
    entry.show();
    entry.dimensions(64, -1);
    return entry;
}

class DialogEntryRow {
public:
    DialogEntryRow(ui::Widget row, ui::Entry entry) : m_row(row), m_entry(entry)
    {
    }

    ui::Widget m_row;
    ui::Entry m_entry;
};

DialogEntryRow DialogEntryRow_new(const char *name)
{
    auto alignment = ui::Alignment(0.0, 0.5, 0.0, 0.0);
    alignment.show();

    auto entry = DialogEntry_new();
    alignment.add(entry);

    return DialogEntryRow(ui::Widget(DialogRow_new(name, alignment)), entry);
}


ui::SpinButton DialogSpinner_new(double value, double lower, double upper, int fraction)
{
    double step = 1.0 / double(fraction);
    unsigned int digits = 0;
    for (; fraction > 1; fraction /= 10) {
        ++digits;
    }
    auto spin = ui::SpinButton(ui::Adjustment(value, lower, upper, step, 10, 0), step, digits);
    spin.show();
    spin.dimensions(64, -1);
    return spin;
}

class DialogSpinnerRow {
public:
    DialogSpinnerRow(ui::Widget row, ui::SpinButton spin) : m_row(row), m_spin(spin)
    {
    }

    ui::Widget m_row;
    ui::SpinButton m_spin;
};

DialogSpinnerRow DialogSpinnerRow_new(const char *name, double value, double lower, double upper, int fraction)
{
    auto alignment = ui::Alignment(0.0, 0.5, 0.0, 0.0);
    alignment.show();

    auto spin = DialogSpinner_new(value, lower, upper, fraction);
    alignment.add(spin);

    return DialogSpinnerRow(ui::Widget(DialogRow_new(name, alignment)), spin);
}


struct BoolToggle {
    static void Export(const ui::ToggleButton &self, const Callback<void(bool)> &returnz)
    {
        returnz(self.active());
    }

    static void Import(ui::ToggleButton &self, bool value)
    {
        self.active(value);
    }
};

using BoolToggleImportExport = PropertyAdaptor<ui::ToggleButton, bool, BoolToggle>;

struct IntEntry {
    static void Export(const ui::Entry &self, const Callback<void(int)> &returnz)
    {
        returnz(atoi(gtk_entry_get_text(self)));
    }

    static void Import(ui::Entry &self, int value)
    {
        entry_set_int(self, value);
    }
};

using IntEntryImportExport = PropertyAdaptor<ui::Entry, int, IntEntry>;

struct IntRadio {
    static void Export(const ui::RadioButton &self, const Callback<void(int)> &returnz)
    {
        returnz(radio_button_get_active(self));
    }

    static void Import(ui::RadioButton &self, int value)
    {
        radio_button_set_active(self, value);
    }
};

using IntRadioImportExport = PropertyAdaptor<ui::RadioButton, int, IntRadio>;

struct IntCombo {
    static void Export(const ui::ComboBox &self, const Callback<void(int)> &returnz)
    {
        returnz(gtk_combo_box_get_active(self));
    }

    static void Import(ui::ComboBox &self, int value)
    {
        gtk_combo_box_set_active(self, value);
    }
};

using IntComboImportExport = PropertyAdaptor<ui::ComboBox, int, IntCombo>;

struct IntAdjustment {
    static void Export(const ui::Adjustment &self, const Callback<void(int)> &returnz)
    {
        returnz(int(gtk_adjustment_get_value(self)));
    }

    static void Import(ui::Adjustment &self, int value)
    {
        gtk_adjustment_set_value(self, value);
    }
};

using IntAdjustmentImportExport = PropertyAdaptor<ui::Adjustment, int, IntAdjustment>;

struct IntSpinner {
    static void Export(const ui::SpinButton &self, const Callback<void(int)> &returnz)
    {
        returnz(gtk_spin_button_get_value_as_int(self));
    }

    static void Import(ui::SpinButton &self, int value)
    {
        gtk_spin_button_set_value(self, value);
    }
};

using IntSpinnerImportExport = PropertyAdaptor<ui::SpinButton, int, IntSpinner>;

struct TextEntry {
    static void Export(const ui::Entry &self, const Callback<void(const char *)> &returnz)
    {
        returnz(gtk_entry_get_text(self));
    }

    static void Import(ui::Entry &self, const char *value)
    {
        self.text(value);
    }
};

using TextEntryImportExport = PropertyAdaptor<ui::Entry, const char *, TextEntry>;

struct SizeEntry {
    static void Export(const ui::Entry &self, const Callback<void(std::size_t)> &returnz)
    {
        int value = atoi(gtk_entry_get_text(self));
        if (value < 0) {
            value = 0;
        }
        returnz(value);
    }

    static void Import(ui::Entry &self, std::size_t value)
    {
        entry_set_int(self, int(value));
    }
};

using SizeEntryImportExport = PropertyAdaptor<ui::Entry, std::size_t, SizeEntry>;

struct FloatEntry {
    static void Export(const ui::Entry &self, const Callback<void(float)> &returnz)
    {
        returnz(float(atof(gtk_entry_get_text(self))));
    }

    static void Import(ui::Entry &self, float value)
    {
        entry_set_float(self, value);
    }
};

using FloatEntryImportExport = PropertyAdaptor<ui::Entry, float, FloatEntry>;

struct FloatSpinner {
    static void Export(const ui::SpinButton &self, const Callback<void(float)> &returnz)
    {
        returnz(float(gtk_spin_button_get_value(self)));
    }

    static void Import(ui::SpinButton &self, float value)
    {
        gtk_spin_button_set_value(self, value);
    }
};

using FloatSpinnerImportExport = PropertyAdaptor<ui::SpinButton, float, FloatSpinner>;


template<typename T>
class CallbackDialogData : public DLG_DATA {
    Property<T> m_pWidget;
    Property<T> m_pData;

public:
    CallbackDialogData(const Property<T> &pWidget, const Property<T> &pData)
            : m_pWidget(pWidget), m_pData(pData)
    {
    }

    void release()
    {
        delete this;
    }

    void importData() const
    {
        m_pData.get(m_pWidget.set);
    }

    void exportData() const
    {
        m_pWidget.get(m_pData.set);
    }
};

template<class Widget>
void AddDataCustom(DialogDataList &self, typename Widget::Type widget, Property<typename Widget::Other> const &property)
{
    using Self = typename Widget::Type;
    using T = typename Widget::Other;
    using native = typename std::remove_pointer<typename Self::native>::type;
    struct Wrapper {
        static void Export(const native &self, const Callback<void(T)> &returnz)
        {
            native *p = &const_cast<native &>(self);
            auto widget = Self::from(p);
            Widget::Get::thunk_(widget, returnz);
        }

        static void Import(native &self, T value)
        {
            native *p = &self;
            auto widget = Self::from(p);
            Widget::Set::thunk_(widget, value);
        }
    };
    self.push_back(new CallbackDialogData<typename Widget::Other>(
            make_property<PropertyAdaptor<native, T, Wrapper>>(*static_cast<native *>(widget)),
            property
    ));
}

template<class Widget, class D>
void AddData(DialogDataList &self, typename Widget::Type widget, D &data)
{
    AddDataCustom<Widget>(self, widget, make_property<PropertyAdaptor<D, typename Widget::Other>>(data));
}

// =============================================================================
// Dialog class

Dialog::Dialog() : m_window(ui::null), m_parent(ui::null)
{
}

Dialog::~Dialog()
{
    for (DialogDataList::iterator i = m_data.begin(); i != m_data.end(); ++i) {
        (*i)->release();
    }

    ASSERT_MESSAGE(!m_window, "dialog window not destroyed");
}

void Dialog::ShowDlg()
{
    ASSERT_MESSAGE(m_window, "dialog was not constructed");
    importData();
    m_window.show();
}

void Dialog::HideDlg()
{
    ASSERT_MESSAGE(m_window, "dialog was not constructed");
    exportData();
    m_window.hide();
}

static gint delete_event_callback(ui::Widget widget, GdkEvent *event, gpointer data)
{
    reinterpret_cast<Dialog *>( data )->HideDlg();
    reinterpret_cast<Dialog *>( data )->EndModal(eIDCANCEL);
    return TRUE;
}

void Dialog::Create()
{
    ASSERT_MESSAGE(!m_window, "dialog cannot be constructed");

    m_window = BuildDialog();
    m_window.connect("delete_event", G_CALLBACK(delete_event_callback), this);
}

void Dialog::Destroy()
{
    ASSERT_MESSAGE(m_window, "dialog cannot be destroyed");

    m_window.destroy();
    m_window = ui::Window{ui::null};
}


void Dialog::AddBoolToggleData(ui::ToggleButton widget, Property<bool> const &cb)
{
    AddDataCustom<BoolToggleImportExport>(m_data, widget, cb);
}

void Dialog::AddIntRadioData(ui::RadioButton widget, Property<int> const &cb)
{
    AddDataCustom<IntRadioImportExport>(m_data, widget, cb);
}

void Dialog::AddTextEntryData(ui::Entry widget, Property<const char *> const &cb)
{
    AddDataCustom<TextEntryImportExport>(m_data, widget, cb);
}

void Dialog::AddIntEntryData(ui::Entry widget, Property<int> const &cb)
{
    AddDataCustom<IntEntryImportExport>(m_data, widget, cb);
}

void Dialog::AddSizeEntryData(ui::Entry widget, Property<std::size_t> const &cb)
{
    AddDataCustom<SizeEntryImportExport>(m_data, widget, cb);
}

void Dialog::AddFloatEntryData(ui::Entry widget, Property<float> const &cb)
{
    AddDataCustom<FloatEntryImportExport>(m_data, widget, cb);
}

void Dialog::AddFloatSpinnerData(ui::SpinButton widget, Property<float> const &cb)
{
    AddDataCustom<FloatSpinnerImportExport>(m_data, widget, cb);
}

void Dialog::AddIntSpinnerData(ui::SpinButton widget, Property<int> const &cb)
{
    AddDataCustom<IntSpinnerImportExport>(m_data, widget, cb);
}

void Dialog::AddIntAdjustmentData(ui::Adjustment widget, Property<int> const &cb)
{
    AddDataCustom<IntAdjustmentImportExport>(m_data, widget, cb);
}

void Dialog::AddIntComboData(ui::ComboBox widget, Property<int> const &cb)
{
    AddDataCustom<IntComboImportExport>(m_data, widget, cb);
}


void Dialog::AddDialogData(ui::ToggleButton widget, bool &data)
{
    AddData<BoolToggleImportExport>(m_data, widget, data);
}

void Dialog::AddDialogData(ui::RadioButton widget, int &data)
{
    AddData<IntRadioImportExport>(m_data, widget, data);
}

void Dialog::AddDialogData(ui::Entry widget, CopiedString &data)
{
    AddData<TextEntryImportExport>(m_data, widget, data);
}

void Dialog::AddDialogData(ui::Entry widget, int &data)
{
    AddData<IntEntryImportExport>(m_data, widget, data);
}

void Dialog::AddDialogData(ui::Entry widget, std::size_t &data)
{
    AddData<SizeEntryImportExport>(m_data, widget, data);
}

void Dialog::AddDialogData(ui::Entry widget, float &data)
{
    AddData<FloatEntryImportExport>(m_data, widget, data);
}

void Dialog::AddDialogData(ui::SpinButton widget, float &data)
{
    AddData<FloatSpinnerImportExport>(m_data, widget, data);
}

void Dialog::AddDialogData(ui::SpinButton widget, int &data)
{
    AddData<IntSpinnerImportExport>(m_data, widget, data);
}

void Dialog::AddDialogData(ui::Adjustment widget, int &data)
{
    AddData<IntAdjustmentImportExport>(m_data, widget, data);
}

void Dialog::AddDialogData(ui::ComboBox widget, int &data)
{
    AddData<IntComboImportExport>(m_data, widget, data);
}

void Dialog::exportData()
{
    for (DialogDataList::iterator i = m_data.begin(); i != m_data.end(); ++i) {
        (*i)->exportData();
    }
}

void Dialog::importData()
{
    for (DialogDataList::iterator i = m_data.begin(); i != m_data.end(); ++i) {
        (*i)->importData();
    }
}

void Dialog::EndModal(EMessageBoxReturn code)
{
    m_modal.loop = 0;
    m_modal.ret = code;
}

EMessageBoxReturn Dialog::DoModal()
{
    importData();

    PreModal();

    EMessageBoxReturn ret = modal_dialog_show(m_window, m_modal);
    ASSERT_TRUE((bool) m_window);
    if (ret == eIDOK) {
        exportData();
    }

    m_window.hide();

    PostModal(m_modal.ret);

    return m_modal.ret;
}


ui::CheckButton Dialog::addCheckBox(ui::VBox vbox, const char *name, const char *flag, Property<bool> const &cb)
{
    auto check = ui::CheckButton(flag);
    check.show();
    AddBoolToggleData(check, cb);

    DialogVBox_packRow(vbox, ui::Widget(DialogRow_new(name, check)));
    return check;
}

ui::CheckButton Dialog::addCheckBox(ui::VBox vbox, const char *name, const char *flag, bool &data)
{
    return addCheckBox(vbox, name, flag, make_property(data));
}

void Dialog::addCombo(ui::VBox vbox, const char *name, StringArrayRange values, Property<int> const &cb)
{
    auto alignment = ui::Alignment(0.0, 0.5, 0.0, 0.0);
    alignment.show();
    {
        auto combo = ui::ComboBoxText(ui::New);

        for (StringArrayRange::Iterator i = values.first; i != values.last; ++i) {
            gtk_combo_box_text_append_text(GTK_COMBO_BOX_TEXT(combo), *i);
        }

        AddIntComboData(combo, cb);

        combo.show();
        alignment.add(combo);
    }

    auto row = DialogRow_new(name, alignment);
    DialogVBox_packRow(vbox, row);
}

void Dialog::addCombo(ui::VBox vbox, const char *name, int &data, StringArrayRange values)
{
    addCombo(vbox, name, values, make_property(data));
}

void
Dialog::addSlider(ui::VBox vbox, const char *name, int &data, gboolean draw_value, const char *low, const char *high,
                  double value, double lower, double upper, double step_increment, double page_increment)
{
#if 0
    if ( draw_value == FALSE ) {
        auto hbox2 = ui::HBox( FALSE, 0 );
        hbox2.show();
        vbox.pack_start( hbox2 , FALSE, FALSE, 0 );
        {
            ui::Widget label = ui::Label( low );
            label.show();
            hbox2.pack_start( label, FALSE, FALSE, 0 );
        }
        {
            ui::Widget label = ui::Label( high );
            label.show();
            hbox2.pack_end(label, FALSE, FALSE, 0);
        }
    }
#endif

    // adjustment
    auto adj = ui::Adjustment(value, lower, upper, step_increment, page_increment, 0);
    AddIntAdjustmentData(adj, make_property(data));

    // scale
    auto alignment = ui::Alignment(0.0, 0.5, 1.0, 0.0);
    alignment.show();

    ui::Widget scale = ui::HScale(adj);
    gtk_scale_set_value_pos(GTK_SCALE(scale), GTK_POS_LEFT);
    scale.show();
    alignment.add(scale);

    gtk_scale_set_draw_value(GTK_SCALE(scale), draw_value);
    gtk_scale_set_digits(GTK_SCALE(scale), 0);

    auto row = DialogRow_new(name, alignment);
    DialogVBox_packRow(vbox, row);
}

void Dialog::addRadio(ui::VBox vbox, const char *name, StringArrayRange names, Property<int> const &cb)
{
    auto alignment = ui::Alignment(0.0, 0.5, 0.0, 0.0);
    alignment.show();;
    {
        RadioHBox radioBox = RadioHBox_new(names);
        alignment.add(radioBox.m_hbox);
        AddIntRadioData(radioBox.m_radio, cb);
    }

    auto row = DialogRow_new(name, alignment);
    DialogVBox_packRow(vbox, row);
}

void Dialog::addRadio(ui::VBox vbox, const char *name, int &data, StringArrayRange names)
{
    addRadio(vbox, name, names, make_property(data));
}

void Dialog::addRadioIcons(ui::VBox vbox, const char *name, StringArrayRange icons, Property<int> const &cb)
{
    auto table = ui::Table(2, icons.last - icons.first, FALSE);
    table.show();

    gtk_table_set_row_spacings(table, 5);
    gtk_table_set_col_spacings(table, 5);

    GSList *group = 0;
    ui::RadioButton radio{ui::null};
    for (StringArrayRange::Iterator icon = icons.first; icon != icons.last; ++icon) {
        guint pos = static_cast<guint>( icon - icons.first );
        auto image = new_local_image(*icon);
        image.show();
        table.attach(image, {pos, pos + 1, 0, 1}, {0, 0});

        radio = ui::RadioButton::from(gtk_radio_button_new(group));
        radio.show();
        table.attach(radio, {pos, pos + 1, 1, 2}, {0, 0});

        group = gtk_radio_button_get_group(GTK_RADIO_BUTTON(radio));
    }

    AddIntRadioData(radio, cb);

    DialogVBox_packRow(vbox, DialogRow_new(name, table));
}

void Dialog::addRadioIcons(ui::VBox vbox, const char *name, int &data, StringArrayRange icons)
{
    addRadioIcons(vbox, name, icons, make_property(data));
}

ui::Widget Dialog::addIntEntry(ui::VBox vbox, const char *name, Property<int> const &cb)
{
    DialogEntryRow row(DialogEntryRow_new(name));
    AddIntEntryData(row.m_entry, cb);
    DialogVBox_packRow(vbox, row.m_row);
    return row.m_row;
}

ui::Widget Dialog::addSizeEntry(ui::VBox vbox, const char *name, Property<std::size_t> const &cb)
{
    DialogEntryRow row(DialogEntryRow_new(name));
    AddSizeEntryData(row.m_entry, cb);
    DialogVBox_packRow(vbox, row.m_row);
    return row.m_row;
}

ui::Widget Dialog::addFloatEntry(ui::VBox vbox, const char *name, Property<float> const &cb)
{
    DialogEntryRow row(DialogEntryRow_new(name));
    AddFloatEntryData(row.m_entry, cb);
    DialogVBox_packRow(vbox, row.m_row);
    return row.m_row;
}

ui::Widget
Dialog::addPathEntry(ui::VBox vbox, const char *name, bool browse_directory, Property<const char *> const &cb)
{
    PathEntry pathEntry = PathEntry_new();
    pathEntry.m_button.connect("clicked", G_CALLBACK(
                                       browse_directory ? button_clicked_entry_browse_directory : button_clicked_entry_browse_file),
                               pathEntry.m_entry);

    AddTextEntryData(pathEntry.m_entry, cb);

    auto row = DialogRow_new(name, ui::Widget(pathEntry.m_frame));
    DialogVBox_packRow(vbox, row);

    return row;
}

ui::Widget Dialog::addPathEntry(ui::VBox vbox, const char *name, CopiedString &data, bool browse_directory)
{
    return addPathEntry(vbox, name, browse_directory, make_property<CopiedString, const char *>(data));
}

ui::SpinButton
Dialog::addSpinner(ui::VBox vbox, const char *name, double value, double lower, double upper, Property<int> const &cb)
{
    DialogSpinnerRow row(DialogSpinnerRow_new(name, value, lower, upper, 1));
    AddIntSpinnerData(row.m_spin, cb);
    DialogVBox_packRow(vbox, row.m_row);
    return row.m_spin;
}

ui::SpinButton Dialog::addSpinner(ui::VBox vbox, const char *name, int &data, double value, double lower, double upper)
{
    return addSpinner(vbox, name, value, lower, upper, make_property(data));
}

ui::SpinButton
Dialog::addSpinner(ui::VBox vbox, const char *name, double value, double lower, double upper, Property<float> const &cb)
{
    DialogSpinnerRow row(DialogSpinnerRow_new(name, value, lower, upper, 10));
    AddFloatSpinnerData(row.m_spin, cb);
    DialogVBox_packRow(vbox, row.m_row);
    return row.m_spin;
}