/*************************************************************************************************/
/*!
*  \file
*
*  \brief  Cycling Speed and Cadence Profile Sensor Implementation.
*
*  Copyright (c) 2016-2019 Arm Ltd.
*
*  Copyright (c) 2019 Packetcraft, Inc.
*
*  Licensed under the Apache License, Version 2.0 (the "License");
*  you may not use this file except in compliance with the License.
*  You may obtain a copy of the License at
*
*      http://www.apache.org/licenses/LICENSE-2.0
*
*  Unless required by applicable law or agreed to in writing, software
*  distributed under the License is distributed on an "AS IS" BASIS,
*  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
*  See the License for the specific language governing permissions and
*  limitations under the License.
*/
/*************************************************************************************************/

#include <string.h>
#include "wsf_types.h"
#include "wsf_assert.h"
#include "wsf_trace.h"
#include "util/bstream.h"
#include "dm_api.h"
#include "svc_cscs.h"
#include "svc_ch.h"
#include "cscp_api.h"

/*************************************************************************************************
* Constant Definitions
*************************************************************************************************/

/*! \brief The maximum length of a power measurement */
#define CSCPS_PM_MAX_LEN          11

/*! \brief Cycle Speed and Cadence Measurement Flag Indicies */
enum
{
  CSCPS_WRDP_FLAG_INDEX,          /*! \brief Wheel Revolution Data Present */
  CSCPS_CRDP_FLAG_INDEX,          /*! \brief Crank Revolution Data Present */
  CSCPS_NUM_FLAGS
};

/**************************************************************************************************
Data Types
**************************************************************************************************/

/*! \brief Cycle Speed Measurement Data */
typedef struct
{
  uint8_t   flags;                  /*! \brief Speed Measurement Flags */
  uint32_t  wheelRevs;              /*! \brief Cumulative Wheel Revolutions */
  uint16_t  lastWheelEventTime;     /*! \brief Last Wheel Event Time */
  uint16_t  crankRevs;              /*! \brief Cumulative Crank Revolutions */
  uint16_t  lastCrankEventTime;     /*! \brief Last Crank Event Time */
} cscpSmData_t;

/**************************************************************************************************
Local Variables
**************************************************************************************************/

/*! \brief Measurement data */
cscpSmData_t cscpsSmData;

/*************************************************************************************************/
/*!
*  \brief  Set a cycling speed measurement parameter.
*
*  \param  type   Parameter identifier
*  \param  value  Measurement value.
*
*  \return none
*/
/*************************************************************************************************/
void CscpsSetParameter(uint8_t type, uint32_t value)
{
  switch (type)
  {
    case CSCP_SM_PARAM_WHEEL_REVOLUTIONS:
      cscpsSmData.flags |= (1 << CSCPS_WRDP_FLAG_INDEX);
      cscpsSmData.wheelRevs = value;
      break;

    case CSCP_SM_PARAM_LAST_WHEEL_EVT_TIME:
      cscpsSmData.flags |= (1 << CSCPS_WRDP_FLAG_INDEX);
      cscpsSmData.lastWheelEventTime = (uint16_t) value;
      break;

    case CSCP_SM_PARAM_CRANK_REVOLUTIONS:
      cscpsSmData.flags |= (1 << CSCPS_CRDP_FLAG_INDEX);
      cscpsSmData.crankRevs = (uint16_t) value;
      break;

    case CSCP_SM_PARAM_LAST_CRANK_TIME:
      cscpsSmData.flags |= (1 << CSCPS_CRDP_FLAG_INDEX);
      cscpsSmData.lastCrankEventTime = (uint16_t) value;
      break;

    default:
      break;
  }
}

/*************************************************************************************************/
/*!
*  \brief  Set the sensor location attribute.
*
*  \param  location   Sensor Location.
*
*  \return none
*/
/*************************************************************************************************/
void CscpsSetSensorLocation(uint8_t location)
{
  AttsSetAttr(CSCS_SL_HDL, sizeof(uint8_t), &location);
}

/*************************************************************************************************/
/*!
*  \brief  Set the features attribute.
*
*  \param  features   Features bitmask.
*
*  \return none
*/
/*************************************************************************************************/
void CscpsSetFeatures(uint16_t features)
{
  uint8_t tempData[2] = {UINT16_TO_BYTES(features)};
  AttsSetAttr(CSCS_CSF_HDL, sizeof(tempData), tempData);
}

/*************************************************************************************************/
/*!
*  \brief  Notifies the collector of a Cycle Speed Measurement.
*
*  \param  connId  Connection ID
*
*  \return none
*/
/*************************************************************************************************/
void CscpsSendSpeedMeasurement(dmConnId_t connId)
{
  int8_t i;
  uint16_t len;
  uint8_t msg[CSCPS_PM_MAX_LEN];
  uint8_t *p = msg;

  /* Add manditory parameters */
  UINT8_TO_BSTREAM(p, cscpsSmData.flags);

  /* Add optional parameters */
  for (i = 0; i < CSCPS_NUM_FLAGS; i++)
  {
    if (cscpsSmData.flags & (1 << i))
    {
      switch (i)
      {
      case CSCPS_WRDP_FLAG_INDEX:
        UINT32_TO_BSTREAM(p, cscpsSmData.wheelRevs);
        UINT16_TO_BSTREAM(p, cscpsSmData.lastWheelEventTime);
        break;
      case CSCPS_CRDP_FLAG_INDEX:
        UINT16_TO_BSTREAM(p, cscpsSmData.crankRevs);
        UINT16_TO_BSTREAM(p, cscpsSmData.lastCrankEventTime);
        break;
      }
    }
  }

  /* Calculate message length */
  len = (uint16_t) (p - msg);

  /* Transmit notification */
  AttsHandleValueNtf(connId, CSCS_CSM_HDL, len, msg);

  /* Clear the measurement data */
  memset(&cscpsSmData, 0, sizeof(cscpsSmData));
}