#include <nibo/niboconfig.h>
#include <nibo/leds.h>
#include <nibo/delay.h>
#include <nibo/iodefs.h>

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

#define FOSC 16000000			/* frequenz des ATmega128 Quarz */
#define BAUD 38400				/* Baud-Rate */
#define MYUBBR FOSC/16/BAUD-1 
volatile unsigned char c;		/* Variable, wird bei ISR UART benuetzt */
 
/* -- Initialisierungsfunktion  des USART */
void init_usart11(unsigned int ubrr){
	UBRR1H = (unsigned char)(ubrr >> 8);		/* zuerts high-byte */
	UBRR1L = (unsigned char)ubrr;			/* dann low-byte */	
	UCSR1B = (1 << RXEN1)|(1 << TXEN1)|(1 << RXCIE1);	/* empfangen, senden, Interrupt */			
	UCSR1C = (1<<UCSZ10)|(1<<UCSZ11);   	/* 8Datenbit, keine Parity, 1 Stoppbit */
	do{			/* Flush Receive-Buffer (entfernen evtl. vorhandener Werte) */
		UDR1;
		}
	while (UCSR1A & (1 << RXC1));
}
 
/* Funktion, um Character auf Terminal auszugeben */
void usart_putc(unsigned char c) {   
	while(!(UCSR1A & (1 << UDRE1))){		
	}
	UDR1 = c;    						
}
 
/* Funktion, um String auf Terminal auszugeben */
void usart_puts(char *s) {
	while (*s){   				/* solange nicht Stringende erreicht */
		usart_putc(*s);		/* schreib das Zeichen aufs Terminal */
		s++;				/* Zeichen um 1 weiter zaehlen */
    }
} 
 
/* ISR - wenn Daten reinkommen - Daten empfangen*/										
ISR(USART1_RX_vect){			/* USART RX interrupt */
	c = UDR1;				/* schreib, was in UDR steht, in die Variable c */
	usart_putc(c);				/*  Aufuf der Ausgabe, wenn was reinkommt */
}
 
int main(void) {
	init_usart11(MYUBBR); 		/* initialisiere den USART */
	leds_init();
	sei();  					/* Freigabe der Interrupts */
	c = 'a';
 
	while(1){
	leds_set_status(LEDS_RED, 0);
		usart_putc(c);			/* schreib, was in c steht, wieder raus auf Terminal */
		_delay_ms(500);
 
 
	leds_set_status(LEDS_GREEN, 0); 
		_delay_ms(500);
	}
	return 0;
}