// Flavien HAAS, 2018
// before transfert, check that you have changed the SS port as indicated on the README or you will not be able to use the LoRa shield as the same time as the Ethernet shield

#include <SPI.h>                                            // to communicate using spi (required for our shields)
#include <LoRa.h>                                           // to use the LoRa shield
#include "Ethernet.h"                                       // to use the ethernet shield

#define LENMAX 80                                           // maximum size for the LoRa frame
#define Serial SerialUSB                                    // serial out on the M0 use a different function

// void setSPIFrequency(uint32_t frequency);                // set the SPI at 8MHz to use logic analyser

byte mac[] = {0xDE, 0xAD, 0xBE, 0xEF, 0xFE, 0xED};          // set the mac address

//IPAddress ip(10, 0, 0, 49);                               // set the IP address for the ethernet shield, overwise the librairy use DHCP

EthernetServer server(80);                                  // initialize the EthernetServer library, using port 80 (default fot HTTP)

typedef struct {                                            // frame structure
  uint8_t ID = 0;                                           // station's ID
  uint8_t IDp = 0;                                          // gateway's ID
  uint16_t TS = 0;                                          // TimeStamp
  uint16_t DT = 0;                                          // Data Type
  uint16_t D1 = 0;                                          // DATA 1
  uint16_t D2 = 0;                                          // DATA 2
  uint16_t D3 = 0;                                          // DATA 3
} trame;                                                    // frame name

trame message;                                              // creation of the frame message

void setup(){
  Serial.begin(9600);
  while (!Serial);                                          // wait for serial to initialize
  Serial.print("Passerelle LoRa\n");                        // display on serial the name of the device

  if( !LoRa.begin(868E6) ){                                 // initialise LoRa and display a message if an error occur
    Serial.print("Echec de l'initialisation LoRa !\n");
    while(true);}

  //Ethernet.begin(mac, ip);                                // initialize Ethernet shield using the set mac adress and set IP
  Ethernet.begin(mac);                                      // initialize Ethernet shield uding the set mac and DHCP for the IP
  server.begin();                                           // initialize WebServer part of the librairy
  Serial.print("server is at ");                            // display on serial the IP you can find the webpage
  Serial.println(Ethernet.localIP());
}

//void SerialPrintElapsedTime( boolean espaceFinal=true ){  // to display the elapsed time
//  unsigned long h,m,s = millis()/1000;
//  m=s/60;
//  h=m/60;
//  s=s-(m*60);
//  m=m-(h*60);
//  Serial << ((h<10)?"0":"") << h << ":" << ((m<10)?"0":"") << m << ":" << ((s<10)?"0":"") << s << (espaceFinal?" ":"");
//}

void loop() {
// LoRa receiver
  int packetSize = LoRa.parsePacket();
  if (packetSize > 0)
  {
    SerialUSB.println("Nouveau paquet");
    message.ID = LoRa.read();
    message.IDp = LoRa.read();
    message.IDp = 0x07;
    message.TS = ((uint16_t)LoRa.read() | (LoRa.read() << 8));
    message.DT = ((uint16_t)LoRa.read() | LoRa.read() << 8);
    message.D1 = ((uint16_t)LoRa.read() | LoRa.read() << 8);
    message.D2 = ((uint16_t)LoRa.read() | LoRa.read() << 8);
    message.D3 = ((uint16_t)LoRa.read() | LoRa.read() << 8);
    SerialUSB.println(message.ID, HEX);
    SerialUSB.println(message.IDp, HEX);
    SerialUSB.println(message.TS, HEX);
    SerialUSB.println(message.DT, HEX);
    SerialUSB.println(message.D1, HEX);
    SerialUSB.println(message.D2, HEX);
    SerialUSB.println(message.D3, HEX);
    delay(100);
  }

//        SerialPrintElapsedTime();                           // diplay the time the frame arrived

// post to server
  String postdata="&ID="+message.ID+"&IDp="+message.IDp+"&TS="+message.TS+"&DT="+message.DT+"&D1="+message.D1+"&D2="+message.D2+"&D3="+message.D3;
  bool connected = client.connect(server, 80);
    if (connected){
      client.println("POST /formulaireCollecte.html HTTP/1.1");
      client.println("Host: btslimayrac.ovh");
      client.println("Cache-Control: no-cache");
      client.println("Content-Type: application/x-www-form-urlencoded");
      client.print("Content-Length: ");
      client.println(postData.length());
      client.println(postData);
      }

// WebServer
  EthernetClient client = server.available();               // WebServer :listen for incoming clients
  if (client) {
    Serial.println("new client");
    boolean currentLineIsBlank = true;                      // an http request ends with a blank line
    while (client.connected()) {
      if (client.available()) {
        char c = client.read();
        Serial.write(c);
        if (c == '\n' && currentLineIsBlank) {              // send the beginning of a standard http response header
          client.println("HTTP/1.1 200 OK");
          client.println("Content-Type: text/html");
          client.println("Connection: close");              // the connection will be closed after completion of the response
          client.println("Refresh: 5");                     // refresh the page automatically every 5 sec
          client.println();
          client.println("<!DOCTYPE HTML>");
          client.println("<html>");
          // output the value of each analog input pin
          for (int analogChannel = 0; analogChannel < 6; analogChannel++) {
            int sensorReading = analogRead(analogChannel);
            client.print("analog input ");
            client.print(analogChannel);
            client.print(" is ");
            client.print(sensorReading);
            client.println("<br />");
          }
          client.println("</html>");
          break;
        }
        if (c == '\n') {                                    // send a new blank line to indicate the end of the connection
          currentLineIsBlank = true;
        } else if (c != '\r') {
          currentLineIsBlank = false;
        }
      }
    }
    delay(1);                                               // give the web browser time to receive the data
    client.stop();                                          // close the connection of the webserver
  }
}