/*----------------------------------------------------------------------------
 Copyright:      Radig Ulrich  mailto: mail@ulrichradig.de
 Author:         Radig Ulrich
 Remarks:
 known Problems: none
 Version:        24.10.2007
 Description:    Timer Routinen
----------------------------------------------------------------------------*/

#include "timer.h"

//----------------------------------------------------------------------------
//Diese Routine startet und inizialisiert den Timer
void timer_init (void)
{
	#if EXTCLOCK==1
		#if defined (__AVR_ATmega644__)
			TIMSK2 = 0x00;
			ASSR |= (1<<AS2);
			TCNT2 = 0x00;
			TCCR2B = 0x05;
			while(ASSR & 0x11);
			TIMSK2 |= (1<<OCIE2A);
		#else
			TIMSK = 0x00;
			ASSR  = (_BV(AS2));			//Asynchroner Modus ein, Oszillator an TOSC1 und TOSC2 aktiv
			TCCR2 = (_BV(WGM21));			//CTC-Modus an (Clear Timer on Compare Match)
			OCR2  = 31;						//dieser Wert ergibt eine Sekunde Periodendauer
			TCNT2 = 0;
			SFIE  = (_BV(PSR2));			//lösche Prescaler 2
			TCCR2 |= (_BV(CS22) | _BV(CS21) | _BV(CS20)); //Starte Timer 2 mit Prescaler gleich 1/1024
			while(ASSR & 0x07);
			TIMSK = (_BV(OCIE2));			//Capture/Compare-Interrupt aktiv
		#endif
	#else
			TIMSK = 0x00;
			TCCR1B |= (1<<WGM12) | (1<<CS10 | 0<<CS11 | 1<<CS12);
			TCNT1 = 0;
			OCR1A = (SYSCLK / 1024) - 1;
			TIMSK |= (1 << OCIE1A);
	#endif
return;
};

//----------------------------------------------------------------------------
//Timer Interrupt
#if EXTCLOCK==1
	#if defined (__AVR_ATmega644__)
		ISR (TIMER2_COMPA_vect){
	#else
		ISR (TIMER2_COMP_vect){
	#endif
#else
	ISR (TIMER1_COMPA_vect){
#endif

	for (unsigned char a = 0;a<MAX_ARP_ENTRY;a++)
	{
		if (arp_entry[a].arp_t_time == 0)
		{
			for (unsigned char b = 0;b<6;b++)
			{
				arp_entry[a].arp_t_mac[b]= 0;
			}
			arp_entry[a].arp_t_ip = 0;
		}
		else
		{
			arp_entry[a].arp_t_time--;
		}
	}

	for (unsigned char index = 0;index<MAX_TCP_ENTRY;index++)
	{
		if (tcp_entry[index].time == 0)
		{
			if (tcp_entry[index].ip != 0)
			{
				tcp_entry[index].time = TCP_MAX_ENTRY_TIME;
				if ((tcp_entry[index].error_count++) > MAX_TCP_ERRORCOUNT)
				{
					DEBUG("Eintrag wird entfernt MAX_ERROR STACK:%i\r\n",index);
					ETH_INT_DISABLE;
					tcp_entry[index].status =  RST_FLAG | ACK_FLAG;
					create_new_tcp_packet(0,index);
					ETH_INT_ENABLE;
					tcp_index_del(index);
				}
				else
				{
					DEBUG("Packet wird erneut gesendet STACK:%i\r\n",index);
					find_and_start (index);
				}
			}
		}
		else
		{
			if (tcp_entry[index].time != TCP_TIME_OFF)
			{
				tcp_entry[index].time--;
			}
		}
	}
}