using System;
using System.Drawing;
using System.Linq;
using System.Windows.Forms;
using System.Runtime.InteropServices;

namespace BizHawk.Client.EmuHawk
{
	public sealed class InputWidget : TextBox
	{
		//TODO: when binding, make sure that the new key combo is not in one of the other bindings

		private readonly int _maxBind = 4; //Max number of bindings allowed
		private int _pos;	 //Which mapping the widget will listen for
		private readonly Timer _timer = new Timer();
		private readonly string[] _bindings = new string[4];
		private string _wasPressed = String.Empty;
		private readonly ToolTip _tooltip1 = new ToolTip();

		public bool AutoTab = true;
		public string WidgetName;

		[DllImport("user32")]
		private static extern bool HideCaret(IntPtr hWnd);

		public InputWidget()
		{
			ContextMenu = new ContextMenu();
			_timer.Tick += Timer_Tick;
			ClearBindings();
			_tooltip1.AutoPopDelay = 2000;
		}

		public InputWidget(int maxBindings, bool autotab)
		{
			AutoTab = autotab;
			ContextMenu = new ContextMenu();
			_timer.Tick += Timer_Tick;
			_maxBind = maxBindings;
			_bindings = new string[_maxBind];
			ClearBindings();
			_tooltip1.AutoPopDelay = 2000;
		}

		protected override void OnMouseClick(MouseEventArgs e)
		{
			HideCaret(Handle);
			base.OnMouseClick(e);
		}

		private void ClearBindings()
		{
			for (int i = 0; i < _maxBind; i++)
			{
				_bindings[i] = String.Empty;
			}
		}

		protected override void OnEnter(EventArgs e)
		{
			_pos = 0;
			_timer.Start();

			_wasPressed = Input.Instance.GetNextBindEvent();
			BackColor = Color.LightCyan;
		}

		protected override void OnLeave(EventArgs e)
		{
			_timer.Stop();
			UpdateLabel();
			BackColor = SystemColors.Window;
			base.OnLeave(e);

		}

		private void Timer_Tick(object sender, EventArgs e)
		{
			ReadKeys();
		}

		public void EraseMappings()
		{
			ClearBindings();
			Text = String.Empty;
		}

		private void ReadKeys()
		{
			Input.Instance.Update();
			var TempBindingStr = Input.Instance.GetNextBindEvent();
			if (!String.IsNullOrEmpty(_wasPressed) && TempBindingStr == _wasPressed)
			{
				return;
			}
			else if (TempBindingStr != null)
			{
				if (TempBindingStr == "Escape")
				{
					ClearBindings();
					Increment();
					return;
				}
				else if (TempBindingStr == "Alt+F4")
				{
					return;
				}

				if (!IsDuplicate(TempBindingStr))
				{
					_bindings[_pos] = TempBindingStr;
				}
				_wasPressed = TempBindingStr;

				UpdateLabel();
				Increment();
			}
		}

		private bool IsDuplicate(string binding)
		{
			return _bindings.FirstOrDefault(x => x == binding) != null;
		}

		protected override void OnKeyUp(KeyEventArgs e)
		{
			if (e.KeyCode == Keys.F4 && e.Modifiers == Keys.Alt)
			{
				base.OnKeyUp(e);
			}

			_wasPressed = String.Empty;
		}

		protected override void OnKeyDown(KeyEventArgs e)
		{
			if (e.KeyCode == Keys.F4 && e.Modifiers == Keys.Alt)
			{
				base.OnKeyDown(e);
				return;
			}

			e.Handled = true;
		}

		// Advances to the next widget or the next binding depending on the autotab setting
		public void Increment()
		{
			if (AutoTab)
			{
				Parent.SelectNextControl(this, true, true, true, true);
			}
			else
			{
				if (_pos < _maxBind)
				{
					_pos++;
				}
				else
				{
					_pos = 0;
				}
			}
		}

		public void Decrement()
		{
			if (AutoTab)
			{
				Parent.SelectNextControl(this, false, true, true, true);
			}
			else
			{
				if (_pos == 0)
				{
					_pos = _maxBind - 1;
				}
				else
				{
					_pos--;
				}
			}
		}

		public void UpdateLabel()
		{
			Text = String.Join(",", _bindings.Where(x => !String.IsNullOrWhiteSpace(x)));
		}

		public string Bindings
		{
			get
			{
				return Text;
			}
			set
			{
				ClearBindings();
				var newBindings = value.Trim().Split(',');
				for (int i = 0; i < _maxBind; i++)
				{
					if (i < newBindings.Length)
					{
						_bindings[i] = newBindings[i];
					}
				}
				UpdateLabel();
			}
		}

		protected override void OnKeyPress(KeyPressEventArgs e)
		{
			e.Handled = true;
		}

		protected override void WndProc(ref Message m)
		{
			switch (m.Msg)
			{
				case 0x0201: //WM_LBUTTONDOWN
					{
						Focus();
						return;
					}
				case 0x0203://WM_LBUTTONDBLCLK
					{
						return;
					}
				case 0x0204://WM_RBUTTONDOWN
					{
						return;
					}
				case 0x0205://WM_RBUTTONUP
					{
						return;
					}
				case 0x0206://WM_RBUTTONDBLCLK
					{
						return;
					}
			}

			base.WndProc(ref m);
		}

		protected override void OnMouseWheel(MouseEventArgs e)
		{
			if (e.Delta > 0)
			{
				Decrement();
			}
			else
			{
				Increment();
			}
			base.OnMouseWheel(e);
		}

		protected override void OnGotFocus(EventArgs e)
		{
			HideCaret(Handle);
		}

		protected override bool ProcessCmdKey(ref Message msg, Keys keyData)
		{
			return !(keyData.ToString() == "F4" || keyData.ToString().Contains("Alt"));
		}
	}
}