| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484 |
- --[[
- @summary excloud扩展库
- @version 1.0
- @date 2025.09.22
- @author 孟伟
- @usage
- -- 应用场景
- 该扩展库适用于各种物联网设备(如4G/WiFi/以太网设备)与云端服务器进行数据交互的场景。
- 可用于设备状态上报、数据采集、远程控制等物联网应用。
- 实现的功能:
- 1. 支持多种设备类型(4G/WiFi/以太网)的接入认证
- 2. 提供TCP和MQTT两种传输协议选择
- 3. 实现设备与云端的双向通信(数据上报和命令下发)
- 4. 支持数据的TLV格式编解码
- 5. 提供自动重连机制,保证连接稳定性
- 6. 支持不同数据类型(整数、浮点数、布尔值、字符串、二进制等)的传输
- -- 用法实例
- 本扩展库对外提供了以下6个接口:
- 1. excloud.setup(params) - 设置配置参数
- 2. excloud.on(cbfunc) - 注册回调函数
- 3. excloud.open() - 开启excloud服务
- 4. excloud.send(data, need_reply, is_auth_msg) - 发送数据
- 5. excloud.close() - 关闭excloud服务
- 6. excloud.status() - 获取当前状态
- 7. excloud.start_heartbeat(interval, custom_data) - 启动自动心跳机制,定期向云平台发送心跳消息;
- 8. excloud.stop_heartbeat() -停止自动心跳机制;
- 9. excloud.upload_image(file_path, file_name) -上传图片文件到云平台;注意,需要启用getip服务
- 10. excloud.upload_audio(file_path, file_name) -上传音频文件到云平台;注意,需要启用getip服务
- 11. excloud.get_server_info() - 获取getip获取的服务器信息
- 12. excloud.mtn_log(tag, ...) - 记录运维日志;
- ]]
- local excloud = {}
- local httpplus = require "httpplus"
- local exmtn = require "exmtn"
- local config = {
- device_type = 1, -- 默认设备类型: 4G
- device_id = "", -- 设备ID
- protocol_version = 1, -- 协议版本
- transport = "", -- 传输协议: tcp/mqtt
- host = "", -- 服务器地址
- port = nil, -- 服务器端口
- auth_key = nil, -- 用户鉴权密钥
- keepalive = 300, -- mqtt心跳
- auto_reconnect = true, -- 是否自动重连
- reconnect_interval = 10, -- 重连间隔(秒)
- max_reconnect = 3, -- 最大重连次数
- timeout = 30, -- 连接超时时间(秒)
- qos = 0, -- MQTT QoS等级
- retain = 0, -- MQTT retain标志
- clean_session = true, -- MQTT clean session标志
- ssl = false, -- 是否使用SSL
- username = nil, -- MQTT用户名
- password = nil, -- MQTT密码
- udp_auth_key = nil, -- UDP鉴权密钥
- -- 新增socket配置参数
- local_port = nil, -- 本地端口号,nil表示自动分配
- keep_idle = nil, -- TCP keepalive idle时间(秒)
- keep_interval = nil, -- TCP keepalive 探测间隔(秒)
- keep_cnt = nil, -- TCP keepalive 探测次数
- server_cert = nil, -- 服务器CA证书数据
- client_cert = nil, -- 客户端证书数据
- client_key = nil, -- 客户端私钥数据
- client_password = nil, -- 客户端私钥口令
- use_getip = true, -- 是否使用getip服务发现,默认为true
- -- MQTT扩展参数
- -- mqtt_rx_size = 32 * 1024, -- MQTT接收缓冲区大小,默认32K
- -- mqtt_conn_timeout = 30, -- MQTT连接超时时间
- -- mqtt_ipv6 = false, -- 是否使用IPv6连接
- -- getip相关配置
- getip_url = "https://gps.openluat.com/iam/iot/getip", -- 根据协议修正URL
- current_conninfo = {}, -- 当前连接信息
- current_imginfo = nil, -- 当前图片上传信息
- current_audinfo = nil, -- 当前音频上传信息
- current_mtninfo = nil, -- 新增:运维日志上传信息
- getip_retry_count = 0, -- getip重试次数
- max_getip_retry = 3, -- 最大getip重试次数
- -- 虚拟设备相关配置
- virtual_phone_number = nil, -- 手机号
- virtual_serial_num = 0, -- 序列号(0-999)
- -- 运维日志配置
- mtn_log_enabled = false, -- 是否启用运维日志
- aircloud_mtn_log_enabled = false, -- 是否启用aircloud运维日志:true-开启,false-关闭;开启后设备认证/重连等关键事件会自动记录到运维日志文件,便于云端统一收集分析
- mtn_log_blocks = 1, -- 每个文件的块数
- mtn_log_write_way = exmtn.CACHE_WRITE, -- 写入方式
- }
- local callback_func = nil -- 回调函数
- local is_open = false -- 服务是否开启
- local is_connected = false -- 是否已连接
- local is_authenticated = false -- 是否已鉴权
- local sequence_num = 1 -- 流水号
- -- 辅助函数:构建multipart/form-data请求体
- local function build_multipart_form_data(forms, files)
- local boundary = "----WebKitFormBoundary" .. tostring(os.time())
- local body = {}
- -- 添加表单数据
- if forms then
- for k, v in pairs(forms) do
- table.insert(body, "--" .. boundary .. "\r\n")
- table.insert(body, string.format("Content-Disposition: form-data; name=\"%s\"\r\n\r\n", k))
- table.insert(body, tostring(v) .. "\r\n")
- end
- end
- -- 添加文件数据
- if files then
- for k, file_path in pairs(files) do
- local fd = io.open(file_path, "rb")
- if fd then
- local file_content = fd:read("*a")
- fd:close()
- local file_name = file_path:match("[^/\\]+$" or "")
- local content_type = "application/octet-stream"
- -- 根据文件扩展名设置Content-Type
- local ext = file_name:match("%.(%w+)$" or ""):lower()
- local content_types = {
- txt = "text/plain",
- jpg = "image/jpeg",
- jpeg = "image/jpeg",
- png = "image/png",
- gif = "image/gif",
- mp3 = "audio/mpeg",
- wav = "audio/wav",
- json = "application/json",
- html = "text/html"
- }
- if content_types[ext] then
- content_type = content_types[ext]
- end
- table.insert(body, "--" .. boundary .. "\r\n")
- table.insert(body, string.format("Content-Disposition: form-data; name=\"%s\"; filename=\"%s\"\r\n", k, file_name))
- table.insert(body, "Content-Type: " .. content_type .. "\r\n\r\n")
- table.insert(body, file_content .. "\r\n")
- end
- end
- end
- -- 添加结束边界
- table.insert(body, "--" .. boundary .. "--\r\n")
- return table.concat(body), boundary
- end
- local connection = nil -- 连接对象
- local device_id_binary = nil -- 二进制格式的设备ID
- local reconnect_timer = nil -- 重连定时器
- local reconnect_count = 0 -- 重连次数
- local pending_messages = {} -- 待发送消息队列
- local rxbuff = nil -- 接收缓冲区
- local connect_timeout_timer = nil -- 连接超时定时器
- local heartbeat_timer = nil -- 心跳定时器
- local heartbeat_interval = 300 -- 心跳间隔(秒),默认5分钟
- local heartbeat_data = {} -- 心跳数据,默认空表
- local is_heartbeat_running = false -- 心跳是否正在运行
- local is_mtn_log_uploading = false -- 运维日志是否正在上传
- -- 数据类型定义
- local DATA_TYPES = {
- INTEGER = 0x0, -- 整数
- FLOAT = 0x1, -- 浮点数
- BOOLEAN = 0x2, -- 布尔值
- ASCII = 0x3, -- ASCII字符串
- BINARY = 0x4, -- 二进制数据
- UNICODE = 0x5 -- Unicode字符串
- }
- -- 字段含义定义
- local FIELD_MEANINGS = {
- -- 控制信令类型 (16-255)
- AUTH_REQUEST = 16, -- 鉴权请求
- AUTH_RESPONSE = 17, -- 鉴权回复
- REPORT_RESPONSE = 18, -- 上报回应
- CONTROL_COMMAND = 19, -- 控制命令
- CONTROL_RESPONSE = 20, -- 控制回应
- IRTU_DOWN = 21, -- iRTU下行命令
- IRTU_UP = 22, -- iRTU上行回复
- -- 文件上传控制信令 (23-24)
- FILE_UPLOAD_START = 23, -- 文件上传开始通知
- FILE_UPLOAD_FINISH = 24, -- 文件上传完成通知
- -- 运维日志控制信令 (25-27)
- MTN_LOG_UPLOAD_REQ_SIGNAL = 25, -- 运维日志上传请求 - 下行(信令类型)
- MTN_LOG_UPLOAD_RESP_SIGNAL = 26, -- 运维日志上传响应 - 上行(信令类型)
- MTN_LOG_UPLOAD_STATUS_SIGNAL = 27, -- 运维日志上传状态 - 上行(信令类型)
- -- 传感类 (256-511)
- TEMPERATURE = 256, -- 温度
- HUMIDITY = 257, -- 湿度
- PARTICULATE = 258, -- 颗粒数
- ACIDITY = 259, -- 酸度
- ALKALINITY = 260, -- 碱度
- ALTITUDE = 261, -- 海拔
- WATER_LEVEL = 262, -- 水位
- ENV_TEMPERATURE = 263, -- CPU温度/环境温度
- POWER_METERING = 264, -- 电量计量
- -- 资产管理类 (512-767)
- GNSS_LONGITUDE = 512, -- GNSS经度
- GNSS_LATITUDE = 513, -- GNSS纬度
- SPEED = 514, -- 行驶速度
- GNSS_CN = 515, -- 最强的4颗GNSS卫星的CN
- SATELLITES_TOTAL = 516, -- 搜到的所有卫星数
- SATELLITES_VISIBLE = 517, -- 可见卫星数
- HEADING = 518, -- 航向角
- LOCATION_METHOD = 519, -- 基站定位/GNSS定位标识
- GNSS_INFO = 520, -- GNSS芯片型号和固件版本号
- DIRECTION = 521, -- 方向
- -- 设备参数类 (768-1023)
- HEIGHT = 768, -- 高度
- WIDTH = 769, -- 宽度
- ROTATION_SPEED = 770, -- 转速
- BATTERY_LEVEL = 771, -- 电量(mV)
- SERVING_CELL = 772, -- 驻留频段
- CELL_INFO = 773, -- 驻留小区和邻区
- COMPONENT_MODEL = 774, -- 元器件型号
- GPIO_LEVEL = 775, -- GPIO高低电平
- BOOT_REASON = 776, -- 开机原因
- BOOT_COUNT = 777, -- 开机次数
- SLEEP_MODE = 778, -- 休眠模式
- WAKE_INTERVAL = 779, -- 定时唤醒间隔
- NETWORK_IP_TYPE = 780, -- 设备入网的IP类型
- NETWORK_TYPE = 781, -- 当前联网方式
- SIGNAL_STRENGTH_4G = 782, --4G信号强度
- SIM_ICCID = 783, -- SIM卡ICCID
- -- 文件上传业务字段 (784-787)
- FILE_UPLOAD_TYPE = 784, -- 文件上传类型(1:图片, 2:音频)
- FILE_NAME = 785, -- 文件名称
- FILE_SIZE = 786, -- 文件大小
- UPLOAD_RESULT_STATUS = 787, -- 上传结果状态
- -- 运维日志业务字段 (788-792)
- MTN_LOG_FILE_INDEX = 788, -- 运维日志文件序号
- MTN_LOG_FILE_TOTAL = 789, -- 运维日志文件总数
- MTN_LOG_FILE_SIZE = 790, -- 运维日志文件大小
- MTN_LOG_UPLOAD_STATUS_FIELD = 791, -- 运维日志上传状态
- MTN_LOG_FILE_NAME = 792, -- 运维日志文件名称
- -- 工牌设备参数字段 (793-797) - 新增
- BADGE_TOTAL_DISK = 793, -- 工牌总磁盘空间
- BADGE_AVAILABLE_DISK = 794, -- 工牌剩余磁盘空间
- BADGE_TOTAL_MEM = 795, -- 工牌总内存
- BADGE_AVAILABLE_MEM = 796, -- 工牌剩余内存
- BADGE_RECORD_COUNT = 797, -- 工牌录音数量
- -- 软件数据类 (1024-1279)
- LUA_CORE_ERROR = 1024, -- Lua核心库错误上报
- LUA_EXT_ERROR = 1025, -- Lua扩展卡错误上报
- LUA_APP_ERROR = 1026, -- Lua业务错误上报
- FIRMWARE_VERSION = 1027, -- 固件版本号
- SMS_FORWARD = 1028, -- SMS转发
- CALL_FORWARD = 1029, -- 来电转发
- -- 设备无关数据类 (1280-1535)
- TIMESTAMP = 1280, -- 时间
- RANDOM_DATA = 1281 -- 无意义数据
- }
- -- 运维日志上传状态
- local MTN_LOG_STATUS = {
- START = 0, -- 开始上传
- SUCCESS = 1, -- 上传成功
- FAILED = 2 -- 上传失败
- }
- -- 将数字转换为大端字节序列
- local function to_big_endian(num, bytes)
- local result = {}
- for i = bytes, 1, -1 do
- result[i] = string.char(num % 256)
- num = math.floor(num / 256)
- end
- return table.concat(result)
- end
- -- 从大端字节序列转换为数字
- local function from_big_endian(data, start, length)
- local value = 0
- for i = start, start + length - 1 do
- value = value * 256 + data:byte(i)
- end
- -- log.info("[excloud]from_big_endian", value)
- return value
- end
- -- 将设备ID进行编码
- local function packDeviceInfo(deviceType, deviceId)
- -- 验证设备类型
- if deviceType ~= 1 and deviceType ~= 2 and deviceType ~= 9 then
- log.info("[excloud]设备类型错误: 4G设备应为1, WIFI设备应为2")
- end
- -- 设备类型字节
- local result = { string.char(deviceType) }
- -- 清理设备ID(移除非数字和字母字符,并转换为大写)
- local cleanId = deviceId:gsub("[^%w]", ""):upper()
- -- 处理不同类型的设备ID
- if deviceType == 1 then
- -- 4G设备 - IMEI处理
- -- 只取前14位数字,忽略第15位
- cleanId = cleanId:gsub("%D", ""):sub(1, 14)
- -- 确保长度为14位(不足时前面补0)
- if #cleanId < 14 then
- cleanId = string.rep("0", 14 - #cleanId) .. cleanId
- end
- -- 转换为BCD格式的字节
- for i = 1, 14, 2 do
- local byte = (tonumber(cleanId:sub(i, i)) * 16) + tonumber(cleanId:sub(i + 1, i + 1))
- table.insert(result, string.char(byte))
- end
- elseif deviceType == 2 then
- -- WIFI设备 - MAC地址处理
- -- 移除非十六进制字符
- cleanId = cleanId:gsub("[^0-9A-Fa-f]", "")
- -- 确保长度为12个十六进制字符(6字节)
- if #cleanId < 12 then
- cleanId = string.rep("0", 12 - #cleanId) .. cleanId
- else
- cleanId = cleanId:sub(1, 12)
- end
- -- 转换为字节
- local bytes = {}
- for i = 1, 12, 2 do
- local byteStr = cleanId:sub(i, i + 1)
- table.insert(bytes, string.char(tonumber(byteStr, 16)))
- end
- -- 确保有7个字节(不足时前面补0)
- while #bytes < 7 do
- table.insert(bytes, 1, string.char(0))
- end
- -- 添加到结果中
- for _, byte in ipairs(bytes) do
- table.insert(result, byte)
- end
- elseif deviceType == 9 then
- -- 虚拟设备处理:11位手机号 + 3位序列号
- cleanId = cleanId:gsub("%D", ""):sub(1, 14)
- if #cleanId < 14 then
- cleanId = string.rep("0", 14 - #cleanId) .. cleanId
- end
- -- 转换为BCD格式的字节(每2位数字转换为1个字节)
- for i = 1, 14, 2 do
- local byte = (tonumber(cleanId:sub(i, i)) * 16) + tonumber(cleanId:sub(i + 1, i + 1))
- table.insert(result, string.char(byte))
- end
- else
- log.info("[excloud]未知设备类型 ")
- return deviceId
- end
- -- 返回8字节的二进制数据
- return table.concat(result)
- end
- -- 编码数据值
- local function encode_value(data_type, value)
- -- 添加参数类型检查
- if data_type == nil or value == nil then
- log.info("[excloud]Data type or value is nil")
- return ""
- end
- if data_type == DATA_TYPES.INTEGER then
- -- 验证value是否为数字
- if type(value) ~= "number" then
- log.info("[excloud]Integer value must be a number")
- return ""
- end
- return to_big_endian(math.floor(value), 4)
- elseif data_type == DATA_TYPES.FLOAT then
- -- 验证value是否为数字
- if type(value) ~= "number" then
- log.info("[excloud]Float value must be a number")
- return ""
- end
- -- 简化处理:将浮点数转换为整数,乘以1000以保留三位小数
- return to_big_endian(math.floor(value * 1000), 4)
- elseif data_type == DATA_TYPES.BOOLEAN then
- return value and "\1" or "\0"
- elseif data_type == DATA_TYPES.ASCII or data_type == DATA_TYPES.BINARY or data_type == DATA_TYPES.UNICODE then
- -- 确保value是字符串类型
- return tostring(value)
- else
- log.info("[excloud]Unsupported data type: " .. tostring(data_type))
- -- 返回空字符串而不是nil,避免后续处理出错
- return ""
- end
- end
- -- 解码数据值
- local function decode_value(data_type, value)
- if data_type == DATA_TYPES.INTEGER then
- return from_big_endian(value, 1, #value)
- elseif data_type == DATA_TYPES.FLOAT then
- -- 简化处理:将整数转换为浮点数(实际应使用IEEE 754格式)
- return from_big_endian(value, 1, #value) / 1000
- elseif data_type == DATA_TYPES.BOOLEAN then
- return value:byte(1) ~= 0
- elseif data_type == DATA_TYPES.ASCII then
- return value
- elseif data_type == DATA_TYPES.BINARY then
- return value
- elseif data_type == DATA_TYPES.UNICODE then
- return value
- else
- log.info("[excloud]Unsupported data type: " .. data_type)
- return nil
- end
- end
- -- 构建消息头
- -- @param need_reply boolean 是否需要服务器回复
- -- @param has_auth_key boolean 是否携带鉴权key
- -- @param data_length number 数据长度
- local function build_header(need_reply, is_udp_transport, data_length)
- sequence_num = sequence_num + 1
- if sequence_num > 65535 then
- sequence_num = 1
- end
- -- 消息标识字段
- local flags = config.protocol_version -- bit0-3: 协议版本号
- if need_reply then
- flags = flags + 16 -- bit4: 是否需要回复
- end
- if is_udp_transport then
- flags = flags + 32 -- bit5: 是否是UDP承载
- end
- log.info("[excloud]构建消息头", device_id_binary, to_big_endian(sequence_num, 2), to_big_endian(data_length, 2),
- to_big_endian(flags, 4))
- return device_id_binary ..
- to_big_endian(sequence_num, 2) ..
- to_big_endian(data_length, 2) ..
- to_big_endian(flags, 4)
- end
- -- 构建TLV字段
- local function build_tlv(field_meaning, data_type, value)
- if field_meaning == nil or data_type == nil or value == nil then
- log.info("[excloud]构建tlv参数不能为空")
- return false
- end
- local value_encoded = encode_value(data_type, value)
- if value_encoded == nil then
- log.info("[excloud]构建tlv打包数据时长度为0")
- -- 添加空字符串作为默认值,避免后续获取长度时出错
- value_encoded = ""
- end
- local length = #value_encoded
- -- 字段类型(字段含义 + 数据类型)
- local head = (field_meaning & 0x0FFF) | (data_type << 12) -- 2 字节头
- return true, to_big_endian(head, 2) ..
- to_big_endian(length, 2) ..
- value_encoded
- end
- -- 解析消息头
- local function parse_header(header)
- if #header < 16 then
- log.info("[excloud]消息头解析失败", "Header too short")
- return nil, "Header too short"
- end
- local device_id = header:sub(1, 8)
- local seq_num = from_big_endian(header, 9, 2)
- local msg_length = from_big_endian(header, 11, 2)
- local flags = from_big_endian(header, 13, 4)
- -- 提取标志位
- local protocol_version = flags % 16
- local need_reply = (flags % 32) >= 16
- local is_udp_transport = (flags % 64) >= 32
- -- 打印解析结果,方便调试
- -- log.info("[excloud]消息头解析结果",
- -- string.format(
- -- "device_id: %s, sequence_num: %d, msg_length: %d, protocol_version: %d, need_reply: %s, is_udp_transport: %s",
- -- string.toHex(device_id), seq_num, msg_length, protocol_version,
- -- tostring(need_reply), tostring(is_udp_transport)))
- return {
- device_id = string.toHex(device_id),
- sequence_num = seq_num,
- msg_length = msg_length,
- protocol_version = protocol_version,
- need_reply = need_reply,
- is_udp_transport = is_udp_transport
- }
- end
- -- 工具函数:解析TLV
- local function parse_tlv(data, startPos)
- -- 检查数据是否足够解析TLV的T的长度。
- if #data < startPos + 3 then
- return nil, startPos, "TLV data too short"
- end
- local fieldType = from_big_endian(data, startPos, 2)
- local length = from_big_endian(data, startPos + 2, 2)
- -- 提取原始字节值
- local value = data:sub(startPos + 4, startPos + 4 + length - 1)
- --解析TLV字段中的T
- -- bit0-11: 字段含义
- -- bit12-15: 数据类型
- local field_meaning = fieldType & 0x0FFF -- 取低12位作为字段含义
- local data_type = fieldType >> 12 -- 取高4位作为数据类型
- local decoded_value = decode_value(data_type, value)
- -- log.info("[excloud]消息体解析结果", field_meaning, data_type, decoded_value)
- return {
- field = field_meaning,
- type = data_type,
- value = decoded_value,
- length = length, --数据长度
- }, startPos + 4 + length
- end
- -- 解析完整消息
- local function parse_message(data)
- local header, err = parse_header(data:sub(1, 16))
- if not header then
- return nil, err
- end
- local auth_key = nil
- local body_start = 17
- -- 如果是UDP传输,解析认证key
- if header.is_udp_transport then
- if #data >= body_start + 64 - 1 then
- auth_key = data:sub(body_start, body_start + 64 - 1)
- body_start = body_start + 64
- else
- return nil, "Incomplete UDP authentication key"
- end
- end
- -- 解析TLV字段
- local tlvs = {}
- local pos = body_start
- local end_pos = 16 + (header.msg_length)
- if #data < end_pos then
- return nil, "Message incomplete"
- end
- while pos < end_pos do
- local tlv, new_pos, err = parse_tlv(data, pos)
- if not tlv then
- return nil, "Failed to parse TLV at position " .. err
- end
- table.insert(tlvs, tlv)
- -- 更新解析位置为解析完当前TLV字段后的新位置,以便继续解析后续的TLV字段
- pos = new_pos
- end
- return {
- header = header,
- auth_key = auth_key,
- tlvs = tlvs
- }
- end
- -- 发送鉴权请求
- local function send_auth_request()
- if not config.auth_key then
- return false, "No auth key configured"
- end
- local auth_data
- --设备实测时打开
- if config.device_type == 1 then
- auth_data = config.auth_key .. "-" .. mobile.imei() .. "-" .. mobile.muid()
- elseif config.device_type == 2 then
- auth_data = config.auth_key .. "-" .. wlan.getMac(nil, true) .. "-" .. mcu.unique_id():toHex()
- elseif config.device_type == 9 then --虚拟设备
- auth_data = config.auth_key .. "-" .. config.device_id
- else
- auth_data = config.auth_key .. "-"
- end
- local message = {
- {
- field_meaning = FIELD_MEANINGS.AUTH_REQUEST,
- data_type = DATA_TYPES.ASCII,
- value = auth_data
- }
- }
- -- log.info("[excloud]send auth request", message,message[1].value,message[1].data_type,message[1].field_meaning)
- return excloud.send(message, true, true) -- 鉴权消息需要设置 is_auth_msg 为 true
- end
- -- 处理认证响应
- -- local function handle_auth_response(tlvs)
- -- for _, tlv in ipairs(tlvs) do
- -- if tlv.field_meaning == FIELD_MEANINGS.AUTH_RESPONSE then
- -- local success = (tlv.value == "OK" or tlv.value == "SUCCESS")
- -- is_authenticated = true
- -- -- 记录认证结果到运维日志
- -- if config.aircloud_mtn_log_enabled then
- -- exmtn.log("info", "aircloud","auth", "认证结果", "success", success, "message", tlv.value)
- -- end
- -- if callback_func then
- -- callback_func("auth_result", {
- -- success = success,
- -- message = tlv.value
- -- })
- -- end
- -- -- 认证成功,发送待处理消息
- -- if success then
- -- for _, msg in ipairs(pending_messages) do
- -- excloud.send(msg.data, msg.need_reply)
- -- end
- -- pending_messages = {}
- -- end
- -- return success
- -- end
- -- end
- -- return false
- -- end
- -- 初始化运维日志模块
- local function init_mtn_log()
- if not config.mtn_log_enabled then
- log.info("[excloud]aircloud运维日志功能已禁用")
- return true
- end
- local ok, err = exmtn.init(config.mtn_log_blocks, config.mtn_log_write_way)
- if not ok then
- log.error("[excloud]运维日志初始化失败:", err)
- return false, err
- end
- log.info("[excloud]运维日志初始化成功")
- return true
- end
- -- 扫描运维日志文件
- local function scan_mtn_log_files()
- local log_files = {}
- -- 使用exmtn管理的文件信息
- for i = 1, 4 do -- exmtn管理4个日志文件
- local file_path = string.format("/hzmtn%d.trc", i)
- if io.exists(file_path) then
- local file_size = io.fileSize(file_path)
- if file_size > 0 then
- table.insert(log_files, {
- name = string.format("hzmtn%d.trc", i),
- path = file_path,
- size = file_size,
- index = i
- })
- log.info("发现运维日志文件", "路径:", file_path, "大小:", file_size, "序号:", i)
- else
- log.info("运维日志文件为空", "路径:", file_path)
- end
- else
- log.info("运维日志文件不存在", "路径:", file_path)
- end
- end
- -- 按文件序号排序
- table.sort(log_files, function(a, b)
- return a.index < b.index
- end)
- log.info("扫描运维日志文件完成", "有效文件数量:", #log_files)
- return log_files
- end
- -- 构建运维日志响应TLV数据
- local function build_mtn_log_response_tlv(total_files, latest_index)
- local sub_tlvs = ""
- -- 文件总数
- local success, tlv_data = build_tlv(FIELD_MEANINGS.MTN_LOG_FILE_TOTAL, DATA_TYPES.INTEGER, total_files)
- if success then
- sub_tlvs = sub_tlvs .. tlv_data
- else
- log.error("构建文件总数TLV失败")
- return ""
- end
- -- 当前最新文件序号
- success, tlv_data = build_tlv(FIELD_MEANINGS.MTN_LOG_FILE_INDEX, DATA_TYPES.INTEGER, latest_index)
- if success then
- sub_tlvs = sub_tlvs .. tlv_data
- else
- log.error("构建最新文件序号TLV失败")
- return ""
- end
- log.info("构建运维日志响应TLV", "文件总数:", total_files, "最新序号:", latest_index)
- return sub_tlvs
- end
- -- 发送运维日志上传状态
- local function send_mtn_log_status(status, file_index, file_name, file_size)
- local sub_tlvs = ""
- -- 上传状态(必须)
- local success, tlv_data = build_tlv(FIELD_MEANINGS.MTN_LOG_UPLOAD_STATUS_FIELD, DATA_TYPES.INTEGER, status)
- if success then
- sub_tlvs = sub_tlvs .. tlv_data
- else
- log.error("构建运维日志上传状态TLV失败")
- return false, "构建状态TLV失败"
- end
- -- 文件序号
- success, tlv_data = build_tlv(FIELD_MEANINGS.MTN_LOG_FILE_INDEX, DATA_TYPES.INTEGER, file_index)
- if success then
- sub_tlvs = sub_tlvs .. tlv_data
- else
- log.error("构建文件序号TLV失败")
- return false, "构建文件序号TLV失败"
- end
- -- 根据状态添加不同的字段
- if status == MTN_LOG_STATUS.START then
- -- 开始上传:包含文件名
- if file_name then
- success, tlv_data = build_tlv(FIELD_MEANINGS.MTN_LOG_FILE_NAME, DATA_TYPES.ASCII, file_name)
- if success then
- sub_tlvs = sub_tlvs .. tlv_data
- else
- log.warn("构建文件名TLV失败,但继续发送状态")
- end
- else
- log.warn("开始上传状态缺少文件名")
- end
- elseif status == MTN_LOG_STATUS.SUCCESS then
- -- 上传成功:包含文件大小
- if file_size then
- success, tlv_data = build_tlv(FIELD_MEANINGS.MTN_LOG_FILE_SIZE, DATA_TYPES.INTEGER, file_size)
- if success then
- sub_tlvs = sub_tlvs .. tlv_data
- else
- log.warn("构建文件大小TLV失败,但继续发送状态")
- end
- else
- log.warn("上传成功状态缺少文件大小")
- end
- end
- -- 上传失败:只需要状态和序号
- -- 发送状态消息
- local ok, err_msg = excloud.send({
- {
- field_meaning = FIELD_MEANINGS.MTN_LOG_UPLOAD_STATUS_SIGNAL,
- data_type = DATA_TYPES.BINARY,
- value = sub_tlvs
- }
- }, false)
- if not ok then
- log.error("发送运维日志上传状态失败: " .. (err_msg or "未知错误"))
- return false, err_msg
- end
- log.info("运维日志上传状态发送成功",
- "状态:", status,
- "文件序号:", file_index,
- "文件名:", file_name or "N/A",
- "文件大小:", file_size or "N/A")
- return true
- end
- -- 上传运维日志文件
- local function upload_mtn_log_files()
- sys.taskInit(function()
- -- 设置上传标志位为true
- is_mtn_log_uploading = true
- local total_files = 4 -- 固定为4个日志文件
- local success_count = 0
- local failed_count = 0
- local processed_count = 0
- -- -- 通知开始上传
- -- if callback_func then
- -- callback_func("mtn_log_upload_start", {
- -- file_count = total_files
- -- })
- -- end
- -- 按顺序检查并上传每个日志文件
- for i = 1, 4 do
- local file_path = string.format("/hzmtn%d.trc", i)
- local file_name = string.format("/hzmtn%d.trc", i)
- -- 在上传前再次检查文件是否存在且不为空
- local file_size = io.fileSize(file_path)
- if file_size and file_size > 0 then
- processed_count = processed_count + 1
- -- 发送开始上传状态
- send_mtn_log_status(MTN_LOG_STATUS.START, i, file_name, file_size)
- log.info("[excloud]开始上传运维日志文件", "文件:", file_name, "大小:", file_size)
- -- 上传文件
- local success, err_msg = excloud.upload_mtnlog(file_path, file_name)
- if success then
- -- 发送上传成功状态
- log.info("运维日志文件上传成功", "文件:", file_name, "大小:", file_size)
- send_mtn_log_status(MTN_LOG_STATUS.SUCCESS, i, file_name, file_size)
- success_count = success_count + 1
- -- 记录上传成功的运维日志
- if config.aircloud_mtn_log_enabled then
- exmtn.log("info", "aircloud", "mtn_upload", "文件上传成功", "file", file_name, "size", file_size)
- end
- else
- -- 发送上传失败状态
- log.error("运维日志文件上传失败", "文件:", file_name, "错误:", err_msg)
- send_mtn_log_status(MTN_LOG_STATUS.FAILED, i, file_name, file_size)
- failed_count = failed_count + 1
- -- 记录上传失败的运维日志
- if config.aircloud_mtn_log_enabled then
- exmtn.log("info", "aircloud", "mtn_upload_error", "文件上传失败", "file", file_name, "error", err_msg)
- end
- end
- -- 通知上传进度
- if callback_func then
- callback_func("mtn_log_upload_progress", {
- current_file = processed_count,
- total_files = total_files,
- file_name = file_name,
- file_size = file_size,
- status = success and "success" or "failed",
- error_msg = err_msg
- })
- end
- else
- -- 文件不存在或为空,跳过上传
- log.info("运维日志文件不存在或为空,跳过上传", "文件:", file_name)
- end
- -- -- 文件间延迟,避免同时上传多个文件
- -- if i < 4 then
- -- sys.wait(2000)
- -- end
- end
- log.info("运维日志上传完成", "成功:", success_count, "失败:", failed_count, "总计:", processed_count)
- -- 记录上传完成日志
- if config.aircloud_mtn_log_enabled then
- exmtn.log("info", "aircloud", "mtn_upload", "运维日志上传完成", "success", success_count, "failed", failed_count,
- "total", processed_count)
- end
- -- 通知上传完成
- if callback_func then
- callback_func("mtn_log_upload_complete", {
- success_count = success_count,
- failed_count = failed_count,
- total_files = processed_count
- })
- end
- -- 上传完成,设置标志位为false
- is_mtn_log_uploading = false
- end)
- end
- -- 处理运维日志上传请求
- local function handle_mtn_log_upload_request()
- -- 检查是否正在上传,如果是则直接返回,抛弃新请求
- if is_mtn_log_uploading then
- log.info("[excloud]运维日志正在上传中,抛弃新的上传请求")
- return
- end
- local total_files = 4 -- 固定为4个日志文件
- local latest_index = 4 -- 最新序号固定为4
- if config.aircloud_mtn_log_enabled then
- exmtn.log("info", "aircloud", "cloud_cmd", "收到运维日志上传请求", "file_count", total_files)
- end
- log.info("开始处理运维日志上传请求", "文件总数:", total_files, "最新序号:", latest_index)
- -- 发送运维日志上传响应(信令26)- 在开始上传前发送
- local response_ok, err_msg = excloud.send({
- {
- field_meaning = FIELD_MEANINGS.MTN_LOG_UPLOAD_RESP_SIGNAL, -- 使用信令类型
- data_type = DATA_TYPES.BINARY,
- value = build_mtn_log_response_tlv(total_files, latest_index)
- }
- }, false)
- if not response_ok then
- log.error("发送运维日志上传响应失败: " .. err_msg)
- return
- end
- log.info("运维日志上传响应已发送", "文件总数:", total_files, "最新序号:", latest_index)
- -- 开始上传日志文件
- sys.timerStart(function()
- upload_mtn_log_files()
- end, 10)
- end
- -- 接收消息解析处理
- local function parse_data(data)
- local message, err = parse_message(data)
- if not message then
- log.info("[excloud]Failed to parse message: " .. err)
- return
- end
- -- 处理运维日志上传请求(信令25)
- for _, tlv in ipairs(message.tlvs) do
- if tlv.field == FIELD_MEANINGS.MTN_LOG_UPLOAD_REQ_SIGNAL then
- log.info("[excloud]收到运维日志上传请求")
- handle_mtn_log_upload_request()
- return
- end
- end
- -- 处理认证响应
- -- if not is_authenticated then
- -- for _, tlv in ipairs(message.tlvs) do
- -- if tlv.field == FIELD_MEANINGS.AUTH_RESPONSE then
- -- handle_auth_response(message.tlvs)
- -- return
- -- end
- -- end
- --end
- --数据返回给回调
- if callback_func then
- callback_func("message", message)
- end
- -- -- 如果需要回复,发送确认AAA
- -- if message.header.need_reply then
- -- local response = {
- -- {
- -- field_meaning = FIELD_MEANINGS.REPORT_RESPONSE,
- -- data_type = DATA_TYPES.ASCII,
- -- value = "ACK"
- -- }
- -- }
- -- excloud.send(response, false)
- -- end
- end
- function excloud.getip(getip_type)
- getip_type = getip_type or 3 -- 默认使用AirCloud TCP协议
- -- 添加参数验证
- if not config.auth_key or not config.device_id then
- return false, "缺少必要的认证参数: auth_key 或 device_id"
- end
- local key = config.auth_key .. "-" .. config.device_id
- log.info("[excloud]excloud.getip", "类型:", getip_type, "key:", key)
- -- 执行HTTP请求
- local code, response = httpplus.request(
- {
- method = "POST",
- url = config.getip_url,
- forms = { key = key, type = getip_type }
- })
- log.info("[excloud]excloud.getip响应", "HTTP Code:", code, "Body:", response.body:query())
- -- 添加对HTTP响应为空值的处理
- if not response or not response.body then
- log.error("[excloud]getip请求失败", "HTTP响应为空")
- return false, "HTTP响应为空"
- end
- local response_body = response.body:query()
- if not response_body or response_body == "" then
- log.error("[excloud]getip请求失败", "响应体为空")
- return false, "响应体为空"
- end
- log.info("[excloud]excloud.getip响应", "HTTP Code:", code, "Body:", response_body)
- -- 处理HTTP错误码
- if code ~= 200 then
- log.info("[excloud]getip请求失败", "HTTP Code:", code)
- return false, "HTTP请求失败: " .. tostring(code)
- end
- -- 解析JSON响应,添加对解析失败的处理
- local response_json = json.decode(response_body)
- if not response_json then
- return false, "JSON解析失败: " .. tostring(err)
- end
- -- 检查服务器返回状态
- if not response_json.msg then
- log.error("[excloud]getip响应格式错误", "缺少msg字段")
- return false, "服务器响应格式错误: 缺少msg字段"
- end
- if response_json.msg ~= "ok" then
- log.error("[excloud]服务器返回错误", "消息:", response_json.msg)
- return false, "服务器返回错误: " .. tostring(response_json.msg)
- end
- if getip_type >= 3 and getip_type <= 5 then
- -- AirCloud业务
- if response_json.conninfo then
- config.current_conninfo = response_json.conninfo
- -- 根据连接类型处理不同的连接信息
- if getip_type == 5 then -- MQTT连接
- log.info("[excloud]获取到MQTT连接信息",
- "host:", response_json.conninfo.ssl,
- "port:", response_json.conninfo.port,
- "username:", response_json.conninfo.username,
- "password:", response_json.conninfo.password)
- log.info("[excloud]实际MQTT连接将使用设备信息:",
- "client_id:", mobile.imei(),
- "username:", mobile.imei(),
- "password:", mobile.muid())
- else -- TCP/UDP连接
- log.info("[excloud]获取到TCP/UDP连接信息",
- "host:", response_json.conninfo.ipv4,
- "port:", response_json.conninfo.port)
- end
- else
- log.warn("[excloud]未获取到连接信息")
- end
- if response_json.imginfo then
- config.current_imginfo = response_json.imginfo
- log.info("[excloud]获取到图片上传信息")
- else
- log.warn("[excloud]未获取到图片上传信息")
- end
- if response_json.audinfo then
- config.current_audinfo = response_json.audinfo
- log.info("[excloud]获取到音频上传信息")
- else
- log.warn("[excloud]未获取到音频上传信息")
- end
- -- 新增:运维日志上传信息 (mtninfo)
- if response_json.mtninfo then
- config.current_mtninfo = response_json.mtninfo
- log.info("[excloud]获取到运维日志上传信息")
- else
- log.warn("[excloud]未获取到运维日志上传信息")
- end
- end
- -- 如果获取到连接信息,自动更新配置
- if config.current_conninfo then
- -- 根据连接类型设置不同的主机字段
- if getip_type == 5 then -- MQTT连接
- if config.current_conninfo.ssl then
- config.host = config.current_conninfo.ssl
- else
- log.warn("[excloud]MQTT连接信息中缺少SSL域名")
- end
- else -- TCP/UDP连接
- if config.current_conninfo.ipv4 then
- config.host = config.current_conninfo.ipv4
- else
- log.warn("[excloud]TCP/UDP连接信息中缺少IP地址")
- end
- end
- if config.current_conninfo.port then
- config.port = config.current_conninfo.port
- else
- log.warn("[excloud]连接信息中缺少端口号")
- end
- -- 更新MQTT认证信息
- if getip_type == 5 then
- if config.current_conninfo.username then
- config.username = config.current_conninfo.username
- end
- if config.current_conninfo.password then
- config.password = config.current_conninfo.password
- end
- end
- log.info("[excloud]excloud.getip", "更新配置:", config.host, config.port)
- else
- log.warn("[excloud]未获取到有效的连接信息,将使用原有配置")
- end
- return true, config.current_conninfo
- end
- -- 带重试的getip请求
- function excloud.getip_with_retry(getip_type)
- local retry_count = 0
- local max_retry = config.max_getip_retry or 3
- local success, result
- while retry_count < max_retry do
- success, result = excloud.getip(getip_type)
- if success and result then
- log.info("[excloud]excloud.getip", "成功:", success, "结果:", json.encode(result))
- config.getip_retry_count = 0
- return true, result
- end
- retry_count = retry_count + 1
- config.getip_retry_count = retry_count
- log.warn("excloud.getip重试", "次数:", retry_count, "错误:", result)
- if retry_count < max_retry then
- sys.wait(5000) -- 等待5秒后重试
- end
- end
- return false, "getip请求失败,已达最大重试次数: " .. (result or "未知错误")
- end
- -- 发送文件上传开始通知
- local function send_file_upload_start(file_type, file_name, file_size)
- -- 构建子TLV数据
- -- local sub_tlvs = ""
- -- 文件上传类型子TLV
- -- local success, tlv_data = build_tlv(FIELD_MEANINGS.FILE_UPLOAD_TYPE, DATA_TYPES.INTEGER, file_type)
- -- if success then
- -- sub_tlvs = sub_tlvs .. tlv_data
- -- end
- -- 文件名称子TLV
- -- success, tlv_data = build_tlv(FIELD_MEANINGS.FILE_NAME, DATA_TYPES.ASCII, file_name)
- -- if success then
- -- sub_tlvs = sub_tlvs .. tlv_data
- -- end
- -- 文件大小子TLV
- -- success, tlv_data = build_tlv(FIELD_MEANINGS.FILE_SIZE, DATA_TYPES.INTEGER, file_size)
- -- if success then
- -- sub_tlvs = sub_tlvs .. tlv_data
- -- end
- local sub_tlvs = 0
- -- 主TLV(文件上传开始通知)
- local message = {
- {
- field_meaning = FIELD_MEANINGS.FILE_UPLOAD_START,
- data_type = DATA_TYPES.INTEGER,
- value = sub_tlvs -- 子TLV数据作为二进制值
- },
- {
- field_meaning = FIELD_MEANINGS.FILE_UPLOAD_TYPE,
- data_type = DATA_TYPES.INTEGER,
- value = file_type
- },
- {
- field_meaning = FIELD_MEANINGS.FILE_NAME,
- data_type = DATA_TYPES.ASCII,
- value = file_name
- },
- {
- field_meaning = FIELD_MEANINGS.FILE_SIZE,
- data_type = DATA_TYPES.INTEGER,
- value = file_size
- }
- }
- return excloud.send(message, false)
- end
- -- 发送文件上传完成通知
- local function send_file_upload_finish(file_type, file_name, file_success)
- -- 构建子TLV数据
- -- local sub_tlvs = ""
- -- -- 文件上传类型子TLV
- -- local success, tlv_data = build_tlv(FIELD_MEANINGS.FILE_UPLOAD_TYPE, DATA_TYPES.INTEGER, file_type)
- -- if success then
- -- sub_tlvs = sub_tlvs .. tlv_data
- -- end
- -- 文件名称子TLV
- -- success, tlv_data = build_tlv(FIELD_MEANINGS.FILE_NAME, DATA_TYPES.ASCII, file_name)
- -- if success then
- -- sub_tlvs = sub_tlvs .. tlv_data
- -- end
- -- 上传结果状态子TLV
- -- success, tlv_data = build_tlv(FIELD_MEANINGS.UPLOAD_RESULT_STATUS, DATA_TYPES.INTEGER, file_success and 0 or 1)
- -- if success then
- -- sub_tlvs = sub_tlvs .. tlv_data
- -- end
- local sub_tlvs = 0
- -- 主TLV(文件上传完成通知)
- local message = {
- {
- field_meaning = FIELD_MEANINGS.FILE_UPLOAD_FINISH,
- data_type = DATA_TYPES.INTEGER,
- value = sub_tlvs -- 子TLV数据作为二进制值
- },
- {
- field_meaning = FIELD_MEANINGS.FILE_UPLOAD_TYPE,
- data_type = DATA_TYPES.INTEGER,
- value = file_type
- },
- {
- field_meaning = FIELD_MEANINGS.FILE_NAME,
- data_type = DATA_TYPES.ASCII,
- value = file_name
- },
- {
- field_meaning = FIELD_MEANINGS.UPLOAD_RESULT_STATUS,
- data_type = DATA_TYPES.INTEGER,
- value = file_success and 0 or 1
- }
- }
- return excloud.send(message, false)
- end
- local function upload_file(file_type, file_path, file_name)
- local upload_info
- if file_type == 1 then
- upload_info = config.current_imginfo
- elseif file_type == 2 then
- upload_info = config.current_audinfo
- elseif file_type == 3 then
- upload_info = config.current_mtninfo -- 新增:运维日志上传
- else
- return false, "不支持的文件类型"
- end
- if not upload_info then
- return false, "未获取到上传配置信息,请先执行getip"
- end
- if not upload_info.url then
- return false, "上传URL为空"
- end
- local file_size = io.fileSize(file_path)
- if not file_size or file_size == 0 then
- log.info("[excloud]文件不存在或为空", "文件:", file_name,file_size)
- return false, "文件不存在或为空"
- end
- log.info("[excloud]开始文件上传", "类型:", file_type, "文件:", file_path, "大小:", file_size)
- log.info("[excloud]开始文件上传", "类型:", file_type, "文件:", file_name, "大小:", file_size)
- -- 发送上传开始通知(运维日志不需要)
- if file_type ~= 3 then
- local ok, err = send_file_upload_start(file_type, file_name, file_size)
- if not ok then
- log.warn("发送上传开始通知失败", err)
- end
- end
- -- 执行HTTP请求,添加重传机制
- local max_retries = 1
- local retry_count = 0
- local code, headers, body
- local upload_success = false
- local result_msg = ""
- while retry_count <= max_retries do
- -- 构建multipart/form-data请求体
- local forms = { ["key"] = upload_info.data_param.key }
- local files = { [upload_info.data_key or "f"] = file_path }
- local request_body, boundary = build_multipart_form_data(forms, files)
- -- 构建请求头
- local headers = {
- ["Content-Type"] = "multipart/form-data; boundary=" .. boundary,
- ["Content-Length"] = tostring(#request_body)
- }
- -- 发送HTTP请求
- log.info("[excloud]开始发送HTTP请求", "URL:", upload_info.url)
- code, headers, body = http.request("POST", upload_info.url, headers, request_body, {timeout=30000}).wait()
- -- 检查响应
- if code == 200 then
- log.info("[excloud]excloud.getip文件上传响应", "HTTP Code:", code, "Body:", body and (#body > 512 and #body or body) or "nil")
- local resp_data, err = json.decode(body)
- if resp_data and resp_data.code == 0 then
- upload_success = true
- result_msg = "上传成功"
- log.info("[excloud]文件上传成功", "URL:", resp_data.value and resp_data.value.uri or "未知")
- break
- else
- result_msg = "服务器返回错误: " .. (resp_data and tostring(resp_data.code) or "未知")
- log.error("文件上传失败", result_msg, "响应:", body)
- end
- else
- result_msg = "HTTP请求失败: " .. tostring(code)
- log.error("文件上传HTTP请求失败", result_msg, "Headers:", headers, "Body:", body)
- end
- -- 如果失败且未达到最大重试次数,则重试
- if not upload_success and retry_count < max_retries then
- retry_count = retry_count + 1
- log.info("[excloud]文件上传失败,开始第" .. retry_count .. "次重试")
- sys.wait(1000) -- 等待1秒后重试
- else
- break
- end
- end
- -- 发送上传完成通知(运维日志不需要)
- if file_type ~= 3 then
- local notify_ok, notify_err = send_file_upload_finish(file_type, file_name, upload_success)
- if not notify_ok then
- log.warn("发送上传完成通知失败", notify_err)
- end
- end
- return upload_success, result_msg
- end
- -- 运维日志上传接口
- function excloud.upload_mtnlog(file_path, file_name)
- -- 判断是否是手动填写IP,不是getip的话,不允许上传文件
- if not config.use_getip then
- log.warn("[excloud]手动填写IP时不允许上传文件")
- return false, "手动填写IP时不允许上传文件"
- end
- -- 检查文件是否存在
- if not io.exists(file_path) then
- return false, "文件不存在: " .. file_path
- end
- log.info("[excloud]excloud.upload_mtnlog", "文件路径:", file_path, "文件名:", file_name)
- -- 如果没有文件上传配置,先获取
- if not config.current_mtninfo then
- log.info("[excloud]获取运维日志上传配置...")
- local getip_type = config.transport == "tcp" and 3 or
- config.transport == "udp" and 4 or
- config.transport == "mqtt" and 5 or 3
- local ok, err = excloud.getip_with_retry(getip_type)
- if not ok then
- return false, "获取运维日志上传配置失败: " .. err
- end
- end
- log.info("[excloud]excloud.upload_mtnlog", "文件路径:", file_path, "文件名:", file_name)
- return upload_file(3, file_path, file_name) -- 文件类型为3
- end
- -- 图片上传接口
- function excloud.upload_image(file_path, file_name)
- -- 判断是否是手动填写IP,不是getip的话,不允许上传文件
- if not config.use_getip then
- log.warn("[excloud]手动填写IP时不允许上传图片文件")
- return false, "手动填写IP时不允许上传图片文件"
- end
- if not io.exists(file_path) then
- return false, "文件不存在: " .. file_path
- end
- -- 没有连接时直接退出
- if not is_connected then
- return false, "没有连接到服务器"
- end
- file_name = file_name or "image_" .. os.time() .. ".jpg"
- -- 如果没有图片上传配置,先获取
- if not config.current_imginfo then
- log.info("[excloud]excloud.upload_image", "获取图片上传配置...")
- local getip_type = config.transport == "tcp" and 3 or
- config.transport == "udp" and 4 or
- config.transport == "mqtt" and 5 or 3
- local ok, err = excloud.getip_with_retry(getip_type)
- if not ok then
- return false, "获取图片上传配置失败: " .. err
- end
- end
- return upload_file(1, file_path, file_name)
- end
- -- 音频上传接口
- function excloud.upload_audio(file_path, file_name)
- -- 判断是否是手动填写IP,不是getip的话,不允许上传文件
- if not config.use_getip then
- log.warn("[excloud]手动填写IP时不允许上传音频文件")
- return false, "手动填写IP时不允许上传音频文件"
- end
- if not io.exists(file_path) then
- return false, "文件不存在: " .. file_path
- end
- -- 没有连接时直接退出
- if not is_connected then
- return false, "没有连接到服务器"
- end
- file_name = file_name or "audio_" .. os.time() .. ".mp3"
- -- 如果没有音频上传配置,先获取
- if not config.current_audinfo then
- log.info("[excloud]excloud.upload_audio", "获取音频上传配置...")
- local getip_type = config.transport == "tcp" and 3 or
- config.transport == "udp" and 4 or
- config.transport == "mqtt" and 5 or 3
- local ok, err = excloud.getip_with_retry(getip_type)
- if not ok then
- return false, "获取音频上传配置失败: " .. err
- end
- end
- return upload_file(2, file_path, file_name)
- end
- -- 记录运维日志
- --[[
- 输出运维日志并写入文件
- @api excloud.mtn_log(level, tag, ...)
- @string level 日志级别,必须是 "info", "warn", 或 "error"
- @string tag 日志标识,必须是字符串
- @... 需打印的参数
- @return boolean 成功返回true,失败返回false
- @usage
- excloud.mtn_log("info", "message", 123)
- excloud.mtn_log("warn", "message", 456)
- excloud.mtn_log("error", "message", 789)
- ]]
- function excloud.mtn_log(level, tag, ...)
- if not config.mtn_log_enabled then
- return false, "运维日志功能已禁用" -- 禁用时返回失败
- end
- exmtn.log(level, tag, ...)
- return true
- end
- -- 获取运维日志状态
- function excloud.get_mtn_log_status()
- if not config.mtn_log_enabled then
- return {
- enabled = false,
- message = "运维日志功能已禁用"
- }
- end
- local config_info = exmtn.get_config()
- local log_files = scan_mtn_log_files()
- local total_size = 0
- for _, file in ipairs(log_files) do
- total_size = total_size + file.size
- end
- return {
- enabled = true,
- config = config_info,
- file_count = #log_files,
- total_size = total_size,
- files = log_files,
- last_error = exmtn.get_last_error()
- }
- end
- -- 重连
- local function schedule_reconnect()
- -- 检查是否已经关闭服务
- if not is_open then
- log.info("[excloud]服务已关闭,停止重连")
- return
- end
- -- 检查是否达到最大重连次数
- if reconnect_count >= config.max_reconnect then
- log.info("[excloud]到达最大重连次数 " .. reconnect_count .. "/" .. config.max_reconnect)
- -- 使用协程执行复杂的重连逻辑
- sys.taskInit(function()
- -- 执行紧急内存清理
- collectgarbage("collect")
- pending_messages = {}
- -- 根据use_getip决定是否重新获取服务器信息
- if config.use_getip then
- log.info("[excloud]TCP连接多次失败,重新获取服务器信息...")
- local getip_type = config.transport == "tcp" and 3 or
- config.transport == "udp" and 4 or
- config.transport == "mqtt" and 5 or 3
- -- 清除当前连接信息,强制重新获取
- config.current_conninfo = nil
- local ok, result = excloud.getip_with_retry(getip_type)
- if ok then
- log.info("[excloud]重新获取服务器信息成功,重置重连计数",
- "host:", config.host,
- "port:", config.port,
- "transport:", config.transport)
- -- 重置重连计数
- reconnect_count = 0
- -- 使用新的服务器信息重新连接(先关闭再打开)
- excloud.close() -- 确保完全关闭
- sys.wait(200) -- 在协程中可以安全使用 wait
- excloud.open() -- 重新打开
- else
- log.error("[excloud]重新获取服务器信息失败,停止重连")
- if callback_func then
- callback_func("reconnect_failed", {
- count = reconnect_count,
- max_reconnect = config.max_reconnect,
- getip_failed = true
- })
- end
- -- 彻底停止重连
- is_open = false
- end
- else
- -- 不使用getip,直接停止重连
- log.info("[excloud]达到最大重连次数,停止重连")
- if callback_func then
- callback_func("reconnect_failed", {
- count = reconnect_count,
- max_reconnect = config.max_reconnect
- })
- end
- is_open = false
- end
- end)
- return
- end
- -- 增加重连计数
- reconnect_count = reconnect_count + 1
- log.info("[excloud]安排第 " ..
- reconnect_count .. "/" .. config.max_reconnect .. " 次重连,等待 " .. config.reconnect_interval .. " 秒")
- -- 使用定时器安排重连,在协程中执行
- reconnect_timer = sys.timerStart(function()
- sys.taskInit(function()
- log.info("[excloud]执行第 " .. reconnect_count .. "/" .. config.max_reconnect .. " 次重连")
- -- 在重连前检查服务状态
- if not is_open then
- log.info("[excloud]服务已关闭,取消重连")
- return
- end
- -- 先执行内存清理
- collectgarbage("collect")
- -- 如果连接对象存在但连接已断开,先清理
- if connection and not is_connected then
- log.info("[excloud]清理残留的连接对象")
- if config.transport == "tcp" then
- socket.close(connection)
- socket.release(connection)
- elseif config.transport == "mqtt" then
- connection:disconnect()
- connection:close()
- end
- connection = nil
- sys.wait(50) -- 在协程中安全等待
- end
- -- 重置连接状态但保持服务开启状态
- is_connected = false
- is_authenticated = false
- -- 执行重连
- local success, err = excloud.open()
- if not success then
- log.error("[excloud]重连失败:", err)
- -- 重连失败会再次触发schedule_reconnect
- else
- log.info("[excloud]重连操作已发起")
- end
- end)
- end, config.reconnect_interval * 1000)
- end
- -- TCP socket事件回调函数
- local function tcp_socket_callback(netc, event, param)
- log.info("[excloud]socket cb", netc, event, param)
- -- 取消连接超时定时器
- if connect_timeout_timer then
- sys.timerStop(connect_timeout_timer)
- connect_timeout_timer = nil
- end
- -- 记录连接状态变化的运维日志
- if config.aircloud_mtn_log_enabled then
- if event == socket.LINK then
- exmtn.log("info", "aircloud", "net_conn", "网络连接成功")
- elseif event == socket.ON_LINE then
- exmtn.log("info", "aircloud", "net_conn", "TCP连接成功", "host", config.host, "port", config.port)
- elseif event == socket.CLOSED then
- exmtn.log("info", "aircloud", "net_conn", "TCP连接断开", "param", param)
- end
- end
- if param ~= 0 then
- log.info("[excloud]socket", "连接断开")
- is_connected = false
- is_authenticated = false
- if callback_func then
- callback_func("disconnect", {})
- end
- -- 连接断开,释放资源
- socket.release(connection)
- connection = nil
- -- 尝试重连
- if config.auto_reconnect and is_open then
- -- is_open = false
- schedule_reconnect()
- end
- return
- end
- if event == socket.LINK then
- -- 网络连接成功
- log.info("[excloud]socket", "网络连接成功")
- elseif event == socket.ON_LINE then
- -- TCP连接成功
- log.info("[excloud]socket", "TCP连接成功")
- is_connected = true
- -- 重置重连计数,如果是重连的话,连接上服务器给重连计数重置为0
- reconnect_count = 0
- if callback_func then
- callback_func("connect_result", { success = true })
- end
- -- 发送认证请求
- send_auth_request()
- elseif event == socket.EVENT then
- -- 有数据到达
- socket.rx(netc, rxbuff)
- if rxbuff:used() > 0 then
- local data = rxbuff:query()
- log.info("[excloud]socket", "收到数据", #data, "字节", data:toHex())
- -- 处理接收到的数据
- parse_data(data)
- end
- -- -- 清空缓冲区
- rxbuff:del()
- elseif event == socket.TX_OK then
- socket.wait(netc)
- log.info("[excloud]socket", "发送完成")
- elseif event == socket.CLOSED then
- -- 连接错误或关闭
- socket.release(connection)
- connection = nil
- log.info("[excloud]socket", "主动断开链接")
- end
- end
- -- mqtt client的事件回调函数
- local function mqtt_client_event_cbfunc(connected, event, data, payload, metas)
- log.info("[excloud]mqtt_client_event_cbfunc", event, data, payload, json.encode(metas))
- -- 取消连接超时定时器
- if connect_timeout_timer then
- sys.timerStop(connect_timeout_timer)
- connect_timeout_timer = nil
- end
- -- 记录MQTT状态变化的运维日志
- if config.aircloud_mtn_log_enabled then
- if event == "conack" then
- exmtn.log("info", "aircloud", "mqtt_conn", "MQTT连接成功", "host", config.host)
- elseif event == "disconnect" then
- exmtn.log("info", "aircloud", "mqtt_conn", "MQTT连接断开")
- elseif event == "error" then
- exmtn.log("info", "aircloud", "mqtt_error", "MQTT错误", "type", data, "code", payload)
- end
- end
- -- mqtt连接成功
- if event == "conack" then
- is_connected = true
- log.info("[excloud]MQTT connected")
- -- 重置重连计数,如果是重连的话,连接上服务器给重连计数重置为0
- reconnect_count = 0
- -- 订阅主题
- local device_id_hex = string.toHex(device_id_binary)
- local auth_topic = "/AirCloud/down/" .. device_id_hex .. "/auth"
- local all_topic = "/AirCloud/down/" .. device_id_hex .. "/all"
- log.info("[excloud]mqtt_client_event_cbfunc", "订阅主题", auth_topic, all_topic)
- connection:subscribe(auth_topic, 0)
- connection:subscribe(all_topic, 0)
- if callback_func then
- callback_func("connect_result", { success = true })
- end
- -- 发送认证请求
- send_auth_request()
- -- 订阅成功
- elseif event == "suback" then
- -- 取消订阅成功
- elseif event == "unsuback" then
- -- 接收到服务器下发的publish数据
- -- data:string类型,表示topic
- -- payload:string类型,表示payload
- -- metas:table类型,数据内容如下
- -- {
- -- qos: number类型,取值范围0,1,2
- -- retain:number类型,取值范围0,1
- -- dup:number类型,取值范围0,1
- -- message_id: number类型
- -- }
- elseif event == "recv" then
- log.info("[excloud]接收到MQTT消息",
- "主题:", data,
- "数据长度:", #payload,
- "QoS:", metas and metas.qos or "unknown",
- "消息ID:", metas and metas.message_id or "unknown")
- -- 对接收到的publish数据处理
- parse_data(payload)
- -- 发送成功publish数据
- -- data:number类型,表示message id
- elseif event == "sent" then
- -- 服务器断开mqtt连接
- elseif event == "disconnect" then
- is_connected = false
- is_authenticated = false
- log.info("[excloud]MQTT disconnected")
- if callback_func then
- callback_func("disconnect", {})
- end
- -- 尝试重连
- if config.auto_reconnect and is_open then
- -- is_open = false
- schedule_reconnect()
- end
- -- 收到服务器的心跳应答
- elseif event == "pong" then
- -- 严重异常,本地会主动断开连接
- -- data:string类型,表示具体的异常,有以下几种:
- -- "connect":tcp连接失败
- -- "tx":数据发送失败
- -- "conack":mqtt connect后,服务器应答CONNACK鉴权失败,失败码为payload(number类型)
- -- "other":其他异常
- elseif event == "error" then
- is_connected = false
- is_authenticated = false
- local error_msg = "Unknown MQTT error"
- if data == "connect" then
- error_msg = "TCP connection failed"
- -- 连接失败,应该考虑重新获取服务器信息
- if reconnect_count >= config.max_reconnect and config.use_getip then
- log.info("[excloud]MQTT连接多次失败,需要重新获取服务器信息")
- config.current_conninfo = nil
- end
- elseif data == "tx" then
- error_msg = "Data transmission failed"
- elseif data == "conack" then
- error_msg = "MQTT authentication failed with code: " .. tostring(payload)
- else
- error_msg = "Other MQTT error: " .. tostring(data)
- end
- log.info("[excloud]MQTT error: " .. error_msg)
- if callback_func then
- callback_func("disconnect", { error = error_msg })
- end
- -- 安全释放连接资源
- if connection then
- connection:disconnect()
- connection:close()
- connection = nil
- end
- -- 尝试重连
- if config.auto_reconnect and is_open then
- -- is_open = false
- schedule_reconnect()
- end
- end
- end
- -- 设置配置参数
- function excloud.setup(params)
- if is_open then
- return false, "excloud is already open"
- end
- -- 合并配置参数
- for k, v in pairs(params) do
- config[k] = v
- end
- -- 验证必要参数
- if not config.auth_key then
- return false, "auth_key is required"
- end
- if config.device_type == 1 then
- config.device_id = mobile.imei()
- log.info("[excloud]4G设备", "IMEI:", config.device_id, "MUID:", mobile.muid())
- elseif config.device_type == 2 then
- config.device_id = wlan.getMac(nil, true)
- --以太网设备
- elseif config.device_type == 4 then
- config.device_id = netdrv.mac(socket.LWIP_ETH)
- elseif config.device_type == 9 then
- -- 虚拟设备:验证手机号和序列号
- if not config.virtual_phone_number then
- return false, "虚拟设备需要配置 virtual_phone_number"
- end
- -- 验证手机号格式(11位数字)
- local phone_clean = config.virtual_phone_number:gsub("%D", "")
- if #phone_clean ~= 11 then
- return false, "虚拟手机号必须为11位数字"
- end
- -- 设置默认序列号(如果未提供)
- if config.virtual_serial_num == nil then
- config.virtual_serial_num = 0
- end
- -- 序列号范围检查(0-999)
- config.virtual_serial_num = config.virtual_serial_num % 1000
- -- 生成设备ID:手机号 + 3位序列号
- local serial_str = string.format("%03d", config.virtual_serial_num)
- config.device_id = phone_clean .. serial_str
- log.info("虚拟设备配置", "手机号:", config.virtual_phone_number, "序列号:", serial_str, "设备ID:", config.device_id)
- else
- log.info("[excloud]未知设备类型", config.device_type)
- config.device_id = "unknown"
- end
- -- 打包设备id
- device_id_binary = packDeviceInfo(config.device_type, config.device_id)
- -- 初始化运维日志模块
- local mtn_ok, mtn_err = init_mtn_log()
- if not mtn_ok then
- log.warn("[excloud]运维日志初始化失败,但继续excloud初始化:", mtn_err)
- end
- log.info("[excloud]excloud.setup", "初始化成功", "设备ID:", config.device_id)
- return true
- end
- -- 注册回调函数
- function excloud.on(cbfunc)
- if type(cbfunc) ~= "function" then
- return false, "Callback must be a function"
- end
- callback_func = cbfunc
- return true
- end
- -- 开启excloud服务
- function excloud.open()
- -- 如果之前连接异常断开,但状态未重置,先清理
- if is_open and not is_connected then
- log.warn("[excloud]检测到状态不一致,先清理残留状态")
- excloud.close()
- end
- -- 检查是否已打开
- if is_open and is_connected then
- return false, "excloud is already open and connected"
- end
- reconnect_count = 0
- -- 判断是否初始化
- if not device_id_binary then
- return false, "excloud 没有初始化,请先调用setup"
- end
- -- 根据use_getip决定是否使用getip服务
- if config.use_getip then
- -- 使用getip服务发现
- local getip_type
- if config.transport == "tcp" then
- getip_type = 3
- elseif config.transport == "udp" then
- getip_type = 4
- elseif config.transport == "mqtt" then
- getip_type = 5
- else
- return false, "不支持的传输协议: " .. config.transport
- end
- -- 获取服务器连接信息
- if not config.current_conninfo or (config.transport ~= "mqtt" and not config.current_conninfo.ipv4) or
- (config.transport == "mqtt" and not config.current_conninfo.ssl) then
- log.info("[excloud]首次连接,获取服务器信息...")
- local ok, result = excloud.getip_with_retry(getip_type)
- if not ok then
- return false, "获取服务器信息失败: " .. result
- end
- -- 更新连接配置
- log.info("[excloud]服务器信息获取成功", "host:", config.host, "port:", config.port, "transport:", config.transport)
- -- 保存文件上传信息
- if result.imginfo then
- config.current_imginfo = result.imginfo
- end
- if result.audinfo then
- config.current_audinfo = result.audinfo
- end
- end
- else
- -- 不使用getip,直接使用用户配置的host和port
- log.info("使用手动配置的服务器地址", config.host, config.port)
- if not config.host or not config.port then
- return false, "use_getip为false时,必须配置host和port"
- end
- end
- -- 根据传输协议创建连接
- if config.transport == "tcp" then
- -- 创建接收缓冲区
- rxbuff = zbuff.create(2048)
- -- 创建TCP连接
- log.info("[excloud]创建TCP连接")
- connection = socket.create(nil, tcp_socket_callback)
- if not connection then
- return false, "Failed to create socket"
- end
- -- 准备SSL配置参数
- local ssl_config = nil
- if config.ssl then
- if type(config.ssl) == "table" then
- -- 使用详细的SSL配置
- ssl_config = config.ssl
- else
- -- 简单的SSL启用
- ssl_config = true
- end
- end
- -- 配置socket参数
- local config_success = socket.config(
- connection,
- config.local_port, -- 本地端口号
- false, -- 是否是UDP,TCP连接为false
- ssl_config and true or false, -- 是否是加密传输
- config.keep_idle, -- keepalive idle时间
- config.keep_interval, -- keepalive 探测间隔
- config.keep_cnt, -- keepalive 探测次数
- ssl_config and ssl_config.server_cert or nil, -- 服务器CA证书
- ssl_config and ssl_config.client_cert or nil, -- 客户端证书
- ssl_config and ssl_config.client_key or nil, -- 客户端私钥
- ssl_config and ssl_config.client_password or nil -- 客户端私钥口令
- )
- if not config_success then
- socket.release(connection)
- connection = nil
- return false, "Socket config failed"
- end
- socket.debug(connection, true)
- -- 设置连接超时定时器
- connect_timeout_timer = sys.timerStart(function()
- if not is_connected then
- log.error("TCP connection timeout")
- if connection then
- socket.close(connection)
- socket.release(connection)
- connection = nil
- end
- if callback_func then
- callback_func("connect_result", { success = false, error = "Connection timeout" })
- end
- -- 尝试重连
- if config.auto_reconnect and is_open then
- -- is_open = false
- schedule_reconnect()
- end
- end
- end, config.timeout * 1000)
- -- 连接到服务器
- local ok, result = socket.connect(connection, config.host, config.port, config.mqtt_ipv6)
- log.info("[excloud]TCP连接结果", ok, result)
- if not ok then
- --发生异常,强制close
- socket.close(connection)
- --释放资源
- socket.release(connection)
- connection = nil
- if config.auto_reconnect then
- is_open = false
- schedule_reconnect()
- end
- return false, result
- end
- elseif config.transport == "mqtt" then
- -- 准备MQTT SSL配置 - MQTT连接默认使用SSL加密
- local ssl_config = true -- 最简单的SSL加密,不验证服务器证书
- -- 如果有详细的SSL配置,使用详细配置
- if config.ssl and type(config.ssl) == "table" then
- ssl_config = config.ssl
- end
- -- 准备MQTT扩展参数
- local mqtt_opts = {
- rxSize = config.mqtt_rx_size or 32 * 1024, -- MQTT接收缓冲区大小,默认32K
- conn_timeout = config.mqtt_conn_timeout or 30, -- MQTT连接超时时间,默认30秒
- ipv6 = config.mqtt_ipv6 or false -- 是否使用IPv6连接,默认false
- }
- -- 创建MQTT客户端
- connection = mqtt.create(nil, config.host, config.port, ssl_config, mqtt_opts)
- if not connection then
- return false, "Failed to create MQTT client"
- end
- -- 开启调试信息(可选)
- if config.debug then
- connection:debug(true)
- end
- -- 设置真实的MQTT认证信息
- local client_id, username, password
- if config.device_type == 1 then -- 4G设备
- client_id = mobile.imei()
- username = mobile.imei()
- password = mobile.muid()
- -- elseif config.device_type == 2 then -- WIFI设备
- -- client_id = wlan.getMac(nil, true)
- -- username = wlan.getMac(nil, true)
- -- password = mobile.muid():toHex()
- -- elseif config.device_type == 4 then -- 以太网设备
- -- client_id = netdrv.mac(socket.LWIP_ETH)
- -- username = netdrv.mac(socket.LWIP_ETH)
- -- password = mobile.muid():toHex()
- -- elseif config.device_type == 9 then -- 虚拟设备
- -- -- 虚拟设备使用配置的设备ID
- -- client_id = config.device_id
- -- username = config.device_id
- -- password = config.auth_key or config.device_id
- else
- return false, "MQTT connect failed, device_type not supported"
- end
- log.info("[excloud]MQTT认证信息",
- "client_id:", client_id,
- "username:", username,
- "password:", password)
- -- 设置认证信息(使用真实的设备信息,而不是getip返回的提示)
- connection:auth(client_id, username, password, config.clean_session)
- -- 设置保持连接间隔
- connection:keepalive(config.keepalive or 240) -- 默认240秒
- -- 设置遗嘱消息(如果需要)
- if config.will_topic and config.will_payload then
- local will_result = connection:will(
- config.will_topic,
- config.will_payload,
- config.will_qos or 0,
- config.will_retain or 0
- )
- if not will_result then
- log.warn("[excloud]设置遗嘱消息失败")
- end
- end
- -- 设置自动重连
- if config.auto_reconnect then
- connection:autoreconn(true, (config.reconnect_interval or 10) * 1000) -- 转换为毫秒
- end
- -- 注册事件回调
- connection:on(mqtt_client_event_cbfunc)
- -- 设置连接超时定时器
- connect_timeout_timer = sys.timerStart(function()
- if not is_connected then
- log.error("MQTT connection timeout")
- if connection then
- connection:disconnect()
- connection:close()
- connection = nil
- end
- if callback_func then
- callback_func("connect_result", { success = false, error = "Connection timeout" })
- end
- -- 尝试重连
- if config.auto_reconnect and is_open then
- -- is_open = false
- schedule_reconnect()
- end
- end
- end, config.timeout * 1000)
- -- 连接到服务器
- local ok = connection:connect()
- if not ok then
- --连接失败,释放资源
- connection:close()
- connection = nil
- -- 发起连接失败,尝试重连
- if config.auto_reconnect then
- is_open = false
- schedule_reconnect()
- end
- return false, "MQTT connect failed"
- end
- else
- return false, "Unsupported transport: " .. config.transport
- end
- is_open = true
- -- 记录服务启动日志
- if config.aircloud_mtn_log_enabled then
- exmtn.log("info", "aircloud", "system", "excloud服务启动", "transport", config.transport, "host", config.host, "port",
- config.port)
- end
- log.info("[excloud]excloud service started")
- return true
- end
- -- 发送数据
- -- 发送消息到云端
- -- @param data table 待发送的数据,每个元素是一个包含 field_meaning、data_type 和 value 的表
- -- @param need_reply boolean 是否需要服务器回复,默认为 false
- -- @param is_auth_msg boolean 是否是鉴权消息,默认为 false
- function excloud.send(data, need_reply, is_auth_msg)
- if not is_open then
- return false, "excloud服务未开启"
- end
- if not is_connected then
- return false, "未连接到服务器"
- end
- -- if not is_authenticated and not is_auth_msg then
- -- return false, "设备未认证"
- -- end
- -- 检查参数是否为table
- if type(data) ~= "table" then
- return false, "data must be table"
- end
- if need_reply == nil then
- need_reply = false
- end
- if is_auth_msg == nil then
- is_auth_msg = false
- end
- -- 检查服务是否开启
- if not is_open then
- if callback_func then
- callback_func("send_result", {
- success = false,
- error_msg = "excloud not open"
- })
- end
- return false, "excloud not open"
- end
- -- 检查是否已连接
- if not is_connected then
- if callback_func then
- callback_func("send_result", {
- success = false,
- error_msg = "excloud not connected"
- })
- end
- return false, "excloud not connected"
- end
- -- 保存当前序列号用于回调
- local current_sequence = sequence_num
- -- 构建消息体
- local message_body = ""
- local parts = {}
- for _, item in ipairs(data) do
- log.info("[excloud]构建发送数据", item.field_meaning, item.data_type, item.value, message_body)
- local success, tlv = build_tlv(item.field_meaning, item.data_type, item.value)
- if not success then
- return false, "excloud.send data is failed"
- end
- table.insert(parts, tlv)
- -- message_body = message_body .. tlv
- end
- if #parts > 0 then
- message_body = table.concat(parts)
- parts = {}
- else
- log.warn("[excloud]没有有效的TLV数据可发送")
- -- return false, "No valid TLV data to send"
- end
- -- 检查消息长度
- local udp_auth_key = config.udp_auth_key and true or false
- local total_length = #message_body + (udp_auth_key and 64 or 0)
- log.info("[excloud]tlv发送数据长度4", total_length)
- -- 构建消息头
- local is_udp_transport = (config.transport == "udp")
- local header = build_header(need_reply, is_udp_transport, total_length)
- -- -- 添加鉴权key(如果是UDP的话)
- local auth_key_part = ""
- if config.transport == "udp" and udp_auth_key then
- auth_key_part = config.udp_auth_key
- if #auth_key_part < 64 then
- auth_key_part = auth_key_part .. string.rep("\0", 64 - #auth_key_part)
- elseif #auth_key_part > 64 then
- auth_key_part = auth_key_part:sub(1, 64)
- end
- end
- local full_message
- -- 发送完整消息
- if config.transport == "udp" then
- full_message = header .. auth_key_part .. message_body
- else
- full_message = header .. message_body
- end
- log.info("[excloud]发送消息长度", #header, #message_body, #full_message, full_message:toHex())
- local success, err_msg
- if config.transport == "tcp" then
- if not connection then
- err_msg = "TCP connection not available"
- success = false
- else
- success, err_msg = socket.tx(connection, full_message)
- end
- elseif config.transport == "mqtt" then
- -- 根据是否为鉴权消息选择不同的topic
- local topic
- local device_id_hex = string.toHex(device_id_binary)
- if is_auth_msg then
- topic = "/AirCloud/up/" .. device_id_hex .. "/auth"
- else
- topic = "/AirCloud/up/" .. device_id_hex .. "/all"
- end
- log.info("[excloud]发布主题", topic, #full_message, full_message:toHex())
- local message_id = connection:publish(topic, full_message, config.qos, config.retain)
- if message_id then
- success = true
- if config.qos and config.qos > 0 then
- log.info("[excloud]MQTT消息发布成功", "消息ID:", message_id)
- else
- log.info("[excloud]MQTT消息发布成功")
- end
- else
- success = false
- err_msg = "MQTT publish failed"
- end
- end
- -- 通过回调返回发送结果
- if callback_func then
- callback_func("send_result", {
- success = success,
- error_msg = success and "Send successful" or err_msg,
- sequence_num = current_sequence
- })
- end
- collectgarbage("collect")
- if success then
- log.info("[excloud]数据发送成功", #full_message, "字节")
- return true
- else
- log.error("数据发送失败", err_msg)
- return false, err_msg
- end
- end
- -- 关闭excloud服务
- function excloud.close()
- if not is_open then
- return false, "excloud not open"
- end
- -- 停止所有定时器
- if reconnect_timer then
- sys.timerStop(reconnect_timer)
- reconnect_timer = nil
- end
- if connect_timeout_timer then
- sys.timerStop(connect_timeout_timer)
- connect_timeout_timer = nil
- end
- -- 停止心跳
- excloud.stop_heartbeat()
- -- 关闭连接
- if connection then
- if config.transport == "tcp" then
- socket.close(connection)
- socket.release(connection)
- elseif config.transport == "mqtt" then
- -- 断开连接并释放资源
- connection:disconnect()
- connection:close()
- end
- connection = nil
- end
- -- 释放缓冲区
- if rxbuff then
- rxbuff = nil
- end
- -- 清空队列
- pending_messages = {}
- callback_func = nil
- -- 记录服务关闭日志
- if config.aircloud_mtn_log_enabled then
- exmtn.log("info", "aircloud", "system", "excloud服务关闭")
- end
- -- 重置状态
- is_open = false
- is_connected = false
- is_authenticated = false
- pending_messages = {}
- rxbuff = nil
- reconnect_count = 0
- is_heartbeat_running = false
- collectgarbage("collect")
- log.info("[excloud]excloud service stopped")
- return true
- end
- -- 获取当前状态
- function excloud.status()
- return {
- is_open = is_open,
- is_connected = is_connected,
- is_authenticated = is_authenticated,
- sequence_num = sequence_num,
- reconnect_count = reconnect_count,
- pending_messages = #pending_messages,
- }
- end
- -- 发送心跳消息
- -- @param custom_data table 可选参数,自定义心跳内容
- -- @param need_reply boolean 是否需要服务器回复,默认为false
- -- @return boolean 是否发送成功
- -- @return string 错误信息(如果失败)
- function excloud.heartbeat(custom_data, need_reply)
- -- 如果心跳数据未提供,则使用默认的心跳数据(空表)
- local data = custom_data or heartbeat_data
- -- 设置默认不需要回复
- if need_reply == nil then
- need_reply = false
- end
- -- 调用send函数发送心跳数据
- return excloud.send(data, need_reply, false)
- end
- -- 启动自动心跳
- -- @param interval number 心跳间隔(秒),默认300秒(5分钟)
- -- @param custom_data table 自定义心跳内容,默认空表
- -- @return boolean 是否启动成功
- function excloud.start_heartbeat(interval, custom_data)
- -- 停止现有的心跳定时器
- if is_heartbeat_running then
- excloud.stop_heartbeat()
- end
- -- 设置心跳间隔,默认5分钟
- heartbeat_interval = interval or 300
- -- 设置心跳数据
- heartbeat_data = custom_data or {}
- -- 创建并启动心跳定时器
- heartbeat_timer = sys.timerLoopStart(function()
- if is_open and is_connected then
- local ok, err_msg = excloud.heartbeat()
- if not ok then
- log.info("[excloud]excloud", "心跳发送失败: " .. err_msg)
- else
- log.info("[excloud]excloud", "心跳发送成功")
- end
- end
- end, heartbeat_interval * 1000) -- 转换为毫秒
- is_heartbeat_running = true
- log.info("[excloud]excloud", "自动心跳已启动,间隔 " .. heartbeat_interval .. " 秒")
- return true
- end
- -- 停止自动心跳
- -- @return boolean 是否停止成功
- function excloud.stop_heartbeat()
- if heartbeat_timer then
- sys.timerStop(heartbeat_timer)
- heartbeat_timer = nil
- is_heartbeat_running = false
- log.info("[excloud]excloud", "自动心跳已停止")
- return true
- end
- return false
- end
- -- 获取当前服务器信息
- function excloud.get_server_info()
- return {
- conninfo = config.current_conninfo,
- imginfo = config.current_imginfo,
- audinfo = config.current_audinfo,
- mtninfo = config.current_mtninfo -- 新增:运维日志上传信息
- }
- end
- -- 强制刷新服务器信息
- -- function excloud.refresh_server_info()
- -- config.current_conninfo = nil
- -- config.current_imginfo = nil
- -- config.current_audinfo = nil
- -- return true
- -- end
- -- 导出常量
- excloud.DATA_TYPES = DATA_TYPES
- excloud.FIELD_MEANINGS = FIELD_MEANINGS
- excloud.MTN_LOG_STATUS = MTN_LOG_STATUS
- excloud.MTN_LOG_CACHE_WRITE = exmtn.CACHE_WRITE
- excloud.MTN_LOG_ADD_WRITE = exmtn.ADD_WRITE
- return excloud
|