#include <stdio.h>
#include <avr/interrupt.h>
#include <avr/io.h>
#include <util/delay.h>
#include "lcd-routines.h"
#include <stdlib.h>

#define high 1
#define low 0

volatile uint16_t dummy=0;

volatile uint16_t milli=0;
volatile uint8_t sec=0;
volatile uint8_t min=0;
volatile uint8_t hour=0;
volatile uint8_t day=0;


volatile uint8_t eventlog[4000];
volatile uint16_t eventcounter=0;

volatile uint8_t bounce0=0;
volatile uint8_t bounce1=0;
volatile uint8_t bounce2=0;
volatile uint8_t bounce3=0;
volatile uint8_t bounce4=0;
volatile uint8_t bounce5=0;
volatile uint8_t bounce6=0;
volatile uint8_t bounce7=0;


void input_init()
{
	DDRC &= ~((1<<DDC0) | (1<<DDC1) | (1<<DDC2) | (1<<DDC3) | (1<<DDC4) | (1<<DDC5) | (1<<DDC6) | (1<<DDC7));
	DDRA &= ~((1<<DDA0) | (1<<DDA1) | (1<<DDA2) | (1<<DDA3));
	PORTA |= (1<<PA0) | (1<<PA1) | (1<<PA2) | (1<<PA3);
}

void init_pcint()
{
	// The pin (PB0)
	PCMSK0 = (1<<PCINT0)| (1<<PCINT1) | (1<<PCINT2) | (1<<PCINT3);
	PCMSK2 = (1<<PCINT0)| (1<<PCINT1) | (1<<PCINT2) | (1<<PCINT3) | (1<<PCINT4)| (1<<PCINT5) | (1<<PCINT6) | (1<<PCINT7);
	// The port (PORTB)
	PCICR = (1<<PCIE0) | (1<<PCIE2) ;

	// Start it up.
	sei();
}


void timer_init()
{
	TCCR1B = (1<<WGM12) | (1<<CS11);
	TCNT1 = 0;
	OCR1A = 2499;
	TIMSK1 |= (1<<OCIE1A);
}

int main(void)
{

	input_init();
	timer_init();
	lcd_init();
	init_pcint();
	eventlog[0]=5;
	char test[200];
	uint16_t output[7];
	sei();
	while(1)
	{
		if(eventcounter>0)
		{
			output[0] = ( eventlog[(eventcounter*8)-6] << 8 ) | eventlog[(eventcounter*8)-7];
			output[1] = eventlog[(eventcounter*8)-5];
			output[2] = eventlog[(eventcounter*8)-4];
			output[3] = eventlog[(eventcounter*8)-3];
			output[4] = eventlog[(eventcounter*8)-2];
			output[5] = eventlog[(eventcounter*8)-1];
			itoa (output[0], test, 10);
			lcd_string( test);
			lcd_string( "/");		
			itoa (output[1], test, 10);
			lcd_string( test);
			lcd_string( "/");	
			_delay_ms(100);
			itoa (output[2], test, 10);
			lcd_string( test);
			lcd_string( "/");	
			itoa (output[3], test, 10);
			lcd_string( test);
			lcd_string( "/");	
			itoa (output[4], test, 10);
			lcd_string( test);
			lcd_string( "/");	
			itoa (output[5], test, 10);
			lcd_string( test);
			_delay_ms(100);
		}	
		lcd_setcursor( 0, 2 );
		_delay_ms(100);
		itoa (eventcounter/7, test, 10);
		lcd_string(test);
		_delay_ms(1000);
		lcd_clear();
	}
return 0;
}



ISR (TIMER1_COMPA_vect)
{
	milli++;
	if (milli == 1000)
	{
		sec++;
		milli=0;
		if(sec == 60 )
		{
			min++;
			sec = 0;
			if(min == 60 )
			{
				hour++;
				min = 0;
				if(hour == 24 )
				{
					day++;
					hour = 0;
				}
			}
		}
	}
}

ISR(PCINT0_vect)
{
	volatile static uint8_t pcint_temp;
	uint8_t difference;
	uint8_t reg;
	// Get the port byte.
	reg = PINA;
	
	// XOR saved reg with current reg to get difference.
	difference = reg ^ pcint_temp;

	// Save the new value of PORTB.
	pcint_temp = reg;
	
	if (difference % (1<<PA0))
	{
	}
	if (difference & (1<<PA1))
	{
	}
	if (difference & (1<<PA2))
	{
	}
	if (difference & (1<<PA3))
	{
	}
	
}

ISR(PCINT2_vect)
{
	dummy++;
	volatile uint8_t low_ms = (unsigned char) milli;
	volatile uint8_t high_ms = (unsigned char) (milli>>8);
	volatile static uint8_t pcint_temp;
	uint8_t difference;
	uint8_t reg;
	// Get the port byte.
	reg = PINC;
	
	// XOR saved reg with current reg to get difference.
	difference = reg ^ pcint_temp;

	// Save the new value of PORTC.
	pcint_temp = reg;
	
	if (difference % (1<<PC0))
	{
		eventlog[(eventcounter*8)] = 0;
		eventlog[(eventcounter*8)+1] = low_ms;
		eventlog[(eventcounter*8)+2] = high_ms;
		eventlog[(eventcounter*8)+3] = sec;
		eventlog[(eventcounter*8)+4] = min;
		eventlog[(eventcounter*8)+5] = hour;
		eventlog[(eventcounter*8)+6] = day;
		if ( PINC & (1<<PC0) )
			eventlog[(eventcounter*8)+7] = low;
		else
			eventlog[(eventcounter*8)+7] = high;
		eventcounter++;
	}
	if (difference & (1<<PC1))
	{
		eventlog[(eventcounter*8)] = 1;
		eventlog[(eventcounter*8)+1] = low_ms;
		eventlog[(eventcounter*8)+2] = high_ms;
		eventlog[(eventcounter*8)+3] = sec;
		eventlog[(eventcounter*8)+4] = min;
		eventlog[(eventcounter*8)+5] = hour;
		eventlog[(eventcounter*8)+6] = day;
		if ( PINC & (1<<PC1) )
		eventlog[(eventcounter*8)+7] = low;
		else
		eventlog[(eventcounter*8)+7] = high;
		eventcounter++;
	}
	if (difference & (1<<PC2))
	{
		eventlog[(eventcounter*8)] = 2;
		eventlog[(eventcounter*8)+1] = low_ms;
		eventlog[(eventcounter*8)+2] = high_ms;
		eventlog[(eventcounter*8)+3] = sec;
		eventlog[(eventcounter*8)+4] = min;
		eventlog[(eventcounter*8)+5] = hour;
		eventlog[(eventcounter*8)+6] = day;
		if ( PINC & (1<<PC2) )
		eventlog[(eventcounter*8)+7] = low;
		else
		eventlog[(eventcounter*8)+7] = high;
		eventcounter++;
	}
	if (difference & (1<<PC3))
	{
		eventlog[(eventcounter*8)] = 3;
		eventlog[(eventcounter*8)+1] = low_ms;
		eventlog[(eventcounter*8)+2] = high_ms;
		eventlog[(eventcounter*8)+3] = sec;
		eventlog[(eventcounter*8)+4] = min;
		eventlog[(eventcounter*8)+5] = hour;
		eventlog[(eventcounter*8)+6] = day;
		if ( PINC & (1<<PC3) )
		eventlog[(eventcounter*8)+7] = low;
		else
		eventlog[(eventcounter*8)+7] = high;
		eventcounter++;
	}
	if (difference % (1<<PC4))
	{
		eventlog[(eventcounter*8)] = 4;
		eventlog[(eventcounter*8)+1] = low_ms;
		eventlog[(eventcounter*8)+2] = high_ms;
		eventlog[(eventcounter*8)+3] = sec;
		eventlog[(eventcounter*8)+4] = min;
		eventlog[(eventcounter*8)+5] = hour;
		eventlog[(eventcounter*8)+6] = day;
		if ( PINC & (1<<PC4) )
		eventlog[(eventcounter*8)+7] = low;
		else
		eventlog[(eventcounter*8)+7] = high;
		eventcounter++;
	}
	if (difference & (1<<PC5))
	{
		eventlog[(eventcounter*8)] = 5;
		eventlog[(eventcounter*8)+1] = low_ms;
		eventlog[(eventcounter*8)+2] = high_ms;
		eventlog[(eventcounter*8)+3] = sec;
		eventlog[(eventcounter*8)+4] = min;
		eventlog[(eventcounter*8)+5] = hour;
		eventlog[(eventcounter*8)+6] = day;
		if ( PINC & (1<<PC5) )
		eventlog[(eventcounter*8)+7] = low;
		else
		eventlog[(eventcounter*8)+7] = high;
		eventcounter++;
	}
	if (difference & (1<<PC6))
	{
		eventlog[(eventcounter*8)] = 6;
		eventlog[(eventcounter*8)+1] = low_ms;
		eventlog[(eventcounter*8)+2] = high_ms;
		eventlog[(eventcounter*8)+3] = sec;
		eventlog[(eventcounter*8)+4] = min;
		eventlog[(eventcounter*8)+5] = hour;
		eventlog[(eventcounter*8)+6] = day;
		if ( PINC & (1<<PC6) )
		eventlog[(eventcounter*8)+7] = low;
		else
		eventlog[(eventcounter*8)+7] = high;
		eventcounter++;
	}
	if (difference & (1<<PC7))
	{
		eventlog[(eventcounter*8)] = 7;
		eventlog[(eventcounter*8)+1] = low_ms;
		eventlog[(eventcounter*8)+2] = high_ms;
		eventlog[(eventcounter*8)+3] = sec;
		eventlog[(eventcounter*8)+4] = min;
		eventlog[(eventcounter*8)+5] = hour;
		eventlog[(eventcounter*8)+6] = day;
		if ( PINC & (1<<PC7) )
		eventlog[(eventcounter*8)+7] = low;
		else
		eventlog[(eventcounter*8)+7] = high;
		eventcounter++;
	}
}