// A simple web server that always just says "Hello World"

#include <avr/wdt.h>
#include "etherShield.h"
#include "ETHER_28J60.h"
#include <OneWire.h>
#include <DallasTemperature.h>
#include <EEPROM.h>
#include <Timer.h>

Timer t;
int addr = 0;                                                // zmienna adresow EEPROM
int outputPin4 = 3;                                          // dioda nr 4
int outputPin3 = 4;                                          // dioda nr 3
int outputPin1 = 6;                                          // dioda nr 2
int outputPin2 = 5;                                          // dioda nr 1
int pinSter = 5;                                             // poczatkowy pin sterowania diodami
int analogPin = 3;                                           // wejscie analogowe pomiaru napiecia
int wejscienap = 0;                                          // zmienne pomiaru wartosci napiecia
int vzasil;

static uint8_t mac[6] = {0x74,0x69,0x69,0x2D,0x30,0x31};     // Przypisanie adresu MAC
//static uint8_t ip[4] = {10,10,10,246};                     // Statyczny adres IP.
static uint8_t port = 82;                                    // Port serwera
ETHER_28J60 e;

// Data wire is plugged into pin 7 on the Arduino
#define ONE_WIRE_BUS 2
// Setup a oneWire instance to communicate with ANY OneWire devices
OneWire oneWire(ONE_WIRE_BUS);
// Set oneWire reference to Dallas Temperature sensor.
DallasTemperature sensors(&oneWire);

void setup()
{
  wdt_disable();
//  cli();                                                    // wylaczenie przerwan
 
  pinMode(8, OUTPUT);                                         // reset karty sieciowej
  digitalWrite(8, LOW);
  delay(200);
  digitalWrite(8, HIGH);
  pinMode(outputPin1, OUTPUT);                                // ustawienie wyjsciowego portu
  pinMode(outputPin2, OUTPUT);                                // ustawienie wyjsciowego portu
  pinMode(outputPin3, OUTPUT);                                // ustawienie wyjsciowego portu
  pinMode(outputPin4, OUTPUT);                                // ustawienie wyjsciowego portu
  sensors.begin();                                            // wystartowanie sensora temperatury
 
  static uint8_t ip[4] = {EEPROM.read(0),EEPROM.read(1),EEPROM.read(2),EEPROM.read(3)};        // przypisanie IP
  e.setup(mac, ip, port);                                     // wpisanie do karty sieciowej adresow
 
  Serial.begin(9600);
  wdt_enable(WDTO_4S);                                        // wystartowanie watchdog z czasem reakcji 4 sekundy
}

void loop()
{
  wdt_reset();                                                // zresstartowanie licznika watchdog
  char* params;                                               // zadeklarowanie zmiennej params jako znaki
 
//  EEPROM.write(addr, val);
//  addr = addr + 1;
//  if (addr == EEPROM.length()) {
//    addr = 0;
//  }
 
//  value = EEPROM.read(address);
 
  if (params = e.serviceRequest()) {                          // jesli przyszlo zapytanie z sieci
   
    String word1 = getValue(params, '=', 0);
    String word2 = getValue(params, '=', 1);
    String word3 = getValue(params, '=', 2);
    Serial.print(word1);
    Serial.print("=");
    Serial.print(word2);
    Serial.print("\n");
    if (word3 != "") {
     Serial.print("Wartosc : ");
     Serial.print(word3);
     Serial.print("\n");
    }
    Serial.print("\n");
     
    e.print("<br><br><br><br><center><H1>WWW Ster ITT</H1>");
    e.print("Napiecie : ");
    vzasil = analogRead(analogPin);
    float wejscienap = vzasil * 0.00413;
    int nap1 = wejscienap;
    int nap2 = (wejscienap - nap1) * 100;
    e.print(nap1);
    e.print(".");
    e.print(nap2);
   
    e.print("<br>Temperatura : ");
   
    sensors.requestTemperatures();                            // pobranie i wyswietlenie temteratury
    float temperatura = (sensors.getTempCByIndex(0));
    int temp1 = temperatura;
    int temp2 = (temperatura - temp1) * 100;
   
    e.print(temp1);
    e.print(".");
    e.print(temp2);
   
    e.print("<br>Ustawiony adres urzadzenia : ");
    e.print(EEPROM.read(0));
    e.print(".");
    e.print(EEPROM.read(1));
    e.print(".");
    e.print(EEPROM.read(2));
    e.print(".");
    e.print(EEPROM.read(3));
    e.print("<br>");
   
    if (word2 == "on") {                                      // GET off
      e.print("<br>");
      digitalWrite(outputPin1, HIGH);
      e.print("<A HREF='?cmd=off'>Wylacz</A>");
    }
    else if (word2 == "off") {                                // GET on
      e.print("<br>");
      digitalWrite(outputPin1, LOW);
      e.print("<A HREF='?cmd=on'>Wlacz</A>");
    }
    // wylaczenie urzadzenia
    if (word2 == "wyl") {                                     // GET wyl
      pinSter = 6;
      if (word3 == "1") { pinSter = 6; }
      if (word3 == "2") { pinSter = 5; }
      if (word3 == "3") { pinSter = 4; }
      if (word3 == "4") { pinSter = 3; }
      t.pulseImmediate(pinSter, 10 * 1000, HIGH);
    }
    // zmiana adresu ip
    if (word2 == "new_adr_ip") {                              // get nowy adres IP
     String addr0 = getValue(word3, '.', 0);
     String addr1 = getValue(word3, '.', 1);
     String addr2 = getValue(word3, '.', 2);
     String addr3 = getValue(word3, '.', 3);
     EEPROM.write(0, addr0.toInt());
     EEPROM.write(1, addr1.toInt());
     EEPROM.write(2, addr2.toInt());
     EEPROM.write(3, addr3.toInt());
     delay(100);
     e.print("<br><br>copyright CyberDuck</center>");
     e.respond();
     software_Reset();
    }
   
    e.print("<br><br>copyright CyberDuck</center>");
    e.respond();
  }
  t.update();
}

// funkcja dzielaca string na czesci odzielone jakims znakiem. odpowiednik php explode();
String getValue(String data, char separator, int index)
{
  int found = 0;
  int strIndex[] = {0, -1};
  int maxIndex = data.length()-1;

  for(int i=0; i<=maxIndex && found<=index; i++){
    if(data.charAt(i)==separator || i==maxIndex){
        found++;
        strIndex[0] = strIndex[1]+1;
        strIndex[1] = (i == maxIndex) ? i+1 : i;
    }
  }
  return found>index ? data.substring(strIndex[0], strIndex[1]) : "";
}

// funkcja restartujaca
void software_Reset()
// Restarts program from beginning but
// does not reset the peripherals and registers
{
  asm volatile ("  jmp 0");
}