<?php

require('vendor/autoload.php');

use \PhpMqtt\Client\MqttClient;
use \PhpMqtt\Client\ConnectionSettings;

date_default_timezone_set("PRC");


function rlog(...$args)
{
    if (empty($args[0])) {
        return;
    }
    static $LOG_CONSOLE = false; //是否输出到控制台
    static $LOG_NAME = "school_mqtt.log"; //值为空时 不写入文件
    static $LOG_SIZE = 64 * 1024 * 1024; //文件最大尺寸

    static $LOG_CACHE = false; //是否缓存日志内容 用于批量写入文件
    static $CACHE_DURATION = 10; //缓存最大时间 秒
    static $CACHE_SIZE = 1024; //缓存大小
    static $cacheStartTime = 0;
    static $cacheBuf = '';

    static $LOG_TIMES = 10; //调用这个函数最大次数 超过次数后判断下文件大小
    static $logCount = 0;

    $buf = '';
    if (count($args) == 1 && $args[0] == "\n") { //只有换行时 不写入时间戳了
        $buf = "\n";
    } else {
        $pid = ''; //进程id
        if (function_exists('posix_getpid')) {
            $pid = ' ' . posix_getpid() . ' ';
        }
        $fileLine = ''; //文件名:行号
        {
            $debug = debug_backtrace();
            $fileLine = ($pid == '' ? ' ' : '') . basename($debug[0]['file']) . ':' . $debug[0]['line'] . ' ';
        }
        $buf = date("y-m-d H:i:s") . "{$pid}{$fileLine}" . implode(' ', $args) . "\n";
    }

    $logCount++;
    if (!empty($LOG_NAME)) {
        if ($LOG_CACHE) {
            $cacheBuf .= $buf;
            //超过缓存尺寸 或者 超过缓存时长 写缓存到文件
            if (strlen($cacheBuf) > $CACHE_SIZE || time() - $cacheStartTime > $CACHE_DURATION) {
                $cacheStartTime = time();
                goto write;
            } else {
                goto skipWrite;
            }
        } else {
            $cacheBuf = $buf;
        }
        write: {
            //超过尺寸后 删除旧文件 把新文件重命名为旧文件  多进程同时操作 不加锁问题不大
            if ($logCount > $LOG_TIMES && filesize($LOG_NAME) > $LOG_SIZE) {
                $oldLogName = $LOG_NAME . '.old';
                if (file_exists($oldLogName)) {
                    if (!unlink($oldLogName)) {
                        echo "unlink err\n";
                    }
                }
                if (!rename($LOG_NAME, $oldLogName)) {
                    echo "rename err\n";
                }
                $logCount = 0;
            }
            if (!file_put_contents($LOG_NAME, $cacheBuf, FILE_APPEND)) {
                echo "file_put_contents err\n";
            }
            $cacheBuf = '';
        }
        skipWrite: {
        }
    }
    if ($LOG_CONSOLE) {
        echo $buf;
    }
}

function http($url, $params, $header = [], $method = 'GET', $timeout = 10)
{
    // POST $params 字符串形式query=abcd&abc=12345
    //GET $params 数组['query' => 'abcd', 'abc' => 12345]
    //  $header[] = "Content-Type: application/x-www-form-urlencoded";
    //  $header[] = "Content-Type: application/soap+xml; charset=utf-8";
    //  $header[] = "Content-Type: application/json; charset=utf-8";
    //  $header[] = "Expect: ";
    rlog("[HTTP] url:$url,method:$method" . ",header:" . json_encode($header));
    if (strtoupper($method) == 'POST') {
        rlog("[POST] send params " . (!is_array($params) ? $params : json_encode($params, JSON_UNESCAPED_UNICODE)));
    } else {
        rlog("[GET] send " . json_encode($params));
    }
    $header[] = "Expect: ";
    $opts = array(
        CURLOPT_TIMEOUT => $timeout,
        CURLOPT_RETURNTRANSFER => 1,
        CURLOPT_SSL_VERIFYPEER => false,
        CURLOPT_SSL_VERIFYHOST => false,
        CURLOPT_HTTPHEADER => $header
    );

    /* 根据请求类型设置特定参数 */
    switch (strtoupper($method)) {
        case 'GET':
            $opts[CURLOPT_URL] = $url . (empty($params) ? '' : ('?' . http_build_query($params)));
            break;
        case 'POST':
            //$params = http_build_query($params);
            $opts[CURLOPT_URL] = $url;
            $opts[CURLOPT_POST] = 1;
            $opts[CURLOPT_POSTFIELDS] = json_encode($params);
            break;
        default:
            rlog("[ERR] method " . $method);
            return false;
    }

    global $ch; //curl长连接
    if (empty($ch)) {
        $ch = curl_init();
    }
    if (empty($ch)) {
        rlog("[ERR] curl_init");
        return false;
    }

    $csa = curl_setopt_array($ch, $opts);
    if (empty($csa)) {
        rlog("[ERR] curl_setopt_array");
        return false;
    }

    $data = curl_exec($ch);
    if ($data === false) {
        rlog("[ERR] curl_exec errno:" . curl_errno($ch) . " " . curl_error($ch));
        return false;
    }
    //unicode转中文
    $data = decodeUnicode($data);
    rlog("[HTTP] recv " . $data);
    //curl_close($ch);
    return $data;
}
function decodeUnicode($str)
{
    return preg_replace_callback('/\\\\u([0-9a-f]{4})/i', function ($matches) {
        return iconv("UCS-2BE", "UTF-8", pack("H*", $matches[1]));
    }, $str);
}
function devRegularInfo($topic, $msg)
{
    // {"CSQ":26,"REP_INT":60,"GPS":"112.14060,32.06532","IMEI":"867160049332715","IMSI":"460041872816952","CCID":"898607B8101980060659","SYS_VER":"RLSC_V0.1","Time":1676257143,"Status":0,"StatusMsg":"设备正常","Initiative":1}
    $data = json_decode($msg, true);
    if (empty($data)) {
        rlog("ERR", "json_decode");
        return;
    }
    rlog("[I]", $msg);
    $url = 'http://47.114.185.186:8115/api/trackReport';
    // $url .= http_build_query($column);
    http($url, $data, [], 'POST');
    $loc = explode(',', $data['GPS']);
    $column = [
        'csq' => $data['CSQ'] ?: '',
        'rep_int' => $data['REP_INT'] ?: '',
        'latitude' => isset($loc[0]) ? $loc[0] : '',
        'longitude' => isset($loc[1]) ? $loc[1] : '',
        'imei' => $data['IMEI'] ?: '',
        'imsi' => $data['IMSI'] ?: '',
        'iccid' => $data['ICCID'] ?: '',
        'version' => $data['SYS_VER'] ?: '',
        'time' => $data['Time'] ?: '',
        'status' => $data['Status'] ?: '',
        'status_msg' => $data['StatusMsg'] ?: '',
        'initiative' => $data['Initiative'] ?: ''
    ];

    $url = 'http://47.114.185.186:8115/rlapi/busHeartbeatData';
    // $url .= http_build_query($column);
    http($url, $column, [], 'POST');
}

function getUpDevSysMsg($topic, $msg)
{
    // {
    //     "IMEI": "867160049332715",
    //     "Mqtt_Host": "develop.rltest.cn",
    //     "Mqtt_Port": 1883,
    //     "Mqtt_User": " rl517",
    //     "Mqtt_Password": "rlian2022",
    //     "TTS_TEXT": "某某科技欢迎您",
    //     "GPS_EN": "0",
    //     "Time": 1676257143
    // }
    $arr = json_decode($msg, true);
    if (empty($arr)) {
        rlog("ERR", "json_decode");
        return;
    }
    $column = [
        'imei' => $arr['IMEI'],
        'mqtt_host' => $arr['Mqtt_Host'],
        'mqtt_port' => $arr['Mqtt_Port'],
        'mqtt_user' => $arr['Mqtt_User'],
        'mqtt_password' => $arr['Mqtt_Password'],
        'tts_text' => $arr['TTS_TEXT'],
        'gps_en' => $arr['GPS_EN'],
        'time' => $arr['Time']
    ];
    $url = 'http://47.114.185.186:8115/rlapi/busSysMsgData';
    // $url .= http_build_query($data);
    http($url, $column, [], 'POST');
}
function rcInfoMsg($topic, $msg)
{

    // {
    //     "IMEI": "867160049332715",
    //     "RC_Number": "867160049332715",
    //     "RC_Type": 1,
    //     "RC_Pres": 1,
    //     "RC_Total": 25,
    //     "GPS_X": "116.25"
    //     "GPS_Y": "29.36",
    //     "Msgid": "dkx12-15dss-ad567-1a2ss",
    //     "Time": 1676257143
    // }
    $arr = json_decode($msg, true);
    if (empty($arr)) {
        rlog("ERR", "json_decode");
        return;
    }
    $column = [
        'imei' => $arr['IMEI'],
        'rc_number' => $arr['RC_Number'],
        'rc_type' => $arr['RC_Type'],
        'rc_pres' => $arr['RC_Pres'],
        'rc_total' => $arr['RC_Total'],
        'gps_x' => $arr['GPS_X'],
        'gps_y' => $arr['GPS_Y'],
        'msgid' => $arr['Msgid'],
        'time' => $arr['Time']
    ];
    $url = 'http://47.114.185.186:8115/rlapi/busRcInfoData';
    // $url .= http_build_query($data);
    http($url, $column, [], 'POST');
}
function loop()
{
    $server   = 'develop.rltest.cn';
    $port     = 1883;
    $clientId = 'mqttx_f845f9b0';
    $username = 'rl517';
    $password = "rlian2022";
    $clean_session = true;

    $connectionSettings  = new ConnectionSettings();
    $connectionSettings = $connectionSettings
        ->setUsername($username)
        ->setPassword($password)
        ->setKeepAliveInterval(60)
        // Last Will 设置
        //        ->setLastWillTopic('emqx/test/last-will')
        //        ->setLastWillMessage('client disconnect')
        //        ->setLastWillQualityOfService(1)
    ;

    //include "RLog.php";
    //    $mqtt = new MqttClient($server, $port, $clientId, MqttClient::MQTT_3_1, null, new RLog());

    $mqtt = new MqttClient($server, $port, $clientId);

    $mqtt->connect($connectionSettings, $clean_session);
    rlog('INFO', "connect OK");

    /*
消息方向	设备->服务器 
设备主动上报当前设备公共信息参数：ScBusTem/DevRegularInfo
服务器获取设备系统信息后设备上传信息，即GetDevSysMsg的回应 ScBusTem/GetUpDevSysMsg 
服务器设置设备重量信息信息 ScBusTem/RCInfoMsg
*/
    //订阅心跳数据
    $mqtt->subscribe('RL4RSSI/devOntime', function ($topic, $message) {
        rlog("INFO", 'recv', $topic, $message);
        var_dump($message);
    }, 0);


    // $mqtt->subscribe('ScBusTem/GetDevSysMsg/*', function ($topic, $message) {
    //     rlog("INFO", 'recv', $topic, $message);
    //     getDevSysMsg($topic, $message);
    // }, 0);
    //终端上报系统信息数据
    $mqtt->subscribe('RL4RSSI/rfidinfos', function ($topic, $message) {
        rlog("INFO", 'recv', $topic, $message);
        var_dump($message);
    }, 0);
    $mqtt->loop(true);
}

while (1) {
    try {
        rlog('INFO', 'connect start');
        loop();
    } catch (\Exception $ex) {
        rlog("ERR", $ex->getTraceAsString());
        rlog("ERR", $ex->getMessage());
    }
    sleep(3);
}