--- /dev/null
+
+/*
+ * Copyright (c) 2006-2012 by Roland Riegel <feedback@roland-riegel.de>
+ *
+ * This file is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License version 2 as
+ * published by the Free Software Foundation.
+ */
+
+#include <stdio.h>
+#include <avr/interrupt.h>
+#include <avr/io.h>
+#include <avr/pgmspace.h>
+#include <avr/sfr_defs.h>
+#include <avr/sleep.h>
+
+#include "uart.h"
+
+/* some mcus have multiple uarts */
+#ifdef UDR0
+#define UBRRH UBRR0H
+#define UBRRL UBRR0L
+#define UDR UDR0
+
+#define UCSRA UCSR0A
+#define UDRE UDRE0
+#define RXC RXC0
+
+#define UCSRB UCSR0B
+#define RXEN RXEN0
+#define TXEN TXEN0
+#define RXCIE RXCIE0
+
+#define UCSRC UCSR0C
+#define URSEL
+#define UCSZ0 UCSZ00
+#define UCSZ1 UCSZ01
+#define UCSRC_SELECT 0
+#else
+#define UCSRC_SELECT (1 << URSEL)
+#endif
+
+#ifndef USART_RXC_vect
+#if defined(UART0_RX_vect)
+#define USART_RXC_vect UART0_RX_vect
+#elif defined(UART_RX_vect)
+#define USART_RXC_vect UART_RX_vect
+#elif defined(USART0_RX_vect)
+#define USART_RXC_vect USART0_RX_vect
+#elif defined(USART_RX_vect)
+#define USART_RXC_vect USART_RX_vect
+#elif defined(USART0_RXC_vect)
+#define USART_RXC_vect USART0_RXC_vect
+#elif defined(USART_RXC_vect)
+#define USART_RXC_vect USART_RXC_vect
+#else
+#error "Uart receive complete interrupt not defined!"
+#endif
+#endif
+
+#define BAUD 9600UL
+#define UBRRVAL (F_CPU/(BAUD*16)-1)
+#define USE_SLEEP 1
+
+void uart_init()
+{
+ /* set baud rate */
+ UBRRH = UBRRVAL >> 8;
+ UBRRL = UBRRVAL & 0xff;
+ /* set frame format: 8 bit, no parity, 1 bit */
+ UCSRC = UCSRC_SELECT | (1 << UCSZ1) | (1 << UCSZ0);
+ /* enable serial receiver and transmitter */
+#if !USE_SLEEP
+ UCSRB = (1 << RXEN) | (1 << TXEN);
+#else
+ UCSRB = (1 << RXEN) | (1 << TXEN) | (1 << RXCIE);
+#endif
+}
+
+void uart_putc(uint8_t c)
+{
+ if(c == '\n')
+ uart_putc('\r');
+
+ /* wait until transmit buffer is empty */
+ while(!(UCSRA & (1 << UDRE)));
+
+ /* send next byte */
+ UDR = c;
+}
+
+void uart_putc_hex(uint8_t b)
+{
+ /* upper nibble */
+ if((b >> 4) < 0x0a)
+ uart_putc((b >> 4) + '0');
+ else
+ uart_putc((b >> 4) - 0x0a + 'a');
+
+ /* lower nibble */
+ if((b & 0x0f) < 0x0a)
+ uart_putc((b & 0x0f) + '0');
+ else
+ uart_putc((b & 0x0f) - 0x0a + 'a');
+}
+
+void uart_putw_hex(uint16_t w)
+{
+ uart_putc_hex((uint8_t) (w >> 8));
+ uart_putc_hex((uint8_t) (w & 0xff));
+}
+
+void uart_putdw_hex(uint32_t dw)
+{
+ uart_putw_hex((uint16_t) (dw >> 16));
+ uart_putw_hex((uint16_t) (dw & 0xffff));
+}
+
+void uart_putw_dec(uint16_t w)
+{
+ uint16_t num = 10000;
+ uint8_t started = 0;
+
+ while(num > 0)
+ {
+ uint8_t b = w / num;
+ if(b > 0 || started || num == 1)
+ {
+ uart_putc('0' + b);
+ started = 1;
+ }
+ w -= b * num;
+
+ num /= 10;
+ }
+}
+
+void uart_putdw_dec(uint32_t dw)
+{
+ uint32_t num = 1000000000;
+ uint8_t started = 0;
+
+ while(num > 0)
+ {
+ uint8_t b = dw / num;
+ if(b > 0 || started || num == 1)
+ {
+ uart_putc('0' + b);
+ started = 1;
+ }
+ dw -= b * num;
+
+ num /= 10;
+ }
+}
+
+void uart_puts(const char* str)
+{
+ while(*str)
+ uart_putc(*str++);
+}
+
+void uart_puts_p(PGM_P str)
+{
+ while(1)
+ {
+ uint8_t b = pgm_read_byte_near(str++);
+ if(!b)
+ break;
+
+ uart_putc(b);
+ }
+}
+
+uint8_t uart_getc()
+{
+ /* wait until receive buffer is full */
+#if USE_SLEEP
+ uint8_t sreg = SREG;
+ sei();
+
+ while(!(UCSRA & (1 << RXC)))
+ sleep_mode();
+
+ SREG = sreg;
+#else
+ while(!(UCSRA & (1 << RXC)));
+#endif
+
+ uint8_t b = UDR;
+ if(b == '\r')
+ b = '\n';
+
+ return b;
+}
+
+EMPTY_INTERRUPT(USART_RXC_vect)
+