/** Copyright Stewart Allen <sa@grid.space> -- All Rights Reserved */

"use strict";

(function() {

    if (self.kiri.Layer) return;

    const KIRI = self.kiri,
        POLY = self.base.polygons,
        LP = Layer.prototype,
        mcache = {};

    KIRI.Layer = Layer;
    KIRI.newLayer = function(view) { return new Layer(view) };

    function materialFor(layer, color, mesh, linewidth) {
        let m = mcache[color];
        if (!m) {
            m = mcache[color] = mesh ? new THREE.MeshPhongMaterial({
                transparent: layer.transparent,
                shininess: layer.shininess,
                specular: layer.specular,
                opacity: layer.opacity,
                color: color,
                side: THREE.DoubleSide
            }) : new THREE.LineBasicMaterial({
                fog: false,
                color: color,
                linewidth: 1
            });
        }
        return m;
    }

    function toVector(p) {
        return new THREE.Vector3(p.x, p.y, p.z);
    }

    function addPoly(arr, poly, deep, open) {
        let points = poly.points,
            len = points.length;

        if (len < 2) return;

        let doOpen = (open === undefined || open === null) ? poly.isOpen() : open,
            end = doOpen ? len - 1 : len,
            last = toVector(points[0]),
            i = 0;

        while (i < end) {
            arr.push(last);
            arr.push(last = toVector(points[(++i) % len]));
        }

        if (deep && poly.inner) {
            poly.inner.forEach(function(p) {
                addPoly(arr, p, false, open);
            })
        }
    }

    function addSolid(arr, poly) {
        let faces = poly.earcut();
        faces.forEach(p => {
            p.forEachPoint(p => {
                arr.push(p.x, p.y, p.z);
            });
        });
    }

    /**
     * @param {THREE.Group} view
     */
    function Layer(view) {
        this.changed = false;
        this.group = null;
        this.solids = null;
        this.view = view;
        this.bycolor = {};
        this.opacity = 0.15,
        this.specular = 0x181818,
        this.shininess = 100,
        this.transparent = true;
    };

    LP.setOpacity = function(v) {
        this.opacity = v;
    };

    LP.setSpecular = function(v) {
        this.specular = v;
    };

    LP.setShininess = function(v) {
        this.shininess = v;
    };

    LP.setTransparent = function(b) {
        this.transparent = b;
    };

    LP.setVisible = function(vis) {
        if (this.group) this.group.visible = vis;
        if (this.solids) this.solids.visible = vis;
    };

    LP.clear = function() {
        this.changed = true;
        this.bycolor = {};
    };

    LP.add = function(color, obj) {
        let ca = this.bycolor[color];
        if (!ca) ca = this.bycolor[color] = [];
        ca.push(obj);
    };

    LP.poly = function(poly, color, deep, open) {
        let layer = this;
        if (Array.isArray(poly)) {
            poly.forEach(function(p) { layer.poly(p, color, deep, open) });
        } else {
            this.add(color, {poly:poly, deep:deep, open:open});
            this.changed = true;
        }
    };

    LP.solid = function(poly, color) {
        this.add(color, {solid: poly});
        this.changed = true;
    };

    LP.noodle = function(poly, offset, color, traceColor, open) {
        if (!poly) return;
        if (Array.isArray(poly)) {
            poly = POLY.flatten(poly, [], true);
        } else {
            poly = POLY.flatten([poly], [], true);
        }
        if (!poly.length) return;
        let z = poly[0].getZ();
        poly.forEach(p => {
            let exp = [];
            POLY.expand([p],  offset, z-0.01, exp, 1);
            POLY.expand([p], -offset, z-0.01, exp, 1);
            POLY.nest(exp).forEach((p,i) => {
                this.add(color, {solid: p});
                p = p.clone(true).setZ(z + 0.01);
                this.add(traceColor, {poly: p, deep: true, open});
            });
        })
        this.changed = true;
    };

    LP.noodle_open = function(poly, offset, color, traceColor, z) {
        poly = POLY.expand_lines(poly, offset, z);
        poly.forEach(p => {
            this.add(color, {solid: p});
            p = p.setZ(z + 0.01);
            this.add(traceColor, {poly: p, deep: false, open: true});
        })
        this.changed = true;
    };

    LP.noodle_lines = function(points, offset, color, traceColor, z) {
        if (!(points && points.length)) return;
        for (let i=0; i<points.length; i += 2) {
            let p1 = points[i];
            let p2 = points[i+1];
            let l1 = p1.offsetLineTo(p2, offset);
            let l2 = p2.offsetLineTo(p1, offset);
            let poly = base.newPolygon().addPoints([
                l1.p1, l1.p2, l2.p1, l2.p2
            ]).setZ(z + 0.01);
            this.add(color, {solid: poly});
            this.add(traceColor, {poly: poly, deep: false, open: true});
        }
        this.changed = true;
    };

    LP.points = function(points, color, size, opacity) {
        let layer = this,
            sz = size/2;
        points.forEach(function(p) {
            layer.lines([
                toVector({x:p.x+sz, y:p.y+sz, z:p.z-sz}),
                toVector({x:p.x+sz, y:p.y+sz, z:p.z+sz}),
                toVector({x:p.x-sz, y:p.y+sz, z:p.z-sz}),
                toVector({x:p.x-sz, y:p.y+sz, z:p.z+sz}),
                toVector({x:p.x+sz, y:p.y-sz, z:p.z-sz}),
                toVector({x:p.x+sz, y:p.y-sz, z:p.z+sz}),
                toVector({x:p.x-sz, y:p.y-sz, z:p.z-sz}),
                toVector({x:p.x-sz, y:p.y-sz, z:p.z+sz}),

                toVector({x:p.x+sz, y:p.y+sz, z:p.z+sz}),
                toVector({x:p.x-sz, y:p.y+sz, z:p.z+sz}),
                toVector({x:p.x+sz, y:p.y+sz, z:p.z-sz}),
                toVector({x:p.x-sz, y:p.y+sz, z:p.z-sz}),
                toVector({x:p.x+sz, y:p.y-sz, z:p.z+sz}),
                toVector({x:p.x-sz, y:p.y-sz, z:p.z+sz}),
                toVector({x:p.x+sz, y:p.y-sz, z:p.z-sz}),
                toVector({x:p.x-sz, y:p.y-sz, z:p.z-sz}),

                toVector({x:p.x+sz, y:p.y+sz, z:p.z+sz}),
                toVector({x:p.x+sz, y:p.y-sz, z:p.z+sz}),
                toVector({x:p.x+sz, y:p.y+sz, z:p.z-sz}),
                toVector({x:p.x+sz, y:p.y-sz, z:p.z-sz}),
                toVector({x:p.x-sz, y:p.y+sz, z:p.z+sz}),
                toVector({x:p.x-sz, y:p.y-sz, z:p.z+sz}),
                toVector({x:p.x-sz, y:p.y+sz, z:p.z-sz}),
                toVector({x:p.x-sz, y:p.y-sz, z:p.z-sz}),
            ], color);
        });
    };

    LP.lines = function(points, color) {
        this.add(color, {lines:points});
        this.changed = true;
    };

    LP.renderAll = function() {
        this.renderSolid();
        this.render();
    };

    LP.renderSolid = function() {
        if (!(this.view)) return;
        if (this.solids) this.view.remove(this.solids);
        this.solids = this.view.newGroup();

        let bycolor = this.bycolor;

        for (let key in bycolor) {
            if (!bycolor.hasOwnProperty(key)) continue;

            let arr = [], mat = materialFor(this, parseInt(key), true);

            bycolor[key].forEach(function(obj) {
                if (obj.solid) {
                    addSolid(arr, obj.solid);
                }
            });

            if (arr.length > 0) {
                let geo = new THREE.BufferGeometry();

                geo.setAttribute('position', new THREE.BufferAttribute(arr.toFloat32(), 3));
                geo.computeFaceNormals();
                geo.computeVertexNormals();

                let mesh = new THREE.Mesh(geo, mat);
                mesh.castShadow = true;
                mesh.receiveShadow = true;

                this.solids.add(mesh);
            }
        }
    };

    LP.render = function() {
        if (!(this.view && this.changed)) return;
        if (this.group) this.view.remove(this.group);
        this.group = this.view.newGroup();

        let bycolor = this.bycolor,
            key, added;

        for (key in bycolor) {
            if (!bycolor.hasOwnProperty(key)) continue;

            let geo = new THREE.Geometry(),
                arr = geo.vertices,
                mat = materialFor(this, parseInt(key));

            added = bycolor[key];

            added.forEach(function(obj) {
                if (obj.poly) {
                    addPoly(arr, obj.poly, obj.deep, obj.open);
                } else if (obj.lines) {
                    obj.lines.forEach(function(p) {
                        arr.push(toVector(p));
                    });
                }
            });

            if (arr.length > 0) this.group.add(new THREE.LineSegments(geo, mat));
        }

        this.changed = false;
    }

})();