'use strict';
const { CrudService } = require('naf-framework-mongoose-free/lib/service');
const { BusinessError, ErrorCode } = require('naf-core').Error;
const _ = require('lodash');
const assert = require('assert');

//
class OrderService extends CrudService {
  constructor(ctx) {
    super(ctx, 'order');
    this.orderModel = this.ctx.model.Trade.Order;
    this.platformActModel = this.ctx.model.System.PlatformAct;
    this.gjaModel = this.ctx.model.Shop.GoodsJoinAct;
  }

  // #region 下单前计算函数
  /**
   * 计算每个店铺的价格
   * list是经过 getPageData 处理过的数据
   * @param {Array} list 按店铺分组的商品列表
   */
  makeOrder_computedShopTotal(list) {
    for (const i of list) {
      let goods_total = 0,
        freight_total = 0,
        discount = 0;
      for (const g of i.goods) {
        // 如果有特价,那就使用特价,没有特价就是用正常销售价
        goods_total = this.ctx.plus(goods_total, _.get(g, 'price'));
        freight_total = this.ctx.plus(freight_total, _.get(g, 'freight'));
        if (_.isArray(g.act)) {
          const actDiscount = g.act.reduce((p, n) => this.ctx.plus(p, n.discount), 0);
          discount = this.ctx.plus(discount, actDiscount);
        }
      }
      i.goods_total = goods_total;
      i.freight_total = freight_total;
      i.discount = discount;
    }
    return list;
  }
  /**
   * 计算整个订单的价格
   * @param {Array} list 按店铺分组的商品列表
   * list是经过 getPageData 处理过的数据
   */
  makerOrder_computedOrderTotal(list) {
    const arr = [];
    arr.push({ key: 'goods_total', zh: '商品总价', money: list.reduce((p, n) => this.ctx.plus(p, n.goods_total), 0) });
    arr.push({ key: 'freight_total', zh: '运费总价', money: list.reduce((p, n) => this.ctx.plus(p, n.freight_total), 0) });
    return arr;
  }

  // #endregion

  /**
   * 计算需要支付的金额
   * @param {Object} order 支付订单信息
   * @return {Number} 订单实付金额
   */
  payOrder_RealPay(order) {
    let priceKey;
    if (_.get(order, 'type', '0') === '1') priceKey = 'ggrp';
    else priceKey = 'grp';
    const detail = this.moneyDetail(order);
    // 解除店铺层
    const sd = Object.values(detail);
    // 取出规格层
    const sgd = sd.map(i => Object.values(i));
    // 将规格明细降维至一维
    const oneLevel = _.flattenDeep(sgd);
    // 根据订单类型,计算应付(优惠券部分已经按订单类型计算并分配完了.这地方只是复现)
    const realPay = oneLevel.reduce((p, n) => this.ctx.plus(p, n[priceKey]), 0);
    return realPay;
  }
  /**
   * 计算需要支付的金额
   * @param {Object} order 支付订单信息
   * @return {Object} 返回:{
   *  店铺id:金额
   * }
   */
  shopMoneyTotal(order) {
    let priceKey;
    if (_.get(order, 'type', '0') === '1') priceKey = 'ggrp';
    else priceKey = 'grp';
    const detail = this.moneyDetail(order);
    const result = {};
    for (const s in detail) {
      const values = Object.values(_.get(detail, s, {}));
      const realPay = values.reduce((p, n) => this.ctx.plus(p, n[priceKey]), 0);
      result[s] = realPay;
    }
    return result;
  }
  /**
   * 计算店铺的金额明细
   * @param {Object} order 支付订单信息
   * @return {Object} 返回:{
   *  店铺id:{
   *    goods_total:商品总价,
   *    freight_total:商品总价
   *  }
   * }
   */
  shopMoneyDetail(order) {
    if (!order) throw new BusinessError(ErrorCode.DATA_NOT_EXIST, '未找到订单信息');
    let priceKey;
    if (_.get(order, 'type', '0') === '1') priceKey = 'gst';
    else priceKey = 'st';
    const result = {};
    const moneyDetail = this.moneyDetail(order);
    for (const s in moneyDetail) {
      const obj = {};
      const d = _.get(moneyDetail, s, {});
      obj.goods_total = Object.values(d).reduce((p, n) => this.ctx.plus(p, _.get(n, priceKey, 0)), 0);
      obj.freight_total = Object.values(d).reduce((p, n) => this.ctx.plus(p, _.get(n, 'ft', 0)), 0);
      result[s] = obj;
    }

    return result;
  }
  /**
   * 按店铺-商品 计算该订单的价格明细
   * @param {Object} data 支付订单数据
   * @return {Object} 返回:{
   *  店铺id:{
   *    规格id:{
   *      sm: 规格正常销售价格(sell_money),
   *      f: 规格运费(freight),
   *      bn: 购买数量(buy_num),
   *      st: 规格正常销售总价(sell_total: sm * bn)
   *      ft: 规格运费总价(freight_total: f * bn)
   *      gt: 商品支付原价(goods_total: st + ft)
   *      dd: {
   *        key:优惠券id,
   *        value:优惠价格
   *      },
   *      dt: 优惠总价(d_detail的value之和)
   *      grp:商品实际支付价格(goods_real_pay: gt - dt)
   *      gsm:规格团购销售价格(group_sell_money)
   *      gst: 规格团购销售总价(group_sell_total: gsm * bn)
   *      ggt: 商品团购支付原价(goods_group_total: gst + ft)
   *      ggrp: 商品团购实际支付价格(goods_group_real_pay: ggt - dt)
   *    }
   *  }
   * }
   */
  moneyDetail(data) {
    if (!data) throw new BusinessError(ErrorCode.DATA_NOT_EXIST, '未找到订单信息');
    // 优惠部分
    const ddt = _.get(data, 'total_detail.discount_detail', {});
    // 店铺规格商品数据
    const shopGoods = _.get(data, 'goods', []);
    const result = {};
    for (const s of shopGoods) {
      const { goods, shop } = s;
      const shopResult = {};
      for (const g of goods) {
        const { sell_money: sm, freight: f, buy_num: bn, group_config, _id } = g;
        const st = this.ctx.multiply(sm, bn);
        const ft = this.ctx.multiply(f, bn);
        const gt = this.ctx.plus(st, ft);
        const dd = {};
        for (const uc_id in ddt) {
          const detail = _.get(ddt, uc_id, {});
          const value = detail[_id];
          if (value) dd[uc_id] = value;
        }
        const dt = Object.values(dd).reduce((p, n) => this.ctx.plus(p, n), 0);
        const grp = this.ctx.minus(gt, dt);
        let obj = { sm, f, bn, st, ft, gt, dd, dt, grp };
        const gsm = _.get(group_config, 'money');
        if (gsm) {
          const gst = this.ctx.multiply(gsm, bn);
          const ggt = this.ctx.plus(gst, ft);
          const ggrp = this.ctx.minus(ggt, dt);
          obj = { ...obj, gsm, gst, ggt, ggrp };
        }
        shopResult[_id] = obj;
      }
      result[shop] = shopResult;
    }
    return result;
  }
  /**
   * 检查商品是否满足加价购
   * @param {Array} goodsList 平铺的商品列表
   * @param {Array} actList 活动
   */
  async dealAct_plus(goodsList, actList) {
    for (const act of actList) {
      const { platform_act, plus_money } = act;
      const goodsInAct = await this.getGoodsInAct(goodsList, platform_act);
      // 没有有关活动的商品,直接下个活动
      if (goodsInAct.length <= 0) continue;
      const total = goodsInAct.reduce((p, n) => {
        const rp = this.getGoodsPayAfterAct(n);
        return this.ctx.plus(p, rp);
      }, 0);
      // 商品,优惠过后的金额,大于等于 活动下限:活动可以进行
      if (this.ctx.minus(total, plus_money) >= 0) act.activity = true;
    }
  }

  /**
   * 设置商品特价部分
   * @param {Array} goodsList 平铺的商品列表
   * @param {Array} actList 活动
   */
  dealAct_sp(goodsList, actList) {
    for (const act of actList) {
      const { spec, sp_price, platform_act_type, platform_act } = act;
      if (!spec) continue;
      const goods = goodsList.find(f => f.goodsSpec_id === spec);
      if (goods) {
        // 默认特价为商品金额
        goods.sp_price = sp_price;
        goods.price = sp_price;
        const { act = [] } = goods;
        act.push({ platform_act_type, platform_act, sp_price });
        goods.act = act;
      }
    }
  }
  /**
   * 商品满减/折处理:主要区分在于 将折扣转换为金额,剩下都是按比例分配
   * @param {Array} goodsList 平铺的商品列表
   * @param {Array} actList 活动
   */
  async dealAct_discount(goodsList, actList) {
    for (const act of actList) {
      const { discount = [], platform_act, platform_act_type } = act;
      // 整理出区间
      const range = this.getDiscountRange(discount);
      // 找到在当前活动的商品
      const goodsInAct = await this.getGoodsInAct(goodsList, platform_act);
      if (goodsInAct.length <= 0) continue;
      // 计算总价格够不够线(因为活动有优先级问题,如果发生满减够, 而满减之后的价格就不足以满折, 那就不给满折,所以要重新计算)
      const total = goodsInAct.reduce((p, n) => {
        const rp = this.getGoodsPayAfterAct(n);
        return this.ctx.plus(p, rp);
      }, 0);
      for (const r of range) {
        const { ls, le, number, max } = r;
        let res = false;
        if (ls && le) res = _.inRange(total, ls, le);
        else if (ls && !le) res = this.ctx.minus(total, ls) >= 0;
        if (res) {
          // 在区间中,处理钱的问题.
          // 按比例分配金额; 分配完后,结果统一放回原数据中
          const actResult = [];
          let discountTotal = number;
          if (platform_act_type === '6') {
            // 满折:因为输入的是折扣,所以需要将折扣转换成具体金额,然后与优惠上限对比,决定最后优惠总金额
            const dp = this.ctx.minus(1, this.ctx.divide(number, 10));
            // 计算优惠的金额
            discountTotal = this.ctx.multiply(dp, total);
            // 如果超出上限,则使用上限值作为优惠金额
            if (_.isNumber(max)) {
              if (this.ctx.minus(discountTotal, max) > 0) discountTotal = max;
            }
          }
          for (const gia of goodsInAct) {
            const { goodsSpec_id } = gia;
            // 不是最后一个
            if (!_.isEqual(gia, _.last(goodsInAct))) {
              const rp = this.getGoodsPayAfterAct(gia);
              const percent = this.ctx.divide(rp, total);
              const money = this.ctx.multiply(percent, discountTotal);
              actResult.push({ platform_act, platform_act_type, discount: money, goodsSpec_id });
            } else {
              const allready = actResult.reduce((p, n) => this.ctx.plus(p, n.money), 0);
              const el = this.ctx.minus(discountTotal, allready);
              actResult.push({ platform_act, platform_act_type, discount: el, goodsSpec_id });
            }
          }
          // 修改数据
          for (const i of actResult) {
            const { goodsSpec_id, ...others } = i;
            const r = goodsList.find(f => f.goodsSpec_id === goodsSpec_id);
            if (r) {
              const { act = [] } = r;
              act.push(others);
              r.act = act;
            }
          }
          // 修改活动数据
          const text = `满${platform_act_type === '6' ? '折' : '减'}活动`;
          const actData = await this.platformActModel.findById(platform_act);
          act.title = _.get(actData, 'act_time.title', text);
          act.discount = actResult.reduce((p, n) => this.ctx.plus(p, n.discount), 0);
          break;
        }
      }
    }
  }

  /**
   * 商品买赠处理
   * @param {Array} goodsList 平铺的商品列表
   * @param {Array} actList 活动
   */
  async dealAct_gift(goodsList, actList) {
    for (const act of actList) {
      const { spec, gift, platform_act, platform_act_type } = act;
      const goodsInAct = await this.getGoodsInAct(goodsList, platform_act);
      const actResult = [];
      for (const goods of goodsInAct) {
        const { goodsSpec_id } = goods;
        if (spec === goodsSpec_id) actResult.push({ platform_act, platform_act_type, gift, goodsSpec_id });
      }
      for (const i of actResult) {
        const { goodsSpec_id, ...others } = i;
        const r = goodsList.find(f => f.goodsSpec_id === goodsSpec_id);
        if (r) {
          const { act = [] } = r;
          act.push(others);
          r.act = act;
        }
      }
    }
  }

  /**
   * 查看商品是否在活动中
   * @param {Array} goodsList 平铺商品列表
   * @param {String} platform_act 活动id
   */
  async getGoodsInAct(goodsList, platform_act) {
    const num = await this.platformActModel.count({ _id: platform_act, is_use: '0' });
    if (num <= 0) return [];
    // 查询商品是否参与活动
    const goodsInAct = [];
    for (const goods of goodsList) {
      const { goodsSpec_id } = goods;
      const gnum = await this.gjaModel.count({ 'spec._id': goodsSpec_id, platform_act });
      if (gnum <= 0) continue;
      goodsInAct.push(goods);
    }
    return goodsInAct;
  }
  /**
   * 获取商品经活动后实付的价格
   * @param {Object} goods 平铺的商品数据
   */
  getGoodsPayAfterAct(goods) {
    const { act = [], price } = goods;
    const actDiscount = act.reduce((p, n) => this.ctx.plus(p, n.discount), 0);
    const rp = this.ctx.minus(price, actDiscount);
    return rp;
  }

  /**
   * 获取满减/折区间范围
   * @param {Array} discount 满减/折阶梯设置
   */
  getDiscountRange(discount) {
    const range = [];
    for (let i = 0; i < discount.length; i++) {
      const e1 = _.get(discount, i);
      const e2 = _.get(discount, i + 1);
      if (e1 && e2) {
        const { limit: ls, number, max } = e1;
        const { limit: le } = e2;
        const obj = { ls: this.ctx.toNumber(ls), le: this.ctx.toNumber(le), number: this.ctx.toNumber(number) };
        if (max) obj.max = max;
        range.push(obj);
      } else if (e1 && !e2) {
        const { limit: ls, number, max } = e1;
        const obj = { ls: this.ctx.toNumber(ls), number: this.ctx.toNumber(number) };
        if (max) obj.max = max;
        range.push(obj);
      }
    }
    return range;
  }
}

module.exports = OrderService;