/*
  CC3000 demo program
  This demo shows how to use Sweet Pea WiFi enabled boards to connect to a 
  TCP server and to retreive data.
  
  The example code works for both the Sweet Pea WiFi Shield as well as the
  Sweet Pea LeFi board.
*/

#include <sp3000.h>
#include <SPI.h>
#if !defined(__AVR_ATmega32U4__)
#include <Wire.h>
#endif

#if defined(__AVR_ATmega32U4__)  // Pins on LeoFi are fixed
  #define CC3000_MODE      0
  #define CC3000_CS_PIN    6
  #define CC3000_EN_PIN    5
  #define CC3000_IRQ_PIN   2
  #define CC3000_IRQ_LEVEL 1
  #define lSer             Serial
#else
  // The following pin definitions match the default configuration of the 
  // Sweet Pea WiFi shield.
  // Change these pin definitions to match your own configuration.
  #define CC3000_MODE      0
  #define CC3000_CS_PIN    10
  #define CC3000_EN_PIN    7
  #define CC3000_IRQ_PIN   3
  #define CC3000_IRQ_LEVEL 1
  // I normally use a USB to serial cable connected to Serial1 on a Sweet Pea Mega
  // board. You can change it to anything you want.
  #define lSer             Serial
  #define SD_CARD_CS_PIN   4
  #define SRAM_CS_PIN      9
#endif

#define LED              13

// Keeps track of the current state of the network.
byte netStat = 0;

char *netssid = "hangar_lab";
char *netkey = "labinteractius";

void setup(void)
{
#if defined(__AVR_ATmega32U4__)
  // Using the LED to indicate that we are connected
//  pinMode (LED, OUTPUT);
//  digitalWrite (LED, LOW);
#endif

  lSer.begin(115200);

  lSer.println (F("\n\nElectronic Sweet Peas Demonstration program !"));
  lSer.println (F("Visit http://www.sweetpeas.se for more information !\n"));
  
#if !defined(__AVR_ATmega32U4__)
  // Disable the Sweet Pea WiFi shield on board SPI devices
  digitalWrite(SD_CARD_CS_PIN, HIGH);
  digitalWrite(SRAM_CS_PIN, HIGH);
  pinMode(SD_CARD_CS_PIN, OUTPUT);
  pinMode(SRAM_CS_PIN, OUTPUT);
#endif
 
#if defined(__AVR_ATmega32U4__)
  // Leonardo needs to wait for a serial connection.
  while (!lSer);
  lSer.println (F("Serial port connected to LeoFi !"));
#else
  lSer.println (F("Serial port connected to Arduino board !"));
#endif
  pinMode(8, OUTPUT);
  digitalWrite(8, HIGH);
  
  // Initialize wlan module
  sp_wifi_init (CC3000_MODE, CC3000_CS_PIN, CC3000_EN_PIN, CC3000_IRQ_PIN, CC3000_IRQ_LEVEL);
  lSer.println(F("CC3000 - Init complete."));
  
  // Make sure the module is clean from any previous connections
  wlan_ioctl_set_connection_policy(0, 0, 0);
  wlan_ioctl_del_profile(255);

  // The WiFi module needs a break before connecting.
  delay(500);

  // Now, connect to our network
  wlan_connect(WLAN_SEC_WPA2, (char *)netssid, strlen(netssid), NULL,
                             (unsigned char *)netkey, strlen(netkey));

// The main loop will wait for the wifi module to connect and to get an IP 
// address via DHCP
  delay(1000);
//  while (lastAsyncEvent!=HCI_EVNT_WLAN_UNSOL_DHCP)
//    {
//     if (asyncNotificationWaiting) {
//     asyncNotificationWaiting = false; 
//     }
//    }
  lSer.print(F("CC3000 - Got IP address via DHCP: "));
  lSer.print(dhcpIPAddress[0]);
  lSer.print(F("."));
  lSer.print(dhcpIPAddress[1]);
  lSer.print(F("."));
  lSer.print(dhcpIPAddress[2]);
  lSer.print(F("."));
  lSer.println(dhcpIPAddress[3]);
}

void loop(void)
{
  // Wait for something to happen on the network
//  if (asyncNotificationWaiting) {
//    asyncNotificationWaiting = false;
//      AsyncEventPrint();
//    if (netStat) {
      client_connect();
      delay(1000);
//      netStat = 0;
////    }
//  }
}

void AsyncEventPrint(void)
{
  switch (lastAsyncEvent) 
  {
    case HCI_EVNT_WLAN_ASYNC_SIMPLE_CONFIG_DONE:
      lSer.println(F("\nCC3000 - Simple config done"));
      break;

    case HCI_EVNT_WLAN_UNSOL_CONNECT:
      lSer.println(F("CC3000 - Unsolicited connect"));
      break;

    case HCI_EVNT_WLAN_UNSOL_DISCONNECT:
      lSer.println(F("CC3000 - Unsolicted disconnect"));
      break;

    case HCI_EVNT_WLAN_UNSOL_DHCP:
      lSer.print(F("CC3000 - Got IP address via DHCP: "));
      lSer.print(dhcpIPAddress[0]);
      lSer.print(F("."));
      lSer.print(dhcpIPAddress[1]);
      lSer.print(F("."));
      lSer.print(dhcpIPAddress[2]);
      lSer.print(F("."));
      lSer.println(dhcpIPAddress[3]);
      //digitalWrite (LED, HIGH);
      netStat = 1;
      break;

    case HCI_EVENT_CC3000_CAN_SHUT_DOWN:
      lSer.println(F("\nCC3000 - OK to shut down"));
      break;

    case HCI_EVNT_WLAN_KEEPALIVE:
      // Once initialized, the CC3000 will send these keepalive events
      // every 20 seconds.
      //lSer.println(F("\nCC3000 - Keepalive"));
      return;
      break;

    default:
      lSer.print(F("\nCC3000 - Unknown event! ("));
      lSer.print(lastAsyncEvent, HEX);
      lSer.println(F(")"));
      break;
  }
}

#define WEBSITE  "data.smartcitizen.me"
//#define WEBSITE      "www.sweetpeas.se"
void client_connect(void)
{
  uint32_t s;
  uint32_t IP;
  uint16_t port = 80;

  if (gethostbyname(WEBSITE, strlen(WEBSITE), &IP) < 0) {
    lSer.print (F("Could not resolve "));
    lSer.println (F(WEBSITE));
    return;
  }
  
  s = sp_connect(IP, port, IPPROTO_TCP);
  if (s < 0) {
    lSer.println (F("Error while trying to connect to TCP port on remote server !"));
  } else {
    lSer.println (F("Successfully connected !!!"));
    
    // Make a http get request
      sp_send (s, F("GET /datetime HTTP/1.1 \n"));
      sp_send (s, F("Host: "));
      sp_send (s, F(WEBSITE));
      sp_send (s, F("\n"));
      sp_send (s, F("User-Agent: SmartCitizen \n\n"));  
//    sp_send (s, F("GET "));
//    sp_send (s, F(WEBPAGE));
//    sp_send (s, F(" HTTP/1.0\r\n"));
//    sp_send (s, F("Host: "));
//    sp_send (s, F(WEBSITE));
//    sp_send (s, F("\n"));
//    sp_send (s, F("Connection: close\n"));
//    sp_send (s, F("\n"));
    unsigned long time = millis();
    while ((data_available(s))&&((millis()-time)<3000)) {
//      time = millis();
      char c = sp_read(s);
      lSer.write(c);
    }
    sp_close (s);
    lSer.println ();
  }
}