/*
    Copyright (C) 2003 Paul Barton-Davis
 
    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., 675 Mass Ave, Cambridge, MA 02139, USA.

    $Id$
*/

#include <cmath>
#include <gtkmm2ext/tearoff.h>
#include <gtkmm2ext/utils.h>

using namespace Gtkmm2ext;
using namespace Gtk;
using namespace std;

TearOff::TearOff (Gtk::Widget& c)
	: contents (c),
	  tearoff_arrow (Gtk::ARROW_DOWN, Gtk::SHADOW_OUT),
	  close_arrow (Gtk::ARROW_UP, Gtk::SHADOW_OUT)
{
	dragging = false;

	tearoff_event_box.add (tearoff_arrow);
	tearoff_event_box.set_events (Gdk::BUTTON_PRESS_MASK|Gdk::BUTTON_RELEASE_MASK);
	tearoff_event_box.signal_button_release_event().connect (mem_fun (*this, &TearOff::tearoff_click));

	close_event_box.add (close_arrow);
	close_event_box.set_events (Gdk::BUTTON_PRESS_MASK|Gdk::BUTTON_RELEASE_MASK);
	close_event_box.signal_button_release_event().connect (mem_fun (*this, &TearOff::close_click));
	
	own_window = new Gtk::Window (Gtk::WINDOW_TOPLEVEL);
	own_window->add_events (Gdk::BUTTON_PRESS_MASK|Gdk::BUTTON_RELEASE_MASK|Gdk::POINTER_MOTION_MASK|Gdk::POINTER_MOTION_HINT_MASK);
	own_window->set_resizable (false);
	
	VBox* box1;
	box1 = manage (new VBox);
	box1->pack_start (close_event_box, false, false, 5);
	
	window_box.pack_end (*box1, false, false, 2);
	own_window->add (window_box);
	
	own_window->signal_button_press_event().connect (mem_fun (*this, &TearOff::window_button_press));
	own_window->signal_button_release_event().connect (mem_fun (*this, &TearOff::window_button_release));
	own_window->signal_motion_notify_event().connect (mem_fun (*this, &TearOff::window_motion));
	own_window->signal_delete_event().connect (mem_fun (*this, &TearOff::window_delete_event));
	own_window->signal_realize().connect (bind (sigc::ptr_fun (Gtkmm2ext::set_decoration), own_window, Gdk::WMDecoration (Gdk::DECOR_BORDER|Gdk::DECOR_RESIZEH)));

	tearoff_arrow.set_name ("TearOffArrow");
	close_arrow.set_name ("TearOffArrow");

	VBox* box2;
	box2 = manage (new VBox);
	box2->pack_start (tearoff_event_box, false, false, 5);

	pack_start (contents);
	pack_start (*box2, false, false, 2);

}

TearOff::~TearOff ()
{
	delete own_window;
}

gint
TearOff::tearoff_click (GdkEventButton* ev)
{
	remove (contents);
	window_box.pack_start (contents);
	own_window->set_name (get_name());
	close_event_box.set_name (get_name());
	own_window->show_all ();
//	own_window->realize ();
	hide ();
	Detach ();
	return TRUE;
}

gint
TearOff::close_click (GdkEventButton* ev)
{
	window_box.remove (contents);
	pack_start (contents);
	reorder_child (contents, 0);
	own_window->hide ();
	show_all ();
	Attach ();
	return TRUE;
}		

gint
TearOff::window_button_press (GdkEventButton* ev)
{
	dragging = true;
	drag_x = ev->x_root;
	drag_y = ev->y_root;

	own_window->add_modal_grab();

	return TRUE;
}

gint
TearOff::window_button_release (GdkEventButton* ev)
{
	dragging = false;
	own_window->remove_modal_grab();
	return TRUE;
}

gint
TearOff::window_delete_event (GdkEventAny* ev)
{
	return close_click(0);
}

gint
TearOff::window_motion (GdkEventMotion* ev)
{
	gint x;
	gint y;
	gint mx, my;
	double x_delta;
	double y_delta;
	Glib::RefPtr<Gdk::Window> win (own_window->get_window());
	
	own_window->get_pointer (mx, my);

	if (!dragging) {
		return TRUE;
	}

	x_delta = ev->x_root - drag_x;
	y_delta = ev->y_root - drag_y;

	win->get_root_origin (x, y);
	win->move ((gint) floor (x + x_delta), (gint) floor (y + y_delta));
	
	drag_x = ev->x_root;
	drag_y = ev->y_root;
	
	return TRUE;
}

bool
TearOff::torn_off() const
{
	return own_window->is_visible();
}