/*
  LibRCC UI - GTK library

  Copyright (C) 2005-2018 Suren A. Chilingaryan <csa@suren.me>

  This library is free software; you can redistribute it and/or modify it
  under the terms of the GNU Lesser General Public License version 2.1 or later
  as published by the Free Software Foundation.

  This library 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 Lesser General Public License 
  for more details.

  You should have received a copy of the GNU Lesser General Public License 
  along with this program; if not, write to the Free Software Foundation, Inc.,
  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
*/

#include <stdio.h>
#include <gtk/gtk.h>

#include <librcc.h>

#include "internal.h"
#include "rccnames.h"

#define TITLE_WIDTH 224
#define TITLE_HEIGHT 10
#define BOX_SPACING 1
#define BOX_BORDER 0
#define FRAME_SPACING 1
#define FRAME_BORDER 0
#define PAGE_SPACING 1

#if GTK_MAJOR_VERSION > 2
# define gtk_container_border_width gtk_container_set_border_width
# define gtk_widget_set_usize gtk_widget_set_size_request
# define gtk_container_children gtk_container_get_children
#endif /*  GTK_MAJOR_VERSION */


rcc_ui_internal rccUiCreateInternal(rcc_ui_context ctx) {
    return NULL;
}

void rccUiFreeInternal(rcc_ui_context ctx) {
}

rcc_ui_widget rccUiMenuCreateWidget(rcc_ui_menu_context ctx) {
    return NULL;
}

void rccUiMenuFreeWidget(rcc_ui_menu_context ctx) {
}

rcc_ui_id rccUiMenuGet(rcc_ui_menu_context ctx) {
#if GTK_MAJOR_VERSION < 3
    GtkWidget *menu;
#endif /* GTK_MAJOR_VERSION */
    
    if (!ctx) return (rcc_ui_id)-1;

    if (ctx->type == RCC_UI_MENU_OPTION) {
	switch (rccUiMenuGetRangeType(ctx)) {
	    
	    case RCC_OPTION_RANGE_TYPE_BOOLEAN:
		return gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(ctx->widget));
	    case RCC_OPTION_RANGE_TYPE_MENU:
		break;
	    case RCC_OPTION_RANGE_TYPE_RANGE:
	        return gtk_spin_button_get_value_as_int(GTK_SPIN_BUTTON(ctx->widget));
	    default:
		return (rcc_ui_id)-1;
	}
    }

#if GTK_MAJOR_VERSION > 2
    return gtk_combo_box_get_active(GTK_COMBO_BOX(ctx->widget));
#else /* GTK_MAJOR_VERSION < 3 */
    menu = gtk_option_menu_get_menu(ctx->widget);
    return g_list_index(GTK_MENU_SHELL(menu)->children, gtk_menu_get_active(GTK_MENU(menu)));
#endif /* GTK_MAJOR_VERSION */
}

int rccUiMenuSet(rcc_ui_menu_context ctx, rcc_ui_id id) {
    if (!ctx) return -1;
    
    switch (ctx->type) {
	case RCC_UI_MENU_OPTION:
	    switch (rccUiMenuGetRangeType(ctx)) {
		case RCC_OPTION_RANGE_TYPE_BOOLEAN:
		    gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(ctx->widget),id);
		break;
		case RCC_OPTION_RANGE_TYPE_MENU:
#if GTK_MAJOR_VERSION > 2
                    gtk_combo_box_set_active(GTK_COMBO_BOX(ctx->widget), id);
#else /* GTK_MAJOR_VERSION < 3 */
		    gtk_option_menu_set_history(ctx->widget, id);
#endif /* GTK_MAJOR_VERSION */
		break;
		case RCC_OPTION_RANGE_TYPE_RANGE:
		    gtk_spin_button_set_value(GTK_SPIN_BUTTON(ctx->widget), id);
		default:
		    return -1;
	    }	
	break;
	default:
#if GTK_MAJOR_VERSION > 2
            gtk_combo_box_set_active(GTK_COMBO_BOX(ctx->widget), id);
#else /* GTK_MAJOR_VERSION < 3 */
	    gtk_option_menu_set_history(ctx->widget, id);
#endif /* GTK_MAJOR_VERSION */
    }

    return 0;
}


static void rccGtkMenuLanguageCB(GtkWidget * w, gpointer item) {
    rccUiRestoreLanguage(((rcc_ui_menu_context)item)->uictx);
}

int rccUiMenuConfigureWidget(rcc_ui_menu_context ctx) {
    unsigned int i;
    unsigned long num;
    
    rcc_context rccctx;
    rcc_ui_context uictx;

    rcc_language_config config;
    rcc_language_id language_id;

    rcc_class_id class_id;
    rcc_charset_id charset_id;
    rcc_engine_id engine_id;
    gint value_id = 0;

    const char *language;    
    const char *charset;
    const char *engine;
    
    rcc_option_range *range;
    rcc_option_name *option_name;
    rcc_option_value_names optnames;
    
    GtkWidget *menu = NULL;
    GtkWidget *item;
#if GTK_MAJOR_VERSION > 2
    GtkCellRenderer *cell = NULL;
    GtkTreeStore *store = NULL;
    GtkTreeIter iter;
    GtkAdjustment *adjustment;
#else /* GTK_MAJOR_VERSION < 3 */
    GtkWidget *list = NULL;
    GtkObject *adjustment;
#endif /* GTK_MAJOR_VERSION */

    if (!ctx) return -1;
    
    uictx = ctx->uictx;
    rccctx = uictx->rccctx;

    switch (ctx->type) {
	case RCC_UI_MENU_LANGUAGE:
#if GTK_MAJOR_VERSION < 3
	case RCC_UI_MENU_CHARSET:
#endif /* GTK_MAJOR_VERSION */
	case RCC_UI_MENU_ENGINE:
            if (ctx->widget) menu = ctx->widget;
            else
#if GTK_MAJOR_VERSION > 2
                menu = gtk_combo_box_text_new();
	    gtk_combo_box_text_remove_all(GTK_COMBO_BOX_TEXT(menu));
#else /* GTK_MAJOR_VERSION < 3 */
                menu = gtk_option_menu_new();
	    gtk_option_menu_remove_menu(GTK_OPTION_MENU(menu));
	    list = gtk_menu_new();
#endif /* GTK_MAJOR_VERSION */

            ctx->widget = menu;
        break;
        default:
            ;
    }

#if GTK_MAJOR_VERSION > 2
    switch (ctx->type) {
	case RCC_UI_MENU_CHARSET:
            if (ctx->widget) {
                menu = ctx->widget;
                store = GTK_TREE_STORE(gtk_combo_box_get_model(GTK_COMBO_BOX(menu)));
                gtk_tree_store_clear(store);
            } else {
                store = gtk_tree_store_new(2, G_TYPE_STRING, G_TYPE_BOOLEAN);
                menu = gtk_combo_box_new_with_model(GTK_TREE_MODEL(store));
                g_object_unref (store);

                cell = gtk_cell_renderer_text_new();
                gtk_cell_layout_pack_start(GTK_CELL_LAYOUT(menu), cell, TRUE);
                gtk_cell_layout_set_attributes (GTK_CELL_LAYOUT(menu), cell, "text", 0, "sensitive", 1, NULL);

                ctx->widget = menu;
            }
        break;
        default:
            ;
    }
#endif /* GTK_MAJOR_VERSION */

    switch (ctx->type) {
	case RCC_UI_MENU_LANGUAGE:
	    num = rccGetLanguageNumber(rccctx);

	    for (i=0; i<(num?num:1); i++) {
		language = rccUiGetLanguageName(uictx, (rcc_language_id)i);
		if (!language) continue;
		
#if GTK_MAJOR_VERSION > 2
                gtk_combo_box_text_append(GTK_COMBO_BOX_TEXT(menu), NULL, language);
#else /* GTK_MAJOR_VERSION < 3 */
		item = gtk_menu_item_new_with_label(language);
		gtk_widget_show(item);
                gtk_signal_connect(GTK_OBJECT(item), "activate", GTK_SIGNAL_FUNC(rccGtkMenuLanguageCB), ctx);
		gtk_menu_append(GTK_MENU(list), item);
#endif /* GTK_MAJOR_VERSION */
	    }

	    language_id = rccGetSelectedLanguage(rccctx);
	    if (language_id == (rcc_language_id)-1) language_id = 0;

	    value_id = language_id;
	break;
	case RCC_UI_MENU_CHARSET:
	    language_id = (rcc_language_id)rccUiMenuGet(uictx->language);
	    class_id = rccUiMenuGetClassId(ctx);
	    config = rccGetConfig(rccctx, language_id);
	    num = rccConfigGetClassCharsetNumber(config, class_id);

	    for (i=0;i<(num?num:1);i++) {
		charset = rccUiGetCharsetName(uictx, language_id, class_id, (rcc_charset_id)i);
		if (!charset) continue;
		
#if GTK_MAJOR_VERSION > 2
                gtk_tree_store_append(store, &iter, NULL);
                gtk_tree_store_set(store, &iter, 0, charset, 1, !rccIsDisabledCharsetName(rccctx, class_id, charset), -1);
#else /* GTK_MAJOR_VERSION < 3 */
		item = gtk_menu_item_new_with_label(charset);
		if (rccIsDisabledCharsetName(rccctx, class_id, charset))
		    gtk_widget_set_sensitive(item, 0);
		else 
		    gtk_widget_show(item);
    		gtk_menu_append(GTK_MENU(list), item);
#endif /* GTK_MAJOR_VERSION */
	    }

    
	    charset_id = rccConfigGetSelectedCharset(config, class_id);
	    if (charset_id == (rcc_charset_id)-1) charset_id = 0;
	    value_id = charset_id;
	break;
	case RCC_UI_MENU_ENGINE:
	    language_id = (rcc_language_id)rccUiMenuGet(uictx->language);
	    config = rccGetConfig(rccctx, language_id);
	    num = rccConfigGetEngineNumber(config);

	    for (i=0;i<(num?num:1);i++) {
		engine = rccUiGetEngineName(uictx, language_id, (rcc_engine_id)i);
		if (!engine) continue;
		
#if GTK_MAJOR_VERSION > 2
                gtk_combo_box_text_append(GTK_COMBO_BOX_TEXT(menu), NULL, engine);
#else /* GTK_MAJOR_VERSION < 3 */
		item = gtk_menu_item_new_with_label(engine);
		gtk_widget_show(item);
    		gtk_menu_append(GTK_MENU(list), item);
#endif /* GTK_MAJOR_VERSION */
	    }	

	    engine_id = rccConfigGetCurrentEngine(config);
	    if (engine_id == (rcc_engine_id)-1) engine_id = 0;
	    value_id = engine_id;
	break;
	case RCC_UI_MENU_OPTION:
	    switch (rccUiMenuGetRangeType(ctx)) {
		case RCC_OPTION_RANGE_TYPE_BOOLEAN:
		    if (!ctx->widget) {
		        item = gtk_check_button_new_with_label(rccUiGetOptionName(uictx, rccUiMenuGetOption(ctx)));
			ctx->widget = item;
		    }
    		    gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(ctx->widget), rccGetOption(rccctx, rccUiMenuGetOption(ctx)));
		break;
		case RCC_OPTION_RANGE_TYPE_MENU:
		    if (!ctx->widget) {
			option_name = rccUiGetOptionRccName(uictx, rccUiMenuGetOption(ctx));
			if (!option_name) return -1;
			optnames = option_name->value_names;
			if (!optnames) return -1;

#if GTK_MAJOR_VERSION > 2
	                menu = gtk_combo_box_text_new();
			for (i=0;optnames[i];i++) {
                            gtk_combo_box_text_append(GTK_COMBO_BOX_TEXT(menu), NULL, optnames[i]);
			}
#else /* GTK_MAJOR_VERSION < 3 */
			list = gtk_menu_new();
			for (i=0;optnames[i];i++) {
			    item = gtk_menu_item_new_with_label(optnames[i]);
			    gtk_widget_show(item);
    			    gtk_menu_append(GTK_MENU(list), item);
			}
		
			menu = gtk_option_menu_new();

			gtk_option_menu_remove_menu(GTK_OPTION_MENU(menu));
			gtk_option_menu_set_menu(GTK_OPTION_MENU(menu), list);
#endif /* GTK_MAJOR_VERSION */

			ctx->widget = menu;
		    }
#if GTK_MAJOR_VERSION > 2
                    gtk_combo_box_set_active(GTK_COMBO_BOX(ctx->widget), rccGetOption(rccctx, rccUiMenuGetOption(ctx)));
#else /* GTK_MAJOR_VERSION < 3 */
		    gtk_option_menu_set_history(GTK_OPTION_MENU(ctx->widget), rccGetOption(rccctx, rccUiMenuGetOption(ctx)));
#endif /* GTK_MAJOR_VERSION */
		break;
		case RCC_OPTION_RANGE_TYPE_RANGE:
		    range = rccUiMenuGetRange(ctx);
		    adjustment = gtk_adjustment_new(rccGetOption(rccctx, rccUiMenuGetOption(ctx)), range->min, range->max, range->step, 0, 0);
/*		    item = gtk_hscale_new(GTK_ADJUSTMENT(adjustment));
		    gtk_scale_set_digits(GTK_SCALE(item), 0);*/
		    item = gtk_spin_button_new(GTK_ADJUSTMENT(adjustment), range->step, 0);
		    ctx->widget = item;
		break;
		default:
		    return -1;
	    }
	break;
	default:
	    return -1;
    }


    switch (ctx->type) {
	case RCC_UI_MENU_LANGUAGE:
#if GTK_MAJOR_VERSION > 2
            g_signal_connect(G_OBJECT(menu), "changed", G_CALLBACK(rccGtkMenuLanguageCB), ctx);
#endif /* GTK_MAJOR_VERSION */

	case RCC_UI_MENU_CHARSET:
	case RCC_UI_MENU_ENGINE:
#if GTK_MAJOR_VERSION > 2
            gtk_combo_box_set_active(GTK_COMBO_BOX(menu), value_id);
#else /* GTK_MAJOR_VERSION < 3 */
	    gtk_option_menu_set_menu(GTK_OPTION_MENU(menu), list);
	    gtk_option_menu_set_history(GTK_OPTION_MENU(menu), value_id);
#endif /* GTK_MAJOR_VERSION */
	
        break;
        default:
            ;
    }

    return 0;
}

rcc_ui_box rccUiBoxCreate(rcc_ui_menu_context ctx, const char *title) {
    GtkWidget *hbox, *label;
#if GTK_MAJOR_VERSION > 2
    hbox = gtk_box_new(GTK_ORIENTATION_HORIZONTAL, BOX_SPACING);
#else /* GTK_MAJOR_VERSION < 3 */
    hbox = gtk_hbox_new(FALSE, BOX_SPACING);
#endif /* GTK_MAJOR_VERSION */


    gtk_container_border_width(GTK_CONTAINER(hbox), BOX_BORDER);
    if ((ctx->type != RCC_UI_MENU_OPTION)||(rccUiMenuGetRangeType(ctx) != RCC_OPTION_RANGE_TYPE_BOOLEAN)) {
	label = gtk_label_new(title);
	gtk_widget_show(label);
	gtk_widget_set_usize(label, TITLE_WIDTH, TITLE_HEIGHT);
	gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0);
    }
    gtk_widget_show((GtkWidget*)ctx->widget);
    gtk_box_pack_start(GTK_BOX(hbox), (GtkWidget*)ctx->widget, TRUE, TRUE, 0);
    return (rcc_ui_box)hbox;
}

rcc_ui_frame rccUiFrameCreate(rcc_ui_frame_context ctx, const char *title) {
    GtkWidget *frame, *box;

    if (!ctx) return NULL;
    
    frame = gtk_frame_new(title?title:"");
    gtk_container_border_width(GTK_CONTAINER(frame), FRAME_BORDER);

#if GTK_MAJOR_VERSION > 2
    box = gtk_box_new(GTK_ORIENTATION_VERTICAL, FRAME_SPACING);
#else /* GTK_MAJOR_VERSION < 3 */
    box = gtk_vbox_new(FALSE, FRAME_SPACING);
#endif /* GTK_MAJOR_VERSION */
    gtk_widget_show(box);
    gtk_container_add(GTK_CONTAINER(frame), box);

    return (rcc_ui_frame)frame;
}

void rccUiFrameFree(rcc_ui_frame_context ctx) {
}


int rccUiFrameAdd(rcc_ui_frame_context ctx, rcc_ui_box box) {
    GtkWidget *vbox;
    
    if ((!ctx)||(!box)) return -1;
    
    vbox = gtk_container_children(GTK_CONTAINER(ctx->frame))->data;
    gtk_widget_show(GTK_WIDGET(box));
    gtk_box_pack_start(GTK_BOX(vbox), GTK_WIDGET(box), FALSE, FALSE, 0);
    return 0;
}

rcc_ui_page rccUiPageCreate(rcc_ui_context ctx, const char *title) {
    GtkWidget *vbox;
#if GTK_MAJOR_VERSION > 2
    vbox = gtk_box_new(GTK_ORIENTATION_VERTICAL, PAGE_SPACING);
#else /* GTK_MAJOR_VERSION < 3 */
    vbox = gtk_vbox_new(FALSE, PAGE_SPACING);
#endif /* GTK_MAJOR_VERSION */
    return (rcc_ui_page)vbox;
}

int rccUiPageAdd(rcc_ui_page page, rcc_ui_frame frame) {
    if ((!page)||(!frame)) return -1;
    gtk_widget_show(frame);
    gtk_box_pack_start(GTK_BOX(page), GTK_WIDGET(frame), FALSE, FALSE, 0);
    return 0;
}