<?php

namespace App\Http\Controllers\Wap\User;

use App\Modules\Activity\Services\ActivityService;
use App\Modules\Book\Services\BookConfigService;
use App\Modules\Channel\Models\Channel;
use App\Modules\Subscribe\Models\BookOrder;
use App\Modules\Subscribe\Models\YearOrder;
use App\Modules\Subscribe\Services\YearOrderService;
use App\Modules\User\Models\User;
use App\Modules\User\Services\ReadRecordService;
use App\Modules\User\Services\UserBindHkWelfareService;
use App\Modules\User\Services\UserService;
use Illuminate\Http\Request;
use App\Http\Controllers\Controller;
use Hashids;
use EasyWeChat\Foundation\Application;
use Log;
use Exception;
use Redis;
use Cookie;

/**
 * 朋友圈链接
 * Class CoflController
 * @package App\Http\Controllers\Wap\User
 */
class CoflController extends Controller
{
    public function index(Request $request){
        $bid = $request->get('bid');
        if(empty($bid)){
            $default_ink = $this->getLink();
            return redirect()->to($default_ink);
        }
        $openid = $request->get('openid');
        //授权
        $params = $request->except('_url');
        if(empty($openid)){
            //$url = str_replace('http://', env('PROTOCOL') . '://', url()->current() . '?' . http_build_query($params));
            $url = url()->current() . '?' . http_build_query($params);
            $params['redirect_url'] = urlencode($url);
            $app = new Application($this->auth($params));
            return $app->oauth->redirect();
        }
        try{
            $bid = Hashids::decode($bid)[0];
        }catch (Exception $e){
            return redirect()->to($this->getLink());
        }
        $crm = $request->get('crm');
        //获取用户
        $user = $this->getUsers($openid);
        if(($request->input('test',0)) ==1 || ($request->input('test',0)) =='1' ) {
            $user = $this->getUsersV2($openid,$bid);
        }

        if(!$user[0]){
            $user[1] = 123;
        }
        //有阅读纪录的跳转
        $read_record = ReadRecordService::getByField($user[0],$bid);
        if($read_record){
            $cid = explode('_',$read_record)[0];
        }else{
            //没有阅读记录的跳转
            $book_info = BookConfigService::getBookById($bid);
            $cid = $book_info->first_cid;
        }
        $params['cid'] = $cid;
        if(isset($params['openid']))  unset($params['openid']);
        if(isset($params['unionid']))  unset($params['unionid']);
        $url = $this->getLink($user[1]).'reader?'.http_build_query($params);
        $this->stats('book',$crm);
        return redirect()->to($url);
    }

    public function freeCurrencyView(Request $request){
        $openid = $request->get('openid');
        //授权
        $params = $request->except('_url');
        if(empty($openid)){
            //$url = str_replace('http://', env('PROTOCOL') . '://', url()->current() . '?' . http_build_query($params));
            $url = url()->current() . '?' . http_build_query($params);
            $params['redirect_url'] = urlencode($url);
            $app = new Application($this->auth($params));
            return $app->oauth->redirect();
        }
        $uri = $request->path();
        $token = $request->get('token');
        $rfee = $request->get('amount');
        $crm = $request->get('crm');
        if($uri == 'freethrhcurrency'){
            $fee = 300;
            $this->stats('reward_300',$crm);
        }else{
            $this->stats('reward_200',$crm);
            $fee = $this->freeCurrencyFee($token,$rfee);
        }

        $user = $this->getUsers($openid);
        if(!$user || !$user[0] || !$user[1]) return redirect()->to($this->getLink().'?'.http_build_query($params));
        $get_free_currency = UserBindHkWelfareService::isHasGet($user[0]);
        if($get_free_currency){
            //已经领过
            return view('jump.bindHkFreeCurrency',['fee'=>$fee,'url'=>$this->getLink($get_free_currency->distribution_channel_id).'?'.http_build_query($params),'is_get'=>1,'uid'=>$get_free_currency->uid]);
        }else{
            return view('jump.bindHkFreeCurrency',['fee'=>$fee,'url'=>$this->getLink($user[1]).'?'.http_build_query($params),'is_get'=>0,'uid'=>$user[0]]);
        }
    }


    private function freeCurrencyFee($token,$fee){
        if(!$token || !$fee) return 200;
        $param['fee'] = $fee;
        if( _sign($param,env('SECRET_KEY')) == $token)  return $fee;
        return 200;
    }

    public function freeCurrencyPost(Request $request){
        $uid = $request->post('uid');
        $fee = $request->post('fee',200);
        $result = UserBindHkWelfareService::getfreeCurrency($uid,$fee);
        if($result){
            UserService::addBalance($uid,$fee,0,$fee);
        }
        return response()->success(['uid'=>$uid,'result'=>$result]);
    }

    public function activity(Request $request){
        $token = $request->get('token');
        if(empty($token)){
            $default_ink = $this->getLink();
            return redirect()->to($default_ink);
        }
        $openid = $request->get('openid');
        //授权
        $params = $request->except('_url');
        if(empty($openid)){
            $url = url()->current() . '?' . http_build_query($params);
            $params['redirect_url'] = urlencode($url);
            $app = new Application($this->auth($params));
            return $app->oauth->redirect();
        }
        $crm = $request->get('crm');
        $this->stats('activity',$crm);
        $activity = ActivityService::getByToken($token);
        if($activity){
            $user = $this->getUsers($openid);
            if($user[0]){
                $url_format = '%s://site%s.%s.com%s';
                $url = sprintf($url_format, env('PROTOCOL'), encodeDistributionChannelId($user[1]),
                    env('CUSTOM_HOST'),
                    $activity->activity_page
                );
                return redirect()->to($url);
            }
        }
        $default_ink = $this->getLink();
        return redirect()->to($default_ink);
    }

    public function recent(Request $request){
        $openid = $request->get('openid');
        //授权
        $params = $request->except('_url');
        if(empty($openid)){
            $url = url()->current() . '?' . http_build_query($params);
            $params['redirect_url'] = urlencode($url);
            $app = new Application($this->auth($params));
            return $app->oauth->redirect();
        }
        $user = $this->getUsers($openid);
        if(!$user[0]){
            $distribution_channel_id = 123;
        }else{
            $distribution_channel_id = $user[1];
        }
        $crm = $request->get('crm');
        $this->stats('recent',$crm);
        $link = $this->getLink($distribution_channel_id).'recent?'.http_build_query($params);
        return redirect()->to($link);
    }

    public function person(Request $request){
        $openid = $request->get('openid');
        //授权
        $params = $request->except('_url');
        if(empty($openid)){
            $url = url()->current() . '?' . http_build_query($params);
            $params['redirect_url'] = urlencode($url);
            $app = new Application($this->auth($params));
            return $app->oauth->redirect();
        }
        $user = $this->getUsers($openid);
        if(!$user[0]){
            $distribution_channel_id = 123;
        }else{
            $distribution_channel_id = $user[1];
        }
        $crm = $request->get('crm');
        $this->stats('person',$crm);
        $link = $this->getLink($distribution_channel_id).'person?'.http_build_query($params);
        return redirect()->to($link);
    }

    private function getUsers($openid){
        $users = User::where('openid',$openid)->select('id','distribution_channel_id')->get();
        if($users->isEmpty()) return [0,0];
        $temp = null;
        $distribution_channel_id = 0;
        $uid = 0;
        foreach ($users as $user){
            $last_read = ReadRecordService::getByField($user->id,'last_read');
            if(!$last_read) continue;
            if(!$temp ){
                $distribution_channel_id = $user->distribution_channel_id;
                $uid  = $user->id;
                $temp = $last_read;
            }else{
                $temp_last_read_info = explode('_',$temp);
                $last_read_info = explode('_',$last_read);
                if($last_read_info[2] > $temp_last_read_info[2]){
                    $uid = $user->id;
                    $distribution_channel_id = $user->distribution_channel_id;
                    $temp = $last_read;
                }
            }
        }
        return [$uid,$distribution_channel_id];
    }

    /**
     * @param $openid
     * @return array
     */
    private function getUsersV2($openid,$bid){
        $friend_link_uid_bind = DB::table('friend_link_uid_bind')->where('openid',$openid)->where('bid',$bid)->first();
        if($friend_link_uid_bind) {
            $user = User::where('id',$friend_link_uid_bind->uid)->select('id','distribution_channel_id')->get();
            if($user) {
                return [$user->id,$user->distribution_channel_id];
            }
        }
        $inner_channels = Channel::join('channel_users','channel_users.id','=','distribution_channels.channel_user_id')
            ->select('distribution_channls.id')
            ->whereIn('channel_users.id',explode(',',redisEnv('PROMOTION_GROUP_CHANNEL_USER_ID')))
            ->get()
            ->pluck('id');
        $users = User::where('openid',$openid)->select('id','distribution_channel_id')->get();
        if($users->isEmpty()) return [0,0];
        $temp = null;
        $distribution_channel_id = 0;
        $uid = 0;
        $inner_channel_uid_list = [];
        //先筛网站运营部UID
        foreach ($users as $user){
            if(in_array($user->distribution_channel_id,$inner_channels)) {
                $inner_channel_uid_list[] = $user;
            }
        }
        if(count($inner_channel_uid_list) == 1) {
            return [$inner_channel_uid_list[0]->id,$inner_channel_uid_list[0]->distribution_channel_id];
        }
        if(count($inner_channel_uid_list)>1) {
            //有多个网站运营部UID，针对网站运营部UID进入到下一步筛选
            $users = $inner_channel_uid_list;
        }
        //筛选包年UID
        $uid_list = [];
        foreach ($users as $item) {
            $uid_list[] =$item->id;
        }
        $year_order = YearOrder::whereIn('uid',$uid_list)->where('bid')->orderBy('end_time','desc')->first();
        if($year_order) {
            foreach ($users as $item) {
                if($item->id == $year_order->uid) {
                    //筛选包年结束时间最后的UID
                    return [$item->id,$item->distribution_channel_id];
                }
            }
        }
        //按订阅章节数最多的筛选
        $users_select = ['id'=>0,'count'=>0,'user'=>null];
        foreach ($users as $each){
            $table_prefix = ($each->id)%512;
            $chapter_count = DB::connection('chapter_order_mysql')
                ->table('chapter_orders'.$table_prefix)
                ->where('created_at','>=',date('Y-m-d H:i:s',strtotime('-3 day')))
                ->where('uid',$each->id)
                ->where('bid',$bid)
                ->count('id');
            $book_order = BookOrder::where('uid',$each->id)
                ->where('bid',$bid)
                ->where('created_at','>=',date('Y-m-d H:i:s',strtotime('-3 day')))
                ->first();
            if($book_order) {
                $chapter_count += 30;
            }
            //$each->chapter_count = $chapter_count;
            if($chapter_count>$users_select['count']) {
                $users_select['id'] = $each->id;
                $users_select['count'] = $chapter_count;
                $users_select['user'] = $each;
            }
        }
        if($users_select['id'] >0) {
            return [$users_select['user']->id,$users_select['user']->distribution_channel_id];
        }
        //有订阅记录的

        foreach ($users as $value) {
            $table_prefix = ($value->id)%512;
            $chapter_order = DB::connection('chapter_order_mysql')
                ->table('chapter_orders'.$table_prefix)
                ->where('uid',$value->id)
                ->where('bid',$bid)
                ->orderBy('created_at','desc')
                ->first();
            $book_order = BookOrder::where('uid',$value->id)
                ->where('bid',$bid)
                ->first();
            if($chapter_order ){
                if(strtotime($chapter_order->created_at) > $users_select['create_time']) {
                    $users_select['id'] = $value->id;
                    $users_select['create_time'] = strtotime($chapter_order->created_at);
                    $users_select['user'] = $value;
                }
            }
            if($book_order){
                if(strtotime($book_order->created_at) > $users_select['create_time']){
                    $users_select['id']=$value->id;
                    $users_select['create_time']= strtotime($book_order->created_at);
                    $users_select['user']= $value;
                }
            }

        }
        if($users_select['id'] >0) {
            return [$users_select['user']->id,$users_select['user']->distribution_channel_id];
        }
        return [0,0];
    }

    private function getLink($distribution_channel_id=123){
        $url_format = '%s://site%s.%s.com/';
        return  sprintf(
            $url_format,
            env('PROTOCOL'),
            encodeDistributionChannelId($distribution_channel_id),
            env('CUSTOM_HOST')
        );
    }


    private function auth($param){
        $param['appid'] = 'wx9d389a73b88bbeae';
        $options = [
            'app_id' => 'wx9d389a73b88bbeae',
            'secret' => '2f6594bb595dfa256b5512e43a32a3d3',
            'oauth' => [
                'scopes' => ['snsapi_base'],
                'callback' => env('AUTH_CALLBACK_URL') . '?' . http_build_query($param),
            ],
        ];
        return $options;
    }

    private function stats($page,$flag){
        if(!$page || !$flag) return ;
        //pv
        $day = date('Y-m-d');
        $pv_key = sprintf('crm:pv:%s',$flag);
        Redis::hincrby($pv_key, $day, 1);
        //Redis::hincrby($pv_key, 'total', 1);
        Redis::sadd('crm_'.$day,$flag);
        //uv
        $cookie_flag = Cookie::get('crm_flag');
        if(!$cookie_flag || $cookie_flag != $flag){
            $uv_key = sprintf('crm:uv:%s',$flag);
            Redis::hincrby($uv_key, $day, 1);
            //Redis::hincrby($uv_key, 'total', 1);
        }
        Cookie::queue('crm_flag', $flag, env('U_COOKIE_EXPIRE'), null, null, false, false);
    }
}