#include <avr/io.h>

#define F_CPU 20000000ul
#include <util/delay.h>




/************************************************************************/
/* Defines                                                                     */
/************************************************************************/

#define DDR_SPI DDRB
#define DD_MOSI DDB5
#define DD_MISO DDB6
#define DD_SCK  DDB7
#define DD_SS  DDB4
#define DD_RCK  DDB0

#define UART_BAUD_RATE      38400 
#define DevHIH6130			0x27




/************************************************************************/
/* Include-Dateien                                                                     */
/************************************************************************/

#include "uart.h"
#include "i2cmaster.h"
#include <avr/interrupt.h>
#include <stdio.h>
#include <stdlib.h>
//#include <setbaud.h>
#include <stdint.h>
#include <avr/eeprom.h>
#include <avr/wdt.h>
#include <avr/power.h>



/************************************************************************/
/* Variablen                                                                     */
/************************************************************************/

uint8_t luftdruck;
char* luftdruckwert[16];
uint8_t match;
uint8_t sekunde;
char* sekundewert[16];
uint8_t sekunde_debug;

uint8_t humidity1;
char* humidity1wert[16];
uint8_t humidity2;
char* humidity2wert[16];
uint8_t tempcorrect1;
char* tempcorrect1wert[16];
uint8_t tempcorrect2;
char* tempcorrect2wert[16];




/************************************************************************/
/* SPI Funktionen                                                                     */
/************************************************************************/

void SPI_MasterInit(void)
{
/* Set MOSI and SCK output, all others input */
DDR_SPI = (1<<DD_MOSI)|(1<<DD_SCK) | (1<<DD_SS) | (1<<DD_RCK);

/* Enable SPI, Master, set clock rate fck/4 */
SPCR |= (1<<SPE)|(1<<MSTR)|(0<<SPR0) |(0<<SPR1);
SPSR |= (0<<SPI2X);
uart_puts("\r\n");
uart_puts("SPI initialisiert\n");
uart_puts("\r\n");
}



void SPI_MasterTransmit(unsigned char cData)
{
/* Start transmission */
SPDR = cData;
/* Wait for transmission complete */
while(!(SPSR & (1<<SPIF)));
}




/************************************************************************/
/* Timer Funktionen                                                                     */
/************************************************************************/

void timerint(void)
{
	TCCR1A = (1<<WGM01); // CTC Modus
	TCCR1B |= (0<<CS10) | (0<<CS11 | (1<<CS12)); // Prescaler 8
	OCR1A = 15624-1;
 
  // Compare Interrupt erlauben
  TIMSK1 |= (1<<OCIE1A);
}




/************************************************************************/
/* ADC Funktionen                                                                     */
/************************************************************************/

/* ADC initialisieren */

void ADC_Init(void) {
 
  uint16_t result;
 
  // interne Referenzspannung als Refernz für den ADC wählen:
  ADMUX = (1<<REFS1) | (0<<REFS0);
  
  // Bit ADFR ("free running") in ADCSRA steht beim Einschalten
  // schon auf 0, also single conversion
  ADCSRA = (1<<ADPS1) | (1<<ADPS0);     // Frequenzvorteiler
  ADCSRA |= (1<<ADEN);                  // ADC aktivieren
 
  /* nach Aktivieren des ADC wird ein "Dummy-Readout" empfohlen, man liest
     also einen Wert und verwirft diesen, um den ADC "warmlaufen zu lassen" */
 
  ADCSRA |= (1<<ADSC);                  // eine ADC-Wandlung 
  while (ADCSRA & (1<<ADSC) ) {}        // auf Abschluss der Konvertierung warten
  /* ADCW muss einmal gelesen werden, sonst wird Ergebnis der nächsten
     Wandlung nicht übernommen. */
  result = ADCW;
}
 
/* ADC Einzelmessung */
uint16_t ADC_Read( uint8_t channel )
{
  // Kanal waehlen, ohne andere Bits zu beeinflußen
  ADMUX = (ADMUX & ~(0x1F)) | (channel & 0x1F);
  ADCSRA |= (1<<ADSC);            // eine Wandlung "single conversion"
  while (ADCSRA & (1<<ADSC) ) {}  // auf Abschluss der Konvertierung warten
  return ADCW;                    // ADC auslesen und zurückgeben
}
 
/* ADC Mehrfachmessung mit Mittelwertbbildung */
/* beachte: Wertebereich der Summenvariablen */
uint16_t ADC_Read_Avg( uint8_t channel, uint8_t nsamples )
{
  uint32_t sum = 0;
 
  for (uint8_t i = 0; i < nsamples; ++i ) {
    sum += ADC_Read( channel );
  }
 
  return (uint16_t)( sum / nsamples );
}




/************************************************************************/
/* Grundeinstellungsfunkionen                                                                     */
/************************************************************************/


void portgrundeinstellung(void)
{
	DDRA = 0x00;
	DDRB = 0xFF;
	DDRC = 0x00;
	DDRD = 0xFF;
	DDRB |= (1 << DDB0) | (1 << DDB1) | (1 << DDB6);
}


void initialisierungen(void)
{
	wdt_enable(5);
	portgrundeinstellung();
	uart_init( UART_BAUD_SELECT(UART_BAUD_RATE,F_CPU) );
	timerint();
	i2c_init();
	ADC_Init();
	SPI_MasterInit();
}


int main(void)
{
	
	sei();
	initialisierungen();
	uart_puts("Angekommen");
	while(1)
	{
    SPI_MasterTransmit(255);
    SPI_MasterTransmit(255);
    SPI_MasterTransmit(255);
    PORTB |= (1<<DD_SS) | (1<<DD_RCK);  
	
	ADC_Read(0);
	luftdruck=ADCW;
	
	
	//i2c_start(DevHIH6130+I2C_READ);
	i2c_rep_start(DevHIH6130+I2C_READ);
	humidity1= i2c_readAck();
	humidity2= i2c_readAck();
	tempcorrect1=i2c_readAck();
	tempcorrect2=i2c_readNak();
	i2c_stop();
	
	_delay_us(10);
	
	}	
    //return(0);
}	




ISR (TIMER1_COMPA_vect)
{
	match++;
	if(match == 5)
	{
		match=1;
		sekunde++;
		sekunde_debug++;
		if(sekunde_debug == 1 )
		{
			PORTD |= (1<<PORTD5); 
			sekunde_debug=0;
			
	uart_puts("\r\n");
	uart_puts(itoa(luftdruck,luftdruckwert[10],10));
	uart_puts("\r\n");
			
	uart_puts("\r\n");
	uart_puts("humidity1:");
	uart_puts("\r\n");
	uart_puts(itoa(humidity1,humidity1wert[16],10));
	uart_puts("\r\n");
	
	uart_puts("\r\n");
	uart_puts("humidity2:");
	uart_puts("\r\n");
	uart_puts(itoa(humidity2,humidity2wert[16],10));
	uart_puts("\r\n");
	
	uart_puts("\r\n");
	uart_puts("tempcorrect1:");
	uart_puts("\r\n");
	uart_puts(itoa(tempcorrect1,tempcorrect1wert[16],10));
	uart_puts("\r\n");
	
	uart_puts("\r\n");
	uart_puts("tempcorrect2:");
	uart_puts("\r\n");
	uart_puts(itoa(tempcorrect2,tempcorrect2wert[16],10));
	uart_puts("\r\n");
	
	uart_puts("\r\n");
	uart_puts("Sekunde:");
	uart_puts("\r\n");
	uart_puts(itoa(sekunde,sekundewert[16],10));
	uart_puts("\r\n");
		}
		wdt_reset();
		return(0);
		
	}
}