/**
 * Created by Tony on 2017/6/21.
 * Modified by CSL, 2017-08-01
 */

let executeObj = {
    ration: null,
    at: function(ID) {
        let me = executeObj,
            rst = 0;
        rst = me.ration.data.calcTemplate.compiledTemplate[ID].unitFee;
        rst = parseFloat(rst);
        return rst;
    },
    base: function(calcBaseName) {
        let me = executeObj, rst = 0,
            base = getRationCalcBase(calcBaseName);

        if (base != null) {
            let price = 0, tmpSum = 0;
            for (let glj of me.ration.data.gljList) {
                if (base.gljTypes.indexOf(glj.type) >= 0) {
                    if (base.calcType == baseCalc){ price = glj["basePrice"];}
                    else if (base.calcType == adjustCalc){price = glj["adjustPrice"];}
                    else if (base.calcType == budgetCalc){price = glj["marketPrice"];}
                    else if (base.calcType == diffCalc){price = glj["marketPrice"] - glj["adjustPrice"];};
                };
                tmpSum = tmpSum + glj["quantity"] * price;
                glj = null;
            };
            rst = tmpSum;
        };
        return rst;
    }
/*    factor: function(factorID) {
        let me = executeObj;
        let rst = 7.77;
        return rst;
    }*/
};

class Calculation {
/*    init(template, feeRates){
        let me = this;
        me.template = template;
        me.feeRates = feeRates;
        me.hasCompiled = false;
    };*/

    compile(template, feeRates, labourCoes){
        let me = this;
        template.hasCompiled = false;
        template.errs = [];

        let private_extract_ID = function(str, idx){
            let rst = '', lBracket = 0, rBracket = 0, firstIdx = idx, lastIdx = 0;
            for (let i = idx; i < str.length; i++) {
                if (str[i] === '(') {
                    lBracket++;
                    if (lBracket == 1) firstIdx = i + 1;
                }
                if (str[i] === ')') {
                    rBracket++;
                    if (lBracket == rBracket) {
                        lastIdx = i - 1;
                        if (lastIdx > firstIdx) {
                            if (str[firstIdx] === "'") firstIdx++;
                            if (str[lastIdx] !== "'") lastIdx++;
                            if (lastIdx > firstIdx) {
                                rst = str.slice(firstIdx, lastIdx);
                            }
                        }
                        break;
                    }
                }
            }
            return rst;
        };
        let private_parse_ref = function(item, itemIdx){
            let idx = item.expression.indexOf('@(', 0);
            while (idx >= 0) {
                let ID = private_extract_ID(item.expression, idx);
                if (ID.length > 0) {
                    let subItem = template.compiledTemplate[ID];
                    if (subItem) {
                        if (subItem.ID !== item.ID) {
                            private_parse_ref(subItem, template.compiledTemplate[ID + "_idx"]);
                        } else {
                            template.errs.push("There exists the self refer ID: " + ID);
                        }
                    } else {
                        template.errs.push("There exists the invalid ID by which could not find the item: " + ID);
                        console.log('invalid ID： ' + ID);
                    }
                }
                idx = item.expression.indexOf('@(', idx + ID.length + 3);
            }
            if (template.compiledSeq.indexOf(itemIdx) < 0) {
                template.compiledSeq.push(itemIdx);
            }
        };
        let private_setup_seq = function(item, itemIdx){
            if (template.compiledSeq.indexOf(itemIdx) < 0) {
                private_parse_ref(item, itemIdx);
            }
        };
        let private_compile_items = function() {
            for (let idx of template.compiledSeq) {
                let item = template.calcItems[idx];
                item.compiledExpr = item.expression.split('@(').join('$CE.at(');
                item.compiledExpr = item.compiledExpr.split('base(').join('$CE.base(');
                //item.compiledExpr = item.compiledExpr.split('rate(').join('$CE.rate(');
                //item.compiledExpr = item.compiledExpr.split('factor(').join('$CE.factor(');
                if (item.labourCoeID){
                    let lc = me.compiledLabourCoes["LabourCoe_" + item.labourCoeID].coe;
                    item.dispExpr = item.dispExpr.replace(/L/gi, lc.toString());
                    item.compiledExpr = item.compiledExpr.replace(/L/gi, lc.toString());
                }
            }
        };
        let private_compile_feeFile = function() {
            if (feeRates) {
                me.compiledFeeRate = {};
                for (let rate of feeRates) {
                    me.compiledFeeRate["feeRate_" + rate.ID] = rate;
                }
            }
        };
        let private_compile_labourCoeFile = function() {
            if (labourCoes) {
                me.compiledLabourCoes = {};
                for (let coe of labourCoes) {
                    me.compiledLabourCoes["LabourCoe_" + coe.ID] = coe;
                }
            }
        };

        if (template && template.calcItems && template.calcItems.length > 0) {
            template.compiledSeq = [];
            template.compiledTemplate = {};
            //1. first round -> prepare
            private_compile_feeFile();
            private_compile_labourCoeFile();
            for (let i = 0; i < template.calcItems.length; i++) {
                let item = template.calcItems[i];
                template.compiledTemplate[item.ID] = item;
                template.compiledTemplate[item.ID + "_idx"] = i;
            }
            //2. second round -> go!
            for (let i = 0; i < template.calcItems.length; i++) {
                private_setup_seq(template.calcItems[i], i);
            }
            if (template.errs.length == 0) {
                private_compile_items();
                template.hasCompiled = true;
            } else {
                console.log('errors: ' + template.errs.toString());
            }
        }
    };

    calculate($RATION){         // 参数$RATION也可以是清单
        let me = this;
        let template = $RATION.data.calcTemplate;

        if ($RATION && template.hasCompiled) {
            let $CE = executeObj;
            $CE.ration = $RATION;

            if (!$RATION.fees) {
                $RATION.fees = [];
                $RATION.feesIndex = {};
            };

            for (let idx of template.compiledSeq) {
                let calcItem = template.calcItems[idx];

                let feeRate = 100;    // 100%
                // 下面三项用于界面显示。
                if (calcItem.feeRateID) {
                    feeRate = me.compiledFeeRate["feeRate_" + calcItem.feeRateID].rate;
                    calcItem.feeRate = feeRate;
                };
                calcItem.unitFee = eval(calcItem.compiledExpr) * feeRate * 0.01;   // 如果eval()对清单树有影响，就换成小麦的Expression对象再试
                calcItem.totalFee = calcItem.unitFee * 3;     // AAAAAA 测试值，因目前定额无数量（保存不上） $RATION.data.Quantity

                // 费用同步到定额
                // 引入小麦的字段检测后，快速切换定额出现计算卡顿现象，过多的循环造成。这里把她的代码拆出来，减少微循环。
                if (!$RATION.feesIndex[calcItem.fieldName]){
                    let fee = {
                        'fieldName': calcItem.fieldName,
                        'unitFee': calcItem.unitFee,
                        'totalFee': calcItem.totalFee,
                        'tenderUnitFee': 0,
                        'tenderTotalFee': 0
                    };
                    $RATION.fees.push(fee);
                    $RATION.feesIndex[calcItem.fieldName] = fee;
                }
                else{
                    $RATION.feesIndex[calcItem.fieldName].unitFee = calcItem.unitFee;
                    $RATION.feesIndex[calcItem.fieldName].totalFee = calcItem.totalFee;
                }
            }
        }
    }
}


//module.exports = new calculation();