/*
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
 *
 * Copyright 2017 Olaf Wintermann. All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 *   1. Redistributions of source code must retain the above copyright
 *      notice, this list of conditions and the following disclaimer.
 *
 *   2. Redistributions in binary form must reproduce the above copyright
 *      notice, this list of conditions and the following disclaimer in the
 *      documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "../ui/window.h"
#include "../ui/properties.h"
#include "../common/context.h"

#include "menu.h"
#include "toolbar.h"
#include "container.h"

static int nwindows = 0;

static int window_default_width = 650;
static int window_default_height = 550;

void ui_exit_event(GtkWidget *widget, gpointer data) {
    UiObject *obj = data;
    UiEvent ev;
    ev.window = obj->window;
    ev.document = obj->ctx->document;
    ev.obj = obj;
    ev.eventdata = NULL;
    ev.intval = 0;
    
    if(obj->ctx->close_callback) {
        obj->ctx->close_callback(&ev, obj->ctx->close_data);
    }
    // TODO: free UiObject
    
    nwindows--;
#ifdef UI_GTK2
    if(nwindows == 0) {
        gtk_main_quit();
    }
#endif
}

static UiObject* create_window(char *title, void *window_data, UiBool simple) {
    UcxMempool *mp = ucx_mempool_new(256);
    UiObject *obj = ucx_mempool_calloc(mp, 1, sizeof(UiObject)); 
    
#ifndef UI_GTK2
    obj->widget = gtk_application_window_new(ui_get_application());
#else
    obj->widget = gtk_window_new(GTK_WINDOW_TOPLEVEL);
#endif
    
    
    obj->ctx = uic_context(obj, mp);
    obj->window = window_data;
    
    if(title != NULL) {
        gtk_window_set_title(GTK_WINDOW(obj->widget), title);
    }
    
    char *width = ui_get_property("ui.window.width");
    char *height = ui_get_property("ui.window.height");
    if(width && height) {
        gtk_window_set_default_size(
                GTK_WINDOW(obj->widget),
                atoi(width),
                atoi(height));
    } else {
        gtk_window_set_default_size(
                GTK_WINDOW(obj->widget),
                window_default_width,
                window_default_height);
    }
    
    g_signal_connect(
            obj->widget,
            "destroy",
            G_CALLBACK(ui_exit_event),
            obj);
    
    GtkWidget *vbox = ui_gtk_vbox_new(0);
    gtk_container_add(GTK_CONTAINER(obj->widget), vbox);
    
    if(!simple) {
        // menu
        GtkWidget *mb = ui_create_menubar(obj);
        if(mb) {
            gtk_box_pack_start(GTK_BOX(vbox), mb, FALSE, FALSE, 0);
        }

        // toolbar
        GtkWidget *tb = ui_create_toolbar(obj);
        if(tb) {
            gtk_box_pack_start(GTK_BOX(vbox), tb, FALSE, FALSE, 0);
        }
    }
    
    // window content
    // the content has a (TODO: not yet) configurable frame
    GtkWidget *frame = gtk_frame_new(NULL);
    gtk_frame_set_shadow_type(GTK_FRAME(frame), GTK_SHADOW_NONE);
    gtk_box_pack_start(GTK_BOX(vbox), frame, TRUE, TRUE, 0);
    
    // content vbox
    GtkWidget *content_box = ui_gtk_vbox_new(0);
    gtk_container_add(GTK_CONTAINER(frame), content_box);
    obj->container = ui_box_container(obj, content_box);
    
    nwindows++;
    return obj;
}


UiObject* ui_window(char *title, void *window_data) {
    return create_window(title, window_data, FALSE);
}

UiObject* ui_simplewindow(char *title, void *window_data) {
    return create_window(title, window_data, TRUE);
}

static char* ui_gtkfilechooser(UiObject *obj, GtkFileChooserAction action) {
    char *button;
    char *title;
    
    if(action == GTK_FILE_CHOOSER_ACTION_OPEN) {
        button = GTK_STOCK_OPEN;
        title = "Datei öffnen...";
    } else {
        button = GTK_STOCK_SAVE;
        title = "Datei speichern...";
    }
    
    GtkWidget *dialog = gtk_file_chooser_dialog_new(
                                title,
                                GTK_WINDOW(obj->widget),
                                action,
                                GTK_STOCK_CANCEL,
                                GTK_RESPONSE_CANCEL,
                                button,
                                GTK_RESPONSE_ACCEPT,
                                NULL);
    if(gtk_dialog_run(GTK_DIALOG(dialog)) == GTK_RESPONSE_ACCEPT) {
        char *file = gtk_file_chooser_get_filename(GTK_FILE_CHOOSER(dialog));
        gtk_widget_destroy(dialog);
        char *copy = strdup(file);
        g_free(file);
        return copy;
    } else {
        gtk_widget_destroy(dialog);
        return NULL;
    }
}

char* ui_openfiledialog(UiObject *obj) {
    return ui_gtkfilechooser(obj, GTK_FILE_CHOOSER_ACTION_OPEN);
}

char* ui_savefiledialog(UiObject *obj) {
    return ui_gtkfilechooser(obj, GTK_FILE_CHOOSER_ACTION_SAVE);
}