contiki/platform/avr-ravenlcd/menu.c

487 lines
12 KiB
C
Raw Normal View History

/*
* Copyright (c) 2008 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:
*
* * Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* * 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.
* * Neither the name of the copyright holders nor the names of
* contributors may be used to endorse or promote products derived
* from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS 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 COPYRIGHT OWNER 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.
*/
/**
* \file
*
* \brief
* This file operates the menu flow chart described in the readme
* notes. This will create the proper commands needed to control the 1284p.
*
* \author
* Mike Vidales mavida404@gmail.com
*
*/
#include <avr/eeprom.h>
#include <util/delay.h>
#include "menu.h"
#include "main.h"
#include "lcd.h"
#include "key.h"
#include "uart.h"
#include "sleep.h"
#include "temp.h"
#include "beep.h"
uint8_t sleep_count;
uint8_t ping_count;
uint8_t ping_response;
bool ping_mode;
bool timeout_flag;
bool temp_flag;
bool temp_mode;
bool auto_temp=true;
/**
* \addtogroup lcd
* \{
*/
/*---------------------------------------------------------------------------*/
/**
* \brief This function will convert decimal to ascii.
*
* \param val Decimal value to convert.
* \param str Address location to store converted value.
*/
void
dectoascii(uint8_t val, char *str)
{
*(str+1) = (val % 10) + '0';
*str = (val / 10) + '0';
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will convert a signed decimal number to ASCII.
*
* \param n Signed number
* \param str Pointer to store converted value.
*
* \return *p Address of stored conversion.
*/
uint8_t
*signed_dectoascii(int16_t n, uint8_t *str)
{
uint8_t * p = str;
uint8_t neg = 0;
if(n < 0){
neg = 1;
n = -n;
}
*p-- = 0x00;
/* Determine the unit of conversion. */
if(temp_mode == TEMP_UNIT_CELCIUS){
/* Add ASCII C to string. */
*p-- = 'C';
}
else{
/* Add ASCII F to string. */
*p-- = 'F';
}
/* Add a space before unit symbol. */
*p-- = ' ';
/* For zero, just print zero. */
if (!n){
*p = '0';
return p;
}
while (n){
*p-- = (n%10) + '0';
n/= 10;
}
if (neg){
*p-- = '-';
}
return ++p;
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will check for DEBUG mode after power up.
*/
void
eeprom_init(void)
{
2010-02-10 22:53:55 +00:00
uint8_t val;
if(0xFF == eeprom_read_byte(EEPROM_DEBUG_ADDR)){
2010-02-10 22:53:55 +00:00
/* Disable - Reverse logic. */
val = 1;
menu_debug_mode(&val);
}
else{
/* Enable - Reverse logic. */
2010-02-10 22:53:55 +00:00
val = 0;
menu_debug_mode(&val);
}
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will start a sleep operation.
*
* \param val Used for remembering the new menu to display after a wakeup.
*/
void
menu_run_sleep(uint8_t *val)
{
/* Turn off LED, LCD, ADC, Timer 1, SPI */
led_off();
lcd_deinit();
key_deinit();
PRR |= (1 << PRTIM1) | (1 << PRSPI);
/* Tell the 1284P to turn off the radio and sleep */
sleep_count=0;
uart_serial_send_frame(SEND_SLEEP, 1, (uint8_t *)&sleep_count);
/* Turn off UART when transmission is complete */
while(!(UCSR0A & (1 << TXC0)));
_delay_us(10000); //deinit trash clears done flag on 1284p
uart_deinit();
/* Go to sleep until button is pushed */
sleep_now(0);
/* Yawn, waking up, turn on LCD with Raven Logo */
lcd_init();
lcd_symbol_set(LCD_SYMBOL_RAVEN);
/* Disable interrupts before powering everything up */
cli();
key_init();
PRR &= ~((1 << PRTIM1) | (1 << PRSPI));
uart_init();
/* Enable interrupts, Wake up 1284p and radio */
sei();
sleep_wakeup();
// uart_init();//flush receive buffer
/* Wait for buttons up */
while (key_state_get() != KEY_NO_KEY)
;
if (is_button()){
get_button();
}
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will start a sleep with wakes for temperature measurement and web requests.
*
* \param val Used for remembering the new menu to display after a wakeup.
*/
void
menu_run_doze(uint8_t *val)
{
/* Turn off LED, LCD */
led_off();
lcd_deinit();
/* Debounce */
while (key_state_get() != KEY_NO_KEY) ;
/* Stay in doze loop until button is pressed*/
while (ENTER_PORT & (1<<ENTER_PIN)) {
/* Tell 1284p to sleep for 4 seconds */
/* It will ignore the request if TCP/IP sessions are active */
2010-12-19 17:13:29 +00:00
/* Alter these timings as desired, or comment out to sleep only the 3290p */
sleep_count=4;
uart_serial_send_frame(SEND_SLEEP, 1, (uint8_t *)&sleep_count);
/* Wait for transmission complete, then sleep 3290p for 5 seconds */
while(!(UCSR0A & (1 << TXC0)));
// uart_deinit();
sleep_now(sleep_count+1);
// uart_init();
/* 1284p should be awake by now, update temperature and give it time to process */
menu_send_temp();
_delay_us(20000);
}
/* Wake LCD, turn on Raven logo */
lcd_init();
lcd_symbol_set(LCD_SYMBOL_RAVEN);
sleep_wakeup();
/* Wait for buttons up */
while (key_state_get() != KEY_NO_KEY)
;
if (is_button()){
get_button();
}
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will setup a ping request command to the 1284p and reset the ping counter.
*
* \param val place holder
*/
void
menu_ping_request(uint8_t * val)
{
uint8_t i;
ping_mode = true;
ping_count = 0;
ping_response = 0;
/* Initialize the numerical display with dashes */
for(i=0; i<4; i++){
lcd_single_print_dig(LCD_SEV_SEG_INDEX_MINUS, i);
}
menu_send_ping();
/* Reset the timer for 1 sec resolution between pings. */
TCNT1 = 0;
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will send the ping request to the 1284p via the serial port.
*
* \return ping_count The number of ping attempts.
*/
uint8_t
menu_send_ping(void)
{
/*
* Check for previous ping timeout. If menu_send_ping() was called before receiving
* a response, update the LCD.
*/
timeout_flag = true;
ping_count++;
/* Send the ping command with one byte payload of the current sequence number. */
uart_serial_send_frame(SEND_PING, 1, (uint8_t *)&ping_count);
return ping_count;
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will stop the ping request.
*/
void
menu_stop_ping(void)
{
ping_mode = false;
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will enable or disable the JTAG debug interface to allow for
* proper temperature sensor readings.
*
* \param val Flag to trigger the proper debug mode.
*/
void
menu_debug_mode(uint8_t *val)
{
uint8_t sreg = SREG;
cli();
if(*val){
/* Disable - Could use inline ASM to meet timing requirements. */
MCUCR |= (1 << JTD);
MCUCR |= (1 << JTD);
/* Needed for timing critical JTD disable. */
temp_init();
/* Store setting in EEPROM. */
eeprom_write_byte(EEPROM_DEBUG_ADDR, 0xFF);
}
else{
/* Enable - Could use inline ASM to meet timing requirements. */
MCUCR &= ~(1 << JTD);
MCUCR &= ~(1 << JTD);
/* Store setting in EEPROM. */
eeprom_write_byte(EEPROM_DEBUG_ADDR, 0x01);
}
SREG = sreg;
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will display the temperature in degrees F or C.
*
* \param val Flag to trigger F or C temperature conversion.
*/
void
menu_read_temp(uint8_t *val)
{
if(*val){
temp_mode = TEMP_UNIT_CELCIUS;
}
else{
temp_mode = TEMP_UNIT_FAHRENHEIT;
}
temp_flag = true;
menu_display_temp();
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will display the temperature in degrees F or C.
*/
void
menu_display_temp(void)
{
int16_t result = temp_get(temp_mode);
/* Display the temp result on the lower 4 digit display with the proper symbol. */
if(temp_mode == TEMP_UNIT_CELCIUS){
lcd_symbol_clr(LCD_SYMBOL_F);
lcd_symbol_set(LCD_SYMBOL_C);
}
else{
lcd_symbol_clr(LCD_SYMBOL_C);
lcd_symbol_set(LCD_SYMBOL_F);
}
/* Check for the DEBUG JTAG enable bit and display a CAUTION symbol to the user. */
/* CAUTION represents false value. */
if(MCUCR & 0x80){
lcd_symbol_clr(LCD_SYMBOL_ATT);
}
else{
lcd_symbol_set(LCD_SYMBOL_ATT);
}
lcd_num_putdec(result, LCD_NUM_PADDING_SPACE);
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will clear the temperature displayed in the 4 digit LCD segments.
*/
void
menu_clear_temp(void)
{
temp_flag = false;
lcd_symbol_clr(LCD_SYMBOL_F);
lcd_symbol_clr(LCD_SYMBOL_C);
lcd_symbol_clr(LCD_SYMBOL_ATT);
lcd_num_clr();
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will setup the current temperature for transfer to the ATmega1284p via a binary
* command transfer.
*
* \param val This is used to determine sending once or auto based on the timer.
*/
void
menu_prepare_temp(uint8_t *val)
{
if(*val){
/* Only send the temp value once. */
auto_temp = false;
}
else{
/* Auto send the temp value based on TIMER1 interval. */
auto_temp = true;
}
menu_send_temp();
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will stop the auto sending of temperature data.
*/
void
menu_stop_temp(void)
{
auto_temp = false;
}
/*---------------------------------------------------------------------------*/
/**
* \brief This will send the data via the serial port.
*/
#if MEASURE_ADC2
extern uint16_t ADC2_reading;
#endif
void
menu_send_temp(void)
{
int16_t result;
2010-02-10 22:53:55 +00:00
uint8_t str[12];
uint8_t * p = 0;
/* Turn on nose LED for activity indicator */
led_on();
/* Get the latest temp value. */
result = temp_get(temp_mode);
/* Convert signed decimal number to ASCII. */
p = signed_dectoascii(result, (str + 10));
/* Send frame via serial port. */
2010-02-10 22:53:55 +00:00
uart_serial_send_frame(SEND_TEMP, 1+strlen((char *)p), p);
#if MEASURE_ADC2
/* Send ADC2 via serial port. */
p = signed_dectoascii(ADC2_reading, (str + 10));
str[9]='m';str[10]='V';str[11]=0; //convert degrees to millivolts ;)
uart_serial_send_frame(SEND_ADC2, 1+strlen((char *)p), p);
#endif
led_off();
}
/** \} */