Shape-basic mixin

import { artefact } from '../core/library.js';

import { mergeOver, pushUnique, xt, λnull, Ωempty } from '../helper/utilities.js';

import { releaseVector, requestVector } from '../untracked-factory/vector.js';

import { releaseArray, requestArray } from '../helper/array-pool.js';

import { calculatePath, releasePathCalcObject, requestPathCalcObject } from '../helper/shape-path-calculation.js';

import entityMix from './entity.js';

import { _atan2, _isFinite, _parse, _piHalf, _pow, _radian, BEZIER, CLOSE, DESTINATION_OUT, LINEAR, MOUSE, MOVE, PARTICLE, QUADRATIC, SOURCE_OVER, T_BEZIER, T_LINE, T_POLYLINE, T_QUADRATIC, UNKNOWN, ZERO_STR } from '../helper/shared-vars.js';

const HALFTRANS = 'rgb(0 0 0 / 0.5)';

export default function (P = Ωempty) {

    entityMix(P);

    const defaultAttributes = {

        species: ZERO_STR,
        useAsPath: false,

        precision: 10,

        pathDefinition: ZERO_STR,

        showBoundingBox: false,
        boundingBoxColor: HALFTRANS,
        minimumBoundingBoxDimensions: 20,
    };
    P.defs = mergeOver(P.defs, defaultAttributes);

    P.packetExclusions = pushUnique(P.packetExclusions, ['dimensions', 'pathed']);

    P.finalizePacketOut = function (copy, items) {

        const stateCopy = _parse(this.state.saveAsPacket(items))[3];
        copy = mergeOver(copy, stateCopy);

        copy = this.handlePacketAnchor(copy, items);

        return copy;
    };

    const S = P.setters,
        D = P.deltaSetters;

    S.species = function (item) {

        if (xt(item)) {

            this.species = item;
            this.updateDirty();
        }
    };

    S.precision = function (item) {

        if (_isFinite(item)) {

            this.precision = item;
            this.updateDirty();
        }
    };

    S.width = λnull;
    S.height = λnull;
    S.dimensions = λnull;
    D.width = λnull;
    D.height = λnull;
    D.dimensions = λnull;

    S.pathDefinition = function (item) {

        if (item.substring) this.pathDefinition = item;
        this.pathCalculatedOnce = false;
        this.dirtyPathObject = true;
    };

    P.updateDirty = function () {

        this.dirtySpecies = true;
        this.dirtyPathObject = true;
        this.dirtyFilterIdentifier = true;
    };

    P.shapeInit = function (items) {

        this.units = [];
        this.unitLengths = [];
        this.unitPartials = [];

        this.pathed = [];

        this.localBox = [];

        this.localPath = null;
        this.length = 0;

        this.unitProgression = [];
        this.unitPositions = [];

        this.entityInit(items);
    };

    P.positionPointOnPath = function (vals) {

        const v = requestVector(vals);

        v.vectorSubtract(this.currentStampHandlePosition);

        if(this.flipReverse) v.x = -v.x;
        if(this.flipUpend) v.y = -v.y;

        v.rotate(this.roll);

        v.vectorAdd(this.currentStampPosition);

        const res = {
            x: v.x,
            y: v.y
        }

        releaseVector(v);

        return res;
    };

    P.getBezierXY = function (t, sx, sy, cp1x, cp1y, cp2x, cp2y, ex, ey) {

        const T = 1 - t;

        return {
            x: (_pow(T, 3) * sx) + (3 * t * _pow(T, 2) * cp1x) + (3 * t * t * T * cp2x) + (t * t * t * ex),
            y: (_pow(T, 3) * sy) + (3 * t * _pow(T, 2) * cp1y) + (3 * t * t * T * cp2y) + (t * t * t * ey)
        };
    };

    P.getQuadraticXY = function (t, sx, sy, cp1x, cp1y, ex, ey) {

        const T = 1 - t;

        return {
            x: T * T * sx + 2 * T * t * cp1x + t * t * ex,
            y: T * T * sy + 2 * T * t * cp1y + t * t * ey
        };
    };

    P.getLinearXY = function (t, sx, sy, ex, ey) {

        return {
            x: sx + ((ex - sx) * t),
            y: sy + ((ey - sy) * t)
        };
    };

    P.getBezierAngle = function (t, sx, sy, cp1x, cp1y, cp2x, cp2y, ex, ey) {

        const T = 1 - t,
            dx = _pow(T, 2) * (cp1x - sx) + 2 * t * T * (cp2x - cp1x) + t * t * (ex - cp2x),
            dy = _pow(T, 2) * (cp1y - sy) + 2 * t * T * (cp2y - cp1y) + t * t * (ey - cp2y);

        return (-_atan2(dx, dy) + _piHalf) / _radian;
    };

    P.getQuadraticAngle = function (t, sx, sy, cp1x, cp1y, ex, ey) {

        const T = 1 - t,
            dx = 2 * T * (cp1x - sx) + 2 * t * (ex - cp1x),
            dy = 2 * T * (cp1y - sy) + 2 * t * (ey - cp1y);

        return (-_atan2(dx, dy) + _piHalf) / _radian;
    };

    P.getLinearAngle = function (t, sx, sy, ex, ey) {

        const dx = ex - sx,
            dy = ey - sy;

        return (-_atan2(dx, dy) + _piHalf) / _radian;
    };

    P.getConstantPosition = function (pos) {

        if (!_isFinite(pos)) return 0;
        if (pos >= 1) return 0.9999;

        const { unitPositions, unitProgression, length } = this;

        if (!length || !unitPositions || !unitProgression) return 0;

        if (unitPositions && unitPositions.length) {

            const arraysLen = unitPositions.length;

            let index = 0,
                steadyDistance = 0,
                dynamicDistance = 0,
                sectionRatio;

            for (let i = 0; i < arraysLen; i++) {

                sectionRatio = unitProgression[i] / length;

                if (pos > sectionRatio) {

                    steadyDistance = unitPositions[i];
                    dynamicDistance = sectionRatio;
                    index++;
                }
            }

            if (index >= arraysLen) index = arraysLen - 1;

            const remainingDynamicDistance = (index) ? (pos - dynamicDistance) : pos;

            const dynamicSegmentLength = (index)
                ? (unitProgression[index] - unitProgression[index - 1]) / length
                : unitProgression[index] / length;

            const steadySegmentLength = (index)
                ? (unitPositions[index] - unitPositions[index - 1])
                : unitPositions[index];

            if (!dynamicSegmentLength) return steadyDistance;

            const steadyToDynamicRatio = steadySegmentLength / dynamicSegmentLength;

            steadyDistance += (remainingDynamicDistance * steadyToDynamicRatio);

            return steadyDistance;
        }
        else return pos;
    };

    P.buildPathPositionObject = function (unit, myLen) {

        if (unit) {

            const [unitSpecies, ...vars] = unit;

            let myPoint, angle;

            switch (unitSpecies) {

                case LINEAR :
                    myPoint = this.positionPointOnPath(this.getLinearXY(myLen, ...vars));
                    angle = this.getLinearAngle(myLen, ...vars);
                    break;

                case QUADRATIC :
                    myPoint = this.positionPointOnPath(this.getQuadraticXY(myLen, ...vars));
                    angle = this.getQuadraticAngle(myLen, ...vars);
                    break;

                case BEZIER :
                    myPoint = this.positionPointOnPath(this.getBezierXY(myLen, ...vars));
                    angle = this.getBezierAngle(myLen, ...vars);
                    break;
            }

            let flipAngle = 0
            if (this.flipReverse) flipAngle++;
            if (this.flipUpend) flipAngle++;

            if (flipAngle === 1) angle = -angle;

            angle += this.roll;

            myPoint.angle = angle;

            return myPoint;
        }
        return false;
    }

    P.getPathPositionData = function (pos, constantSpeed = false) {

        if (this.useAsPath && xt(pos) && pos.toFixed) {

            const unitPartials = this.unitPartials;

            let previousLen = 0,
                remainder = ((pos % 1) + 1) % 1,
                denom;

            let stoppingLen, myLen, i, iz, unit, species;

            if (pos === 0) remainder = 0;
            else if (pos === 1) remainder = 0.9999;

            if (constantSpeed) remainder = this.getConstantPosition(remainder);

            for (i = 0, iz = unitPartials.length; i < iz; i++) {

                species = this.units[i][0];
                if (species === MOVE || species === CLOSE || species === UNKNOWN) continue;

                stoppingLen = unitPartials[i];

                if (remainder <= stoppingLen) {

                    unit = this.units[i];

                    denom = (stoppingLen - previousLen);
                    myLen = denom ? (remainder - previousLen) / denom : 0;

                    break;
                }

                previousLen = stoppingLen;
            }
            return this.buildPathPositionObject(unit, myLen);
        }
        return false;
    };

    P.prepareStamp = function() {

        if (this.dirtyHost) this.dirtyHost = false;

        if (this.dirtyScale || this.dirtySpecies || this.dirtyDimensions || this.dirtyStart || this.dirtyHandle) {

            this.dirtyPathObject = true;

            if (this.dirtyScale || this.dirtySpecies)  this.pathCalculatedOnce = false;
       }

        if (this.isBeingDragged || this.lockTo.includes(MOUSE) || this.lockTo.includes(PARTICLE)) this.dirtyStampPositions = true;

        if (this.dirtyScale) this.cleanScale();

        if (this.dirtyStart) this.cleanStart();

        if (this.dirtyOffset) this.cleanOffset();
        if (this.dirtyRotation) this.cleanRotation();

        if (this.dirtyStampPositions) this.cleanStampPositions();

        if (this.dirtySpecies) this.cleanSpecies();
        if (this.dirtyPathObject) this.cleanPathObject();

        if (this.dirtyPositionSubscribers) this.updatePositionSubscribers();

        this.prepareStampTabsHelper();
    };

    P.cleanDimensions = function () {

        this.dirtyDimensions = false;

        this.dirtyStart = true;
        this.dirtyHandle = true;
        this.dirtyOffset = true;
    };

    P.cleanPathObject = function () {

        this.dirtyPathObject = false;

        if (!this.noPathUpdates || !this.pathObject) {

            if (this.dirtyDimensions) {

                this.cleanSpecies();
                this.pathCalculatedOnce = false;
            }

            this.calculateLocalPath(this.pathDefinition);

            if (this.dirtyDimensions) this.cleanDimensions();
            if (this.dirtyHandle) this.cleanHandle();
            if (this.dirtyStampHandlePositions) this.cleanStampHandlePositions();

            const handle = this.currentStampHandlePosition;

            this.pathObject = new Path2D(`m${-handle[0]},${-handle[1]}${this.localPath}`);
        }
    };

    P.calculateLocalPath = function (d, isCalledFromAdditionalActions) {

        let res;

        if (!this.pathCalculatedOnce) {

            res = calculatePath(d, this.currentScale, this.currentStart, this.useAsPath, this.precision, requestPathCalcObject());
            this.pathCalculatedOnce = true;
        }

        if (res) {

            this.localPath = res.localPath;
            this.length = res.length;

            const maxX = res.maxX,
                maxY = res.maxY,
                minX = res.minX,
                minY = res.minY;

            const dims = this.dimensions,
                currentDims = this.currentDimensions,
                box = this.localBox;

            dims[0] = maxX - minX;
            dims[1] = maxY - minY;

            if(dims[0] !== currentDims[0] || dims[1] !== currentDims[1]) {

                currentDims[0] = dims[0];
                currentDims[1] = dims[1];
                this.dirtyHandle = true;
            }

            box.length = 0;
            box.push(minX, minY, dims[0], dims[1]);

            if (this.useAsPath) {

                const {units, unitLengths, unitPartials, unitProgression, unitPositions} = res;

                const flatProgression = requestArray(),
                    flatPositions = requestArray();

                let lastLength = 0,
                    currentPartial,
                    lastPartial,
                    progression,
                    positions,
                    i, iz, j, jz, l, p;

                for (i = 0, iz = unitLengths.length; i < iz; i++) {

                    lastLength += unitLengths[i];
                    progression = unitProgression[i];

                    if (progression) {

                        lastPartial = unitPartials[i];

                        currentPartial = (i + 1 < unitPartials.length) ? unitPartials[i + 1] - lastPartial : 1 - lastPartial;

                        positions = unitPositions[i];

                        for (j = 0, jz = progression.length; j < jz; j++) {

                            l = lastLength + progression[j];
                            flatProgression.push(l);

                            p = lastPartial + (positions[j] * currentPartial);
                            flatPositions.push(p);
                        }
                    }
                }
                this.units.length = 0;
                this.units.push(...units);

                this.unitLengths.length = 0;
                this.unitLengths.push(...unitLengths);

                this.unitPartials.length = 0;
                this.unitPartials.push(...unitPartials);

                if (!this.unitProgression) this.unitProgression = [];
                this.unitProgression.length = 0;
                this.unitProgression.push(...flatProgression);

                if (!this.unitPositions) this.unitPositions = [];
                this.unitPositions.length = 0;
                this.unitPositions.push(...flatPositions);

                releaseArray(flatProgression, flatPositions);
            }
            releasePathCalcObject(res);

            if (!isCalledFromAdditionalActions) this.calculateLocalPathAdditionalActions();
        }
    };
    P.calculateLocalPathAdditionalActions = λnull;

    P.updatePathSubscribers = function () {

        let art;

        this.pathed.forEach(name => {

            art = artefact[name];

            if (art) {

                art.currentPathData = false;
                art.dirtyStart = true;
                if (art.addPathHandle) art.dirtyHandle = true;
                if (art.addPathOffset) art.dirtyOffset = true;
                if (art.addPathRotation) art.dirtyRotation = true;

                if (art.type === T_POLYLINE) art.dirtyPins = true;
                else if (art.type === T_LINE || art.type === T_QUADRATIC || art.type === T_BEZIER) art.dirtyPins.push(this.name);
            }
        }, this);
    };

    P.draw = function (engine) {

        engine.stroke(this.pathObject);
        if (this.showBoundingBox) this.drawBoundingBox(engine);
    };

    P.fill = function (engine) {

        engine.fill(this.pathObject, this.winding);
        if (this.showBoundingBox) this.drawBoundingBox(engine);
    };

    P.drawAndFill = function (engine) {

        const p = this.pathObject;

        engine.stroke(p);
        this.currentHost.clearShadow();
        engine.fill(p, this.winding);
        if (this.showBoundingBox) this.drawBoundingBox(engine);
    };

    P.fillAndDraw = function (engine) {

        const p = this.pathObject;

        engine.stroke(p);
        this.currentHost.clearShadow();
        engine.fill(p, this.winding);
        engine.stroke(p);
        if (this.showBoundingBox) this.drawBoundingBox(engine);
    };

    P.drawThenFill = function (engine) {

        const p = this.pathObject;

        engine.stroke(p);
        engine.fill(p, this.winding);
        if (this.showBoundingBox) this.drawBoundingBox(engine);
    };

    P.fillThenDraw = function (engine) {

        const p = this.pathObject;

        engine.fill(p, this.winding);
        engine.stroke(p);
        if (this.showBoundingBox) this.drawBoundingBox(engine);
    };

    P.clear = function (engine) {

        const gco = engine.globalCompositeOperation;

        engine.globalCompositeOperation = DESTINATION_OUT;
        engine.fill(this.pathObject, this.winding);

        engine.globalCompositeOperation = gco;

        if (this.showBoundingBox) this.drawBoundingBox(engine);
    };

    P.drawBoundingBox = function (engine) {

        engine.save();

        engine.strokeStyle = this.boundingBoxColor;
        engine.lineWidth = 1;
        engine.globalCompositeOperation = SOURCE_OVER;
        engine.globalAlpha = 1;
        engine.shadowOffsetX = 0;
        engine.shadowOffsetY = 0;
        engine.shadowBlur = 0;

        engine.strokeRect(...this.getBoundingBox());

        engine.restore();
    };

    P.getBoundingBox = function () {

        const minDims = this.minimumBoundingBoxDimensions;

/* eslint-disable-next-line */
        let [x, y, w, h] = this.localBox;
        const [hX, hY] = this.currentStampHandlePosition;
        const [sX, sY] = this.currentStampPosition;

        if (w < minDims) w = minDims;
        if (h < minDims) h = minDims;

        return [x - hX, y - hY, w, h, sX, sY];
    };
}