/*

   Android Touch Pointer view

   Copyright 2013 Thincast Technologies GmbH, Author: Martin Fleisz

   This Source Code Form is subject to the terms of the Mozilla Public License, v. 2.0.

   If a copy of the MPL was not distributed with this file, You can obtain one at

   http://mozilla.org/MPL/2.0/.

*/

package com.freerdp.freerdpcore.presentation;

import android.content.Context;

import android.graphics.Matrix;

import android.graphics.RectF;

import android.os.Handler;

import android.os.Message;

import android.util.AttributeSet;

import android.view.MotionEvent;

import android.widget.ImageView;

import com.freerdp.freerdpcore.R;

import com.freerdp.freerdpcore.utils.GestureDetector;

public class TouchPointerView extends ImageView

{

	private static final int POINTER_ACTION_CURSOR = 0;

	private static final int POINTER_ACTION_CLOSE = 3;

	// the touch pointer consists of 9 quadrants with the following functionality:

	//

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

	// | 0 | 1 | 2 |

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

	// | 3 | 4 | 5 |

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

	// | 6 | 7 | 8 |

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

	//

	// 0 ... contains the actual pointer (the tip must be centered in the quadrant)

	// 1 ... is left empty

	// 2, 3, 5, 6, 7, 8 ... function quadrants that issue a callback

	// 4 ... pointer center used for left clicks and to drag the pointer

	private static final int POINTER_ACTION_RCLICK = 2;

	private static final int POINTER_ACTION_LCLICK = 4;

	private static final int POINTER_ACTION_MOVE = 4;

	private static final int POINTER_ACTION_SCROLL = 5;

	private static final int POINTER_ACTION_RESET = 6;

	private static final int POINTER_ACTION_KEYBOARD = 7;

	private static final int POINTER_ACTION_EXTKEYBOARD = 8;

	private static final float SCROLL_DELTA = 10.0f;

	private static final int DEFAULT_TOUCH_POINTER_RESTORE_DELAY = 150;

	private RectF pointerRect;

	private RectF pointerAreaRects[] = new RectF[9];

	private Matrix translationMatrix;

	private boolean pointerMoving = false;

	private boolean pointerScrolling = false;

	private TouchPointerListener listener = null;

	private UIHandler uiHandler = new UIHandler();

	// gesture detection

	private GestureDetector gestureDetector;

	public TouchPointerView(Context context)

	{

		super(context);

		initTouchPointer(context);

	}

	public TouchPointerView(Context context, AttributeSet attrs)

	{

		super(context, attrs);

		initTouchPointer(context);

	}

	public TouchPointerView(Context context, AttributeSet attrs, int defStyle)

	{

		super(context, attrs, defStyle);

		initTouchPointer(context);

	}

	private void initTouchPointer(Context context)

	{

		gestureDetector =

		    new GestureDetector(context, new TouchPointerGestureListener(), null, true);

		gestureDetector.setLongPressTimeout(500);

		translationMatrix = new Matrix();

		setScaleType(ScaleType.MATRIX);

		setImageMatrix(translationMatrix);

		// init rects

		final float rectSizeWidth = (float)getDrawable().getIntrinsicWidth() / 3.0f;

		final float rectSizeHeight = (float)getDrawable().getIntrinsicWidth() / 3.0f;

		for (int i = 0; i < 3; i++)

		{

			for (int j = 0; j < 3; j++)

			{

				int left = (int)(j * rectSizeWidth);

				int top = (int)(i * rectSizeHeight);

				int right = left + (int)rectSizeWidth;

				int bottom = top + (int)rectSizeHeight;

				pointerAreaRects[i * 3 + j] = new RectF(left, top, right, bottom);

			}

		}

		pointerRect =

		    new RectF(0, 0, getDrawable().getIntrinsicWidth(), getDrawable().getIntrinsicHeight());

	}

	public void setTouchPointerListener(TouchPointerListener listener)

	{

		this.listener = listener;

	}

	public int getPointerWidth()

	{

		return getDrawable().getIntrinsicWidth();

	}

	public int getPointerHeight()

	{

		return getDrawable().getIntrinsicHeight();

	}

	public float[] getPointerPosition()

	{

		float[] curPos = new float[2];

		translationMatrix.mapPoints(curPos);

		return curPos;

	}

	private void movePointer(float deltaX, float deltaY)

	{

		translationMatrix.postTranslate(deltaX, deltaY);

		setImageMatrix(translationMatrix);

	}

	private void ensureVisibility(int screen_width, int screen_height)

	{

		float[] curPos = new float[2];

		translationMatrix.mapPoints(curPos);

		if (curPos[0] > (screen_width - pointerRect.width()))

			curPos[0] = screen_width - pointerRect.width();

		if (curPos[0] < 0)

			curPos[0] = 0;

		if (curPos[1] > (screen_height - pointerRect.height()))

			curPos[1] = screen_height - pointerRect.height();

		if (curPos[1] < 0)

			curPos[1] = 0;

		translationMatrix.setTranslate(curPos[0], curPos[1]);

		setImageMatrix(translationMatrix);

	}

	private void displayPointerImageAction(int resId)

	{

		setPointerImage(resId);

		uiHandler.sendEmptyMessageDelayed(0, DEFAULT_TOUCH_POINTER_RESTORE_DELAY);

	}

	private void setPointerImage(int resId)

	{

		setImageResource(resId);

	}

	// returns the pointer area with the current translation matrix applied

	private RectF getCurrentPointerArea(int area)

	{

		RectF transRect = new RectF(pointerAreaRects[area]);

		translationMatrix.mapRect(transRect);

		return transRect;

	}

	private boolean pointerAreaTouched(MotionEvent event, int area)

	{

		RectF transRect = new RectF(pointerAreaRects[area]);

		translationMatrix.mapRect(transRect);

		if (transRect.contains(event.getX(), event.getY()))

			return true;

		return false;

	}

	private boolean pointerTouched(MotionEvent event)

	{

		RectF transRect = new RectF(pointerRect);

		translationMatrix.mapRect(transRect);

		if (transRect.contains(event.getX(), event.getY()))

			return true;

		return false;

	}

	@Override public boolean onTouchEvent(MotionEvent event)

	{

		// check if pointer is being moved or if we are in scroll mode or if the pointer is touched

		if (!pointerMoving && !pointerScrolling && !pointerTouched(event))

			return false;

		return gestureDetector.onTouchEvent(event);

	}

	@Override protected void onLayout(boolean changed, int left, int top, int right, int bottom)

	{

		// ensure touch pointer is visible

		if (changed)

			ensureVisibility(right - left, bottom - top);

	}

	// touch pointer listener - is triggered if an action field is

	public interface TouchPointerListener {

		abstract void onTouchPointerClose();

		abstract void onTouchPointerLeftClick(int x, int y, boolean down);

		abstract void onTouchPointerRightClick(int x, int y, boolean down);

		abstract void onTouchPointerMove(int x, int y);

		abstract void onTouchPointerScroll(boolean down);

		abstract void onTouchPointerToggleKeyboard();

		abstract void onTouchPointerToggleExtKeyboard();

		abstract void onTouchPointerResetScrollZoom();

	}

	private class UIHandler extends Handler

	{

		UIHandler()

		{

			super();

		}

		@Override public void handleMessage(Message msg)

		{

			setPointerImage(R.drawable.touch_pointer_default);

		}

	}

	private class TouchPointerGestureListener extends GestureDetector.SimpleOnGestureListener

	{

		private MotionEvent prevEvent = null;

		public boolean onDown(MotionEvent e)

		{

			if (pointerAreaTouched(e, POINTER_ACTION_MOVE))

			{

				prevEvent = MotionEvent.obtain(e);

				pointerMoving = true;

			}

			else if (pointerAreaTouched(e, POINTER_ACTION_SCROLL))

			{

				prevEvent = MotionEvent.obtain(e);

				pointerScrolling = true;

				setPointerImage(R.drawable.touch_pointer_scroll);

			}

			return true;

		}

		public boolean onUp(MotionEvent e)

		{

			if (prevEvent != null)

			{

				prevEvent.recycle();

				prevEvent = null;

			}

			if (pointerScrolling)

				setPointerImage(R.drawable.touch_pointer_default);

			pointerMoving = false;

			pointerScrolling = false;

			return true;

		}

		public void onLongPress(MotionEvent e)

		{

			if (pointerAreaTouched(e, POINTER_ACTION_LCLICK))

			{

				setPointerImage(R.drawable.touch_pointer_active);

				pointerMoving = true;

				RectF rect = getCurrentPointerArea(POINTER_ACTION_CURSOR);

				listener.onTouchPointerLeftClick((int)rect.centerX(), (int)rect.centerY(), true);

			}

		}

		public void onLongPressUp(MotionEvent e)

		{

			if (pointerMoving)

			{

				setPointerImage(R.drawable.touch_pointer_default);

				pointerMoving = false;

				RectF rect = getCurrentPointerArea(POINTER_ACTION_CURSOR);

				listener.onTouchPointerLeftClick((int)rect.centerX(), (int)rect.centerY(), false);

			}

		}

		public boolean onScroll(MotionEvent e1, MotionEvent e2, float distanceX, float distanceY)

		{

			if (pointerMoving)

			{

				// move pointer graphics

				movePointer((int)(e2.getX() - prevEvent.getX()),

				            (int)(e2.getY() - prevEvent.getY()));

				prevEvent.recycle();

				prevEvent = MotionEvent.obtain(e2);

				// send move notification

				RectF rect = getCurrentPointerArea(POINTER_ACTION_CURSOR);

				listener.onTouchPointerMove((int)rect.centerX(), (int)rect.centerY());

				return true;

			}

			else if (pointerScrolling)

			{

				// calc if user scrolled up or down (or if any scrolling happened at all)

				float deltaY = e2.getY() - prevEvent.getY();

				if (deltaY > SCROLL_DELTA)

				{

					listener.onTouchPointerScroll(true);

					prevEvent.recycle();

					prevEvent = MotionEvent.obtain(e2);

				}

				else if (deltaY < -SCROLL_DELTA)

				{

					listener.onTouchPointerScroll(false);

					prevEvent.recycle();

					prevEvent = MotionEvent.obtain(e2);

				}

				return true;

			}

			return false;

		}

		public boolean onSingleTapUp(MotionEvent e)

		{

			// look what area got touched and fire actions accordingly

			if (pointerAreaTouched(e, POINTER_ACTION_CLOSE))

				listener.onTouchPointerClose();

			else if (pointerAreaTouched(e, POINTER_ACTION_LCLICK))

			{

				displayPointerImageAction(R.drawable.touch_pointer_lclick);

				RectF rect = getCurrentPointerArea(POINTER_ACTION_CURSOR);

				listener.onTouchPointerLeftClick((int)rect.centerX(), (int)rect.centerY(), true);

				listener.onTouchPointerLeftClick((int)rect.centerX(), (int)rect.centerY(), false);

			}

			else if (pointerAreaTouched(e, POINTER_ACTION_RCLICK))

			{

				displayPointerImageAction(R.drawable.touch_pointer_rclick);

				RectF rect = getCurrentPointerArea(POINTER_ACTION_CURSOR);

				listener.onTouchPointerRightClick((int)rect.centerX(), (int)rect.centerY(), true);

				listener.onTouchPointerRightClick((int)rect.centerX(), (int)rect.centerY(), false);

			}

			else if (pointerAreaTouched(e, POINTER_ACTION_KEYBOARD))

			{

				displayPointerImageAction(R.drawable.touch_pointer_keyboard);

				listener.onTouchPointerToggleKeyboard();

			}

			else if (pointerAreaTouched(e, POINTER_ACTION_EXTKEYBOARD))

			{

				displayPointerImageAction(R.drawable.touch_pointer_extkeyboard);

				listener.onTouchPointerToggleExtKeyboard();

			}

			else if (pointerAreaTouched(e, POINTER_ACTION_RESET))

			{

				displayPointerImageAction(R.drawable.touch_pointer_reset);

				listener.onTouchPointerResetScrollZoom();

			}

			return true;

		}

		public boolean onDoubleTap(MotionEvent e)

		{

			// issue a double click notification if performed in center quadrant

			if (pointerAreaTouched(e, POINTER_ACTION_LCLICK))

			{

				RectF rect = getCurrentPointerArea(POINTER_ACTION_CURSOR);

				listener.onTouchPointerLeftClick((int)rect.centerX(), (int)rect.centerY(), true);

				listener.onTouchPointerLeftClick((int)rect.centerX(), (int)rect.centerY(), false);

			}

			return true;

		}

	}

}