/trunk/src/common/Lgi/GMdi.cpp

#include "Lgi.h"

#include "GMdi.h"

#include <stdio.h>



enum GMdiDrag

{

	DragNone	= 0,

	DragMove	= 0x01,

	DragLeft	= 0x02,

	DragTop		= 0x04,

	DragRight	= 0x08,

	DragBottom	= 0x10,

	DragClose	= 0x20,

	DragSystem	= 0x40

};



class GMdiChildPrivate

{

public:

	GMdiChild *Child;

	GRect Title;

	GRect Close;

	GRect System;

	int Fy;	

	GMdiDrag Drag;	

	int Ox, Oy;

	bool CloseDown;

	bool CloseOnUp;

	

	GMdiChildPrivate(GMdiChild *c)

	{

		CloseOnUp = false;

		Child = c;

		CloseDown = false;

		Fy = SysFont->GetHeight() + 1;

		Title.ZOff(-1, -1);

		Close.ZOff(-1, -1);

		System.ZOff(-1, -1);

	}



	GMdiDrag HitTest(GMouse &m)

	{

		GMdiDrag Hit = DragNone;

		

		if (Child->WindowFromPoint(m.x, m.y) == Child)

		{

			if (!Child->GetClient().Overlap(m.x, m.y))

			{

				if (System.Overlap(m.x, m.y))

				{

					Hit = DragSystem;

				}

				else if (Close.Overlap(m.x, m.y))

				{

					Hit = DragClose;

				}

				else if (Title.Overlap(m.x, m.y))

				{

					Hit = DragMove;

				}

				else

				{

					GRect c = Child->GLayout::GetClient();

					int Corner = 24;

					if (m.x < c.x1 + Corner)

					{

						(int&)Hit |= DragLeft;

					}

					if (m.x > c.x2 - Corner)

					{

						(int&)Hit |= DragRight;

					}

					if (m.y < c.y1 + Corner)

					{

						(int&)Hit |= DragTop;

					}

					if (m.y > c.y2 - Corner)

					{

						(int&)Hit |= DragBottom;

					}

				}

			}

		}



		return Hit;

	}

};



GMdiChild::GMdiChild()

{

	#ifdef BEOS

	DeleteObj(_View);

	#endif



	d = new GMdiChildPrivate(this);

	GdcPt2 m(100, d->Fy + 8);

	SetMinimumSize(m);



	#ifdef WIN32

	SetStyle(GetStyle() | WS_CLIPSIBLINGS);

	#endif

}



GMdiChild::~GMdiChild()

{

	DeleteObj(d);

}



bool GMdiChild::Attach(GViewI *p)

{

	#ifdef BEOS

	bool s = true;

	GFlags::Visible(true);

	if (!p->Children.HasItem(this))

	{

		p->Children.Insert(this);

	}

	SetParent(p);

	Invalidate();

	#else

	bool s = GLayout::Attach(p);

	#endif



	if (s) AttachChildren();

	return s;

}



char *GMdiChild::Name()

{

	return GView::Name();

}



bool GMdiChild::Name(const char *n)

{

	bool s = GView::Name(n);

	Invalidate((GRect*)0, false, true);

	return s;

}



GRect &GMdiChild::GetClient(bool ClientSpace)

{

	static GRect r;

	

	r = GLayout::GetClient(ClientSpace);

	r.Size(3, 3);

	r.y1 += d->Fy + 2;

	r.Size(1, 1);

	

	return r;

}



bool GMdiChild::Pour()

{

	GRect c = GetClient();

	GRegion Client(c);

	GRegion Update;



	for (GViewI *w = Children.First(); w; w = Children.Next())

	{

		GRect OldPos = w->GetPos();

		Update.Union(&OldPos);



		if (w->Pour(Client))

		{

			GRect p = w->GetPos();

			

			if (!w->Visible())

			{

				w->Visible(true);

			}



			// w->Invalidate();



			Client.Subtract(&w->GetPos());

			Update.Subtract(&w->GetPos());

		}

		else

		{

			// non-pourable

		}

	}



	return true;

}



void GMdiChild::OnPaint(GSurface *pDC)

{

	GRect p = GLayout::GetClient();



	// Border

	LgiWideBorder(pDC, p, RAISED);

	pDC->Colour(LC_MED, 24);

	pDC->Box(&p);

	p.Size(1, 1);



	// Title bar

	char *n = Name();

	if (!n) n = "";

	d->Title.ZOff(p.X()-1, d->Fy + 1);

	d->Title.Offset(p.x1, p.y1);

	d->System = d->Title;

	d->System.x2 = d->System.x1 + d->System.Y() - 1;



	// Title text

	bool Top = false;

	if (GetParent())

	{

		GViewIterator *it = GetParent()->IterateViews();

		Top = it->Last() == (GViewI*)this;

		DeleteObj(it);

	}

	

	SysFont->Colour(Top ? LC_ACTIVE_TITLE_TEXT : LC_INACTIVE_TITLE_TEXT, Top ? LC_ACTIVE_TITLE : LC_INACTIVE_TITLE);

	SysFont->Transparent(false);

	GDisplayString ds(SysFont, n);

	ds.Draw(pDC, d->System.x2 + 1, d->Title.y1 + 1, &d->Title);

	

	// System button

	GRect r = d->System;

	r.Size(2, 1);

	pDC->Colour(LC_BLACK, 24);

	pDC->Box(&r);

	r.Size(1, 1);

	pDC->Colour(LC_WHITE, 24);

	pDC->Rectangle(&r);

	pDC->Colour(LC_BLACK, 24);

	for (int k=r.y1 + 1; k < r.y2 - 1; k += 2)

	{

		pDC->Line(r.x1 + 1, k, r.x2 - 1, k);

	}



	// Close button

	d->Close = d->Title;

	d->Close.x1 = d->Close.x2 - d->Close.Y() + 1;

	d->Close.Size(2, 2);

	r = d->Close;

	LgiWideBorder(pDC, r, d->CloseDown ? SUNKEN : RAISED);

	pDC->Colour(LC_MED, 24);

	pDC->Rectangle(&r);

	int Cx = d->Close.x1 + (d->Close.X() >> 1) - 1 + d->CloseDown;

	int Cy = d->Close.y1 + (d->Close.Y() >> 1) - 1 + d->CloseDown;

	int s = 3;

	pDC->Colour(Rgb24(108,108,108), 24);

	pDC->Line(Cx-s, Cy-s+1, Cx+s-1, Cy+s);

	pDC->Line(Cx-s+1, Cy-s, Cx+s, Cy+s-1);

	pDC->Line(Cx-s, Cy+s-1, Cx+s-1, Cy-s);

	pDC->Line(Cx-s+1, Cy+s, Cx+s, Cy-s+1);

	pDC->Colour(LC_BLACK, 24);

	pDC->Line(Cx-s, Cy-s, Cx+s, Cy+s);

	pDC->Line(Cx-s, Cy+s, Cx+s, Cy-s);



	// Client

	GRect Client = GetClient();

	Client.Size(-1, -1);

	pDC->Colour(LC_MED, 24);

	pDC->Box(&Client);

	

	if (!Children.First())

	{

		Client.Size(1, 1);

		pDC->Colour(LC_WORKSPACE, 24);

		pDC->Rectangle(&Client);

	}

	

	Pour();

}



void GMdiChild::OnMouseClick(GMouse &m)

{

	if (m.Left())

	{

		Raise();



		if (m.Down())

		{

			GRect c = GLayout::GetClient();

			d->Drag = DragNone;

			d->Ox = d->Oy = -1;

			

			d->Drag = d->HitTest(m);

			if (d->Drag)

			{

				Capture(true);

			}



			if (d->Drag == DragSystem)

			{

				if (m.Double())

				{

					d->CloseOnUp = true;

				}

				else

				{

					/*

					GdcPt2 p(d->System.x1, d->System.y2+1);

					PointToScreen(p);

					GSubMenu *Sub = new GSubMenu;

					if (Sub)

					{

						Sub->AppendItem("Close", 1, true);

						Close = Sub->Float(this, p.x, p.y, true) == 1;

						DeleteObj(Sub);

					}

					*/

				}

			}

			else if (d->Drag == DragClose)

			{

				d->CloseDown = true;

				Invalidate(&d->Close);

			}

			else if (d->Drag == DragMove)

			{

				d->Ox = m.x - c.x1;

				d->Oy = m.y - c.y1;

			}

			else

			{

				if (d->Drag & DragLeft)

				{

					d->Ox = m.x - c.x1;

				}

				if (d->Drag & DragRight)

				{

					d->Ox = m.x - c.x2;

				}

				if (d->Drag & DragTop)

				{

					d->Oy = m.y - c.y1;

				}

				if (d->Drag & DragBottom)

				{

					d->Oy = m.y - c.y2;

				}

			}

		}

		else

		{

			if (IsCapturing())

			{

				Capture(false);

			}



			if (d->CloseOnUp)

			{

				d->Drag = DragNone;

				if (OnRequestClose(false))

				{

					Quit();

					return;

				}

			}

			else if (d->Drag == DragClose)

			{

				if (d->Close.Overlap(m.x, m.y))

				{

					d->Drag = DragNone;

					d->CloseDown = false;

					Invalidate(&d->Close);

					

					if (OnRequestClose(false))

					{

						Quit();

						return;

					}

				}

				else printf("%s:%i - Outside close btn.\n", _FL);

			}

			else

			{

				d->Drag = DragNone;

			}

		}

	}

}



void GMdiChild::OnMouseMove(GMouse &m)

{

	if (IsCapturing())

	{

		GRect p = GetPos();

		GdcPt2 Min = GetMinimumSize();



		if (d->Drag == DragClose)

		{

			bool Over = d->Close.Overlap(m.x, m.y);

			if (Over ^ d->CloseDown)

			{

				d->CloseDown = Over;

				Invalidate(&d->Close);

			}

		}

		else

		{

			GetMouse(m, true);

			GdcPt2 n(m.x, m.y);

			GetParent()->PointToView(n);

				

			if (d->Drag == DragMove)

			{

				p.Offset(n.x - d->Ox - p.x1, n.y - d->Oy - p.y1);

				if (p.x1 < 0) p.Offset(-p.x1, 0);

				if (p.y1 < 0) p.Offset(0, -p.y1);

			}

			else

			{

				if (d->Drag & DragLeft)

				{

					p.x1 = min(p.x2 - Min.x, n.x - d->Ox);

					if (p.x1 < 0) p.x1 = 0;

				}

				if (d->Drag & DragRight)

				{

					p.x2 = max(p.x1 + Min.x, n.x - d->Ox);

				}

				if (d->Drag & DragTop)

				{

					p.y1 = min(p.y2 - Min.y, n.y - d->Oy);

					if (p.y1 < 0) p.y1 = 0;

				}

				if (d->Drag & DragBottom)

				{

					p.y2 = max(p.y1 + Min.y, n.y - d->Oy);

				}

			}

		}



		SetPos(p);

	}

	else

	{

		GMdiDrag Hit = d->HitTest(m);

		if (Hit & DragLeft)

		{

			if (Hit & DragTop)

			{

				SetCursor(LCUR_SizeFDiag);

			}

			else if (Hit & DragBottom)

			{

				SetCursor(LCUR_SizeBDiag);

			}

			else

			{

				SetCursor(LCUR_SizeHor);

			}

		}

		else if (Hit & DragRight)

		{

			if (Hit & DragTop)

			{

				SetCursor(LCUR_SizeBDiag);

			}

			else if (Hit & DragBottom)

			{

				SetCursor(LCUR_SizeFDiag);

			}

			else

			{

				SetCursor(LCUR_SizeHor);

			}

		}

		else if ((Hit & DragTop) OR (Hit & DragBottom))

		{

			SetCursor(LCUR_SizeVer);

		}

		else

		{

			SetCursor(LCUR_Normal);

		}

	}

}



void GMdiChild::Raise()

{

	GViewI *p = GetParent();

	if (p)

	{

		#if defined LINUX

		// uint32_t v = XCB_STACK_MODE_ABOVE;

		// XcbCheck(xcb_configure_window_checked(XcbConn(), Handle(), XCB_CONFIG_WINDOW_STACK_MODE, &v));

		#elif defined WIN32

		SetWindowPos(Handle(), HWND_TOP, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE);

		#else

		#error "Impl me."

		#endif



		p->DelView(this);

		p->AddView(this);

		p->OnChildrenChanged(this, true);

	}

}



void GMdiChild::Lower()

{

	GViewI *p = GetParent();

	if (p)

	{

		#if defined LINUX

		// uint32_t v = XCB_STACK_MODE_BELOW;

		// XcbCheck(xcb_configure_window_checked(XcbConn(), Handle(), XCB_CONFIG_WINDOW_STACK_MODE, &v));

		#elif defined WIN32

		SetWindowPos(Handle(), HWND_BOTTOM, 0, 0, 0, 0, SWP_NOMOVE | SWP_NOSIZE);

		#else

		#error "Impl me."

		#endif



		p->DelView(this);

		p->AddView(this, 0);

		p->OnChildrenChanged(this, true);

	}

}



GMessage::Result GMdiChild::OnEvent(GMessage *m)

{

	return GLayout::OnEvent(m);

}



///////////////////////////////////////////////////////////////////////////////////////////

class GMdiParentPrivate

{

public:

};



GMdiParent::GMdiParent()

{

	d = new GMdiParentPrivate;

	SetPourLargest(true);

}



GMdiParent::~GMdiParent()

{

	if (GetWindow())

	{

		GetWindow()->UnregisterHook(this);

	}

	

	DeleteObj(d);

}



void GMdiParent::OnPaint(GSurface *pDC)

{

	pDC->Colour(LC_LOW, 24);

	pDC->Rectangle();	

}



bool GMdiParent::Attach(GViewI *p)

{

	bool s = GLayout::Attach(p);

	if (s)

	{

		AttachChildren();

		GetWindow()->RegisterHook(this, GMouseEvents | GKeyEvents);

	}

	return s;

}



GMdiChild *GMdiParent::IsChild(GView *View)

{

	for (GViewI *v=View; v; v=v->GetParent())

	{

		if (v->GetParent() == this)

		{

			GMdiChild *c = dynamic_cast<GMdiChild*>(v);

			if (c)

			{

				return c;

			}

			LgiAssert(0);

			break;

		}

	}

	

	return 0;

}



bool GMdiParent::OnViewMouse(GView *View, GMouse &m)

{

	if (m.Down())

	{

		GMdiChild *c = IsChild(View);

		if (c)

		{

			c->Raise();

		}

	}

	

	return true;

}



bool GMdiParent::OnViewKey(GView *View, GKey &Key)

{

	if (Key.Down() AND Key.Ctrl() AND Key.c16 == '\t')

	{

		bool Child = IsChild(View);

		if (Child)

		{

			GView *v;



			if (Key.Shift())

			{

				v = dynamic_cast<GView*>(Children.First());

			}

			else

			{

				v = dynamic_cast<GView*>(Children.Last());

			}



			GMdiChild *c = dynamic_cast<GMdiChild*>(v);

			if (c)

			{

				if (Key.Shift())

				{

					c->Raise();

				}

				else

				{

					c->Lower();

				}



				return true;

			}

		}

	}



	return false;

}



GRect GMdiParent::NewPos()

{

	GRect Status(0, 0, X()*0.75, Y()*0.75);



	int Block = 5;

	for (int y=0; y<Y()>>Block; y++)

	{

		for (int x=0; x<X()>>Block; x++)

		{

			bool Has = false;

			for (GViewI *c = Children.First(); c; c = Children.Next())

			{

				GRect p = c->GetPos();

				if (p.x1 >> Block == x AND

					p.y1 >> Block == y)

				{

					Has = true;

					break;

				}

			}

			

			if (!Has)

			{

				Status.Offset(x << Block, y << Block);

				return Status;

			}

		}

	}

	

	return Status;

}



void GMdiParent::OnChildrenChanged(GViewI *Wnd, bool Attaching)

{

	for (GViewI *v=Children.First(); v; )

	{

		GMdiChild *c = dynamic_cast<GMdiChild*>(v);

		v=Children.Next();

		if (c)

		{

			c->Invalidate(&c->d->Title);

			

			if (!v)

			{

				GViewI *n = c->Children.First();

				if (n)

				{

					n->Focus(true);

				}

			}

		}

	}

}