/*

 * io.c

 *

 * Created: 11/7/2012 7:17:52 PM

 *  Author: kripperger

 */ 

#include <avr/io.h>

#include "../config.h"

#include "inputOutput.h"

#include "led.h"

#include "sensors.h"

int8_t	moduleID;	// Slave Module ID from rotary dip switch (or EEPROM)

 void io_configure()

 {

	// Configure ports/pins

	DDRB |= (1 << DDB4);		// Set PB4 to Output for Heater (also allows SCK to operate)

	DDRC &= ~(1 << DDC2);		// Set PC2 to input for rotary dip    //TEMPORARY//

	DDRC &= ~(1 << DDC3);		// Set PC3 to input for rotary dip    //TEMPORARY//

	DDRC &= ~(1 << DDC4);		// Set PC4 to input for rotary dip    //TEMPORARY//

	DDRC &= ~(1 << DDC5);		// Set PC5 to input for rotary dip    //TEMPORARY//

	DDRA &= ~(1 << DDA7);		// Set PA7 to input for battery voltage divider

	ADCSRA |= (1 << ADPS2) | (1 << ADPS1) | (1 << ADPS0);	// Set prescaler for ADC, 128 gives ADC freq of 125 KHz

	ADMUX |= (1 << REFS0);									// Set ADC reference voltage to AVCC

	ADMUX |= (1 << ADLAR);									// Sets 10 bit ADC to 8 bit

	ADMUX |= (1 << MUX2) | (1 << MUX1) | (1 << MUX0);		// Select ADC7 as the conversion channel

	ADCSRA |= (1 << ADATE);									// Enables auto trigger, determined in ADCSRB bits ADTS

	//ADCSRA |= (1 << ADIF);									// 

//ADCSRA |= (1 << ADIE);									// ADC interrupt enable set

	ADCSRA |= (1 << ADEN);									// Enable ADC

	ADCSRA |= (1 << ADSC);									// Start ADC measurements.  ADC should now continuously run conversions, which are stored in ADCH 0x79

 }

 void io_readModuleId()

 {

	// Get ID from rotary dip and return it. 

	moduleID = 0;

	// This method is temporary as the next release will read the module ID from EEPROM

	PORTC |= (1 << PC2);	// Pull pins on rotary dip high

	PORTC |= (1 << PC3);	// Pull pins on rotary dip high

	PORTC |= (1 << PC4);	// Pull pins on rotary dip high

	PORTC |= (1 << PC5);	// Pull pins on rotary dip high

	moduleID = ((PINC & 0b00011100) >> 2);		// Read Dip Encoder

	moduleID = ~moduleID;						//Invert Dip reading

	moduleID = (moduleID & 0b0111);				//Mask bits

/*

	while(moduleID==0)

	{

		moduleID = i2c_read(EEPROM_ADDR, 0x04);

	}

*/

 }

 uint8_t io_getModuleId()

 {

	return moduleID;

 }

 void io_heaterOn()

 {		

	PORTB |= (1 << PB4);	//ON

 }

 void io_heaterOff()

 {

	PORTB &= ~(1 << PB4);	//OFF

 }

 uint8_t io_heaterStatus()

 {

	 uint8_t state;

	 state = 0;

	 state = ((PORTB & 0b00010000) >> 4);

	 return state;

 }

  void io_regulateTemp()

  {

	  // Gets board temperature and enables heater if below threshold

	  if (sensors_getBoardTemp() <= HEATER_THRESHOLD)

	  {

		  io_heaterOn();

		  led_on(1);

	  } 

	  else if (sensors_getBoardTemp() > (HEATER_THRESHOLD + 5))

	  {

		  io_heaterOff();

		  led_off(1);

	  }

  }

	ac2 = i2c_read(PRESSURE_ADDR, 0xAC);

	ac2 = ac2 << 8;

	ac2 = ac2 | i2c_read(PRESSURE_ADDR, 0xAD);

	ac3 = i2c_read(PRESSURE_ADDR, 0xAE);

	ac3 = ac3 << 8;

	ac3 = ac3 | i2c_read(PRESSURE_ADDR, 0xAF);

	ac4 = i2c_read(PRESSURE_ADDR, 0xB0);

	ac4 = ac4 << 8;

	ac4 = ac4 | i2c_read(PRESSURE_ADDR, 0xB1);

	ac5 = i2c_read(PRESSURE_ADDR, 0xB2);

	ac5 = ac5 << 8;

	ac5 = ac5 | i2c_read(PRESSURE_ADDR, 0xB3);

	ac6 = i2c_read(PRESSURE_ADDR, 0xB4);

	ac6 = ac6 << 8;

	ac6 = ac6 | i2c_read(PRESSURE_ADDR, 0xB5);

	b1 = i2c_read(PRESSURE_ADDR, 0xB6);

	b1 = b1 << 8;

	b1 = b1 | i2c_read(PRESSURE_ADDR, 0xB7);

	b2 = i2c_read(PRESSURE_ADDR, 0xB8);

	b2 = b2 << 8;

	b2 = b2 | i2c_read(PRESSURE_ADDR, 0xB9);

	mb = i2c_read(PRESSURE_ADDR, 0xBA);

	mb = mb << 8;

	mb = mb | i2c_read(PRESSURE_ADDR, 0xBB);

	mc = i2c_read(PRESSURE_ADDR, 0xBC);

	mc = mc << 8;

	mc = mc | i2c_read(PRESSURE_ADDR, 0xBD);

	md = i2c_read(PRESSURE_ADDR, 0xBE);

	md = md << 8;

	md = md | i2c_read(PRESSURE_ADDR, 0xBF);

}

void sensors_readSpiTemp()

{

	// Select TEMP wait 100 microseconds then read four bytes

	SELECT_TEMP;

	_delay_us(100);

	uint8_t one = send_spi(0xFF);

	_delay_us(100);

	uint8_t two = send_spi(0xFF);

	_delay_us(100);

	uint8_t three = send_spi(0xFF);

	_delay_us(100);

	uint8_t four = send_spi(0xFF);

	DESELECT_TEMP;

	int16_t temperature = ((one<<4)|(two>>4));	// Shift and place into larger int. (Cuts off Decimal)

	temperature = (temperature & (0x0800)) ? (temperature & 0xF000) : temperature;	// Sign extend

	//int16_t temperature = ((one<<6)|(two>>2));	// Shift and place into larger int. (Includes Decimal)

	//temperature = (temperature & (0x2000)) ? (temperature & 0xC000) : temperature;	// Sign extend

	temperature = (two & 0x01) ? 0x00DE : temperature;	// Error Condition. If error is detected output is set to 222 degrees (0x00DE)

	// Note: Temperature still needs to be scaled in order to be accurate (eg. boil water). Do this before implementing.

	spiTemp = temperature;

}

void sensors_readBoardTemp()

{

	boardTemp = i2c_read(BOARDTEMP_ADDR, 0x00);		// Read only the first byte of data (we don't need the resolution here)

	boardTemp = ((boardTemp*18)/10) + (32);			// Converting Celsius to Fahrenheit

	boardTemp = boardTemp - 3;						// Linear offset

}

void sensors_readPressure()

{

	i2c_write(PRESSURE_ADDR, 0xF4, 0x2E);				//write 0x2E (temp) into 0xF4 (control register), (write is 0xEE)

	_delay_us(4500);							//wait 4.5 ms

	ut = i2c_read(PRESSURE_ADDR, 0xF6);

	ut = ut << 8;

	ut = ut | i2c_read(PRESSURE_ADDR, 0xF7);	//ut = MSB<<8 + LSB

	i2c_write(PRESSURE_ADDR, 0xF4, 0x34);				//write 0x34 (pressure) into 0xF4 (control register), (write is 0xEE)

	_delay_us(4500);							//wait 4.5 ms

	up = i2c_read(PRESSURE_ADDR, 0xF6);

	up = up << 8;

	up = up | i2c_read(PRESSURE_ADDR, 0xF7);	//up = (MSB<<16 + LSB<<8 + XLSB(NOT USED)) >> (8-oss)

	//calculate true temperature

	x1 = ((ut - ac6) * ac5) >> 15;

	x2 = (mc << 11) / (x1 + md);

	b5 = x1 + x2;

	trueTemp = (b5 + 8) >> 4;

	//calculate b3

	b6 = b5 - 4000;

	x1 = (b2 * (b6 * b6) >> 12) >> 11;

	x2 = (ac2 * b6) >> 11;

	x3 = x1 + x2;

	b3 = ((ac1 * 4 + x3) + 2) / 4;

	//calculate b4

	x1 = (ac3 * b6) >> 16;

	x2 = (b1 * ((b6 * b6) >> 12)) >> 16;

	x3 = ((x1 + x2) + 2) >> 2;

	b4 = (ac4 * (x3 + 32768)) >> 15;

	b7 = (up - b3) * 50000;

	if (b7 < 0x80000000)

	{

		pressure = (b7 << 1) / b4;

	}

	else

	{

		pressure = (b7 / b4) << 1;

	}

	x1 = (pressure >> 8) * (pressure >> 8);

	x1 = (x1 * 3038) >> 16;

	x2 = (-7357 * pressure) >> 16;

	pressure += (x1 + x2 + 3791) >> 4;				//This is the final value for our pressure

	//altitude = 44330 * (1 - pow((pressure / 101325), (1 / 5.255)));

	altitude = (float)44330 * (1 - pow(((float) pressure/101325), 0.190295));

}

void sensors_readHumid()

{

	humid = i2c_read16(HUMID_ADDR);

	//calculations to relative humidity: humid = (humid/((2^14) - 1))*100%       >> is divide by power, << is multiply by power, 2^14-1 = 16383

	humid = (humid / 16383) * 100;

}

void sensors_readLux()

{

	// FOR FIRST BYTE:

	lightH = i2c_read(LIGHT_ADDR, 0x03);

	lightL = i2c_read(LIGHT_ADDR, 0x04);

	exponent = lightH;

	exponent = exponent >> 4;

	lightH = lightH << 4;

	mantissa = lightH | lightL;

	//mantissa = mantissa << 4;

	//mantissa = mantissa >> 4;

	//lux = (pow(2, exponent) * (float)(mantissa * 0.045));

	lux = (float)(pow(2,exponent) * mantissa) * 0.045;

	// FOR BOTH BYTES:

	// light = light << 4;

	// light = light | (0x0F & i2c_read(LIGHT_ADDR, 0x04));  //  This can be used to read in the 4 LSBs from the second register

	// exponent = 8xE3 + 4xE2 + 2xE1 + E0

	// mantissa = 128xM7 + 64xM6 + 32xM5 + 16xM4 + 8xM3 + 4xM2 + 2xM1 + M0

	// light = 2^(exponent)*mantissa*0.045

}

void sensors_readBatt()

{

	batt = ADCH;					// Read battery level from ADC

}

int16_t sensors_getSpiTemp(void)	// Gets spi temperature from variable

{

	return spiTemp;

}

int8_t sensors_getBoardTemp(void)	// Gets board temperature from variable

{

	return boardTemp;

}

int32_t sensors_getPressure(void)	// Gets pressure from variable

{

	return pressure;

}

uint16_t sensors_getHumid(void)			// Gets relative humidity from variable

{

	return humid;

}

uint32_t sensors_getLux(void)		// Gets light from variable

{

	return lux;

}

//possibly uint8_t

{

	return batt;

}

uint32_t sensors_getAltitude(void)

{

	return altitude;

}

/*

 * sensors.h

 *

 * Created: 11/19/2012 9:24:50 PM

 *  Author: kripperger

 */ 

#ifndef SENSORS_H_

#define SENSORS_H_

void sensors_setupPressure(void);	// Reads pressure calibration values

void sensors_readSpiTemp(void);		// Reads spi temperature

void sensors_readBoardTemp(void);	// Reads board temperature

void sensors_readPressure(void);	// Reads pressure

void sensors_readHumid(void);		// Reads humidity

void sensors_readBatt(void);

int16_t sensors_getSpiTemp(void);	// Gets spi temperature from variable

int8_t sensors_getBoardTemp(void);	// Gets board temperature from variable

int32_t sensors_getPressure(void);	// Gets pressure from variable

uint16_t sensors_getHumid(void);	// Gets humidity from variable

uint32_t sensors_getLux(void);		// Gets lux from variable

int8_t sensors_getBatt(void);		// Gets battery voltage from variable

#endif /* SENSORS_H_ */