eggs.c

#include "eggs.h"

#define LED_0 BIT0 
#define LED_1 BIT6
#define LED_OUT P1OUT
#define LED_DIR P1DIR

#define RELAY BIT4
#define RELAY_OUT P1OUT
#define RELAY_DIR P1DIR

#ifdef VLOCLK12Khz
	/* 
 	 * 12 Khz / 3 Khz to get even numbers
 	 *
 	 * */
#define	TONE 12000/3/1000
#define	DUTY 12000/3/2/1000
#endif

#ifdef VLOCLK32Khz
	/*
	 * 32 Khz / 4 Khz best for buzzer
 	 *
 	 * */
#define	TONE 32768/4/1000
#define	DUTY 32768/4/2/1000
#endif

#ifndef VLOCLK12Khz 
#ifndef VLOCLK32Khz
	// 8 Mhz / 4 Khz
#define	TONE (int)(8000000L/4L/1000L)
#define	DUTY (int)(8000000L/4L/2L/1000L)
#endif
#endif

char buf[10];

/* strlen: return length of s */
int strlen(char s[])
{
	int i = 0;
	while (s[i] != '\0')
		++i;
	return i;
}

/* reverse:  reverse string s in place */
void reverse(char s[])
{
	int i, j;
	char c;

	for (i = 0, j = strlen(s)-1; i<j; i++, j--) {
		c = s[i];
		s[i] = s[j];
		s[j] = c;
	}
}

/* itoa:  convert n to characters in s */
void itoa(int n, char s[])
{
	int i, sign;

	if ((sign = n) < 0)  /* record sign */
		n = -n;		  /* make n positive */
	i = 0;
	do {	   /* generate digits in reverse order */
		s[i++] = n % 10 + '0';   /* get next digit */
	} while ((n /= 10) > 0);	 /* delete it */
	if (sign < 0)
		s[i++] = '-';
	s[i] = '\0';
	reverse(s);
}

volatile unsigned int events; // 16 events
volatile unsigned long event_counter;

#define EVENT_CHECKTEMP 0x0001
#define EVENT_RECORDTEMP 0x0002
#define EVENT_BLINKLED 0x0004
#define EVENT_EXT_CHECKTEMP 0x0008
#define EVENT_EXT_RECORDTEMP 0x0010

void inline time_event()
{
/**
 * Let us kick off the event counter before we detect the events,
 * This allows us to avoid running events in a brownout conidition.
 * */
	event_counter ++;

	if ((event_counter % 200L) == 0) // Every 2 seconds
	{
		events |= EVENT_CHECKTEMP | EVENT_EXT_CHECKTEMP | EVENT_BLINKLED;

		if ((event_counter % 90000L) == 0) // Every 15 minutes (15 * 60 * 100 = 900 * 100 = 90,000
		{
			events |= EVENT_RECORDTEMP | EVENT_EXT_RECORDTEMP;
			event_counter = 0;// Reset Event counter
		}
	}
}

/**************************
 *
 * Memory for history is stored at 0xc000 + 12288 bytes
 * Each block is divided into 512 byte segments
 * 0xe000 - 0xe1ff
 * 0xe200 - 0xe3ff
 * 0xe400 - 0xe5ff
 * 0xe600 - 0xe7ff
 * ...
 *
 * Temp will be store as an int with a value less then 0xffff giving us
 * 1024 data points, or about 10 days of data points. (Data point every 15 minutes)
 *
 * Max ints is 6144
 * Int cannot == 0xffff, so we make it 0xfffe
 * Ints per segment = 256
 * */
#define INFOE ((int *)(0xc000))
#define INTS_PER_SEGMENT 256
#define INTS_TOTAL 6144

volatile int next_memory;

void save_temp(int temp)
{
	int after_next_memory = 0;
	if (temp == 0xffff)
	{
		temp = 0xfffe;
	}
	
	flash_write_int(INFOE + next_memory, temp);

	next_memory ++;

	if (next_memory >= INTS_TOTAL)
		next_memory = 0;

	after_next_memory = next_memory + 1;
	if (after_next_memory >= INTS_TOTAL)
		after_next_memory = 0;

	if (*(INFOE + after_next_memory) != 0xffff)
	{
		flash_erase(INFOE + after_next_memory);
	}
}

void main(void)
{
	WDTCTL = WDTPW + WDTHOLD; // Stop watchdog timer

	// Setup the Clocks
	//Set MCLK to 1Mhz
	BCSCTL1 = CALBC1_8MHZ; // Set range
	DCOCTL = CALDCO_8MHZ;  // Set DCO step and modulation
#ifdef VLOCLK12Khz
	//Set ACLK to Internal Very Low Power Low Frequency Oscillator ~12Khz
	BCSCTL3 |= LFXT1S_2;
#endif
#ifdef VLOCLK32Khz
	BCSCTL3 = XCAP_1;
#endif 
	// Setup the LEDS
	LED_DIR |= (LED_0 | LED_1); // Set P1.0 and P1.6
	LED_OUT &= ~(LED_0 | LED_1); // Set the LEDs off

	// Setup Relay
	RELAY_DIR |= RELAY; // Set P1.0 and P1.6
	RELAY_OUT &= ~(RELAY); // Set the LEDs off

	TA0CCTL0 = CCIE;

	// Setup Events
	
	events = 0;
	event_counter = 0;

	// Setup memory
	{
		int i;

		for (i = 0; i < INTS_TOTAL; i ++)
		{
			if (*(INFOE + i) == 0xffff)
				break;
		}
		if (i > INTS_TOTAL)
		{
			i = 0;
			flash_erase(INFOE);
		}
		next_memory = i;
	}

	// Setup Timer

	setup_time();

	__enable_interrupt();

	// Setup Buzzer on P2.0
	P2DIR |= BIT1;
	P2SEL |= BIT1;

	TA1CCTL1 = OUTMOD_7;
	TA1CCR0 = 0;
	TA1CCR1 = DUTY;
#ifdef VLOCLK32Khz
	TA1CTL = TASSEL_1 + MC_1;
#endif
#ifdef VLOCLK12Khz
	TA1CTL = TASSEL_1 + MC_1;
#endif
#ifndef VLOCLK12Khz 
#ifndef VLOCLK32Khz
	TA1CTL = TASSEL_2 + MC_1;
#endif
#endif

	while (1) // Event loop
	{
		if (events != 0)
		{
			if ((events & EVENT_RECORDTEMP) != 0)
			{
				int tmp = 0;
				save_temp(tmp);// Store a 0 before ext temp

				tmp = (int)(((long)get_temp_f(3)
					+ (long)get_temp_f(3)
					+ (long)get_temp_f(3)
					+ (long)get_temp_f(3)) / 4L);
				save_temp(tmp);

				events &= ~EVENT_RECORDTEMP;
			}
			if ((events & EVENT_EXT_RECORDTEMP) != 0)
			{
				int tmp = 1;
				save_temp(tmp);// Store a 1 before ext temp

				// Be careful not to take to long to store the temperature, if we do so, we can accidently leave the relay on for too long.
				tmp = (int)(long)get_ext_temp_f(0);
				save_temp(tmp);

				events &= ~EVENT_EXT_RECORDTEMP;
			}
			if ((events & EVENT_BLINKLED) != 0)
			{
				LED_OUT |= (LED_1);
				sleep(5);
				LED_OUT &= ~(LED_1);
				events &= ~EVENT_BLINKLED;
			}
			if ((events & EVENT_CHECKTEMP) != 0)
			{
/*				int tmp = 0;
				tmp = get_temp_f(3);

				// If temp is above 101.50 or below 96.00 F
				if (tmp >= 10250)// || tmp <= 9600) // include two decimal places
				{
					TA1CCR0 = TONE;
					sleep(50);

					TA1CCR0 = 0;

					itoa(tmp, buf);
					morse_send_string(buf);
				}*/
				events &= ~EVENT_CHECKTEMP;
			}
			if ((events & EVENT_EXT_CHECKTEMP) != 0)
			{
				int tmp = 0;
				tmp = get_ext_temp_f(0);

				// tmp returns 0 C on read error
				if (tmp <= 9850 && tmp > 3300)
				{
					RELAY_OUT |= RELAY; // Turn on RELAY to increase temperature
				}
				if (tmp >= 9900)
				{
					RELAY_OUT &= ~(RELAY); // Turn off RELAY to decrease temperature
				}

				// If temp is above 101.50 or below 96.00 F
				if (tmp >= 10250)// || tmp <= 9600) // include two decimal places
				{
					TA1CCR0 = TONE;
					sleep(50);

					TA1CCR0 = 0;

					itoa(tmp, buf);
					morse_send_string(buf);
				}
				events &= ~EVENT_EXT_CHECKTEMP;
			}

		}
		if (events == 0)
		{
			sleep(100); // Sleep 1 second
		}
	}

}