#include <DS1307.h>
#include "Thread.h"
#include "ThreadController.h"
ThreadController cpu;

#define BUFFER_SIZuE 20

int memoria[20]    = { 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20};
int dia_semana[8] = {0,0,0,0,0,0,0,0};
int intervalo[8]  = {0,0,0,0,0,0,0,0};

int recebe;
int valor;
int resposta;
int PIN_ALARME = 9;
int regra;

boolean acionado = false;
boolean primeiraVez = true;

int configuracao = 0;
// mega
//DS1307  rtc(20, 21);

// acionamento
int ultimoAcionamento = 0;
int intervalorTempo = 0;

// uno
DS1307  rtc(A4, A5);

Time t;

Thread acionamento;
void verificaAcionamento() {

  t = rtc.getTime();
  int resposta = (int) rtc.peek(memoria[t.dow - 1]);

  if (resposta == 49) {
    Serial.println("Hoje aciona!");
    regra = rtc.peek(memoria[7]);
    /*
      REGRA
      48    0
      49    1
      50    2
      51    3
      52    4
      53    5
      54    6
      55    7
      56    8
      57    9

    */
    if(ultimoAcionamento ==0) {
      primeiraVez = true;
    }

    intervalorTempo = (int)(((t.hour*100) + t.min) - ultimoAcionamento);

    // 15mim
    if((intervalorTempo == 15 && regra == 48 && intervalorTempo > 2) || (primeiraVez && regra == 48)) {
      Serial.println("PASSOU 15 MIM");
      acionado = true;
      primeiraVez = false;
    }

    // 20min
    if((intervalorTempo == 20 && regra == 49 && intervalorTempo > 2) || (primeiraVez && regra == 49)) {
      Serial.println("PASSOU 20 MIM");
      acionado = true;
      primeiraVez = false;
    }


    // 25min
    if((intervalorTempo == 25 && regra == 50 && intervalorTempo > 2 ) || (primeiraVez && regra == 50)) {
      Serial.println("PASSOU 25 MIM");
      acionado = true;
      primeiraVez = false;
    }

    // 30min
    if((intervalorTempo == 30 && regra == 51 && intervalorTempo > 2) || (primeiraVez && regra == 51)) {
      Serial.println("PASSOU 30 MIM");
      acionado = true;
      primeiraVez = false;
    }

    // 35min
    if((intervalorTempo == 35 && regra == 52 && intervalorTempo > 2) || (primeiraVez && regra == 52)) {
      Serial.println("PASSOU 35 MIM");
      acionado = true;
      primeiraVez = false;
    }

    // 40min
    if((intervalorTempo == 40 && regra == 53 && intervalorTempo > 2 ) || (primeiraVez && regra == 53)) {
      Serial.println("PASSOU 40 MIM");
      acionado = true;
      primeiraVez = false;
    }

    // 45min
    if((intervalorTempo == 45 && regra == 54 && intervalorTempo > 2) || (primeiraVez && regra == 54)) {
      Serial.println("PASSOU 45 MIM");
      acionado = true;
      primeiraVez = false;
    }

    // 50min
    if((intervalorTempo == 50 && regra == 55 && intervalorTempo > 2) || (primeiraVez && regra == 55)) {
      Serial.println("PASSOU 50 MIM");
      acionado = true;
      primeiraVez = false;
    }

    // 55min
    if((intervalorTempo == 55 && regra == 56 && intervalorTempo > 2) || (primeiraVez && regra == 56)) {
      Serial.println("PASSOU 55 MIM");
      acionado = true;
      primeiraVez = false;
    }

    // 60min
    if((intervalorTempo == 60 && regra == 57 && intervalorTempo > 2) || (primeiraVez && regra == 57)) {
      Serial.println("PASSOU 60 MIM");
      acionado = true;
      primeiraVez = false;
    }




    if(acionado) {
      ultimoAcionamento = (t.hour*100) + t.min;
      acionaAlarme();
      primeiraVez = false;
      acionado = false;
    }


    Serial.println();
    Serial.print("Passou min: ");
    Serial.print(intervalorTempo, DEC);
    Serial.println();

    Serial.println();
    Serial.print("REGRA: ");
    Serial.print(regra, DEC);
    Serial.println();




  }
  else {
    Serial.println("Hoje NAO aciona!");
  }


}

Thread thread1;
void mostraDataHora(){
  //thread1.enabled = false;
  t = rtc.getTime();

  // Send date over serial connection
  Serial.print("Dia ");
  Serial.print(t.date);
  Serial.print(". Mes ");
  Serial.print(rtc.getMonthStr());
  Serial.print(" ano ");
  Serial.print(t.year);
  //Serial.println(".");

  // Send Day-of-Week and time
  Serial.print(" dia ");
  Serial.print(t.dow);
  Serial.print(". ");
  Serial.print(t.hour);
  Serial.print(" : ");
  Serial.print(t.min);
  Serial.write(" : ");
  Serial.print(t.sec);
  Serial.print("");
}




Thread Memoria;
void StatusDaMemoria(){

 t = rtc.getTime();


  Serial.print("{ \"dias\":[");
  for (int a = 0; a < 9; a++) {
    int teste = rtc.peek(memoria[a]);

    Serial.print("{ \"dia\":\"");
    Serial.print(a,DEC);
    Serial.print("\",\"valor\":\"");
    Serial.print(teste,DEC);
    if(a != 8) {
      Serial.print("\"},");
    }
    else {
      Serial.print("\"}");
    }
    delay(1);
  }
  //Serial.print("]}");

  Serial.print("], \"intervalo\":\"");
  Serial.print(rtc.peek(memoria[7]),DEC);
  Serial.print("\",\"dia\":\"");
  Serial.print(t.date);
  Serial.print("\",\"mes\":\"");
  Serial.print(rtc.getMonthStr());
  Serial.print("\",\"ano\":\"");
  Serial.print(t.year);
  Serial.print("\",\"hora\":\"");
  Serial.print(t.hour);
  Serial.print("\",\"minuto\":\"");
  Serial.print(t.min);
  Serial.print("\",\"segundo\":\"");
  Serial.print(t.sec);
  Serial.print("\"}");

  Serial.println();

}

void setup(){
  Serial.begin(9600);
  pinMode(PIN_ALARME, OUTPUT);
  digitalWrite(PIN_ALARME, LOW);

  //thread1.setInterval(5000);
  //thread1.onRun(mostraDataHora);



  acionamento.setInterval(2000);
  acionamento.onRun(verificaAcionamento);

  Memoria.setInterval(2000);
  Memoria.onRun(StatusDaMemoria);


  //cpu.add(&thread1);
  //cpu.add(&threadMemoria);
  cpu.add(&acionamento);
  cpu.add(&Memoria);






  rtc.halt(false);


    t = rtc.getTime();

    rtc.setDOW(4);        // Set Day-of-Week to SUNDAY
    rtc.setTime(15, 18, 0);     // Set the time to 12:00:00 (24hr format)
    rtc.setDate(7, 8, 2015);   // Set the date to October 3th, 201

}

int buf[BUFFER_SIZE];
unsigned int len = 0;


void loop()
{
  cpu.run();

  //Serial.write( msg, 7 );

  //Serial.write('rogerio');


  while (Serial.available()) {
    unsigned int c = Serial.read();
    if (c == 0xA || c == 0xD) { // \n or \r
      sendData();
    }
    else {
      bufferData(c);
    }
  }
}




void bufferData(int c) {
  if (len < 21) {
    buf[len++] = (int) c;
    //rtc.poke(memoria[c], buf[c]);
  } // TODO warn, or send data
}

void sendData() {
  //Serial.write("Us: ");

   for (int i = 0; i < len; i++) {
    Serial.write(buf[i]);
    rtc.poke(memoria[i], buf[i]);
   }

  /*for (int i = 0; i < len; i++) {
      rtc.poke(memoria[i], buf[i]);
  }*/

  Serial.write(0xA); // TODO test on windows
  len = 0;
}


void acionaAlarme() {
    Serial.println("ligou,desliga");
    digitalWrite(PIN_ALARME, HIGH);
    delay(300);
    digitalWrite(PIN_ALARME, LOW);
}