/*
   Copyright (C) 2001-2006, William Joseph.
   All Rights Reserved.

   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
 */

#include "window.h"

#include <gtk/gtk.h>

#include "pointer.h"
#include "accelerator.h"

inline void CHECK_RESTORE( ui::Widget w ){
	if ( gpointer_to_int( g_object_get_data( G_OBJECT( w ), "was_mapped" ) ) != 0 ) {
		w.show();
	}
}

inline void CHECK_MINIMIZE( ui::Widget w ){
	g_object_set_data( G_OBJECT( w ), "was_mapped", gint_to_pointer( gtk_widget_get_visible( w ) ) );
	w.hide();
}

static gboolean main_window_iconified( ui::Widget widget, GdkEventWindowState* event, gpointer data ){
	if ( ( event->changed_mask & ( GDK_WINDOW_STATE_ICONIFIED | GDK_WINDOW_STATE_WITHDRAWN ) ) != 0 ) {
		if ( ( event->new_window_state & ( GDK_WINDOW_STATE_ICONIFIED | GDK_WINDOW_STATE_WITHDRAWN ) ) != 0 ) {
			CHECK_MINIMIZE( ui::Widget::from( data ) );
		}
		else
		{
			CHECK_RESTORE( ui::Widget::from( data ) );
		}
	}
	return FALSE;
}

unsigned int connect_floating( ui::Window main_window, ui::Window floating ){
	return main_window.connect( "window_state_event", G_CALLBACK( main_window_iconified ), floating );
}

gboolean destroy_disconnect_floating( ui::Window widget, gpointer data ){
	g_signal_handler_disconnect( G_OBJECT( data ), gpointer_to_int( g_object_get_data( G_OBJECT( widget ), "floating_handler" ) ) );
	return FALSE;
}

gboolean floating_window_delete_present( ui::Window floating, GdkEventFocus *event, ui::Window main_window ){
	if ( gtk_window_is_active( floating ) || gtk_window_is_active( main_window ) ) {
		gtk_window_present( main_window );
	}
	return FALSE;
}

guint connect_floating_window_delete_present( ui::Window floating, ui::Window main_window ){
	return floating.connect( "delete_event", G_CALLBACK( floating_window_delete_present ), main_window );
}

gboolean floating_window_destroy_present( ui::Window floating, ui::Window main_window ){
	if ( gtk_window_is_active( floating ) || gtk_window_is_active( main_window ) ) {
		gtk_window_present( main_window );
	}
	return FALSE;
}

guint connect_floating_window_destroy_present( ui::Window floating, ui::Window main_window ){
	return floating.connect( "destroy", G_CALLBACK( floating_window_destroy_present ), main_window );
}

ui::Window create_floating_window( const char* title, ui::Window parent ){
	ui::Window window = ui::Window( ui::window_type::TOP );
	gtk_window_set_title( window, title );

	if ( parent ) {
		gtk_window_set_transient_for( window, parent );
		connect_floating_window_destroy_present( window, parent );
		g_object_set_data( G_OBJECT( window ), "floating_handler", gint_to_pointer( connect_floating( parent, window ) ) );
		window.connect( "destroy", G_CALLBACK( destroy_disconnect_floating ), parent );
	}

	return window;
}

void destroy_floating_window( ui::Window window ){
	window.destroy();
}

gint window_realize_remove_sysmenu( ui::Widget widget, gpointer data ){
	gdk_window_set_decorations( gtk_widget_get_window(widget), (GdkWMDecoration)( GDK_DECOR_ALL | GDK_DECOR_MENU ) );
	return FALSE;
}

gboolean persistent_floating_window_delete( ui::Window floating, GdkEvent *event, ui::Window main_window ){
	floating.hide();
	return TRUE;
}

ui::Window create_persistent_floating_window( const char* title, ui::Window main_window ){
	auto window = create_floating_window( title, main_window );

	gtk_widget_set_events( window , GDK_KEY_PRESS_MASK | GDK_KEY_RELEASE_MASK );

	connect_floating_window_delete_present( window, main_window );
	window.connect( "delete_event", G_CALLBACK( persistent_floating_window_delete ), 0 );

#if 0
	if ( g_multimon_globals.m_bStartOnPrimMon && g_multimon_globals.m_bNoSysMenuPopups ) {
		window.connect( "realize", G_CALLBACK( window_realize_remove_sysmenu ), 0 );
	}
#endif

	return window;
}

gint window_realize_remove_minmax( ui::Widget widget, gpointer data ){
	gdk_window_set_decorations( gtk_widget_get_window(widget), (GdkWMDecoration)( GDK_DECOR_ALL | GDK_DECOR_MINIMIZE | GDK_DECOR_MAXIMIZE ) );
	return FALSE;
}

void window_remove_minmax( ui::Window window ){
	window.connect( "realize", G_CALLBACK( window_realize_remove_minmax ), 0 );
}


ui::ScrolledWindow create_scrolled_window( ui::Policy hscrollbar_policy, ui::Policy vscrollbar_policy, int border ){
	auto scr = ui::ScrolledWindow(ui::New);
	scr.show();
	gtk_scrolled_window_set_policy( scr, (GtkPolicyType) hscrollbar_policy, (GtkPolicyType) vscrollbar_policy );
	gtk_scrolled_window_set_shadow_type( scr, GTK_SHADOW_IN );
	gtk_container_set_border_width( GTK_CONTAINER( scr ), border );
	return scr;
}

gboolean window_focus_in_clear_focus_widget(ui::Window widget, GdkEventKey *event, gpointer data)
{
    gtk_window_set_focus( widget, NULL );
    return FALSE;
}

guint window_connect_focus_in_clear_focus_widget(ui::Window window)
{
	return window.connect( "focus_in_event", G_CALLBACK( window_focus_in_clear_focus_widget ), NULL );
}

void window_get_position(ui::Window window, WindowPosition &position)
{
	ASSERT_MESSAGE( window , "error saving window position" );

	gtk_window_get_position( window, &position.x, &position.y );
	gtk_window_get_size( window, &position.w, &position.h );
}

void window_set_position(ui::Window window, const WindowPosition &position)
{
	gtk_window_set_gravity( window, GDK_GRAVITY_STATIC );

	GdkScreen* screen = gdk_screen_get_default();
	if ( position.x < 0
		 || position.y < 0
		 || position.x > gdk_screen_get_width( screen )
		 || position.y > gdk_screen_get_height( screen ) ) {
		gtk_window_set_position( window, GTK_WIN_POS_CENTER_ON_PARENT );
	}
	else
	{
		gtk_window_move( window, position.x, position.y );
	}

	gtk_window_set_default_size( window, position.w, position.h );
}

void WindowPosition_String::Import(WindowPosition &position, const char *value)
{
	if ( sscanf( value, "%d %d %d %d", &position.x, &position.y, &position.w, &position.h ) != 4 ) {
		position = WindowPosition( c_default_window_pos ); // ensure sane default value for window position
	}
}

void WindowPosition_String::Export(const WindowPosition &self, const Callback<void(const char *)> &returnz)
{
	char buffer[64];
	sprintf( buffer, "%d %d %d %d", self.x, self.y, self.w, self.h );
	returnz( buffer );
}

void WindowPositionTracker_String::Import(WindowPositionTracker &self, const char *value)
{
	WindowPosition position;
	WindowPosition_String::Import( position, value );
	self.setPosition( position );
}

void WindowPositionTracker_String::Export(const WindowPositionTracker &self, const Callback<void(const char *)> &returnz)
{
	WindowPosition_String::Export( self.getPosition(), returnz );
}

gboolean WindowPositionTracker::configure(ui::Widget widget, GdkEventConfigure *event, WindowPositionTracker *self)
{
	self->m_position = WindowPosition( event->x, event->y, event->width, event->height );
	return FALSE;
}

void WindowPositionTracker::sync(ui::Window window)
{
	window_set_position( window, m_position );
}

void WindowPositionTracker::connect(ui::Window window)
{
	sync( window );
	window.connect( "configure_event", G_CALLBACK( configure ), this );
}

const WindowPosition &WindowPositionTracker::getPosition() const
{
	return m_position;
}

void WindowPositionTracker::setPosition(const WindowPosition &position)
{
	m_position = position;
}