using System;
using System.Collections.Generic;
using System.Diagnostics;
using System.Drawing;
using OpenTK.Input;

namespace ClassicalSharp {
	
	public class ChatScreen : Screen {
		
		public ChatScreen( Game game ) : base( game ) {
			chatLines = game.ChatLines;
		}
		
		int chatLines;
		Texture announcementTex;
		TextInputWidget textInput;
		TextGroupWidget status, bottomRight, normalChat;
		bool suppressNextPress = true;
		int chatIndex;
		int blockSize;
		
		public override void Render( double delta ) {
			status.Render( delta );
			bottomRight.Render( delta );
			
			UpdateChatYOffset( false );
			DateTime now = DateTime.UtcNow;
			if( HandlesAllInput )
				normalChat.Render( delta );
			else
				RenderRecentChat( now, delta );
			
			if( announcementTex.IsValid )
				announcementTex.Render( graphicsApi );
			if( HandlesAllInput )
				textInput.Render( delta );
			
			if( game.Chat.Announcement.Text != null && announcementTex.IsValid &&
			   (now - game.Chat.Announcement.Received).TotalSeconds > 5 ) {
				graphicsApi.DeleteTexture( ref announcementTex );
			}
		}
		
		void RenderRecentChat( DateTime now, double delta ) {
			int[] metadata = (int[])Metadata;
			for( int i = 0; i < normalChat.Textures.Length; i++ ) {
				Texture texture = normalChat.Textures[i];
				if( !texture.IsValid ) continue;
				
				DateTime received = game.Chat.Log[metadata[i]].Received;
				if( (now - received).TotalSeconds <= 10 )
					texture.Render( graphicsApi );
			}
		}
		
		static FastColour backColour = new FastColour( 60, 60, 60, 180 );
		public void RenderBackground() {
			int height = normalChat.GetUsedHeight();
			int y = normalChat.Y + normalChat.Height - height - 5;
			int x = normalChat.X - 5;
			int width = normalChat.Width + 10;
			
			if( height > 0 )
				graphicsApi.Draw2DQuad( x, y, width, height + 10, backColour );
		}
		
		int inputOldHeight = -1;
		void UpdateChatYOffset( bool force ) {
			int height = textInput.RealHeight;
			if( force || height != inputOldHeight ) {
				normalChat.YOffset = height + blockSize + 15;
				int y = game.Height - normalChat.Height - normalChat.YOffset;
				
				normalChat.MoveTo( normalChat.X, y );
				inputOldHeight = height;
			}
		}
		
		Font chatFont, chatInputFont, chatUnderlineFont, announcementFont;
		public override void Init() {
			int fontSize = (int)(12 * game.GuiChatScale);
			Utils.Clamp( ref fontSize, 8, 60 );
			chatFont = new Font( "Arial", fontSize );
			chatInputFont = new Font( "Arial", fontSize, FontStyle.Bold );
			chatUnderlineFont = new Font( "Arial", fontSize, FontStyle.Underline );
			
			fontSize = (int)(14 * game.GuiChatScale);
			Utils.Clamp( ref fontSize, 8, 60 );
			announcementFont = new Font( "Arial", fontSize );
			blockSize = (int)(23 * 2 * game.GuiScale);
			
			textInput = new TextInputWidget( game, chatFont, chatInputFont );
			textInput.YOffset = blockSize + 5;
			status = new TextGroupWidget( game, 3, chatFont, chatUnderlineFont );
			status.VerticalAnchor = Anchor.LeftOrTop;
			status.HorizontalAnchor = Anchor.BottomOrRight;
			status.Init();
			bottomRight = new TextGroupWidget( game, 3, chatFont, chatUnderlineFont );
			bottomRight.VerticalAnchor = Anchor.BottomOrRight;
			bottomRight.HorizontalAnchor = Anchor.BottomOrRight;
			bottomRight.YOffset = blockSize * 3 / 2;
			bottomRight.Init();
			normalChat = new TextGroupWidget( game, chatLines, chatFont, chatUnderlineFont );
			normalChat.XOffset = 10;
			normalChat.YOffset = blockSize * 2 + 15;
			normalChat.HorizontalAnchor = Anchor.LeftOrTop;
			normalChat.VerticalAnchor = Anchor.BottomOrRight;
			normalChat.Init();
			int[] indices = new int[chatLines];
			for( int i = 0; i < indices.Length; i++ )
				indices[i] = -1;
			Metadata = indices;
			
			ChatLog chat = game.Chat;
			chatIndex = chat.Log.Count - chatLines;
			ResetChat();
			status.SetText( 0, chat.Status1.Text );
			status.SetText( 1, chat.Status2.Text );
			status.SetText( 2, chat.Status3.Text );
			bottomRight.SetText( 2, chat.BottomRight1.Text );
			bottomRight.SetText( 1, chat.BottomRight2.Text );
			bottomRight.SetText( 0,chat.BottomRight3.Text );
			UpdateAnnouncement( chat.Announcement.Text );
			
			if( game.chatInInputBuffer != null ) {
				OpenTextInputBar( game.chatInInputBuffer );
				game.chatInInputBuffer = null;
			}
			game.Events.ChatReceived += ChatReceived;
			game.Events.ChatFontChanged += ChatFontChanged;
		}

		void ChatReceived( object sender, ChatEventArgs e ) {
			CpeMessage type = e.Type;
			if( type == CpeMessage.Normal ) {
				chatIndex++;
				List<ChatLine> chat = game.Chat.Log;
				normalChat.PushUpAndReplaceLast( chat[chatIndex + chatLines - 1].Text );
				
				int[] metadata = (int[])Metadata;
				for( int i = 0; i < chatLines - 1; i++ )
					metadata[i] = metadata[i + 1];
				metadata[chatLines - 1] = chatIndex + chatLines - 1;
			} else if( type >= CpeMessage.Status1 && type <= CpeMessage.Status3 ) {
				status.SetText( (int)( type - CpeMessage.Status1 ), e.Text );
			} else if( type >= CpeMessage.BottomRight1 && type <= CpeMessage.BottomRight3 ) {
				bottomRight.SetText( 2 - (int)( type - CpeMessage.BottomRight1 ), e.Text );
			} else if( type == CpeMessage.Announcement ) {
				UpdateAnnouncement( e.Text );
			}
		}

		public override void Dispose() {
			if( HandlesAllInput ) {
				game.chatInInputBuffer = textInput.chatInputText.ToString();
				if( game.CursorVisible )
					game.CursorVisible = false;
			} else {
				game.chatInInputBuffer = null;
			}
			chatFont.Dispose();
			chatInputFont.Dispose();
			chatUnderlineFont.Dispose();
			announcementFont.Dispose();
			
			normalChat.Dispose();
			textInput.DisposeFully();
			status.Dispose();
			bottomRight.Dispose();
			graphicsApi.DeleteTexture( ref announcementTex );
			game.Events.ChatReceived -= ChatReceived;
			game.Events.ChatFontChanged -= ChatFontChanged;
		}
		
		void ChatFontChanged( object sender, EventArgs e ) {
			if( !game.Drawer2D.UseBitmappedChat ) return;
			Dispose();
			Init();
		}
		
		public override void OnResize( int oldWidth, int oldHeight, int width, int height ) {
			announcementTex.X1 += (width - oldWidth) / 2;
			announcementTex.Y1 += (height - oldHeight) / 2;
			blockSize = (int)(23 * 2 * game.GuiScale);
			textInput.YOffset = blockSize + 5;
			bottomRight.YOffset = blockSize * 3 / 2;
			
			int inputY = game.Height - textInput.Height - textInput.YOffset;
			textInput.MoveTo( textInput.X, inputY );
			status.OnResize( oldWidth, oldHeight, width, height );
			bottomRight.OnResize( oldWidth, oldHeight, width, height );
			UpdateChatYOffset( true );
		}
		
		void UpdateAnnouncement( string text ) {
			DrawTextArgs args = new DrawTextArgs( text, announcementFont, true );
			announcementTex = game.Drawer2D.MakeTextTexture( ref args, 0, 0 );
			announcementTex.X1 = game.Width / 2 - announcementTex.Width / 2;
			announcementTex.Y1 = game.Height / 4 - announcementTex.Height / 2;
		}
		
		void ResetChat() {
			normalChat.Dispose();
			List<ChatLine> chat = game.Chat.Log;
			int[] metadata = (int[])Metadata;
			for( int i = 0; i < chatLines; i++ )
				metadata[i] = -1;
			
			for( int i = chatIndex; i < chatIndex + chatLines; i++ ) {
				if( i >= 0 && i < chat.Count ) {
					normalChat.PushUpAndReplaceLast( chat[i].Text );
					metadata[i - chatIndex] = i;
				}
			}
		}
		
		public override bool HandlesKeyPress( char key ) {
			if( !HandlesAllInput ) return false;
			if( suppressNextPress ) {
				suppressNextPress = false;
				return false;
			}
			return textInput.HandlesKeyPress( key );
		}
		
		public void OpenTextInputBar( string initialText ) {
			if( !game.CursorVisible )
				game.CursorVisible = true;
			suppressNextPress = true;
			HandlesAllInput = true;
			game.Keyboard.KeyRepeat = true;
			
			textInput.chatInputText.Clear();
			textInput.chatInputText.Append( 0, initialText );
			textInput.Init();
		}
		
		public void AppendTextToInput( string text ) {
			if( !HandlesAllInput ) return;
			textInput.AppendText( text );
		}
		
		public override bool HandlesKeyDown( Key key ) {
			suppressNextPress = false;

			if( HandlesAllInput ) { // text input bar
				if( key == game.Mapping( KeyBinding.SendChat )
				   || key == game.Mapping( KeyBinding.PauseOrExit ) ) {
					HandlesAllInput = false;
					if( game.CursorVisible )
						game.CursorVisible = false;
					game.Camera.RegrabMouse();
					game.Keyboard.KeyRepeat = false;
					
					if( key == game.Mapping( KeyBinding.PauseOrExit ) )
						textInput.Clear();
					textInput.SendTextInBufferAndReset();
					
					chatIndex = game.Chat.Log.Count - chatLines;
					ResetIndex();
				} else if( key == Key.PageUp ) {
					chatIndex -= chatLines;
					ResetIndex();
				} else if( key == Key.PageDown ) {
					chatIndex += chatLines;
					ResetIndex();
				} else if( key == game.Mapping( KeyBinding.HideGui ) ) {
					game.HideGui = !game.HideGui;
				} else {
					textInput.HandlesKeyDown( key );
				}
				return key < Key.F1 || key > Key.F35;
			}

			if( key == game.Mapping( KeyBinding.OpenChat ) ) {
				OpenTextInputBar( "" );
			} else if( key == Key.Slash ) {
				OpenTextInputBar( "/" );
			} else {
				return false;
			}
			return true;
		}
		
		public override bool HandlesMouseScroll( int delta ) {
			if( !HandlesAllInput ) return false;
			chatIndex -= delta;
			ResetIndex();
			return true;
		}
		
		public override bool HandlesMouseClick( int mouseX, int mouseY, MouseButton button ) {
			if( !HandlesAllInput ) return false;
			if( normalChat.Bounds.Contains( mouseX, mouseY ) ) {
				int height = normalChat.GetUsedHeight();
				int y = normalChat.Y + normalChat.Height - height;
				if( new Rectangle( normalChat.X, y, normalChat.Width, height ).Contains( mouseX, mouseY ) ) {
					string text = normalChat.GetSelected( mouseX, mouseY );
					if( text == null ) return false;
					
					if( Utils.IsUrlPrefix( text ) ) {
						game.ShowWarning( new WarningScreen(
							game, text, "Are you sure you want to go to this url?",
							OpenUrl, AppendUrl, null, text,
							"Be careful - urls from strangers may link to websites that",
							" may have viruses, or things you may not want to open/see."
						) );
					} else if( game.ClickableChat ) {
						for( int i = 0; i < text.Length; i++ ) {
							if( !IsValidInputChar( text[i] ) ) {
								Console.WriteLine( i + "," + text[i] );
								game.Chat.Add( "&eChatline contained characters that can't be sent on this server." );
								return true;
							}
						}
						textInput.AppendText( text );
					}
					return true;
				}
				return false;
			}
			return textInput.HandlesMouseClick( mouseX, mouseY, button );
		}
		
		void OpenUrl( WarningScreen screen ) {
			try {
				Process.Start( (string)screen.Metadata );
			} catch( Exception ex ) {
				ErrorHandler.LogError( "ChatScreen.OpenUrl", ex );
			}
		}
		
		void AppendUrl( WarningScreen screen ) {
			if( !game.ClickableChat ) return;
			textInput.AppendText( (string)screen.Metadata );
		}
		
		void ResetIndex() {
			int maxIndex = game.Chat.Log.Count - chatLines;
			int minIndex = Math.Min( 0, maxIndex );
			Utils.Clamp( ref chatIndex, minIndex, maxIndex );
			ResetChat();
		}
	}
}