<?php
/**
 * SAAS应用系统 --- 十年开发经验汇集巨献!
 * ==========================================================
 * Copy right 2020-2050 成都众联思索科技有限公司,保留所有权利。
 * ----------------------------------------------------------
 * 官方网址: https://www.zoomtk.com
 * 这不是自由软件！未经允许不得用于商业目或程序代码摘取及修改。
 * 任何企业和个人不允许对程序代码以任何形式任何目的再发布传播。
 * 唯一发布渠道www.zoomtk.com;非官方渠道统一视为侵权行为。
 * ==========================================================
 */

namespace app\model\express;

use app\model\BaseModel;
use app\model\shop\Shop;
use think\facade\Cache;

/**
 * 外卖配送
 */
class Local extends BaseModel
{
    /**
     * 添加站点外卖配送配置
     * @param unknown $data
     */
    public function addLocal($data)
    {
        $id = model('local')->add($data);
        Cache::tag("local")->clear();
        return $this->success($id);
    }

    /**
     * 修改站点外卖配送配置
     * @param $data
     * @param $condition
     * @return array
     */
    public function editLocal($data, $condition)
    {
        $res = model('local')->update($data, $condition);
        Cache::tag("local")->clear();
        return $this->success($res);
    }

    /**
     * 删除站点外卖配送 (通常删除站点会用到)
     * @param unknown $condition
     */
    public function deleteLocal($condition)
    {
        $res = model('local')->delete($condition);
        Cache::tag("local")->clear();
        return $this->success($res);
    }

    /**
     * 获取站点外卖配送信息
     * @param array $condition
     * @param string $field
     */
    public function getLocalInfo($condition, $field = '*')
    {
        $check_condition = array_column($condition, 2, 0);
        $site_id = isset($check_condition[ 'site_id' ]) ? $check_condition[ 'site_id' ] : '';

        $data = json_encode([ $condition, $field ]);
//        $cache = Cache::get("local_getLocalInfo_" . $data);
//        if (!empty($cache)) {
//            return $this->success($cache);
//        }
        $info = model('local')->getInfo($condition, $field);
        if (empty($info)) {
            $local_data = array (
                'site_id' => $site_id,
                'update_time' => time()
            );
            $this->addLocal($local_data);
            $info = model('local')->getInfo($condition, $field);
        }
        if (!empty($info)) {
            $local_area_array = [];
            if (!empty($info[ 'local_area_json' ])) {
                $local_area_array = json_decode($info[ 'local_area_json' ], true);
            }
            $info[ 'local_area_array' ] = $local_area_array;
            $time_week = [];
            if (!empty($info[ 'time_week' ])) {
                $time_week = explode(',', $info[ 'time_week' ]);
            }
            $info[ 'time_week' ] = $time_week;
            $area_array = [];
            if (!empty($info[ 'area_array' ])) {
                $area_array = explode(',', $info[ 'area_array' ]);
            }
            $info[ 'area_array' ] = $area_array;
            Cache::tag("local")->set("local_getLocalInfo_" . $data, $info);
        }
        return $this->success($info);
    }

    /**
     * 获取站点外卖配送列表
     * @param array $condition
     * @param string $field
     * @param string $order
     * @param string $limit
     */
    public function getLocalList($condition = [], $field = '*', $order = '', $limit = null)
    {
        $data = json_encode([ $condition, $field, $order, $limit ]);
        $cache = Cache::get("local_getLocalList_" . $data);
        if (!empty($cache)) {
            return $this->success($cache);
        }
        $list = model('local')->getList($condition, $field, $order, '', '', '', $limit);
        Cache::tag("local")->set("local_getLocalList_" . $data, $list);

        return $this->success($list);
    }

    /**
     * 获取站点外卖配送分页列表
     * @param array $condition
     * @param number $page
     * @param string $page_size
     * @param string $order
     * @param string $field
     */
    public function getLocalPageList($condition = [], $page = 1, $page_size = PAGE_LIST_ROWS, $order = '', $field = '*')
    {
        $data = json_encode([ $condition, $field, $order, $page, $page_size ]);
        $cache = Cache::get("local_getLocalPageList_" . $data);
        if (!empty($cache)) {
            return $this->success($cache);
        }
        $list = model('local')->pageList($condition, $field, $order, $page, $page_size);
        Cache::tag("local")->set("local_getLocalPageList_" . $data, $list);
        return $this->success($list);
    }


    /**
     * 计算费用
     * @param array $shop_goods
     * @param array $data
     */
    public function calculate($shop_goods, $data)
    {
        $local_condition = array (
            [ 'site_id', '=', $data[ 'site_id' ] ]
        );
        $local_info_result = $this->getLocalInfo($local_condition);
        $local_info = $local_info_result[ 'data' ];

        $start_price_error = 0;//起送价错误
        $distance_error = 0;//配送距离错误
        $time_error = 0;
        $error_code = 12;
        $error = '';
        //判断时间   是否在时间段内
        if ($local_info[ 'time_is_open' ] == 1) {
            $week = date('w');
            if (in_array($week, $local_info[ 'time_week' ])) {
                $time = $shop_goods[ 'buyer_ask_delivery_time' ];
                if ($time == 0) {
                    $time_error++;
                    $error = '请选择配送时间';
                } else {
                    $time_error++;
                    $error = '配送时间不在营业时间内';
                }
            }


        }

        $shop_model = new Shop();
        $shop_info_result = $shop_model->getShopInfo([ [ 'site_id', '=', $data[ 'site_id' ] ] ]);
        $shop_info = $shop_info_result[ 'data' ];
        $is_delivery = false;


        $start_money_array = [];
        if ($local_info[ 'area_type' ] == 1 || $local_info[ 'area_type' ] == 2) {
            if ($data[ 'member_address' ][ 'longitude' ] == 0 && $data[ 'member_address' ][ 'latitude' ] == 0) {
                return $this->error([ 'code' => $error_code ], '当前配送地址没有配置定位坐标');
            }

            $shop_longitude = $shop_info[ 'longitude' ];
            $shop_latitude = $shop_info[ 'latitude' ];
            $longitude = $data[ 'member_address' ][ 'longitude' ];
            $latitude = $data[ 'member_address' ][ 'latitude' ];
            if ($local_info[ 'area_type' ] == 1) {
                $distance = $this->getDistance($latitude, $longitude, $shop_latitude, $shop_longitude);
                if ($distance <= $local_info[ 'start_distance' ]) {//是否在起送距离以内
                    $delivery_money = $local_info[ 'start_delivery_money' ];
                } else {
                    $diff_distance = $distance - $local_info[ 'start_distance' ];//减去起送距离 求得差
                    $delivery_money = $local_info[ 'start_delivery_money' ] + ceil($diff_distance / $local_info[ 'continued_distance' ]) * $local_info[ 'continued_delivery_money' ];
                }
            } else {
                $delivery_money_array = [];
            }
            $local_area_array = $local_info[ 'local_area_array' ];


            if (!empty($local_area_array)) {
                foreach ($local_area_array as $k => $v) {
                    //起送价是否满足
                    if ($shop_goods[ 'goods_money' ] >= $v[ 'start_price' ]) {
                        $path = $v[ 'path' ];
                        if ($v[ 'rule_type' ] == 'circle') {//半径

                            $item_longitude = $path[ 'center' ][ 'longitude' ];
                            $item_latitude = $path[ 'center' ][ 'latitude' ];
                            $radius = $path[ 'radius' ];
                            $item_distance = $this->getDistance($latitude, $longitude, $item_latitude, $item_longitude);
                            //判断有无超出范围
                            if ($item_distance <= $radius / 1000) {
                                $is_delivery = true;
                                if ($local_info[ 'area_type' ] == 2) {
                                    //                                   //非半径   配送费是取设置的
                                    $delivery_money_array[] = $v[ 'delivery_money' ];
                                }
                            } else {
                                $distance_error++;
                            }
                        } else if ($v[ 'rule_type' ] == 'polygon') {//多边形

                            $point = array (
                                'latitude' => $latitude,
                                'longitude' => $longitude,
                            );
                            //判断坐标是否在多边形内
                            if (is_point_in_polygon($point, $path)) {
                                $is_delivery = true;
                                if ($local_info[ 'area_type' ] == 2) {
                                    //非半径   配送费是取设置的
                                    $delivery_money_array[] = $v[ 'delivery_money' ];
                                }
                            } else {
                                $distance_error++;
                            }
                        }
                    } else {
                        $start_money_array[] = $v[ 'start_price' ];
                        $start_price_error++;
                    }
                }

                //区域配送 存在相交的区域,以配送费低的区域价格来计算
                if ($local_info[ 'area_type' ] == 2) {
                    if (!empty($delivery_money_array)) {
                        $delivery_money = min($delivery_money_array);
                    }

                }
            }
        } else {
            //行政区域配送

            if ($shop_goods[ 'goods_money' ] >= $local_info[ 'start_money' ]) {

                $district_id = $data[ 'member_address' ][ 'district_id' ];//区县地域id
                $area_array = $local_info[ 'area_array' ];
                if (in_array($district_id, $area_array)) {
                    //启用阶梯价 的话  也是必须要具体坐标的
                    if ($local_info[ 'is_open_step' ] == 1) {

                        if ($data[ 'member_address' ][ 'longitude' ] == 0 && $data[ 'member_address' ][ 'latitude' ] == 0) {
                            return $this->error([ 'code' => $error_code ], '当前配送地址没有配置定位坐标');
                        }

                        $is_delivery = true;
                        $shop_longitude = $shop_info[ 'longitude' ];
                        $shop_latitude = $shop_info[ 'latitude' ];
                        $longitude = $data[ 'member_address' ][ 'longitude' ];
                        $latitude = $data[ 'member_address' ][ 'latitude' ];

                        $distance = $this->getDistance($latitude, $longitude, $shop_latitude, $shop_longitude);
                        if ($distance <= $local_info[ 'start_distance' ]) {//是否在起送距离以内
                            $delivery_money = $local_info[ 'start_delivery_money' ];
                        } else {
                            $diff_distance = $distance - $local_info[ 'start_distance' ];//减去起送距离 求得差
                            $delivery_money = $local_info[ 'start_delivery_money' ] + ceil($diff_distance / $local_info[ 'continued_distance' ]) * $local_info[ 'continued_delivery_money' ];
                        }


                    } else {
                        $is_delivery = true;
                        $delivery_money = $local_info[ 'delivery_money' ];
                    }
                } else {
                    $distance_error++;//配送距离错误
                }

            } else {
                $start_price_error++;//起送价错误
                $start_money_array[] = $local_info[ 'start_money' ];
            }
        }

        if ($is_delivery) {
            $return_result = array (
                "delivery_money" => $delivery_money,
            );
            if ($time_error > 0) {
                $return_result[ 'code' ] = 1;
                $return_result[ 'error' ] = $error;
            }
            return $this->success($return_result);
        } else {
            if ($distance_error > 0) {
                $error = '当前配送地址与商家距离过远,需重新选择可配送的配送地址';
                $error_code = 10;
            } else if ($start_price_error > 0) {
                $error = '当前商品金额尚不满足商家配送的最低起送价格';
                $error_code = 11;
            }
            return $this->error([ 'code' => $error_code ], $error);
        }

    }


    /**
     * 区域是否支持配送
     * @param $condition
     */
    public function isSupportDelivery($data)
    {
        $local_condition = array (
            [ 'site_id', '=', $data[ 'site_id' ] ]
        );
        $local_info_result = $this->getLocalInfo($local_condition);
        $local_info = $local_info_result[ 'data' ];

        $start_price_error = 0;//起送价错误
        $distance_error = 0;//配送距离错误
        $time_error = 0;
        $error_code = 12;
        $error = '';
        //判断时间   是否在时间段内
        if ($local_info[ 'time_is_open' ] == 1) {
            $week = date('w');
            if (in_array($week, $local_info[ 'time_week' ])) {
                $time = $data[ 'buyer_ask_delivery_time' ];
                if ($time == 0) {
                    $time_error++;
                    $error = '请选择配送时间';
                } else {
                    $time_error++;
                    $error = '配送时间不在营业时间内';
                }
            }
        }

        $is_delivery = false;

        if ($local_info[ 'area_type' ] == 1 || $local_info[ 'area_type' ] == 2) {
            if ($data[ 'member_address' ][ 'longitude' ] == 0 && $data[ 'member_address' ][ 'latitude' ] == 0) {
                return $this->error([ 'code' => $error_code ], '当前配送地址没有配置定位坐标');
            }
            $longitude = $data[ 'member_address' ][ 'longitude' ];
            $latitude = $data[ 'member_address' ][ 'latitude' ];
            $local_area_array = $local_info[ 'local_area_array' ];
            if (!empty($local_area_array)) {
                foreach ($local_area_array as $k => $v) {
                    $path = $v[ 'path' ];
                    if ($v[ 'rule_type' ] == 'circle') {//半径

                        $item_longitude = $path[ 'center' ][ 'longitude' ];
                        $item_latitude = $path[ 'center' ][ 'latitude' ];
                        $radius = $path[ 'radius' ];
                        $item_distance = $this->getDistance($latitude, $longitude, $item_latitude, $item_longitude);
                        //判断有无超出范围
                        if ($item_distance <= $radius / 1000) {
                            $is_delivery = true;
                        } else {
                            $distance_error++;
                        }
                    } else if ($v[ 'rule_type' ] == 'polygon') {//多边形

                        $point = array (
                            'latitude' => $latitude,
                            'longitude' => $longitude,
                        );
                        //判断坐标是否在多边形内
                        if (is_point_in_polygon($point, $path)) {
                            $is_delivery = true;
                        } else {
                            $distance_error++;
                        }
                    }
                }
            }
        } else {
            //行政区域配送
            $district_id = $data[ 'member_address' ][ 'district_id' ];//区县地域id
            $area_array = $local_info[ 'area_array' ];
            if (in_array($district_id, $area_array)) {
                //启用阶梯价 的话  也是必须要具体坐标的
                if ($local_info[ 'is_open_step' ] == 1) {
                    if ($data[ 'member_address' ][ 'longitude' ] == 0 && $data[ 'member_address' ][ 'latitude' ] == 0) {
                        return $this->error([ 'code' => $error_code ], '当前配送地址没有配置定位坐标');
                    }
                    $is_delivery = true;
                } else {
                    $is_delivery = true;
                }
            } else {
                $distance_error++;//配送距离错误
            }


        }

        if ($is_delivery) {
            $return_result = [];
            if ($time_error > 0) {
                $return_result[ 'code' ] = 1;
                $return_result[ 'error' ] = $error;
            }
            return $this->success($return_result);
        } else {
            if ($distance_error > 0) {
                $error = '当前配送地址与商家距离过远,需重新选择可配送的配送地址';
                $error_code = 10;
            } else if ($start_price_error > 0) {
                $error = '当前商品金额尚不满足商家配送的最低起送价格';
                $error_code = 11;
            }
            return $this->error([ 'code' => $error_code ], $error);
        }
    }

    /**
     * 判断可用的区域
     * @param $type
     * @param $latlng
     * @param $range
     */
    public function getWithAreaList($type, $latlng, $range)
    {

    }


    /**
     * 求两个已知经纬度之间的距离,单位为km
     * @param lng1,lng2 经度
     * @param lat1,lat2 纬度
     * @return float 距离，单位为km
     **/
    public function getDistance($lat1, $lng1, $lat2, $lng2)
    {
        //将角度转为狐度
        $radLat1 = deg2rad($lat1);//deg2rad()函数将角度转换为弧度
        $radLat2 = deg2rad($lat2);
        $radLng1 = deg2rad($lng1);
        $radLng2 = deg2rad($lng2);
        $a = $radLat1 - $radLat2;
        $b = $radLng1 - $radLng2;
        $s = 2 * asin(sqrt(pow(sin($a / 2), 2) + cos($radLat1) * cos($radLat2) * pow(sin($b / 2), 2))) * 6371;
        return round($s, 1);
    }


    /**
     * 积分兑换计算费用
     * @param array $shop_goods
     * @param array $data
     */
    public function pointexchangeCalculate($goods_info, $data)
    {
        $local_condition = array (
            [ 'site_id', '=', $data[ 'site_id' ] ]
        );
        $local_info_result = $this->getLocalInfo($local_condition);
        $local_info = $local_info_result[ 'data' ];

        $start_price_error = 0;//起送价错误
        $distance_error = 0;//配送距离错误
        $time_error = 0;
        $error_code = 12;
        $error = '';
        //判断时间   是否在时间段内
        if ($local_info[ 'time_is_open' ] == 1) {
            $week = date('w');
            if (in_array($week, $local_info[ 'time_week' ])) {
                $time = $goods_info[ 'buyer_ask_delivery_time' ];
                if ($time == 0) {
                    $time_error++;
                    $error = '请选择配送时间';
                } else {
                    $time_error++;
                    $error = '配送时间不在营业时间内';
                }
            }

        }

        $shop_model = new Shop();
        $shop_info_result = $shop_model->getShopInfo([ [ 'site_id', '=', $data[ 'site_id' ] ] ]);
        $shop_info = $shop_info_result[ 'data' ];
        $is_delivery = false;


        $start_money_array = [];
        if ($local_info[ 'area_type' ] == 1 || $local_info[ 'area_type' ] == 2) {
            if ($data[ 'member_address' ][ 'longitude' ] == 0 && $data[ 'member_address' ][ 'latitude' ] == 0) {
                return $this->error([ 'code' => $error_code ], '当前配送地址没有配置定位坐标');
            }

            $shop_longitude = $shop_info[ 'longitude' ];
            $shop_latitude = $shop_info[ 'latitude' ];
            $longitude = $data[ 'member_address' ][ 'longitude' ];
            $latitude = $data[ 'member_address' ][ 'latitude' ];
            if ($local_info[ 'area_type' ] == 1) {
                $distance = $this->getDistance($latitude, $longitude, $shop_latitude, $shop_longitude);
                if ($distance <= $local_info[ 'start_distance' ]) {//是否在起送距离以内
                    $delivery_money = $local_info[ 'start_delivery_money' ];
                } else {
                    $diff_distance = $distance - $local_info[ 'start_distance' ];//减去起送距离 求得差
                    $delivery_money = $local_info[ 'start_delivery_money' ] + ceil($diff_distance / $local_info[ 'continued_distance' ]) * $local_info[ 'continued_delivery_money' ];
                }
            } else {
                $delivery_money_array = [];
            }
            $local_area_array = $local_info[ 'local_area_array' ];


            if (!empty($local_area_array)) {
                foreach ($local_area_array as $k => $v) {
                    //起送价是否满足
                    if ($data['exchange_info'][ 'price' ] >= $v[ 'start_price' ]) {
                        $path = $v[ 'path' ];
                        if ($v[ 'rule_type' ] == 'circle') {//半径

                            $item_longitude = $path[ 'center' ][ 'longitude' ];
                            $item_latitude = $path[ 'center' ][ 'latitude' ];
                            $radius = $path[ 'radius' ];
                            $item_distance = $this->getDistance($latitude, $longitude, $item_latitude, $item_longitude);
                            //判断有无超出范围
                            if ($item_distance <= $radius / 1000) {
                                $is_delivery = true;
                                if ($local_info[ 'area_type' ] == 2) {
                                    //                                   //非半径   配送费是取设置的
                                    $delivery_money_array[] = $v[ 'delivery_money' ];
                                }
                            } else {
                                $distance_error++;
                            }
                        } else if ($v[ 'rule_type' ] == 'polygon') {//多边形

                            $point = array (
                                'latitude' => $latitude,
                                'longitude' => $longitude,
                            );
                            //判断坐标是否在多边形内
                            if (is_point_in_polygon($point, $path)) {
                                $is_delivery = true;
                                if ($local_info[ 'area_type' ] == 2) {
                                    //非半径   配送费是取设置的
                                    $delivery_money_array[] = $v[ 'delivery_money' ];
                                }
                            } else {
                                $distance_error++;
                            }
                        }
                    } else {
                        $start_money_array[] = $v[ 'start_price' ];
                        $start_price_error++;
                    }
                }

                //区域配送 存在相交的区域,以配送费低的区域价格来计算
                if ($local_info[ 'area_type' ] == 2) {
                    if (!empty($delivery_money_array)) {
                        $delivery_money = min($delivery_money_array);
                    }

                }
            }
        } else {
            //行政区域配送

            if ($data['exchange_info'][ 'price' ] >= $local_info[ 'start_money' ]) {

                $district_id = $data[ 'member_address' ][ 'district_id' ];//区县地域id
                $area_array = $local_info[ 'area_array' ];
                if (in_array($district_id, $area_array)) {
                    //启用阶梯价 的话  也是必须要具体坐标的
                    if ($local_info[ 'is_open_step' ] == 1) {

                        if ($data[ 'member_address' ][ 'longitude' ] == 0 && $data[ 'member_address' ][ 'latitude' ] == 0) {
                            return $this->error([ 'code' => $error_code ], '当前配送地址没有配置定位坐标');
                        }

                        $is_delivery = true;
                        $shop_longitude = $shop_info[ 'longitude' ];
                        $shop_latitude = $shop_info[ 'latitude' ];
                        $longitude = $data[ 'member_address' ][ 'longitude' ];
                        $latitude = $data[ 'member_address' ][ 'latitude' ];

                        $distance = $this->getDistance($latitude, $longitude, $shop_latitude, $shop_longitude);
                        if ($distance <= $local_info[ 'start_distance' ]) {//是否在起送距离以内
                            $delivery_money = $local_info[ 'start_delivery_money' ];
                        } else {
                            $diff_distance = $distance - $local_info[ 'start_distance' ];//减去起送距离 求得差
                            $delivery_money = $local_info[ 'start_delivery_money' ] + ceil($diff_distance / $local_info[ 'continued_distance' ]) * $local_info[ 'continued_delivery_money' ];
                        }


                    } else {
                        $is_delivery = true;
                        $delivery_money = $local_info[ 'delivery_money' ];
                    }
                } else {
                    $distance_error++;//配送距离错误
                }

            } else {
                $start_price_error++;//起送价错误
                $start_money_array[] = $local_info[ 'start_money' ];
            }
        }

        if ($is_delivery) {
            $return_result = array (
                "delivery_money" => $delivery_money,
            );
            if ($time_error > 0) {
                $return_result[ 'code' ] = 1;
                $return_result[ 'error' ] = $error;
            }
            return $this->success($return_result);
        } else {
            if ($distance_error > 0) {
                $error = '当前配送地址与商家距离过远,需重新选择可配送的配送地址';
                $error_code = 10;
            } else if ($start_price_error > 0) {
                $error = '当前商品金额尚不满足商家配送的最低起送价格';
                $error_code = 11;
            }
            return $this->error([ 'code' => $error_code ], $error);
        }

    }
}