quick-hack rudimentary ability to control color and brightness with

[moodlight.git] / main.c

/* $Id: main.c,v 1.4 2010/06/30 19:39:28 simimeie Exp $
 * Main file for the HaWo moodlight.
 * This is the main file that glues it all together. It also contains all
 * functionality that is too small to require an extra file.
 * (C) Michael "Fox" Meier 2010
 */

#include <avr/io.h>
#include <avr/interrupt.h>
#include <avr/wdt.h>
#include <avr/eeprom.h>
#include <avr/power.h>
#include <avr/sleep.h>
#include <stdio.h>
#include <string.h>
#include <util/delay.h>

#include "console.h"
#include "ledpwm.h"
#include "ircontrol.h"
#include "timers.h"
/* #include "eepromdata.h" */

uint8_t mcusr_mirror __attribute__ ((section (".noinit")));

/* This is needed to recover from a watchdog reset, as the watchdog
 * stays active after the reset.
 * The variable is just to make the reason of the last reset accessible
 * later. */
void get_mcusr(void) __attribute__((naked)) __attribute__((section(".init3")));
void get_mcusr(void) {
  mcusr_mirror = MCUSR;
  MCUSR = 0;
  wdt_disable();
}

#define IRSTATE_RED       1
#define IRSTATE_GREEN     2
#define IRSTATE_BLUE      3
#define IRSTATE_WHITE     4

int main(void)
{
  uint8_t irstate = 0;
  
  /* Load settings from EEPROM */
#if 0
  something = eeprom_read_byte(&ee_something);
#endif /* LEDMODULE */

  /* Initialize stuff */
  console_init();
  timers_init();
  ledpwm_init();
  ircontrol_init();
  
  wdt_enable(WDTO_2S);

  /* Prepare sleep mode */
  //set_sleep_mode(SLEEP_MODE_IDLE);
  //sleep_enable();

  /* All set up, enable interrupts and go. */
  sei();
  
  if (mcusr_mirror & _BV(WDRF)) {
    console_printpgm_P(PSTR("NOTE: last reset was from Watchdog Timer."));
  }
  if (mcusr_mirror & _BV(BORF)) {
    console_printpgm_P(PSTR("NOTE: last reset was from Brownout."));
  }
  
  while (1) { /* We should never exit */
    wdt_reset();
    uint8_t k = ircontrol_getlastcommand();
    if (k != 0xff) {
      switch (k) {
      case 0x00: /* "Up" */
                 if (irstate == IRSTATE_RED) {
                   if (ledpwm_re < 0xff) { ledpwm_re++; }
                 } else if (irstate == IRSTATE_GREEN) {
                   if (ledpwm_gr < 0xff) { ledpwm_gr++; }
                 } else if (irstate == IRSTATE_BLUE) {
                   if (ledpwm_bl < 0xff) { ledpwm_bl++; }
                 } else {
                   if (ledpwm_bri < 0xff) { ledpwm_bri++; }
                 }
                 break;
      case 0x01: /* "Down" */
                 if (irstate == IRSTATE_RED) {
                   if (ledpwm_re > 0) { ledpwm_re--; }
                 } else if (irstate == IRSTATE_GREEN) {
                   if (ledpwm_gr > 0) { ledpwm_gr--; }
                 } else if (irstate == IRSTATE_BLUE) {
                   if (ledpwm_bl > 0) { ledpwm_bl--; }
                 } else {
                   if (ledpwm_bri > 0) { ledpwm_bri--; }
                 }
                 break;
      case 0x04: /* Red */
                 if (irstate == IRSTATE_RED) {
                   ledpwm_re = 0xff; ledpwm_gr = 0; ledpwm_bl = 0;
                   irstate = 0;
                 } else {
                   irstate = IRSTATE_RED;
                 }
                 break;
      case 0x05: /* Green */
                 if (irstate == IRSTATE_GREEN) {
                   ledpwm_re = 0; ledpwm_gr = 0xff; ledpwm_bl = 0;
                   irstate = 0;
                 } else {
                   irstate = IRSTATE_GREEN;
                 }
                 break;
      case 0x06: /* Blue */
                 if (irstate == IRSTATE_BLUE) {
                   ledpwm_re = 0; ledpwm_gr = 0; ledpwm_bl = 0xff;
                   irstate = 0;
                 } else {
                   irstate = IRSTATE_BLUE;
                 }
                 break;
      case 0x07: /* White */
                 if (irstate == IRSTATE_WHITE) {
                   ledpwm_re = 0xff; ledpwm_gr = 0xff; ledpwm_bl = 0xff;
                   irstate = 0;
                 } else {
                   irstate = IRSTATE_WHITE;
                 }
                 break;
      case 0x08: /* Dark orange */
                 ledpwm_re = 0xff; ledpwm_gr = 0x40; ledpwm_bl = 0x00;
                 irstate = 0;
                 break;
      case 0x0c: /* orange */
                 ledpwm_re = 0xff; ledpwm_gr = 0x80; ledpwm_bl = 0x00;
                 irstate = 0;
                 break;
      case 0x10: /* bright orange */
                 ledpwm_re = 0xff; ledpwm_gr = 0xc0; ledpwm_bl = 0x00;
                 irstate = 0;
                 break;
      case 0x14: /* yellow */
                 ledpwm_re = 0xff; ledpwm_gr = 0xff; ledpwm_bl = 0x00;
                 irstate = 0;
                 break;
      };
      ledpwm_setled(LEDPWM_REDLED,   (((uint16_t)ledpwm_re * ledpwm_bri) / 255));
      ledpwm_setled(LEDPWM_GREENLED, (((uint16_t)ledpwm_gr * ledpwm_bri) / 255));
      ledpwm_setled(LEDPWM_BLUELED,  (((uint16_t)ledpwm_bl * ledpwm_bri) / 255));
    }
    /* i++;
    console_printhex8(i);
    ledpwm_setled(LEDPWM_REDLED, i);
    ledpwm_setled(LEDPWM_GREENLED, i+128);
    ledpwm_setled(LEDPWM_BLUELED, 255-i);
    _delay_ms(500); */
  }
}