using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.IO;
using System.Runtime.Serialization;
using System.Diagnostics;
using Microsoft.Xna.Framework;
using Microsoft.Xna.Framework.Graphics;
using System.Reflection;

namespace CarFire
{
    /// <summary>
    /// A map object represents the map or virtual world where players and other
    /// game entities exist.  The map consists of a grid where each grid space can
    /// contain static scenery and/or game entities which can move and interact
    /// with other game entities.
    /// </summary>
    public class Map
    {
        // DEBUG: Tilesets not implemented at all.
        public static Texture2D DefaultTile;

        #region Public Exceptions

        /// <summary>
        /// This exception is thrown during the loading of a map if any
        /// part of the map file is inconsistent with the expected format
        /// and order.
        /// </summary>
        public class RuntimeException : System.ApplicationException
        {
            public RuntimeException() { }

            public RuntimeException(string message) :
                base(message) { }

            public RuntimeException(string message, System.Exception inner) :
                base(message, inner) { }

            protected RuntimeException(SerializationInfo info, StreamingContext context) :
                base(info, context) { }
        }

        #endregion


        #region Public Constants

        public const float PixelsToUnitSquares = 8.0f;

        #endregion


        #region Public Types

        /// <summary>
        /// The type of a map helps determine how the map is intended to be used.
        /// </summary>
        public enum Mode
        {
            None,
            Campaign,
            Battle
        }

        /// <summary>
        /// The container class for map metadata.
        /// </summary>
        public class Metadata
        {
            public string Name;
            public Mode Type;
            public string Author;
            public HashSet<int> NumPlayers = new HashSet<int>();
            public string Tileset;
            public int GridWidth;
            public int GridHeight;
        }

        /// <summary>
        /// The container class for information about an entity defined in the map.
        /// </summary>
        public class RawEntity
        {
            public char Id;
            public Point Position;
            public Dictionary<string, string> Attributes = new Dictionary<string, string>();
        }

        #endregion


        #region Public Attributes

        /// <summary>
        /// Get the name of the map.
        /// </summary>
        public string Name { get { return mData.Metadata.Name; } }

        /// <summary>
        /// Get the type of the map.
        /// </summary>
        public Mode Type { get { return mData.Metadata.Type; } }

        /// <summary>
        /// Get the author of the map.
        /// </summary>
        public string Author { get { return mData.Metadata.Author; } }

        /// <summary>
        /// Get a set of integers containing each allowable number of players.
        /// </summary>
        public HashSet<int> NumPlayers { get { return mData.Metadata.NumPlayers; } }

        /// <summary>
        /// Get the width of the map, in grid units.
        /// </summary>
        public int Width { get { return mData.Metadata.GridWidth; } }

        /// <summary>
        /// Get the height of the map, in grid units.
        /// </summary>
        public int Height { get { return mData.Metadata.GridHeight; } }

        // TODO: This should return whatever object we end up using for tilesets.
        public string Tileset { get { return mData.Metadata.Tileset; } }

        /// <summary>
        /// Get a list of the raw entity containers loaded with the map.
        /// </summary>
        public List<RawEntity> RawEntities { get { return mData.Entities; } }


        /// <summary>
        /// Get and set the coordinate of the grid cell that should be in
        /// the center of the screen when the map is drawn.
        /// </summary>
        public Vector2 CenterCell
        {
            get { return mView.CenterCell; }
            set { mView.CenterCell = value; }
        }

        #endregion


        #region Public Methods

        /// <summary>
        /// Construct a map with the provided map data.
        /// </summary>
        /// <param name="metadata">The metadata.</param>
        /// <param name="grid">The grid.</param>
        /// <param name="entities">The entities.</param>
        public Map(Metadata metadata, char[,] grid, List<RawEntity> entities)
        {
            mData = new Modal(metadata, grid, entities);
            mView = new View(mData);
        }


        /// <summary>
        /// Draw a representation of the map to the screen.
        /// </summary>
        /// <param name="spriteBatch">The jeewiz.</param>
        public void Draw(SpriteBatch spriteBatch)
        {
            mView.Draw(spriteBatch);
        }


        /// <summary>
        /// Get a point in screen-space from a coordinate in gridspace.
        /// </summary>
        /// <param name="x">X-coordinate.</param>
        /// <param name="y">Y-coordinate.</param>
        /// <returns>Transformed point.</returns>
        public Point GetPointFromCoordinates(float x, float y)
        {
            return mView.GetPointFromCoordinates(x, y);
        }

        /// <summary>
        /// Get a point in screen-space from a coordinate in gridspace.
        /// </summary>
        /// <param name="point">X,Y-coordinates.</param>
        /// <returns>Transformed point.</returns>
        public Point GetPointFromCoordinates(Vector2 point)
        {
            return mView.GetPointFromCoordinates(point.X, point.Y);
        }

        /// <summary>
        /// Get a rectangle in screen-space centered around a coordinate in gridspace.
        /// </summary>
        /// <param name="x">X-coordinate.</param>
        /// <param name="y">Y-coordinate.</param>
        /// <returns>Transformed rectangle.</returns>
        public Rectangle GetRectangleFromCoordinates(float x, float y)
        {
            return mView.GetRectangleFromCoordinates(x, y);
        }

        /// <summary>
        /// Get a rectangle in screen-space centered around a coordinate in gridspace.
        /// </summary>
        /// <param name="point">X,Y-coordinates.</param>
        /// <returns>Transformed rectangle.</returns>
        public Rectangle GetRectangleFromCoordinates(Vector2 point)
        {
            return mView.GetRectangleFromCoordinates(point.X, point.Y);
        }


        /// <summary>
        /// Determine whether or not a cell can be occupied by a game entity.
        /// </summary>
        /// <param name="x">X-coordinate.</param>
        /// <param name="y">Y-coordinate.</param>
        /// <returns>True if cell can be occupied, false otherwise.</returns>
        public bool IsCellOpen(int x, int y)
        {
            return mData.IsCellOpen(x, y);
        }

        /// <summary>
        /// Determine whether or not a cell can be occupied by a game entity.
        /// </summary>
        /// <param name="point">X,Y-coordinates.</param>
        /// <returns>True if cell can be occupied, false otherwise.</returns>
        public bool IsCellOpen(Point point)
        {
            return mData.IsCellOpen(point.X, point.Y);
        }


        /// <summary>
        /// Get all the entities loaded from the map file.  Exceptions could be
        /// thrown if there are entities without associated classes.
        /// </summary>
        /// <returns>List of entity objects loaded.</returns>
        public List<object> GetAllEntities()
        {
            return mData.GetAllEntities();
        }

        /// <summary>
        /// Get the entities of a certain type loaded from the map file.  Exceptions
        /// could be thrown if there are entities without associated classes.
        /// </summary>
        /// <typeparam name="T">Type of the entity you want a list of.</typeparam>
        /// <returns>List of entity objects loaded.</returns>
        public List<T> GetEntities<T>()
        {
            return mData.GetEntities<T>();
        }

        #endregion


        #region Private Types

        class Modal
        {
            Metadata mMetadata;
            char[,] mGrid;
            List<RawEntity> mEntities;

            public Modal(Metadata metadata, char[,] grid, List<RawEntity> entities)
            {
                Debug.Assert(metadata != null);
                Debug.Assert(grid != null);
                Debug.Assert(entities != null);
                Debug.Assert(metadata.GridWidth * metadata.GridHeight == grid.Length);

                mMetadata = metadata;
                mGrid = grid;
                mEntities = entities;

#if DEBUG
                Console.WriteLine("Loaded map {0} of type {1} written by {2}.",
                    metadata.Name,
                    metadata.Type,
                    metadata.Author);
#endif
            }


            public Metadata Metadata { get { return mMetadata; } }
            public List<RawEntity> Entities { get { return mEntities; } }


            public bool IsCellOpen(int x, int y)
            {
                // TODO: Still need to define characters for types of scenery.
                return mGrid[x, y] == ' ';
            }


            public List<object> GetAllEntities()
            {
                List<object> list = new List<object>();

                foreach (RawEntity raw in mEntities)
                {
                    if (raw.Attributes.ContainsKey("type"))
                    {
                        string typename = raw.Attributes["type"];

                        object[] args = new object[3];
                        args[0] = raw.Id;
                        args[1] = raw.Position;
                        args[2] = raw.Attributes;

                        try
                        {

                            object entity = Activator.CreateInstance(System.Type.GetType("CarFire." + typename), args);
                            if (entity != null) list.Add(entity);
                            else throw new RuntimeException();
                        }
#pragma warning disable 0168
                        catch (System.Exception ex)
#pragma warning restore 0168
                        {
                            throw new RuntimeException("Entity of type " + typename + " not loaded because an entity class can't be found.");
                        }
                    }
                    else
                    {
                        Console.WriteLine("Ignoring entity with identifier " + raw.Id + " since it has no type key.");
                    }
                }

                return list;
            }

            public List<T> GetEntities<T>()
            {
                System.Type type = typeof(T);
                List<T> list = new List<T>();

                string typename = typeof(T).Name;
                foreach (RawEntity raw in mEntities)
                {
                    if (raw.Attributes.ContainsKey("type") && typename == raw.Attributes["type"])
                    {
                        object[] args = new object[3];
                        args[0] = raw.Id;
                        args[1] = raw.Position;
                        args[2] = raw.Attributes;

                        T entity = (T)Activator.CreateInstance(type, args);
                        if (entity != null) list.Add(entity);
                        else throw new RuntimeException("Entity of type " + typename + " not loaded because an entity class can't be found.");
                    }
                }

                return list;
            }
        }

        class View
        {
            Modal mData;

            public Vector2 CenterCell;
            Viewport mViewport;


            public View(Modal data)
            {
                Debug.Assert(data != null);
                mData = data;
            }

            public void Draw(SpriteBatch spriteBatch)
            {
                mViewport = spriteBatch.GraphicsDevice.Viewport;

                // TODO: There is no culling yet, but it runs so fast that it probably won't ever need it.
                for (int y = 0; y < mData.Metadata.GridHeight; y++)
                {
                    for (int x = 0; x < mData.Metadata.GridWidth; x++)
                    {
                        if (mData.IsCellOpen(x, y))
                        {
                            spriteBatch.Draw(Map.DefaultTile, GetRectangleFromCoordinates(x, y), Color.White);
                        }
                        else
                        {
                            spriteBatch.Draw(Map.DefaultTile, GetRectangleFromCoordinates(x, y), Color.DarkBlue);
                        }
                    }
                }
            }

            /// <summary>
            /// Get a matrix to transform a point from grid-space to screen coordinates.  This
            /// method uses the viewport to bound the edges of the map such that the camera
            /// will not show anything outside of the grid.
            /// </summary>
            /// <param name="center">The point to put in the center.</param>
            /// <returns>The transformation matrix.</returns>
            Matrix GetTransformation(Vector2 center)
            {
                float halfRatio = PixelsToUnitSquares * 0.5f;
                Matrix transform = Matrix.CreateTranslation(-center.X, -center.Y, 0.0f);
                transform *= Matrix.CreateScale(PixelsToUnitSquares);
                transform *= Matrix.CreateTranslation(mViewport.Width * 0.5f - halfRatio,
                    mViewport.Height * 0.5f - halfRatio, 0.0f);

                Vector2 topLeft = Vector2.Transform(new Vector2(0.0f, 0.0f), transform);
                topLeft.X = Math.Max(mViewport.X, topLeft.X);
                topLeft.Y = Math.Max(mViewport.Y, topLeft.Y);
                transform *= Matrix.CreateTranslation(-topLeft.X, -topLeft.Y, 0.0f);

                Vector2 bottomRight = Vector2.Transform(new Vector2((float)mData.Metadata.GridWidth,
                    (float)mData.Metadata.GridHeight), transform);
                float right = mViewport.X + mViewport.Width;
                float bottom = mViewport.Y + mViewport.Height;
                bottomRight.X = Math.Min(right, bottomRight.X) - right;
                bottomRight.Y = Math.Min(bottom, bottomRight.Y) - bottom;
                transform *= Matrix.CreateTranslation(-bottomRight.X, -bottomRight.Y, 0.0f);

                return transform;
            }


            public Point GetPointFromCoordinates(float x, float y)
            {
                Matrix transform = GetTransformation(CenterCell);
                Vector2 point = Vector2.Transform(new Vector2(x, y), transform);

                return new Point((int)point.X, (int)point.Y);
            }

            public Rectangle GetRectangleFromCoordinates(float x, float y)
            {
                Matrix transform = GetTransformation(CenterCell);
                Vector2 point = Vector2.Transform(new Vector2(x, y), transform);
                
                return new Rectangle((int)point.X, (int)point.Y, (int)PixelsToUnitSquares, (int)PixelsToUnitSquares);
            }
        }

        #endregion


        #region Private Variables

        Modal mData;
        View mView;

        #endregion
    }
}