const { isClass } = require('./utils');
const { AST } = require('./ast');

const registeredAspects = [];

const originType = Symbol.for('originType');

class Pointcut {
    constructor(pointcut) {
        this.ast = pointcut ? AST.compile(pointcut) : { execute() { return true; } };
    }
    matches(context) {
        return this.ast.execute(context);
    }
}

class MatchesPointcut extends Pointcut {
    constructor(matchFunction) {
        super();
        this.matchFunction = matchFunction;
    }
    matches(context) {
        return this.matchFunction.call(this, context);
    }
}

class Aspects {
    get pointcut() {
        return "*.*"
    }

    get order() {
        return 0;
    }

    after(joinPoint, result, error) {

    }

    afterReturn(joinPoint, result) {
        return result;
    }

    afterThrow(joinPoint, error) {

    }

    before(joinPoint) {

    }

    around(joinPoint) {
        return joinPoint.proceed();
    }
}

class AspectDelegate {
    constructor(aspect) {
        this.delegate = aspect;
        this.pointcut = aspect.pointcut instanceof Pointcut ? aspect.pointcut : typeof aspect.pointcut === 'function' || aspect.pointcut instanceof Function ? new MatchesPointcut(aspect.pointcut) : new Pointcut(aspect.pointcut);
    }

    get order() {
        return this.delegate.order;
    }

    after(joinPoint, result, error) {
        this.delegate.after(joinPoint, result, error);
    }

    afterReturn(joinPoint, result) {
        this.delegate.afterReturn(joinPoint, result);
    }

    afterThrow(joinPoint, error) {
        this.delegate.afterThrow(joinPoint, error);
    }

    before(joinPoint) {
        this.delegate.before(joinPoint);
    }

    around(joinPoint) {
        return this.delegate.around(joinPoint);
    }
}

class JoinPoint {
    constructor(type, fun, thisArg, target, args, next) {
        Object.defineProperties(this, {
            type: {
                configurable: true, enumerable: true, get() {
                    return type
                }
            },
            fun: {
                configurable: true, enumerable: true, get() {
                    return fun
                }
            },
            thisArg: {
                configurable: true, enumerable: true, get() {
                    return thisArg
                }
            },
            target: {
                configurable: true, enumerable: true, get() {
                    return target
                }
            },
            args: {
                configurable: true, enumerable: true, get() {
                    return args
                }
            },
            proceed: {
                configurable: true,
                enumerable: true,
                value: function (args) {
                    args = args || this.args;
                    return next(args);
                }
            },
        })
    }
    toString() {
        return this.type.name + '.' + this.fun.name + '(' + this.args.join(',') + ')';
    }
}

const findAspects = (type, fun) => {
    return registeredAspects.filter(aspect => aspect.pointcut.matches({ type, fun })).sort((a, b) => b.order - a.order);
};

const executeChain = (type, fun, proxy, thisArg, args, aspects, index) => {
    if (index === aspects.length) {
        // fun.apply(thisArg, args);
        Reflect.apply(fun, thisArg, args);
    } else {
        let aspect = aspects[index];
        if (aspect.pointcut.matches({ type, fun, args })) {
            let joinPoint = new JoinPoint(type, fun, thisArg, proxy, args, args => executeChain(type, fun, proxy, thisArg, args, aspects, ++index));
            let error, result;
            try {
                aspect.before(joinPoint);
                result = aspect.around(joinPoint);
                let resultTemp = aspect.afterReturn(joinPoint, result);
                result = typeof resultTemp === 'undefined' ? result : resultTemp;
                return result;
            } catch (e) {
                error = e;
                try {
                    aspect.afterThrow(joinPoint, e);
                } catch (ie) {
                    error = ie;
                    throw ie;
                }
            } finally {
                aspect.after(joinPoint, result, error);
            }
        } else {
            return joinPoint.proceed();
        }
    }
};

const initClass = type => {
    if (type[originType] === type) {
        return type;
    } else if ([Aspects, JoinPoint, Pointcut].includes(type)) {
        return type;
    } else {
        let proxyType = new Proxy(type, {
            construct(target, args, newTarget) {
                if (target.name === newTarget.name) {
                    let proxy = new Proxy(Reflect.construct(target, args, newTarget), {
                        get(target, prop) {
                            let value = target[prop];
                            if (typeof value === 'function') {
                                let aspects = findAspects(type, value);
                                return (...args) => {
                                    if (aspects.length) {
                                        return executeChain(type, value, proxy, target, args, aspects, 0);
                                    } else {
                                        return Reflect.apply(value, target, args);
                                    }
                                }
                            } else {
                                return value;
                            }
                        }
                    });
                    return proxy;
                } else {
                    return Reflect.construct(target, args, newTarget);
                }
            }
        });
        proxyType[originType] = type;
        return proxyType;
    }
};

const initValue = value => {
    if (isClass(value)) {
        value = initClass(value);
    } else {
        if (value instanceof Aspects) {
            registeredAspects.push(new AspectDelegate(value));
        } else if (typeof value === 'object') {
            for (let [prop, sub] of Object.entries(value)) {
                value[prop] = initValue(sub);
            }
        }
    }
    return value;
};

const initRequire = moduleParent => {
    let requireTemp = moduleParent.require;
    moduleParent.require = moduleName => initValue(requireTemp.call(moduleParent, moduleName));
    if (!moduleParent.children) moduleParent.children = [];
    let childrenPush = moduleParent.children.push;
    moduleParent.children.push = (...children) => {
        children.forEach(child => initRequire(child));
        childrenPush.apply(moduleParent.children, [...children]);
    }
};
initRequire(process.mainModule);

module.exports = {Aspect: Aspects, JoinPoint, Pointcut};