<?php
/**
 * Niushop商城系统 - 团队十年电商经验汇集巨献!
 * =========================================================
 * Copy right 2019-2029 杭州牛之云科技有限公司, 保留所有权利。
 * ----------------------------------------------
 * 官方网址: https://www.niushop.com
 * =========================================================
 */

namespace app\model\express;

use app\model\BaseModel;
use app\model\shop\Shop;
use app\model\store\Store;

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

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

    /**
     * 删除站点外卖配送 (通常删除站点会用到)
     * @param $condition
     * @return array
     */
    public function deleteLocal($condition)
    {
        $res = model('local')->delete($condition);
        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' ] : '';
        $store_id = isset($check_condition[ 'store_id' ]) ? $check_condition[ 'store_id' ] : 0;

        $info = model('local')->getInfo($condition, $field);
        if (empty($info)) {
            $local_data = array (
                'site_id' => $site_id,
                'store_id' => $store_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;
            if (empty($info[ 'delivery_time' ])) {
                $info[ 'delivery_time' ] = [
                    [ 'start_time' => $info[ 'start_time' ], 'end_time' => $info[ 'end_time' ] ]
                ];
            } else {
                $info[ 'delivery_time' ] = json_decode($info[ 'delivery_time' ], true);
            }
        }
        return $this->success($info);
    }

    /**
     * 获取站点外卖配送列表
     * @param array $condition
     * @param string $field
     * @param string $order
     * @param null $limit
     * @return array
     */
    public function getLocalList($condition = [], $field = '*', $order = '', $limit = null)
    {
        $list = model('local')->getList($condition, $field, $order, '', '', '', $limit);
        return $this->success($list);
    }

    /**
     * 获取站点外卖配送分页列表
     * @param array $condition
     * @param int $page
     * @param int $page_size
     * @param string $order
     * @param string $field
     * @return array
     */
    public function getLocalPageList($condition = [], $page = 1, $page_size = PAGE_LIST_ROWS, $order = '', $field = '*')
    {
        $list = model('local')->pageList($condition, $field, $order, $page, $page_size);
        return $this->success($list);
    }

    /**
     * 计算费用
     * @param $shop_goods
     * @param $data
     * @return array
     */
    public function calculate($shop_goods, $data)
    {
        $site_id = $data[ 'site_id' ];
        $local_condition = array (
            [ 'site_id', '=', $site_id ]
        );
        $store_id = $data[ 'store_id' ] ?? 0;
        //todo  应该判断一下是否有门店运营插件
        if (!addon_is_exit('store')) {
            $store_id = 0;
        }
        if ($store_id > 0) $local_condition[] = [ 'store_id', '=', $store_id ];
        $local_info_result = $this->getLocalInfo($local_condition);
        $local_info = $local_info_result[ 'data' ];
        if (empty($local_info)) return $this->error('', '没有可以配送的门店');

        $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 = '配送时间不在营业时间内';
                }
            }
        }
        if ($store_id == 0) {
            $shop_model = new Shop();
            $shop_info = $shop_model->getShopInfo([ [ 'site_id', '=', $site_id ] ])[ 'data' ] ?? [];
        } else {
            $store_model = new Store();
            $shop_info = $store_model->getStoreInfo([ [ 'site_id', '=', $site_id ], [ 'store_id', '=', $store_id ] ])[ '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' ];//减去起送距离 求得差
                    if ($local_info[ 'continued_distance' ] == 0) return $this->error([ 'code' => $error_code ], '当前配送地址不支持配送');
                    $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) {
            if ($delivery_money > 0) {
                $man_type = $local_info[ 'man_type' ];
                $man_money = $local_info[ 'man_money' ];
                switch ( $man_type ) {
                    case 'free':
                        if ($shop_goods[ 'goods_money' ] >= $man_money) {
                            $delivery_money = 0;
                        }
                        break;
                    case 'discount':
                        if ($shop_goods[ 'goods_money' ] >= $man_money) {
                            $man_discount = $local_info[ 'man_discount' ];
                            $delivery_money -= $man_discount;
                            $delivery_money = $delivery_money < 0 ? 0 : $delivery_money;
                        }
                        break;
                }

            }
            $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 && !isset($data[ 'unlimited_start_money' ])) {
                $error = '当前商品金额尚不满足商家配送的最低起送价格';
                $error_code = 11;
            }
            return $this->error([ 'code' => $error_code, 'start_money_array' => $start_money_array ], $error);
        }

    }

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

        $distance_error = 0;//配送距离错误
        $error_code = 12;

        $is_delivery = false;

        if ($local_info[ 'area_type' ] == 1 || $local_info[ 'area_type' ] == 2) {
            if ($data[ 'longitude' ] == 0 && $data[ 'latitude' ] == 0) {
                return $this->error([ 'code' => $error_code ], '超出配送范围');
            }
            $longitude = $data[ 'longitude' ];
            $latitude = $data[ '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[ '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[ 'longitude' ] == 0 && $data[ 'latitude' ] == 0) {
                        return $this->error([ 'code' => $error_code ], '超出配送范围');
                    }
                    $is_delivery = true;
                } else {
                    $is_delivery = true;
                }
            } else {
                $distance_error++;//配送距离错误
            }
        }
        if (!$is_delivery && $distance_error) {
            $error = '超出配送范围';
            return $this->error([ 'code' => $error_code ], $error);
        }
        return $this->success(1);

    }

    /**
     * 判断可用的区域
     * @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 $goods_info
     * @param $data
     * @return array
     */
    public function pointExchangeCalculate($goods_info, $data)
    {
        $local_condition = array (
            [ 'site_id', '=', $data[ 'site_id' ] ]
        );
        if (isset($data[ 'delivery' ][ 'store_id' ])) $local_condition[] = [ 'store_id', '=', $data[ 'delivery' ][ 'store_id' ] ];
        $local_info_result = $this->getLocalInfo($local_condition);
        $local_info = $local_info_result[ 'data' ];
        if (empty($local_info)) return $this->error('', '没有可以配送的门店');

        $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 (empty($data[ 'member_address' ])) {
                return $this->error([ 'code' => $error_code ], '请设置配送地址');
            }
            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,
                'start_money_array' => $start_money_array,
            );
            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 $site_id
     * @return array
     */
    public function checkIsCanTradeLocal($site_id)
    {
        $store = new Store();
        $default_store = $store->getStoreInfo([ [ 'site_id', '=', $site_id ], [ 'is_default', '=', 1 ] ], 'store_id')[ 'data' ] ?? [];
        $store_id = $default_store[ 'store_id' ] ?? 0;

        $local_info = $this->getLocalInfo([ [ 'site_id', '=', $site_id ], [ 'store_id', '=', $store_id ] ])[ 'data' ] ?? [];
        if (empty($local_info))
            return $this->error([], '您未完成起送金额、配送费 、配送区域等同城送配置项设置，需设置并提交保存后，才能开启同城配送开关。');

        //判断配置有没有配置完善
        $local_area_array = $local_info[ 'local_area_array' ];
        $area_array = $local_info[ 'area_array' ];
        if (empty($local_area_array) && empty($area_array))
            return $this->error([], '您未完成起送金额、配送费 、配送区域等同城送配置项设置，需设置并提交保存后，才能开启同城配送开关。');

        return $this->success();
    }
}