/* ScummVM - Graphic Adventure Engine
 *
 * ScummVM is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * 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 3 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
 * aint32 with this program; if not, write to the Free Software
 *
 *
 * Based on the original sources
 *   Faery Tale II -- The Halls of the Dead
 *   (c) 1993-1996 The Wyrmkeep Entertainment Co.
 */

#include "common/events.h"

#include "saga2/saga2.h"
#include "saga2/panel.h"
#include "saga2/detection.h"
#include "saga2/fontlib.h"
#include "saga2/floating.h"
#include "saga2/display.h"
#include "saga2/gbevel.h"

namespace Saga2 {

//extern vDisplayPage   *drawPage;
extern char iniFile[];

//  Function to enable/disable user interface keys
extern bool enableUIKeys(bool _enabled);

/* ======================================================================= *
   global dispatcher base
 * ======================================================================= */

gDisplayPort        *globalPort;
gFont               *mainFont;

//  UI locking feature, currently kludged it could get better later.
int         lockUINest = 0;

/* ======================================================================= *
   gPanel member functions
 * ======================================================================= */

gPanel::gPanel(gWindow &win, const Rect16 &box, AppFunc *cmd)
	: _window(win), _extent(box), _command(cmd) {
	_enabled = 1;
	_ghosted = 0;
	_selected = 0;
	_imageLabel = 0;
	_title = nullptr;
	_id = 0;
	_wantMousePoll = 0;
	_userData = nullptr;
}

gPanel::gPanel(gPanelList &list, const Rect16 &box,
               const char *newTitle, uint16 ident, AppFunc *cmd)
	: _window(list._window) {
	_title = newTitle;
	_extent = box;
	_enabled = 1;
	_ghosted = 0;
	_selected = 0;
	_imageLabel = 0;
	_command = cmd;
	_id = ident;
	_wantMousePoll = 0;
	_userData = nullptr;
}

gPanel::gPanel(gPanelList &list, const Rect16 &box,
               gPixelMap &pic, uint16 ident, AppFunc *cmd)
	: _window(list._window) {
	_title = (char *)&pic;
	_extent = box;
	_enabled = 1;
	_ghosted = 0;
	_selected = 0;
	_imageLabel = 1;
	_command = cmd;
	_id = ident;
	_wantMousePoll = 0;
	_userData = nullptr;
}

gPanel::gPanel(gPanelList &list, const StaticRect &box,
               const char *newTitle, uint16 ident, AppFunc *cmd)
	: _window(list._window) {
	_title = newTitle;
	_extent = Rect16(box);
	_enabled = 1;
	_ghosted = 0;
	_selected = 0;
	_imageLabel = 0;
	_command = cmd;
	_id = ident;
	_wantMousePoll = 0;
	_userData = nullptr;
}

//  Dummy virtual functions

gPanel::~gPanel() {
	if (this == g_vm->_toolBase->_mousePanel)
		g_vm->_toolBase->_mousePanel = nullptr;
	if (this == g_vm->_toolBase->_activePanel)
		g_vm->_toolBase->_activePanel = nullptr;
}
void gPanel::draw() {}
void gPanel::drawClipped(gPort &, const Point16 &, const Rect16 &) {}
void gPanel::pointerMove(gPanelMessage &) {}
bool gPanel::pointerHit(gPanelMessage &) {
	return false;
}
bool gPanel::pointerRHit(gPanelMessage &) {
	return false;
}
void gPanel::pointerDrag(gPanelMessage &) {}
void gPanel::pointerRelease(gPanelMessage &) {}
bool gPanel::keyStroke(gPanelMessage &) {
	return false;
}
void gPanel::timerTick(gPanelMessage &) {}
void gPanel::onMouseHintDelay() {}

void gPanel::enable(bool abled) {
	_enabled = abled ? 1 : 0;
}

void gPanel::select(uint16 sel) {
	_selected = sel ? 1 : 0;
}

void gPanel::ghost(bool b) {
	_ghosted = b ? 1 : 0;
}

bool gPanel::isActive() {
	return (this == g_vm->_toolBase->_activePanel);
}

void gPanel::notify(gEventType type, int32 value) {
	gEvent          ev;

	ev.panel = this;
	ev.eventType = type;
	ev.value = value;
	ev.mouse.x = g_vm->_toolBase->_pickPos.x - _extent.x;
	ev.mouse.y = g_vm->_toolBase->_pickPos.y - _extent.y;
	ev.window = &_window;

	if (_command) _command(ev);
	else if (this != &_window) _window.notify(ev);
}

bool gPanel::activate(gEventType) {
	return false;
}

void gPanel::deactivate() {
	if (isActive()) g_vm->_toolBase->_activePanel = nullptr;
}

void gPanel::makeActive() {
	g_vm->_toolBase->setActive(this);
}

void gPanel::invalidate(Rect16 *) {
	assert(displayEnabled());
	_window.update(_extent);
}


void gPanel::drawTitle(TextPositions placement) {
	gPort           &port = _window._windowPort;
	Rect16          r = _extent;
	const gPixelMap *img = nullptr;

	if (_title == nullptr)
		return;

	if (_imageLabel) {
		img = (const gPixelMap *)_title;
		r.width = img->_size.x;
		r.height = img->_size.y;
	} else {
		r.width = TextWidth(mainFont, _title, -1, kTextStyleUnderBar);
		r.height = mainFont->height;
	}

	switch (placement) {
	case kTextPosLeft:
		r.x -= r.width + 2;
		r.y += (_extent.height - r.height) / 2 + 1;
		break;

	case kTextPosRight:
		r.x += _extent.width + 3;
		r.y += (_extent.height - r.height) / 2 + 1;
		break;

	case kTextPosHigh:
		r.x += (_extent.width - r.width) / 2;
		r.y -= r.height + 1;
		break;

	case kTextPosLow:
		r.x += (_extent.width - r.width) / 2;
		r.y += _extent.height + 2;
		break;

	default:
		r.x += (_extent.width - r.width) / 2;
		r.y += (_extent.height - r.height) / 2;
		break;
	}

	SAVE_GPORT_STATE(port);                  // save pen color, etc.

	if (_imageLabel) {
		port.setIndirectColor(kBlackPen);     // pen color black
		port.setMode(kDrawModeColor);         // draw as glyph
		port.bltPixels(*img, 0, 0, r.x, r.y, r.width, r.height);
	} else {
		port.setMode(kDrawModeMatte);         // draw as glyph
		port.setIndirectColor(kBlackPen);     // pen color black
		port.setStyle(kTextStyleUnderBar);    // set style to do underbars
		port.moveTo(r.x, r.y);           // move to new text pos

		g_vm->_pointer->hide(*globalPort, r);        // hide the pointer
		port.drawText(_title, -1);            // draw the text
		g_vm->_pointer->show(*globalPort, r);        // hide the pointer
	}
}

gPanel *gPanel::hitTest(const Point16 &p) {
	return _enabled && !_ghosted && _extent.ptInside(p) ? this : nullptr;
}

gPanel *gPanel::keyTest(int16) {
	return nullptr;
}

/* ===================================================================== *
   gPanelList class: A context for holding panels.
 * ===================================================================== */

//  Constructor which is called from window subclass

gPanelList::gPanelList(gWindow &win, const Rect16 &box, char *newTitle,
                       uint16 ident, AppFunc *cmd)
	: gPanel(win, box, cmd) {
	_title = newTitle;
	_id = ident;
}

//  Constructor for standalone panels..

gPanelList::gPanelList(gPanelList &list)
	: gPanel(list, list._window.getExtent(), nullptr, 0, nullptr) {
	_window._contents.push_back(this);
}

gPanelList::~gPanelList() {
	removeControls();
	_window._contents.remove(this);
}

void gPanelList::removeControls() {
	gPanel *ctl;

	//  Delete all sub-panels.
	while (_contents.size()) {
		ctl = _contents.front();
		_contents.remove(ctl);
		delete ctl;
	}
}

//  enable/disable gPanelList and all it's children
void gPanelList::enable(bool abled) {
	gPanel::enable(abled);
}

void gPanelList::invalidate(Rect16 *) {
	gPanel *ctl;
	Rect16 invArea;

	assert(displayEnabled());

	if (displayEnabled())
		if (_contents.size()) {
			ctl = _contents.back();
			invArea = ctl->getExtent();

			for (Common::List<gPanel *>::iterator it = _contents.reverse_begin(); it != _contents.end(); --it) {
				ctl = *it;
				invArea = bound(invArea, ctl->getExtent());
			}
			_window.update(invArea);
		}
}

void gPanelList::draw() {
	gPanel *ctl;

	if (displayEnabled())
		if (_enabled) {
			for (Common::List<gPanel *>::iterator it = _contents.reverse_begin(); it != _contents.end(); --it) {
				ctl = *it;
				if (ctl->getEnabled())
					ctl->draw();
			}
		}
}

void gPanelList::drawClipped(
    gPort           &port,
    const Point16   &offset,
    const Rect16    &r) {
	gPanel          *ctl;
	Point16         tmpOffset = offset - Point16(_extent.x, _extent.y);
	Rect16          tmpR = r - Point16(_extent.x, _extent.y);

	if (displayEnabled())
		if (_enabled) {
			for (Common::List<gPanel *>::iterator it = _contents.reverse_begin(); it != _contents.end(); --it) {
				ctl = *it;
				if (ctl->getEnabled())
					ctl->drawClipped(port, tmpOffset, tmpR);
			}
		}
}

gPanel *gPanelList::hitTest(const Point16 &p) {
	gPanel        *ctl;
	gPanel        *result;

	if (_enabled && !_ghosted) {
		for (Common::List<gPanel *>::iterator it = _contents.begin(); it != _contents.end(); ++it) {
			ctl = *it;
			if ((result = ctl->hitTest(p)) != nullptr)
				return result;
		}
	}
	return nullptr;
}

gPanel *gPanelList::keyTest(int16 key) {
	gPanel          *ctl;
	gPanel          *result;

	if (_enabled && !_ghosted) {
		for (Common::List<gPanel *>::iterator it = _contents.reverse_begin(); it != _contents.end(); --it) {
			ctl = *it;
			if ((result = ctl->keyTest(key)) != nullptr)
				return result;
		}
	}

	return nullptr;
}

/* ===================================================================== *
   gWindow class: A panel list plus a drawing port.
 * ===================================================================== */

//  gWindow static variables

int           gWindow::_dragMode = 0;              // current dragging mode
StaticRect    gWindow::_dragExtent = {0, 0, 0, 0};            // dragging extent
StaticPoint16 gWindow::_dragOffset = {0, 0};            // offset to window origin

gWindow::gWindow(const Rect16 &box, uint16 ident, const char saveName[], AppFunc *cmd)
	: gPanelList(*this, box, nullptr, ident, cmd) {
	  //, saver(WIIFF_POS|WIIFS_NORMAL|WIIFE_ONEXIT,iniFile,saveName,box,this)
	_openFlag = false;
//	pointerImage = &arrowPtr;
//	pointerOffset = Point16( 0, 0 );

	//  Set up the window feature bits

//	windowFeatures = features;

	//  Set up the window's gPort

	_windowPort.setFont(mainFont);
	_windowPort.setPenMap(globalPort->_penMap);

	/*  if (windowFeatures & windowBackSaved)   // backsave data under window
	    {
	        backSave = NEW_UI gBackSave( box );
	        // rem: if backsave fails, then what?
	    }
	    else backSave = NULL;
	*/
	//  Set the window position.

	setPos(Point16(box.x, box.y));
}

gWindow::~gWindow() {
//	gControl     *ctl;

	if (isOpen()) close();

	//  Delete all sub-panels.

//	while ( (ctl = (gControl *)contents.remHead()) != NULL )
//		delete ctl;

//	delete backSave;
}

bool gWindow::open() {
	if (isOpen()) return true;

	//  Send a "pointer-leave" message to mouse panel.

	g_vm->_toolBase->leavePanel();
	g_vm->_toolBase->_windowList.push_front(this);
	g_vm->_toolBase->_activeWindow = this;
	g_vm->_toolBase->setActive(nullptr);

//	g_vm->_pointer->hide();
//	if (backSave) backSave->save( *globalPort );
//	g_vm->_pointer->setImage( *pointerImage, pointerOffset.x, pointerOffset.y );
//	g_vm->_pointer->show();

	_openFlag = true;

	draw();
	return true;
}

void gWindow::close() {
	//saver.onExit(this);
	if (!isOpen()) return;

	//  If any panels on this window are active, then deactivate them.
	if (g_vm->_toolBase->_activePanel && g_vm->_toolBase->_activePanel->getWindow() == this)
		g_vm->_toolBase->_activePanel->deactivate();

	//  Don't close a window that is being dragged (should never happen,
	//  but just in case).
	if (DragBar::_dragWindow == (FloatingWindow *)this)
		return;

	_openFlag = false;

	//  remove this window from the window list.

	g_vm->_toolBase->_windowList.remove(this);

	g_vm->_toolBase->_mouseWindow = g_vm->_toolBase->_activeWindow = g_vm->_toolBase->_windowList.front();
	g_vm->_toolBase->_mousePanel = g_vm->_toolBase->_activePanel = nullptr;
}

//  Move the window to the front...

void gWindow::toFront() {            // re-order the windows
	if (!isOpen()) return;

	g_vm->_toolBase->_windowList.remove(this);
	g_vm->_toolBase->_windowList.push_front(this);

	g_vm->_toolBase->_activePanel = nullptr;
	g_vm->_toolBase->_activeWindow = this;

	//  redraw the window
	update(_extent);
}

bool gWindow::isModal() {
	return false;
}

void gWindow::setPos(Point16 pos) {
	Rect16  newClip;

	_extent.x = pos.x;
	_extent.y = pos.y;

//	int16            titleHeight = mainFont->height + 5;

	//  We also need to set up the window's port in a similar fashion.

	_windowPort._origin.x = _extent.x;
	_windowPort._origin.y = _extent.y;

	//  set port's clip
	newClip = intersect(_extent, g_vm->_mainPort._clip);
	newClip.x -= _extent.x;
	newClip.y -= _extent.y;
	_windowPort.setClip(newClip);
	//saver.onMove(this);

//	if (backSave) backSave->setPos( pos );
}

void gWindow::setExtent(const Rect16 &r) {
	_extent.width = r.width;
	_extent.height = r.height;

	//saver.onSize(this);
	setPos(Point16(r.x, r.y));
}

//  insert window into window list
void gWindow::insert() {
	g_vm->_toolBase->_windowList.push_front(this);
}


//  REM: Need to either adjuct coords when we draw OR
//  redefine the address of the pixel map.

void gWindow::deactivate() {
	_selected = 0;
	gPanel::deactivate();
}

bool gWindow::activate(gEventType why) {
	if (why == kEventMouseDown) {           // momentarily depress
		_selected = 1;
		notify(why, 0);                      // notify App of successful hit
		return true;
	}
	return false;
}

void gWindow::pointerMove(gPanelMessage &) {
	notify(kEventMouseMove, 0);
}

bool gWindow::pointerHit(gPanelMessage &) {
	activate(kEventMouseDown);
	return true;
}

void gWindow::pointerDrag(gPanelMessage &) {
	if (_selected) {
		notify(kEventMouseDrag, 0);
	}
}

void gWindow::pointerRelease(gPanelMessage &) {
	if (_selected) notify(kEventMouseUp, 0);   // notify App of successful hit
	deactivate();
}

void gWindow::draw() {
	if (displayEnabled())
		gPanelList::draw();
}

void gWindow::drawClipped(
    gPort           &port,
    const Point16   &offset,
    const Rect16    &r) {
	if (displayEnabled())
		gPanelList::drawClipped(port, offset, r);
}

void gWindow::enable(bool abled) {
	gPanel::enable(abled);
	draw();
}

void gWindow::select(uint16 sel) {
	gPanel::select(sel);
	draw();
}

/*
void gWindow::setPointer( gPixelMap &map, int x, int y )
{
    pointerImage = &map;
    pointerOffset.x = x;
    pointerOffset.y = y;

    if (this == g_vm->_toolBase->_activeWindow)
    {
        g_vm->_pointer->hide();
        g_vm->_pointer->setImage( *pointerImage, pointerOffset.x, pointerOffset.y );
        g_vm->_pointer->show();
    }
}
*/

/* ===================================================================== *
   gControl class: The basis for buttons and other controls.
 * ===================================================================== */

gControl::gControl(gPanelList &list, const Rect16 &box, const char *title_, uint16 ident,
                   AppFunc *cmd) : gPanel(list, box, title_, ident, cmd) {
	_accelKey = 0;

	//  Add control to the window's control list.

	_list = &list;
	list._contents.push_back(this);
}

gControl::gControl(gPanelList &list, const Rect16 &box, gPixelMap &img, uint16 ident,
                   AppFunc *cmd) : gPanel(list, box, img, ident, cmd) {
	_accelKey = 0;

	//  Add control to the window's control list.

	_list = &list;
	list._contents.push_back(this);
}

gControl::~gControl() {
	_list->_contents.remove(this);
}

gControl::gControl(gPanelList &list, const StaticRect &box, const char *title_, uint16 ident,
                   AppFunc *cmd) : gPanel(list, box, title_, ident, cmd) {
	_accelKey = 0;

	//  Add control to the window's control list.

	_list = &list;
	list._contents.push_back(this);
}

void gControl::enable(bool abled) {
	if (!abled != !getEnabled()) {  //  Use '!' to insure boolean-ness
		gPanel::enable(abled);
		invalidate();
	}
}

void gControl::select(uint16 sel) {
	if (!sel != !isSelected()) {    //  Use '!' to insure boolean-ness
		gPanel::select(sel);
		invalidate();
	}
}

void gControl::ghost(bool sel) {
	if (!sel != !isGhosted()) {     //  Use '!' to insure boolean-ness
		gPanel::ghost(sel);
		invalidate();
	}
}

gPanel *gControl::keyTest(int16 key) {
	return _accelKey == key ? this : nullptr;
}

//  For many controls, the only drawing routine we need is the
//  "clipped" one, and the normal draw routine just calls
//  drawClipped with the main port.

void gControl::draw() {
	g_vm->_pointer->hide(_window._windowPort, _extent);
	if (displayEnabled())
		drawClipped(*globalPort,
		            Point16(-_window._extent.x, -_window._extent.y),
		            _window._extent);
	g_vm->_pointer->show(_window._windowPort, _extent);
}

/* ===================================================================== *
   gGenericControl class: A generic button that notifies everything
 * ===================================================================== */

gGenericControl::gGenericControl(gPanelList &list, const Rect16 &box,
                                 uint16 ident, AppFunc *cmd)
	: gControl(list, box, nullptr, ident, cmd) {
	_dblClickFlag = false;
}

bool gGenericControl::activate(gEventType) {
	_selected = 1;
	return true;
}

void gGenericControl::deactivate() {
	_selected = 0;
	gPanel::deactivate();
}

void gGenericControl::pointerMove(gPanelMessage &msg) {
	notify(kEventMouseMove, (msg._pointerEnter ? kCVEnter : 0) | (msg._pointerLeave ? kCVLeave : 0));
}

bool gGenericControl::pointerHit(gPanelMessage &msg) {
	if (msg._rightButton)
		notify(kEventRMouseDown, 0);
	else if (msg._doubleClick && !_dblClickFlag) {
		_dblClickFlag = true;
		notify(kEventDoubleClick, 0);
	} else {
		_dblClickFlag = false;
		notify(kEventMouseDown, 0);
	}

	return true;
}

void gGenericControl::pointerDrag(gPanelMessage &) {
	notify(kEventMouseDrag, 0);
}

void gGenericControl::pointerRelease(gPanelMessage &) {
	notify(kEventMouseUp, 0);
	deactivate();
}

//  Generic control has no rendering code.
void gGenericControl::draw() {
}

/* ===================================================================== *
   class gToolBase: Global dispatcher for events
 * ===================================================================== */

void gToolBase::setActive(gPanel *ctl) {
	if (_activePanel && _activePanel == ctl)  return;
	if (_activePanel) _activePanel->deactivate();
	if (ctl == nullptr || ctl->activate(kEventNone)) _activePanel = ctl;
}

void gToolBase::handleMouse(Common::Event &event, uint32 time) {
	gWindow         *w = _activeWindow;
	gPanel          *ctl,
	                *pickPanel = nullptr;
	static gMouseState prevState;
	static int32    lastClickTime = 0x8000;
	static Point16  lastClickPos;


	// Emulate mouse state for now
	switch (event.type) {
	case Common::EVENT_LBUTTONDOWN:
		_curMouseState.left = true;
		break;
	case Common::EVENT_RBUTTONDOWN:
		_curMouseState.right = true;
		break;
	case Common::EVENT_LBUTTONUP:
		_curMouseState.left = false;
		break;
	case Common::EVENT_RBUTTONUP:
		_curMouseState.right = false;
		break;
	case Common::EVENT_MOUSEMOVE:
		_curMouseState.pos.x = event.mouse.x;
		_curMouseState.pos.y = event.mouse.y;
		g_vm->_pointer->move(Point16(_curMouseState.pos.x, _curMouseState.pos.y));
		break;
	default:
		break;
	}

	//  Do nothing if UI locked.
	if (lockUINest > 0)
		return;

	if (g_vm->getGameId() == GID_DINO && _curMouseState.right) {
		cycleCursor();
		return;
	}

	//  Code for "Tool tip delay"
	if (prevState.pos != _curMouseState.pos
	        &&  prevState.left != _curMouseState.left
	        &&  prevState.right != _curMouseState.right) {
		_lastMouseMoveTime = _msg._timeStamp;
		if (_mouseHintSet)
			setMouseTextF(nullptr);
	}

	//  If there is no active window, then do nothing.

	if (w == nullptr) {
		prevState = _curMouseState;
		return;
	}

	//  Set up the pick position relative to the window

	if (_activePanel) {
		_pickPos.x = _curMouseState.pos.x - _activePanel->_window._extent.x;
		_pickPos.y = _curMouseState.pos.y - _activePanel->_window._extent.y;
	} else {
		_pickPos.x = _curMouseState.pos.x - w->_extent.x;
		_pickPos.y = _curMouseState.pos.y - w->_extent.y;
	}

	//  Fill in the message to be sent to the various panels

	_msg._pickAbsPos  = _pickPos;
	_msg._leftButton  = _curMouseState.left ? 1 : 0;
	_msg._rightButton = _curMouseState.right ? 1 : 0;
	_msg._pointerEnter = 0;
	_msg._pointerLeave = 0;
	_msg._doubleClick = 0;
	_msg._timeStamp = time;

	if (((_curMouseState.left  && !_leftDrag)            // if left button hit
	        || (_curMouseState.right && !_rightDrag))      // or right button hit
	        && _activePanel != nullptr) {           // and a panel is active
		//  Then we have a button hit event. If the button hit
		//  is occurring outside the panel, then it should be
		//  de_selected.

		if (_activePanel->_extent.ptInside(_pickPos) == false)
			_activePanel->deactivate();
	}

	if (prevState.pos == _curMouseState.pos) ;          // don't do anything if same pos
	else if (_activePanel) {                 // if control active
		_mousePanel = _activePanel;           // assume mouse over active panel

		if (_leftDrag || _rightDrag) {
			setMsg(_msg, _activePanel);        // set up gPanelMessage
			_activePanel->pointerDrag(_msg);  // send panel a mouse movement
		} else {
			setMsg(_msg, _activePanel);        // set up gPanelMessage
			_activePanel->pointerMove(_msg);  // send panel a mouse movement
		}
	}

	if (!_activePanel /* && !ms.right */) {
		//  If the point is within the window
		Common::List<gWindow *>::iterator it;
		for (it = _windowList.begin(); it != _windowList.end(); ++it) {
			w = *it;
			if (w->_extent.ptInside(_curMouseState.pos) || w->isModal()) {
				//  Set up the pick position relative to the window

				_pickPos.x = _curMouseState.pos.x - w->_extent.x;
				_pickPos.y = _curMouseState.pos.y - w->_extent.y;

				if ((ctl = w->hitTest(_pickPos)) != nullptr)
					pickPanel = ctl;
				else
					pickPanel = w;

				break;
			}
		}

		if (it == _windowList.end()) {
			prevState = _curMouseState;
			return;
		}

		_mouseWindow = w;

		//  If the mouse is not over the control any more, tell it so.

		if (_mousePanel && _mousePanel != pickPanel) {
			if (&_mousePanel->_window != w) {
				//  Temporarily adjust _pickPos to be relative to the old panel's window
				//  instead of the new panel's window.
				_pickPos.x = _curMouseState.pos.x - _mousePanel->_window._extent.x;
				_pickPos.y = _curMouseState.pos.y - _mousePanel->_window._extent.y;

				setMsgQ(_msg, _mousePanel);        // set up gPanelMessage

				_pickPos.x = _curMouseState.pos.x - w->_extent.x;
				_pickPos.y = _curMouseState.pos.y - w->_extent.y;
			} else {
				setMsgQ(_msg, _mousePanel);        // set up gPanelMessage
			}
//			_msg._pickPos.x  = _pickPos.x - _mousePanel->extent.x;
//			_msg._pickPos.y  = _pickPos.y - _mousePanel->extent.y;
			_msg._inPanel     = 0;
			_msg._pointerEnter = 0;
			_msg._pointerLeave = 1;

			_mousePanel->pointerMove(_msg);

		}

		//  If the mouse is over a new control, make that the current
		//  mouse control.

		if (pickPanel) {
			setMsg(_msg, pickPanel);          // set up gPanelMessage
//			_msg._pickPos.x  = _pickPos.x - pickPanel->extent.x;
//			_msg._pickPos.y  = _pickPos.y - pickPanel->extent.y;
			_msg._leftButton  = _curMouseState.left ? 1 : 0;
//			_msg._inPanel        = pickPanel->extent.ptInside(_pickPos);
			_msg._pointerEnter = (_mousePanel == pickPanel) ? 0 : 1;
			_msg._pointerLeave = 0;

			_mousePanel = pickPanel;
			_mousePanel->pointerMove(_msg);
		} else
			_mousePanel = nullptr;
	}

	//  Fix up flags because earlier code may have changed them

	_msg._pointerEnter = 0;
	_msg._pointerLeave = 0;

	//  Send appropriate button-press messages to the panels

	if (prevState.left  != _curMouseState.left         // if buttons changed state
	        || prevState.right != _curMouseState.right) {

		//  If both buttons were previously up, then a mouse
		//  hit must have occurred.

		if (prevState.left == 0 && prevState.right == 0) {

			//  Check for mouse double-click. Check to see that
			//  the elapsed time from the last click is less than
			//  1/3 of a second, and that the mouse ptr hasn't moved
			//  very much.

			if (((uint32)(_msg._timeStamp - lastClickTime) < 333)
			        ||  _curMouseState.left > 1
			        ||  _curMouseState.right > 1) {
				Point16 diff = lastClickPos - _curMouseState.pos;

				if (ABS(diff.x) + ABS(diff.y) < 6)
					_msg._doubleClick = 1;
			}

			//  Record the last mouse time and position for
			//  future double-click checks.

			lastClickTime = _msg._timeStamp;
			lastClickPos = _curMouseState.pos;

			if (_mousePanel) {               // if over a control
				setMsgQ(_msg, _mousePanel);        // set up gPanelMessage
//				_msg._pickPos.x = _pickPos.x - _mousePanel->extent.x;
//				_msg._pickPos.y = _pickPos.y - _mousePanel->extent.y;
				_msg._inPanel     = 1;

				if (_activeWindow && _activeWindow->isModal()) {
					_mouseWindow = _activeWindow;
				} else if (_mouseWindow == nullptr) {
					_mouseWindow = &_mousePanel->_window;
				}

				if (_mouseWindow && _mouseWindow != _activeWindow) {
					_msg._pickAbsPos = _pickPos;
					//  Re-order the windows.
					_mouseWindow->toFront();
				}
				// send it a hit message
				if (_mousePanel->pointerHit(_msg)) {
					_activePanel = _mousePanel;
					if (_curMouseState.left)
						_leftDrag = true;
					else
						_rightDrag = true;
				}
			}
		} else if ((_leftDrag && _curMouseState.left == false)  // check for release
		           || (_rightDrag && _curMouseState.right == false)) {
			if (_activePanel && _mousePanel) {            // if a control is active
				setMsg(_msg, _mousePanel);    // send it a release message
				_mousePanel->pointerRelease(_msg);
			}
			_leftDrag = _rightDrag = false;
		}
	}

	prevState = _curMouseState;
}

void gToolBase::leavePanel() {
	_msg._timeStamp = g_system->getMillis();

	if (_mousePanel) {
		_msg._inPanel     = 0;
		_msg._pointerEnter = 0;
		_msg._pointerLeave = 1;

		_mousePanel->pointerMove(_msg);
		_mousePanel = nullptr;
	}

	if (_activePanel) _activePanel->deactivate();
}

void gToolBase::handleKeyStroke(Common::Event &event) {
	gWindow *w = _activeWindow;
	gPanel  *ctl;

	uint16 key = event.kbd.ascii; // FIXME
	uint16 qualifier = 0;

	if (event.kbd.flags & Common::KBD_SHIFT)
		qualifier |= kQualifierShift;

	if (event.kbd.flags & Common::KBD_CTRL)
		qualifier |= kQualifierControl;

	if (event.kbd.flags & Common::KBD_ALT)
		qualifier |= kQualifierAlt;

	_msg._pickAbsPos  = _pickPos;
	_msg._pointerEnter = 0;
	_msg._pointerLeave = 0;
	_msg._key = key;
	_msg._qualifier = qualifier;
	_msg._timeStamp = g_system->getMillis();

	if (_activePanel) {                      // send keystroke to active panel
		setMsg(_msg, _activePanel);            // set up gPanelMessage
		if (_activePanel->keyStroke(_msg))
			return;
	}

	//  Now, search the contents of the window for a control with
	//  the correct accelerator key

	if (w) {
		uint16 k = key;
		//uint8 k = key & 0xff;

		if (k != 0) {
			k = toupper(k);

			if ((ctl = w->keyTest(k)) != nullptr) {
				if (_activePanel == ctl) return;
				if (_activePanel) _activePanel->deactivate();
				if (ctl->activate(kEventKeyDown)) {
					_activePanel = ctl;
					return;
				}
			}
		}

		//  Try sending the message to the window

		if (w->keyStroke(_msg))
			return;

		// else send the message to the app.

		w->notify(kEventKeyDown, (qualifier << 16) | key);
	}
}

void gToolBase::handleTimerTick(int32 tick) {
	_msg._pickAbsPos  = _pickPos;
	_msg._pointerEnter = 0;
	_msg._pointerLeave = 0;
	_msg._timeStamp = tick;

	if (_activePanel) {                      // send keystroke to active panel
		setMsg(_msg, _activePanel);            // set up gPanelMessage
		_activePanel->timerTick(_msg);
	} else if (_mousePanel) {
		if (_mousePanel->_wantMousePoll) {
			setMsg(_msg, _mousePanel);         // set up gPanelMessage
			_mousePanel->pointerMove(_msg);
		} else if (!_mouseHintSet
		           && ((uint32)(tick - _lastMouseMoveTime) > 500)) {
			_mousePanel->onMouseHintDelay();
		}
	}
}

void HandleTimerTick(long tick) {
	static int32        lastTick;

	if (tick - lastTick > 1) {
		lastTick = tick;
		g_vm->_toolBase->handleTimerTick(tick);
	}
}

/* ===================================================================== *
   Code to initialize the panel system
 * ===================================================================== */

void initPanels(gDisplayPort &port) {
	globalPort = &port;
	mainFont = &Helv11Font;
}

void cleanupPanels() {
}

int16 leftButtonState() {
	return g_vm->_toolBase->_msg._leftButton;
}

int16 rightButtonState() {
	return g_vm->_toolBase->_msg._rightButton;
}

void LockUI(bool state) {
	if (state == true) {
		if (lockUINest <= 0) {
			g_vm->_pointer->hide();
			enableUIKeys(false);
			g_vm->_toolBase->setActive(nullptr);
		}
		lockUINest++;
	} else {
		lockUINest--;
		assert(lockUINest >= 0);
		if (lockUINest <= 0) {
			enableUIKeys(true);
			g_vm->_pointer->show();
		}
	}
}

void dumpGBASE(char *msg) {
}

} // end of namespace Saga2