using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Drawing;
using System.Drawing.Drawing2D;
using System.Text;
using System.Windows.Forms;
using System.Runtime.InteropServices;
using System.Diagnostics;
using System.Drawing.Text;
using System.Windows.Threading;
using System.Xml.Linq;
using System.Linq;

namespace PreviewToy
{
    public partial class PreviewToyHandler : Form
    {
        private Dictionary<IntPtr, Preview> previews;
        private DispatcherTimer dispatcherTimer;

        private IntPtr active_client_handle = (IntPtr)0;
        private String active_client_title = "";

        private Dictionary<String, Dictionary<String, Point>> unique_layouts;
        private Dictionary<String, Point> flat_layout;

        private bool is_initialized;

        private Stopwatch ignoring_size_sync;
        
        public PreviewToyHandler()
        {
            is_initialized = false;

            previews = new Dictionary<IntPtr, Preview>();

            unique_layouts = new Dictionary<String, Dictionary<String, Point>>();
            flat_layout = new Dictionary<String, Point>();

            ignoring_size_sync = new Stopwatch();
            ignoring_size_sync.Start();

            InitializeComponent();
            init_options();

            //  DispatcherTimer setup
            dispatcherTimer = new DispatcherTimer();
            dispatcherTimer.Tick += new EventHandler(dispatcherTimer_Tick);
            dispatcherTimer.Interval = new TimeSpan(0, 0, 1);
            dispatcherTimer.Start();

            is_initialized = true;
        }


        private void GlassForm_Load(object sender, EventArgs e)
        {
            refresh_thumbnails();
        }


        private void init_options()
        {
            option_always_on_top.Checked = Properties.Settings.Default.always_on_top;
            option_hide_active.Checked = Properties.Settings.Default.hide_active;
            option_hide_all_if_not_right_type.Checked = Properties.Settings.Default.hide_all;
            option_unique_layout.Checked = Properties.Settings.Default.unique_layout;
            option_sync_size.Checked = Properties.Settings.Default.sync_resize;
            option_sync_size_x.Text = Properties.Settings.Default.sync_resize_x.ToString();
            option_sync_size_y.Text = Properties.Settings.Default.sync_resize_y.ToString();
            option_show_thumbnail_frames.Checked = Properties.Settings.Default.show_thumb_frames;
            option_zoom_on_hover.Checked = Properties.Settings.Default.zoom_on_hover;
            option_show_overlay.Checked = Properties.Settings.Default.show_overlay;

            load_layout();
        }


        private void spawn_and_kill_previews()
        {
            if (!is_initialized) { return; }

            Process[] processes = Process.GetProcessesByName("ExeFile");
            List<IntPtr> processHandles = new List<IntPtr>();

            // pop new previews

            foreach (Process process in processes)
            {
                processHandles.Add(process.MainWindowHandle);

                Size sync_size = new Size();
                sync_size.Width = (int)Properties.Settings.Default.sync_resize_x;
                sync_size.Height = (int)Properties.Settings.Default.sync_resize_y;

                if (!previews.ContainsKey(process.MainWindowHandle) && process.MainWindowTitle != "")
                {
                    previews[process.MainWindowHandle] = new Preview(process.MainWindowHandle, "...", this, sync_size);
                    previews[process.MainWindowHandle].set_render_area_size(sync_size);
 
                    // apply more thumbnail specific options
                    previews[process.MainWindowHandle].TopMost = Properties.Settings.Default.always_on_top;
                    set_thumbnail_frame_style(previews[process.MainWindowHandle], Properties.Settings.Default.show_thumb_frames);

                }

                else if (previews.ContainsKey(process.MainWindowHandle)) //or update the preview titles
                {
                    previews[process.MainWindowHandle].SetLabel(process.MainWindowTitle);
                }

                if (process.MainWindowHandle == DwmApi.GetForegroundWindow())
                {
                    active_client_handle = process.MainWindowHandle;
                    active_client_title = process.MainWindowTitle;
                }

            }

            // clean up old previews

            List<IntPtr> to_be_pruned = new List<IntPtr>();
            foreach (IntPtr processHandle in previews.Keys)
            {
                if (!(processHandles.Contains(processHandle)))
                {
                    to_be_pruned.Add(processHandle);
                }
            }

            foreach (IntPtr processHandle in to_be_pruned)
            {
                previews[processHandle].Close();
                previews.Remove(processHandle);
            }
        }

        private void load_layout()
        {
            try
            {
                XElement rootElement = XElement.Load("layout.xml");
                foreach (var el in rootElement.Elements())
                {
                    Dictionary<String, Point> inner = new Dictionary<String, Point>();
                    foreach (var inner_el in el.Elements())
                    {
                        inner["-> " + inner_el.Name.ToString().Replace("_", " ") + " <-"] = new Point(Convert.ToInt32(inner_el.Element("x").Value),
                                                                                                      Convert.ToInt32(inner_el.Element("y").Value));
                    }
                    unique_layouts[el.Name.ToString().Replace("_", " ")] = inner;
                }
            }
            catch
            {
                // do nothing
            }

            try
            {
                XElement rootElement = XElement.Load("flat_layout.xml");
                foreach (var el in rootElement.Elements())
                {
                    flat_layout["-> " + el.Name.ToString().Replace("_", " ") + " <-"] = new Point(Convert.ToInt32(el.Element("x").Value),
                                                                                  Convert.ToInt32(el.Element("y").Value));
                }
            }
            catch
            {
                // do nothing
            }

        }

        public void preview_did_switch()
        {
            store_layout(); //todo: check if it actually changed ...
            foreach (KeyValuePair<IntPtr, Preview> entry in previews)
            {
                entry.Value.TopMost = Properties.Settings.Default.always_on_top;
            }
        }

        private void store_layout()
        {
            XElement el = new XElement("layouts");
            foreach (var client in unique_layouts.Keys)
            {
                if (client == "")
                {
                    continue;
                }
                XElement layout = new XElement(client.Replace(" ", "_"));
                foreach (var thumbnail_ in unique_layouts[client])
                {
                    String thumbnail = thumbnail_.Key.Replace("-> ", "").Replace(" <-", "").Replace(" ", "_");
                    if (thumbnail == "" || thumbnail == "...")
                    {
                        continue;
                    }
                    XElement position = new XElement(thumbnail);
                    position.Add(new XElement("x", thumbnail_.Value.X));
                    position.Add(new XElement("y", thumbnail_.Value.Y));
                    layout.Add(position);
                }
                el.Add(layout);
            }

            el.Save("layout.xml");

            XElement el2 = new XElement("flat_layout");
            foreach (var clientKV in flat_layout)
            {
                if (clientKV.Key == "" || clientKV.Key == "..." )
                {
                    continue;
                }
                XElement layout = new XElement(clientKV.Key.Replace("-> ", "").Replace(" <-", "").Replace(" ", "_"));
                layout.Add(new XElement("x", clientKV.Value.X));
                layout.Add(new XElement("y", clientKV.Value.Y));
                el2.Add(layout);
            }

            el2.Save("flat_layout.xml");

        }

        private void handle_unique_layout(Preview preview, String last_known_active_window)
        {
            Dictionary<String, Point> layout;
            if (unique_layouts.TryGetValue(last_known_active_window, out layout))
            {
                Point new_loc;
                if ( Properties.Settings.Default.unique_layout && layout.TryGetValue(preview.Text, out new_loc))
                {
                        preview.Location = new_loc;
                }
                else
                {
                    // create inner dict
                    layout[preview.Text] = preview.Location;
                }
            }
            else if (last_known_active_window != "")
            {
                // create outer dict
                unique_layouts[last_known_active_window] = new Dictionary<String, Point>();
                unique_layouts[last_known_active_window][preview.Text] = preview.Location;
            }
        }

        private void handle_flat_layout(Preview preview)
        {
            Point layout;
            if (flat_layout.TryGetValue(preview.Text, out layout))
            {
                preview.Location = layout;
            }
            else if (preview.Text != "")
            {
                flat_layout[preview.Text] = preview.Location;
            }
        }

        private bool window_is_preview_or_client(IntPtr window)
        {
            bool active_window_is_right_type = false;
            foreach (KeyValuePair<IntPtr, Preview> entry in previews)
            {
                if (entry.Key == window || entry.Value.Handle == window || this.Handle == window || entry.Value.overlay.Handle == window)
                {
                    active_window_is_right_type = true;
                }
            }
            return active_window_is_right_type;
        }


        private void refresh_thumbnails()
        {

            IntPtr active_window = DwmApi.GetForegroundWindow();
            
            // hide, show, resize and move
            foreach (KeyValuePair<IntPtr, Preview> entry in previews)
            {
                if (!window_is_preview_or_client(active_window) && Properties.Settings.Default.hide_all)
                {
                    entry.Value.Hide();
                }
                else if (entry.Key == active_client_handle && Properties.Settings.Default.hide_active)
                {
                    entry.Value.Hide();
                }
                else
                {
                    entry.Value.Show();
                    if (Properties.Settings.Default.unique_layout)
                    {
                        handle_unique_layout(entry.Value, active_client_title);
                    }
                    else
                    {
                        handle_flat_layout(entry.Value);
                    }
                }
                entry.Value.hover_zoom = Properties.Settings.Default.zoom_on_hover;
                entry.Value.show_overlay = Properties.Settings.Default.show_overlay;
            }
        }


        public void syncronize_preview_size(Size sync_size)
        {
            if (!is_initialized) { return; }

            if (Properties.Settings.Default.sync_resize && 
                Properties.Settings.Default.show_thumb_frames && 
                ignoring_size_sync.ElapsedMilliseconds > 500)
            {
                ignoring_size_sync.Stop();

                option_sync_size_x.Text = sync_size.Width.ToString();
                option_sync_size_y.Text = sync_size.Height.ToString();

                foreach (KeyValuePair<IntPtr, Preview> entry in previews)
                {
                    if (entry.Value.Handle != DwmApi.GetForegroundWindow())
                    {
                        entry.Value.set_render_area_size(sync_size);
                    }
                }

            }

        }


        public void register_preview_position(String preview_title, Point position)
        {
            
            if (Properties.Settings.Default.unique_layout)
            {
                Dictionary<String, Point> layout;
                if (unique_layouts.TryGetValue(active_client_title, out layout))
                {
                    layout[preview_title] = position;
                }
                else if (active_client_title == "")
                {
                    unique_layouts[active_client_title] = new Dictionary<String, Point>();
                    unique_layouts[active_client_title][preview_title] = position;
                }
            }
            else
            {
                flat_layout[preview_title] = position;
            }
             
        }


        private void dispatcherTimer_Tick(object sender, EventArgs e)
        {
            spawn_and_kill_previews();
            refresh_thumbnails();
            if (ignoring_size_sync.ElapsedMilliseconds > 500) { ignoring_size_sync.Stop(); };
        }


        private void option_hide_all_if_noneve_CheckedChanged(object sender, EventArgs e)
        {
            Properties.Settings.Default.hide_all = option_hide_all_if_not_right_type.Checked;
            Properties.Settings.Default.Save();
            refresh_thumbnails();
        }


        private void option_unique_layout_CheckedChanged(object sender, EventArgs e)
        {
            Properties.Settings.Default.unique_layout = option_unique_layout.Checked;
            Properties.Settings.Default.Save();
            refresh_thumbnails();
        }


        private void option_hide_active_CheckedChanged(object sender, EventArgs e)
        {
            Properties.Settings.Default.hide_active = option_hide_active.Checked;
            Properties.Settings.Default.Save();
            refresh_thumbnails();
        }


        private void option_sync_size_CheckedChanged(object sender, EventArgs e)
        {
            Properties.Settings.Default.sync_resize = option_sync_size.Checked;
            Properties.Settings.Default.Save();        
            refresh_thumbnails();
        }


        private void parse_size_entry()
        {
            UInt32 x = 0, y = 0;

            try
            {
                y = Convert.ToUInt32(option_sync_size_y.Text);
                x = Convert.ToUInt32(option_sync_size_x.Text);
            }
            catch (System.FormatException) {
                return;
            }

            if (x < 64 || y < 64)
            {
                return;
            }

            Properties.Settings.Default.sync_resize_y = y;
            Properties.Settings.Default.sync_resize_x = x;
            Properties.Settings.Default.Save();

            // resize
            syncronize_preview_size(new Size((int)Properties.Settings.Default.sync_resize_x,
                                             (int)Properties.Settings.Default.sync_resize_y));
        }


        private void option_sync_size_x_TextChanged(object sender, EventArgs e)
        {
            parse_size_entry();
        }


        private void option_sync_size_y_TextChanged(object sender, EventArgs e)
        {
            parse_size_entry();
        }
        

        private void option_always_on_top_CheckedChanged(object sender, EventArgs e)
        {
            Properties.Settings.Default.always_on_top = option_always_on_top.Checked;
            Properties.Settings.Default.Save();
            refresh_thumbnails();
        }


        void set_thumbnail_frame_style(Preview preview, bool show_frames)
        {
            if (show_frames)
            {
                preview.FormBorderStyle = FormBorderStyle.SizableToolWindow;
            }
            else
            {
                preview.FormBorderStyle = FormBorderStyle.None;
            }
        }

        private void option_show_thumbnail_frames_CheckedChanged(object sender, EventArgs e)
        {
            Properties.Settings.Default.show_thumb_frames = option_show_thumbnail_frames.Checked;
            Properties.Settings.Default.Save();

            if (Properties.Settings.Default.show_thumb_frames)
            {
                ignoring_size_sync.Stop();
                ignoring_size_sync.Reset();
                ignoring_size_sync.Start();
            }

            foreach (var thumbnail in previews)
            {
                set_thumbnail_frame_style(thumbnail.Value, Properties.Settings.Default.show_thumb_frames);
            }

        }


        private void list_running_clients_SelectedIndexChanged(object sender, EventArgs e){}


        private void linkLabel1_LinkClicked(object sender, LinkLabelLinkClickedEventArgs e)
        {
            string url = "https://forums.eveonline.com/default.aspx?g=posts&t=246157";
            ProcessStartInfo sInfo = new ProcessStartInfo(new Uri(url).AbsoluteUri);
            Process.Start(sInfo);
        }


        private void previewToyMainBindingSource_CurrentChanged(object sender, EventArgs e)
        {

        }

        private void option_zoom_on_hover_CheckedChanged(object sender, EventArgs e)
        {
            Properties.Settings.Default.zoom_on_hover = option_zoom_on_hover.Checked;
            Properties.Settings.Default.Save();
            refresh_thumbnails();
        }

        private void option_show_overlay_CheckedChanged(object sender, EventArgs e)
        {
            Properties.Settings.Default.show_overlay = option_show_overlay.Checked;
            Properties.Settings.Default.Save();
            refresh_thumbnails();
        }


    }
}