<?php
namespace App\Common\Library;

use Illuminate\Support\Facades\DB;

class Alltools {


    //四大收益，视频，音频，私聊，礼物
    public function shouyi($user_id,$gold,$table,$table_id){
        //精确小数点
        bcscale(2);

        //枚举
        $table_enum = [
            'user_match_audio_log' => [
                'prefix'=>'audio',
                'remark'  =>'语音',
            ],
            'user_match_typing_log' => [
                'prefix'=>'typing',
                'remark'  =>'私聊',
            ],
            'user_match_video_log' => [
                'prefix'=>'video',
                'remark'  =>'视频',
            ],
            'gift_user_typing' => [
                'prefix'=>'gift',
                'remark'  =>'收礼',
            ],
        ];

        //变量前缀，钱包备注
        $prefix = $table_enum[$table]['prefix'];
        $remark = $table_enum[$table]['remark'];

        //配置
        $config_site = DB::table('mt_config')->whereIn('name',['shouyi_b2a_rate','shouyi_c2a_rate'])->pluck('value','name');

        //收益者本人
        $userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','shouyi_b2a_rate','shouyi_c2a_rate'])->where('id',$user_id)->first();

        //先确认自己的等级
        if($userinfo->group_id == 1){
            //充值者上级
            $intro_userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','shouyi_b2a_rate','shouyi_c2a_rate'])->where('id',$userinfo->intro_uid)->first();
            if(empty($intro_userinfo)){return true;}

            //上级是二级邀请B1，贡献给A
            if($intro_userinfo->group_id == 2){

                //充值者上上级,也就是A
                $intro_intro_userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','shouyi_b2a_rate','shouyi_c2a_rate'])->where('id',$intro_userinfo->agent_id)->first();
                if(empty($intro_intro_userinfo)){return true;}

                if($intro_intro_userinfo->group_id == 3){

                    $shouyi_c2a_rate = !empty($intro_intro_userinfo->shouyi_c2a_rate) ? $intro_intro_userinfo->shouyi_c2a_rate : $config_site['shouyi_c2a_rate'];
                    $jewelA = bcdiv(bcmul($gold,$shouyi_c2a_rate),100);

                    $result = $this->lockChangeAccountRemain($intro_intro_userinfo->id,'agentjewel',$jewelA,52, $userinfo->username.$remark,$table,$table_id);
                    if($result['status']===false)
                    {
                        //Db::rollback();
                        return false;
                    }
                }

                return true;
            }
            //上级是A
            if($intro_userinfo->group_id == 3){

                $shouyi_b2a_rate = !empty($intro_userinfo->shouyi_c2a_rate) ? $intro_userinfo->shouyi_c2a_rate : $config_site['shouyi_c2a_rate'];//b2a 与 b02a相等
                $jewelA = bcdiv(bcmul($gold,$shouyi_b2a_rate),100);

                $result = $this->lockChangeAccountRemain($intro_userinfo->id,'agentjewel',$jewelA,52, $userinfo->username.$remark,$table,$table_id);
                if($result['status']===false)
                {
                    //Db::rollback();
                    return false;
                }

                return true;//结束了
            }
        }
        if($userinfo->group_id == 2){
            //充值者上级
            $intro_userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','shouyi_b2a_rate','shouyi_c2a_rate'])->where('group_id',3)->where('id',$userinfo->agent_id)->first();
            if(empty($intro_userinfo)){return true;}


                $shouyi_b2a_rate = !empty($intro_userinfo->shouyi_b2a_rate) ? $intro_userinfo->shouyi_b2a_rate : $config_site['shouyi_b2a_rate'];
                $jewelA = bcdiv(bcmul($gold,$shouyi_b2a_rate),100);

                $result = $this->lockChangeAccountRemain($intro_userinfo->id,'agentjewel',$jewelA,52, $userinfo->username.$remark,$table,$table_id);
                if($result['status']===false)
                {
                    //Db::rollback();
                    return false;
                }

                return true;//结束了
        }
        //没有推荐人,自己等级最高，可能需要注释
        if($userinfo->group_id == 3 && !empty($userinfo->intro_uid) && $userinfo->intro_uid == $userinfo->id){
            //充值者上级
            /*$intro_userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','shouyi_b2a_rate','shouyi_c2a_rate'])->where('id',$userinfo->intro_uid)->first();
            if(empty($intro_userinfo)){return true;}*/
            $intro_userinfo = $userinfo;

            $shouyi_b2a_rate = !empty($intro_userinfo->shouyi_b2a_rate) ? $intro_userinfo->shouyi_b2a_rate : $config_site['shouyi_b2a_rate'];
            $jewelA = bcdiv(bcmul($gold,$shouyi_b2a_rate),100);

            $result = $this->lockChangeAccountRemain($intro_userinfo->id,'agentjewel',$jewelA,52, $userinfo->username.$remark,$table,$table_id);
            if($result['status']===false)
            {
                //Db::rollback();
                return false;
            }

            return true;//结束了

        }

//////////////////

        return true;
    }

    //充值后奖金
    public function recharge($user_id,$gold,$table,$payorder_id,$remark = '',$times = 0){

        //充值者本人
        $userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','recharge_b2a_rate','recharge_c2a_rate'])->where('id',$user_id)->first();

        //配置
        $config_site = DB::table('mt_config')->whereIn('name',['invite_recharge_rate','recharge_b2a_rate','recharge_c2a_rate'])->pluck('value','name');

        //备注
        $remark = !empty($remark) ? $remark : $userinfo->username.'充值';

        //个人直推邀请充值
        if(!empty($userinfo->invite_uid) && $userinfo->gender == 1 && empty($userinfo->intro_uid)){
            $recharge_invite_rate = $config_site['invite_recharge_rate'];
            $jewel = bcdiv(bcmul($gold,$recharge_invite_rate,1),100,1);

            $result = $this->lockChangeAccountRemain($userinfo->invite_uid,'jewel',$jewel,41, $remark,'pay_order',$payorder_id);
            if($result['status']===false)
            {
                //Db::rollback();
                return false;
            }

            //D2C,C2A
            $invite_info = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','recharge_b2a_rate','recharge_c2a_rate'])->where('id',$userinfo->invite_uid)->first();
            if($userinfo->group_id == 1 && !empty($invite_info->intro_uid) && $times == 0){
                $times = 1;//可以执行的次数

                $recharge_rs = $this->recharge($userinfo->invite_uid,$jewel,'pay_order',$payorder_id,$invite_info->username.'邀请'.$remark,$times);
                return $recharge_rs;
            }
        }

        //没有推荐人,女性充值不返
        if(empty($userinfo->intro_uid) || ($userinfo->gender == 0 && $times == 0)){
            return true;
        }


        //精确小数点
        bcscale(2);

        //自己等级最高，可能需要注释掉
        if($userinfo->group_id == 3 && !empty($userinfo->intro_uid) && $userinfo->intro_uid == $userinfo->id){
            //充值者上级
            /*$intro_userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','recharge_b2a_rate','recharge_c2a_rate'])->where('id',$userinfo->intro_uid)->first();
            if(empty($intro_userinfo)){return true;}*/
            $intro_userinfo = $userinfo;

            $recharge_b2a_rate = !empty($intro_userinfo->recharge_b2a_rate) ? $intro_userinfo->recharge_b2a_rate : $config_site['recharge_b2a_rate'];
            $jewelA = bcdiv(bcmul($gold,$recharge_b2a_rate),100);

            $result = $this->lockChangeAccountRemain($intro_userinfo->id,'agentjewel',$jewelA,51, $remark,'pay_order',$payorder_id);
            if($result['status']===false)
            {
                //Db::rollback();
                return false;
            }

            return true;//结束了

        }

        if($userinfo->group_id == 2){
            //充值者上级
            $intro_userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','recharge_b2a_rate','recharge_c2a_rate'])->where('group_id',3)->where('id',$userinfo->agent_id)->first();
            if(empty($intro_userinfo)){return true;}


                $recharge_b2a_rate = !empty($intro_userinfo->recharge_b2a_rate) ? $intro_userinfo->recharge_b2a_rate : $config_site['recharge_b2a_rate'];
                $jewelA = bcdiv(bcmul($gold,$recharge_b2a_rate),100);

                $result = $this->lockChangeAccountRemain($intro_userinfo->id,'agentjewel',$jewelA,51, $remark,'pay_order',$payorder_id);
                if($result['status']===false)
                {
                    //Db::rollback();
                    return false;
                }

                return true;//结束了
        }

        if($userinfo->group_id == 1){ //二次调用保证走这里
            //充值者上级
            $intro_userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','recharge_b2a_rate','recharge_c2a_rate'])->where('id',$userinfo->intro_uid)->first();
            if(empty($intro_userinfo)){return true;}

            //上级是二级邀请B1，本人C1,贡献给B的上级A
            if($intro_userinfo->group_id == 2){

                //充值者上上级,也就是A
                $intro_intro_userinfo = DB::table('mt_user')->select(['id','username','group_id','intro_uid','invite_uid','agent_id','gender','recharge_b2a_rate','recharge_c2a_rate'])->where('id',$intro_userinfo->agent_id)->first();
                if(empty($intro_intro_userinfo)){return true;}

                if($intro_intro_userinfo->group_id == 3){

                    $recharge_c2a_rate = !empty($intro_intro_userinfo->recharge_c2a_rate) ? $intro_intro_userinfo->recharge_c2a_rate : $config_site['recharge_c2a_rate'];
                    $jewelA = bcdiv(bcmul($gold,$recharge_c2a_rate),100);

                    $result = $this->lockChangeAccountRemain($intro_intro_userinfo->id,'agentjewel',$jewelA,51, $remark,'pay_order',$payorder_id);
                    if($result['status']===false)
                    {
                        //Db::rollback();
                        return false;
                    }
                }

                return true;
            }

            //上级是A1
            if($intro_userinfo->group_id == 3){

                $recharge_c2a_rate = !empty($intro_userinfo->recharge_c2a_rate) ? $intro_userinfo->recharge_c2a_rate : $config_site['recharge_c2a_rate'];//b2a 与 b02a相等
                $jewelA = bcdiv(bcmul($gold,$recharge_c2a_rate),100);

                $result = $this->lockChangeAccountRemain($intro_userinfo->id,'agentjewel',$jewelA,51, $remark,'pay_order',$payorder_id);
                if($result['status']===false)
                {
                    //Db::rollback();
                    return false;
                }

                return true;//结束了
            }

        }

        return true;
    }

    /**
     *
     * @param floatval $number 金额（正数进账，负数出账）
     * @param $accountType 货币类型，money,score
     * @param $logtype 日志的类型
     * @param $remark  备注
     * @param $user_id  用户id
     * @param $table  来源表
     * @param $data_id  表id
     * @param $isAdmin 是否是管理员处理
     * @return array
     * @return array[status]
     * @return array[msg]
     * @return array[log_table]
     * @return array[log_id]
     */
    public function lockChangeAccountRemain($user_id,$accountType='gold',$number,$logtype='',$remark='',$table='',$table_id=0,$isAdmin=false)
    {
        //初始化
        $result = array(
            'status'=>false,
            'msg'=>'',
            'log_table' => '',
            'log_id' => '',
        );

        //获取小数点
        $point = 1;
        if($accountType == 'agentjewel'){
            $point = 2;
        }
        bcscale($point);

        //检测0
        $number = floatval( $number );
        if( $number == 0 )
        {
            $result['status'] = true;
            $result['msg'] = '交易金额:0';
            return $result;
        }
        if(0 === bccomp($number, 0)){
            $result['status'] = true;
            $result['msg'] = '交易金额:0';
            return $result;
        }

        //查询余额
        $wallet = DB::table('mt_user_wallet')->where('user_id',$user_id)->lockForUpdate()->first();
        if(empty($wallet))
        {
            $result['msg'] = '不存在的用户';
            return $result;
        }

        //扣除金币单独方法

        //gold的增加，jewel的增、减

        //之前的余额
        $wallet_before = $wallet->$accountType;

        //正常方法
        if(bccomp(bcadd($wallet_before, $number), 0) === -1)
        {
            $result['msg'] = '余额不足!';
            return $result;
        }

        //钱币操作
        $data = array();
        $data['user_id'] = $user_id;
        $data['log_type'] = $logtype;
        $data['money_type'] = $accountType;
        $data['before'] = $wallet_before;
        $data['change_value'] = $number;
        $data['remain'] = bcadd($wallet_before, $number);
        $data['table'] = $table;
        $data['table_id'] = $table_id;
        $data['remark'] = $remark;
        $data['createtime'] = time();
        $data['updatetime'] = time();


        $log_table = 'mt_user_gold_log';
        if($accountType == 'agentjewel'){
            $log_table = 'mt_user_agentjewel_log';
        }

        $rs2_id = DB::table($log_table)->insertGetId($data);

        //修改金额
        $rs1 = DB::table('mt_user_wallet')->where('user_id',$user_id)->update([$accountType => $data['remain']]);

        //操作数据库失败
        if($rs1 === false || $rs2_id === false){
            $result['msg'] = '更新财务记录失败!';
            return $result;
        }

        //默认成功
        $result['status'] = true;
        $result['msg'] = '账户余额已更新!';
        $result['log_table'] = $log_table;
        $result['log_id'] = $rs2_id;

        return $result;
    }


}