xyzshop/helper/refill/policy/xyz/policy.php

<?php


namespace refill;

use Log;
use rbridge\RBridgeFactory;
use StatesHelper;
use mtopcard;

class policy extends ProviderManager implements IPolicy
{
    protected $mChannelControl;
    protected $mQuality;
    protected $mPrices;
    protected $mAmountLockTurn;
    protected $mStorageLocker;
    protected $mGroupCtl;

    public function __construct()
    {
        parent::__construct();
        $this->mChannelControl = new chctl();
        $this->mQuality = new quality_ploy();
        $this->mPrices = new merchant_price();
        $this->mStorageLocker = new rstorage();
        $this->mGroupCtl = new rgroup_ctl();
    }

    public function load()
    {
        parent::load();

        $opened_names = $this->mOpenedProviderNames;
        sort($opened_names);
        $opened_merchants = $this->opened_merchants();

        $this->mChannelControl->load($opened_names);
        $this->mChannelControl->update_price($this);

        $this->mQuality->load();
        $this->mPrices->load($opened_merchants);

        $turn_name = 'oil_amount_lock_turn';
        $this->mAmountLockTurn = rkcache($turn_name);
        Log::record("AmountLockTurn = {$this->mAmountLockTurn}",Log::DEBUG);

        $this->mStorageLocker->load();
        $this->mGroupCtl->load($opened_names,$opened_merchants);
    }

    private function opened_merchants()
    {
        $mchids = [];

        $i = 0;
        while (true)
        {
            $start = $i * 1000;
            $items = Model()->table('merchant')->field('*')->where(['merchant_state' => 1])->order('mchid asc')->limit("{$start},1000")->select();
            if(empty($items)) {
                break;
            }
            $i++;

            foreach ($items as $item) {
                $mchids[] = intval($item['mchid']);
            }
        }

        sort($mchids);

        return $mchids;
    }

    public function find_providers(order $order): array
    {
        $mchid = $order->mchid();
        $spec  = $order->spec();
        $card_type = $order->card_type();
        $org_quality = $order->org_quality();
        $cur_quality = $order->cur_quality();
        $commit_times = $order->commit_times();
        $elapse_secs = $order->elapse_secs();
        $pcode = $order->pcode();
        $regin_no = $order->region_no();
        $order_time = $order->order_time();

        $providers = parent::get_providers($mchid,$spec,$card_type,$cur_quality,$regin_no);

        if(empty($providers)) {
            return [$providers,false];
        }

        $names = [];
        foreach ($providers as $provider) {
            $names[] = $provider->name();
        }

        Log::record("ProviderManager::get_providers result=" . implode(',',$names),Log::DEBUG);
        [$hasGroup,$can_others,$channels] = $this->mGroupCtl->find_providers($mchid, $spec, $card_type, $cur_quality);
        if($hasGroup)
        {
            if(empty($channels))
            {
                if(!$can_others) {
                    return [[],false];
                }
            }
            else
            {
                $ret = array_intersect($names, $channels);
                if (empty($ret)) {
                    return [[],false];
                }
                else {
                    $names = $ret;
                }
            }
        }
        Log::record("GroupControl result=" . implode(',',$names),Log::DEBUG);

        if(PolicyUtil::mixed_quality($org_quality)) {
            $fQuality = $org_quality;
        }
        else {
            $fQuality = $cur_quality;
        }

        $price = $this->mPrices->price($mchid,$card_type,$spec,$fQuality,$pcode);
        if($price === false) {
            return [[],false];
        }
        $extra_price = $this->mPrices->extra_price($mchid,$card_type,$spec,$fQuality,$pcode);
        $extra_price = $extra_price == false ? 0.00 : $extra_price;

        global $config;
        $auto_find = $config['auto_find_channels'];

        $mobile_types = [mtopcard\ChinaMobileCard,mtopcard\ChinaUnicomCard,mtopcard\ChinaTelecomCard];
        $qualities = [Quality::Normal];
        if($auto_find && in_array($card_type,$mobile_types) && in_array($cur_quality,$qualities))
        {
            $names = $this->mChannelControl->auto_match($names, $spec, $card_type, $cur_quality, $price - $extra_price, time() - $order_time);
            Log::record("policy::find_providers ChannelControl auto_match quality={$cur_quality} spec={$spec} card_type={$card_type}  result=" . implode(',', $names), Log::DEBUG);

            $name_provider = [];
            foreach ($providers as $provider) {
                $name = $provider->name();
                $name_provider[$name] = $provider;
            }

            $result = [];
            foreach ($names as $name)
            {
                if(array_key_exists($name,$name_provider)) {
                    $result[] = $name_provider[$name];
                }
            }

            return [$result,false];
        }
        else
        {
            $name_overloads = $this->mChannelControl->match($names,$spec,$card_type,$cur_quality);
            Log::record("policy::find_providers ChannelControl match result=" . implode(',',array_keys($name_overloads)),Log::DEBUG);

            $result = [];
            foreach ($name_overloads as $name => $overload)
            {
                foreach ($providers as $provider)
                {
                    if($name == $provider->name()) {
                        $result[] = $provider;
                    }
                }
            }

            return [$result,false];
        }
    }

    public function price($mchid,$spec,$card_type,$quality,$pcode)
    {
        return $this->mPrices->price($mchid,$card_type,$spec,$quality,$pcode);
    }

    public function channeles(int $mchid, int $spec, int $card_type, int $quality, $regin_no)
    {
        $providers = parent::get_providers($mchid, $spec, $card_type, $quality, $regin_no);
        return count($providers);
    }

    public function find_quality(order $order, bool $skip_pre = false): array
    {
        $mchid = $order->mchid();
        $spec  = $order->spec();
        $card_type = $order->card_type();
        $org_quality = $order->org_quality();
        $cur_quality = $order->cur_quality();
        $commit_times = $order->commit_times();
        $elapse_secs = $order->elapse_secs();
        $pcode = $order->pcode();
        $regin_no = $order->region_no();

        if($card_type == mtopcard\SinopecCard || $card_type == mtopcard\PetroChinaCard) {
            $caller = new times_caller($mchid,$spec,$card_type,-1,$this);
        } else {
            $caller = null;
        }

        [$org_quality,$qualities] = $this->mQuality->find_quality($mchid,$card_type,$org_quality,$cur_quality,$commit_times,$elapse_secs,$caller);
        if(empty($qualities)) {
            return [$org_quality,0];
        }

        $namer = function ($providers)
        {
            $result = [];
            foreach ($providers as $provider) {
                $result[] = $provider->name();
            }
            return $result;
        };

        $start = false;
        foreach ($qualities as $quality)
        {
            if(!$start && $skip_pre)
            {
                if($quality == $cur_quality) {
                    $start = true;
                }
                continue;
            }

            $price = $this->mPrices->price($mchid,$card_type,$spec,$quality,$pcode);
            if($price === false) {
                Log::record("{$mchid} 没有协商 quality = {$quality} 价格",Log::DEBUG);
                continue;
            }

            $providers = parent::get_providers($mchid, $spec, $card_type, $quality, $regin_no);
            if(empty($providers)) continue;

            $names = $namer($providers);
            $names_overload = $this->mChannelControl->match($names, $spec, $card_type, $quality);

            if (!empty($names_overload)) {
                return [$org_quality, $quality];
            } else {
                Log::record("Policy::find_quality:{$quality}-{$spec}-{$card_type} is fail", Log::DEBUG);
            }
        }

        return [$org_quality,0];
    }

    public function allow($mchid,$card_type,$amount,$quality) : bool
    {
        return $this->mStorageLocker->allow($mchid,$card_type,$amount);
    }

    private function allow_storge($mchid,$card_type,$amount,$quality)
    {
        $reader = function ()
        {
            $cache = rcache("refill_able",'merchant-');
            if(!empty($cache)) {
                $result = unserialize($cache['data']);
            }
            else {
                $result = [];
            }
            return $result;
        };

        if(defined('MOBILE_SERVER') && MOBILE_SERVER === true)
        {
            if(StatesHelper::fetch_state('merchant')) {
                $this->mLimits = $reader();
            }
        }
        else {
            $this->mLimits = $reader();
        }

        $key = "{$mchid}-{$card_type}-{$amount}";
        if(empty($this->mLimits)) {
            return true;
        }
        elseif(array_key_exists($key,$this->mLimits)) {
            return $this->mLimits[$key];
        }
        else {
            return true;
        }
    }

    public function notify($order_info, $refill_info) : bool
    {
        $order_state = $order_info['order_state'];
        if ($order_state == ORDER_STATE_CANCEL) {
            $state = "CANCEL";
        } else {
            $state = "SUCCESS";
        }

        $mchid = $refill_info['mchid'];
        $mch_info = Model('merchant')->getMerchantInfo(['mchid' => $mchid]);

        [$params, $sign] = $this->body($state, $refill_info, $mch_info);
        $params['sign'] = $sign;

        $notify_url = $refill_info['notify_url'];
        //如果http请求内部，又发出回调自己的请求，在处理进程非动态扩容的情况下，容易造成阻塞.
        if ($this->is_url($notify_url)) {
            $resp = http_request($notify_url, $params, 'POST');
        } else {
            $resp = RBridgeFactory::instance()->notify($notify_url, $params);
        }

        return $resp == "SUCCESS" || $resp == 'FAILED';
    }

    private function body($state, $refill_info, $mch_info)
    {
        $params = [
            "mchid" => $refill_info['mchid'],
            "order_sn" => $refill_info['mch_order'],
            "amount" => $refill_info['refill_amount'],//intval($refill_info['refill_amount'] + 0.05),
            "cardno" => $refill_info['card_no'],
            "trade_no" => $refill_info['order_sn'],
            "idcard" => $refill_info['idcard'] ?? "",
            "card_name" => $refill_info['card_name'] ?? "",
            'official_sn' => $refill_info['official_sn'] ?? "",
            'message' => $refill_info['err_msg'] ?? "",
            "state" => $state];

        [$has_sms,$sms] = $this->sms($refill_info);
        if($has_sms) {
            $params['sms'] = $sms;
        }

        $secure_key = $mch_info['secure_key'];
        $sign = $this->sign($params, $secure_key);

        return [$params, $sign];
    }

    private function sms($refill_info)
    {
        $mchids = [1090,10116];
        $mchid = $refill_info['mchid'];
        $official_sn = $refill_info['official_sn'] ?? "";
        $card_type = $refill_info['card_type'];
        $card_no = $refill_info['card_no'];
        $amount = intval($refill_info['refill_amount']);

        if(in_array($mchid,$mchids) && !empty($official_sn) && $card_type == mtopcard\SinopecCard && !empty($card_no))
        {
            $short_no = substr($card_no,-6);
            $ret = preg_match('/\d{4}(?P<month>\d{2})(?P<day>\d{2})(?P<hour>\d{2})(?P<min>\d{2})\d{4}/u', $official_sn, $matches);
            if($ret > 0) {
                $sms = "【中国石化】您尾号为{$short_no}的加油卡于{$matches['month']}月{$matches['day']}日 {$matches['hour']}时{$matches['min']}分充值成功,金额{$amount}元,订单号:{$official_sn}";
                return [true,$sms];
            }
        }

        return [false,''];
    }

    private function sign($params, $key)
    {
        ksort($params);

        $body = "";
        $i = 0;
        foreach ($params as $k => $v) {
            if (false === $this->check_empty($v) && "@" != substr($v, 0, 1)) {
                if ($i == 0) {
                    $body .= "{$k}" . "=" . urlencode($v);
                } else {
                    $body .= "&" . "{$k}" . "=" . urlencode($v);
                }
                $i++;
            }
        }
        $body .= "&key={$key}";
        Log::record("notify body={$body}",Log::DEBUG);

        return md5($body);
    }

    private function check_empty($value)
    {
        if (!isset($value))
            return true;
        if ($value === null)
            return true;
        if (trim($value) === "")
            return true;

        return false;
    }

    private function is_url($url)
    {
        $checker = function ($haystack, $needle) {
            $length = strlen($needle);
            return (substr($haystack, 0, $length) === $needle);
        };

        return $checker($url, "http://") || $checker($url, "https://");
    }

    public function update_ratios($ratios)
    {
        $this->mChannelControl->update_ratios($ratios);
    }

    public function update_mchratios($ratios)
    {
        $this->mQuality->update_mchratios($ratios);
    }
}