static void printtxpower(void) {
uint8_t power=rf230_get_txpower()&0xf;
char sign=(power<6?'+':'-');
char tens=(power>14?'1':'0');
char ones=pgm_read_byte(&txonesdigit[power]);
char tenths=pgm_read_byte(&txtenthsdigit[power]);
if (tens=='0') {tens=sign;sign=' ';}
PRINTF_P(PSTR("%c%c%c.%cdBm"),sign,tens,ones,tenths);
}
void menu_process(char c)
{
static enum menustate_enum /* Defines an enumeration type */
{
normal,
channel,
txpower
} menustate = normal;
static char channel_string[3];
static uint8_t channel_string_i;// = 0;
int tempchannel;
if (menustate == channel) {
switch(c) {
case '\r':
case '\n':
if (channel_string_i) {
channel_string[channel_string_i] = 0;
tempchannel = atoi(channel_string);
if ((tempchannel < 11) || (tempchannel > 26)) {
PRINTF_P(PSTR("\n\rInvalid input\n\r"));
} else {
rf230_set_channel(tempchannel);
#if CONTIKI_CONF_SETTINGS_MANAGER
if(settings_set_uint8(SETTINGS_KEY_CHANNEL, tempchannel) == SETTINGS_STATUS_OK) {
PRINTF_P(PSTR("\n\rChannel changed to %d and stored in EEPROM.\n\r"), tempchannel);
} else {
PRINTF_P(PSTR("\n\rChannel changed to %d, but unable to store in EEPROM!\n\r"), tempchannel);
}
#else
PRINTF_P(PSTR("\n\rChannel changed to %d.\n\r"), tempchannel);
#endif
}
} else {
PRINTF_P(PSTR("\n\rChannel unchanged.\n\r"));
}
menustate = normal;
break;
case '\b':
if (channel_string_i) {
channel_string_i--;
PRINTF_P(PSTR("\b \b"));
}
break;
case '0':
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9':
if (channel_string_i > 1) {
// This time the user has gone too far.
// Beep at them.
putc('\a', stdout);
break;
}
putc(c, stdout);
channel_string[channel_string_i] = c;
channel_string_i++;
break;
default:
break;
}
} else if (menustate == txpower) {
switch(c) {
case '\r':
case '\n':
if (channel_string_i) {
channel_string[channel_string_i] = 0;
tempchannel = atoi(channel_string);
if ((tempchannel < 0) || (tempchannel > 15)) {
PRINTF_P(PSTR("\n\rInvalid input\n\r"));
} else {
PRINTF_P(PSTR(" ")); //for some reason needs a print here to clear the string input...
rf230_set_txpower(tempchannel);
#if CONTIKI_CONF_SETTINGS_MANAGER
if(settings_set_uint8(SETTINGS_KEY_TXPOWER, tempchannel) == SETTINGS_STATUS_OK) {
PRINTF_P(PSTR("\n\rTransmit power changed to %d, and stored in EEPROM.\n\r"), tempchannel);
} else {
PRINTF_P(PSTR("\n\rTransmit power changed to %d, but unable to store in EEPROM!\n\r"), tempchannel);
}
#else
PRINTF_P(PSTR("\n\rTransmit power changed to %d.\n\r"), tempchannel);
#endif
}
} else {
PRINTF_P(PSTR("\n\rTransmit power unchanged.\n\r"));
}
menustate = normal;
break;
case '\b':
if (channel_string_i) {
channel_string_i--;
PRINTF_P(PSTR("\b \b"));
}
break;
case '0':
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9':
if (channel_string_i > 1) {
// This time the user has gone too far.
// Beep at them.
putc('\a', stdout);
break;
}
putc(c, stdout);
channel_string[channel_string_i] = c;
channel_string_i++;
break;
default:
break;
}
} else {
uint8_t i;
switch(c) {
case '\r':
case '\n':
break;
case 'h':
case '?':
menu_print();
break;
case 'd':
if (mx_console_mode.debugOn) {
PRINTF_P(PSTR("Node does not output debug strings\n\r"));
mx_console_mode.debugOn = 0;
} else {
PRINTF_P(PSTR("Node now outputs debug strings\n\r"));
mx_console_mode.debugOn = 1;
}
break;
case 'c':
PRINTF_P(PSTR("\nSelect 802.15.4 Channel in range 11-26 [%d]: "), rf230_get_channel());
menustate = channel;
channel_string_i = 0;
break;
case 'p':
PRINTF_P(PSTR("\nSelect transmit power (0=+3dBm 15=-17.2dBm) [%d]: "), rf230_get_txpower());
menustate = txpower;
channel_string_i = 0;
break;
#if UIP_CONF_IPV6_RPL
#include "rpl.h"
extern uip_ds6_nbr_t uip_ds6_nbr_cache[];
extern uip_ds6_netif_t uip_ds6_if;
case 'N':
{
uint8_t i,j;
PRINTF_P(PSTR("\n\rAddresses [%u max]\n\r"),UIP_DS6_ADDR_NB);
for (i=0;i<UIP_DS6_ADDR_NB;i++) {
if (uip_ds6_if.addr_list[i].isused) {
ipaddr_add(&uip_ds6_if.addr_list[i].ipaddr);
PRINTF_P(PSTR("\n\r"));
}
}
PRINTF_P(PSTR("\n\rNeighbors [%u max]\n\r"),UIP_DS6_NBR_NB);
for(i = 0,j=1; i < UIP_DS6_NBR_NB; i++) {
if(uip_ds6_nbr_cache[i].isused) {
ipaddr_add(&uip_ds6_nbr_cache[i].ipaddr);
PRINTF_P(PSTR("\n\r"));
j=0;
}
}
if (j) PRINTF_P(PSTR(" <none>"));
PRINTF_P(PSTR("\n\rRoutes [%u max]\n\r"),UIP_DS6_ROUTE_NB);
{
uip_ds6_route_t *r;
j = 1;
for(r = uip_ds6_route_list_head();
r != NULL;
r = list_item_next(r)) {
ipaddr_add(&r->ipaddr);
PRINTF_P(PSTR("/%u (via "), r->length);
ipaddr_add(&r->nexthop);
if(r->state.lifetime < 600) {
PRINTF_P(PSTR(") %lus\n\r"), r->state.lifetime);
} else {
PRINTF_P(PSTR(")\n\r"));
}
j = 0;
}
}
if (j) PRINTF_P(PSTR(" <none>"));
PRINTF_P(PSTR("\n\r---------\n\r"));
break;
}
case 'G':
PRINTF_P(PSTR("Global repair returns %d\n\r"),rpl_repair_root(RPL_DEFAULT_INSTANCE));
break;
case 'L':
rpl_local_repair(rpl_get_any_dag());
PRINTF_P(PSTR("Local repair initiated\n\r"));
break;
#endif
case 'm':
PRINTF_P(PSTR("Currently running on\n\r"));
PRINTF_P(PSTR(" * %s\n\r"), CONTIKI_VERSION_STRING);
PRINTF_P(PSTR(" * NETSTACK_MAC: %s, NETSTACK_RDC: %s\n\r"), NETSTACK_MAC.name, NETSTACK_RDC.name);
#if 1
{
int i;
PRINTF_P(PSTR(" * Address: "));
for (i = 0; i < 6; i += 2) {
PRINTF_P(PSTR("%02x%02x:"), uip_lladdr.addr[i], uip_lladdr.addr[i + 1]);
}
PRINTF_P(PSTR("%02x%02x\n\r"), uip_lladdr.addr[6], uip_lladdr.addr[7]);
}
#endif
#if UIP_CONF_IPV6_RPL
PRINTF_P(PSTR(" * RPL Enabled\n\r"));
#endif
#if UIP_CONF_ROUTER
PRINTF_P(PSTR(" * Routing Enabled\n\r"));
#endif
#if CONVERTTXPOWER
PRINTF_P(PSTR(" * Operates on channel %d with TX power "),rf230_get_channel());
printtxpower();
PRINTF_P(PSTR("\n\r"));
#else //just show the raw value
PRINTF_P(PSTR(" * Operates on channel %d\n\r"), rf230_get_channel());
PRINTF_P(PSTR(" * TX Power(0=+3dBm, 15=-17.2dBm): %d\n\r"), rf230_get_txpower());
#endif
if (rf230_smallest_rssi) {
PRINTF_P(PSTR(" * Current/Last/Smallest RSSI: %d/%d/%ddBm\n\r"), -91+(rf230_rssi()-1), -91+(rf230_last_rssi-1),-91+(rf230_smallest_rssi-1));
rf230_smallest_rssi=0;
} else {
PRINTF_P(PSTR(" * Current/Last/Smallest RSSI: %d/%d/--dBm\n\r"), -91+(rf230_rssi()-1), -91+(rf230_last_rssi-1));
}
#if CONFIG_STACK_MONITOR
/* See contiki-raven-main.c for initialization of the magic numbers */
{
extern uint16_t __bss_end;
uint16_t p=(uint16_t)&__bss_end;
do {
if (*(uint16_t *)p != 0x4242) {
printf_P(PSTR(" * Never-used stack > %d bytes\n\r"),p-(uint16_t)&__bss_end);
break;
}
p+=100;
} while (p<RAMEND-100);
}
#endif
break;
case 'e':
PRINTF_P(PSTR("Energy Scan:\n"));
{
uint8_t i;
uint16_t j;
uint8_t previous_channel = rf230_get_channel();
int8_t RSSI, maxRSSI[17];
uint16_t accRSSI[17];
bzero((void*)accRSSI,sizeof(accRSSI));
bzero((void*)maxRSSI,sizeof(maxRSSI));
for(j=0;j<(1<<12);j++) {
for(i=11;i<=26;i++) {
rf230_listen_channel(i);
_delay_us(3*10);
RSSI = rf230_rssi(); //multiplies rssi register by 3 for consistency with energy-detect register
maxRSSI[i-11]=Max(maxRSSI[i-11],RSSI);
accRSSI[i-11]+=RSSI;
}
if(j&(1<<7)) {
leds_on(LEDS_RED);
if(!(j&((1<<7)-1))) {
PRINTF_P(PSTR("."));
}
} else {
leds_off(LEDS_RED);
}
watchdog_periodic();
}
rf230_set_channel(previous_channel);
PRINTF_P(PSTR("\n"));
for(i=11;i<=26;i++) {
uint8_t activity=Min(maxRSSI[i-11],accRSSI[i-11]/(1<<7));
PRINTF_P(PSTR(" %d: %02ddB "),i, -91+(maxRSSI[i-11]-1));
for(;activity--;maxRSSI[i-11]--) {
PRINTF_P(PSTR("#"));
}
for(;maxRSSI[i-11]>0;maxRSSI[i-11]--) {
PRINTF_P(PSTR(":"));
}
PRINTF_P(PSTR("\n"));
}
}
PRINTF_P(PSTR("Done.\n"));
break;
case 'R':
PRINTF_P(PSTR("Resetting...\n\r"));
leds_on(LEDS_ALL);
for(i = 0; i < 20; i++) _delay_ms(100);
watchdog_reboot();
break;
default:
PRINTF_P(PSTR("%c is not a valid option! h for menu\n\r"), c);
break;
}
}
}
/*----------------------------------------------------------------------------
MAIN function
*----------------------------------------------------------------------------*/
int main (void) { /* Main Program */
//************************************************************************************************************
/* this is contiki-code */
watchdog_init();
/* Initialize hardware. */
clock_init();
/* UART4 Initialization */
// uart4_init(115200);
USBD_Init(&USB_OTG_dev, USB_OTG_FS_CORE_ID, &USR_desc, &USBD_CDC_cb, &USR_cb);
// Led initialization
leds_init();
leds_on(LEDS_BLUE);
PRINTF("\r\nStarting ");
PRINTF(CONTIKI_VERSION_STRING);
PRINTF(" on %s \r\n", PLATFORM_NAME);
#ifdef __USE_LCD
GLCD_Init(); /* Initialize graphical LCD display */
GLCD_Clear(White); /* Clear graphical LCD display */
GLCD_SetBackColor(DarkGreen);
GLCD_SetTextColor(White);
GLCD_DisplayString(0, 0, __FI, " KUSZ - TU Dortmund ");
GLCD_DisplayString(1, 0, __FI, " contiki ");
GLCD_DisplayString(2, 0, __FI, " www.tu-dortmund.de ");
GLCD_SetBackColor(White);
GLCD_SetTextColor(Blue);
watchdog_periodic();
#endif // __USE_LCD
/*
* Initialize Contiki and our processes.
*/
#ifdef WITH_SERIAL_LINE_INPUT
// uart1_set_input(serial_line_input_byte);
// serial_line_init();
#endif
/* rtimer and ctimer should be initialized before radio duty cycling layers*/
rtimer_init();
process_init();
process_start(&sensors_process, NULL);
/* etimers must be started before ctimer_init */
process_start(&etimer_process, NULL);
ctimer_init();
/* Start radio and radio receive process */
NETSTACK_RADIO.init();
/* makes use of cpu-specific RNG peripheral - no seed needed */
random_init(0);
/* Set addresses BEFORE starting tcpip process */
addr.u8[0] = 0x02;
addr.u8[1] = *((uint8_t*)0x1FFF7A10);
addr.u8[2] = *((uint8_t*)0x1FFF7A10+1);
addr.u8[3] = 0xFF;
addr.u8[4] = 0xFE;
addr.u8[5] = *((uint8_t*)0x1FFF7A10+2);
addr.u8[6] = *((uint8_t*)0x1FFF7A10+3);
addr.u8[7] = *((uint8_t*)0x1FFF7A10+4);
memcpy(&uip_lladdr.addr, &addr.u8, sizeof(rimeaddr_t));
rimeaddr_set_node_addr(&addr);
rf230_set_pan_addr(0xabcd,0xbabe,(uint8_t *)&addr.u8);
rf230_set_channel(CHANNEL_802_15_4);
rf230_set_txpower(0); /* max */
PRINTF("EUI-64 MAC: %x-%x-%x-%x-%x-%x-%x-%x\n",addr.u8[0],addr.u8[1],addr.u8[2],addr.u8[3],addr.u8[4],addr.u8[5],addr.u8[6],addr.u8[7]);
/* Initialize stack protocols */
queuebuf_init();
NETSTACK_RDC.init();
NETSTACK_MAC.init();
NETSTACK_NETWORK.init();
#define ANNOUNCE_BOOT 1
#if ANNOUNCE_BOOT
PRINTF("%s %s, channel %u , check rate %u Hz tx power %u\n",NETSTACK_MAC.name, NETSTACK_RDC.name, rf230_get_channel(),
CLOCK_SECOND / (NETSTACK_RDC.channel_check_interval() == 0 ? 1:NETSTACK_RDC.channel_check_interval()),
rf230_get_txpower());
#if UIP_CONF_IPV6_RPL
PRINTF("RPL Enabled\n");
#endif
#if UIP_CONF_ROUTER
PRINTF("Routing Enabled\n");
#endif
#endif /* ANNOUNCE_BOOT */
process_start(&tcpip_process, NULL);
/* Autostart other processes */
autostart_start(autostart_processes);
#if ANNOUNCE_BOOT
PRINTF("Online\n");
#endif /* ANNOUNCE_BOOT */
energest_init();
ENERGEST_ON(ENERGEST_TYPE_CPU);
watchdog_start();
while (1) { /* Loop forever */
watchdog_periodic();
process_run();
}
}
/*---------------------------------------------------------------------------*/
int
nrf24l01_send(const void *payload, unsigned short payload_len)
{
uint8_t total_len,buffer[RF230_MAX_TX_FRAME_LENGTH],*pbuf;
uint8_t tx_result = RADIO_TX_ERR;
#if RF230_CONF_TIMESTAMPS
struct timestamp timestamp;
#endif /* RF230_CONF_TIMESTAMPS */
#if RF230_CONF_CHECKSUM
uint16_t checksum;
#endif /* RF230_CONF_CHECKSUM */
#if RADIOSTATS
RF230_sendpackets++;
#endif
GET_LOCK();
RIMESTATS_ADD(lltx);
#if RF230_CONF_CHECKSUM
checksum = crc16_data(payload, payload_len, 0);
#endif /* RF230_CONF_CHECKSUM */
total_len = payload_len + AUX_LEN;
/*Check function parameters and current state.*/
if (total_len > RF230_MAX_TX_FRAME_LENGTH){
#if RADIOSTATS
RF230_sendfail++;
#endif
return -1;
}
pbuf=&buffer[0];
memcpy(pbuf,payload,payload_len);
pbuf+=payload_len;
#if RF230_CONF_CHECKSUM
memcpy(pbuf,&checksum,CHECKSUM_LEN);
pbuf+=CHECKSUM_LEN;
#endif /* RF230_CONF_CHECKSUM */
#if RF230_CONF_TIMESTAMPS
timestamp.authority_level = timesynch_authority_level();
timestamp.time = timesynch_time();
memcpy(pbuf,×tamp,TIMESTAMP_LEN);
pbuf+=TIMESTAMP_LEN;
#endif /* RF230_CONF_TIMESTAMPS */
/* If radio is sleeping we have to turn it on first */
//
/* if need radio calibrate, do it here */
//
/* Wait for any previous transmission to finish. */
//nrf24l01_waitidle();
BUSYWAIT_UNTIL(nrf24l01_status(), RTIMER_SECOND / 100);
/* set tx mode */
//
/* set some features here like auto ack */
//
/* get the current power and save, then adjust the power to send */
//
if(packetbuf_attr(PACKETBUF_ATTR_RADIO_TXPOWER) > 0) {
nrf24l01_set_txpower(packetbuf_attr(PACKETBUF_ATTR_RADIO_TXPOWER) - 1);
} else {
nrf24l01_set_txpower(TX_PWR_18DBM); //-18dbm
}
/* Now start transmitting... */
PRINTF("nrf24l01: sending %d bytes\n", payload_len);
//send these data
SPI_WRITE_BUF(WR_TX_PLOAD, buffer, total_len);
if(1) {
#if RF230_CONF_TIMESTAMPS
rtimer_clock_t txtime = timesynch_time();
#endif /* RF230_CONF_TIMESTAMPS */
if(rf_radio_on) {
ENERGEST_OFF(ENERGEST_TYPE_LISTEN);
}
ENERGEST_ON(ENERGEST_TYPE_TRANSMIT);
/* We wait until transmission has ended so that we get an
accurate measurement of the transmission time.*/
//nrf24l01_waitidle();
//radio_set_trx_state(RX_AACK_ON);//Re-enable receive mode
BUSYWAIT_UNTIL(isr_event_write.isr_type, RTIMER_SECOND / 100);
if(ISR_TX_DS == isr_event_write.isr_type)
{
tx_result = RADIO_TX_OK;
}
/*else if(ISR_MAX_RT == state)
{
tx_result = RADIO_TX_NOACK;
}*/
else
{
tx_result = RADIO_TX_NOACK;
}
#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 */
#ifdef ENERGEST_CONF_LEVELDEVICE_LEVELS
ENERGEST_OFF_LEVEL(ENERGEST_TYPE_TRANSMIT,rf230_get_txpower());
#endif
ENERGEST_OFF(ENERGEST_TYPE_TRANSMIT);
if(rf_radio_on) {
ENERGEST_ON(ENERGEST_TYPE_LISTEN);
}
RELEASE_LOCK();
return tx_result;
}
}
