/*
 * Copyright (c) 2015, Yanzi Networks AB.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *    1. Redistributions of source code must retain the above copyright
 *       notice, this list of conditions and the following disclaimer.
 *    2. Redistributions in binary form must reproduce the above copyright
 *       notice, this list of conditions and the following disclaimer in the
 *       documentation and/or other materials provided with the distribution.
 *    3. Neither the name of the copyright holder nor the
 *       names of its contributors may be used to endorse or promote products
 *       derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER AND CONTRIBUTORS
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
 * COPYRIGHT HOLDER BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
 * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 */

/**
 * \file
 *      OMA LWM2M and IPSO Objects example.
 * \author
 *      Joakim Eriksson, joakime@sics.se
 *      Niclas Finne, nfi@sics.se
 *      Carlos Gonzalo Peces, carlosgp143@gmail.com
 */

#include "contiki.h"
#include "dev/leds.h"
#include "services/lwm2m/lwm2m-engine.h"
#include "services/lwm2m/lwm2m-rd-client.h"
#include "services/lwm2m/lwm2m-device.h"
#include "services/lwm2m/lwm2m-server.h"
#include "services/lwm2m/lwm2m-security.h"
#include "services/ipso-objects/ipso-objects.h"
#include "services/ipso-objects/ipso-sensor-template.h"
#include "services/ipso-objects/ipso-control-template.h"
#include "dev/leds.h"

#define DEBUG DEBUG_NONE
#include "net/ipv6/uip-debug.h"

/* Define this macro to non-zero to register via a bootstrap server */
#ifndef REGISTER_WITH_LWM2M_BOOTSTRAP_SERVER
#define REGISTER_WITH_LWM2M_BOOTSTRAP_SERVER 0
#endif

#if REGISTER_WITH_LWM2M_BOOTSTRAP_SERVER
#define SERVER_TYPE LWM2M_RD_CLIENT_BOOTSTRAP_SERVER
#else
#define SERVER_TYPE LWM2M_RD_CLIENT_LWM2M_SERVER
#endif

#ifndef LWM2M_SERVER_ADDRESS
#define LWM2M_SERVER_ADDRESS "coap://[fd00::1]"
#endif

static lwm2m_session_info_t session_info;

/* Define this macro to register with a second LWM2M server */
#ifdef LWM2M_SERVER_ADDRESS_SECOND
static lwm2m_session_info_t session_info_second;
#endif

#if BOARD_SENSORTAG
#include "board-peripherals.h"

/* Temperature reading */
static lwm2m_status_t
read_temp_value(const ipso_sensor_t *s, int32_t *value)
{
  *value = 10 * hdc_1000_sensor.value(HDC_1000_SENSOR_TYPE_TEMP);
  return LWM2M_STATUS_OK;
}
/* Humitidy reading */
static lwm2m_status_t
read_hum_value(const ipso_sensor_t *s, int32_t *value)
{
  *value = 10 * hdc_1000_sensor.value(HDC_1000_SENSOR_TYPE_HUMID);
  return LWM2M_STATUS_OK;
}
/* Lux reading */
static lwm2m_status_t
read_lux_value(const ipso_sensor_t *s, int32_t *value)
{
  *value = 10 * opt_3001_sensor.value(0);
  return LWM2M_STATUS_OK;
}
/* Barometer reading */
static lwm2m_status_t
read_bar_value(const ipso_sensor_t *s, int32_t *value)
{
  *value = 10 * bmp_280_sensor.value(BMP_280_SENSOR_TYPE_PRESS);
  return LWM2M_STATUS_OK;
}
/* LED control */
static lwm2m_status_t
leds_set_val(ipso_control_t *control, uint8_t value)
{
  if(value > 0) {
    leds_single_on(LEDS_LED1);
  } else {
    leds_single_off(LEDS_LED1);
  }
  return LWM2M_STATUS_OK;
}
/*---------------------------------------------------------------------------*/

IPSO_CONTROL(led_control, 3311, 0, leds_set_val);

IPSO_SENSOR(temp_sensor, 3303, read_temp_value,
            .max_range = 100000, /* 100 cel milli celcius */
            .min_range = -10000, /* -10 cel milli celcius */
            .unit = "Cel",
            .update_interval = 30
            );

IPSO_SENSOR(hum_sensor, 3304, read_hum_value,
            .max_range = 100000, /* 100 % RH */
            .min_range = 0,
            .unit = "% RH",
            .update_interval = 30
            );

IPSO_SENSOR(lux_sensor, 3301, read_lux_value,
            .max_range = 100000,
            .min_range = -10000,
            .unit = "LUX",
            .update_interval = 30
            );

IPSO_SENSOR(bar_sensor, 3315, read_bar_value,
            .max_range = 100000, /* 100 cel milli celcius */
            .min_range = -10000, /* -10 cel milli celcius */
            .unit = "hPa",
            .update_interval = 30
            );
#endif  /* BOARD_SENSORTAG */

PROCESS(example_ipso_objects, "IPSO object example");
AUTOSTART_PROCESSES(&example_ipso_objects);
/*---------------------------------------------------------------------------*/
static void
setup_lwm2m_servers(void)
{
#ifdef LWM2M_SERVER_ADDRESS
  coap_endpoint_t server_ep;
  if(coap_endpoint_parse(LWM2M_SERVER_ADDRESS, strlen(LWM2M_SERVER_ADDRESS),
                         &server_ep) != 0) {
    lwm2m_rd_client_register_with_server(&session_info, &server_ep, SERVER_TYPE);
  }
#endif /* LWM2M_SERVER_ADDRESS */

#ifdef LWM2M_SERVER_ADDRESS_SECOND
  coap_endpoint_t server_ep_second;
  if(coap_endpoint_parse(LWM2M_SERVER_ADDRESS_SECOND, strlen(LWM2M_SERVER_ADDRESS_SECOND),
                         &server_ep_second) != 0) {
    lwm2m_rd_client_register_with_server(&session_info_second, &server_ep_second, SERVER_TYPE);
  }
#endif /* LWM2M_SERVER_ADDRESS_SECOND */
}
/*---------------------------------------------------------------------------*/
PROCESS_THREAD(example_ipso_objects, ev, data)
{
  static struct etimer periodic;
  PROCESS_BEGIN();

  PROCESS_PAUSE();

  PRINTF("Starting IPSO objects example%s\n",
         REGISTER_WITH_LWM2M_BOOTSTRAP_SERVER ? " (bootstrap)" : "");
  /* Initialize the OMA LWM2M engine */
  lwm2m_engine_init();

  /* Register default LWM2M objects */
  lwm2m_device_init();
  lwm2m_security_init();
  lwm2m_server_init();

#if BOARD_SENSORTAG
  ipso_sensor_add(&temp_sensor);
  ipso_sensor_add(&hum_sensor);
  ipso_sensor_add(&lux_sensor);
  ipso_sensor_add(&bar_sensor);
  ipso_control_add(&led_control);
  ipso_button_init();

  SENSORS_ACTIVATE(hdc_1000_sensor);
  SENSORS_ACTIVATE(opt_3001_sensor);
  SENSORS_ACTIVATE(bmp_280_sensor);
#else /* BOARD_SENSORTAG */
  /* Register default IPSO objects - such as button..*/
  ipso_objects_init();
#endif /* BOARD_SENSORTAG */

  setup_lwm2m_servers();
  /* Tick loop each 5 seconds */
  etimer_set(&periodic, CLOCK_SECOND * 5);

  while(1) {
    PROCESS_WAIT_EVENT();
    if(ev == PROCESS_EVENT_TIMER && etimer_expired(&periodic)) {
#if BOARD_SENSORTAG
      /* deactive / activate to do a new reading */
      SENSORS_DEACTIVATE(hdc_1000_sensor);
      SENSORS_DEACTIVATE(opt_3001_sensor);
      SENSORS_DEACTIVATE(bmp_280_sensor);

      SENSORS_ACTIVATE(hdc_1000_sensor);
      SENSORS_ACTIVATE(opt_3001_sensor);
      SENSORS_ACTIVATE(bmp_280_sensor);
#endif /* BOARD_SENSORTAG */
      etimer_reset(&periodic);
    }
  }
  PROCESS_END();
}