void oneway_anchor_init () { // Make sure the SPI speed is slow for this function dw1000_spi_slow(); // Setup callbacks to this ANCHOR dwt_setcallbacks(anchor_txcallback, anchor_rxcallback); // Make sure the radio starts off dwt_forcetrxoff(); // Set the anchor so it only receives data and ack packets dwt_enableframefilter(DWT_FF_DATA_EN | DWT_FF_ACK_EN); // // Set the ID and PAN ID for this anchor uint8_t eui_array[8]; dw1000_read_eui(eui_array); // dwt_seteui(eui_array); // dwt_setpanid(POLYPOINT_PANID); // Automatically go back to receive dwt_setautorxreenable(TRUE); // Don't use these dwt_setdblrxbuffmode(FALSE); dwt_setrxtimeout(FALSE); // Load our EUI into the outgoing packet dw1000_read_eui(pp_anc_final_pkt.ieee154_header_unicast.sourceAddr); // Need a timer if (_anchor_timer == NULL) { _anchor_timer = timer_init(); } // Init the PRNG for determining when to respond to the tag raninit(&_prng_state, eui_array[0]<<8|eui_array[1]); // Make SPI fast now that everything has been setup dw1000_spi_fast(); // Reset our state because nothing should be in progress if we call init() _state = ASTATE_IDLE; }
dw1000_err_e dw1000_anchor_init () { uint8_t eui_array[8]; // Make sure the radio starts off dwt_forcetrxoff(); // Set the anchor so it only receives data and ack packets dwt_enableframefilter(DWT_FF_DATA_EN | DWT_FF_ACK_EN); // Set the ID and PAN ID for this anchor dw1000_read_eui(eui_array); dwt_seteui(eui_array); dwt_setpanid(POLYPOINT_PANID); // Automatically go back to receive dwt_setautorxreenable(TRUE); // Don't use these dwt_setdblrxbuffmode(FALSE); dwt_setrxtimeout(FALSE); // Don't receive at first dwt_rxenable(FALSE); // Load our EUI into the outgoing packet dw1000_read_eui(pp_anc_final_pkt.ieee154_header_unicast.sourceAddr); // Need a timer _ranging_broadcast_timer = timer_init(); // Init the PRNG for determining when to respond to the tag raninit(&_prng_state, eui_array[0]<<8|eui_array[1]); // Make SPI fast now that everything has been setup dw1000_spi_fast(); return DW1000_NO_ERR; }
int app_dw1000_init ( int HACK_role, int HACK_EUI, void (*txcallback)(const dwt_callback_data_t *), void (*rxcallback)(const dwt_callback_data_t *) ) { uint32_t devID; int err; // Start off DW1000 comms slow REG(SSI0_BASE + SSI_CR1) = 0; REG(SSI0_BASE + SSI_CPSR) = 8; REG(SSI0_BASE + SSI_CR1) |= SSI_CR1_SSE; // Reset the DW1000...for some reason dw1000_reset(); // Make sure we can talk to the DW1000 devID = dwt_readdevid(); if (devID != DWT_DEVICE_ID) { #ifdef DW_DEBUG printf("Could not read Device ID from the DW1000\r\n"); printf("Possible the chip is asleep...\r\n"); #endif return -1; } // Select which of the three antennas on the board to use dw1000_choose_antenna(0); // Init the dw1000 hardware err = dwt_initialise(DWT_LOADUCODE | DWT_LOADLDO | DWT_LOADTXCONFIG | DWT_LOADXTALTRIM); if (err != DWT_SUCCESS) { return -1; } // Setup interrupts // Note: using auto rx re-enable so don't need to trigger on error frames dwt_setinterrupt(DWT_INT_TFRS | DWT_INT_RFCG | DWT_INT_SFDT | DWT_INT_RFTO | DWT_INT_RPHE | DWT_INT_RFCE | DWT_INT_RFSL | DWT_INT_RXPTO | DWT_INT_SFDT, 1); // Configure the callbacks from the dwt library dwt_setcallbacks(txcallback, rxcallback); // Set the parameters of ranging and channel and whatnot global_ranging_config.chan = 2; global_ranging_config.prf = DWT_PRF_64M; global_ranging_config.txPreambLength = DWT_PLEN_64;//DWT_PLEN_4096 // global_ranging_config.txPreambLength = DWT_PLEN_256; global_ranging_config.rxPAC = DWT_PAC8; global_ranging_config.txCode = 9; // preamble code global_ranging_config.rxCode = 9; // preamble code global_ranging_config.nsSFD = 0; global_ranging_config.dataRate = DWT_BR_6M8; global_ranging_config.phrMode = DWT_PHRMODE_EXT; //Enable extended PHR mode (up to 1024-byte packets) global_ranging_config.smartPowerEn = 1; global_ranging_config.sfdTO = 64+8+1;//(1025 + 64 - 32); dwt_configure(&global_ranging_config, 0);//(DWT_LOADANTDLY | DWT_LOADXTALTRIM)); dwt_setsmarttxpower(global_ranging_config.smartPowerEn); // Configure TX power { global_tx_config.PGdly = pgDelay[global_ranging_config.chan]; global_tx_config.power = txPower[global_ranging_config.chan]; dwt_configuretxrf(&global_tx_config); } /* All constants same anyway if(DW1000_ROLE_TYPE == TAG) dwt_xtaltrim(xtaltrim[0]); else dwt_xtaltrim(xtaltrim[ANCHOR_EUI]); */ dwt_xtaltrim(xtaltrim[0]); ////TEST 1: XTAL trim calibration //dwt_configcwmode(global_ranging_config.chan); //dwt_xtaltrim(8); //while(1); //{ // //TEST 2: TX Power level calibration // uint8_t msg[127] = "The quick brown fox jumps over the lazy dog. The quick brown fox jumps over the lazy dog. The quick brown fox jumps over the l"; // dwt_configcontinuousframemode(0x1000); // dwt_writetxdata(127, (uint8 *) msg, 0) ; // dwt_writetxfctrl(127, 0); // dwt_starttx(DWT_START_TX_IMMEDIATE); // while(1); //} // Configure the antenna delay settings { uint16_t antenna_delay; //Antenna delay not really necessary if we're doing an end-to-end calibration antenna_delay = 0; dwt_setrxantennadelay(antenna_delay); dwt_settxantennadelay(antenna_delay); //global_tx_antenna_delay = antenna_delay; //// Shift this over a bit for some reason. Who knows. //// instance_common.c:508 //antenna_delay = dwt_readantennadelay(global_ranging_config.prf) >> 1; //if (antenna_delay == 0) { // printf("resetting antenna delay\r\n"); // // If it's not in the OTP, use a magic value from instance_calib.c // antenna_delay = ((DWT_PRF_64M_RFDLY/ 2.0) * 1e-9 / DWT_TIME_UNITS); // dwt_setrxantennadelay(antenna_delay); // dwt_settxantennadelay(antenna_delay); //} //global_tx_antenna_delay = antenna_delay; //printf("tx antenna delay: %u\r\n", antenna_delay); } // // Set the sleep delay. Not sure what this does actually. // instancesettagsleepdelay(POLL_SLEEP_DELAY, BLINK_SLEEP_DELAY); // Configure as either a tag or anchor if (HACK_role == ANCHOR) { uint8_t eui_array[8]; // Enable frame filtering dwt_enableframefilter(DWT_FF_DATA_EN | DWT_FF_ACK_EN); dw1000_populate_eui(eui_array, HACK_EUI); dwt_seteui(eui_array); dwt_setpanid(DW1000_PANID); // We do want to enable auto RX dwt_setautorxreenable(1); // Let's do double buffering dwt_setdblrxbuffmode(0); // Disable RX timeout by setting to 0 dwt_setrxtimeout(0); // Go for receiving dwt_rxenable(0); } else if (HACK_role == TAG) { uint8_t eui_array[8]; // Allow data and ack frames dwt_enableframefilter(DWT_FF_DATA_EN | DWT_FF_ACK_EN); dw1000_populate_eui(eui_array, HACK_EUI); dwt_seteui(eui_array); dwt_setpanid(DW1000_PANID); // Do this for the tag too dwt_setautorxreenable(1); dwt_setdblrxbuffmode(1); dwt_enableautoack(5 /*ACK_RESPONSE_TIME*/); // Configure sleep { int mode = DWT_LOADUCODE | DWT_PRESRV_SLEEP | DWT_CONFIG | DWT_TANDV; if (dwt_getldotune() != 0) { // If we need to use LDO tune value from OTP kick it after sleep mode |= DWT_LOADLDO; } // NOTE: on the EVK1000 the DEEPSLEEP is not actually putting the // DW1000 into full DEEPSLEEP mode as XTAL is kept on dwt_configuresleep(mode, DWT_WAKE_CS | DWT_SLP_EN); } } // Make it fast REG(SSI0_BASE + SSI_CR1) = 0; REG(SSI0_BASE + SSI_CPSR) = 2; REG(SSI0_BASE + SSI_CR1) |= SSI_CR1_SSE; return 0; }
void cph_deca_init_network(uint16_t panid, uint16_t shortid) { // Configure network parameters dwt_setpanid(panid); dwt_setaddress16(shortid); dwt_enableframefilter(DWT_FF_DATA_EN); }
// ------------------------------------------------------------------------------------------------------------------- // // the main instance state machine (for Tag instance mode only!) // // ------------------------------------------------------------------------------------------------------------------- // int testapprun_tf(instance_data_t *inst, int message) { switch (inst->testAppState) { case TA_INIT : // printf("TA_INIT") ; switch (inst->mode) { case TAG: { int mode = 0; dwt_enableframefilter(DWT_FF_DATA_EN | DWT_FF_ACK_EN); //allow data and ack frames; inst->frameFilteringEnabled = 1 ; dwt_setpanid(inst->panid); dwt_seteui(inst->eui64); inst->msg_f.panID[0] = (inst->panid) & 0xff; inst->msg_f.panID[1] = inst->panid >> 8; #if (DR_DISCOVERY == 1) inst->mode = TAG_TDOA ; inst->testAppState = TA_TXBLINK_WAIT_SEND; memcpy(&inst->blinkmsg.tagID[0], &inst->eui64[0], BLINK_FRAME_SOURCE_ADDRESS); #else inst->testAppState = TA_TXPOLL_WAIT_SEND; #endif //can use RX auto re-enable when not logging/plotting errored frames inst->rxautoreenable = 1; dwt_setautorxreenable(inst->rxautoreenable); //not necessary to auto RX re-enable as the receiver is on for a short time (Tag knows when the response is coming) //disable double buffer for a Tag - not needed.... dwt_setdblrxbuffmode(0); //enable/disable double RX buffer //NOTE - Auto ACK only works if frame filtering is enabled! dwt_enableautoack(ACK_RESPONSE_TIME); //wait for ACK_RESPONSE_TIME symbols (e.g. 5) before replying with the ACK mode = (DWT_LOADUCODE|DWT_PRESRV_SLEEP|DWT_CONFIG|DWT_TANDV); if((dwt_getldotune() != 0)) //if we need to use LDO tune value from OTP kick it after sleep mode |= DWT_LOADLDO; if(inst->configData.txPreambLength == DWT_PLEN_64) //if using 64 length preamble then use the corresponding OPSet mode |= DWT_LOADOPSET; //NOTE: on the EVK1000 the DEEPSLEEP is not actually putting the DW1000 into full DEEPSLEEP mode as XTAL is kept on dwt_configuresleep(mode, DWT_WAKE_CS|DWT_SLP_EN); //configure the on wake parameters (upload the IC config settings) } break; default: break; } break; // end case TA_INIT case TA_SLEEP_DONE : { event_data_t* dw_event = instance_getevent(20); //clear the event from the queue // waiting for timout from application to wakup IC if (dw_event->type != DWT_SIG_RX_TIMEOUT) { inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; //wait here for sleep timeout break; } inst->done = INST_NOT_DONE_YET; inst->instToSleep = 0; inst->testAppState = inst->nextState; inst->nextState = 0; //clear inst->canprintinfo = 0; //wake up from DEEP SLEEP { //wake up device from low power mode //NOTE - in the ARM code just drop chip select for 200us port_SPIx_clear_chip_select(); //CS low instance_data[0].dwIDLE = 0; //reset setup_DW1000RSTnIRQ(1); //enable RSTn IRQ Sleep(1); //200 us to wake up then waits 5ms for DW1000 XTAL to stabilise port_SPIx_set_chip_select(); //CS high #if (DW_IDLE_CHK==1) //Wait (sleep) to give DW1000 time to get to IDLE state Sleep(5); //this is platform dependent - only program if DW EVK/EVB dwt_setleds(1); //MP bug - TX antenna delay needs reprogramming as it is not preserved dwt_settxantennadelay(inst->txantennaDelay) ; //set EUI as it will not be preserved unless the EUI is programmed and loaded from NVM /*if((inst->mode == TAG) || (inst->mode == TAG_TDOA)) { dwt_setpanid(inst->panid); dwt_seteui(inst->eui64); }*/ #elif (DW_IDLE_CHK==2) //Use RSTn pin to notify the micro that DW1000 is in IDLE //need to poll to check when the DW1000 is in IDLE, the CPLL interrupt is not reliable while(instance_data[0].dwIDLE == 0); //wait for DW1000 to go to IDLE state RSTn pin to go high if(dwt_read32bitreg(0x0) != 0xDECA0130) { //error? int x = 0; } setup_DW1000RSTnIRQ(0); //disable RSTn IRQ #else //need to poll to check when the DW1000 is in IDLE, the CPLL interrupt is not reliable while(dwt_read32bitreg(0x0) != 0xDECA0130); //Sleep(2); #endif dwt_entersleepaftertx(0); dwt_setinterrupt(DWT_INT_TFRS, 1); //re-enable the TX/RX interrupts } } break; case TA_TXE_WAIT : //either go to sleep or proceed to TX a message // printf("TA_TXE_WAIT") ; //if we are scheduled to go to sleep before next sending then sleep first. if(((inst->nextState == TA_TXPOLL_WAIT_SEND) || (inst->nextState == TA_TXBLINK_WAIT_SEND)) && (inst->instToSleep) //go to sleep before sending the next poll ) { //the app should put chip into low power state and wake up in tagSleepTime_ms time... //the app could go to *_IDLE state and wait for uP to wake it up... inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT_TO; //don't sleep here but kick off the TagTimeoutTimer (instancetimer) inst->testAppState = TA_SLEEP_DONE; if(inst->nextState == TA_TXBLINK_WAIT_SEND) inst->canprintinfo = 1; //put device into low power mode dwt_entersleep(); //go to sleep } else //proceed to configuration and transmission of a frame { inst->testAppState = inst->nextState; inst->nextState = 0; //clear } break ; // end case TA_TXE_WAIT case TA_TXBLINK_WAIT_SEND : { //blink frames with IEEE EUI-64 tag ID inst->blinkmsg.frameCtrl = 0xC5 ; inst->blinkmsg.seqNum = inst->frame_sn++; dwt_writetxdata((BLINK_FRAME_CRTL_AND_ADDRESS + FRAME_CRC), (uint8 *) (&inst->blinkmsg), 0) ; // write the frame data dwt_writetxfctrl((BLINK_FRAME_CRTL_AND_ADDRESS + FRAME_CRC), 0); //response will be sent after 500us (thus delay the receiver turn on by 290sym ~ 299us) //use delayed rx on (wait4resp timer) - this value is applied when the TX frame is done/sent, so this value can be written after TX is started dwt_setrxaftertxdelay(inst->rnginitW4Rdelay_sy); //units are ~us - wait for wait4respTIM before RX on (delay RX) dwt_starttx(DWT_START_TX_IMMEDIATE | DWT_RESPONSE_EXPECTED); //always using immediate TX dwt_setrxtimeout(inst->fwtoTimeB_sy); //units are us - wait for BLINKRX_FWTO_TIME after RX on before timing out #if (DW_IDLE_CHK==2) //this is platform dependent - only program if DW EVK/EVB dwt_setleds(1); //MP bug - TX antenna delay needs reprogramming as it is not preserved dwt_settxantennadelay(inst->txantennaDelay) ; #endif inst->sentSN = inst->blinkmsg.seqNum; inst->wait4ack = DWT_RESPONSE_EXPECTED; //Poll is coming soon after... inst->instToSleep = 1; inst->testAppState = TA_TX_WAIT_CONF ; // wait confirmation inst->previousState = TA_TXBLINK_WAIT_SEND ; inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; //will use RX FWTO to time out (set below) } break ; // end case TA_TXBLINK_WAIT_SEND case TA_TXPOLL_WAIT_SEND : { #if (DR_DISCOVERY == 1) //NOTE the anchor address is set after receiving the ranging initialisation message inst->instToSleep = 1; //go to Sleep after this poll #else //set destination address if(destaddress(inst)) { break; } //copy anchor address to short message structure inst->msg_f.destAddr[0] = inst->msg.destAddr[0]; inst->msg_f.destAddr[1] = inst->msg.destAddr[1]; #endif inst->msg_f.messageData[FCODE] = RTLS_DEMO_MSG_TAG_POLLF; inst->psduLength = TAG_POLL_F_MSG_LEN + FRAME_CRTL_AND_ADDRESS_S + FRAME_CRC + EXTRA_LENGTH; //set frame type (0-2), SEC (3), Pending (4), ACK (5), PanIDcomp(6) inst->msg_f.frameCtrl[0] = 0x41 /*PID comp*/; //short address for both inst->msg_f.frameCtrl[1] = 0x8 /*dest short address (16bits)*/ | 0x80 /*src short address (16bits)*/; inst->msg_f.seqNum = inst->frame_sn++; inst->wait4ack = DWT_RESPONSE_EXPECTED; //Response is coming after 275 us... //500 -> 485, 800 -> 765 dwt_writetxfctrl(inst->psduLength, 0); //if the response is expected there is a 1ms timeout to stop RX if no response (ACK or other frame) coming dwt_setrxtimeout(inst->fwtoTime_sy); //units are us - wait for 215us after RX on //use delayed rx on (wait4resp timer) dwt_setrxaftertxdelay(inst->fixedReplyDelay_sy); //units are ~us - wait for wait4respTIM before RX on (delay RX) dwt_writetxdata(inst->psduLength, (uint8 *) &inst->msg_f, 0) ; // write the poll frame data //start TX of frame dwt_starttx(DWT_START_TX_IMMEDIATE | inst->wait4ack); #if (DW_IDLE_CHK==2) //this is platform dependent - only program if DW EVK/EVB dwt_setleds(1); //MP bug - TX antenna delay needs reprogramming as it is not preserved dwt_settxantennadelay(inst->txantennaDelay) ; #endif inst->sentSN = inst->msg_f.seqNum; //write the final function code inst->msg_f.messageData[FCODE] = RTLS_DEMO_MSG_TAG_FINALF; //increment the sequence number for the final message inst->msg_f.seqNum = inst->frame_sn; inst->testAppState = TA_TX_WAIT_CONF ; // wait confirmation inst->previousState = TA_TXPOLL_WAIT_SEND ; inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; //will use RX FWTO to time out (set below) inst->responseRxNum = 0; } break; case TA_TX_WAIT_CONF : //printf("TA_TX_WAIT_CONF") ; { //uint8 temp[5]; event_data_t* dw_event = instance_getevent(5); //get and clear this event //NOTE: Can get the ACK before the TX confirm event for the frame requesting the ACK //this happens because if polling the ISR the RX event will be processed 1st and then the TX event //thus the reception of the ACK will be processed before the TX confirmation of the frame that requested it. if(dw_event->type != DWT_SIG_TX_DONE) //wait for TX done confirmation { if(dw_event->type == DWT_SIG_RX_TIMEOUT) //got RX timeout - i.e. did not get the response (e.g. ACK) { //we need to wait for SIG_TX_DONE and then process the timeout and re-send the frame if needed inst->gotTO = 1; } if(dw_event->type == SIG_RX_ACK) { inst->wait4ack = 0 ; //clear the flag as the ACK has been received inst_processackmsg(inst, dw_event->msgu.rxackmsg.seqNum); //printf("RX ACK in TA_TX_WAIT_CONF... wait for TX confirm before changing state\n"); } inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; break; } inst->done = INST_NOT_DONE_YET; if(inst->previousState == TA_TXFINAL_WAIT_SEND) //tag will do immediate receive when waiting for report (as anchor sends it without delay) { #if (DR_DISCOVERY == 1) //in Discovery mode anchor is not sending the report to tag go to sleep inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT_TO; //kick off the TagTimeoutTimer (instance timer) to initiate wakeup inst->nextState = TA_TXPOLL_WAIT_SEND; inst->testAppState = TA_TXE_WAIT; //we are going manually to sleep - change to TA_TXE_WAIT state #else //wait for report when non-Discovery mode if(inst->wait4ack == 0) dwt_rxenable(0) ; // turn receiver on, #endif break; } else if (inst->gotTO) //timeout { inst_processrxtimeout(inst); inst->gotTO = 0; } else { if(inst->previousState == TA_TXPOLL_WAIT_SEND) { // write the final's frame control and address tx data (add CRC as the function will write length - 2) dwt_writetxdata((FRAME_CRTL_AND_ADDRESS_S + 1 + FRAME_CRC), (uint8 *) &inst->msg_f, FINAL_MSG_OFFSET) ; // write the final frame data dwt_entersleepaftertx(1); dwt_setinterrupt(DWT_INT_TFRS, 0); //disable all the interrupts (wont be able to enter sleep if interrupts are pending) inst->tagPollTxTime32l = dw_event->timeStamp32l; inst->relpyAddress[0] = inst->msg_f.destAddr[0]; inst->relpyAddress[1] = inst->msg_f.destAddr[1]; inst->canprintinfo = 2; } if(inst->previousState == TA_TXRANGINGINIT_WAIT_SEND) //set frame control for the response message { dwt_writetxfctrl((ANCH_RESPONSE_F_MSG_LEN + FRAME_CRTL_AND_ADDRESS_S + FRAME_CRC + EXTRA_LENGTH), RESPONSE_MSG_OFFSET); } inst->testAppState = TA_RX_WAIT_DATA ; // wait for next frame //turn RX on if(inst->wait4ack == 0) dwt_rxenable(0) ; // turn receiver on, immediate = 0/delayed = 1 inst->wait4ack = 0 ; //dwt_readfromdevice(0x19, 0, 5, temp); //sprintf((char*)&usbdata[20], "T2R%d %02x%02x%02x%02x%02x ", count, temp[4], temp[3], temp[2], temp[1], temp[0]); //send_usbmessage(&usbdata[20], 16); //count=0; } } break ; // end case TA_TX_WAIT_CONF case TA_RXE_WAIT : //printf("TA_RXE_WAIT") ; { // - with "fast" ranging - we only get here after frame timeout... //turn RX on instancerxon(inst, 0, 0) ; // turn RX on, with/without delay inst->testAppState = TA_RX_WAIT_DATA; // let this state handle it // end case TA_RXE_WAIT, don't break, but fall through into the TA_RX_WAIT_DATA state to process it immediately. if(message == 0) break; } case TA_RX_WAIT_DATA : // Wait RX data //printf("TA_RX_WAIT_DATA") ; switch (message) { case SIG_RX_BLINK : { instance_getevent(6); //get and clear this event //else //not initiating ranging - continue to receive { inst->testAppState = TA_RX_WAIT_DATA ; // wait for next frame //turn RX on dwt_rxenable(0) ; // turn receiver on, immediate = 0/delayed = 1 inst->done = INST_NOT_DONE_YET; } } break; case SIG_RX_ACK : { event_data_t* dw_event = instance_getevent(7); //get and clear this event inst_processackmsg(inst, dw_event->msgu.rxackmsg.seqNum); //else we did not expect this ACK turn the RX on again //only enable receiver when not using double buffering inst->testAppState = TA_RX_WAIT_DATA ; // wait for next frame //turn RX on dwt_rxenable(0) ; // turn receiver on, immediate = 0/delayed = 1 inst->done = INST_NOT_DONE_YET; } break; case DWT_SIG_RX_OKAY : { event_data_t* dw_event = instance_getevent(8); //get and clear this event uint8 srcAddr[8] = {0,0,0,0,0,0,0,0}; int fcode = 0; int fn_code = 0; int srclen = 0; int fctrladdr_len; uint8 *messageData; inst->stoptimer = 0; //clear the flag, as we have received a message // 16 or 64 bit addresses switch(dw_event->msgu.frame[1]) { case 0xCC: // memcpy(&srcAddr[0], &(dw_event->msgu.rxmsg_ll.sourceAddr[0]), ADDR_BYTE_SIZE_L); fn_code = dw_event->msgu.rxmsg_ll.messageData[FCODE]; messageData = &dw_event->msgu.rxmsg_ll.messageData[0]; srclen = ADDR_BYTE_SIZE_L; fctrladdr_len = FRAME_CRTL_AND_ADDRESS_L; break; case 0xC8: // memcpy(&srcAddr[0], &(dw_event->msgu.rxmsg_sl.sourceAddr[0]), ADDR_BYTE_SIZE_L); fn_code = dw_event->msgu.rxmsg_sl.messageData[FCODE]; messageData = &dw_event->msgu.rxmsg_sl.messageData[0]; srclen = ADDR_BYTE_SIZE_L; fctrladdr_len = FRAME_CRTL_AND_ADDRESS_LS; break; case 0x8C: // memcpy(&srcAddr[0], &(dw_event->msgu.rxmsg_ls.sourceAddr[0]), ADDR_BYTE_SIZE_S); fn_code = dw_event->msgu.rxmsg_ls.messageData[FCODE]; messageData = &dw_event->msgu.rxmsg_ls.messageData[0]; srclen = ADDR_BYTE_SIZE_S; fctrladdr_len = FRAME_CRTL_AND_ADDRESS_LS; break; case 0x88: // memcpy(&srcAddr[0], &(dw_event->msgu.rxmsg_ss.sourceAddr[0]), ADDR_BYTE_SIZE_S); fn_code = dw_event->msgu.rxmsg_ss.messageData[FCODE]; messageData = &dw_event->msgu.rxmsg_ss.messageData[0]; srclen = ADDR_BYTE_SIZE_S; fctrladdr_len = FRAME_CRTL_AND_ADDRESS_S; break; } if((inst->ackexpected) && (inst->ackTO)) //ACK frame was expected but we got a good frame - treat as ACK timeout { //printf("got good frame instead of ACK in DWT_SIG_RX_OKAY - pretend TO\n"); inst_processrxtimeout(inst); message = 0; //clear the message as we have processed the event } else { inst->ackexpected = 0; //clear this as we got good frame (but as not using ACK TO) we prob missed the ACK - check if it has been addressed to us fcode = fn_code; //tag has address filtering so if it received a frame it must be addressed to it switch(fcode) { case RTLS_DEMO_MSG_RNG_INIT: { if(inst->mode == TAG_TDOA) //only start ranging with someone if not ranging already { //double delay = rxrngmsg->messageData[RES_T1] + (rxrngmsg->messageData[RES_T2] << 8); //in ms inst->testAppState = TA_TXPOLL_WAIT_SEND ; // send next poll //remember the anchor address inst->msg_f.destAddr[0] = srcAddr[0]; inst->msg_f.destAddr[1] = srcAddr[1]; inst->msg_f.sourceAddr[0] = messageData[RES_R1]; inst->msg_f.sourceAddr[1] = messageData[RES_R1+1]; inst->tagShortAdd = (uint16)messageData[RES_R1] + ((uint16)messageData[RES_R2] << 8) ; dwt_setaddress16(inst->tagShortAdd); //instancesetreplydelay(delay); // inst->mode = TAG ; inst->rxTimeouts = 0; //reset timeout count inst->instToSleep = 0; //don't go to sleep - start ranging instead and then sleep after 1 range is done inst->done = INST_NOT_DONE_YET; } } break; //RTLS_DEMO_MSG_RNG_INITF case RTLS_DEMO_MSG_ANCH_RESPF: { #if (TWSYMRANGE == 1) //need to write the delayed time before starting transmission inst->delayedReplyTime32 = ((uint32)dw_event->timeStamp32h + (uint32)inst->fixedFastReplyDelay32h) ; dwt_setdelayedtrxtime(inst->delayedReplyTime32) ; dwt_writetxfctrl((TAG_FINAL_F_MSG_LEN + FRAME_CRTL_AND_ADDRESS_S + FRAME_CRC), FINAL_MSG_OFFSET); if(dwt_starttx(DWT_START_TX_DELAYED)) { //error - TX FAILED // initiate the re-transmission inst->testAppState = TA_TXE_WAIT ; inst->nextState = TA_TXPOLL_WAIT_SEND; dwt_entersleepaftertx(0); inst->wait4ack = 0; //clear the flag as the TX has inst->lateTX++; break; //exit this switch case... } else { rtd_t rtd; //calculate the difference between response rx and final tx //here we just need to subtract the low 32 bits as the response delay is < 32bits (actually it is < 26 bits) rtd.diffRmP = (uint32)dw_event->timeStamp32l - (uint32)inst->tagPollTxTime32l ; //calculate difference between final tx and response rx rtd.diffFmR = (uint32)inst->txantennaDelay + ((uint32)inst->fixedFastReplyDelay32h << 8) - ((uint32)dw_event->timeStamp32l & 0x1FF); //write the rest of the message (the two response time differences (low 32 bits) dwt_writetxdata((TAG_FINAL_F_MSG_LEN - 1 + FRAME_CRC), (uint8 *) &rtd, (FINAL_MSG_OFFSET+FRAME_CRTL_AND_ADDRESS_S+1)) ; // write the frame data inst->sentSN = inst->msg_f.seqNum; inst->previousState = TA_TXFINAL_WAIT_SEND; //if Tag is not waiting for report - it will go to sleep automatically after the final is sent inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT_TO; //kick off the TagTimeoutTimer (instancetimer) to initiate wakeup inst->testAppState = TA_SLEEP_DONE; //we are going automatically to sleep so no TX confirm interrupt (next state will be TA_SLEEP_DONE) inst->canprintinfo = 1; inst->txmsgcount ++; inst->frame_sn++ ; //increment as final is sent } inst->respPSC = (dwt_read16bitoffsetreg(0x10, 2) >> 4); inst->wait4ack = 0; //no response inst->ackexpected = !ACK_REQUESTED ; //used to ignore unexpected ACK frames //inst->rxu.anchorRespRxTime = inst->rxu.rxTimeStamp ; //Response's Rx time inst->nextState = TA_TXPOLL_WAIT_SEND; #else if(inst->responseRxNum == 0) // this is first response { dwt_setrxtimeout(5000); //~5ms //turn RX on dwt_rxenable(0) ; // turn receiver on, immediate = 0/delayed = 1 inst->anchResp1RxTime32l = dw_event->timeStamp32l; inst->responseRxNum++; } else // we have two responses and can calculate ToF { //the first response will be sent time X after reception of the poll, but as the tx time is snapped to 8ns //we need to account for the low 9 bits of poll rx time in the RTD calculation uint32 pollrxlowbits = (uint32)messageData[1] + (uint32)(messageData[2] << 8); //RTD = (RxResp1 - TxPoll) - (RxResp2 - RxResp1) //ToF = RTD/2 = RxResp1 - 0.5 * (TxPoll + RxResp2) inst->tof32 = ((uint32)inst->anchResp1RxTime32l - (uint32)inst->tagPollTxTime32l + pollrxlowbits) - ((uint32)dw_event->timeStamp32l - (uint32)inst->anchResp1RxTime32l); inst->tof32 <<= 1; //to make it compatible with reportTOF() which expects ToF*4 reportTOF_f(inst); inst->newrange = 1; inst->testAppState = TA_TXE_WAIT ; inst->nextState = TA_TXPOLL_WAIT_SEND; } #endif } break; //RTLS_DEMO_MSG_ANCH_RESPF case RTLS_DEMO_MSG_ANCH_TOFRF: { inst->tof32 = messageData[TOFR]; inst->tof32 += (uint32)messageData[TOFR+1] << 8; inst->tof32 += (uint32)messageData[TOFR+2] << 16; inst->tof32 += (uint32)messageData[TOFR+3] << 24; if(dw_event->msgu.rxmsg_ss.seqNum != inst->lastReportSN) { reportTOF_f(inst); inst->newrange = 1; inst->lastReportSN = dw_event->msgu.rxmsg_ss.seqNum; inst->newrangetagaddress = srcAddr[0] + ((uint16) srcAddr[1] << 8); inst->newrangeancaddress = inst->eui64[0] + ((uint16) inst->eui64[1] << 8); } inst->testAppState = TA_TXE_WAIT; inst->nextState = TA_TXPOLL_WAIT_SEND ; // send next poll } break; //RTLS_DEMO_MSG_ANCH_TOFRF default: { //only enable receiver when not using double buffering inst->testAppState = TA_RX_WAIT_DATA ; // wait for next frame //turn RX on dwt_rxenable(0) ; // turn receiver on, immediate = 0/delayed = 1 } break; } //end switch (rxmsg->functionCode) if(dw_event->msgu.frame[0] & 0x20) { //as we only pass the received frame with the ACK request bit set after the ACK has been sent instance_getevent(9); //get and clear the ACK sent event } } } break ; case DWT_SIG_RX_TIMEOUT : //printf("PD_DATA_TIMEOUT") ; instance_getevent(26); //get and clear this event inst_processrxtimeout(inst); message = 0; //clear the message as we have processed the event break ; case DWT_SIG_TX_AA_DONE: //ignore this event - just process the rx frame that was received before the ACK response case 0: //no event - wait in receive... { //stay in Rx (fall-through from above state) //if(DWT_SIG_TX_AA_DONE == message) printf("Got SIG_TX_AA_DONE in RX wait - ignore\n"); if(inst->done == INST_NOT_DONE_YET) inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; } break; default : { //printf("\nERROR - Unexpected message %d ??\n", message) ; //assert(0) ; // Unexpected Primitive what is going on ? } break ; } break ; // end case TA_RX_WAIT_DATA default: //printf("\nERROR - invalid state %d - what is going on??\n", inst->testAppState) ; break; } // end switch on testAppState return inst->done; } // end testapprun()
// ------------------------------------------------------------------------------------------------------------------- // // the main instance state machine (all the instance modes Tag, Anchor or Listener use the same statemachine....) // // ------------------------------------------------------------------------------------------------------------------- // int testapprun(instance_data_t *inst, int message) { switch (inst->testAppState) { case TA_INIT : #if defined(DEBUG) printf("TA_INIT") ; #endif switch (inst->mode) { case TAG: { uint16 sleep_mode = 0; dwt_enableframefilter(DWT_FF_DATA_EN | DWT_FF_ACK_EN); //allow data, ack frames; dwt_setpanid(inst->panID); memcpy(inst->eui64, &inst->instanceAddress16, ADDR_BYTE_SIZE_S); dwt_seteui(inst->eui64); //set source address inst->newRangeTagAddress = inst->instanceAddress16 ; dwt_setaddress16(inst->instanceAddress16); //Start off by Sleeping 1st -> set instToSleep to TRUE inst->nextState = TA_TXPOLL_WAIT_SEND; inst->testAppState = TA_TXE_WAIT; inst->instToSleep = TRUE ; inst->rangeNum = 0; inst->tagSleepCorrection = 0; sleep_mode = (DWT_LOADUCODE|DWT_PRESRV_SLEEP|DWT_CONFIG|DWT_TANDV); if((dwt_getldotune() != 0)) //if we need to use LDO tune value from OTP kick it after sleep sleep_mode |= DWT_LOADLDO; if(inst->configData.txPreambLength == DWT_PLEN_64) //if using 64 length preamble then use the corresponding OPSet sleep_mode |= DWT_LOADOPSET; #if (DEEP_SLEEP == 1) dwt_configuresleep(sleep_mode, DWT_WAKE_WK|DWT_WAKE_CS|DWT_SLP_EN); //configure the on wake parameters (upload the IC config settings) #endif instanceconfigframeheader16(inst); inst->instanceWakeTime = portGetTickCount(); } break; case ANCHOR: { memcpy(inst->eui64, &inst->instanceAddress16, ADDR_BYTE_SIZE_S); dwt_seteui(inst->eui64); dwt_setpanid(inst->panID); //set source address inst->shortAdd_idx = (inst->instanceAddress16 & 0x3) ; dwt_setaddress16(inst->instanceAddress16); //if address = 0x8000 if(inst->instanceAddress16 == GATEWAY_ANCHOR_ADDR) { inst->gatewayAnchor = TRUE; } dwt_enableframefilter(DWT_FF_NOTYPE_EN); //allow data, ack frames; // First time anchor listens we don't do a delayed RX dwt_setrxaftertxdelay(0); //change to next state - wait to receive a message inst->testAppState = TA_RXE_WAIT ; dwt_setrxtimeout(0); dwt_setpreambledetecttimeout(0); instanceconfigframeheader16(inst); } break; case LISTENER: { dwt_enableframefilter(DWT_FF_NOTYPE_EN); //disable frame filtering dwt_setrxaftertxdelay(0); //no delay of turning on of RX dwt_setrxtimeout(0); dwt_setpreambledetecttimeout(0); //change to next state - wait to receive a message inst->testAppState = TA_RXE_WAIT ; } break ; // end case TA_INIT default: break; } break; // end case TA_INIT case TA_SLEEP_DONE : { event_data_t* dw_event = instance_getevent(10); //clear the event from the queue // waiting for timout from application to wakup IC if (dw_event->type != DWT_SIG_RX_TIMEOUT) { // if no pause and no wake-up timeout continu waiting for the sleep to be done. inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; //wait here for sleep timeout break; } inst->done = INST_NOT_DONE_YET; inst->instToSleep = FALSE ; inst->testAppState = inst->nextState; inst->nextState = 0; //clear inst->instanceWakeTime = portGetTickCount(); // Record the time count when we wake-up #if (DEEP_SLEEP == 1) { uint32 x = 0; //wake up device from low power mode //NOTE - in the ARM code just drop chip select for 200us //led_on(LED_PC9); port_SPIx_clear_chip_select(); //CS low instance_data[0].dwIDLE = 0; //reset DW1000 IDLE flag setup_DW1000RSTnIRQ(1); //enable RSTn IRQ Sleep(2); //200 us to wake up - need 2 as Sleep(1) is ~ 175 us //then wait 5ms for DW1000 XTAL to stabilise - instead of wait we wait for RSTn to go high //Sleep(5); Sleep(83); //need to poll to check when the DW1000 is in IDLE, the CPLL interrupt is not reliable //when RSTn goes high the DW1000 is in INIT, it will enter IDLE after PLL lock (in 5 us) /*while(instance_data[0].dwIDLE == 0) // this variable will be sent in the IRQ (process_dwRSTn_irq) { //wait for DW1000 to go to IDLE state RSTn pin to go high x++; }*/ setup_DW1000RSTnIRQ(0); //disable RSTn IRQ port_SPIx_set_chip_select(); //CS high //!!! NOTE it takes ~35us for the DW1000 to download AON and lock the PLL and be in IDLE state //do some dummy reads of the dev ID register to make sure DW1000 is in IDLE before setting LEDs x = dwt_readdevid(); //dummy read... need to wait for 5 us to exit INIT state (5 SPI bytes @ ~18 MHz) x = dwt_readdevid(); //dummy read... need to wait for 5 us to exit INIT state (5 SPI bytes @ ~18 MHz) x = dwt_readdevid(); //dummy read... need to wait for 5 us to exit INIT state (5 SPI bytes @ ~18 MHz) x = dwt_readdevid(); //dummy read... need to wait for 5 us to exit INIT state (5 SPI bytes @ ~18 MHz) x = dwt_readdevid(); //dummy read... need to wait for 5 us to exit INIT state (5 SPI bytes @ ~18 MHz) /*if(x != DWT_DEVICE_ID) { x = dwt_readdevid(); //dummy read... need to wait for 5 us to exit INIT state (5 SPI bytes @ ~18 MHz) }*/ //led_off(LED_PC9); //this is platform dependent - only program if DW EVK/EVB dwt_setleds(1); //MP bug - TX antenna delay needs reprogramming as it is not preserved (only RX) dwt_settxantennadelay(inst->txAntennaDelay) ; //set EUI as it will not be preserved unless the EUI is programmed and loaded from NVM dwt_seteui(inst->eui64); } #else Sleep(3); //to approximate match the time spent in the #if above #endif instancesetantennadelays(); //this will update the antenna delay if it has changed instancesettxpower(); //configure TX power if it has changed } break; case TA_TXE_WAIT : //either go to sleep or proceed to TX a message #if defined(DEBUG) printf("TA_TXE_WAIT\n") ; #endif //if we are scheduled to go to sleep before next transmission then sleep first. if((inst->nextState == TA_TXPOLL_WAIT_SEND) && (inst->instToSleep) //go to sleep before sending the next poll/ starting new ranging exchange ) { inst->rangeNum++; //increment the range number before going to sleep //the app should put chip into low power state and wake up after tagSleepTime_ms time... //the app could go to *_IDLE state and wait for uP to wake it up... inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT_TO; //don't sleep here but kick off the Sleep timer countdown inst->testAppState = TA_SLEEP_DONE; { #if (DEEP_SLEEP == 1) //put device into low power mode dwt_entersleep(); //go to sleep #endif //DW1000 gone to sleep - report the received range inst->newRange = instance_calcranges(&inst->tofArray[0], MAX_ANCHOR_LIST_SIZE, TOF_REPORT_T2A, &inst->rxResponseMask); inst->rxResponseMaskReport = inst->rxResponseMask; inst->rxResponseMask = 0; inst->newRangeTime = portGetTickCount() ; } } else //proceed to configuration and transmission of a frame { inst->testAppState = inst->nextState; inst->nextState = 0; //clear } break ; // end case TA_TXE_WAIT case TA_TXPOLL_WAIT_SEND : { #if defined(DEBUG) printf("TA_TXPOLL_WAIT_SEND\n") ; #endif inst->msg_f.messageData[POLL_RNUM] = (inst->mode == TAG) ? inst->rangeNum : inst->rangeNumAnc; //copy new range number inst->msg_f.messageData[FCODE] = (inst->mode == TAG) ? RTLS_DEMO_MSG_TAG_POLL : RTLS_DEMO_MSG_ANCH_POLL; //message function code (specifies if message is a poll, response or other...) inst->psduLength = (TAG_POLL_MSG_LEN + FRAME_CRTL_AND_ADDRESS_S + FRAME_CRC); inst->msg_f.seqNum = inst->frameSN++; //copy sequence number and then increment inst->msg_f.sourceAddr[0] = inst->eui64[0]; //copy the address inst->msg_f.sourceAddr[1] = inst->eui64[1]; //copy the address inst->msg_f.destAddr[0] = 0xff; //set the destination address (broadcast == 0xffff) inst->msg_f.destAddr[1] = 0xff; //set the destination address (broadcast == 0xffff) dwt_writetxdata(inst->psduLength, (uint8 *) &inst->msg_f, 0) ; // write the frame data //set the delayed rx on time (the response message will be sent after this delay (from A0)) dwt_setrxaftertxdelay((uint32)RX_RESPONSE1_TURNAROUND); //units are 1.0256us - wait for wait4respTIM before RX on (delay RX) if(inst->mode == TAG) { inst->rxResps[inst->rangeNum] = 0; //reset the number of received responses inst->responseTO = MAX_ANCHOR_LIST_SIZE; //expecting 4 responses dwt_setrxtimeout((uint16)inst->fwtoTime_sy * MAX_ANCHOR_LIST_SIZE); //configure the RX FWTO } else { inst->rxResps[inst->rangeNumAnc] = 0; //reset number of responses inst->responseTO = NUM_EXPECTED_RESPONSES_ANC0; //2 responses A1, A2 dwt_setrxtimeout((uint16)inst->fwtoTime_sy * (NUM_EXPECTED_RESPONSES_ANC0)); //units are } inst->rxResponseMask = 0; //reset/clear the mask of received responses when tx poll inst->rxResponseMaskAnc = 0; inst->wait4ack = DWT_RESPONSE_EXPECTED; //response is expected - automatically enable the receiver dwt_writetxfctrl(inst->psduLength, 0); //write frame control dwt_starttx(DWT_START_TX_IMMEDIATE | DWT_RESPONSE_EXPECTED); //transmit the frame inst->testAppState = TA_TX_WAIT_CONF ; // wait confirmation inst->previousState = TA_TXPOLL_WAIT_SEND ; inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; //will use RX FWTO to time out (set above) } break; case TA_TXFINAL_WAIT_SEND : { //the final has the same range number as the poll (part of the same ranging exchange) inst->msg_f.messageData[POLL_RNUM] = (inst->mode == TAG) ? inst->rangeNum : inst->rangeNumAnc; //the mask is sent so the anchors know whether the response RX time is valid inst->msg_f.messageData[VRESP] = (inst->mode == TAG) ? inst->rxResponseMask : inst->rxResponseMaskAnc; inst->msg_f.messageData[FCODE] = (inst->mode == TAG) ? RTLS_DEMO_MSG_TAG_FINAL : RTLS_DEMO_MSG_ANCH_FINAL; //message function code (specifies if message is a poll, response or other...) inst->psduLength = (TAG_FINAL_MSG_LEN + FRAME_CRTL_AND_ADDRESS_S + FRAME_CRC); inst->msg_f.seqNum = inst->frameSN++; dwt_writetxdata(inst->psduLength, (uint8 *) &inst->msg_f, 0) ; // write the frame data inst->wait4ack = 0; //clear the flag not using wait for response as this message ends the ranging exchange if(instancesenddlypacket(inst, DWT_START_TX_DELAYED)) { // initiate the re-transmission if(inst->mode == TAG) { inst->testAppState = TA_TXE_WAIT ; //go to TA_TXE_WAIT first to check if it's sleep time inst->nextState = TA_TXPOLL_WAIT_SEND ; } else { //A0 - failed to send Final //A1 - failed to send Final //go back to RX and behave as anchor instance_backtoanchor(inst); } break; //exit this switch case... } else { inst->testAppState = TA_TX_WAIT_CONF; // wait confirmation inst->previousState = TA_TXFINAL_WAIT_SEND; } if(inst->mode == TAG) { inst->instToSleep = TRUE ; } inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; //will use RX FWTO to time out (set above) } break; case TA_TX_WAIT_CONF : #if defined(DEBUG) printf("TA_TX_WAIT_CONF %d m%d states %08x %08x\n", inst->previousState, message, dwt_read32bitreg(0x19), dwt_read32bitreg(0x0f)) ; #endif { event_data_t* dw_event = instance_getevent(11); //get and clear this event //NOTE: Can get the ACK before the TX confirm event for the frame requesting the ACK //this happens because if polling the ISR the RX event will be processed 1st and then the TX event //thus the reception of the ACK will be processed before the TX confirmation of the frame that requested it. if(dw_event->type != DWT_SIG_TX_DONE) //wait for TX done confirmation { if(dw_event->type != 0) { if(dw_event->type == DWT_SIG_RX_TIMEOUT) //got RX timeout - i.e. did not get the response (e.g. ACK) { #if defined(DEBUG) printf("RX timeout in TA_TX_WAIT_CONF (%d)\n", inst->previousState); #endif //we need to wait for SIG_TX_DONE and then process the timeout and re-send the frame if needed inst->gotTO = 1; } else { inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; } } inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; break; } inst->done = INST_NOT_DONE_YET; if(inst->previousState == TA_TXFINAL_WAIT_SEND) { if(inst->mode == TAG) { inst->testAppState = TA_TXE_WAIT ; inst->nextState = TA_TXPOLL_WAIT_SEND ; break; } else { instance_backtoanchor(inst); } } else if (inst->gotTO == 1) //timeout { #if defined(DEBUG) printf("got TO in TA_TX_WAIT_CONF\n"); #endif inst_processrxtimeout(inst); inst->gotTO = 0; inst->wait4ack = 0 ; //clear this break; } else { inst->txu.txTimeStamp = dw_event->timeStamp; if(inst->previousState == TA_TXPOLL_WAIT_SEND) { uint64 tagCalculatedFinalTxTime ; // Embed into Final message: 40-bit pollTXTime, 40-bit respRxTime, 40-bit finalTxTime if(inst->mode == TAG) { tagCalculatedFinalTxTime = (inst->txu.txTimeStamp + inst->pollTx2FinalTxDelay) & MASK_TXDTS; } else //for anchor make the final half the delay ..... (this is ok, as A0 awaits 2 responses) { tagCalculatedFinalTxTime = (inst->txu.txTimeStamp + inst->pollTx2FinalTxDelayAnc) & MASK_TXDTS; } inst->delayedReplyTime = tagCalculatedFinalTxTime >> 8; //high 32-bits // Calculate Time Final message will be sent and write this field of Final message // Sending time will be delayedReplyTime, snapped to ~125MHz or ~250MHz boundary by // zeroing its low 9 bits, and then having the TX antenna delay added // getting antenna delay from the device and add it to the Calculated TX Time tagCalculatedFinalTxTime = tagCalculatedFinalTxTime + inst->txAntennaDelay; tagCalculatedFinalTxTime &= MASK_40BIT; // Write Calculated TX time field of Final message memcpy(&(inst->msg_f.messageData[FTXT]), (uint8 *)&tagCalculatedFinalTxTime, 5); // Write Poll TX time field of Final message memcpy(&(inst->msg_f.messageData[PTXT]), (uint8 *)&inst->txu.tagPollTxTime, 5); //change the w4r for the second and remaining anchors to 50 us //dwt_setrxaftertxdelay((uint32)RX_RESPONSEX_TURNAROUND); //units are 1.0256us - wait for wait4respTIM before RX on (delay RX) } if(inst->previousState == TA_TXRESPONSE_SENT_TORX) { inst->previousState = TA_TXRESPONSE_WAIT_SEND ; } inst->testAppState = TA_RXE_WAIT ; // After sending, tag expects response/report, anchor waits to receive a final/new poll message = 0; //fall into the next case (turn on the RX) } } //break ; // end case TA_TX_WAIT_CONF case TA_RXE_WAIT : #if defined(DEBUG) printf("TA_RXE_WAIT\n") ; #endif { if(inst->wait4ack == 0) //if this is set the RX will turn on automatically after TX { //turn RX on dwt_rxenable(DWT_START_RX_IMMEDIATE) ; // turn RX on, without delay } else { inst->wait4ack = 0 ; //clear the flag, the next time we want to turn the RX on it might not be auto } if (inst->mode != LISTENER) { inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; //using RX FWTO } inst->testAppState = TA_RX_WAIT_DATA; // let this state handle it // end case TA_RXE_WAIT, don't break, but fall through into the TA_RX_WAIT_DATA state to process it immediately. if(message == 0) break; } case TA_RX_WAIT_DATA : // Wait RX data #if defined(DEBUG) printf("TA_RX_WAIT_DATA %d\n", message) ; #endif switch (message) { //if we have received a DWT_SIG_RX_OKAY event - this means that the message is IEEE data type - need to check frame control to know which addressing mode is used case DWT_SIG_RX_OKAY : { event_data_t* dw_event = instance_getevent(15); //get and clear this event uint8 srcAddr[8] = {0,0,0,0,0,0,0,0}; uint8 dstAddr[8] = {0,0,0,0,0,0,0,0}; int fcode = 0; int fn_code = 0; //int srclen = 0; //int fctrladdr_len; uint8 tof_idx = 0; uint8 *messageData; inst->stopTimer = 0; //clear the flag, as we have received a message // handle 16 and 64 bit source and destination addresses switch(dw_event->msgu.frame[1] & 0xCC) { case 0xCC: // memcpy(&srcAddr[0], &(dw_event->msgu.rxmsg_ll.sourceAddr[0]), ADDR_BYTE_SIZE_L); memcpy(&dstAddr[0], &(dw_event->msgu.rxmsg_ll.destAddr[0]), ADDR_BYTE_SIZE_L); fn_code = dw_event->msgu.rxmsg_ll.messageData[FCODE]; messageData = &dw_event->msgu.rxmsg_ll.messageData[0]; //srclen = ADDR_BYTE_SIZE_L; //fctrladdr_len = FRAME_CRTL_AND_ADDRESS_L; break; case 0xC8: // memcpy(&srcAddr[0], &(dw_event->msgu.rxmsg_sl.sourceAddr[0]), ADDR_BYTE_SIZE_L); memcpy(&dstAddr[0], &(dw_event->msgu.rxmsg_sl.destAddr[0]), ADDR_BYTE_SIZE_S); fn_code = dw_event->msgu.rxmsg_sl.messageData[FCODE]; messageData = &dw_event->msgu.rxmsg_sl.messageData[0]; //srclen = ADDR_BYTE_SIZE_L; //fctrladdr_len = FRAME_CRTL_AND_ADDRESS_LS; break; case 0x8C: // memcpy(&srcAddr[0], &(dw_event->msgu.rxmsg_ls.sourceAddr[0]), ADDR_BYTE_SIZE_S); memcpy(&dstAddr[0], &(dw_event->msgu.rxmsg_ls.destAddr[0]), ADDR_BYTE_SIZE_L); fn_code = dw_event->msgu.rxmsg_ls.messageData[FCODE]; messageData = &dw_event->msgu.rxmsg_ls.messageData[0]; //srclen = ADDR_BYTE_SIZE_S; //fctrladdr_len = FRAME_CRTL_AND_ADDRESS_LS; break; case 0x88: // memcpy(&srcAddr[0], &(dw_event->msgu.rxmsg_ss.sourceAddr[0]), ADDR_BYTE_SIZE_S); memcpy(&dstAddr[0], &(dw_event->msgu.rxmsg_ss.destAddr[0]), ADDR_BYTE_SIZE_S); fn_code = dw_event->msgu.rxmsg_ss.messageData[FCODE]; messageData = &dw_event->msgu.rxmsg_ss.messageData[0]; //srclen = ADDR_BYTE_SIZE_S; //fctrladdr_len = FRAME_CRTL_AND_ADDRESS_S; break; } if((inst->instToSleep == FALSE) && (inst->mode == LISTENER))//update received data, and go back to receiving frames { //do something with message data (e.g. could extract any ToFs and print them) inst->testAppState = TA_RXE_WAIT ; // wait for next frame dwt_setrxaftertxdelay(0); } else { //process ranging messages fcode = fn_code; tof_idx = srcAddr[0] & 0x3 ; switch(fcode) { case RTLS_DEMO_MSG_ANCH_POLL: case RTLS_DEMO_MSG_TAG_POLL: { inst->tagPollRxTime = dw_event->timeStamp ; //save Poll's Rx time if(fcode == RTLS_DEMO_MSG_TAG_POLL) //got poll from Tag { inst->rangeNumA[srcAddr[0]&0x7] = messageData[POLL_RNUM]; //when anchor receives a poll, we need to remember the new range number } else //got poll from Anchor (initiator) { inst->rangeNumAAnc[tof_idx] = messageData[POLL_RNUM]; //when anchor receives poll from another anchor - save the range number } if (A1_ANCHOR_ADDR == inst->instanceAddress16) //this is A1 { if(GATEWAY_ANCHOR_ADDR == (srcAddr[0] | ((uint32)(srcAddr[1] << 8)))) //poll is from A0 { //configure the time A1 will poll A2 (it should be in half slot time from now) inst->a1SlotTime = dw_event->uTimeStamp + (inst->slotPeriod); //inst->instanceTimerEn = 1; - THIS IS ENABLED BELOW AFTER FINAL // - means that if final is not received then A1 will not range to A2 } } //the response has been sent - await TX done event if(dw_event->type_pend == DWT_SIG_TX_PENDING) { inst->testAppState = TA_TX_WAIT_CONF; // wait confirmation inst->previousState = TA_TXRESPONSE_SENT_POLLRX ; //wait for TX confirmation of sent response } //already re-enabled the receiver else if (dw_event->type_pend == DWT_SIG_RX_PENDING) { //stay in RX wait for next frame... //RX is already enabled... inst->testAppState = TA_RX_WAIT_DATA ; // wait for next frame } else //the DW1000 is idle (re-enable from the application level) { //stay in RX wait for next frame... inst->testAppState = TA_RXE_WAIT ; // wait for next frame } } break; //RTLS_DEMO_MSG_TAG_POLL case RTLS_DEMO_MSG_ANCH_RESP2: case RTLS_DEMO_MSG_ANCH_RESP: { uint8 currentRangeNum = (messageData[TOFRN] + 1); //current = previous + 1 if(GATEWAY_ANCHOR_ADDR == (srcAddr[0] | ((uint32)(srcAddr[1] << 8)))) //if response from gateway then use the correction factor { if(inst->mode == TAG) { // casting received bytes to int because this is a signed correction -0.5 periods to +1.5 periods inst->tagSleepCorrection = (int16) (((uint16) messageData[RES_TAG_SLP1] << 8) + messageData[RES_TAG_SLP0]); inst->tagSleepRnd = 0; // once we have initial response from Anchor #0 the slot correction acts and we don't need this anymore } } //the response has been sent - await TX done event if(dw_event->type_pend == DWT_SIG_TX_PENDING) //anchor received response from anchor ID - 1 so is sending it's response now back to tag { inst->testAppState = TA_TX_WAIT_CONF; // wait confirmation inst->previousState = TA_TXRESPONSE_SENT_RESPRX ; //wait for TX confirmation of sent response } //already re-enabled the receiver else if(dw_event->type_pend == DWT_SIG_RX_PENDING) { // stay in TA_RX_WAIT_DATA - receiver is already enabled. } //DW1000 idle - send the final else //if(dw_event->type_pend == DWT_SIG_DW_IDLE) { if(((TAG == inst->mode) && (inst->rxResponseMask & 0x1)) //if A0's response received send the final || ((A1_ANCHOR_ADDR == inst->instanceAddress16) && (inst->rxResponseMaskAnc & 0x4)) || ((GATEWAY_ANCHOR_ADDR == inst->instanceAddress16) && (inst->rxResponseMaskAnc & 0x2)) ) //if A1's response received { inst->testAppState = TA_TXFINAL_WAIT_SEND ; // send our response / the final } else //go to sleep { if(TAG == inst->mode) { inst->testAppState = TA_TXE_WAIT ; //go to TA_TXE_WAIT first to check if it's sleep time inst->nextState = TA_TXPOLL_WAIT_SEND ; inst->instToSleep = TRUE; } else { instance_backtoanchor(inst); } } } /*else { //stay in RX wait for next frame... inst->testAppState = TA_RXE_WAIT ; // wait for next frame }*/ if(fcode == RTLS_DEMO_MSG_ANCH_RESP) //tag to anchor mode { if(currentRangeNum == inst->rangeNum) //these are the previous ranges... { //copy the ToF and put into array (array holds last 4 ToFs) memcpy(&inst->tofArray[(srcAddr[0]&0x3)], &(messageData[TOFR]), 4); //check if the ToF is valid, this makes sure we only report valid ToFs //e.g. consider the case of reception of response from anchor a1 (we are anchor a2) //if a1 got a Poll with previous Range number but got no Final, then the response will have //the correct range number but the range will be INVALID_TOF if(inst->tofArray[(srcAddr[0]&0x3)] != INVALID_TOF) { inst->rxResponseMask |= (0x1 << (srcAddr[0]&0x3)); } } else { if(inst->tofArray[(srcAddr[0]&0x3)] != INVALID_TOF) { inst->tofArray[(srcAddr[0]&0x3)] = INVALID_TOF; } } } else //anchor to anchor (only gateway processes anchor to anchor ToFs) { //report the correct set of ranges (ranges from anchors A1, A2 need to match owns range number) if((inst->gatewayAnchor)&&(currentRangeNum == inst->rangeNumAnc)) //these are the previous ranges... { inst->rangeNumAAnc[0] = inst->rangeNumAnc ; //once A0 receives A2's response then it can report the 3 ToFs. if(inst->rxResps[inst->rangeNumAnc] == 3) //if(A2_ANCHOR_ADDR == (srcAddr[0] | ((uint32)(srcAddr[1] << 8)))) { //copy the ToF and put into array, the array should have 3 ToFs A0-A1, A0-A2 and A1-A2 memcpy(&inst->tofArrayAnc[(srcAddr[0]+dstAddr[0])&0x3], &(messageData[TOFR]), 4); //calculate all anchor - anchor ranges... and report inst->newRange = instance_calcranges(&inst->tofArrayAnc[0], MAX_ANCHOR_LIST_SIZE, TOF_REPORT_A2A, &inst->rxResponseMaskAnc); inst->rxResponseMaskReport = inst->rxResponseMaskAnc; inst->rxResponseMaskAnc = 0; inst->newRangeTime = dw_event->uTimeStamp ; } else { //copy the ToF and put into array (array holds last 4 ToFs) memcpy(&inst->tofArrayAnc[(srcAddr[0]+dstAddr[0])&0x3], &(messageData[TOFR]), 4); } } } } break; //RTLS_DEMO_MSG_ANCH_RESP case RTLS_DEMO_MSG_ANCH_FINAL: case RTLS_DEMO_MSG_TAG_FINAL: { int64 Rb, Da, Ra, Db ; uint64 tagFinalTxTime = 0; uint64 tagFinalRxTime = 0; uint64 tagPollTxTime = 0; uint64 anchorRespRxTime = 0; uint64 tof = INVALID_TOF; double RaRbxDaDb = 0; double RbyDb = 0; double RayDa = 0; uint8 validResp = messageData[VRESP]; uint8 index = RRXT0 + 5*(inst->shortAdd_idx); if((RTLS_DEMO_MSG_TAG_FINAL == fcode) && (inst->rangeNumA[srcAddr[0]&0x7] != messageData[POLL_RNUM])) //Final's range number needs to match Poll's or else discard this message { inst->testAppState = TA_RXE_WAIT ; // wait for next frame break; } if((RTLS_DEMO_MSG_ANCH_FINAL == fcode) && (((inst->rangeNumAAnc[tof_idx] != messageData[POLL_RNUM]) //Final's range number needs to match Poll's or else discard this message || inst->gatewayAnchor) //gateway can ignore the Final (from A1 to A2 exchange) || (A3_ANCHOR_ADDR == inst->instanceAddress16))) //A3 does not care about Final from A1 or A0 { inst->testAppState = TA_RXE_WAIT ; // wait for next frame break; } if (A1_ANCHOR_ADDR == inst->instanceAddress16) //this is A1 { if(GATEWAY_ANCHOR_ADDR == (srcAddr[0] | ((uint32)(srcAddr[1] << 8)))) //final is from A0 { //ENABLE TIMER ONLY IF FINAL RECEIVED inst->instanceTimerEn = 1; } } //output data over USB... inst->newRangeAncAddress = inst->instanceAddress16; //if we got the final, maybe the tag did not get our response, so //we can use other anchors responses/ToF if there are any.. and output.. //but we cannot calculate new range if(((validResp & (0x1<<(inst->shortAdd_idx))) != 0)) { // time of arrival of Final message tagFinalRxTime = dw_event->timeStamp ; //Final's Rx time /* #if defined(DEBUG) printf("FinalRx Timestamp: %4.15e\n", convertdevicetimetosecu(dw_event.timeStamp)); #endif */ inst->delayedReplyTime = 0 ; // times measured at Tag extracted from the message buffer // extract 40bit times memcpy(&tagPollTxTime, &(messageData[PTXT]), 5); memcpy(&anchorRespRxTime, &(messageData[index]), 5); memcpy(&tagFinalTxTime, &(messageData[FTXT]), 5); // poll response round trip delay time is calculated as // (anchorRespRxTime - tagPollTxTime) - (anchorRespTxTime - tagPollRxTime) Ra = (int64)((anchorRespRxTime - tagPollTxTime) & MASK_40BIT); Db = (int64)((inst->txu.anchorRespTxTime - inst->tagPollRxTime) & MASK_40BIT); // response final round trip delay time is calculated as // (tagFinalRxTime - anchorRespTxTime) - (tagFinalTxTime - anchorRespRxTime) Rb = (int64)((tagFinalRxTime - inst->txu.anchorRespTxTime) & MASK_40BIT); Da = (int64)((tagFinalTxTime - anchorRespRxTime) & MASK_40BIT); RaRbxDaDb = (((double)Ra))*(((double)Rb)) - (((double)Da))*(((double)Db)); RbyDb = ((double)Rb + (double)Db); RayDa = ((double)Ra + (double)Da); tof = (int32) ( RaRbxDaDb/(RbyDb + RayDa) ); } //tag to anchor ranging if(RTLS_DEMO_MSG_TAG_FINAL == fcode) { inst->newRangeTagAddress = srcAddr[0] + ((uint16) srcAddr[1] << 8); //time-of-flight inst->tof[inst->newRangeTagAddress & 0x7] = tof; //calculate all tag - anchor ranges... and report inst->newRange = instance_calcranges(&inst->tofArray[0], MAX_ANCHOR_LIST_SIZE, TOF_REPORT_T2A, &inst->rxResponseMask); inst->rxResponseMaskReport = inst->rxResponseMask; //copy the valid mask to report inst->rxResponseMask = 0; //we have our range - update the own mask entry... if(tof != INVALID_TOF) //check the last ToF entry is valid and copy into the current array { setTagDist(srcAddr[0], inst->shortAdd_idx); //copy distance from this anchor to the tag into array inst->rxResponseMask = (0x1 << inst->shortAdd_idx); inst->tofArray[inst->shortAdd_idx] = tof; } inst->newRangeTime = dw_event->uTimeStamp ; } else //anchor to anchor ranging { inst->newRangeTagAddress = srcAddr[0] + ((uint16) srcAddr[1] << 8); //time-of-flight inst->tofAnc[tof_idx] = tof; } //reset the response count if(inst->rxResps[inst->rxRespsIdx] >= 0) { inst->rxResps[inst->rxRespsIdx] = -1 * inst->rxResps[inst->rxRespsIdx]; if(inst->rxResps[inst->rxRespsIdx] == 0) //as A0 will have this as 0 when ranging to A1 inst->rxResps[inst->rxRespsIdx] = -1 ; } instancesetantennadelays(); //this will update the antenna delay if it has changed instancesettxpower(); // configure TX power if it has changed inst->testAppState = TA_RXE_WAIT ; // wait for next frame } break; //RTLS_DEMO_MSG_TAG_FINAL default: { //only enable receiver when not using double buffering inst->testAppState = TA_RXE_WAIT ; // wait for next frame dwt_setrxaftertxdelay(0); } break; } //end switch (fcode) if(dw_event->msgu.frame[0] & 0x20) { //as we only pass the received frame with the ACK request bit set after the ACK has been sent instance_getevent(16); //get and clear the ACK sent event } } //end else } break ; //end of DWT_SIG_RX_OKAY case DWT_SIG_RX_TIMEOUT : { event_data_t* dw_event = instance_getevent(17); //get and clear this event #if defined(DEBUG) printf("PD_DATA_TIMEOUT %d\n", inst->previousState) ; #endif //Anchor can time out and then need to send response - so will be in TX pending if(dw_event->type_pend == DWT_SIG_TX_PENDING) { inst->testAppState = TA_TX_WAIT_CONF; // wait confirmation inst->previousState = TA_TXRESPONSE_SENT_TORX ; //wait for TX confirmation of sent response } else if(dw_event->type_pend == DWT_SIG_DW_IDLE) //if timed out and back in receive then don't process as timeout { inst_processrxtimeout(inst); } //else if RX_PENDING then wait for next RX event... message = 0; //clear the message as we have processed the event } break ; case DWT_SIG_TX_AA_DONE: //ignore this event - just process the rx frame that was received before the ACK response case 0: default : { if(message) // == DWT_SIG_TX_DONE) { inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; } if(inst->done == INST_NOT_DONE_YET) inst->done = INST_DONE_WAIT_FOR_NEXT_EVENT; } break; } break ; // end case TA_RX_WAIT_DATA default: #if defined(DEBUG) printf("\nERROR - invalid state %d - what is going on??\n", inst->testAppState) ; #endif break; } // end switch on testAppState
/* ********************************************************************************************************* * * loca_status dwt_config(eCHAN channel, ePRF prf, ePLEN PreambleLength, eCODE code, uint8_t nsSFD, DataRate db) * * 描 述 : 配置DW1000 * * 输入参数 : * channel:DW1000通道 prf: PreambleLength: code: nsSFD: db: * * 输出参数 : DW1000状态 ********************************************************************************************************* */ static loca_status dwt_config(eCHAN channel, ePRF prf, ePLEN PreambleLength, eCODE code, uint8_t nsSFD, DataRate db) { dwt_config_t config; dwt_txconfig_t txconfig; uint8_t buf[2]; uint64_t eui64; uint16_t panid; eui64 = LOC_CFG_EUI; panid = LOC_CFG_PANID; config.chan = channel; config.prf = prf; config.txPreambLength = PreambleLength; switch (PreambleLength) { case PLEN_64: case PLEN_128: config.rxPAC = DWT_PAC8; break; case PLEN_256: case PLEN_512: config.rxPAC = DWT_PAC16; break; case PLEN_1024: config.rxPAC = DWT_PAC32; break; default: config.rxPAC = DWT_PAC64; break; } config.rxCode = code; config.txCode = code; config.nsSFD = nsSFD; config.dataRate = db; config.smartPowerEn = 0; config.phrMode = 0; txconfig.PGdly = dwt_pgdelay[channel]; txconfig.power = dwt_manualpwr[prf - 1][channel]; BSP_ChangeSPIRate(SPI_SLOW); dwt_softreset(); if (dwt_initialise(DWT_LOADNONE) != DWT_SUCCESS) { BSP_ChangeSPIRate(SPI_FAST); return LOCA_FAULT; } BSP_ChangeSPIRate(SPI_FAST); if (dwt_readdevid() != DWT_DEVICE_ID) { return LOCA_FAULT; } buf[0] = 0x10; dwt_writetodevice(GPIO_CTRL_ID,0x02,1,&buf[0]); buf[0] = 0xf0; buf[1] = 0xf0; dwt_writetodevice(GPIO_CTRL_ID,0x08,2,&buf[0]); dwt_configure(&config, 0); dwt_xtaltrim(LOC_CFG_XTALRIM); dwt_setrxantennadelay(0); dwt_settxantennadelay(0); dwt_setsmarttxpower(0); dwt_configuretxrf(&txconfig); dwt_enableframefilter(DWT_FF_NOTYPE_EN); dwt_seteui((uint8_t *)&eui64); dwt_setpanid(panid); //开启硬件中断 //BSP_DWTIntEnable(); // dwt_setinterrupt( DWT_INT_TFRS, 1); dwt_setrxmode(DWT_RX_NORMAL,0,0); return LOCA_OK; }