osd-contiki/cpu/avr/radio/rf230bb/rf230bb.c

1689 lines
51 KiB
C
Raw Normal View History

2009-07-08 18:17:07 +02:00
/*
* Copyright (c) 2007, Swedish Institute of Computer Science
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. Neither the name of the Institute nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
2010-02-22 23:23:18 +01:00
* This file is part of the Contiki operating system.
2009-07-08 18:17:07 +02:00
*
2010-12-22 21:10:00 +01:00
* @(#)$Id: rf230bb.c,v 1.24 2010/12/22 20:10:00 dak664 Exp $
2009-07-08 18:17:07 +02:00
*/
2010-02-22 23:23:18 +01:00
/*
* This code is almost device independent and should be easy to port.
* Ported to Atmel RF230 21Feb2010 by dak
2009-07-08 18:17:07 +02:00
*/
#include <stdio.h>
#include <string.h>
#include "contiki.h"
2010-02-22 23:23:18 +01:00
#if defined(__AVR__)
2009-07-08 18:17:07 +02:00
#include <avr/io.h>
//_delay_us has the potential to use floating point which brings the 256 byte clz table into RAM
//#include <util/delay.h>
//#define delay_us( us ) ( _delay_us( ( us ) ) )
//_delay_loop_2(uint16_t count) is 4 CPU cycles per iteration, up to 32 milliseconds at 8MHz
#include <util/delay_basic.h>
#define delay_us( us ) ( _delay_loop_2(1+(us*F_CPU)/4000000UL) )
#include <avr/pgmspace.h>
2010-02-22 23:23:18 +01:00
#elif defined(__MSP430__)
#include <io.h>
#endif
2009-07-08 18:17:07 +02:00
#include "dev/leds.h"
#include "dev/spi.h"
#include "rf230bb.h"
#include "net/packetbuf.h"
2009-07-08 18:17:07 +02:00
#include "net/rime/rimestats.h"
2010-02-22 23:23:18 +01:00
#include "net/netstack.h"
2009-07-08 18:17:07 +02:00
#include "sys/timetable.h"
#define WITH_SEND_CCA 0
/* Timestamps have not been tested */
2009-07-08 18:17:07 +02:00
#if RF230_CONF_TIMESTAMPS
#include "net/rime/timesynch.h"
#define TIMESTAMP_LEN 3
#else /* RF230_CONF_TIMESTAMPS */
#define TIMESTAMP_LEN 0
#endif /* RF230_CONF_TIMESTAMPS */
/* Nonzero FOOTER_LEN has not been tested */
2010-02-22 23:23:18 +01:00
#define FOOTER_LEN 0
2009-07-08 18:17:07 +02:00
2010-12-22 21:10:00 +01:00
/* RF230_CONF_CHECKSUM=0 for automatic hardware checksum */
2009-07-08 18:17:07 +02:00
#ifndef RF230_CONF_CHECKSUM
#define RF230_CONF_CHECKSUM 0
2011-08-13 17:38:38 +02:00
#endif
2009-07-08 18:17:07 +02:00
2011-08-13 17:38:38 +02:00
/* Autoack setting ignored in non-extended mode */
2010-02-22 23:23:18 +01:00
#ifndef RF230_CONF_AUTOACK
#define RF230_CONF_AUTOACK 1
2011-08-13 17:38:38 +02:00
#endif
2010-02-22 23:23:18 +01:00
2011-08-13 17:38:38 +02:00
/* We need to turn off autoack in promiscuous mode */
#if RF230_CONF_AUTOACK
static bool is_promiscuous;
#endif
2011-08-13 17:38:38 +02:00
/* RF230_CONF_AUTORETRIES is 1 plus the number written to the hardware. */
/* Valid range 1-16, zero disables extended mode. */
#ifndef RF230_CONF_AUTORETRIES
2011-08-13 17:38:38 +02:00
#define RF230_CONF_AUTORETRIES 3
#endif
/* RF230_CONF_CSMARETRIES is number of random-backoff/CCA retries. */
/* The hardware will accept 0-7, but 802.15.4-2003 only allows 5 maximum */
#ifndef RF230_CONF_CSMARETRIES
#define RF230_CONF_CSMARETRIES 5
#endif
2010-02-22 23:23:18 +01:00
//Automatic and manual CRC both append 2 bytes to packets
#if RF230_CONF_CHECKSUM || defined(RF230BB_HOOK_TX_PACKET)
2009-07-08 18:17:07 +02:00
#include "lib/crc16.h"
2011-08-13 17:38:38 +02:00
#endif
#define CHECKSUM_LEN 2
2009-07-08 18:17:07 +02:00
2011-08-13 17:38:38 +02:00
/* Note the AUX_LEN is equal to the CHECKSUM_LEN in any tested configurations to date! */
2009-07-08 18:17:07 +02:00
#define AUX_LEN (CHECKSUM_LEN + TIMESTAMP_LEN + FOOTER_LEN)
#if AUX_LEN != CHECKSUM_LEN
#warning RF230 Untested Configuration!
#endif
2009-07-08 18:17:07 +02:00
struct timestamp {
uint16_t time;
uint8_t authority_level;
};
#define FOOTER1_CRC_OK 0x80
#define FOOTER1_CORRELATION 0x7f
2011-08-13 17:38:38 +02:00
/* Leave radio on when USB powered or for testing low power protocols */
/* This allows DEBUGFLOW indication of packets received when the radio is "off" */
#if JACKDAW
#define RADIOALWAYSON 1
#else
2010-12-18 21:49:00 +01:00
#define RADIOALWAYSON 0
#define RADIOSLEEPSWHENOFF 1
#endif
2011-08-13 17:38:38 +02:00
/* RS232 delays will cause 6lowpan fragment overruns! Use DEBUGFLOW instead. */
2009-07-08 18:17:07 +02:00
#define DEBUG 0
#if DEBUG
#define PRINTF(FORMAT,args...) printf_P(PSTR(FORMAT),##args)
#define PRINTSHORT(FORMAT,args...) printf_P(PSTR(FORMAT),##args)
2009-07-08 18:17:07 +02:00
#else
2010-02-22 23:23:18 +01:00
#define PRINTF(...)
#define PRINTSHORT(...)
#endif
#if DEBUG>1
/* Output format is suitable for text2pcap to convert to wireshark pcap file.
* Use $text2pcap -e 0x809a (these_outputs) capture.pcap
* Since the hardware calculates and appends the two byte checksum to Tx packets,
* we just add two zero bytes to the packet dump. Don't forget to enable wireshark
* 802.15.4 dissection even when the checksum is wrong!
*/
2009-07-08 18:17:07 +02:00
#endif
/* See clock.c and httpd-cgi.c for RADIOSTATS code */
2011-07-24 17:43:17 +02:00
#if AVR_WEBSERVER
#define RADIOSTATS 1
#endif
#if RADIOSTATS
uint16_t RF230_sendpackets,RF230_receivepackets,RF230_sendfail,RF230_receivefail;
#endif
2011-08-13 17:38:38 +02:00
#if RADIO_CONF_CALIBRATE_INTERVAL
/* Set in clock.c every 256 seconds */
2011-08-13 17:38:38 +02:00
/* The calibration is automatic when the radio turns on, so not needed when duty cycling */
uint8_t rf230_calibrate;
uint8_t rf230_calibrated; //for debugging, prints from main loop when calibration occurs
#endif
2010-02-22 23:23:18 +01:00
/* Track flow through mac, rdc and radio drivers, see contiki-raven-main.c for example of use */
#if DEBUGFLOWSIZE
extern uint8_t debugflowsize,debugflow[DEBUGFLOWSIZE];
#define DEBUGFLOW(c) if (debugflowsize<(DEBUGFLOWSIZE-1)) debugflow[debugflowsize++]=c
#else
#define DEBUGFLOW(c)
#endif
2009-07-08 18:17:07 +02:00
/* XXX hack: these will be made as Chameleon packet attributes */
rtimer_clock_t rf230_time_of_arrival, rf230_time_of_departure;
int rf230_authority_level_of_sender;
#if RF230_CONF_TIMESTAMPS
static rtimer_clock_t setup_time_for_transmission;
static unsigned long total_time_for_transmission, total_transmission_len;
static int num_transmissions;
2011-08-13 17:38:38 +02:00
#endif
2009-07-08 18:17:07 +02:00
#if defined(__AVR_ATmega128RFA1__)
volatile uint8_t rf230_interruptwait;
#endif
uint8_t volatile rf230_pending;
2010-02-22 23:23:18 +01:00
2009-07-08 18:17:07 +02:00
/* RF230 hardware delay times, from datasheet */
typedef enum{
2010-02-22 23:23:18 +01:00
TIME_TO_ENTER_P_ON = 510, /**< Transition time from VCC is applied to P_ON - most favorable case! */
2009-07-08 18:17:07 +02:00
TIME_P_ON_TO_TRX_OFF = 510, /**< Transition time from P_ON to TRX_OFF. */
TIME_SLEEP_TO_TRX_OFF = 880, /**< Transition time from SLEEP to TRX_OFF. */
TIME_RESET = 6, /**< Time to hold the RST pin low during reset */
TIME_ED_MEASUREMENT = 140, /**< Time it takes to do a ED measurement. */
TIME_CCA = 140, /**< Time it takes to do a CCA. */
TIME_PLL_LOCK = 150, /**< Maximum time it should take for the PLL to lock. */
TIME_FTN_TUNING = 25, /**< Maximum time it should take to do the filter tuning. */
TIME_NOCLK_TO_WAKE = 6, /**< Transition time from *_NOCLK to being awake. */
TIME_CMD_FORCE_TRX_OFF = 1, /**< Time it takes to execute the FORCE_TRX_OFF command. */
TIME_TRX_OFF_TO_PLL_ACTIVE = 180, /**< Transition time from TRX_OFF to: RX_ON, PLL_ON, TX_ARET_ON and RX_AACK_ON. */
TIME_STATE_TRANSITION_PLL_ACTIVE = 1, /**< Transition time from PLL active state to another. */
}radio_trx_timing_t;
/*---------------------------------------------------------------------------*/
2010-02-22 23:23:18 +01:00
PROCESS(rf230_process, "RF230 driver");
2009-07-08 18:17:07 +02:00
/*---------------------------------------------------------------------------*/
int rf230_on(void);
int rf230_off(void);
2010-02-22 23:23:18 +01:00
static int rf230_read(void *buf, unsigned short bufsize);
static int rf230_prepare(const void *data, unsigned short len);
static int rf230_transmit(unsigned short len);
static int rf230_send(const void *data, unsigned short len);
static int rf230_receiving_packet(void);
static int rf230_pending_packet(void);
2010-02-22 23:23:18 +01:00
static int rf230_cca(void);
uint8_t rf230_last_correlation,rf230_last_rssi,rf230_smallest_rssi;
2010-02-22 23:23:18 +01:00
2009-07-08 18:17:07 +02:00
const struct radio_driver rf230_driver =
{
2010-02-22 23:23:18 +01:00
rf230_init,
rf230_prepare,
rf230_transmit,
2009-07-08 18:17:07 +02:00
rf230_send,
rf230_read,
2010-02-22 23:23:18 +01:00
rf230_cca,
rf230_receiving_packet,
rf230_pending_packet,
2009-07-08 18:17:07 +02:00
rf230_on,
rf230_off
2009-07-08 18:17:07 +02:00
};
2011-08-13 17:38:38 +02:00
uint8_t RF230_receive_on;
static uint8_t channel;
2009-07-08 18:17:07 +02:00
2010-02-22 23:23:18 +01:00
/* Received frames are buffered to rxframe in the interrupt routine in hal.c */
uint8_t rxframe_head,rxframe_tail;
hal_rx_frame_t rxframe[RF230_CONF_RX_BUFFERS];
2009-07-08 18:17:07 +02:00
/*----------------------------------------------------------------------------*/
/** \brief This function return the Radio Transceivers current state.
*
* \retval P_ON When the external supply voltage (VDD) is
* first supplied to the transceiver IC, the
* system is in the P_ON (Poweron) mode.
* \retval BUSY_RX The radio transceiver is busy receiving a
* frame.
* \retval BUSY_TX The radio transceiver is busy transmitting a
* frame.
* \retval RX_ON The RX_ON mode enables the analog and digital
* receiver blocks and the PLL frequency
* synthesizer.
* \retval TRX_OFF In this mode, the SPI module and crystal
* oscillator are active.
* \retval PLL_ON Entering the PLL_ON mode from TRX_OFF will
* first enable the analog voltage regulator. The
* transceiver is ready to transmit a frame.
* \retval BUSY_RX_AACK The radio was in RX_AACK_ON mode and received
* the Start of Frame Delimiter (SFD). State
* transition to BUSY_RX_AACK is done if the SFD
* is valid.
* \retval BUSY_TX_ARET The radio transceiver is busy handling the
* auto retry mechanism.
* \retval RX_AACK_ON The auto acknowledge mode of the radio is
* enabled and it is waiting for an incomming
* frame.
* \retval TX_ARET_ON The auto retry mechanism is enabled and the
* radio transceiver is waiting for the user to
* send the TX_START command.
* \retval RX_ON_NOCLK The radio transceiver is listening for
* incomming frames, but the CLKM is disabled so
* that the controller could be sleeping.
* However, this is only true if the controller
* is run from the clock output of the radio.
* \retval RX_AACK_ON_NOCLK Same as the RX_ON_NOCLK state, but with the
* auto acknowledge module turned on.
* \retval BUSY_RX_AACK_NOCLK Same as BUSY_RX_AACK, but the controller
* could be sleeping since the CLKM pin is
* disabled.
* \retval STATE_TRANSITION The radio transceiver's state machine is in
* transition between two states.
*/
2010-02-22 23:23:18 +01:00
static uint8_t
2009-07-08 18:17:07 +02:00
radio_get_trx_state(void)
{
return hal_subregister_read(SR_TRX_STATUS);
}
/*----------------------------------------------------------------------------*/
/** \brief This function checks if the radio transceiver is sleeping.
*
* \retval true The radio transceiver is in SLEEP or one of the *_NOCLK
* states.
* \retval false The radio transceiver is not sleeping.
*/
2011-08-13 17:38:38 +02:00
#if 0
2010-02-22 23:23:18 +01:00
static bool radio_is_sleeping(void)
2009-07-08 18:17:07 +02:00
{
bool sleeping = false;
/* The radio transceiver will be at SLEEP or one of the *_NOCLK states only if */
/* the SLP_TR pin is high. */
if (hal_get_slptr() != 0){
sleeping = true;
}
return sleeping;
}
2011-08-13 17:38:38 +02:00
#endif
2009-07-08 18:17:07 +02:00
/*----------------------------------------------------------------------------*/
/** \brief This function will reset the state machine (to TRX_OFF) from any of
* its states, except for the SLEEP state.
*/
2010-02-22 23:23:18 +01:00
static void
2009-07-08 18:17:07 +02:00
radio_reset_state_machine(void)
{
if (hal_get_slptr()) DEBUGFLOW('"');
2009-07-08 18:17:07 +02:00
hal_set_slptr_low();
delay_us(TIME_NOCLK_TO_WAKE);
hal_subregister_write(SR_TRX_CMD, CMD_FORCE_TRX_OFF);
delay_us(TIME_CMD_FORCE_TRX_OFF);
}
/*---------------------------------------------------------------------------*/
static char
rf230_isidle(void)
{
uint8_t radio_state;
2011-08-13 17:38:38 +02:00
if (hal_get_slptr()) {
DEBUGFLOW(']');
return 1;
} else {
radio_state = hal_subregister_read(SR_TRX_STATUS);
if (radio_state != BUSY_TX_ARET &&
radio_state != BUSY_RX_AACK &&
radio_state != STATE_TRANSITION &&
radio_state != BUSY_RX &&
radio_state != BUSY_TX) {
return(1);
} else {
// printf(".%u",radio_state);
return(0);
}
2011-08-13 17:38:38 +02:00
}
}
static void
rf230_waitidle(void)
{
while (1) {
if (rf230_isidle()) break;
}
}
2009-07-08 18:17:07 +02:00
/*----------------------------------------------------------------------------*/
/** \brief This function will change the current state of the radio
* transceiver's internal state machine.
*
* \param new_state Here is a list of possible states:
* - RX_ON Requested transition to RX_ON state.
* - TRX_OFF Requested transition to TRX_OFF state.
* - PLL_ON Requested transition to PLL_ON state.
* - RX_AACK_ON Requested transition to RX_AACK_ON state.
* - TX_ARET_ON Requested transition to TX_ARET_ON state.
*
* \retval RADIO_SUCCESS Requested state transition completed
* successfully.
* \retval RADIO_INVALID_ARGUMENT Supplied function parameter out of bounds.
* \retval RADIO_WRONG_STATE Illegal state to do transition from.
* \retval RADIO_BUSY_STATE The radio transceiver is busy.
* \retval RADIO_TIMED_OUT The state transition could not be completed
* within resonable time.
*/
2010-02-22 23:23:18 +01:00
static radio_status_t
2009-07-08 18:17:07 +02:00
radio_set_trx_state(uint8_t new_state)
{
uint8_t original_state;
/*Check function paramter and current state of the radio transceiver.*/
if (!((new_state == TRX_OFF) ||
(new_state == RX_ON) ||
(new_state == PLL_ON) ||
(new_state == RX_AACK_ON) ||
(new_state == TX_ARET_ON))){
return RADIO_INVALID_ARGUMENT;
}
2011-08-13 17:38:38 +02:00
if (hal_get_slptr()) {
2009-07-08 18:17:07 +02:00
return RADIO_WRONG_STATE;
}
/* Wait for radio to finish previous operation */
rf230_waitidle();
// for(;;)
// {
2009-07-08 18:17:07 +02:00
original_state = radio_get_trx_state();
// if (original_state != BUSY_TX_ARET &&
// original_state != BUSY_RX_AACK &&
// original_state != BUSY_RX &&
// original_state != BUSY_TX)
// break;
// }
2009-07-08 18:17:07 +02:00
if (new_state == original_state){
return RADIO_SUCCESS;
}
/* At this point it is clear that the requested new_state is: */
/* TRX_OFF, RX_ON, PLL_ON, RX_AACK_ON or TX_ARET_ON. */
/* The radio transceiver can be in one of the following states: */
/* TRX_OFF, RX_ON, PLL_ON, RX_AACK_ON, TX_ARET_ON. */
if(new_state == TRX_OFF){
radio_reset_state_machine(); /* Go to TRX_OFF from any state. */
} else {
/* It is not allowed to go from RX_AACK_ON or TX_AACK_ON and directly to */
/* TX_AACK_ON or RX_AACK_ON respectively. Need to go via RX_ON or PLL_ON. */
if ((new_state == TX_ARET_ON) &&
(original_state == RX_AACK_ON)){
/* First do intermediate state transition to PLL_ON, then to TX_ARET_ON. */
/* The final state transition to TX_ARET_ON is handled after the if-else if. */
hal_subregister_write(SR_TRX_CMD, PLL_ON);
delay_us(TIME_STATE_TRANSITION_PLL_ACTIVE);
} else if ((new_state == RX_AACK_ON) &&
(original_state == TX_ARET_ON)){
/* First do intermediate state transition to RX_ON, then to RX_AACK_ON. */
/* The final state transition to RX_AACK_ON is handled after the if-else if. */
hal_subregister_write(SR_TRX_CMD, RX_ON);
delay_us(TIME_STATE_TRANSITION_PLL_ACTIVE);
}
/* Any other state transition can be done directly. */
hal_subregister_write(SR_TRX_CMD, new_state);
/* When the PLL is active most states can be reached in 1us. However, from */
/* TRX_OFF the PLL needs time to activate. */
if (original_state == TRX_OFF){
delay_us(TIME_TRX_OFF_TO_PLL_ACTIVE);
} else {
delay_us(TIME_STATE_TRANSITION_PLL_ACTIVE);
}
} /* end: if(new_state == TRX_OFF) ... */
/*Verify state transition.*/
radio_status_t set_state_status = RADIO_TIMED_OUT;
if (radio_get_trx_state() == new_state){
set_state_status = RADIO_SUCCESS;
}
return set_state_status;
}
void
rf230_set_promiscuous_mode(bool isPromiscuous) {
#if RF230_CONF_AUTOACK
is_promiscuous = isPromiscuous;
/* TODO: Figure out when to pass promisc state to 802.15.4 */
// radio_set_trx_state(is_promiscuous?RX_ON:RX_AACK_ON);
#endif
}
bool
rf230_is_ready_to_send() {
switch(radio_get_trx_state()) {
case BUSY_TX:
case BUSY_TX_ARET:
return false;
}
return true;
}
2010-02-22 23:23:18 +01:00
static void
flushrx(void)
{
rxframe[rxframe_head].length=0;
2010-02-22 23:23:18 +01:00
}
2009-07-08 18:17:07 +02:00
/*---------------------------------------------------------------------------*/
static uint8_t locked, lock_on, lock_off;
static void
on(void)
{
ENERGEST_ON(ENERGEST_TYPE_LISTEN);
#ifdef RF230BB_HOOK_RADIO_ON
RF230BB_HOOK_RADIO_ON();
2010-02-18 18:20:50 +01:00
#endif
2011-08-13 17:38:38 +02:00
if (hal_get_slptr()) {
#if defined(__AVR_ATmega128RFA1__)
rf230_interruptwait=1;
ENERGEST_ON(ENERGEST_TYPE_LED_RED);
PORTE|=(1<<PE1); //ledon
hal_set_slptr_low();
while (rf230_interruptwait) {}
// rf230_waitidle(); //?
}
#else
2011-08-13 17:38:38 +02:00
uint8_t sreg = SREG;
cli();
// DEBUGFLOW('0');
hal_set_slptr_low();
delay_us(TIME_SLEEP_TO_TRX_OFF);
2011-08-13 17:38:38 +02:00
delay_us(TIME_SLEEP_TO_TRX_OFF);
delay_us(TIME_SLEEP_TO_TRX_OFF);//extra delay for now, wake time depends on board capacitance
SREG=sreg;
}
rf230_waitidle();
#endif
2009-07-08 18:17:07 +02:00
#if RF230_CONF_AUTOACK
// radio_set_trx_state(is_promiscuous?RX_ON:RX_AACK_ON);
radio_set_trx_state(RX_AACK_ON);
2011-08-13 17:38:38 +02:00
//DEBUGFLOW('a');
2010-02-18 18:20:50 +01:00
#else
radio_set_trx_state(RX_ON);
2011-08-13 17:38:38 +02:00
DEBUGFLOW('b');
2010-02-18 18:20:50 +01:00
#endif
2010-12-18 21:49:00 +01:00
// flushrx();
2011-08-13 17:38:38 +02:00
RF230_receive_on = 1;
2009-07-08 18:17:07 +02:00
}
static void
off(void)
{
RF230_receive_on = 0;
#ifdef RF230BB_HOOK_RADIO_OFF
RF230BB_HOOK_RADIO_OFF();
2010-02-18 18:20:50 +01:00
#endif
2010-02-22 23:23:18 +01:00
/* Wait any transmission to end */
2009-07-08 18:17:07 +02:00
rf230_waitidle();
2011-08-13 17:38:38 +02:00
#if RADIOALWAYSON
/* Do not transmit autoacks when stack thinks radio is off */
radio_set_trx_state(RX_ON);
//DEBUGFLOW('c');
#else
2009-07-08 18:17:07 +02:00
/* Force the device into TRX_OFF. */
radio_reset_state_machine();
2010-12-18 21:49:00 +01:00
#if RADIOSLEEPSWHENOFF
2009-07-08 18:17:07 +02:00
/* Sleep Radio */
ENERGEST_OFF(ENERGEST_TYPE_LED_RED);
// PORTE&=~(1<<PE1); //ledoff
2009-07-08 18:17:07 +02:00
hal_set_slptr_high();
2011-08-13 17:38:38 +02:00
// DEBUGFLOW('d');
delay_us(TIME_SLEEP_TO_TRX_OFF); //?
#else
// DEBUGFLOW('e');
2010-02-22 23:23:18 +01:00
#endif
2009-07-08 18:17:07 +02:00
2011-08-13 17:38:38 +02:00
#endif /* RADIOALWAYSON */
2009-07-08 18:17:07 +02:00
ENERGEST_OFF(ENERGEST_TYPE_LISTEN);
}
/*---------------------------------------------------------------------------*/
#define GET_LOCK() locked = 1
static void RELEASE_LOCK(void) {
if(lock_on) {
on();
lock_on = 0;
}
if(lock_off) {
off();
lock_off = 0;
}
locked = 0;
}
/*---------------------------------------------------------------------------*/
2010-02-22 23:23:18 +01:00
static void
set_txpower(uint8_t power)
{
if (power > TX_PWR_17_2DBM){
power=TX_PWR_17_2DBM;
}
2011-08-13 17:38:38 +02:00
if (hal_get_slptr()) {
DEBUGFLOW('f');
2010-02-22 23:23:18 +01:00
PRINTF("rf230_set_txpower:Sleeping"); //happens with cxmac
} else {
2011-08-13 17:38:38 +02:00
DEBUGFLOW('g');
2010-02-22 23:23:18 +01:00
hal_subregister_write(SR_TX_PWR, power);
}
}
/*----------------------------------------------------------------------------*/
/**
\brief Calibrate the internal RC oscillator
This function calibrates the internal RC oscillator, based
on an external 32KHz crystal connected to TIMER2. In order to
verify the calibration result you can program the CKOUT fuse
and monitor the CPU clock on an I/O pin.
*/
#define AVR_ENTER_CRITICAL_REGION( ) {uint8_t volatile saved_sreg = SREG; cli( )
#define AVR_LEAVE_CRITICAL_REGION( ) SREG = saved_sreg;}
uint8_t osccal_original,osccal_calibrated;
void
calibrate_rc_osc_32k(void)
{
#if 0
/* Calibrate RC Oscillator: The calibration routine is done by clocking TIMER2
* from the external 32kHz crystal while running an internal timer simultaneously.
* The internal timer will be clocked at the same speed as the internal RC
* oscillator, while TIMER2 is running at 32768 Hz. This way it is not necessary
* to use a timed loop, and keep track cycles in timed loop vs. optimization
* and compiler.
*/
uint8_t osccal_original = OSCCAL;
volatile uint16_t temp;
/* Start with current value, which for some MCUs could be in upper or lower range */
// PRR0 &= ~((1 << PRTIM2)|(1 << PRTIM1)); /* Enable Timer 1 and 2 */
TIMSK2 = 0x00; /* Disable Timer/Counter 2 interrupts. */
TIMSK1 = 0x00; /* Disable Timer/Counter 1 interrupts. */
/* Enable TIMER/COUNTER 2 to be clocked from the external 32kHz clock crystal.
* Then wait for the timer to become stable before doing any calibration.
*/
ASSR |= (1 << AS2);
// while (ASSR & ((1 << TCN2UB)|(1 << OCR2AUB)|(1 << TCR2AUB)|(1 << TCR2BUB))) { ; }
TCCR2B = 1 << CS20; /* run timer 2 at divide by 1 (32KHz) */
delay_us(50000UL); //crystal takes significant time to stabilize
AVR_ENTER_CRITICAL_REGION();
uint8_t counter = 128;
bool cal_ok = false;
do{
/* wait for timer to be ready for updated config */
TCCR1B = 1 << CS10;
while (ASSR & ((1 << TCN2UB)|(1 << OCR2AUB)|(1 << TCR2AUB)|(1 << TCR2BUB))) { ; }
TCNT2 = 0x80;
TCNT1 = 0;
TIFR2 = 0xFF; /* Clear TIFR2 flags (Yes, really) */
/* Wait for TIMER/COUNTER 2 to overflow. Stop TIMER/COUNTER 1 and 2, and
* read the counter value of TIMER/COUNTER 1. It will now contain the
* number of cpu cycles elapsed within the 3906.25 microsecond period.
*/
while (!(TIFR2 & (1 << TOV2))){
;
}
temp = TCNT1;
TCCR1B = 0;
/* Defining these as floating point introduces a lot of code and the 256 byte .clz table to RAM */
/* At 8 MHz we would expect 8*3906.25 = 31250 CPU clocks */
#define cal_upper 32812 //(31250*1.05) // 32812 = 0x802c
#define cal_lower 29687 //(31250*0.95) // 29687 = 0x73f7
/* Iteratively reduce the error to be within limits */
if (temp < cal_lower) {
/* Too slow. Put the hammer down. */
if (OSCCAL==0x7e) break; //stay in lowest range
if (OSCCAL==0xff) break;
OSCCAL++;
} else if (temp > cal_upper) {
/* Too fast, retard. */
if (OSCCAL==0x81) break; //stay in highest range
if (OSCCAL==0x00) break;
OSCCAL--;
} else {
/* The CPU clock frequency is now within +/- 0.5% of the target value. */
cal_ok = true;
}
counter--;
} while ((counter != 0) && (false == cal_ok));
osccal_calibrated=OSCCAL;
if (true != cal_ok) {
/* We failed, therefore restore previous OSCCAL value. */
OSCCAL = osccal_original;
}
OSCCAL = osccal_original;
TCCR2B = 0;
ASSR &= ~(1 << AS2);
/* Disable both timers again to save power. */
// PRR0 |= (1 << PRTIM2);/* |(1 << PRTIM1); */
AVR_LEAVE_CRITICAL_REGION();
#endif
}
2010-02-22 23:23:18 +01:00
/*---------------------------------------------------------------------------*/
int
rf230_init(void)
{
uint8_t i;
2011-08-13 17:38:38 +02:00
DEBUGFLOW('i');
/* Wait in case VCC just applied */
2010-02-22 23:23:18 +01:00
delay_us(TIME_TO_ENTER_P_ON);
2010-02-22 23:23:18 +01:00
/* Calibrate oscillator */
// printf_P(PSTR("\nBefore calibration OSCCAL=%x\n"),OSCCAL);
// calibrate_rc_osc_32k();
// printf_P(PSTR("After calibration OSCCAL=%x\n"),OSCCAL);
2010-02-22 23:23:18 +01:00
/* Initialize Hardware Abstraction Layer */
2010-02-22 23:23:18 +01:00
hal_init();
/* Set receive buffers empty and point to the first */
for (i=0;i<RF230_CONF_RX_BUFFERS;i++) rxframe[i].length=0;
rxframe_head=0;rxframe_tail=0;
2010-02-22 23:23:18 +01:00
/* Do full rf230 Reset */
hal_set_rst_low();
hal_set_slptr_low();
delay_us(TIME_RESET);
hal_set_rst_high();
/* Force transition to TRX_OFF */
2010-02-22 23:23:18 +01:00
hal_subregister_write(SR_TRX_CMD, CMD_FORCE_TRX_OFF);
delay_us(TIME_P_ON_TO_TRX_OFF);
/* Verify that it is a supported version */
/* Note gcc optimizes this away if DEBUG is not set! */
//ATMEGA128RFA1 - version 4, ID 31
2010-02-22 23:23:18 +01:00
uint8_t tvers = hal_register_read(RG_VERSION_NUM);
uint8_t tmanu = hal_register_read(RG_MAN_ID_0);
if ((tvers != RF230_REVA) && (tvers != RF230_REVB))
PRINTF("rf230: Unsupported version %u\n",tvers);
if (tmanu != SUPPORTED_MANUFACTURER_ID)
PRINTF("rf230: Unsupported manufacturer ID %u\n",tmanu);
PRINTF("rf230: Version %u, ID %u\n",tvers,tmanu);
2011-03-23 23:08:07 +01:00
rf230_warm_reset();
/* Start the packet receive process */
process_start(&rf230_process, NULL);
/* Leave radio in on state (?)*/
on();
return 1;
}
/*---------------------------------------------------------------------------*/
/* Used to reinitialize radio parameters without losing pan and mac address, channel, power, etc. */
void rf230_warm_reset(void) {
#if RF230_CONF_SNEEZER && JACKDAW
/* Take jackdaw radio out of test mode */
#warning Manipulating PORTB pins for RF230 Sneezer mode!
PORTB &= ~(1<<7);
DDRB &= ~(1<<7);
#endif
2010-02-22 23:23:18 +01:00
hal_register_write(RG_IRQ_MASK, RF230_SUPPORTED_INTERRUPT_MASK);
/* Set up number of automatic retries 0-15 (0 implies PLL_ON sends instead of the extended TX_ARET mode */
hal_subregister_write(SR_MAX_FRAME_RETRIES, RF230_CONF_AUTORETRIES );
/* Set up carrier sense/clear channel assesment parameters for extended operating mode */
hal_subregister_write(SR_MAX_CSMA_RETRIES, 5 );//highest allowed retries
hal_register_write(RG_CSMA_BE, 0x80); //min backoff exponent 0, max 8 (highest allowed)
hal_register_write(RG_CSMA_SEED_0,hal_register_read(RG_PHY_RSSI) );//upper two RSSI reg bits RND_VALUE are random in rf231
// hal_register_write(CSMA_SEED_1,42 );
2010-02-22 23:23:18 +01:00
/* CCA Mode Mode 1=Energy above threshold 2=Carrier sense only 3=Both 0=Either (RF231 only) */
//hal_subregister_write(SR_CCA_MODE,1); //1 is the power-on default
/* Carrier sense threshold (not implemented in RF230 or RF231) */
// hal_subregister_write(SR_CCA_CS_THRES,1);
/* CCA energy threshold = -91dB + 2*SR_CCA_ED_THRESH. Reset defaults to -77dB */
/* Use RF230 base of -91; RF231 base is -90 according to datasheet */
#ifdef RF230_CONF_CCA_THRES
#if RF230_CONF_CCA_THRES < -91
#warning
#warning RF230_CONF_CCA_THRES below hardware limit, setting to -91dBm
#warning
hal_subregister_write(SR_CCA_ED_THRES,0);
#elif RF230_CONF_CCA_THRES > -61
#warning
#warning RF230_CONF_CCA_THRES above hardware limit, setting to -61dBm
#warning
hal_subregister_write(SR_CCA_ED_THRES,15);
#else
hal_subregister_write(SR_CCA_ED_THRES,(RF230_CONF_CCA_THRES+91)/2);
#endif
#endif
2010-02-22 23:23:18 +01:00
/* Use automatic CRC unless manual is specified */
#if RF230_CONF_CHECKSUM
hal_subregister_write(SR_TX_AUTO_CRC_ON, 0);
#else
hal_subregister_write(SR_TX_AUTO_CRC_ON, 1);
#endif
/* Limit tx power for testing miniature Raven mesh */
#ifdef RF230_MAX_TX_POWER
set_txpower(RF230_MAX_TX_POWER); //0=3dbm 15=-17.2dbm
#endif
2010-02-22 23:23:18 +01:00
}
/*---------------------------------------------------------------------------*/
static uint8_t buffer[RF230_MAX_TX_FRAME_LENGTH+AUX_LEN];
2010-02-22 23:23:18 +01:00
static int
rf230_transmit(unsigned short payload_len)
2009-07-08 18:17:07 +02:00
{
2010-02-22 23:23:18 +01:00
int txpower;
uint8_t total_len;
uint8_t radiowason;
uint8_t tx_result;
2010-02-22 23:23:18 +01:00
#if RF230_CONF_TIMESTAMPS
struct timestamp timestamp;
#endif /* RF230_CONF_TIMESTAMPS */
GET_LOCK();
/* Save receiver state */
radiowason=RF230_receive_on;
/* If radio is sleeping we have to turn it on first */
/* This automatically does the PLL calibrations */
2011-08-13 17:38:38 +02:00
if (hal_get_slptr()) {
#if defined(__AVR_ATmega128RFA1__)
if (radiowason) DEBUGFLOW('e');
radiowason=0;
// DEBUGFLOW('j');
ENERGEST_ON(ENERGEST_TYPE_LED_RED);
// PORTE|=(1<<PE1); //ledon
rf230_interruptwait=1;
hal_set_slptr_low();
while (rf230_interruptwait) {}
#else
hal_set_slptr_low();
2011-08-13 17:38:38 +02:00
DEBUGFLOW('j');
delay_us(TIME_SLEEP_TO_TRX_OFF);
delay_us(TIME_SLEEP_TO_TRX_OFF);
#endif
} else {
2011-08-13 17:38:38 +02:00
#if RADIO_CONF_CALIBRATE_INTERVAL
/* If nonzero, do periodic calibration. See clock.c */
if (rf230_calibrate) {
2011-08-13 17:38:38 +02:00
DEBUGFLOW('k');
hal_subregister_write(SR_PLL_CF_START,1); //takes 80us max
hal_subregister_write(SR_PLL_DCU_START,1); //takes 6us, concurrently
rf230_calibrate=0;
rf230_calibrated=1;
delay_us(80); //?
}
#endif
}
/* Wait for any previous operation or state transition to finish */
rf230_waitidle();
/* Prepare to transmit */
#if RF230_CONF_AUTORETRIES
radio_set_trx_state(TX_ARET_ON);
2011-08-13 17:38:38 +02:00
DEBUGFLOW('t');
#else
radio_set_trx_state(PLL_ON);
2011-08-13 17:38:38 +02:00
DEBUGFLOW('T');
#endif
2010-02-22 23:23:18 +01:00
txpower = 0;
if(packetbuf_attr(PACKETBUF_ATTR_RADIO_TXPOWER) > 0) {
/* Remember the current transmission power */
txpower = rf230_get_txpower();
/* Set the specified transmission power */
set_txpower(packetbuf_attr(PACKETBUF_ATTR_RADIO_TXPOWER) - 1);
}
total_len = payload_len + AUX_LEN;
#if RF230_CONF_TIMESTAMPS
rtimer_clock_t txtime = timesynch_time();
#endif /* RF230_CONF_TIMESTAMPS */
#if defined(__AVR_ATmega128RFA1__)
/* No interrupts across frame download! */
cli();
/* slow down the transmit? */
// delay_us(500);
#endif
/* Toggle the SLP_TR pin to initiate the frame transmission */
2010-02-22 23:23:18 +01:00
hal_set_slptr_high();
hal_set_slptr_low();
hal_frame_write(buffer, total_len);
#if defined(__AVR_ATmega128RFA1__)
sei();
#endif
PRINTF("rf230_transmit:\n");
#if DEBUG>1
2010-12-22 21:10:00 +01:00
/* Note the dumped packet will have a zero checksum unless compiled with RF230_CONF_CHECKSUM
* since we don't know what it will be if calculated by the hardware.
*/
{
uint8_t i;
PRINTF("0000"); //Start a new wireshark packet
2010-12-22 21:10:00 +01:00
for (i=0;i<total_len;i++) PRINTF(" %02x",buffer[i]);
PRINTF("\n");
}
#endif
if(RF230_receive_on) {
2010-02-22 23:23:18 +01:00
ENERGEST_OFF(ENERGEST_TYPE_LISTEN);
}
ENERGEST_ON(ENERGEST_TYPE_TRANSMIT);
#if RADIOSTATS
RF230_sendpackets++;
#endif
/* We wait until transmission has ended so that we get an
2010-02-22 23:23:18 +01:00
accurate measurement of the transmission time.*/
rf230_waitidle();
/* Get the transmission result */
#if RF230_CONF_AUTORETRIES
tx_result = hal_subregister_read(SR_TRAC_STATUS);
#else
tx_result=0;
#endif
#ifdef ENERGEST_CONF_LEVELDEVICE_LEVELS
ENERGEST_OFF_LEVEL(ENERGEST_TYPE_TRANSMIT,rf230_get_txpower());
#endif
/* Restore the transmission power */
if(packetbuf_attr(PACKETBUF_ATTR_RADIO_TXPOWER) > 0) {
set_txpower(txpower & 0xff);
}
/* Restore receive mode */
if(radiowason) {
2011-08-13 17:38:38 +02:00
DEBUGFLOW('l');
on();
} else {
off();
}
2010-02-22 23:23:18 +01:00
#if RF230_CONF_TIMESTAMPS
setup_time_for_transmission = txtime - timestamp.time;
if(num_transmissions < 10000) {
total_time_for_transmission += timesynch_time() - txtime;
total_transmission_len += total_len;
num_transmissions++;
}
#endif /* RF230_CONF_TIMESTAMPS */
ENERGEST_OFF(ENERGEST_TYPE_TRANSMIT);
if(RF230_receive_on) {
2010-02-22 23:23:18 +01:00
ENERGEST_ON(ENERGEST_TYPE_LISTEN);
} else {
#if RADIOALWAYSON
/* Enable reception */
on();
#else
/* Go to lower power TRX_OFF state (turn off PLL) */
hal_subregister_write(SR_TRX_CMD, CMD_FORCE_TRX_OFF);
#endif
2010-02-22 23:23:18 +01:00
}
RELEASE_LOCK();
if (tx_result==1) { //success, data pending from adressee
tx_result=0; //Just show success?
} else if (tx_result==3) { //CSMA channel access failure
2011-08-13 17:38:38 +02:00
DEBUGFLOW('m');
RIMESTATS_ADD(contentiondrop);
PRINTF("rf230_transmit: Transmission never started\n");
2011-08-13 17:38:38 +02:00
} else if (tx_result==5) { //Expected ACK, none received
DEBUGFLOW('n');
// tx_result=0;
} else if (tx_result==7) { //Invalid (Can't happen since waited for idle above?)
DEBUGFLOW('o');
}
2010-02-22 23:23:18 +01:00
return tx_result;
2009-07-08 18:17:07 +02:00
}
2010-02-22 23:23:18 +01:00
/*---------------------------------------------------------------------------*/
static int
rf230_prepare(const void *payload, unsigned short payload_len)
{
int ret = 0;
2010-02-22 23:23:18 +01:00
uint8_t total_len,*pbuf;
#if RF230_CONF_TIMESTAMPS
struct timestamp timestamp;
#endif /* RF230_CONF_TIMESTAMPS */
#if RF230_CONF_CHECKSUM
uint16_t checksum;
#endif /* RF230_CONF_CHECKSUM */
GET_LOCK();
2011-08-13 17:38:38 +02:00
DEBUGFLOW('p');
2010-02-22 23:23:18 +01:00
// PRINTF("rf230: sending %d bytes\n", payload_len);
2010-02-22 23:23:18 +01:00
// PRINTSHORT("s%d ",payload_len);
RIMESTATS_ADD(lltx);
#if RF230_CONF_CHECKSUM
checksum = crc16_data(payload, payload_len, 0);
2011-08-13 17:38:38 +02:00
#endif
2010-02-22 23:23:18 +01:00
/* Copy payload to RAM buffer */
total_len = payload_len + AUX_LEN;
if (total_len > RF230_MAX_TX_FRAME_LENGTH){
#if RADIOSTATS
RF230_sendfail++;
#endif
#if DEBUG
printf_P(PSTR("rf230_prepare: packet too large (%d, max: %d)\n"),total_len,RF230_MAX_TX_FRAME_LENGTH);
#endif
ret = -1;
goto bail;
2010-02-22 23:23:18 +01:00
}
pbuf=&buffer[0];
memcpy(pbuf,payload,payload_len);
pbuf+=payload_len;
#if RF230_CONF_CHECKSUM
memcpy(pbuf,&checksum,CHECKSUM_LEN);
pbuf+=CHECKSUM_LEN;
2011-08-13 17:38:38 +02:00
#endif
2010-02-22 23:23:18 +01:00
#if RF230_CONF_TIMESTAMPS
timestamp.authority_level = timesynch_authority_level();
timestamp.time = timesynch_time();
memcpy(pbuf,&timestamp,TIMESTAMP_LEN);
pbuf+=TIMESTAMP_LEN;
2011-08-13 17:38:38 +02:00
#endif
2010-02-23 18:37:51 +01:00
/*------------------------------------------------------------*/
#ifdef RF230BB_HOOK_TX_PACKET
#if !RF230_CONF_CHECKSUM
{ // Add a checksum before we log the packet out
uint16_t checksum;
checksum = crc16_data(payload, payload_len, 0);
memcpy(buffer+total_len-CHECKSUM_LEN,&checksum,CHECKSUM_LEN);
2010-02-23 18:37:51 +01:00
}
#endif /* RF230_CONF_CHECKSUM */
RF230BB_HOOK_TX_PACKET(buffer,total_len);
#endif
2009-07-08 18:17:07 +02:00
bail:
2010-02-22 23:23:18 +01:00
RELEASE_LOCK();
return ret;
2010-02-22 23:23:18 +01:00
}
/*---------------------------------------------------------------------------*/
static int
rf230_send(const void *payload, unsigned short payload_len)
{
int ret = 0;
#ifdef RF230BB_HOOK_IS_SEND_ENABLED
if(!RF230BB_HOOK_IS_SEND_ENABLED()) {
goto bail;
}
#endif
if((ret=rf230_prepare(payload, payload_len))) {
#if DEBUG
printf_P(PSTR("rf230_send: Unable to send, prep failed (%d)\n"),ret);
#endif
goto bail;
}
ret = rf230_transmit(payload_len);
bail:
#if RADIOSTATS
if (ret) RF230_sendfail++;
#endif
return ret;
2010-02-22 23:23:18 +01:00
}
2009-07-08 18:17:07 +02:00
/*---------------------------------------------------------------------------*/
int
rf230_off(void)
{
/* Don't do anything if we are already turned off. */
if(RF230_receive_on == 0) {
2009-07-08 18:17:07 +02:00
return 1;
}
/* If we are called when the driver is locked, we indicate that the
radio should be turned off when the lock is unlocked. */
if(locked) {
lock_off = 1;
return 1;
}
2010-02-22 23:23:18 +01:00
/* If we are currently receiving a packet
we don't actually switch the radio off now, but signal that the
driver should switch off the radio once the packet has been
received and processed, by setting the 'lock_off' variable. */
if (!rf230_isidle()) {
// if (radio_get_trx_state()==BUSY_RX) {
lock_off = 1;
return 1;
}
off();
2009-07-08 18:17:07 +02:00
return 1;
}
/*---------------------------------------------------------------------------*/
int
rf230_on(void)
{
if(RF230_receive_on) {
2011-08-13 17:38:38 +02:00
DEBUGFLOW('q');
2009-07-08 18:17:07 +02:00
return 1;
}
if(locked) {
lock_on = 1;
2011-08-13 17:38:38 +02:00
DEBUGFLOW('r');
2009-07-08 18:17:07 +02:00
return 1;
}
2010-02-22 23:23:18 +01:00
on();
2009-07-08 18:17:07 +02:00
return 1;
}
/*---------------------------------------------------------------------------*/
uint8_t
2009-07-08 18:17:07 +02:00
rf230_get_channel(void)
{
2010-02-18 18:20:50 +01:00
//jackdaw reads zero channel, raven reads correct channel?
//return hal_subregister_read(SR_CHANNEL);
return channel;
2009-07-08 18:17:07 +02:00
}
/*---------------------------------------------------------------------------*/
void
rf230_set_channel(uint8_t c)
2009-07-08 18:17:07 +02:00
{
/* Wait for any transmission to end. */
PRINTF("rf230: Set Channel %u\n",c);
2009-07-08 18:17:07 +02:00
rf230_waitidle();
2010-02-18 18:20:50 +01:00
channel=c;
2009-07-08 18:17:07 +02:00
hal_subregister_write(SR_CHANNEL, c);
}
/*---------------------------------------------------------------------------*/
void
rf230_listen_channel(uint8_t c)
{
/* Same as set channel but forces RX_ON state for sniffer or energy scan */
// PRINTF("rf230: Listen Channel %u\n",c);
rf230_set_channel(c);
radio_set_trx_state(RX_ON);
}
/*---------------------------------------------------------------------------*/
void
2010-02-22 23:23:18 +01:00
rf230_set_pan_addr(unsigned pan,
unsigned addr,
const uint8_t ieee_addr[8])
2010-02-22 23:23:18 +01:00
//rf230_set_pan_addr(uint16_t pan,uint16_t addr,uint8_t *ieee_addr)
2009-07-08 18:17:07 +02:00
{
PRINTF("rf230: PAN=%x Short Addr=%x\n",pan,addr);
uint8_t abyte;
abyte = pan & 0xFF;
hal_register_write(RG_PAN_ID_0,abyte);
abyte = (pan >> 8*1) & 0xFF;
hal_register_write(RG_PAN_ID_1, abyte);
abyte = addr & 0xFF;
hal_register_write(RG_SHORT_ADDR_0, abyte);
abyte = (addr >> 8*1) & 0xFF;
hal_register_write(RG_SHORT_ADDR_1, abyte);
if (ieee_addr != NULL) {
2010-02-22 23:23:18 +01:00
PRINTF("MAC=%x",*ieee_addr);
hal_register_write(RG_IEEE_ADDR_7, *ieee_addr++);
PRINTF(":%x",*ieee_addr);
hal_register_write(RG_IEEE_ADDR_6, *ieee_addr++);
PRINTF(":%x",*ieee_addr);
hal_register_write(RG_IEEE_ADDR_5, *ieee_addr++);
PRINTF(":%x",*ieee_addr);
2009-07-08 18:17:07 +02:00
hal_register_write(RG_IEEE_ADDR_4, *ieee_addr++);
2010-02-22 23:23:18 +01:00
PRINTF(":%x",*ieee_addr);
hal_register_write(RG_IEEE_ADDR_3, *ieee_addr++);
PRINTF(":%x",*ieee_addr);
hal_register_write(RG_IEEE_ADDR_2, *ieee_addr++);
PRINTF(":%x",*ieee_addr);
hal_register_write(RG_IEEE_ADDR_1, *ieee_addr++);
PRINTF(":%x",*ieee_addr);
hal_register_write(RG_IEEE_ADDR_0, *ieee_addr);
PRINTF("\n");
2009-07-08 18:17:07 +02:00
}
}
/*---------------------------------------------------------------------------*/
/*
2010-02-22 23:23:18 +01:00
* Interrupt leaves frame intact in FIFO.
2009-07-08 18:17:07 +02:00
*/
#if RF230_CONF_TIMESTAMPS
static volatile rtimer_clock_t interrupt_time;
static volatile int interrupt_time_set;
#endif /* RF230_CONF_TIMESTAMPS */
#if RF230_TIMETABLE_PROFILING
#define rf230_timetable_size 16
TIMETABLE(rf230_timetable);
TIMETABLE_AGGREGATE(aggregate_time, 10);
#endif /* RF230_TIMETABLE_PROFILING */
2010-02-22 23:23:18 +01:00
int
2009-07-08 18:17:07 +02:00
rf230_interrupt(void)
{
/* Poll the receive process, unless the stack thinks the radio is off */
#if RADIOALWAYSON
if (RF230_receive_on) {
DEBUGFLOW('+');
#endif
2009-07-08 18:17:07 +02:00
#if RF230_CONF_TIMESTAMPS
interrupt_time = timesynch_time();
interrupt_time_set = 1;
#endif /* RF230_CONF_TIMESTAMPS */
2010-02-22 23:23:18 +01:00
2009-07-08 18:17:07 +02:00
process_poll(&rf230_process);
2009-07-08 18:17:07 +02:00
#if RF230_TIMETABLE_PROFILING
timetable_clear(&rf230_timetable);
TIMETABLE_TIMESTAMP(rf230_timetable, "interrupt");
#endif /* RF230_TIMETABLE_PROFILING */
2010-02-22 23:23:18 +01:00
rf230_pending = 1;
#if RADIOSTATS //TODO:This will double count buffered packets
RF230_receivepackets++;
#endif
#if RADIOALWAYSON
} else {
DEBUGFLOW('-');
rxframe[rxframe_head].length=0;
}
#endif
2010-02-22 23:23:18 +01:00
return 1;
2009-07-08 18:17:07 +02:00
}
/*---------------------------------------------------------------------------*/
2010-02-22 23:23:18 +01:00
/* Process to handle input packets
* Receive interrupts cause this process to be polled
* It calls the core MAC layer which calls rf230_read to get the packet
* rf230processflag can be printed in the main idle loop for debugging
2010-02-22 23:23:18 +01:00
*/
#if 0
uint8_t rf230processflag;
#define RF230PROCESSFLAG(arg) rf230processflag=arg
#else
#define RF230PROCESSFLAG(arg)
#endif
2010-02-22 23:23:18 +01:00
PROCESS_THREAD(rf230_process, ev, data)
2009-07-08 18:17:07 +02:00
{
2010-02-22 23:23:18 +01:00
int len;
PROCESS_BEGIN();
RF230PROCESSFLAG(99);
2010-02-22 23:23:18 +01:00
while(1) {
PROCESS_YIELD_UNTIL(ev == PROCESS_EVENT_POLL);
RF230PROCESSFLAG(42);
2010-02-22 23:23:18 +01:00
#if RF230_TIMETABLE_PROFILING
TIMETABLE_TIMESTAMP(rf230_timetable, "poll");
#endif /* RF230_TIMETABLE_PROFILING */
rf230_pending = 0;
2010-02-22 23:23:18 +01:00
packetbuf_clear();
len = rf230_read(packetbuf_dataptr(), PACKETBUF_SIZE);
RF230PROCESSFLAG(1);
2010-02-22 23:23:18 +01:00
if(len > 0) {
packetbuf_set_datalen(len);
RF230PROCESSFLAG(2);
2010-02-22 23:23:18 +01:00
NETSTACK_RDC.input();
#if RF230_TIMETABLE_PROFILING
TIMETABLE_TIMESTAMP(rf230_timetable, "end");
timetable_aggregate_compute_detailed(&aggregate_time,
&rf230_timetable);
timetable_clear(&rf230_timetable);
#endif /* RF230_TIMETABLE_PROFILING */
} else {
#if RADIOSTATS
RF230_receivefail++;
#endif
2010-02-22 23:23:18 +01:00
}
}
2009-07-08 18:17:07 +02:00
2010-02-22 23:23:18 +01:00
PROCESS_END();
}
/* Get packet from Radio if any, else return zero.
* The two-byte checksum is appended but the returned length does not include it.
* Frames are buffered in the interrupt routine so this routine
* does not access the hardware or change its status
*/
2010-02-22 23:23:18 +01:00
/*---------------------------------------------------------------------------*/
static int
rf230_read(void *buf, unsigned short bufsize)
{
uint8_t len,*framep;
#if FOOTER_LEN
uint8_t footer[FOOTER_LEN];
#endif /* FOOTER_LEN */
2009-07-08 18:17:07 +02:00
#if RF230_CONF_CHECKSUM
uint16_t checksum;
#endif /* RF230_CONF_CHECKSUM */
#if RF230_CONF_TIMESTAMPS
struct timestamp t;
#endif /* RF230_CONF_TIMESTAMPS */
/* The length includes the twp-byte checksum but not the LQI byte */
len=rxframe[rxframe_head].length;
2010-02-22 23:23:18 +01:00
if (len==0) {
#if RADIOALWAYSON && DEBUGFLOWSIZE
if (RF230_receive_on==0) {if (debugflow[debugflowsize-1]!='z') DEBUGFLOW('z');} //cxmac calls with radio off?
#endif
2010-02-22 23:23:18 +01:00
return 0;
}
#if RADIOALWAYSON
if (RF230_receive_on) {
2011-08-13 17:38:38 +02:00
#else
if (hal_get_slptr()) {
DEBUGFLOW('!');
return 0;
}
if (!RF230_receive_on) {
DEBUGFLOW('[');
return 0;
}
#endif
2009-07-08 18:17:07 +02:00
#if RF230_CONF_TIMESTAMPS
if(interrupt_time_set) {
rf230_time_of_arrival = interrupt_time;
interrupt_time_set = 0;
} else {
rf230_time_of_arrival = 0;
}
rf230_time_of_departure = 0;
#endif /* RF230_CONF_TIMESTAMPS */
// PRINTSHORT("r%d",rxframe[rxframe_head].length);
PRINTF("rf230_read: %u bytes lqi %u crc %u\n",rxframe[rxframe_head].length,rxframe[rxframe_head].lqi,rxframe[rxframe_head].crc);
#if DEBUG>1
{
uint8_t i;
PRINTF("0000");
for (i=0;i<rxframe[rxframe_head].length;i++) PRINTF(" %02x",rxframe[rxframe_head].data[i]);
PRINTF("\n");
}
#endif
// GET_LOCK();
2010-02-22 23:23:18 +01:00
//if(len > RF230_MAX_PACKET_LEN) {
if(len > RF230_MAX_TX_FRAME_LENGTH) {
/* Oops, we must be out of sync. */
2011-08-13 17:38:38 +02:00
DEBUGFLOW('u');
2010-02-22 23:23:18 +01:00
flushrx();
RIMESTATS_ADD(badsynch);
// RELEASE_LOCK();
2010-02-22 23:23:18 +01:00
return 0;
}
2009-07-08 18:17:07 +02:00
if(len <= AUX_LEN) {
DEBUGFLOW('s');
PRINTF("len <= AUX_LEN\n");
2010-02-22 23:23:18 +01:00
flushrx();
2009-07-08 18:17:07 +02:00
RIMESTATS_ADD(tooshort);
// RELEASE_LOCK();
2009-07-08 18:17:07 +02:00
return 0;
}
2010-02-22 23:23:18 +01:00
2009-07-08 18:17:07 +02:00
if(len - AUX_LEN > bufsize) {
2011-08-13 17:38:38 +02:00
DEBUGFLOW('v');
PRINTF("len - AUX_LEN > bufsize\n");
2010-02-22 23:23:18 +01:00
flushrx();
2009-07-08 18:17:07 +02:00
RIMESTATS_ADD(toolong);
// RELEASE_LOCK();
2009-07-08 18:17:07 +02:00
return 0;
}
/* Transfer the frame, stripping the footer, but copying the checksum */
framep=&(rxframe[rxframe_head].data[0]);
memcpy(buf,framep,len-AUX_LEN+CHECKSUM_LEN);
rf230_last_correlation = rxframe[rxframe_head].lqi;
2009-07-08 18:17:07 +02:00
/* Clear the length field to allow buffering of the next packet */
rxframe[rxframe_head].length=0;
rxframe_head++;if (rxframe_head >= RF230_CONF_RX_BUFFERS) rxframe_head=0;
/* If another packet has been buffered, schedule another receive poll */
if (rxframe[rxframe_head].length) rf230_interrupt();
/* Point to the checksum */
framep+=len-AUX_LEN;
2009-07-08 18:17:07 +02:00
#if RF230_CONF_CHECKSUM
memcpy(&checksum,framep,CHECKSUM_LEN);
#endif /* RF230_CONF_CHECKSUM */
framep+=CHECKSUM_LEN;
2009-07-08 18:17:07 +02:00
#if RF230_CONF_TIMESTAMPS
memcpy(&t,framep,TIMESTAMP_LEN);
#endif /* RF230_CONF_TIMESTAMPS */
framep+=TIMESTAMP_LEN;
2010-02-22 23:23:18 +01:00
#if FOOTER_LEN
memcpy(footer,framep,FOOTER_LEN);
#endif
2009-07-08 18:17:07 +02:00
#if RF230_CONF_CHECKSUM
if(checksum != crc16_data(buf, len - AUX_LEN, 0)) {
2011-08-13 17:38:38 +02:00
DEBUGFLOW('w');
2010-02-22 23:23:18 +01:00
PRINTF("checksum failed 0x%04x != 0x%04x\n",
checksum, crc16_data(buf, len - AUX_LEN, 0));
2009-07-08 18:17:07 +02:00
}
2010-12-22 21:10:00 +01:00
#if FOOTER_LEN
2009-07-08 18:17:07 +02:00
if(footer[1] & FOOTER1_CRC_OK &&
checksum == crc16_data(buf, len - AUX_LEN, 0)) {
2010-12-22 21:10:00 +01:00
#endif
2009-07-08 18:17:07 +02:00
#endif /* RF230_CONF_CHECKSUM */
/* Get the received signal strength for the packet, 0-84 dB above rx threshold */
#if 0 //more general
rf230_last_rssi = rf230_get_raw_rssi();
#else //faster
#if RF230_CONF_AUTOACK
// rf230_last_rssi = hal_subregister_read(SR_ED_LEVEL); //0-84 resolution 1 dB
rf230_last_rssi = hal_register_read(RG_PHY_ED_LEVEL); //0-84, resolution 1 dB
#else
/* last_rssi will have been set at RX_START interrupt */
// rf230_last_rssi = 3*hal_subregister_read(SR_RSSI); //0-28 resolution 3 dB
#endif
#endif /* speed vs. generality */
/* Save the smallest rssi. The display routine can reset by setting it to zero */
if ((rf230_smallest_rssi==0) || (rf230_last_rssi<rf230_smallest_rssi))
rf230_smallest_rssi=rf230_last_rssi;
// rf230_last_correlation = rxframe[rxframe_head].lqi;
2010-02-22 23:23:18 +01:00
packetbuf_set_attr(PACKETBUF_ATTR_RSSI, rf230_last_rssi);
packetbuf_set_attr(PACKETBUF_ATTR_LINK_QUALITY, rf230_last_correlation);
2009-07-08 18:17:07 +02:00
RIMESTATS_ADD(llrx);
2010-02-22 23:23:18 +01:00
2009-07-08 18:17:07 +02:00
#if RF230_CONF_TIMESTAMPS
rf230_time_of_departure =
t.time +
setup_time_for_transmission +
(total_time_for_transmission * (len - 2)) / total_transmission_len;
2010-02-22 23:23:18 +01:00
2009-07-08 18:17:07 +02:00
rf230_authority_level_of_sender = t.authority_level;
packetbuf_set_attr(PACKETBUF_ATTR_TIMESTAMP, t.time);
#endif /* RF230_CONF_TIMESTAMPS */
2010-02-12 17:41:02 +01:00
#if RF230_CONF_CHECKSUM
2010-12-22 21:10:00 +01:00
#if FOOTER_LEN
2010-02-22 23:23:18 +01:00
} else {
2011-08-13 17:38:38 +02:00
DEBUGFLOW('x');
PRINTF("bad crc");
2009-07-08 18:17:07 +02:00
RIMESTATS_ADD(badcrc);
len = AUX_LEN;
}
#endif
2010-12-22 21:10:00 +01:00
#endif
2010-02-22 23:23:18 +01:00
#ifdef RF230BB_HOOK_RX_PACKET
RF230BB_HOOK_RX_PACKET(buf,len);
#endif
2010-02-23 18:37:51 +01:00
/* Here return just the data length. The checksum is however still in the buffer for packet sniffing */
2009-07-08 18:17:07 +02:00
return len - AUX_LEN;
#if RADIOALWAYSON
} else {
2011-08-13 17:38:38 +02:00
DEBUGFLOW('y'); //Stack thought radio was off
return 0;
}
#endif
2009-07-08 18:17:07 +02:00
}
/*---------------------------------------------------------------------------*/
void
rf230_set_txpower(uint8_t power)
{
2010-02-22 23:23:18 +01:00
GET_LOCK();
set_txpower(power);
RELEASE_LOCK();
2009-07-08 18:17:07 +02:00
}
/*---------------------------------------------------------------------------*/
uint8_t
2009-07-08 18:17:07 +02:00
rf230_get_txpower(void)
{
uint8_t power = TX_PWR_UNDEFINED;
2011-08-13 17:38:38 +02:00
if (hal_get_slptr()) {
PRINTF("rf230_get_txpower:Sleeping");
} else {
power = hal_subregister_read(SR_TX_PWR);
}
return power;
2009-07-08 18:17:07 +02:00
}
2009-07-08 18:17:07 +02:00
/*---------------------------------------------------------------------------*/
uint8_t
rf230_get_raw_rssi(void)
2009-07-08 18:17:07 +02:00
{
uint8_t rssi,state;
bool radio_was_off = 0;
2010-02-22 23:23:18 +01:00
2009-07-08 18:17:07 +02:00
/*The RSSI measurement should only be done in RX_ON or BUSY_RX.*/
if(!RF230_receive_on) {
2009-07-08 18:17:07 +02:00
radio_was_off = 1;
rf230_on();
}
/* The energy detect register is used in extended mode (since RSSI will read 0) */
/* The rssi register is multiplied by 3 to a consistent value from either register */
state=radio_get_trx_state();
if ((state==RX_AACK_ON) || (state==BUSY_RX_AACK)) {
// rssi = hal_subregister_read(SR_ED_LEVEL); //0-84, resolution 1 dB
rssi = hal_register_read(RG_PHY_ED_LEVEL); //0-84, resolution 1 dB
} else {
#if 0 // 3-clock shift and add is faster on machines with no hardware multiply
2010-12-22 21:10:00 +01:00
/* avr-gcc may have an -Os bug that uses the general subroutine for multiplying by 3 */
rssi = hal_subregister_read(SR_RSSI); //0-28, resolution 3 dB
rssi = (rssi << 1) + rssi; //*3
2010-12-22 21:10:00 +01:00
#else // 1 or 2 clock multiply, or compiler with correct optimization
rssi = 3 * hal_subregister_read(SR_RSSI);
#endif
}
2009-07-08 18:17:07 +02:00
if(radio_was_off) {
rf230_off();
}
return rssi;
}
2009-07-08 18:17:07 +02:00
/*---------------------------------------------------------------------------*/
2010-02-22 23:23:18 +01:00
static int
rf230_cca(void)
2009-07-08 18:17:07 +02:00
{
uint8_t cca=0;
uint8_t radio_was_off = 0;
uint8_t volatile saved_sreg = SREG;
2009-07-08 18:17:07 +02:00
2010-02-22 23:23:18 +01:00
/* If the radio is locked by an underlying thread (because we are
being invoked through an interrupt), we preted that the coast is
clear (i.e., no packet is currently being transmitted by a
neighbor). */
if(locked) {
DEBUGFLOW('|');
// return 1; rf230 hangs on occasion?
return 0;
2009-07-08 18:17:07 +02:00
}
/* Don't allow interrupts! */
//#if !defined(__AVR_ATmega128RFA1__)
cli();
//#endif
2011-08-13 17:38:38 +02:00
/* Turn radio on if necessary. If radio is currently busy return busy channel */
/* This may happen when testing radio duty cycling with RADIOALWAYSON */
if(RF230_receive_on) {
if (hal_get_slptr()) { //should not be sleeping!
2011-08-13 17:38:38 +02:00
DEBUGFLOW('<');
goto busyexit;
2011-08-13 17:38:38 +02:00
} else {
if (!rf230_isidle()) {DEBUGFLOW('2');goto busyexit;}
2011-08-13 17:38:38 +02:00
}
} else {
DEBUGFLOW('3');
2010-02-22 23:23:18 +01:00
radio_was_off = 1;
rf230_on();
2009-07-08 18:17:07 +02:00
}
2010-02-16 22:41:24 +01:00
/* CCA Mode Mode 1=Energy above threshold 2=Carrier sense only 3=Both 0=Either (RF231 only) */
/* Use the current mode. Note triggering a manual CCA is not recommended in extended mode */
//hal_subregister_write(SR_CCA_MODE,1);
/* Start the CCA, wait till done, return result */
/* Note reading the TRX_STATUS register clears both CCA_STATUS and CCA_DONE bits */
#if defined(__AVR_ATmega128RFA1__)&&0
rf230_interruptwait=1;
hal_subregister_write(SR_CCA_REQUEST,1);
sei();
while (rf230_interruptwait) {}
// while ((cca & 0x80) == 0 ) {//TODO:why does this hang the 128rfa1?
cca=hal_register_read(RG_TRX_STATUS);
// }
#else
hal_subregister_write(SR_CCA_REQUEST,1);
delay_us(TIME_CCA);
// while ((cca & 0x80) == 0 ) { //hangs 128rfa1
cca=hal_register_read(RG_TRX_STATUS);
// }
#endif
2010-02-22 23:23:18 +01:00
if(radio_was_off) {
rf230_off();
2010-02-16 22:41:24 +01:00
}
// if (cca & 0x40) {/*DEBUGFLOW('3')*/;} else {rf230_pending=1;DEBUGFLOW('4');}
2011-08-13 17:38:38 +02:00
if (cca & 0x40) {
// DEBUGFLOW('5');
SREG=saved_sreg;
2011-08-13 17:38:38 +02:00
return 1;
} else {
// DEBUGFLOW('6');
busyexit:
SREG=saved_sreg;
2011-08-13 17:38:38 +02:00
return 0;
}
2010-02-16 22:41:24 +01:00
}
2010-02-22 23:23:18 +01:00
/*---------------------------------------------------------------------------*/
int
rf230_receiving_packet(void)
2009-07-08 18:17:07 +02:00
{
uint8_t radio_state;
2011-08-13 17:38:38 +02:00
if (hal_get_slptr()) {
DEBUGFLOW('=');
2011-08-13 17:38:38 +02:00
} else {
radio_state = hal_subregister_read(SR_TRX_STATUS);
if ((radio_state==BUSY_RX) || (radio_state==BUSY_RX_AACK)) {
// DEBUGFLOW('8');
// rf230_pending=1;
2011-08-13 17:38:38 +02:00
return 1;
}
}
2011-08-13 17:38:38 +02:00
return 0;
2010-02-22 23:23:18 +01:00
}
/*---------------------------------------------------------------------------*/
static int
rf230_pending_packet(void)
2010-02-22 23:23:18 +01:00
{
if (rf230_pending) DEBUGFLOW('@');
return rf230_pending;
2010-02-22 23:23:18 +01:00
}
/*---------------------------------------------------------------------------*/
2011-03-23 23:08:07 +01:00
#if RF230_CONF_SNEEZER && JACKDAW
/* See A.2 in the datasheet for the sequence needed.
* This version for RF230 only, hence Jackdaw.
* A full reset seems not necessary and allows keeping the pan address, etc.
* for an easy reset back to network mode.
*/
void rf230_start_sneeze(void) {
//write buffer with random data for uniform spectral noise
//uint8_t txpower = hal_register_read(0x05); //save auto_crc bit and power
// hal_set_rst_low();
// hal_set_slptr_low();
// delay_us(TIME_RESET);
// hal_set_rst_high();
hal_register_write(0x0E, 0x01);
hal_register_write(0x02, 0x03);
hal_register_write(0x03, 0x10);
// hal_register_write(0x08, 0x20+26); //channel 26
hal_subregister_write(SR_CCA_MODE,1); //leave channel unchanged
// hal_register_write(0x05, 0x00); //output power maximum
hal_subregister_write(SR_TX_AUTO_CRC_ON, 0); //clear AUTO_CRC, leave output power unchanged
hal_register_read(0x01); //should be trx-off state=0x08
hal_frame_write(buffer, 127); //maximum length, random for spectral noise
hal_register_write(0x36,0x0F); //configure continuous TX
hal_register_write(0x3D,0x00); //Modulated frame, other options are:
// hal_register_write(RG_TX_2,0x10); //CW -2MHz
// hal_register_write(RG_TX_2,0x80); //CW -500KHz
// hal_register_write(RG_TX_2,0xC0); //CW +500KHz
DDRB |= 1<<7; //Raven USB stick has PB7 connected to the RF230 TST pin.
PORTB |= 1<<7; //Raise it to enable continuous TX Test Mode.
hal_register_write(0x02,0x09); //Set TRX_STATE to PLL_ON
delay_us(TIME_TRX_OFF_TO_PLL_ACTIVE);
delay_us(TIME_PLL_LOCK);
delay_us(TIME_PLL_LOCK);
// while (hal_register_read(0x0f)!=1) {continue;} //wait for pll lock-hangs
hal_register_write(0x02,0x02); //Set TRX_STATE to TX_START
}
#endif