wangfq
173dd6874f
- 来源: 合宙 LuatOS 官方仓库 air780epm 模块完整代码 - 路径: luatos/air780epm/module/Air780EPM/demo 含官方 demo(含 mqtt/mqtts/socket/uart 等) - 后续: 基于 demo 开发 UART<->MQTT 数据上报功能
133 lines
5.7 KiB
Lua
133 lines
5.7 KiB
Lua
--[[
|
|
@module airlbs_app.lua
|
|
@summary Airlbs应用
|
|
@version 1.0
|
|
@date 2025.08.13
|
|
@author 王城钧
|
|
@usage
|
|
|
|
本文件为airlbs“多基站”、“多基站+多wifi”两种应用场景的定位功能演示，核心业务逻辑为：
|
|
1. 等待网络就绪
|
|
2. 发起NTP授时
|
|
3. 循环定位请求
|
|
|
|
本文件没有对外接口，直接在main.lua中require "airlbs_app"就可以加载运行；
|
|
]]
|
|
|
|
local airlbs = require "airlbs"
|
|
|
|
local timeout = 10 -- 扫描基站/wifi 做 基站/wifi定位 的超时时间，最小5S,最大60S
|
|
|
|
-- 此服务为收费服务，需自行联系销售申请或者在 https://iot.openluat.com/finance/order 购买
|
|
|
|
-- 以下为合宙LBS平台开通的项目id和秘钥
|
|
-- 以下项目密钥和id请根据实际项目进行修改，https://iot.openluat.com/lbs/bs 在此网址中我的项目下
|
|
local airlbs_project_id = "hgM0Xi"
|
|
local airlbs_project_key = "XEkKZv7hwYnASyXgaFAo4EwtG09X6OXi"
|
|
local lat , lng = nil, nil
|
|
|
|
|
|
--多基站定位
|
|
local function airlbs_multi_cells_task_func()
|
|
while not socket.adapter(socket.dft()) do
|
|
log.warn("lbsloc2_task_func", "wait IP_READY", socket.dft())
|
|
-- 在此处阻塞等待默认网卡连接成功的消息"IP_READY"
|
|
-- 或者等待1秒超时退出阻塞等待状态;
|
|
-- 注意：此处的1000毫秒超时不要修改的更长；
|
|
-- 因为当使用exnetif.set_priority_order配置多个网卡连接外网的优先级时，会隐式的修改默认使用的网卡
|
|
-- 当exnetif.set_priority_order的调用时序和此处的socket.adapter(socket.dft())判断时序有可能不匹配
|
|
-- 此处的1秒，能够保证，即使时序不匹配，也能1秒钟退出阻塞状态，再去判断socket.adapter(socket.dft())
|
|
sys.waitUntil("IP_READY", 1000)
|
|
end
|
|
|
|
-- 检测到了IP_READY消息
|
|
log.info("airlbs_multi_cells_func", "recv IP_READY", socket.dft())
|
|
socket.sntp() -- 进行NTP授时
|
|
sys.waitUntil("NTP_UPDATE", 1000)
|
|
while 1 do
|
|
if airlbs_project_id and airlbs_project_key then
|
|
local result, data = airlbs.request({
|
|
project_id = airlbs_project_id,-- 项目ID
|
|
project_key = airlbs_project_key,-- 项目密钥
|
|
timeout = timeout * 1000, -- 实际的超时时间(单位：ms)
|
|
})
|
|
if result then
|
|
log.info("airlbs多基站定位返回的经纬度数据为", json.encode(data))
|
|
end
|
|
else
|
|
log.warn("请检查project_id和project_key")
|
|
end
|
|
sys.wait(60000)
|
|
-- 循环60S一次多基站定位，此处设置定位请求间隔为60S非必须，请求频率可根据自己所购买的套餐进行计算，超过频次的定位请求均会返回定位失败。返回错误码，不包含位置信息。
|
|
end
|
|
end
|
|
|
|
--多基站+多wifi定位
|
|
local function airlbs_multi_cells_wifi_task_func()
|
|
while not socket.adapter(socket.dft()) do
|
|
log.warn("airlbs_multi_cells_wifi_func", "wait IP_READY", socket.dft())
|
|
-- 在此处阻塞等待默认网卡连接成功的消息"IP_READY"
|
|
-- 或者等待1秒超时退出阻塞等待状态;
|
|
-- 注意：此处的1000毫秒超时不要修改的更长；
|
|
-- 因为当使用exnetif.set_priority_order配置多个网卡连接外网的优先级时，会隐式的修改默认使用的网卡
|
|
-- 当exnetif.set_priority_order的调用时序和此处的socket.adapter(socket.dft())判断时序有可能不匹配
|
|
-- 此处的1秒，能够保证，即使时序不匹配，也能1秒钟退出阻塞状态，再去判断socket.adapter(socket.dft())
|
|
sys.waitUntil("IP_READY", 1000)
|
|
end
|
|
|
|
-- 检测到了IP_READY消息
|
|
log.info("airlbs_multi_cells_wifi_func", "recv IP_READY", socket.dft())
|
|
|
|
socket.sntp() --进行NTP授时
|
|
sys.waitUntil("NTP_UPDATE", 1000)
|
|
|
|
-- 如需wifi定位,需要硬件以及固件支持wifi扫描功能
|
|
local wifi_info = nil
|
|
if wlan then
|
|
wlan.init()--初始化wlan
|
|
wlan.scan()--扫描wifi
|
|
sys.waitUntil("WLAN_SCAN_DONE", timeout * 1000)--等待扫描完成
|
|
wifi_info = wlan.scanResult()--获取扫描结果
|
|
log.info("scan", "wifi_info", #wifi_info)--打印扫描结果
|
|
end
|
|
|
|
while 1 do
|
|
local result, data = airlbs.request({
|
|
project_id = airlbs_project_id,-- 项目ID
|
|
project_key = airlbs_project_key,-- 项目密钥
|
|
wifi_info = wifi_info,-- wifi信息
|
|
timeout = timeout * 1000,-- 实际的超时时间(单位：ms)
|
|
})
|
|
if result then
|
|
local data_str = json.encode(data)
|
|
log.info("airlbs多基站+多wifi定位返回的经纬度数据为", data_str)-- 解析经纬度
|
|
lat = data_str:match("\"lat\":([0-9.-]+)")-- 匹配lat
|
|
log.info("airlbs", "lat", lat)-- 打印lat
|
|
lng = data_str:match("\"lng\":([0-9.-]+)")-- 匹配lng
|
|
log.info("airlbs", "lng", lng)-- 打印lng
|
|
else
|
|
log.warn("请检查project_id和project_key")-- 打印提示信息
|
|
end
|
|
--获取具体地址
|
|
local result, address = airlbs.get_address({
|
|
lat = lat,
|
|
lng = lng
|
|
})
|
|
if result then
|
|
log.info("airlbs.get_address", address)
|
|
else
|
|
log.info("airlbs.get_address失败", address)
|
|
end
|
|
|
|
sys.wait(60000)
|
|
-- 循环60S一次基站+wifi定位，此处设置定位请求间隔为60S非必须，请求频率可根据自己所购买的套餐进行计算，超过频次的定位请求均会返回定位失败。返回错误码，不包含位置信息。
|
|
end
|
|
|
|
end
|
|
|
|
--多基站定位
|
|
sys.taskInit(airlbs_multi_cells_task_func)
|
|
|
|
--多基站+多wifi定位
|
|
sys.taskInit(airlbs_multi_cells_wifi_task_func)
|