
///////////////////////////////////////////////////////////
//                                                       //
//                         SAGA                          //
//                                                       //
//      System for Automated Geoscientific Analyses      //
//                                                       //
//                    User Interface                     //
//                                                       //
//                    Program: SAGA                      //
//                                                       //
//-------------------------------------------------------//
//                                                       //
//                 VIEW_Map_Control.cpp                  //
//                                                       //
//          Copyright (C) 2005 by Olaf Conrad            //
//                                                       //
//-------------------------------------------------------//
//                                                       //
// This file is part of 'SAGA - System for Automated     //
// Geoscientific Analyses'. SAGA 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.       //
//                                                       //
// SAGA 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, see   //
// <http://www.gnu.org/licenses/>.                       //
//                                                       //
//-------------------------------------------------------//
//                                                       //
//    contact:    Olaf Conrad                            //
//                Institute of Geography                 //
//                University of Goettingen               //
//                Germany                                //
//                                                       //
//    e-mail:     oconrad@saga-gis.org                   //
//                                                       //
///////////////////////////////////////////////////////////

//---------------------------------------------------------
#include <wx/window.h>
#include <wx/image.h>
#include <wx/dcclient.h>

#include <saga_gdi/sgdi_helper.h>

#include "res_images.h"

#include "helper.h"

#include "wksp_map.h"
#include "wksp_map_layer.h"
#include "wksp_tool.h"
#include "wksp_grid.h"
#include "wksp_shapes.h"

#include "view_map.h"
#include "view_map_control.h"


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

//---------------------------------------------------------
#define GET_KEYS(e)	\
	((e.LeftIsDown  () ? TOOL_INTERACTIVE_KEY_LEFT   : 0)\
	|(e.MiddleIsDown() ? TOOL_INTERACTIVE_KEY_MIDDLE : 0)\
	|(e.RightIsDown () ? TOOL_INTERACTIVE_KEY_RIGHT  : 0)\
	|(e.ShiftDown   () ? TOOL_INTERACTIVE_KEY_SHIFT  : 0)\
	|(e.AltDown     () ? TOOL_INTERACTIVE_KEY_ALT    : 0)\
	|(e.ControlDown () ? TOOL_INTERACTIVE_KEY_CTRL   : 0))


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

//---------------------------------------------------------
BEGIN_EVENT_TABLE(CVIEW_Map_Control, wxPanel)
	EVT_PAINT				(CVIEW_Map_Control::On_Paint)
	EVT_SIZE				(CVIEW_Map_Control::On_Size)
	EVT_KEY_DOWN			(CVIEW_Map_Control::On_Key_Down)

	EVT_MOUSEWHEEL			(CVIEW_Map_Control::On_Mouse_Wheel)
	EVT_MOTION				(CVIEW_Map_Control::On_Mouse_Motion)
	EVT_LEFT_DOWN			(CVIEW_Map_Control::On_Mouse_LDown)
	EVT_LEFT_UP				(CVIEW_Map_Control::On_Mouse_LUp)
	EVT_LEFT_DCLICK			(CVIEW_Map_Control::On_Mouse_LDClick)
	EVT_RIGHT_DOWN			(CVIEW_Map_Control::On_Mouse_RDown)
	EVT_RIGHT_UP			(CVIEW_Map_Control::On_Mouse_RUp)
	EVT_RIGHT_DCLICK		(CVIEW_Map_Control::On_Mouse_RDClick)
	EVT_MIDDLE_DOWN			(CVIEW_Map_Control::On_Mouse_MDown)
	EVT_MIDDLE_UP			(CVIEW_Map_Control::On_Mouse_MUp)
	EVT_MOUSE_CAPTURE_LOST	(CVIEW_Map_Control::On_Mouse_Lost)
END_EVENT_TABLE()


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

//---------------------------------------------------------
CVIEW_Map_Control::CVIEW_Map_Control(CVIEW_Map *pParent, CWKSP_Map *pMap)
	: wxPanel(pParent, -1, wxDefaultPosition, wxDefaultSize, wxFULL_REPAINT_ON_RESIZE)
{
	m_pParent   = (CVIEW_Map *)pParent;
	m_pMap      = pMap;

	m_Mode      = -1;
	Set_Mode(MAP_MODE_ZOOM);

	m_Drag_Mode = TOOL_INTERACTIVE_DRAG_NONE;

	m_CrossHair.x = m_CrossHair.y = -1;
}

//---------------------------------------------------------
CVIEW_Map_Control::~CVIEW_Map_Control(void)
{}


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

//---------------------------------------------------------
bool CVIEW_Map_Control::Set_Mode(int Mode)
{
	if( m_Mode == Mode )
	{
		return( false );
	}

	m_Mode_Previous = m_Mode;

	m_Mode = Mode;

	switch( m_Mode )
	{
	default               :
	case MAP_MODE_ZOOM    : SetCursor(IMG_Get_Cursor(ID_IMG_CRS_SELECT   )); break;
	case MAP_MODE_PAN     : SetCursor(IMG_Get_Cursor(ID_IMG_CRS_HAND     )); break;
	case MAP_MODE_PAN_DOWN: SetCursor(IMG_Get_Cursor(ID_IMG_CRS_HAND_GRAP)); break;
	case MAP_MODE_SELECT  : SetCursor(IMG_Get_Cursor(ID_IMG_CRS_INFO     )); break;
	}

	return( true );
}

//---------------------------------------------------------
inline void CVIEW_Map_Control::_Set_StatusBar(const TSG_Point &Point)
{
	static bool bBuisy = false;

	if( bBuisy == false )
	{
		bBuisy = true;

		//-------------------------------------------------
		int Position = m_pMap->Get_Parameter("GCS_POSITION")->asInt(); wxString Coordinates[2];

		if( Position > 0 && m_pMap->Get_Projection().is_Okay() )
		{
			CSG_Projection GCS; GCS.Set_GCS_WGS84(); TSG_Point GCS_Point = Point;

			if( SG_Get_Projected(m_pMap->Get_Projection(), GCS, GCS_Point) )
			{
				if( Position == 1 )
				{
					Coordinates[0].Printf("LON %s", SG_Double_To_Degree(GCS_Point.x).c_str());
					Coordinates[1].Printf("LAT %s", SG_Double_To_Degree(GCS_Point.y).c_str());
				}
				else
				{
					Coordinates[0].Printf("LON %f", GCS_Point.x);
					Coordinates[1].Printf("LAT %f", GCS_Point.y);
				}
			}
		}

		if( Coordinates[0].IsEmpty() )
		{
			Coordinates[0].Printf("X %f", Point.x);
			Coordinates[1].Printf("Y %f", Point.y);
		}

		STATUSBAR_Set_Text(Coordinates[0], STATUSBAR_VIEW_X);
		STATUSBAR_Set_Text(Coordinates[1], STATUSBAR_VIEW_Y);

		//-------------------------------------------------
		if( m_Mode == MAP_MODE_DISTANCE_GET )
		{
			STATUSBAR_Set_Text(m_Measure.Get_Measure(Point), STATUSBAR_VIEW_Z);
		}
		else if( m_Mode == MAP_MODE_DISTANCE )
		{
		//	STATUSBAR_Set_Text(m_Measure.Get_Measure(     ), STATUSBAR_VIEW_Z);
		}
		else if( Get_Active_Layer() )
		{
			CWKSP_Layer *pLayer = Get_Active_Layer(); CWKSP_Map_Layer *pMapLayer = m_pMap->Get_Map_Layer(pLayer);

			TSG_Point p(Point); double epsilon = _Get_Client2World(2.); // 2 pixel tolerance...

			if( !pMapLayer || pMapLayer->is_Projecting() )
			{
				TSG_Point e(Point); e.x += epsilon; e.y += epsilon;

				if( SG_Get_Projected(m_pMap->Get_Projection(), pLayer->Get_Object()->Get_Projection(), p)
				&&  SG_Get_Projected(m_pMap->Get_Projection(), pLayer->Get_Object()->Get_Projection(), e) )
				{
					epsilon = (fabs(e.x - e.x) + fabs(e.y - e.y)) / 2.;
				}
			}

			STATUSBAR_Set_Text(wxString::Format("Z %s", pLayer->Get_Value(p, epsilon).c_str()), STATUSBAR_VIEW_Z);
		}
		else
		{
			STATUSBAR_Set_Text("Z", STATUSBAR_VIEW_Z);
		}

		bBuisy = false;
	}
}


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

//---------------------------------------------------------
inline wxPoint CVIEW_Map_Control::_Get_World2Client(const TSG_Point &Point)
{
	wxRect rClient(GetClientSize()); CSG_Rect rWorld(m_pMap->Get_World(rClient));

	double World2Client = (double)rClient.GetWidth() / rWorld.Get_XRange();

	return( wxPoint(          (int)(0.5 + (Point.x - rWorld.Get_XMin()) * World2Client),
		rClient.GetHeight() - (int)(0.5 + (Point.y - rWorld.Get_YMin()) * World2Client)
	));
}

//---------------------------------------------------------
inline CSG_Point CVIEW_Map_Control::_Get_Client2World(const wxPoint &Point, bool bToActive)
{
	TSG_Point pWorld = m_pMap->Get_World(wxRect(GetClientSize()), Point);

	if( bToActive && m_pMap->Get_Map_Layer_Active() )
	{
		SG_Get_Projected(m_pMap->Get_Projection(), Get_Active_Layer()->Get_Object()->Get_Projection(), pWorld);
	}

	return( pWorld );
}

//---------------------------------------------------------
inline double CVIEW_Map_Control::_Get_Client2World(double Length, bool bToActive)
{
	wxRect rClient(GetClientSize()); CSG_Rect rWorld(m_pMap->Get_World(rClient));

	if( bToActive && m_pMap->Get_Map_Layer_Active() )
	{
		SG_Get_Projected(m_pMap->Get_Projection(), Get_Active_Layer()->Get_Object()->Get_Projection(), rWorld);
	}

	return( Length * rWorld.Get_XRange() / (double)rClient.GetWidth() );
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::Set_CrossHair(const TSG_Point &Point)
{
	m_CrossHair = _Get_World2Client(Point);

	Refresh(false);
}

//---------------------------------------------------------
void CVIEW_Map_Control::Set_CrossHair_Off(void)
{
	m_CrossHair.x = m_CrossHair.y = -1;

	Refresh(false);
}


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

//---------------------------------------------------------
bool CVIEW_Map_Control::_Zoom(const wxPoint &A, const wxPoint &B, bool bZoomIn)
{
	CSG_Rect rZoom;

	if( A == B )
	{
		rZoom.Assign(m_pMap->Get_Extent());

		rZoom.Move(_Get_Client2World(A) - rZoom.Get_Center());

		if( bZoomIn )
		{
			rZoom.Deflate( 50.);
		}
		else
		{
			rZoom.Inflate(100.);
		}
	}
	else if( bZoomIn )
	{
		rZoom.Assign(_Get_Client2World(A), _Get_Client2World(B));
	}
	else
	{
		rZoom.Assign(m_pMap->Get_Extent()); CSG_Rect r(_Get_Client2World(A), _Get_Client2World(B));

		double dx = 1. - r.Get_XRange() / rZoom.Get_XRange();
		double dy = 1. - r.Get_YRange() / rZoom.Get_YRange();

		rZoom.Move(r.Get_Center() - rZoom.Get_Center());

		rZoom.Inflate(100. * (dx < dy ? dx : dy));
	}

	m_pMap->Set_Extent(rZoom);

	return( true );
}

//---------------------------------------------------------
bool CVIEW_Map_Control::_Zoom(const wxPoint &A, bool bZoomIn)
{
	return( _Zoom(A, A, bZoomIn) );
}

//---------------------------------------------------------
bool CVIEW_Map_Control::_Zoom(bool bZoomIn)
{
	wxSize s(GetSize()); return( _Zoom(wxPoint((int)(0.5 + s.GetWidth() / 2.), (int)(0.5 + s.GetHeight() / 2.)), bZoomIn) );
}


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

//---------------------------------------------------------
bool CVIEW_Map_Control::_Move(wxPoint &A, const wxPoint &B, bool bUpdate)
{
	if( A != B )
	{
		CSG_Rect rWorld(m_pMap->Get_Extent());

		rWorld.Move(_Get_Client2World(A) - _Get_Client2World(B));

		m_pMap->Set_Extent(rWorld);

		A = B;

		if( bUpdate )
		{
			Update(); _Set_StatusBar(_Get_Client2World(m_Mouse_Move));
		}

		return( true );
	}

	return( false );
}

//---------------------------------------------------------
bool CVIEW_Map_Control::_Move(const wxPoint &Move, bool bUpdate)
{
	wxPoint	A(Move), B(0, 0);

	return( _Move(A, B, bUpdate) );
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::_Draw_CrossHair(wxDC &dc)
{
	wxRect r(GetClientSize());

	if( r.Contains(m_CrossHair) )
	{
		wxPen oldPen(dc.GetPen()); wxRasterOperationMode oldMode = dc.GetLogicalFunction();

		#ifdef _SAGA_MSW
		dc.SetLogicalFunction(wxINVERT);
		#endif

		//-------------------------------------------------
		dc.SetPen(wxPen(*wxWHITE, 3)); // dc.CrossHair(m_CrossHair);
		dc.DrawLine(m_CrossHair.x, r.GetTop(), m_CrossHair.x, r.GetBottom());
		dc.DrawLine(r.GetLeft(), m_CrossHair.y, r.GetRight(), m_CrossHair.y);

		dc.SetPen(wxPen(*wxBLACK, 1)); // dc.CrossHair(m_CrossHair);
		dc.DrawLine(m_CrossHair.x, r.GetTop(), m_CrossHair.x, r.GetBottom());
		dc.DrawLine(r.GetLeft(), m_CrossHair.y, r.GetRight(), m_CrossHair.y);

		//-------------------------------------------------
		dc.SetPen(oldPen); dc.SetLogicalFunction(oldMode);
	}
}

//---------------------------------------------------------
void CVIEW_Map_Control::_Draw_Measure(wxDC &dc)
{
	if( m_Mode != MAP_MODE_PAN_DOWN && (m_Measure.Count() > 1 || (m_Measure.Count() > 0 && m_Mode == MAP_MODE_DISTANCE_GET)) )
	{
		wxPen oldPen(dc.GetPen());

		for(int Draw=0; Draw<2; Draw++)
		{
			dc.SetPen(Draw == 0 ? wxPen(*wxWHITE, 4) : wxPen(*wxBLACK, 2));

			for(int i=0, j=1; j<m_Measure.Count(); i++, j++)
			{
				dc.DrawLine(_Get_World2Client(m_Measure[i]), _Get_World2Client(m_Measure[j]));
			}

			if( m_Mode == MAP_MODE_DISTANCE_GET )
			{
				dc.DrawLine(_Get_World2Client(m_Measure[m_Measure.Count() - 1]), m_Mouse_Move);

				if( m_Measure.Get_Type() == 1 )
				{
					dc.DrawLine(_Get_World2Client(m_Measure[0]), m_Mouse_Move);
				}
			}
			else if( m_Measure.Get_Type() == 1 )
			{
				dc.DrawLine(_Get_World2Client(m_Measure[0]), _Get_World2Client(m_Measure[m_Measure.Count() - 1]));
			}
		}

		dc.SetPen(oldPen);
	}
}

//---------------------------------------------------------
void CVIEW_Map_Control::_Draw_Drag(wxDC &dc)
{
	if( m_Drag_Mode != TOOL_INTERACTIVE_DRAG_NONE && m_Mouse_Down.x >= 0 && m_Mouse_Down != m_Mouse_Move )
	{
		wxPen oldPen(dc.GetPen()); wxBrush oldBrush(dc.GetBrush()); wxRasterOperationMode oldMode = dc.GetLogicalFunction();

		switch( m_Drag_Mode )
		{
		case TOOL_INTERACTIVE_DRAG_LINE : {
			dc.SetPen(wxPen(*wxWHITE, 4)); dc.DrawLine(m_Mouse_Down, m_Mouse_Move);
			dc.SetPen(wxPen(*wxBLACK, 2)); dc.DrawLine(m_Mouse_Down, m_Mouse_Move);
			break; }

		case TOOL_INTERACTIVE_DRAG_BOX  : {
			wxSize Size(m_Mouse_Move.x - m_Mouse_Down.x, m_Mouse_Move.y - m_Mouse_Down.y);
			#ifdef _SAGA_MSW
			dc.SetLogicalFunction(wxINVERT);
			dc.DrawRectangle(m_Mouse_Down, Size);
			#else
			dc.SetBrush(*wxTRANSPARENT_BRUSH);
			dc.SetPen(wxPen(*wxWHITE, 4)); dc.DrawRectangle(m_Mouse_Down, Size);
			dc.SetPen(wxPen(*wxBLACK, 2)); dc.DrawRectangle(m_Mouse_Down, Size);
			#endif
			break; }

		case TOOL_INTERACTIVE_DRAG_CIRCLE: {
			int Radius = (int)SG_Get_Distance(m_Mouse_Down.x, m_Mouse_Down.y, m_Mouse_Move.x, m_Mouse_Move.y);
			dc.SetBrush(*wxTRANSPARENT_BRUSH);
			dc.SetPen(wxPen(*wxWHITE, 4)); dc.DrawCircle(m_Mouse_Down, Radius); dc.DrawCircle(m_Mouse_Down, 2);
			dc.SetPen(wxPen(*wxBLACK, 2)); dc.DrawCircle(m_Mouse_Down, Radius); dc.DrawCircle(m_Mouse_Down, 2);
			break; }
		}

		dc.SetPen(oldPen); dc.SetBrush(oldBrush); dc.SetLogicalFunction(oldMode);
	}
}

//---------------------------------------------------------
void CVIEW_Map_Control::_Draw_Pan(wxDC &dc)
{
	if( m_Mode == MAP_MODE_PAN_DOWN && m_Mouse_Down != m_Mouse_Move )
	{
		dc.SetBackground(m_pMap->Get_Background()); dc.Clear();
		dc.DrawBitmap(m_Bitmap,
			m_Mouse_Move.x - m_Mouse_Down.x,
			m_Mouse_Move.y - m_Mouse_Down.y, false
		);
	}
}

//---------------------------------------------------------
void CVIEW_Map_Control::_Draw_Edit_Moves(wxDC &dc)
{
	if( m_Mode == MAP_MODE_SELECT && !_Check_Interactive(false) && m_pMap->Get_Map_Layer_Active(true) && Get_Active_Layer()->Edit_Do_Mouse_Move_Draw(m_Mouse_Down.x >= 0) )
	{
		Get_Active_Layer()->Edit_On_Mouse_Move_Draw(dc, m_pMap->Get_World(GetClientSize()), m_Mouse_Move);
	}
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::On_Paint(wxPaintEvent &event)
{
	if( _Update_Bitmap_Size() )
	{
		wxPaintDC dc(this);

		dc.DrawBitmap(m_Bitmap, 0, 0, false);

		_Draw_Drag      (dc);
		_Draw_Pan       (dc);
		_Draw_Measure   (dc);
		_Draw_Edit_Moves(dc);
		_Draw_CrossHair (dc);
	}
}

//---------------------------------------------------------
void CVIEW_Map_Control::On_Size(wxSizeEvent &event)
{
	if( m_pParent->Do_Updates() )
	{
		_Update_Bitmap_Size();
	}
}

//---------------------------------------------------------
bool CVIEW_Map_Control::_Update_Bitmap_Size(void)
{
	wxRect r(GetClientSize());

	if( r.GetWidth() > 0 && r.GetHeight() > 0 )
	{
		if( !m_Bitmap.Ok() || m_Bitmap.GetWidth() != r.GetWidth() || m_Bitmap.GetHeight() != r.GetHeight() )
		{
			m_Bitmap.Create(r.GetWidth(), r.GetHeight());

			Refresh_Map();
		}

		return( m_Bitmap.Ok() );
	}

	return( false );
}

//---------------------------------------------------------
void CVIEW_Map_Control::Refresh_Map(void)
{
	if( m_Bitmap.Ok() )
	{
		wxMemoryDC dc(m_Bitmap);

		m_pMap->Draw_Map(dc, 1., m_Bitmap.GetSize());

		m_pParent->Ruler_Refresh();

		Refresh(false);
	}
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::On_Key_Down(wxKeyEvent &event)
{
	if( !m_pMap->Get_Map_Layer_Active(true) || !Get_Active_Layer()->Edit_On_Key_Down(event.GetKeyCode()) )
	{
		switch( event.GetKeyCode() )
		{
		default: event.Skip(); break;

		case WXK_PAGEUP  : _Zoom( true); break;
		case WXK_PAGEDOWN: _Zoom(false); break;

		case WXK_LEFT    : _Move(wxPoint(-10,   0), true); break;
		case WXK_RIGHT   : _Move(wxPoint( 10,   0), true); break;
		case WXK_UP      : _Move(wxPoint(  0, -10), true); break;
		case WXK_DOWN    : _Move(wxPoint(  0,  10), true); break;

		case WXK_F2:
			m_pMap->SaveAs_Image();
			break;

		case 'C':
			if( event.GetModifiers() == wxMOD_CONTROL )
			{
				m_pMap->SaveAs_Image_Clipboard(false);
			}
			else if( event.GetModifiers() == wxMOD_ALT )
			{
				m_pMap->SaveAs_Image_Clipboard(GetClientSize().x, GetClientSize().y, -1);
			}
			break;

		case 'L':
			if( event.GetModifiers() == wxMOD_CONTROL )
			{
				m_pMap->SaveAs_Image_Clipboard(true);
			}
		}
	}
}


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

//---------------------------------------------------------
bool CVIEW_Map_Control::_Check_Interactive(bool bProjection)
{
	if( g_pTool && g_pTool->is_Interactive() )
	{
		if( bProjection )
		{
			g_pTool->Set_Projection(m_pMap->Get_Projection()); // update interactive tool's projection
		}

		return( true );
	}

	return( false );
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_LDown(wxMouseEvent &event)
{
	if( m_Mode != MAP_MODE_SELECT )	// clipboard copy ?
	{
		if( event.ControlDown() )
		{
			m_pMap->SaveAs_Image_Clipboard(false);

			return;
		}

		if( event.AltDown() )
		{
			m_pMap->SaveAs_Image_Clipboard(GetClientSize().x, GetClientSize().y, -1);

			return;
		}
	}

	//-----------------------------------------------------
	SetFocus();

	m_Mouse_Down = m_Mouse_Move = event.GetPosition();

	bool bCaptureMouse = false;

	switch( m_Mode )
	{
	default:
		break;

	//-----------------------------------------------------
	case MAP_MODE_SELECT:
		if( _Check_Interactive() )
		{
			m_Drag_Mode   = ((CSG_Tool_Interactive *)g_pTool->Get_Tool())->Get_Drag_Mode();

			bCaptureMouse = m_Drag_Mode != TOOL_INTERACTIVE_DRAG_NONE;

			g_pTool->Execute(_Get_Client2World(event.GetPosition()), TOOL_INTERACTIVE_LDOWN, GET_KEYS(event));
		}
		else if( m_pMap->Get_Map_Layer_Active(false) )
		{
			bCaptureMouse = true;

			switch(	Get_Active_Layer()->Get_Type() )
			{
			default                  : m_Drag_Mode = TOOL_INTERACTIVE_DRAG_NONE; break;
			case WKSP_ITEM_Grid      :
			case WKSP_ITEM_PointCloud: m_Drag_Mode = TOOL_INTERACTIVE_DRAG_BOX ; break;
			case WKSP_ITEM_Shapes    : m_Drag_Mode = ((CWKSP_Shapes *)Get_Active_Layer())->is_Editing()
												   ? TOOL_INTERACTIVE_DRAG_NONE
												   : TOOL_INTERACTIVE_DRAG_BOX ; break;
			}

			if( m_pMap->Get_Map_Layer_Active(true) )
			{
				Get_Active_Layer()->Edit_On_Mouse_Down(
					_Get_Client2World(event.GetPosition()), _Get_Client2World(1.), GET_KEYS(event)
				);
			}
		}
		break;

	//-----------------------------------------------------
	case MAP_MODE_DISTANCE:
		m_Mode = MAP_MODE_DISTANCE_GET;
		m_Measure.Reset();

	case MAP_MODE_DISTANCE_GET:
		m_Drag_Mode   = TOOL_INTERACTIVE_DRAG_NONE;
		m_Measure.Add(_Get_Client2World(event.GetPosition()));
		Refresh(false);
		break;

	//-----------------------------------------------------
	case MAP_MODE_ZOOM:
		m_Drag_Mode   = TOOL_INTERACTIVE_DRAG_BOX;
		bCaptureMouse = true;
		break;

	//-----------------------------------------------------
	case MAP_MODE_PAN:
		m_Drag_Mode   = TOOL_INTERACTIVE_DRAG_NONE;
		bCaptureMouse = true;
		Set_Mode(MAP_MODE_PAN_DOWN);
		break;

	//-----------------------------------------------------
	case MAP_MODE_PAN_DOWN:
		m_Drag_Mode = TOOL_INTERACTIVE_DRAG_NONE;
		break;
	}

	//-----------------------------------------------------
	if( bCaptureMouse && !HasCapture() )
	{
		CaptureMouse();
	}
}

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_LUp(wxMouseEvent &event)
{
	if( HasCapture() )
	{
		ReleaseMouse();
	}

	//-----------------------------------------------------
	if( m_Mode != MAP_MODE_SELECT && (event.ControlDown() || event.AltDown()) )	// clipboard copy ?
	{
		return;
	}

	//-----------------------------------------------------
	m_Drag_Mode = TOOL_INTERACTIVE_DRAG_NONE;

	switch( m_Mode )
	{
	default:
		break;

	//-----------------------------------------------------
	case MAP_MODE_SELECT:
		if( _Check_Interactive() )
		{
			g_pTool->Execute(_Get_Client2World(event.GetPosition()), TOOL_INTERACTIVE_LUP, GET_KEYS(event));

			Refresh(false);
		}
		else if( m_pMap->Get_Map_Layer_Active(true) )
		{
			Get_Active_Layer()->Edit_On_Mouse_Up(
				_Get_Client2World(event.GetPosition()), _Get_Client2World(1.), GET_KEYS(event)|TOOL_INTERACTIVE_KEY_LEFT
			);
		}
		else if( m_pMap->Get_Map_Layer_Active() )	// on-the-fly projected layer !
		{
			double d = _Get_Client2World(1., true);

			Get_Active_Layer()->Edit_On_Mouse_Down(_Get_Client2World(m_Mouse_Down       , true), d, GET_KEYS(event));
			Get_Active_Layer()->Edit_On_Mouse_Up  (_Get_Client2World(event.GetPosition(), true), d, GET_KEYS(event)|TOOL_INTERACTIVE_KEY_LEFT);
		}
		break;

	//-----------------------------------------------------
	case MAP_MODE_ZOOM:
		_Zoom(m_Mouse_Down, event.GetPosition(), true);
		break;

	//-----------------------------------------------------
	case MAP_MODE_PAN_DOWN:
		Set_Mode(MAP_MODE_PAN);
		_Move(m_Mouse_Down, event.GetPosition());
		break;
	}

	m_Mouse_Down.x = -1;
}

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_LDClick(wxMouseEvent &event)
{
	SetFocus();

	switch( m_Mode )
	{
	default:
		break;

	//-----------------------------------------------------
	case MAP_MODE_SELECT:
		if( _Check_Interactive() )
		{
			g_pTool->Execute(_Get_Client2World(event.GetPosition()), TOOL_INTERACTIVE_LDCLICK, GET_KEYS(event));
		}
		break;
	}
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_RDown(wxMouseEvent &event)
{
	m_pParent->Activate();

	SetFocus();

	m_Mouse_Down = m_Mouse_Move = event.GetPosition();

	m_Drag_Mode	= TOOL_INTERACTIVE_DRAG_NONE;

	switch( m_Mode )
	{
	//-----------------------------------------------------
	case MAP_MODE_SELECT:
		if( _Check_Interactive() )
		{
			g_pTool->Execute(_Get_Client2World(event.GetPosition()), TOOL_INTERACTIVE_RDOWN, GET_KEYS(event));
		}
		else if( m_pMap->Get_Map_Layer_Active(true) )
		{
			Get_Active_Layer()->Edit_On_Mouse_Down(
				_Get_Client2World(event.GetPosition()), _Get_Client2World(1.), GET_KEYS(event)
			);
		}
		break;

	//-----------------------------------------------------
	case MAP_MODE_ZOOM:
		m_Drag_Mode = TOOL_INTERACTIVE_DRAG_BOX;
		break;

	//-----------------------------------------------------
	default:
		break;
	}
}

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_RUp(wxMouseEvent &event)
{
	wxMenu *pMenu = NULL;

	m_Drag_Mode = TOOL_INTERACTIVE_DRAG_NONE;

	switch( m_Mode )
	{
	default:
		pMenu = m_pParent->_Create_Menu();
		break;

	//-----------------------------------------------------
	case MAP_MODE_SELECT:
		if( _Check_Interactive() )
		{
			g_pTool->Execute(_Get_Client2World(event.GetPosition()), TOOL_INTERACTIVE_RUP, GET_KEYS(event));
		}
		else if( m_pMap->Get_Map_Layer_Active(true) && !Get_Active_Layer()->Edit_On_Mouse_Up(
				_Get_Client2World(event.GetPosition()), _Get_Client2World(1.), GET_KEYS(event)|TOOL_INTERACTIVE_KEY_RIGHT) )
		{
			pMenu = Get_Active_Layer()->Edit_Get_Menu();
		}
		break;

	//-----------------------------------------------------
	case MAP_MODE_DISTANCE:
		if( event.ControlDown() )
		{
			if( m_Measure.Dialog() )
			{
				STATUSBAR_Set_Text(m_Measure.Get_Measure(), STATUSBAR_VIEW_Z);
				Refresh(false);
			}
		}
		else
		{
			m_Measure.Reset();
			STATUSBAR_Set_Text(m_Measure.Get_Measure(), STATUSBAR_VIEW_Z);
			Refresh(false);
		}
		break;

	//-----------------------------------------------------
	case MAP_MODE_DISTANCE_GET:
		m_Mode = MAP_MODE_DISTANCE;
		STATUSBAR_Set_Text(m_Measure.Get_Measure(), STATUSBAR_VIEW_Z);
		Refresh(false);
		break;

	//-----------------------------------------------------
	case MAP_MODE_ZOOM:
		if( event.ControlDown() )	// context menu
		{
			pMenu = m_pParent->_Create_Menu();
		}
		else if( event.AltDown() )	// request coordinate
		{
			m_pMap->Show_Coordinate(_Get_Client2World(event.GetPosition()));
		}
		else	// zoom out
		{
			_Zoom(m_Mouse_Down, event.GetPosition(), false);
		}
		break;
	}

	//-----------------------------------------------------
	if( pMenu != NULL )
	{
		PopupMenu(pMenu, event.GetPosition());

		delete(pMenu);
	}

	m_Mouse_Down.x = -1;
}

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_RDClick(wxMouseEvent &event)
{
	SetFocus();

	switch( m_Mode )
	{
	default:
		break;

	//-----------------------------------------------------
	case MAP_MODE_SELECT:
		if( _Check_Interactive() )
		{
			g_pTool->Execute(_Get_Client2World(event.GetPosition()), TOOL_INTERACTIVE_RDCLICK, GET_KEYS(event));
		}
		break;
	}
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_MDown(wxMouseEvent &event)
{
	SetFocus();

	bool bCaptureMouse = true, bPan = true;

	m_Mouse_Down = m_Mouse_Move = event.GetPosition();

	switch( m_Mode )
	{
	default:
		break;

	//-----------------------------------------------------
	case MAP_MODE_SELECT:
		if( _Check_Interactive() )
		{
			m_Drag_Mode   = ((CSG_Tool_Interactive *)g_pTool->Get_Tool())->Get_Drag_Mode();

			bCaptureMouse = m_Drag_Mode != TOOL_INTERACTIVE_DRAG_NONE;

			if( g_pTool->Execute(_Get_Client2World(event.GetPosition()), TOOL_INTERACTIVE_MDOWN, GET_KEYS(event)) )
			{
				bPan = false;
			}
		}
		break;
	}

	//-----------------------------------------------------
	if( bPan )
	{
		m_Drag_Mode = TOOL_INTERACTIVE_DRAG_NONE;

		Set_Mode(MAP_MODE_PAN_DOWN);
	}

	//-----------------------------------------------------
	if( bCaptureMouse && !HasCapture() )
	{
		CaptureMouse();
	}
}

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_MUp(wxMouseEvent &event)
{
	if( HasCapture() )
	{
		ReleaseMouse();
	}

	m_Drag_Mode	= TOOL_INTERACTIVE_DRAG_NONE;

	switch( m_Mode )
	{
	default:
		break;

	//-----------------------------------------------------
	case MAP_MODE_PAN_DOWN:
		Set_Mode(m_Mode_Previous);
		_Move(m_Mouse_Down, event.GetPosition());
		break;
	}

	m_Mouse_Down.x = -1;
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_Motion(wxMouseEvent &event)
{
	wxPoint Point = event.GetPosition();

	switch( m_Mode )
	{
	//-----------------------------------------------------
	case MAP_MODE_SELECT:
		if( _Check_Interactive(false) )
		{
			g_pTool->Execute(_Get_Client2World(Point), 
				event.LeftIsDown  () ? TOOL_INTERACTIVE_MOVE_LDOWN :
				event.MiddleIsDown() ? TOOL_INTERACTIVE_MOVE_MDOWN :
				event.RightIsDown () ? TOOL_INTERACTIVE_MOVE_RDOWN : TOOL_INTERACTIVE_MOVE,
				GET_KEYS(event)
			);
		}
		else if( m_pMap->Get_Map_Layer_Active(true) )
		{
			Get_Active_Layer()->Edit_On_Mouse_Move(
				this, m_pMap->Get_World(GetClientSize()),
				Point, m_Mouse_Move,
				GET_KEYS(event)
			);
		}

		if( event.LeftIsDown() )
		{
			Refresh(false);
		}
		break;

	//-----------------------------------------------------
	case MAP_MODE_DISTANCE_GET:
		if( m_Measure.Count() > 0 )
		{
			Refresh(false);
		}
		break;

	//-----------------------------------------------------
	case MAP_MODE_ZOOM:
		if( event.LeftIsDown() || event.RightIsDown() )
		{
			Refresh(false);
		}
		break;

	//-----------------------------------------------------
	case MAP_MODE_PAN_DOWN:
		if( event.LeftIsDown() || event.MiddleIsDown() )
		{
			Refresh(false);
		}
		break;
	}

	//-----------------------------------------------------
	if( m_Mode != MAP_MODE_PAN_DOWN )
	{
		m_pParent->Ruler_Set_Position(Point.x, Point.y);

		m_pMap->Set_Mouse_Position(_Get_Client2World(Point));

		_Set_StatusBar(_Get_Client2World(Point));
	}

	//-----------------------------------------------------
	m_Mouse_Move = Point;
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_Wheel(wxMouseEvent &event)
{
	m_Mouse_Wheel_Accumulator += event.GetWheelRotation();

	if( m_Mouse_Wheel_Accumulator >= event.GetWheelDelta() )
	{
		_Zoom(event.GetPosition(),  true);

		m_Mouse_Wheel_Accumulator -= event.GetWheelDelta();
	}

	if( m_Mouse_Wheel_Accumulator <= -event.GetWheelDelta() )
	{
		_Zoom(event.GetPosition(), false);

		m_Mouse_Wheel_Accumulator += event.GetWheelDelta();
	}
}


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

//---------------------------------------------------------
void CVIEW_Map_Control::On_Mouse_Lost(wxMouseCaptureLostEvent &event)
{
	Set_CrossHair_Off();
}


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

//---------------------------------------------------------
