using System;
using System.Collections.Generic;
using UIWidgets.painting;
using UIWidgets.ui.painting.txt;
using UIWidgets.ui.txt;
using UnityEditor;
using UnityEngine;

namespace UIWidgets.ui {
    public class CanvasImpl : Canvas {
        static CanvasImpl() {
            var shader = Shader.Find("UIWidgets/2D Handles Lines");
            if (shader == null) {
                throw new Exception("UIWidgets/2D Handles Lines not found");
            }

            CanvasImpl.linesMat = new Material(shader);
            CanvasImpl.linesMat.hideFlags = HideFlags.HideAndDontSave;

            shader = Shader.Find("UIWidgets/GUIRoundedRect");
            if (shader == null) {
                throw new Exception("UIWidgets/GUIRoundedRect not found");
            }

            CanvasImpl.guiRoundedRectMat = new Material(shader);
            CanvasImpl.guiRoundedRectMat.hideFlags = HideFlags.HideAndDontSave;

            shader = Shader.Find("UIWidgets/GUITextureClip");
            if (shader == null) {
                throw new Exception("UIWidgets/GUITextureClip not found");
            }

            CanvasImpl.guiTextureClipMat = new Material(shader);
            CanvasImpl.guiTextureClipMat.hideFlags = HideFlags.HideAndDontSave;

            shader = Shader.Find("UIWidgets/ShadowRect");
            if (shader == null) {
                throw new Exception("UIWidgets/ShadowRect not found");
            }

            CanvasImpl.shadowRectMat = new Material(shader);
            CanvasImpl.shadowRectMat.hideFlags = HideFlags.HideAndDontSave;
        }

        private static readonly Material linesMat;
        private static readonly Material guiRoundedRectMat;
        private static readonly Material guiTextureClipMat;
        private static readonly Material shadowRectMat;

        private Matrix4x4 _transform;
        private ClipRec _clipRec;
        private LayerRec _layerRec;
        private Stack<CanvasRec> _stack;

        private Stack<CanvasRec> stack {
            get { return this._stack ?? (this._stack = new Stack<CanvasRec>()); }
        }

        public CanvasImpl() {
            this._transform = Matrix4x4.Scale(new Vector3(
                1.0f / EditorGUIUtility.pixelsPerPoint,
                1.0f / EditorGUIUtility.pixelsPerPoint,
                1.0f));
        }

        public void drawPloygon4(Offset[] points, Paint paint) {
            var color = paint.color;
            if (color.alpha > 0) {
                Vector3[] verts = new Vector3 [points.Length];
                for (int i = 0; i < points.Length; i++) {
                    verts[i] = points[i].toVector();
                }

                this.prepareGL(CanvasImpl.linesMat);
                CanvasImpl.linesMat.SetPass(0);

                GL.Begin(GL.TRIANGLES);
                GL.Color(color.toColor());
                for (int index = 0; index < 2; ++index) {
                    GL.Vertex(verts[index * 2]);
                    GL.Vertex(verts[index * 2 + 1]);
                    GL.Vertex(verts[(index * 2 + 2) % 4]);
                    GL.Vertex(verts[index * 2]);
                    GL.Vertex(verts[(index * 2 + 2) % 4]);
                    GL.Vertex(verts[index * 2 + 1]);
                }

                GL.End();
            }
        }
        

        public void drawRect(Rect rect, BorderWidth borderWidth, BorderRadius borderRadius, Paint paint) {
            this.prepareGL(CanvasImpl.guiRoundedRectMat);

            CanvasImpl.guiRoundedRectMat.SetFloatArray("UIWidgets_BorderWidth",
                borderWidth == null ? new[] {0f, 0f, 0f, 0f} : borderWidth.toFloatArray());
            CanvasImpl.guiRoundedRectMat.SetFloatArray("UIWidgets_CornerRadius",
                borderRadius == null ? new[] {0f, 0f, 0f, 0f} : borderRadius.toFloatArray());

            Graphics.DrawTexture(rect.toRect(), EditorGUIUtility.whiteTexture,
                new UnityEngine.Rect(0.0f, 0.0f, 1f, 1f), 0, 0, 0, 0,
                paint.color.toColor(), CanvasImpl.guiRoundedRectMat);
        }
        

        public void drawRectShadow(Rect rect, Paint paint) {
            this.prepareGL(CanvasImpl.shadowRectMat);

            CanvasImpl.shadowRectMat.SetFloat("UIWidgets_sigma", (float) paint.blurSigma);

            Graphics.DrawTexture(rect.toRect(), EditorGUIUtility.whiteTexture,
                new UnityEngine.Rect(0.0f, 0.0f, 1f, 1f), 0, 0, 0, 0,
                paint.color.toColor(), CanvasImpl.shadowRectMat);
        }

        public void drawPicture(Picture picture) {
            this.save();

            int saveCount = 0;

            var drawCmds = picture.drawCmds;
            foreach (var drawCmd in drawCmds) {
                if (drawCmd is DrawPloygon4) {
                    var drawPloygon4 = (DrawPloygon4) drawCmd;
                    this.drawPloygon4(drawPloygon4.points, drawPloygon4.paint);
                }
                else if (drawCmd is DrawRect) {
                    var drawRect = (DrawRect) drawCmd;
                    this.drawRect(drawRect.rect, drawRect.borderWidth, drawRect.borderRadius, drawRect.paint);
                }
                else if (drawCmd is DrawRectShadow) {
                    var drawRectShadow = (DrawRectShadow) drawCmd;
                    this.drawRectShadow(drawRectShadow.rect, drawRectShadow.paint);
                }
                else if (drawCmd is DrawPicture) {
                    var drawPicture = (DrawPicture) drawCmd;
                    this.drawPicture(drawPicture.picture);
                }
                else if (drawCmd is DrawConcat) {
                    this.concat(((DrawConcat) drawCmd).transform);
                }
                else if (drawCmd is DrawSave) {
                    saveCount++;
                    this.save();
                }
                else if (drawCmd is DrawSaveLayer) {
                    saveCount++;
                    var drawSaveLayer = (DrawSaveLayer) drawCmd;
                    this.saveLayer(drawSaveLayer.rect, drawSaveLayer.paint);
                }
                else if (drawCmd is DrawRestore) {
                    saveCount--;
                    if (saveCount < 0) {
                        throw new Exception("unmatched save/restore in picture");
                    }

                    this.restore();
                }
                else if (drawCmd is DrawClipRect) {
                    var drawClipRect = (DrawClipRect) drawCmd;
                    this.clipRect(drawClipRect.rect);
                }
                else if (drawCmd is DrawClipRRect) {
                    var drawClipRRect = (DrawClipRRect) drawCmd;
                    this.clipRRect(drawClipRRect.rrect);
                } else if (drawCmd is DrawTextBlob) {
                    var drawTextBlob = (DrawTextBlob) drawCmd;
                    this.drawTextBlob(drawTextBlob.textBlob, drawTextBlob.x, drawTextBlob.y);
                } else {
                    throw new Exception("unknown drawCmd: " + drawCmd);
                }
            }

            if (saveCount != 0) {
                throw new Exception("unmatched save/restore in picture");
            }

            this.restore();
        }

        public void drawImageRect(Rect src, Rect dst, Paint paint, Image image) {
            if (image != null) {
                Texture2D _texture = new Texture2D(0, 0);
                _texture.LoadImage(image.rawData);
                Graphics.DrawTexture(dst.toRect(), _texture);
            }
        }

        public void concat(Matrix4x4 transform) {
            this._transform = transform * this._transform;
        }

        public void save() {
            var state = new CanvasRec {
                transform = this._transform,
                clipRect = this._clipRec,
                layerRec = this._layerRec,
            };
            this.stack.Push(state);
        }

        public void saveLayer(Rect bounds, Paint paint) {
            this.save();

            var textureWidth = (int) Math.Round(bounds.width * EditorGUIUtility.pixelsPerPoint);
            var textureHeight = (int) Math.Round(bounds.height * EditorGUIUtility.pixelsPerPoint);

            var texture = RenderTexture.GetTemporary(
                textureWidth, textureHeight, 32,
                RenderTextureFormat.ARGB32, RenderTextureReadWrite.sRGB);

            RenderTexture.active = texture;
            GL.PushMatrix();
            GL.LoadPixelMatrix((float) bounds.left, (float) bounds.right, (float) bounds.bottom, (float) bounds.top);
            GL.Clear(true, true, new UnityEngine.Color(0, 0, 0, 0));

            this._layerRec = new LayerRec {
                bounds = bounds,
                paint = paint,
                texture = texture,
            };

            this._transform = Matrix4x4.identity;
            this._clipRec = null;
        }

        public void restore() {
            var layerRec = this._layerRec;

            var state = this._stack.Pop();
            this._transform = state.transform;
            this._clipRec = state.clipRect;
            this._layerRec = state.layerRec;

            if (layerRec != this._layerRec) {
                RenderTexture.active = this._layerRec != null ? this._layerRec.texture : null;
                GL.PopMatrix();

                this.prepareGL(CanvasImpl.guiTextureClipMat);

                Graphics.DrawTexture(layerRec.bounds.toRect(), layerRec.texture,
                    new UnityEngine.Rect(0.0f, 0.0f, 1f, 1f), 0, 0, 0, 0,
                    layerRec.paint.color.toColor(), CanvasImpl.guiTextureClipMat);

                RenderTexture.ReleaseTemporary(layerRec.texture);
                layerRec.texture = null;
            }
        }

        public void clipRect(Rect rect) {
            if (rect.isInfinite) {
                return;
            }

            this.pushClipRect(rect, this._transform);
        }

        public void clipRRect(RRect rect) {
            if (rect.isInfinite) {
                return;
            }

            this.pushClipRRect(rect, this._transform);
        }

        public void drawTextBlob(TextBlob textBlob, double x, double y)
        {
            var mesh = MeshGenrator.generateMesh(textBlob, x, y);
            var font = FontManager.instance.getOrCreate(textBlob.style.safeFontFamily, textBlob.style.UnityFontSize);
            prepareGL(font.material);
            font.material.SetPass(0);
            Graphics.DrawMeshNow(mesh, Matrix4x4.identity);
        }

        private void pushClipRect(Rect clipRect, Matrix4x4 transform) {
            if (this._clipRec != null) {
                throw new Exception("already a clipRec, considering using saveLayer.");
            }

            this._clipRec = new ClipRec(transform, rect: clipRect);
        }

        private void pushClipRRect(RRect clipRRect, Matrix4x4 transform) {
            if (this._clipRec != null) {
                throw new Exception("already a clipRec, considering using saveLayer.");
            }

            this._clipRec = new ClipRec(transform, rrect: clipRRect);
        }

        private void prepareGL(Material mat) {
            if (this._clipRec != null) {
                mat.SetMatrix("UIWidgets_GUIClipMatrix", this._clipRec.transform.inverse);
                if (this._clipRec.rect != null) {
                    var rect = this._clipRec.rect;
                    mat.SetVector("UIWidgets_GUIClipRect", new Vector4(
                        (float) rect.left,
                        (float) rect.top,
                        (float) rect.width,
                        (float) rect.height));
                    mat.SetVector("UIWidgets_GUIClipRectRadius", new Vector4(0, 0, 0, 0));
                }
                else {
                    var rrect = this._clipRec.rrect;
                    var rect = rrect.outerRect;
                    mat.SetVector("UIWidgets_GUIClipRect", new Vector4(
                        (float) rect.left,
                        (float) rect.top,
                        (float) rect.width,
                        (float) rect.height));
                    mat.SetVector("UIWidgets_GUIClipRectRadius",
                        new Vector4(
                            (float) rrect.tlRadius,
                            (float) rrect.trRadius,
                            (float) rrect.brRadius,
                            (float) rrect.blRadius));
                }
            }
            else {
                mat.SetMatrix("UIWidgets_GUIClipMatrix", Matrix4x4.identity);
                var rect = Rect.largest;
                mat.SetVector("UIWidgets_GUIClipRect", new Vector4(
                    (float) rect.left,
                    (float) rect.top,
                    (float) rect.width,
                    (float) rect.height));
                mat.SetVector("UIWidgets_GUIClipRectRadius", new Vector4(0, 0, 0, 0));
            }

            GL.MultMatrix(this._transform);
        }
//
//        private double PixelRound(double v)
//        {
//            return Math.Floor(v * EditorGUIUtility.pixelsPerPoint)  EditorGUIUtility.pixelsPerPoint;
//        }

        private class ClipRec {
            public ClipRec(Matrix4x4 transform, Rect rect = null, RRect rrect = null) {
                this.transform = transform;
                this.rect = rect;
                this.rrect = rrect;
            }

            public readonly Matrix4x4 transform;

            public readonly Rect rect;

            public readonly RRect rrect;
        }

        private class LayerRec {
            public Rect bounds;
            public Paint paint;
            public RenderTexture texture;
        }

        private class CanvasRec {
            public Matrix4x4 transform;
            public ClipRec clipRect;
            public LayerRec layerRec;
        }
    }
}