<?php
// +----------------------------------------------------------------------
// | Laravel框架 [ Laravel ]
// +----------------------------------------------------------------------
// | 版权所有 2017~2021 Laravel研发中心
// +----------------------------------------------------------------------
// | 官方网站: http://www.laravel.cn
// +----------------------------------------------------------------------
// | Author: wesmiler <12345678@qq.com>
// +----------------------------------------------------------------------

namespace App\Services;

use App\Models\GoodsModel;
use App\Models\MemberModel;
use App\Models\OrdersModel;
use App\Models\TradeModel;
use Illuminate\Support\Facades\DB;
use phpDocumentor\Reflection\Types\Self_;

/**
 * 商城订单管理-服务类
 * @author wesmiler
 * @since 2020/11/11
 * Class OrdersService
 * @package App\Services
 */
class OrdersService extends BaseService
{
    protected static $instance = null;
    /**
     * 构造函数
     * @author wesmiler
     * @since 2020/11/11
     * OrdersService constructor.
     */
    public function __construct()
    {
        $this->model = new OrdersModel();
    }

    /**
     * 静态入口
     * @return OrdersService|null
     */
    public static function make(){
        if(!self::$instance){
            self::$instance = new  OrdersService();
        }
        return self::$instance;
    }

    /**
     * 获取列表
     * @return array
     * @since 2020/11/11
     * @author wesmiler
     */
    public function getList()
    {
        $params = request()->all();
        $page = isset($params['pageSize']) ? intval($params['pageSize']) : PAGE;
        $pageSize = isset($params['pageSize']) ? intval($params['pageSize']) : PERPAGE;

        $dataList = $this->model::from('orders as o')
            ->leftJoin('goods as g', 'g.id', '=', 'o.goods_id')
            ->leftJoin('member as m', 'm.id', '=', 'o.user_id')
            ->leftJoin('express as es', 'es.express_code', '=', 'o.express_code')
            ->where(function ($query) use ($params) {
                $query->where('g.mark',1);
                $status = isset($params['status']) ? $params['status'] : 0;
                if ($status > 0) {
                    $query->where('g.status', $status);
                } else {
                    $query->where('g.status', '>', 0);
                }

            })
            ->where(function ($query) use ($params) {
                $keyword = isset($params['keyword']) ? trim($params['keyword']) : '';
                if (!empty($keyword)) {
                    $query->where('o.order_sn', 'like', "%{$keyword}%")
                        ->orWhere('m.nickname', 'like', "%{$keyword}%");
                }
            })
            ->select(['o.*','g.title as goods_name','g.thumb','m.nickname','m.mobile','es.name as express_company'])
            ->orderBy('o.create_time', 'desc')
            ->paginate($pageSize);

        $dataList = $dataList ? $dataList->toArray() : [];
        if ($dataList) {
            foreach ($dataList['data'] as &$item) {
                $item['thumb'] = $item['thumb'] ? get_image_url($item['thumb']) : '';
                $item['create_time'] = $item['create_time'] ? datetime($item['create_time'],'Y-m-d H:i:s') : '';
            }
            unset($item);
        }

        return [
            'code' => 0,
            'success'=> true,
            'msg' => '操作成功',
            'count' => isset($dataList['total']) ? $dataList['total'] : 0,
            'data' => isset($dataList['data']) ? $dataList['data'] : 0,
        ];
    }

    /**
     * 获取列表
     * @return array
     * @since 2020/11/11
     * @author wesmiler
     */
    public function getDataList($params)
    {
        $page = isset($params['pageSize']) ? intval($params['pageSize']) : PAGE;
        $pageSize = isset($params['pageSize']) ? intval($params['pageSize']) : PERPAGE;
        $userId = isset($params['user_id']) ? intval($params['user_id']) : 0;

        $dataList = $this->model::from('orders as o')
            ->leftJoin('goods as g', 'g.id', '=', 'o.goods_id')
            ->leftJoin('member as m', 'm.id', '=', 'o.user_id')
            ->leftJoin('express as es', 'es.express_code', '=', 'o.express_code')
            ->where(['o.user_id'=> $userId,'o.mark'=> 1])
            ->where('o.status','>', 0)
            ->select(['o.*','g.title as goods_name','g.thumb','g.specs','m.nickname','m.mobile','es.name as express_company'])
            ->orderBy('o.create_time', 'desc')
            ->paginate($pageSize);

        $dataList = $dataList ? $dataList->toArray() : [];
        if ($dataList) {
            foreach ($dataList['data'] as &$item) {
                $item['thumb'] = $item['thumb'] ? get_image_url($item['thumb']) : '';
                $item['create_time'] = $item['create_time'] ? datetime($item['create_time'],'Y-m-d H:i:s') : '';
            }
            unset($item);
        }

        return [
            'code' => 0,
            'success'=> true,
            'msg' => '操作成功',
            'count' => isset($dataList['total']) ? $dataList['total'] : 0,
            'data' => isset($dataList['data']) ? $dataList['data'] : 0,
        ];
    }

    /**
     * 统计表数据
     * @param $dateType
     * @return array
     */
    public function tableData($dateType){
        $cacheKey = "caches:statistics:table_shop_{$dateType}";
        $datas = RedisService::get($cacheKey);
        if($datas){
            return $datas;
        }

        $firstTime = strtotime(date('Y-m-d'));
        if($dateType == 0){
            $formatStr = "%Y-%m-%d %H:00";
            $firstTime = strtotime(date('Y-m-d'));
            for($i = 0; $i<24; $i++){
                $i = $i<10? '0'.$i : $i;
                $ks = date('Y-m-d')." {$i}:00";
                $datas[$ks] = [
                    'date'=> $i.'点',
                    'ks'=> $ks,
                    'value'=> 0,
                ];
            }
        }else if($dateType == 1){
            $formatStr = "%Y-%m-%d";
            $firstTime =  strtotime('monday this week');
            $weeks = ['周一','周二','周三','周四','周五','周六','周日'];
            for($i = 0; $i<7; $i++){
                $ks = date('Y-m-d', $firstTime+$i*86400);
                $datas[$ks] = [
                    'date'=> $weeks[$i],
                    'ks'=> $ks,
                    'value'=> 0,
                ];
            }
        }else if($dateType == 2){
            $formatStr = "%Y-%m-%d";
            $firstTime = strtotime(date('Y-m-01'));
            $num = cal_days_in_month(CAL_GREGORIAN, date('m'), date('Y'));
            for($i = 1; $i<=$num; $i++){
                $i = $i<10? '0'.$i : $i;
                $ks = date('Y-m')."-{$i}";
                $datas[$ks] = [
                    'date'=> $i.'号',
                    'ks'=> $ks,
                    'value'=> 0,
                ];
            }
        }else if($dateType == 3){
            $formatStr = "%Y-%m";
            $firstTime = strtotime(date('Y-01-01'));
            for($i = 1; $i<=12; $i++){
                $ks = date('Y')."-".($i<10? '0'.$i : $i);
                $datas[$ks] = [
                    'date'=> $i.'月',
                    'ks'=> $ks,
                    'value'=> 0,
                ];
            }
        }

        $counts = $this->model::from('orders as a')
            ->leftJoin('member as m', 'm.id', '=', 'a.user_id')
            ->where(['a.mark'=> 1,'m.mark'=> 1])
            ->whereIn('a.status',[2,3,4])
            ->where('a.create_time','>=', $firstTime)
            ->where('a.create_time','<=', time())
            ->select([\DB::raw('count('.env('DB_PREFIX').'a.`id`) as value'),\DB::raw('FROM_UNIXTIME('.env('DB_PREFIX')."a.create_time,'{$formatStr}') as ks")])
            ->groupBy(\DB::raw('FROM_UNIXTIME('.env('DB_PREFIX')."a.create_time,'{$formatStr}')"))
            ->get();

        $counts = $counts? $counts->toArray() : [];
        if($counts){
            foreach ($counts as $v){
                if(isset($datas[$v['ks']])){
                    $datas[$v['ks']]['value'] = $v['value'];
                }
            }
        }

        $datas = array_values($datas);
        RedisService::set($cacheKey, $datas, rand(5, 10));

        return $datas;
    }

    /**
     * 获取订单信息
     * @param $orderSn
     * @return array
     */
    public function orderInfo($orderSn){
        $info = $this->model::where(['order_sn'=> $orderSn, 'mark'=> 1])
            ->whereIn('status',[1,2])
            ->select(['id','order_sn as out_trade_no','goods_id','user_id','pay_money','total','status'])
            ->first();
        $info = $info? $info->toArray() : [];
        if($info){
            $info['type'] = 3;
            $info['pay_money'] =  $info['pay_money']?  $info['pay_money'] : $info['total'];
        }
        return $info;
    }

    /**
     * 添加或编辑
     * @return array
     * @since 2020/11/11
     * @author wesmiler
     */
    public function edit()
    {
        $data = request()->all();

        $data['update_time'] = time();
        return parent::edit($data); // TODO: Change the autogenerated stub
    }

    /**
     * 发货
     * @return array
     * @since 2020/11/11
     * @author wesmiler
     */
    public function send()
    {
        $data = request()->all();
        $id = isset($data['id'])? $data['id'] : 0;
        if(!$id){
            return message('缺少订单参数',false);
        }

        // 检验订单状态
        $orderInfo = $this->model->where(['id'=> $id])->first();
        if(!$orderInfo){

            return message('订单不存在',false);
        }

        $status = isset($orderInfo['status'])? $orderInfo['status'] : 0;
        if($status != 2){
            return message('订单状态不可操作',false);
        }

        //
        $expressNo = isset($data['express_no'])? $data['express_no'] : '';
        $expressCode = isset($data['express_code'])? $data['express_code'] : '';
        if(empty($expressNo)){
            return message('发货单号不为空',false);
        }
        if(empty($expressCode)){
            return message('请选择快递公司',false);
        }

        $orderInfo->express_no = $expressNo;
        $orderInfo->express_code = $expressCode;


        $data['update_time'] = time();
        return parent::edit($data); // TODO: Change the autogenerated stub
    }

    /**
     * 确认收货
     * @param $userId
     * @return array
     */
    public function receive($userId){
        $data = request()->all();
        $id = isset($data['id'])? $data['id'] : 0;
        if(!$id){
            return message('缺少订单参数',false);
        }

        // 检验订单状态
        $orderInfo = $this->model->where(['id'=> $id])->first();
        if(!$orderInfo){
            return message('订单不存在或已处理',false);
        }

        $status = isset($orderInfo['status'])? $orderInfo['status'] : 0;
        if($status != 3){
            return message('订单未发货状态不可操作',false);
        }

        // 验证用户是否已授权
        $memberInfo = MemberModel::where(['id' => $userId, 'mark' => 1, 'status' => 1])
            ->select('id', 'openid', 'nickname','coupon','score')
            ->first();
        if (!$memberInfo) {
            return message('账号已被冻结，请联系客服', false);
        }

        $orderInfo->status = 4;
        if($orderInfo->save()){
            return message('确认收货成功', true);
        }else{
            return message('确认收货失败', false);
        }
    }

    /**
     * 积分商品兑换
     */
    public function exchange($userId)
    {
        $params = request()->all();
        // 验证佛像信息
        $id = isset($params['id']) ? $params['id'] : 0;
        $info = GoodsModel::where(['id' => $id, 'status' => 1, 'mark' => 1])
            ->select(['id', 'title','score','price','stock'])
            ->first();
        if (!$info || $id <= 0) {
            return message('商品信息不存在', false);
        }

        $payType = isset($params['payType']) ? $params['payType'] : 0;
        if (!in_array($payType, [1,2,4])) {
            return message('支付方式暂不支持', false);
        }

        // 库存
        $num = isset($params['num'])? $params['num'] : 0;
        if($info->stock < $num){
            return message('商品库存不足，仅剩'.$info->stock.'个', false);
        }

        // 验证用户是否已授权
        $memberInfo = MemberModel::where(['id' => $userId, 'mark' => 1, 'status' => 1])
            ->select('id', 'openid', 'nickname','coupon','score')
            ->first();
        if (!$memberInfo) {
            return message('账号已被冻结，请联系客服', false);
        }

        if($payType==2 && !$memberInfo->openid){
            return message('授权失效，请刷新重试', false);
        }

        // 创建订单

        $price = 0;
        if($payType == 1){
            $field = 'coupon';
            $payTypeName = '花灯券';
            $price = $info->price;
            $total = moneyFormat($num * $info->price);

            // 验证账户
            if($memberInfo->coupon < $total){
                return message( "账号{$payTypeName}不足，请先充值", false);
            }

        }else if($payType == 2){
            $field = 'balance';
            $payTypeName = '微信支付';
            $rate = ConfigService::make()->getConfigByCode('recharge_rate');
            $rate = $rate>0? $rate : 1;
            $price = moneyFormat($info->price/$rate, 2);
            $total = moneyFormat($num * $price);
        }else if($payType == 4){
            $field = 'score';
            $payTypeName = '积分';
            $price = $info->score;
            $total = moneyFormat($num * $info->score);
            // 验证账户
            if($memberInfo->score < $total){
                return message( "账号{$payTypeName}不足，请更换其他支付方式", false);
            }
        }

        // 扣款和处理
        \DB::beginTransaction();

        // 处理
        $data = [
            'type' => 1,
            'user_id' => $userId,
            'pay_type' => $payType,
            'goods_id' => $id,
            'order_sn' => get_order_num('S'),
            'num' => $num,
            'price' => $price,
            'total' => $total,
            'pay_money'=> $total,
            'realname' => isset($params['realname']) ? trim($params['realname']) : '',
            'mobile' => isset($params['mobile']) ? trim($params['mobile']) : '',
            'address' => isset($params['address']) ? intval($params['address']) : '',
            'pay_at' => date('Y-m-d H:i:s'),
            'update_time' => time(),
            'create_time' => time(),
            'status' => 2,
        ];

        if(!$oid = $this->model::insertGetId($data)){
            \DB::rollBack();
            return message( "订单创建失败，请刷新重试", false);
        }

        // 非账户支付
        if($payType == 2){
            // 扣除库存
            if(!GoodsModel::where(['id'=> $id])->decrement('stock', $num)){
                \DB::rollBack();
                return message( "库存处理失败，请刷新重试", false);
            }

            // 提交订单
            \DB::commit();

            $order = [
                'openid' => $memberInfo->openid,
                'orderNo' => $data['order_sn'],
                'amount' => $data['total'],
                'body' => '商城订单支付',
            ];

            $jsapiParams = WechatService::jsapiUnifiedorder($order,'shop');
            $code = isset($jsapiParams['code']) ? $jsapiParams['code'] : '';
            if ($code == 'error' || empty($jsapiParams)) {
                $message = isset($jsapiParams['message']) && $jsapiParams['message'] ? $jsapiParams['message'] : '订单支付处理失败';
                return message($message, false);
            }
            return message('商城订单创建成功', true, ['id' => $oid, 'params' => $jsapiParams]);
        }else{
            // 扣除账户
            if(!MemberModel::where(['id'=> $userId,'mark'=> 1])->decrement($field, $total)){
                \DB::rollBack();
                return message( "订单支付失败，请刷新重试", false);
            }

            // 明细
            $data = [
                'user_id'=> $userId,
                'type'=> 1,
                'coin_type'=> $payType==4? 3 : $payType,
                'pay_type'=> 1,
                'money'=> $total,
                'change_type'=> 2,
                'balance'=> $payType==1? $memberInfo->coupon : $memberInfo->score,
                'create_time'=> time(),
                'update_time'=> time(),
                'remark'=> '商品兑换订单支付',
                'status'=> 1
            ];

            if(!TradeModel::insertGetId($data)){
                \DB::rollBack();
                return message( "交易处理失败，请刷新重试", false);
            }

            // 扣除库存
            if(!GoodsModel::where(['id'=> $id])->decrement('stock', $num)){
                \DB::rollBack();
                return message( "库存处理失败，请刷新重试", false);
            }

            \DB::commit();
            return message('兑换订单支付成功', true);
        }
    }

    /**
     * 自动取消订单
     */
    public function orderCancel(){
        // 屏蔽
        $this->model::where(['mark'=>1,'status'=> 5])
            ->where('update_time','<=',time() - 24*3600)
            ->update(['mark'=>0,'update_time'=> time()]);

        // 删除
        $this->model::where(['mark'=>0,'status'=> 5])
            ->where('update_time','<=',time() - 24*3600)
            ->delete();

        // 自动取消
        $this->model::where(['mark'=>1,'status'=> 1])
            ->where('update_time','<=',time() - 3600)
            ->update(['status'=>5,'update_time'=> time()]);

        return message(MESSAGE_OK,true);
    }

}