mirror of
https://github.com/OpenEPaperLink/OpenEPaperLink.git
synced 2026-03-23 21:07:12 +01:00
822 lines
30 KiB
C
Executable File
822 lines
30 KiB
C
Executable File
#define __packed
|
|
#include <stdbool.h>
|
|
#include <stddef.h>
|
|
#include <stdint.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "asmUtil.h"
|
|
#include "board.h"
|
|
#include "comms.h"
|
|
#include "cpu.h"
|
|
#include "printf.h"
|
|
#include "proto.h"
|
|
#include "radio.h"
|
|
#include "timer.h"
|
|
#include "uart.h"
|
|
#include "wdt.h"
|
|
|
|
#if (HAS_SCREEN == 1)
|
|
#include "APDisplay.h"
|
|
#endif
|
|
|
|
#if (AP_EMULATE_TAG == 1)
|
|
#include "emulateTag.h"
|
|
#endif
|
|
|
|
#define MAX_PENDING_MACS 50
|
|
#define HOUSEKEEPING_INTERVAL 60UL
|
|
|
|
struct pendingData __xdata pendingDataArr[MAX_PENDING_MACS];
|
|
|
|
// VERSION GOES HERE!
|
|
uint16_t __xdata version = 0x0017;
|
|
|
|
#define RAW_PKT_PADDING 2
|
|
|
|
static uint8_t __xdata mRxBuf[COMMS_MAX_PACKET_SZ];
|
|
|
|
uint8_t __xdata radiotxbuffer[128];
|
|
uint8_t __xdata radiorxbuffer[128];
|
|
|
|
uint8_t __xdata mSelfMac[8];
|
|
|
|
static uint32_t __xdata housekeepingTimer;
|
|
|
|
struct blockRequest __xdata requestedData = {0}; // holds which data was requested by the tag
|
|
|
|
uint8_t __xdata dstMac[8]; // target for the block transfer
|
|
uint16_t __xdata dstPan; //
|
|
|
|
static uint32_t __xdata blockStartTimer = 0; // reference that holds when the AP sends the next block
|
|
extern bool __idata serialBypassActive; // if the serial bypass is disabled, saves bytes straight to the block buffer
|
|
uint32_t __xdata nextBlockAttempt = 0; // reference time for when the AP can request a new block from the ESP32
|
|
uint8_t seq = 0; // holds current sequence number for transmission
|
|
uint8_t __xdata blockbuffer[BLOCK_XFER_BUFFER_SIZE + 5]; // block transfer buffer
|
|
uint8_t lastAckMac[8] = {0};
|
|
|
|
uint8_t *__xdata blockXferBuffer = blockbuffer;
|
|
|
|
// these variables hold the current mac were talking to
|
|
#define CONCURRENT_REQUEST_DELAY 1200UL * TIMER_TICKS_PER_MS
|
|
uint32_t __xdata lastBlockRequest = 0;
|
|
uint8_t __xdata lastBlockMac[8];
|
|
|
|
uint8_t __xdata curChannel = 11;
|
|
uint8_t __xdata curPower = 10;
|
|
|
|
uint8_t __xdata curPendingData = 0;
|
|
uint8_t __xdata curNoUpdate = 0;
|
|
|
|
void sendXferCompleteAck(uint8_t *dst);
|
|
void sendCancelXfer(uint8_t *dst);
|
|
void espNotifyAPInfo();
|
|
|
|
// tools
|
|
void addCRC(void *p, uint8_t len) {
|
|
uint8_t total = 0;
|
|
for (uint8_t c = 1; c < len; c++) {
|
|
total += ((uint8_t *)p)[c];
|
|
}
|
|
((uint8_t *)p)[0] = total;
|
|
// pr("%d",total);
|
|
}
|
|
bool checkCRC(void *p, uint8_t len) {
|
|
uint8_t total = 0;
|
|
for (uint8_t c = 1; c < len; c++) {
|
|
total += ((uint8_t *)p)[c];
|
|
}
|
|
return ((uint8_t *)p)[0] == total;
|
|
}
|
|
void dump(uint8_t *__xdata a, uint16_t __xdata l) {
|
|
pr(" ");
|
|
#define ROWS 16
|
|
for (uint8_t c = 0; c < ROWS; c++) {
|
|
pr(" %02X", c);
|
|
timerDelay(1333);
|
|
}
|
|
pr("\n--------");
|
|
for (uint8_t c = 0; c < ROWS; c++) {
|
|
pr("---");
|
|
timerDelay(1333);
|
|
}
|
|
for (uint16_t c = 0; c < l; c++) {
|
|
timerDelay(1333);
|
|
if ((c % ROWS) == 0) {
|
|
pr("\n0x%04X | ", c);
|
|
}
|
|
pr("%02X ", a[c]);
|
|
}
|
|
pr("\n--------");
|
|
for (uint8_t c = 0; c < ROWS; c++) {
|
|
pr("---");
|
|
timerDelay(1333);
|
|
}
|
|
pr("\n");
|
|
}
|
|
uint8_t __xdata getPacketType(void *__xdata buffer) {
|
|
struct MacFcs *__xdata fcs = buffer;
|
|
if ((fcs->frameType == 1) && (fcs->destAddrType == 2) && (fcs->srcAddrType == 3) && (fcs->panIdCompressed == 0)) {
|
|
// broadcast frame
|
|
uint8_t __xdata type = ((uint8_t *)buffer)[sizeof(struct MacFrameBcast)];
|
|
return type;
|
|
} else if ((fcs->frameType == 1) && (fcs->destAddrType == 3) && (fcs->srcAddrType == 3) && (fcs->panIdCompressed == 1)) {
|
|
// normal frame
|
|
uint8_t __xdata type = ((uint8_t *)buffer)[sizeof(struct MacFrameNormal)];
|
|
return type;
|
|
}
|
|
return 0;
|
|
}
|
|
uint8_t getBlockDataLength() {
|
|
uint8_t partNo = 0;
|
|
for (uint8_t c = 0; c < BLOCK_MAX_PARTS; c++) {
|
|
if (requestedData.requestedParts[c / 8] & (1 << (c % 8))) {
|
|
partNo++;
|
|
}
|
|
}
|
|
return partNo;
|
|
}
|
|
|
|
// pendingdata slot stuff
|
|
int8_t findSlotForMac(const uint8_t *mac) {
|
|
for (uint8_t __xdata c = 0; c < MAX_PENDING_MACS; c++) {
|
|
// if (u64_isEq((uint64_t __xdata *)mac, (uint64_t __xdata *)&(pendingDataArr[c].targetMac))) { // this costs 1 sloc :(
|
|
if (memcmp(mac, ((uint8_t __xdata *)&(pendingDataArr[c].targetMac)), 8) == 0) {
|
|
if (pendingDataArr[c].attemptsLeft != 0) {
|
|
return c;
|
|
}
|
|
}
|
|
}
|
|
return -1;
|
|
}
|
|
int8_t findFreeSlot() {
|
|
for (uint8_t __xdata c = 0; c < MAX_PENDING_MACS; c++) {
|
|
if (pendingDataArr[c].attemptsLeft == 0) {
|
|
return c;
|
|
}
|
|
}
|
|
return -1;
|
|
}
|
|
int8_t findSlotForVer(const uint8_t *ver) {
|
|
for (uint8_t __xdata c = 0; c < MAX_PENDING_MACS; c++) {
|
|
// if (u64_isEq((uint64_t __xdata *)ver, (uint64_t __xdata *)&(pendingDataArr[c].availdatainfo.dataVer))) {
|
|
if (memcmp(ver, ((uint8_t __xdata *)&(pendingDataArr[c].availdatainfo.dataVer)), 8) == 0) {
|
|
if (pendingDataArr[c].attemptsLeft != 0) return c;
|
|
}
|
|
}
|
|
return -1;
|
|
}
|
|
void deleteAllPendingDataForVer(const uint8_t *ver) {
|
|
int8_t slot = -1;
|
|
do {
|
|
slot = findSlotForVer(ver);
|
|
if (slot != -1) pendingDataArr[slot].attemptsLeft = 0;
|
|
} while (slot != -1);
|
|
}
|
|
void deleteAllPendingDataForMac(const uint8_t *mac) {
|
|
int8_t slot = -1;
|
|
do {
|
|
slot = findSlotForMac(mac);
|
|
if (slot != -1) pendingDataArr[slot].attemptsLeft = 0;
|
|
} while (slot != -1);
|
|
}
|
|
|
|
void countSlots() {
|
|
curPendingData = 0;
|
|
curNoUpdate = 0;
|
|
for (uint8_t __xdata c = 0; c < MAX_PENDING_MACS; c++) {
|
|
if (pendingDataArr[c].attemptsLeft != 0) {
|
|
if (pendingDataArr[c].availdatainfo.dataType != 0) {
|
|
curPendingData++;
|
|
} else {
|
|
curNoUpdate++;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// processing serial data
|
|
#define ZBS_RX_WAIT_HEADER 0
|
|
#define ZBS_RX_WAIT_SDA 1 // send data avail
|
|
#define ZBS_RX_WAIT_CANCEL 2 // cancel traffic for mac
|
|
#define ZBS_RX_WAIT_SCP 3 // set channel power
|
|
|
|
extern uint8_t *__idata blockp;
|
|
void processSerial(uint8_t lastchar) {
|
|
static uint8_t __xdata cmdbuffer[4];
|
|
static uint8_t __xdata RXState = 0;
|
|
static uint8_t __xdata serialbuffer[48];
|
|
static uint8_t *__xdata serialbufferp;
|
|
static uint8_t __xdata bytesRemain = 0;
|
|
|
|
static uint32_t __xdata lastSerial = 0;
|
|
if ((timerGet() - lastSerial) > (TIMER_TICKS_PER_MS * 25)) {
|
|
RXState = ZBS_RX_WAIT_HEADER;
|
|
lastSerial = timerGet();
|
|
} else {
|
|
lastSerial = timerGet();
|
|
}
|
|
// uartTx(lastchar); echo
|
|
switch (RXState) {
|
|
case ZBS_RX_WAIT_HEADER:
|
|
// shift characters in
|
|
for (uint8_t c = 0; c < 3; c++) {
|
|
cmdbuffer[c] = cmdbuffer[c + 1];
|
|
}
|
|
cmdbuffer[3] = lastchar;
|
|
|
|
if (strncmp(cmdbuffer + 1, ">D>", 3) == 0) {
|
|
blockp = blockbuffer;
|
|
pr("ACK>\n");
|
|
serialBypassActive = true;
|
|
}
|
|
|
|
if (strncmp(cmdbuffer, "SDA>", 4) == 0) {
|
|
RXState = ZBS_RX_WAIT_SDA;
|
|
bytesRemain = sizeof(struct pendingData);
|
|
serialbufferp = serialbuffer;
|
|
break;
|
|
}
|
|
if (strncmp(cmdbuffer, "CXD>", 4) == 0) {
|
|
RXState = ZBS_RX_WAIT_CANCEL;
|
|
bytesRemain = sizeof(struct pendingData);
|
|
serialbufferp = serialbuffer;
|
|
break;
|
|
}
|
|
if (strncmp(cmdbuffer, "SCP>", 4) == 0) {
|
|
RXState = ZBS_RX_WAIT_SCP;
|
|
bytesRemain = sizeof(struct espSetChannelPower);
|
|
serialbufferp = serialbuffer;
|
|
break;
|
|
}
|
|
if (strncmp(cmdbuffer, "NFO?", 4) == 0) {
|
|
pr("ACK>");
|
|
espNotifyAPInfo();
|
|
}
|
|
if (strncmp(cmdbuffer, "RDY?", 4) == 0) {
|
|
pr("ACK>");
|
|
}
|
|
if (strncmp(cmdbuffer, "RSET", 4) == 0) {
|
|
pr("ACK>");
|
|
timerDelay(TIMER_TICKS_PER_MS * 100);
|
|
wdtDeviceReset();
|
|
}
|
|
break;
|
|
|
|
case ZBS_RX_WAIT_SDA:
|
|
*serialbufferp = lastchar;
|
|
serialbufferp++;
|
|
bytesRemain--;
|
|
if (bytesRemain == 0) {
|
|
if (checkCRC(serialbuffer, sizeof(struct pendingData))) {
|
|
struct pendingData *pd = (struct pendingData *)serialbuffer;
|
|
#if (AP_EMULATE_TAG == 1)
|
|
if (memcmp(pd->targetMac, fakeTagMac, 8) == 0) {
|
|
pr("ACK>\n");
|
|
fakePendingData(pd);
|
|
} else {
|
|
#endif
|
|
int8_t slot = findSlotForMac(pd->targetMac);
|
|
if (slot == -1) slot = findFreeSlot();
|
|
if (slot != -1) {
|
|
xMemCopyShort(&(pendingDataArr[slot]), serialbuffer, sizeof(struct pendingData));
|
|
pr("ACK>\n");
|
|
} else {
|
|
pr("NOQ>\n");
|
|
}
|
|
#if (AP_EMULATE_TAG == 1)
|
|
}
|
|
#endif
|
|
} else {
|
|
pr("NOK>\n");
|
|
}
|
|
|
|
RXState = ZBS_RX_WAIT_HEADER;
|
|
}
|
|
break;
|
|
case ZBS_RX_WAIT_CANCEL:
|
|
*serialbufferp = lastchar;
|
|
serialbufferp++;
|
|
bytesRemain--;
|
|
if (bytesRemain == 0) {
|
|
if (checkCRC(serialbuffer, sizeof(struct pendingData))) {
|
|
struct pendingData *pd = (struct pendingData *)serialbuffer;
|
|
#if (AP_EMULATE_TAG == 1 && HAS_EEPROM == 1)
|
|
if (memcmp(pd->targetMac, fakeTagMac, 8) == 0) {
|
|
fakeTagTrafficPending = false;
|
|
pr("ACK>\n");
|
|
} else {
|
|
#endif
|
|
// deleteAllPendingDataForVer((uint8_t *)&pd->availdatainfo.dataVer);
|
|
deleteAllPendingDataForMac((uint8_t *)&pd->targetMac);
|
|
pr("ACK>\n");
|
|
#if (AP_EMULATE_TAG == 1 && HAS_EEPROM == 1)
|
|
}
|
|
#endif
|
|
} else {
|
|
pr("NOK>\n");
|
|
}
|
|
|
|
RXState = ZBS_RX_WAIT_HEADER;
|
|
}
|
|
break;
|
|
case ZBS_RX_WAIT_SCP:
|
|
*serialbufferp = lastchar;
|
|
serialbufferp++;
|
|
bytesRemain--;
|
|
if (bytesRemain == 0) {
|
|
if (checkCRC(serialbuffer, sizeof(struct espSetChannelPower))) {
|
|
struct espSetChannelPower *scp = (struct espSetChannelPower *)serialbuffer;
|
|
for (uint8_t c = 0; c < sizeof(channelList); c++) {
|
|
if (channelList[c] == scp->channel) goto SCPchannelFound;
|
|
}
|
|
goto SCPfailed;
|
|
SCPchannelFound:
|
|
curChannel = scp->channel;
|
|
curPower = scp->power;
|
|
radioSetChannel(scp->channel);
|
|
radioSetTxPower(scp->power);
|
|
radioRxEnable(true, true);
|
|
pr("ACK>\n");
|
|
} else {
|
|
SCPfailed:
|
|
pr("NOK>\n");
|
|
}
|
|
RXState = ZBS_RX_WAIT_HEADER;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
// sending data to the ESP
|
|
void espBlockRequest(const struct blockRequest *br, uint8_t *src) {
|
|
struct espBlockRequest *__xdata ebr = (struct espBlockRequest *)blockbuffer;
|
|
uartTx('R');
|
|
uartTx('Q');
|
|
uartTx('B');
|
|
uartTx('>');
|
|
// u64_copy(ebr->ver, br->ver);
|
|
xMemCopy8(&(ebr->ver), &(br->ver));
|
|
xMemCopy8(&(ebr->src), src);
|
|
ebr->blockId = br->blockId;
|
|
addCRC(ebr, sizeof(struct espBlockRequest));
|
|
for (uint8_t c = 0; c < sizeof(struct espBlockRequest); c++) {
|
|
uartTx(((uint8_t *)ebr)[c]);
|
|
}
|
|
// pr("req ebr ver: %02X%02X%02X%02X%02X%02X%02X%02X\n", ((uint8_t *)&(ebr->ver))[0], ((uint8_t *)&(ebr->ver))[1], ((uint8_t *)&(ebr->ver))[2], ((uint8_t *)&(ebr->ver))[3], ((uint8_t *)&(ebr->ver))[4], ((uint8_t *)&(ebr->ver))[5], ((uint8_t *)&(ebr->ver))[6], ((uint8_t *)&(ebr->ver))[7]);
|
|
// pr("req br ver: %02X%02X%02X%02X%02X%02X%02X%02X\n", ((uint8_t *)&(br->ver))[0], ((uint8_t *)&(br->ver))[1], ((uint8_t *)&(br->ver))[2], ((uint8_t *)&(br->ver))[3], ((uint8_t *)&(br->ver))[4], ((uint8_t *)&(br->ver))[5], ((uint8_t *)&(br->ver))[6], ((uint8_t *)&(br->ver))[7]);
|
|
}
|
|
void espNotifyAvailDataReq(const struct AvailDataReq *adr, const uint8_t *src) {
|
|
uartTx('A');
|
|
uartTx('D');
|
|
uartTx('R');
|
|
uartTx('>');
|
|
|
|
struct espAvailDataReq __xdata eadr = {0};
|
|
xMemCopyShort((void *__xdata)eadr.src, (void *__xdata)src, 8);
|
|
xMemCopyShort((void *__xdata) & eadr.adr, (void *__xdata)adr, sizeof(struct AvailDataReq));
|
|
addCRC(&eadr, sizeof(struct espAvailDataReq));
|
|
for (uint8_t c = 0; c < sizeof(struct espAvailDataReq); c++) {
|
|
uartTx(((uint8_t *)eadr)[c]);
|
|
}
|
|
}
|
|
void espNotifyXferComplete(const uint8_t *src) {
|
|
struct espXferComplete exfc;
|
|
xMemCopy8(&exfc.src, src);
|
|
uartTx('X');
|
|
uartTx('F');
|
|
uartTx('C');
|
|
uartTx('>');
|
|
addCRC(&exfc, sizeof(exfc));
|
|
for (uint8_t c = 0; c < sizeof(exfc); c++) {
|
|
uartTx(((uint8_t *)exfc)[c]);
|
|
}
|
|
}
|
|
void espNotifyTimeOut(const uint8_t *src) {
|
|
struct espXferComplete exfc;
|
|
xMemCopy8(&exfc.src, src);
|
|
uartTx('X');
|
|
uartTx('T');
|
|
uartTx('O');
|
|
uartTx('>');
|
|
addCRC(&exfc, sizeof(exfc));
|
|
for (uint8_t c = 0; c < sizeof(exfc); c++) {
|
|
uartTx(((uint8_t *)exfc)[c]);
|
|
}
|
|
}
|
|
void espNotifyAPInfo() {
|
|
pr("TYP>%02X\n", HW_TYPE);
|
|
pr("VER>%04X\n", version);
|
|
pr("MAC>%02X%02X", mSelfMac[0], mSelfMac[1]);
|
|
pr("%02X%02X", mSelfMac[2], mSelfMac[3]);
|
|
pr("%02X%02X", mSelfMac[4], mSelfMac[5]);
|
|
pr("%02X%02X\n", mSelfMac[6], mSelfMac[7]);
|
|
pr("ZCH>%02X\n", curChannel);
|
|
pr("ZPW>%02X\n", curPower);
|
|
countSlots();
|
|
pr("PEN>%02X\n", curPendingData);
|
|
pr("NOP>%02X\n", curNoUpdate);
|
|
//#if (AP_EMULATE_TAG == 1)
|
|
// fakeTagCheckIn(); // removed this for now to ensure IP info is properly displayed; first tag check in now happens after the first round of housekeeping (30s)
|
|
//#endif
|
|
}
|
|
|
|
// process data from tag
|
|
void processBlockRequest(const uint8_t *buffer, uint8_t forceBlockDownload) {
|
|
struct MacFrameNormal *__xdata rxHeader = (struct MacFrameNormal *)buffer;
|
|
struct blockRequest *__xdata blockReq = (struct blockRequest *)(buffer + sizeof(struct MacFrameNormal) + 1);
|
|
if (!checkCRC(blockReq, sizeof(struct blockRequest))) return;
|
|
|
|
// check if we're already talking to this mac
|
|
if (memcmp(rxHeader->src, lastBlockMac, 8) == 0) {
|
|
lastBlockRequest = timerGet();
|
|
} else {
|
|
// we weren't talking to this mac, see if there was a transfer in progress from another mac, recently
|
|
if ((timerGet() - lastBlockRequest) > CONCURRENT_REQUEST_DELAY) {
|
|
// mark this mac as the new current mac we're talking to
|
|
xMemCopyShort((void *__xdata)lastBlockMac, (void *__xdata)rxHeader->src, 8);
|
|
lastBlockRequest = timerGet();
|
|
} else {
|
|
// we're talking to another mac, let this mac know we can't accomodate another request right now
|
|
pr("BUSY!\n");
|
|
sendCancelXfer(rxHeader->src);
|
|
return;
|
|
}
|
|
}
|
|
|
|
// check if we have data for this mac
|
|
if (findSlotForMac(rxHeader->src) == -1) {
|
|
// no data for this mac, politely tell it to fuck off
|
|
sendCancelXfer(rxHeader->src);
|
|
return;
|
|
}
|
|
|
|
bool __xdata requestDataDownload = false;
|
|
if ((blockReq->blockId != requestedData.blockId) || (!u64_isEq((const uint64_t __xdata *)&blockReq->ver, (const uint64_t __xdata *)&requestedData.ver))) {
|
|
// requested block isn't already in the buffer
|
|
requestDataDownload = true;
|
|
} else {
|
|
// requested block is already in the buffer
|
|
if (forceBlockDownload) {
|
|
if ((timerGet() - nextBlockAttempt) > (380 * TIMER_TICKS_PER_MS)) {
|
|
requestDataDownload = true;
|
|
pr("FORCED\n");
|
|
} else {
|
|
pr("IGNORED\n");
|
|
}
|
|
}
|
|
}
|
|
|
|
// copy blockrequest into requested data
|
|
memcpy(&requestedData, blockReq, sizeof(struct blockRequest));
|
|
|
|
struct MacFrameNormal *txHeader = (struct MacFrameNormal *)(radiotxbuffer + 1);
|
|
struct blockRequestAck *blockRequestAck = (struct blockRequestAck *)(radiotxbuffer + sizeof(struct MacFrameNormal) + 2);
|
|
radiotxbuffer[0] = sizeof(struct MacFrameNormal) + 1 + sizeof(struct blockRequestAck) + RAW_PKT_PADDING;
|
|
radiotxbuffer[sizeof(struct MacFrameNormal) + 1] = PKT_BLOCK_REQUEST_ACK;
|
|
|
|
if (blockStartTimer == 0) {
|
|
if (requestDataDownload) {
|
|
// check if we need to download the first block; we need to give the ESP32 some additional time to cache the file
|
|
if (blockReq->blockId == 0) {
|
|
blockRequestAck->pleaseWaitMs = 200;
|
|
} else {
|
|
blockRequestAck->pleaseWaitMs = 100;
|
|
}
|
|
} else {
|
|
// block is already in buffer
|
|
blockRequestAck->pleaseWaitMs = 50;
|
|
}
|
|
} else {
|
|
blockRequestAck->pleaseWaitMs = 50;
|
|
}
|
|
blockStartTimer = timerGet() + blockRequestAck->pleaseWaitMs * TIMER_TICKS_PER_MS;
|
|
|
|
memcpy(txHeader->src, mSelfMac, 8);
|
|
memcpy(txHeader->dst, rxHeader->src, 8);
|
|
|
|
txHeader->pan = rxHeader->pan;
|
|
txHeader->fcs.frameType = 1;
|
|
txHeader->fcs.panIdCompressed = 1;
|
|
txHeader->fcs.destAddrType = 3;
|
|
txHeader->fcs.srcAddrType = 3;
|
|
txHeader->seq = seq++;
|
|
|
|
addCRC((void *)blockRequestAck, sizeof(struct blockRequestAck));
|
|
|
|
radioTx(radiotxbuffer);
|
|
|
|
// save the target for the blockdata
|
|
memcpy(dstMac, rxHeader->src, 8);
|
|
dstPan = rxHeader->pan;
|
|
|
|
if (requestDataDownload) {
|
|
serialBypassActive = false;
|
|
espBlockRequest(&requestedData, rxHeader->src);
|
|
nextBlockAttempt = timerGet();
|
|
}
|
|
|
|
/*
|
|
pr("Req: %d [", blockReq->blockId);
|
|
for (uint8_t c = 0; c < BLOCK_MAX_PARTS; c++) {
|
|
if ((c != 0) && (c % 8 == 0)) pr("][");
|
|
if (blockReq->requestedParts[c / 8] & (1 << (c % 8))) {
|
|
pr("R");
|
|
} else {
|
|
pr(".");
|
|
}
|
|
}
|
|
pr("]\n");
|
|
*/
|
|
}
|
|
void processAvailDataReq(uint8_t *buffer) {
|
|
struct MacFrameBcast *rxHeader = (struct MacFrameBcast *)buffer;
|
|
struct AvailDataReq *availDataReq = (struct AvailDataReq *)(buffer + sizeof(struct MacFrameBcast) + 1);
|
|
|
|
if (!checkCRC(availDataReq, sizeof(struct AvailDataReq)))
|
|
return;
|
|
|
|
// prepare tx buffer to send a response
|
|
memset(radiotxbuffer, 0, sizeof(struct MacFrameNormal) + sizeof(struct AvailDataInfo) + 2); // 120);
|
|
struct MacFrameNormal *txHeader = (struct MacFrameNormal *)(radiotxbuffer + 1);
|
|
struct AvailDataInfo *availDataInfo = (struct AvailDataInfo *)(radiotxbuffer + sizeof(struct MacFrameNormal) + 2);
|
|
radiotxbuffer[0] = sizeof(struct MacFrameNormal) + 1 + sizeof(struct AvailDataInfo) + RAW_PKT_PADDING;
|
|
radiotxbuffer[sizeof(struct MacFrameNormal) + 1] = PKT_AVAIL_DATA_INFO;
|
|
|
|
// check to see if we have data available for this mac
|
|
bool haveData = false;
|
|
for (uint8_t __xdata c = 0; c < MAX_PENDING_MACS; c++) {
|
|
if (pendingDataArr[c].attemptsLeft) {
|
|
if (memcmp(pendingDataArr[c].targetMac, rxHeader->src, 8) == 0) {
|
|
haveData = true;
|
|
xMemCopyShort((void *__xdata)availDataInfo, &(pendingDataArr[c].availdatainfo), sizeof(struct AvailDataInfo));
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
// couldn't find data for this mac
|
|
if (!haveData) availDataInfo->dataType = DATATYPE_NOUPDATE;
|
|
|
|
xMemCopy8(txHeader->src, mSelfMac);
|
|
xMemCopy8(txHeader->dst, rxHeader->src);
|
|
txHeader->pan = rxHeader->dstPan;
|
|
txHeader->fcs.frameType = 1;
|
|
txHeader->fcs.panIdCompressed = 1;
|
|
txHeader->fcs.destAddrType = 3;
|
|
txHeader->fcs.srcAddrType = 3;
|
|
txHeader->seq = seq++;
|
|
addCRC(availDataInfo, sizeof(struct AvailDataInfo));
|
|
radioTx(radiotxbuffer);
|
|
memset(lastAckMac, 0, 8); // reset lastAckMac, so we can record if we've received exactly one ack packet
|
|
espNotifyAvailDataReq(availDataReq, rxHeader->src);
|
|
}
|
|
void processXferComplete(uint8_t *buffer) {
|
|
struct MacFrameNormal *rxHeader = (struct MacFrameNormal *)buffer;
|
|
sendXferCompleteAck(rxHeader->src);
|
|
if (memcmp(lastAckMac, rxHeader->src, 8) != 0) {
|
|
xMemCopyShort((void *__xdata)lastAckMac, (void *__xdata)rxHeader->src, 8);
|
|
espNotifyXferComplete(rxHeader->src);
|
|
int8_t slot = findSlotForMac(rxHeader->src);
|
|
if (slot != -1) pendingDataArr[slot].attemptsLeft = 0;
|
|
}
|
|
}
|
|
|
|
// send block data to the tag
|
|
void sendPart(uint8_t partNo) {
|
|
struct MacFrameNormal *frameHeader = (struct MacFrameNormal *)(radiotxbuffer + 1);
|
|
struct blockPart *blockPart = (struct blockPart *)(radiotxbuffer + sizeof(struct MacFrameNormal) + 2);
|
|
memset(radiotxbuffer + 1, 0, sizeof(struct blockPart) + sizeof(struct MacFrameNormal));
|
|
radiotxbuffer[sizeof(struct MacFrameNormal) + 1] = PKT_BLOCK_PART;
|
|
radiotxbuffer[0] = sizeof(struct MacFrameNormal) + sizeof(struct blockPart) + BLOCK_PART_DATA_SIZE + 1 + RAW_PKT_PADDING;
|
|
memcpy(frameHeader->src, mSelfMac, 8);
|
|
memcpy(frameHeader->dst, dstMac, 8);
|
|
blockPart->blockId = requestedData.blockId;
|
|
blockPart->blockPart = partNo;
|
|
memcpy(&(blockPart->data), blockbuffer + (partNo * BLOCK_PART_DATA_SIZE), BLOCK_PART_DATA_SIZE);
|
|
addCRC(blockPart, sizeof(struct blockPart) + BLOCK_PART_DATA_SIZE);
|
|
frameHeader->fcs.frameType = 1;
|
|
frameHeader->fcs.panIdCompressed = 1;
|
|
frameHeader->fcs.destAddrType = 3;
|
|
frameHeader->fcs.srcAddrType = 3;
|
|
frameHeader->seq = seq++;
|
|
frameHeader->pan = dstPan;
|
|
radioTx(radiotxbuffer);
|
|
}
|
|
void sendBlockData() {
|
|
if (getBlockDataLength() == 0) {
|
|
pr("Invalid block request received, 0 parts..\n");
|
|
requestedData.requestedParts[0] |= 0x01;
|
|
}
|
|
uint8_t partNo = 0;
|
|
while (partNo < BLOCK_MAX_PARTS) {
|
|
for (uint8_t c = 0; (c < BLOCK_MAX_PARTS) && (partNo < BLOCK_MAX_PARTS); c++) {
|
|
if (requestedData.requestedParts[c / 8] & (1 << (c % 8))) {
|
|
sendPart(c);
|
|
partNo++;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
void sendXferCompleteAck(uint8_t *dst) {
|
|
struct MacFrameNormal *frameHeader = (struct MacFrameNormal *)(radiotxbuffer + 1);
|
|
memset(radiotxbuffer + 1, 0, sizeof(struct blockPart) + sizeof(struct MacFrameNormal));
|
|
radiotxbuffer[sizeof(struct MacFrameNormal) + 1] = PKT_XFER_COMPLETE_ACK;
|
|
radiotxbuffer[0] = sizeof(struct MacFrameNormal) + 1 + RAW_PKT_PADDING;
|
|
memcpy(frameHeader->src, mSelfMac, 8);
|
|
memcpy(frameHeader->dst, dst, 8);
|
|
frameHeader->fcs.frameType = 1;
|
|
frameHeader->fcs.panIdCompressed = 1;
|
|
frameHeader->fcs.destAddrType = 3;
|
|
frameHeader->fcs.srcAddrType = 3;
|
|
frameHeader->seq = seq++;
|
|
frameHeader->pan = dstPan;
|
|
radioTx(radiotxbuffer);
|
|
}
|
|
void sendCancelXfer(uint8_t *dst) {
|
|
struct MacFrameNormal *frameHeader = (struct MacFrameNormal *)(radiotxbuffer + 1);
|
|
memset(radiotxbuffer + 1, 0, sizeof(struct blockPart) + sizeof(struct MacFrameNormal));
|
|
radiotxbuffer[sizeof(struct MacFrameNormal) + 1] = PKT_CANCEL_XFER;
|
|
radiotxbuffer[0] = sizeof(struct MacFrameNormal) + 1 + RAW_PKT_PADDING;
|
|
memcpy(frameHeader->src, mSelfMac, 8);
|
|
memcpy(frameHeader->dst, dst, 8);
|
|
frameHeader->fcs.frameType = 1;
|
|
frameHeader->fcs.panIdCompressed = 1;
|
|
frameHeader->fcs.destAddrType = 3;
|
|
frameHeader->fcs.srcAddrType = 3;
|
|
frameHeader->seq = seq++;
|
|
frameHeader->pan = dstPan;
|
|
radioTx(radiotxbuffer);
|
|
}
|
|
void sendPong(void *__xdata buf) {
|
|
struct MacFrameBcast *rxframe = (struct MacFrameBcast *)buf;
|
|
struct MacFrameNormal *frameHeader = (struct MacFrameNormal *)(radiotxbuffer + 1);
|
|
radiotxbuffer[sizeof(struct MacFrameNormal) + 1] = PKT_PONG;
|
|
radiotxbuffer[sizeof(struct MacFrameNormal) + 2] = curChannel;
|
|
radiotxbuffer[0] = sizeof(struct MacFrameNormal) + 1 + 1 + RAW_PKT_PADDING;
|
|
memcpy(frameHeader->src, mSelfMac, 8);
|
|
memcpy(frameHeader->dst, rxframe->src, 8);
|
|
radiotxbuffer[1] = 0x41; // fast way to set the appropriate bits
|
|
radiotxbuffer[2] = 0xCC; // normal frame
|
|
frameHeader->seq = seq++;
|
|
frameHeader->pan = rxframe->srcPan;
|
|
radioTx(radiotxbuffer);
|
|
}
|
|
|
|
#if (AP_EMULATE_TAG == 1 && HAS_EEPROM == 1)
|
|
void attemptFakeTagUpdate() {
|
|
if (memcmp(fakeTagMac, lastBlockMac, 8) == 0) {
|
|
lastBlockRequest = timerGet();
|
|
fakeTagGetData();
|
|
} else {
|
|
// we weren't talking to this mac, see if there was a transfer in progress from another mac, recently
|
|
if ((timerGet() - lastBlockRequest) > CONCURRENT_REQUEST_DELAY) {
|
|
// mark this mac as the new current mac we're talking to
|
|
xMemCopyShort((void *__xdata)lastBlockMac, (void *__xdata)fakeTagMac, 8);
|
|
lastBlockRequest = timerGet();
|
|
fakeTagGetData();
|
|
} else {
|
|
// we're talking to another mac, let this mac know we can't accomodate another request right now
|
|
pr("FAKE TAG BUSY!\n");
|
|
}
|
|
}
|
|
}
|
|
#endif
|
|
|
|
// main loop
|
|
void main(void) {
|
|
clockingAndIntsInit();
|
|
timerInit();
|
|
boardInit();
|
|
|
|
P0FUNC = 0b11001111; // enable uart tx/rx and SPI bus functions
|
|
|
|
uartInit();
|
|
|
|
#if (HAS_SCREEN == 1)
|
|
epdInitialize();
|
|
#endif
|
|
|
|
irqsOn();
|
|
wdt60s();
|
|
|
|
requestedData.blockId = 0xFF;
|
|
if (!boardGetOwnMac(mSelfMac)) {
|
|
for (uint8_t c = 0; c < 8; c++) {
|
|
mSelfMac[c] = c;
|
|
}
|
|
}
|
|
|
|
#if (AP_EMULATE_TAG == 1)
|
|
xMemCopy8(fakeTagMac, mSelfMac); //
|
|
#endif
|
|
|
|
// clear the array with pending information
|
|
memset(pendingDataArr, 0, sizeof(pendingDataArr));
|
|
|
|
radioInit();
|
|
radioRxFilterCfg(mSelfMac, 0x10000, PROTO_PAN_ID);
|
|
|
|
// init the "random" number generation unit
|
|
rndSeed(mSelfMac[0] ^ (uint8_t)timerGetLowBits(), mSelfMac[1]);
|
|
radioSetChannel(curChannel);
|
|
radioSetTxPower(10);
|
|
radioRxEnable(true, true);
|
|
timerDelay(TIMER_TICKS_PER_MS * 100);
|
|
#if (HAS_SCREEN == 1)
|
|
epdShowRun();
|
|
#endif
|
|
|
|
pr("RES>\n");
|
|
pr("RDY>\n");
|
|
|
|
housekeepingTimer = timerGet();
|
|
|
|
uint16_t __xdata loopCount = 1;
|
|
while (1) {
|
|
while ((timerGet() - housekeepingTimer) < ((TIMER_TICKS_PER_SECOND * HOUSEKEEPING_INTERVAL) - 100 * TIMER_TICKS_PER_MS)) {
|
|
int8_t ret = commsRxUnencrypted(radiorxbuffer);
|
|
if (ret > 1) {
|
|
// received a packet, lets see what it is
|
|
switch (getPacketType(radiorxbuffer)) {
|
|
case PKT_AVAIL_DATA_REQ:
|
|
if (ret == 28) {
|
|
// old version of the AvailDataReq struct, set all the new fields to zero, so it will pass the CRC
|
|
processAvailDataReq(radiorxbuffer);
|
|
memset(radiorxbuffer + 1 + sizeof(struct MacFrameBcast) + sizeof(struct oldAvailDataReq), 0, sizeof(struct AvailDataReq) - sizeof(struct oldAvailDataReq) + 2);
|
|
} else if (ret == 40) {
|
|
// new version of the AvailDataReq struct
|
|
processAvailDataReq(radiorxbuffer);
|
|
}
|
|
break;
|
|
case PKT_BLOCK_REQUEST:
|
|
processBlockRequest(radiorxbuffer, 1);
|
|
break;
|
|
case PKT_BLOCK_PARTIAL_REQUEST:
|
|
processBlockRequest(radiorxbuffer, 0);
|
|
break;
|
|
case PKT_XFER_COMPLETE:
|
|
processXferComplete(radiorxbuffer);
|
|
break;
|
|
case PKT_PING:
|
|
sendPong(radiorxbuffer);
|
|
break;
|
|
case PKT_AVAIL_DATA_SHORTREQ:
|
|
// a short AvailDataReq is basically a very short (1 byte payload) packet that requires little preparation on the tx side, for optimal battery use
|
|
// bytes of the struct are set 0, so it passes the checksum test, and the ESP32 can detect that no interesting payload is sent
|
|
if (ret == 18) {
|
|
memset(radiorxbuffer + 1 + sizeof(struct MacFrameBcast), 0, sizeof(struct AvailDataReq) + 2);
|
|
processAvailDataReq(radiorxbuffer);
|
|
}
|
|
break;
|
|
default:
|
|
pr("t=%02X\n", getPacketType(radiorxbuffer));
|
|
break;
|
|
}
|
|
loopCount = 10000;
|
|
}
|
|
while (uartBytesAvail()) {
|
|
processSerial(uartRx());
|
|
}
|
|
if (blockStartTimer) {
|
|
// BUG: uint32 overflowing; this will break every once in a while. Don't know how to fix this other than ugly global variables
|
|
if (timerGet() > blockStartTimer) {
|
|
sendBlockData();
|
|
blockStartTimer = 0;
|
|
}
|
|
}
|
|
loopCount--;
|
|
if (loopCount == 0) {
|
|
#if (HAS_SCREEN == 1)
|
|
#if (AP_EMULATE_TAG == 1 && HAS_EEPROM == 1)
|
|
if (fakeTagTrafficPending) attemptFakeTagUpdate();
|
|
#else
|
|
countSlots();
|
|
epdShowRun();
|
|
#endif
|
|
#endif
|
|
wdt60s();
|
|
loopCount = 10000;
|
|
// every once in a while, especially when handling a lot of traffic, the radio will hang. Calling this every once in while
|
|
// alleviates this problem. The radio is set back to 'receive' whenever loopCount overflows
|
|
RADIO_command = RADIO_CMD_RECEIVE;
|
|
}
|
|
}
|
|
#if (AP_EMULATE_TAG == 1)
|
|
fakeTagCheckIn();
|
|
#endif
|
|
for (uint8_t __xdata c = 0; c < MAX_PENDING_MACS; c++) {
|
|
if (pendingDataArr[c].attemptsLeft == 1) {
|
|
if (pendingDataArr[c].availdatainfo.dataType != DATATYPE_NOUPDATE) {
|
|
espNotifyTimeOut(pendingDataArr[c].targetMac);
|
|
}
|
|
pendingDataArr[c].attemptsLeft = 0;
|
|
} else if (pendingDataArr[c].attemptsLeft > 1) {
|
|
pendingDataArr[c].attemptsLeft--;
|
|
if (pendingDataArr[c].availdatainfo.nextCheckIn) pendingDataArr[c].availdatainfo.nextCheckIn--;
|
|
}
|
|
}
|
|
housekeepingTimer = timerGet();
|
|
}
|
|
}
|