#include <inttypes.h>
#include <avr/io.h>
#include <avr/interrupt.h>
#include <stdlib.h>

#include <stdarg.h>
#include <ctype.h>
#include <string.h>
#include <compat/deprecated.h>

#define F_CPU	4000000
#define UART_BAUD_RATE      9600      /* 9600 baud */
#define UART_BAUD_SELECT (F_CPU/(UART_BAUD_RATE*16l)-1)

typedef unsigned char  u08;
typedef          char  s08;
typedef unsigned short u16;
typedef          short s16;

/* uart globals */
static volatile u08 *uart_data_ptr;
static volatile u08 uart_counter;

static volatile u08 inB;

SIGNAL(SIG_UART_TRANS)      
{
    uart_data_ptr++;

    if (--uart_counter)
        UDR = *uart_data_ptr;  
}

SIGNAL(SIG_UART_RECV)      
{
    register char readIn;

    readIn = UDR;        

    inB = readIn;
}


void uart_send(u08 *buf, u08 size)
{   
    if (!uart_counter) {
        uart_data_ptr  = buf;
        uart_counter   = size;
        UDR = *buf;
    }

    while (uart_counter != 0) { }
}

void uart_init(void)
/* initialize uart */
{
    /* enable RxD/TxD and ints */
    UCSRB = (1<<RXCIE)|(1<<TXCIE)|(1<<RXEN)|(1<<TXEN);
    
    /* set baud rate */
    UBRRL = (u08)UART_BAUD_SELECT; 
}

static void delay(uint16_t us) 
{
    while(us)
    	us--;
}


int main(void)
{
    volatile char temps[10] = "\0\0\0\0\0\0\0\0\0\0";

    uart_init();
        
    sei();                 
    
    delay(50000);
    delay(50000);
    delay(50000);
    delay(50000);
 
    inB = 0;

    uart_send("xmega test!\n\r", 13);

    while(1)
    {
        if (inB == 'a')
        {
            uart_send("a key\n\r", 7);
            
            inB = 0;
        }
        else if (inB == 'b')
        {
            uart_send("b key\n\r", 7);

            inB = 0;
        }
        else if (inB == 'x')
        {
            uart_send("xmega!\n\r", 8);

            inB = 0;
        }
    } 
}