|
@@ -1,125 +1,67 @@
|
|
|
--- LuaTools需要PROJECT和VERSION这两个信息
|
|
|
|
|
-PROJECT = "ble"
|
|
|
|
|
-VERSION = "1.0.0"
|
|
|
|
|
|
|
+--[[
|
|
|
|
|
+@module main
|
|
|
|
|
+@summary LuatOS用户应用脚本文件入口,总体调度应用逻辑
|
|
|
|
|
+@version 1.0
|
|
|
|
|
+@date 2025.07.01
|
|
|
|
|
+@author wangshihao
|
|
|
|
|
+@usage
|
|
|
|
|
+本demo演示的核心功能为:
|
|
|
|
|
+Air8000的BLE从机模式,通过示例演示了如何发送通知,以及如何通过手机对从机设备进行读写操作。
|
|
|
|
|
|
|
|
--- 引入必要的库文件(lua编写), 内部库不需要require
|
|
|
|
|
-sys = require("sys")
|
|
|
|
|
|
|
+更多说明参考本目录下的readme.md文件
|
|
|
|
|
+]]
|
|
|
|
|
|
|
|
-log.info("main", "project name is ", PROJECT, "version is ", VERSION)
|
|
|
|
|
-
|
|
|
|
|
--- 通过boot按键方便刷Air8000S
|
|
|
|
|
-function PWR8000S(val) gpio.set(23, val) end
|
|
|
|
|
-
|
|
|
|
|
-gpio.debounce(0, 1000)
|
|
|
|
|
-gpio.setup(0, function()
|
|
|
|
|
- sys.taskInit(function()
|
|
|
|
|
- log.info("复位Air8000S")
|
|
|
|
|
- PWR8000S(0)
|
|
|
|
|
- sys.wait(20)
|
|
|
|
|
- PWR8000S(1)
|
|
|
|
|
- end)
|
|
|
|
|
-end, gpio.PULLDOWN)
|
|
|
|
|
|
|
+--[[
|
|
|
|
|
+必须定义PROJECT和VERSION变量,Luatools工具会用到这两个变量,远程升级功能也会用到这两个变量
|
|
|
|
|
+PROJECT:项目名,ascii string类型
|
|
|
|
|
+ 可以随便定义,只要不使用,就行
|
|
|
|
|
+VERSION:项目版本号,ascii string类型
|
|
|
|
|
+ 如果使用合宙iot.openluat.com进行远程升级,必须按照"XXX.YYY.ZZZ"三段格式定义:
|
|
|
|
|
+ X、Y、Z各表示1位数字,三个X表示的数字可以相同,也可以不同,同理三个Y和三个Z表示的数字也是可以相同,可以不同
|
|
|
|
|
+ 因为历史原因,YYY这三位数字必须存在,但是没有任何用处,可以一直写为000
|
|
|
|
|
+ 如果不使用合宙iot.openluat.com进行远程升级,根据自己项目的需求,自定义格式即可
|
|
|
|
|
+]]
|
|
|
|
|
+PROJECT = "ble_peripheral"
|
|
|
|
|
+VERSION = "001.000.000"
|
|
|
|
|
|
|
|
-local att_db = { -- Service
|
|
|
|
|
- string.fromHex("FA00"), -- Service UUID
|
|
|
|
|
- -- Characteristic
|
|
|
|
|
- { -- Characteristic 1
|
|
|
|
|
- string.fromHex("EA01"), -- Characteristic UUID Value
|
|
|
|
|
- ble.NOTIFY | ble.READ | ble.WRITE -- Properties
|
|
|
|
|
- }, { -- Characteristic 2
|
|
|
|
|
- string.fromHex("EA02"), ble.WRITE
|
|
|
|
|
- }, { -- Characteristic 3
|
|
|
|
|
- string.fromHex("EA03"), ble.READ
|
|
|
|
|
- }, { -- Characteristic 4
|
|
|
|
|
- string.fromHex("EA04"), ble.IND | ble.READ
|
|
|
|
|
- }
|
|
|
|
|
-}
|
|
|
|
|
-
|
|
|
|
|
-ble_stat = false
|
|
|
|
|
|
|
+log.info("main", "project name is ", PROJECT, "version is ", VERSION)
|
|
|
|
|
|
|
|
-local function ble_callback(dev, evt, param)
|
|
|
|
|
- if evt == ble.EVENT_CONN then
|
|
|
|
|
- log.info("ble", "connect 成功", param, param and param.addr and param.addr:toHex() or "unknow")
|
|
|
|
|
- ble_stat = true
|
|
|
|
|
- elseif evt == ble.EVENT_DISCONN then
|
|
|
|
|
- log.info("ble", "disconnect")
|
|
|
|
|
- ble_stat = false
|
|
|
|
|
- -- 1秒后重新开始广播
|
|
|
|
|
- sys.timerStart(function() dev:adv_start() end, 1000)
|
|
|
|
|
- elseif evt == ble.EVENT_WRITE then
|
|
|
|
|
- -- 收到写请求
|
|
|
|
|
- log.info("ble", "接收到写请求", param.uuid_service:toHex(), param.uuid_characteristic:toHex(), param.data:toHex())
|
|
|
|
|
- end
|
|
|
|
|
|
|
+-- 如果内核固件支持wdt看门狗功能,此处对看门狗进行初始化和定时喂狗处理
|
|
|
|
|
+-- 如果脚本程序死循环卡死,就会无法及时喂狗,最终会自动重启
|
|
|
|
|
+if wdt then
|
|
|
|
|
+ --配置喂狗超时时间为9秒钟
|
|
|
|
|
+ wdt.init(9000)
|
|
|
|
|
+ --启动一个循环定时器,每隔3秒钟喂一次狗
|
|
|
|
|
+ sys.timerLoopStart(wdt.feed, 3000)
|
|
|
end
|
|
end
|
|
|
|
|
|
|
|
-local bt_scan = false -- 是否扫描蓝牙
|
|
|
|
|
-
|
|
|
|
|
-sys.taskInit(function()
|
|
|
|
|
- local ret = 0
|
|
|
|
|
- sys.wait(500)
|
|
|
|
|
- log.info("开始初始化蓝牙核心")
|
|
|
|
|
- bluetooth_device = bluetooth.init()
|
|
|
|
|
- sys.wait(100)
|
|
|
|
|
- log.info("初始化BLE功能")
|
|
|
|
|
- ble_device = bluetooth_device:ble(ble_callback)
|
|
|
|
|
- if ble_device == nil then
|
|
|
|
|
- log.error("当前固件不支持完整的BLE")
|
|
|
|
|
- return
|
|
|
|
|
- end
|
|
|
|
|
- sys.wait(100)
|
|
|
|
|
|
|
+-- 如果内核固件支持errDump功能,此处进行配置,【强烈建议打开此处的注释】
|
|
|
|
|
+-- 因为此功能模块可以记录并且上传脚本在运行过程中出现的语法错误或者其他自定义的错误信息,可以初步分析一些设备运行异常的问题
|
|
|
|
|
+-- 以下代码是最基本的用法,更复杂的用法可以详细阅读API说明文档
|
|
|
|
|
+-- 启动errDump日志存储并且上传功能,600秒上传一次
|
|
|
|
|
+-- if errDump then
|
|
|
|
|
+-- errDump.config(true, 600)
|
|
|
|
|
+-- end
|
|
|
|
|
|
|
|
- log.info('开始创建GATT')
|
|
|
|
|
- ret = ble_device:gatt_create(att_db)
|
|
|
|
|
- log.info("创建的GATT", ret)
|
|
|
|
|
|
|
|
|
|
- sys.wait(100)
|
|
|
|
|
- log.info("开始设置广播内容")
|
|
|
|
|
- ble_device:adv_create({
|
|
|
|
|
- addr_mode = ble.PUBLIC,
|
|
|
|
|
- channel_map = ble.CHNLS_ALL,
|
|
|
|
|
- intv_min = 120,
|
|
|
|
|
- intv_max = 120,
|
|
|
|
|
- adv_data = {
|
|
|
|
|
- {ble.FLAGS, string.char(0x06)},
|
|
|
|
|
- {ble.COMPLETE_LOCAL_NAME, "LuatOS123"},
|
|
|
|
|
- {ble.SERVICE_DATA, string.fromHex("FE01")},
|
|
|
|
|
- {ble.MANUFACTURER_SPECIFIC_DATA, string.fromHex("05F0")}
|
|
|
|
|
- }
|
|
|
|
|
- })
|
|
|
|
|
|
|
+-- 使用LuatOS开发的任何一个项目,都强烈建议使用远程升级FOTA功能
|
|
|
|
|
+-- 可以使用合宙的iot.openluat.com平台进行远程升级
|
|
|
|
|
+-- 也可以使用客户自己搭建的平台进行远程升级
|
|
|
|
|
+-- 远程升级的详细用法,可以参考fota的demo进行使用
|
|
|
|
|
|
|
|
- sys.wait(100)
|
|
|
|
|
- log.info("开始广播")
|
|
|
|
|
- ble_device:adv_start()
|
|
|
|
|
|
|
+-- 启动一个循环定时器
|
|
|
|
|
+-- 每隔3秒钟打印一次总内存,实时的已使用内存,历史最高的已使用内存情况
|
|
|
|
|
+-- 方便分析内存使用是否有异常
|
|
|
|
|
+-- sys.timerLoopStart(function()
|
|
|
|
|
+-- log.info("mem.lua", rtos.meminfo())
|
|
|
|
|
+-- log.info("mem.sys", rtos.meminfo("sys"))
|
|
|
|
|
+-- end, 3000)
|
|
|
|
|
|
|
|
-
|
|
|
|
|
- -- 放入预设值, 注意是有READ属性的特性才能读取
|
|
|
|
|
- -- 手机APP设置MTU到256
|
|
|
|
|
- local wt = {
|
|
|
|
|
- uuid_service = string.fromHex("FA00"),
|
|
|
|
|
- uuid_characteristic = string.fromHex("EA01"),
|
|
|
|
|
- }
|
|
|
|
|
- ble_device:write_value(wt, "12345678901234567890")
|
|
|
|
|
|
|
+-- 如果需要升级WIFI固件,请打开下面注释
|
|
|
|
|
+require "check_wifi"
|
|
|
|
|
|
|
|
- while 1 do
|
|
|
|
|
- sys.wait(3000)
|
|
|
|
|
- if ble_stat then
|
|
|
|
|
- local wt = {
|
|
|
|
|
- uuid_service = string.fromHex("FA00"),
|
|
|
|
|
- uuid_characteristic = string.fromHex("EA01"),
|
|
|
|
|
- }
|
|
|
|
|
- local result = ble_device:write_notify(wt, "123456" .. os.date())
|
|
|
|
|
- log.info("ble", "发送数据", result)
|
|
|
|
|
- else
|
|
|
|
|
- -- log.info("等待连接成功之后发送数据")
|
|
|
|
|
- end
|
|
|
|
|
-
|
|
|
|
|
- local wt = {
|
|
|
|
|
- uuid_service = string.fromHex("FA00"),
|
|
|
|
|
- uuid_characteristic = string.fromHex("EA03"),
|
|
|
|
|
- }
|
|
|
|
|
- ble_device:write_value(wt, "8888 123454")
|
|
|
|
|
- end
|
|
|
|
|
-end)
|
|
|
|
|
|
|
+-- 加载 peripheral 蓝牙功能模块
|
|
|
|
|
+require "ble_peripheral"
|
|
|
|
|
|
|
|
-- 用户代码已结束---------------------------------------------
|
|
-- 用户代码已结束---------------------------------------------
|
|
|
-- 结尾总是这一句
|
|
-- 结尾总是这一句
|