577 lines
12 KiB
C++
577 lines
12 KiB
C++
#include "AP0802.h"
|
||
|
||
#include "Kernel\Task.h"
|
||
|
||
#include "Device\WatchDog.h"
|
||
#include "Config.h"
|
||
|
||
#include "Drivers\NRF24L01.h"
|
||
#include "Drivers\W5500.h"
|
||
#include "Drivers\Esp8266\Esp8266.h"
|
||
|
||
#include "TokenNet\TokenController.h"
|
||
#include "..\TinyNet\TinyConfig.h"
|
||
#include "..\App\FlushPort.h"
|
||
|
||
AP0802 * AP0802::Current = nullptr;
|
||
static TokenClient* Client = nullptr; // 令牌客户端
|
||
|
||
AP0802::AP0802()
|
||
{
|
||
Host = nullptr;
|
||
HostAP = nullptr;
|
||
Client = nullptr;
|
||
|
||
Data = nullptr;
|
||
Size = 0;
|
||
// Control 打开情况标识
|
||
NetMaster = false;
|
||
NetBra = false;
|
||
EspMaster = false;
|
||
EspBra = false;
|
||
Current = this;
|
||
|
||
HardwareVer = HardwareVerLast;
|
||
}
|
||
|
||
void AP0802::Init(ushort code, cstring name, COM message)
|
||
{
|
||
auto& sys = (TSys&)Sys;
|
||
sys.Code = code;
|
||
sys.Name = (char*)name;
|
||
|
||
// 初始化系统
|
||
sys.Init();
|
||
#if DEBUG
|
||
sys.MessagePort = message; // 指定printf输出的串口
|
||
Sys.ShowInfo();
|
||
|
||
WatchDog::Start(20000, 10000);
|
||
#else
|
||
WatchDog::Start();
|
||
#endif
|
||
|
||
// 系统休眠时自动进入低功耗
|
||
Power::AttachTimeSleep();
|
||
|
||
// Flash最后一块作为配置区
|
||
Config::Current = &Config::CreateFlash();
|
||
|
||
if (HardwareVer == HardwareVerLast)
|
||
{
|
||
LedPins.Add(PE5);
|
||
LedPins.Add(PE4);
|
||
LedPins.Add(PD0);
|
||
|
||
ButtonPins.Add(PE9);
|
||
ButtonPins.Add(PE14);
|
||
}
|
||
|
||
if (HardwareVer <= HardwareVerAt160712)
|
||
{
|
||
LedPins.Add(PE5);
|
||
LedPins.Add(PE4);
|
||
LedPins.Add(PD0);
|
||
|
||
ButtonPins.Add(PE13);
|
||
ButtonPins.Add(PE14);
|
||
}
|
||
}
|
||
|
||
void* AP0802::InitData(void* data, int size)
|
||
{
|
||
// 启动信息
|
||
auto hot = &HotConfig::Current();
|
||
hot->Times++;
|
||
|
||
data = hot->Next();
|
||
if (hot->Times == 1)
|
||
{
|
||
Buffer ds(data, size);
|
||
ds.Clear();
|
||
ds[0] = size;
|
||
}
|
||
|
||
Data = data;
|
||
Size = size;
|
||
|
||
return data;
|
||
}
|
||
|
||
void AP0802::InitLeds()
|
||
{
|
||
for (int i = 0; i < LedPins.Count(); i++)
|
||
{
|
||
auto port = new OutputPort(LedPins[i]);
|
||
port->Open();
|
||
Leds.Add(port);
|
||
}
|
||
}
|
||
|
||
void ButtonOnpress(InputPort* port, bool down, void* param)
|
||
{
|
||
if (port->PressTime > 1000)
|
||
AP0802::OnLongPress(port, down);
|
||
}
|
||
|
||
static void OnAlarm(AlarmItem& item)
|
||
{
|
||
// 1长度n + 1类型 + 1偏移 + (n-2)数据
|
||
auto bs = item.GetData();
|
||
debug_printf("OnAlarm ");
|
||
bs.Show(true);
|
||
|
||
if (bs[1] == 0x06)
|
||
{
|
||
auto client = Client;
|
||
client->Store.Write(bs[2], bs.Sub(3, bs[0] - 2));
|
||
|
||
// 主动上报状态
|
||
client->ReportAsync(bs[2], bs[0] - 2);
|
||
}
|
||
}
|
||
|
||
void AP0802::InitAlarm()
|
||
{
|
||
if (!Client)return;
|
||
|
||
if (!AlarmObj)AlarmObj = new Alarm();
|
||
Client->Register("Policy/AlarmSet", &Alarm::Set, AlarmObj);
|
||
Client->Register("Policy/AlarmGet", &Alarm::Get, AlarmObj);
|
||
|
||
AlarmObj->OnAlarm = OnAlarm;
|
||
AlarmObj->Start();
|
||
}
|
||
|
||
void AP0802::InitButtons(const Delegate2<InputPort&, bool>& press)
|
||
{
|
||
for (int i = 0; i < ButtonPins.Count(); i++)
|
||
{
|
||
auto port = new InputPort(ButtonPins[i]);
|
||
port->Invert = true;
|
||
port->Index = i;
|
||
port->Press = press;
|
||
port->UsePress();
|
||
port->Open();
|
||
Buttons.Add(port);
|
||
}
|
||
}
|
||
|
||
ISocketHost* AP0802::Create5500()
|
||
{
|
||
debug_printf("\r\nW5500::Create \r\n");
|
||
|
||
auto host = new W5500(Spi2, PE1, PD13);
|
||
host->NetReady.Bind(&AP0802::OpenClient, this);
|
||
|
||
return host;
|
||
}
|
||
|
||
ISocketHost* AP0802::Create8266(bool apOnly)
|
||
{
|
||
auto host = new Esp8266(COM4, PE0, PD3);
|
||
|
||
// 初次需要指定模式 否则为 Wire
|
||
bool join = host->SSID && *host->SSID;
|
||
//if (!join) host->Mode = SocketMode::AP;
|
||
if (!join)
|
||
{
|
||
*host->SSID = "WSWL";
|
||
*host->Pass = "12345678";
|
||
|
||
host->Mode = SocketMode::STA_AP;
|
||
host->WorkMode = SocketMode::STA_AP;
|
||
}
|
||
|
||
// 绑定委托，避免5500没有连接时导致没有启动客户端
|
||
host->NetReady.Bind(&AP0802::OpenClient, this);
|
||
|
||
Client->Register("SetWiFi", &Esp8266::SetWiFi, host);
|
||
Client->Register("GetWiFi", &Esp8266::GetWiFi, host);
|
||
|
||
host->OpenAsync();
|
||
|
||
return host;
|
||
}
|
||
|
||
/******************************** Token ********************************/
|
||
|
||
void AP0802::InitClient()
|
||
{
|
||
if (Client) return;
|
||
|
||
auto tk = TokenConfig::Current;
|
||
|
||
// 创建客户端
|
||
auto client = new TokenClient();
|
||
client->Cfg = tk;
|
||
|
||
// 需要使用本地连接
|
||
//client->UseLocal();
|
||
//配置闹钟
|
||
InitAlarm();
|
||
|
||
Client = client;
|
||
Client->MaxNotActive = 480000;
|
||
// 重启
|
||
Client->Register("Gateway/Restart", &TokenClient::InvokeRestart, Client);
|
||
// 重置
|
||
Client->Register("Gateway/Reset", &TokenClient::InvokeReset, Client);
|
||
// 设置远程地址
|
||
Client->Register("Gateway/SetRemote", &TokenClient::InvokeSetRemote, Client);
|
||
// 获取远程配置信息
|
||
Client->Register("Gateway/GetRemote", &TokenClient::InvokeGetRemote, Client);
|
||
// 获取所有Ivoke命令
|
||
Client->Register("Api/All", &TokenClient::InvokeGetAllApi, Client);
|
||
|
||
if (Data && Size > 0)
|
||
{
|
||
auto& ds = Client->Store;
|
||
ds.Data.Set(Data, Size);
|
||
}
|
||
|
||
// 如果若干分钟后仍然没有打开令牌客户端，则重启系统
|
||
Sys.AddTask(
|
||
[](void* p) {
|
||
auto& client = *(TokenClient*)p;
|
||
if (!client.Opened)
|
||
{
|
||
debug_printf("联网超时，准备重启系统！\r\n\r\n");
|
||
Sys.Reboot();
|
||
}
|
||
},
|
||
client, 8 * 60 * 1000, -1, "联网检查");
|
||
}
|
||
|
||
void AP0802::Register(int index, IDataPort& dp)
|
||
{
|
||
if (!Client) return;
|
||
|
||
auto& ds = Client->Store;
|
||
ds.Register(index, dp);
|
||
}
|
||
|
||
/*
|
||
// Control 打开情况标识
|
||
bool NetMaster;
|
||
bool NetBra;
|
||
bool EspMaster;
|
||
bool EspBra;
|
||
*/
|
||
void AP0802::OpenClient(ISocketHost& host)
|
||
{
|
||
/*
|
||
Flag 四个字节 最高字节标识esp作为Master 第二字节标识esp广播Controller
|
||
第三字节为 w5500 作为Master 第四字节为 w5500 广播端口
|
||
*/
|
||
|
||
assert(Client, "Client");
|
||
debug_printf("\r\n OpenClient \r\n");
|
||
|
||
// 网络就绪后，打开指示灯
|
||
auto net = dynamic_cast<W5500*>(&host);
|
||
if (net && !net->Led) net->SetLed(*Leds[0]);
|
||
|
||
auto esp = dynamic_cast<Esp8266*>(&host);
|
||
if (esp && !esp->Led) esp->SetLed(*Leds[1]);
|
||
|
||
auto tk = TokenConfig::Current;
|
||
NetUri uri(NetType::Udp, IPAddress::Broadcast(), 3355);
|
||
|
||
// 避免重复打开
|
||
if (Host)
|
||
{
|
||
if (Host == esp) // 8266 作为Host的时候 使用 Master 和广播端口两个 HostAP 为空
|
||
{
|
||
if (esp->Joined && !EspMaster)
|
||
{
|
||
AddControl(*Host, tk->Uri(), 0); // 如果 Host 是 ESP8266 则要求 JoinAP 完成才能添加主控制器
|
||
EspMaster = true;
|
||
}
|
||
if (!EspBra)
|
||
{
|
||
AddControl(*Host, uri, tk->Port);
|
||
EspBra = true;
|
||
}
|
||
}
|
||
|
||
if (Host == net) // w5500 作为Host的时候 使用Master和广播两个端口 HostAP 开启AP时非空 打开其内网端口
|
||
{
|
||
if (!NetMaster)
|
||
{
|
||
AddControl(*Host, tk->Uri(), 0); // 如果 Host 是 W5500 打开了就直接允许添加Master
|
||
NetMaster = true;
|
||
}
|
||
if (!NetBra)
|
||
{
|
||
AddControl(*Host, uri, tk->Port);
|
||
NetBra = true;
|
||
}
|
||
}
|
||
|
||
if (HostAP && HostAP == esp) // 只使用esp的时候HostAp为空
|
||
{
|
||
if (!EspBra)
|
||
{
|
||
AddControl(*Host, uri, tk->Port);
|
||
EspBra = true;
|
||
}
|
||
}
|
||
|
||
if (!Client->Opened)
|
||
Client->Open();
|
||
else
|
||
Client->AttachControls();
|
||
|
||
// if(!esp && Host == esp && esp->Joined)AddControl(*Host, tk->Uri(), 0); // 如果 Host 是 ESP8266 则要求 JoinAP 完成才能添加主控制器
|
||
// if(!net && Host == net)AddControl(*Host, tk->Uri(), 0);
|
||
// AddControl(*Host, uri, tk->Port);
|
||
//
|
||
// Client->Open();
|
||
}
|
||
|
||
// if(HostAP && esp)
|
||
// {
|
||
// auto ctrl = AddControl(*HostAP, uri, tk->Port);
|
||
//
|
||
// // 如果没有主机，这里打开令牌客户端，为组网做准备
|
||
// if (!Host)
|
||
// Client->Open();
|
||
// else
|
||
// Client->AttachControls();
|
||
//
|
||
// // 假如来迟了，客户端已经打开，那么自己挂载事件
|
||
// if(Client->Opened && Client->Master)
|
||
// {
|
||
// ctrl->Received = Client->Master->Received;
|
||
// ctrl->Open();
|
||
// }
|
||
// }
|
||
}
|
||
|
||
TokenController* AP0802::AddControl(ISocketHost& host, const NetUri& uri, ushort localPort)
|
||
{
|
||
// 创建连接服务器的Socket
|
||
auto socket = host.CreateRemote(uri);
|
||
|
||
// 创建连接服务器的控制器
|
||
auto ctrl = new TokenController();
|
||
//ctrl->Port = dynamic_cast<ITransport*>(socket);
|
||
ctrl->Socket = socket;
|
||
|
||
// 创建客户端
|
||
auto client = Client;
|
||
if (localPort == 0)
|
||
client->Master = ctrl;
|
||
else
|
||
{
|
||
socket->Local.Port = localPort;
|
||
ctrl->ShowRemote = true;
|
||
client->Controls.Add(ctrl);
|
||
}
|
||
|
||
return ctrl;
|
||
}
|
||
|
||
/*
|
||
网络使用流程：
|
||
|
||
5500网线检测
|
||
网线连通
|
||
启动DHCP/DNS
|
||
作为Host
|
||
Host为空 或 AP/STA_AP
|
||
创建8266，加载配置
|
||
Host为空
|
||
作为Host
|
||
else STA_AP
|
||
工作模式 = AP
|
||
|
||
令牌客户端主通道
|
||
令牌客户端内网通道
|
||
*/
|
||
void OnInitNet(void* param)
|
||
{
|
||
auto& bsp = *(AP0802*)param;
|
||
|
||
// 检查是否连接网线
|
||
auto host = (W5500*)bsp.Create5500();
|
||
// 软路由的DHCP要求很严格，必须先把自己IP设为0
|
||
host->IP = IPAddress::Any();
|
||
if (host->Open())
|
||
{
|
||
host->EnableDNS();
|
||
host->EnableDHCP();
|
||
bsp.Host = host;
|
||
}
|
||
else
|
||
{
|
||
delete host;
|
||
}
|
||
|
||
// 没有接网线，需要完整WiFi通道
|
||
if (!bsp.Host)
|
||
{
|
||
auto esp = bsp.Create8266(false);
|
||
if (esp)
|
||
{
|
||
// 未组网时，主机留空，仅保留AP主机
|
||
bool join = esp->SSID && *esp->SSID;
|
||
if (join && esp->IsStation())
|
||
bsp.Host = esp;
|
||
else
|
||
bsp.HostAP = esp;
|
||
}
|
||
}
|
||
// 接了网线，同时需要AP
|
||
else if (host->IsAP())
|
||
{
|
||
// 如果Host已存在，则8266仅作为AP
|
||
auto esp = bsp.Create8266(true);
|
||
if (esp) bsp.HostAP = esp;
|
||
}
|
||
|
||
// 打开DHCP，完成时会打开客户端
|
||
//if(bsp.Host) bsp.Host->EnableDHCP();
|
||
}
|
||
|
||
void AP0802::InitNet()
|
||
{
|
||
Sys.AddTask(OnInitNet, this, 0, -1, "InitNet");
|
||
}
|
||
|
||
/******************************** 2401 ********************************/
|
||
|
||
|
||
int Fix2401(const Buffer& bs)
|
||
{
|
||
//auto& bs = *(Buffer*)param;
|
||
// 微网指令特殊处理长度
|
||
uint rs = bs.Length();
|
||
if (rs >= 8)
|
||
{
|
||
rs = bs[5] + 8;
|
||
//if(rs < bs.Length()) bs.SetLength(rs);
|
||
}
|
||
return rs;
|
||
}
|
||
|
||
ITransport* AP0802::Create2401(SPI spi_, Pin ce, Pin irq, Pin power, bool powerInvert, IDataPort* led)
|
||
{
|
||
debug_printf("\r\n Create2401 \r\n");
|
||
|
||
static Spi spi(spi_, 10000000, true);
|
||
static NRF24L01 nrf;
|
||
nrf.Init(&spi, ce, irq, power);
|
||
|
||
auto tc = TinyConfig::Create();
|
||
if (tc->Channel == 0)
|
||
{
|
||
tc->Channel = 120;
|
||
tc->Speed = 250;
|
||
}
|
||
if (tc->Interval == 0)
|
||
{
|
||
tc->Interval = 40;
|
||
tc->Timeout = 1000;
|
||
}
|
||
|
||
nrf.AutoAnswer = false;
|
||
nrf.DynPayload = false;
|
||
nrf.Channel = tc->Channel;
|
||
//nrf.Channel = 120;
|
||
nrf.Speed = tc->Speed;
|
||
|
||
nrf.FixData = Fix2401;
|
||
|
||
//if(WirelessLed) net->Led = CreateFlushPort(WirelessLed);
|
||
|
||
nrf.Master = true;
|
||
|
||
return &nrf;
|
||
}
|
||
|
||
ITransport* AP0802::Create2401()
|
||
{
|
||
auto port = new FlushPort();
|
||
port->Port = Leds[2];
|
||
return Create2401(Spi3, PD12, PE3, PE6, true, port);
|
||
}
|
||
|
||
void AP0802::Restore()
|
||
{
|
||
if (Client) Client->Reset("按键重置");
|
||
}
|
||
|
||
void AP0802::OnLongPress(InputPort* port, bool down)
|
||
{
|
||
if (down) return;
|
||
|
||
debug_printf("Press P%c%d Time=%d ms\r\n", _PIN_NAME(port->_Pin), port->PressTime);
|
||
|
||
ushort time = port->PressTime;
|
||
auto client =Client;
|
||
if (time >= 5000 && time < 10000)
|
||
{
|
||
if (client) client->Reset("按键重置");
|
||
}
|
||
else if (time >= 3000)
|
||
{
|
||
if (client) client->Reboot("按键重启");
|
||
Sys.Reboot(1000);
|
||
}
|
||
}
|
||
|
||
/*
|
||
网络使用流程：
|
||
|
||
5500网线检测
|
||
网线连通
|
||
启动DHCP
|
||
作为Host
|
||
Host为空 或 AP/STA_AP
|
||
创建8266，加载配置
|
||
Host为空
|
||
作为Host
|
||
else STA_AP
|
||
工作模式 = AP
|
||
打开8266
|
||
STA/STA_AP
|
||
SSID != null
|
||
JoinWiFi
|
||
else
|
||
工作模式 = AP
|
||
AP/STA_AP
|
||
SetAP
|
||
|
||
令牌客户端主通道
|
||
令牌客户端内网通道
|
||
*/
|
||
|
||
/*
|
||
NRF24L01+ (SPI3) | W5500 (SPI2)
|
||
NSS | NSS
|
||
CLK | SCK
|
||
MISO | MISO
|
||
MOSI | MOSI
|
||
PE3 IRQ | PE1 INT(IRQ)
|
||
PD12 CE | PD13 NET_NRST
|
||
PE6 POWER | POWER
|
||
|
||
ESP8266 (COM4)
|
||
TX
|
||
RX
|
||
PD3 RST
|
||
PE2 POWER
|
||
|
||
KEY1
|
||
KEY2
|
||
|
||
LED1
|
||
LED2
|
||
LED3
|
||
|
||
USB
|
||
PA11 PA12
|
||
*/
|