/** \file statusbar.c
 * Status bar
 */

/* 	XTrkCad - Model Railroad CAD
 *  Copyright (C) 2005 Dave Bullis,
 *                2017 Martin Fischer <m_fischer@sf.net>
 *
 * 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
 * (at your option) 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.
 *
 * You should have received a copy of the GNU 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 <stdlib.h>
#include <string.h>

#define GTK_DISABLE_SINGLE_INCLUDES
#define GDK_DISABLE_DEPRECATED
#define GTK_DISABLE_DEPRECATED
#define GSEAL_ENABLE

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

#include "gtkint.h"

struct wStatus_t {
	WOBJ_COMMON
	GtkWidget * labelWidget;
	const char * message;
	wWinPix_t labelWidth;
};

/**
 * Set the message text
 *
 * \param b IN widget
 * \param arg IN new text
 * \return
 */

void wStatusSetValue(
        wStatus_p b,
        const char * arg)
{
	if (b->widget == 0) {
		abort();
	}

	if (gtk_entry_get_max_length(GTK_ENTRY(b->labelWidget))<strlen(arg)) {
		gtk_entry_set_max_length(GTK_ENTRY(b->labelWidget), strlen(arg));
		gtk_entry_set_width_chars(GTK_ENTRY(b->labelWidget), strlen(arg));
	}

	gtk_entry_set_text(GTK_ENTRY(b->labelWidget), wlibConvertInput(arg));
	gtk_widget_queue_draw (GTK_WIDGET(b->labelWidget));
}
/**
 * Create a window for a simple text.
 *
 * \param IN parent Handle of parent window
 * \param IN x position in x direction
 * \param IN y position in y direction
 * \param IN labelStr ???
 * \param IN width horizontal size of window
 * \param IN message message to display ( null terminated )
 * \param IN flags display options
 * \return handle for created window
 */

wStatus_p wStatusCreate(
        wWin_p	parent,
        wWinPix_t	x,
        wWinPix_t	y,
        const char 	* labelStr,
        wWinPix_t	width,
        const char	*message)
{
	wStatus_p b;
	b = (wStatus_p)wlibAlloc(parent, B_STATUS, x, y, NULL, sizeof *b, NULL);
	wlibComputePos((wControl_p)b);
	b->message = message;
	b->labelWidth = width;
	b->labelWidget = gtk_entry_new();
	gtk_editable_set_editable(GTK_EDITABLE(b->labelWidget), FALSE);
	gtk_entry_set_has_frame(GTK_ENTRY(b->labelWidget), FALSE);
	gtk_widget_set_can_focus(b->labelWidget, FALSE);
	gtk_widget_set_sensitive(b->labelWidget, FALSE);
	GdkColor black = {0, 0x0000, 0x0000, 0x0000};
	gtk_widget_modify_text(b->labelWidget,GTK_STATE_INSENSITIVE,&black);
	gtk_entry_set_text(GTK_ENTRY(b->labelWidget),
	                   message?wlibConvertInput(message):"");

	b->widget = gtk_fixed_new();
	gtk_container_add(GTK_CONTAINER(b->widget), b->labelWidget);
	wlibControlGetSize((wControl_p)b);
	gtk_fixed_put(GTK_FIXED(parent->widget), b->widget, b->realX, b->realY);
	gtk_widget_show(b->widget);
	gtk_widget_show(b->labelWidget);
	wlibAddButton((wControl_p)b);

	return b;
}

/**
 * Get the anticipated length of a message field
 *
 * \param testString IN string that should fit into the message box
 * \return expected width of message box
 */

wWinPix_t
wStatusGetWidth(const char *testString)
{
	GtkWidget *entry;
	GtkRequisition requisition;

	entry = gtk_entry_new();
	g_object_ref_sink(entry);

	gtk_entry_set_has_frame(GTK_ENTRY(entry), FALSE);
	gtk_entry_set_width_chars(GTK_ENTRY(entry), strlen(testString));
	gtk_entry_set_max_length(GTK_ENTRY(entry), strlen(testString));

	gtk_widget_size_request(entry, &requisition);

	gtk_widget_destroy(entry);
	g_object_unref(entry);

	return (requisition.width);
}

/**
 * Get height of message text
 *
 * \param flags IN text properties (large or small size)
 * \return text height
 */

wWinPix_t wStatusGetHeight(
        long flags)
{
	GtkWidget * temp;

	if (!(flags&COMBOBOX)) {
		temp = gtk_entry_new();	 //To get size of text itself
		gtk_entry_set_has_frame(GTK_ENTRY(temp), FALSE);
	} else {
		temp = gtk_combo_box_text_new();    //to get max size of an object in infoBar
	}
	g_object_ref_sink(temp);

	if (wMessageSetFont(flags))	{
		GtkStyle *style;
		PangoFontDescription *fontDesc;
		int fontSize;
		/* get the current font descriptor */
		style = gtk_widget_get_style(temp);
		fontDesc = style->font_desc;
		/* get the current font size */
		fontSize = PANGO_PIXELS(pango_font_description_get_size(fontDesc));

		/* calculate the new font size */
		if (flags & BM_LARGE) {
			pango_font_description_set_size(fontDesc, fontSize * 1.4 * PANGO_SCALE);
		} else {
			pango_font_description_set_size(fontDesc, fontSize * 0.7 * PANGO_SCALE);
		}

		/* set the new font size */
		gtk_widget_modify_font(temp, fontDesc);
	}

	if (flags&1L) {
		gtk_combo_box_text_append_text(GTK_COMBO_BOX_TEXT(temp),"Test");
	}

	GtkRequisition temp_requisition;
	gtk_widget_size_request(temp,&temp_requisition);
	//g_object_ref_sink(temp);
	//g_object_unref(temp);
	gtk_widget_destroy(temp);
	return temp_requisition.height;
}

/**
 * Set the width of the widget
 *
 * \param b IN widget
 * \param width IN  new width
 * \return
 */

void wStatusSetWidth(
        wStatus_p b,
        wWinPix_t width)
{
	b->labelWidth = width;
	gtk_widget_set_size_request(b->widget, width, -1);
}