<?php

namespace app\data\service;

use think\admin\Exception;
use think\admin\Service;

/**
 * 实时返利服务
 * Class RebateCurrentService
 * @package app\data\service
 */
class RebateCurrentService extends Service
{
    const PRIZE_01 = 'PRIZE01';
    const PRIZE_02 = 'PRIZE02';
    const PRIZE_03 = 'PRIZE03';
    const PRIZE_04 = 'PRIZE04';
    const PRIZE_05 = 'PRIZE05';
    const PRIZE_06 = 'PRIZE06';

    const PRIZES = [
        self::PRIZE_01 => ['code' => self::PRIZE_01, 'name' => '首推奖励', 'func' => '_prize01'],
        self::PRIZE_02 => ['code' => self::PRIZE_02, 'name' => '复购奖励', 'func' => '_prize02'],
        self::PRIZE_03 => ['code' => self::PRIZE_03, 'name' => '直属团队', 'func' => '_prize03'],
        self::PRIZE_04 => ['code' => self::PRIZE_04, 'name' => '间接团队', 'func' => '_prize04'],
        self::PRIZE_05 => ['code' => self::PRIZE_05, 'name' => '差额奖励', 'func' => '_prize05'],
        self::PRIZE_06 => ['code' => self::PRIZE_06, 'name' => '管理奖励', 'func' => '_prize06'],
    ];

    /**
     * 用户数据
     * @var array
     */
    protected $user;

    /**
     * 订单数据
     * @var array
     */
    protected $order;

    /**
     * 推荐用户
     * @var array
     */
    protected $from1;
    protected $from2;

    /**
     * 绑定数据表
     * @var string
     */
    private $table = 'DataUserRebate';

    /**
     * 获取奖励名称
     * @param string $prize
     * @return string
     */
    public function name(string $prize): string
    {
        return self::PRIZES[$prize]['name'] ?? $prize;
    }

    /**
     * 执行订单返利
     * @param string $orderNo
     * @throws Exception
     * @throws \think\db\exception\DataNotFoundException
     * @throws \think\db\exception\DbException
     * @throws \think\db\exception\ModelNotFoundException
     */
    public function execute(string $orderNo)
    {
        // 获取订单数据
        $map = ['order_no' => $orderNo, 'payment_status' => 1];
        $this->order = $this->app->db->name('ShopOrder')->where($map)->find();
        if (empty($this->order)) throw new Exception('订单不存在');
        if ($this->order['amount_total'] <= 0) throw new Exception('订单金额为零');
        // 获取用户数据
        $map = ['id' => $this->order['uid'], 'deleted' => 0];
        $this->user = $this->app->db->name('DataUser')->where($map)->find();
        if (empty($this->user)) throw new Exception('用户不存在');
        // 获取推荐用户
        if ($this->order['puid1'] > 0) {
            $map = ['id' => $this->order['puid1']];
            $this->from1 = $this->app->db->name('DataUser')->where($map)->find();
            if (empty($this->from1)) throw new Exception('直接推荐人不存在');
        }
        if ($this->order['puid2'] > 0) {
            $map = ['id' => $this->order['puid2']];
            $this->from2 = $this->app->db->name('DataUser')->where($map)->find();
            if (empty($this->from2)) throw new Exception('间接推荐人不存在');
        }
        // 批量发放奖励
        foreach (self::PRIZES as $vo) {
            if (method_exists($this, $vo['func'])) {
                $this->{$vo['func']}();
            }
        }
    }

    /**
     * 首推奖励
     * @return boolean
     * @throws \think\db\exception\DataNotFoundException
     * @throws \think\db\exception\DbException
     * @throws \think\db\exception\ModelNotFoundException
     */
    protected function _prize01(): bool
    {
        if (empty($this->from1)) return false;
        $map = ['order_uid' => $this->user['id']];
        if ($this->app->db->name($this->table)->where($map)->count() > 0) return false;
        if (!$this->checkLevelPrize(self::PRIZE_01, $this->from1['vip_code'])) return false;
        // 创建返利奖励记录
        $map = ['type' => self::PRIZE_01, 'order_no' => $this->order['order_no'], 'order_uid' => $this->order['uid']];
        if ($this->app->db->name($this->table)->where($map)->count() < 1) {
            if (sysconf('shop.fristType') == 1) {
                $amount = sysconf('shop.fristValue') ?: '0.00';
                $name = self::instance()->name(self::PRIZE_01) . "，每人 {$amount} 元";
            } else {
                $amount = sysconf('shop.fristValue') * $this->order['amount_total'] / 100;
                $name = self::instance()->name(self::PRIZE_01) . "，订单 " . sysconf('shop.fristValue') . '%';
            }
            $this->app->db->name($this->table)->insert(array_merge($map, [
                'uid' => $this->from1['id'], 'name' => $name, 'amount' => $amount, 'order_amount' => $this->order['amount_total'],
            ]));
            // 更新用户奖利金额
            UserUpgradeService::instance()->syncLevel($this->from1['id']);
        }
        return true;
    }

    /**
     * 复购奖励
     * @return boolean
     * @throws \think\db\exception\DataNotFoundException
     * @throws \think\db\exception\DbException
     * @throws \think\db\exception\ModelNotFoundException
     */
    protected function _prize02(): bool
    {
        if (empty($this->from1)) return false;
        $map = ['order_uid' => $this->user['id']];
        if ($this->app->db->name($this->table)->where($map)->count() < 1) return false;
        if (!$this->checkLevelPrize(self::PRIZE_02, $this->from1['vip_code'])) return false;
        // 创建返利奖励记录
        $map = ['type' => self::PRIZE_02, 'order_no' => $this->order['order_no'], 'order_uid' => $this->order['uid']];
        if ($this->app->db->name($this->table)->where($map)->count() < 1) {
            if (sysconf('shop.repeatType') == 1) {
                $amount = sysconf('shop.repeatValue') ?: '0.00';
                $name = self::instance()->name(self::PRIZE_02) . "，每人 {$amount} 元";
            } else {
                $amount = sysconf('shop.repeatValue') * $this->order['amount_total'] / 100;
                $name = self::instance()->name(self::PRIZE_02) . "，订单 " . sysconf('shop.repeatValue') . '%';
            }
            $this->app->db->name($this->table)->insert(array_merge($map, [
                'uid' => $this->from1['id'], 'name' => $name, 'amount' => $amount, 'order_amount' => $this->order['amount_total'],
            ]));
            // 更新用户奖利金额
            UserUpgradeService::instance()->syncLevel($this->from1['id']);
        }
        return true;
    }

    /**
     * 直属团队
     * @return boolean
     * @throws \think\db\exception\DataNotFoundException
     * @throws \think\db\exception\DbException
     * @throws \think\db\exception\ModelNotFoundException
     */
    private function _prize03(): bool
    {
        if (empty($this->from1)) return false;
        if (!$this->checkLevelPrize(self::PRIZE_03, $this->from1['vip_code'])) return false;
        // 创建返利奖励记录
        $map = ['type' => self::PRIZE_03, 'order_no' => $this->order['order_no'], 'order_uid' => $this->order['uid']];
        if ($this->app->db->name($this->table)->where($map)->count() < 1) {
            $amount = sysconf('shop.repeatValue') * $this->order['amount_total'] / 100;
            $name = self::instance()->name(self::PRIZE_03) . "，订单 " . sysconf('shop.repeatValue') . '%';
            $this->app->db->name($this->table)->insert(array_merge($map, [
                'uid' => $this->from1['id'], 'name' => $name, 'amount' => $amount, 'order_amount' => $this->order['amount_total'],
            ]));
            // 更新用户奖利金额
            UserUpgradeService::instance()->syncLevel($this->from1['id']);
        }
        return true;
    }

    /**
     * 间接团队
     * @return boolean
     * @throws \think\db\exception\DataNotFoundException
     * @throws \think\db\exception\DbException
     * @throws \think\db\exception\ModelNotFoundException
     */
    private function _prize04(): bool
    {
        if (empty($this->from2)) return false;
        if (!$this->checkLevelPrize(self::PRIZE_04, $this->from2['vip_code'])) return false;
        $map = ['type' => self::PRIZE_04, 'order_no' => $this->order['order_no'], 'order_uid' => $this->order['uid']];
        if ($this->app->db->name($this->table)->where($map)->count() < 1) {
            $amount = sysconf('shop.indirectValue') * $this->order['amount_total'] / 100;
            $name = self::instance()->name(self::PRIZE_04) . "，订单 " . sysconf('shop.indirectValue') . '%';
            $this->app->db->name($this->table)->insert(array_merge($map, [
                'uid' => $this->from2['id'], 'name' => $name, 'amount' => $amount, 'order_amount' => $this->order['amount_total'],
            ]));
            // 更新代理奖利金额
            UserUpgradeService::instance()->syncLevel($this->from2['id']);
        }
        return true;
    }

    /**
     * 差额奖励
     * @return false
     * @throws \think\db\exception\DataNotFoundException
     * @throws \think\db\exception\DbException
     * @throws \think\db\exception\ModelNotFoundException
     */
    private function _prize05(): bool
    {
        $puids = array_reverse(explode('-', trim($this->user['path'], '-')));
        if (empty($puids) || $this->order['amount_total'] <= 0) return false;
        // 获取可以参与奖励的代理
        $sql = $this->app->db->name('DataUserUpgrade')->field('number')->whereLike('rebate_rule', '%,' . self::PRIZE_05 . ',%')->buildSql(true);
        $users = $this->app->db->name('DataUser')->where("vip_code in {$sql}")->whereIn('id', $puids)->orderField('id', $puids)->select()->toArray();
        // 查询需要计算奖励的商品
        $map = [['order_no', '=', $this->order['order_no']], ['discount_rate', '<', 100]];
        foreach ($this->app->db->name('StoreOrderItem')->where($map)->cursor() as $item) {
            $itemJson = $this->app->db->name('DataUserDiscount')->where(['status' => 1, 'deleted' => 0])->value('items');
            if (!empty($itemJson) && is_array($rules = json_decode($itemJson, true))) {
                [$tVip, $tRate] = [$item['vip_code'], $item['discount_rate']];
                foreach ($rules as $rule) if ($rule['level'] > $tVip) foreach ($users as $user) if ($user['vip_code'] > $tVip) {
                    if ($tRate > $rule['discount'] && $tRate < 100) {
                        $map = [
                            'type' => self::PRIZE_05, 'uid' => $user['id'],
                            'code' => "{$this->order['order_no']}#{$item['id']}#{$tVip}.{$user['vip_code']}",
                        ];
                        if ($this->app->db->name($this->table)->where($map)->count() < 1) {
                            $dRate = ($tRate - $rule['discount']) / 100;
                            $this->app->db->name($this->table)->insert(array_merge($map, [
                                'name'         => "等级差额奖励{$tVip}#{$user['vip_code']}商品的{$dRate}%",
                                'amount'       => $dRate * $item['total_selling'],
                                'order_no'     => $this->order['order_no'],
                                'order_uid'    => $this->order['uid'],
                                'order_amount' => $this->order['amount_total'],
                            ]));
                        }
                        [$tVip, $tRate] = [$user['vip_code'], $rule['discount']];
                    }
                }
            }
        }
        return true;
    }

    /**
     * 管理奖励发放
     * @return boolean
     */
    private function _prize06(): bool
    {
        return true;
    }

    /**
     * 检查等级是否有奖励
     * @param string $prize
     * @param integer $level
     * @return boolean
     */
    protected function checkLevelPrize(string $prize, int $level): bool
    {
        $map = [['number', '=', $level], ['rebate_rule', 'like', "%,{$prize},%"]];
        return $this->app->db->name('DataUserUpgrade')->where($map)->count() > 0;
    }
}