contiki/platform/zoul/dev/zonik.c

185 lines
6.5 KiB
C

/*
* Copyright (c) 2016, Zolertia <http://www.zolertia.com>
* 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 Institute 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 INSTITUTE 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 INSTITUTE OR CONTRIBUTORS 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.
*
* This file is part of the Contiki operating system.
*
*/
/*---------------------------------------------------------------------------*/
/**
* \addtogroup remote-zonik
* @{
* Driver for the RE-Mote Zonik sonometer board
* @{
* \file
* Driver for the RE-Mote Zonik sound sensor (ZONIK)
* \author
* Aitor Mejias <amejias@zolertia.com>
*/
/*---------------------------------------------------------------------------*/
#include <stdio.h>
#include "contiki.h"
#include "dev/gpio.h"
#include "dev/i2c.h"
#include "zonik.h"
#include "sys/timer.h"
#include "sys/etimer.h"
#include "lib/sensors.h"
/*---------------------------------------------------------------------------*/
#define DEBUG 0
#if DEBUG
#define PRINTF(...) printf(__VA_ARGS__)
#else
#define PRINTF(...)
#endif
/*---------------------------------------------------------------------------*/
#define ZONIK_INT1_PORT_BASE GPIO_PORT_TO_BASE(ZONIK_INT_PORT)
#define ZONIK_INT1_PIN_MASK GPIO_PIN_MASK(ZONIK_INT_PIN)
/*---------------------------------------------------------------------------*/
static uint8_t zonik_buffer[ZONIK_FRAME_SIZE+1];
static uint16_t zonik_status = ZONIK_DISABLED;
/*---------------------------------------------------------------------------*/
static struct etimer et;
/*---------------------------------------------------------------------------*/
PROCESS(zonik_stm_process, "Zonik process process handler");
/*---------------------------------------------------------------------------*/
PROCESS_THREAD(zonik_stm_process, ev, data)
{
#if DEBUG
static int i;
#endif
PROCESS_EXITHANDLER();
PROCESS_BEGIN();
while(1) {
/* Wait a process */
etimer_set(&et, ZONIK_SECOND_INTERVAL);
PROCESS_WAIT_EVENT_UNTIL(etimer_expired(&et));
/* Control the interrupt for activate the sensor */
GPIO_SET_OUTPUT(ZONIK_INT1_PORT_BASE, ZONIK_INT1_PIN_MASK);
GPIO_CLR_PIN(ZONIK_INT1_PORT_BASE, ZONIK_INT1_PIN_MASK);
clock_delay_usec(ZONIK_INITIAL_WAIT_DELAY);
i2c_master_enable();
if(i2c_single_send(ZONIK_ADDR, ZONIK_CMD_READ) != I2C_MASTER_ERR_NONE) {
zonik_status = ZONIK_ERROR;
PRINTF("Zonik: Error in I2C Communication\n");
}
GPIO_SET_PIN(ZONIK_INT1_PORT_BASE, ZONIK_INT1_PIN_MASK);
GPIO_SET_INPUT(ZONIK_INT1_PORT_BASE, ZONIK_INT1_PIN_MASK);
if(zonik_status != ZONIK_ERROR) {
etimer_set(&et, ZONIK_WAIT_ACQ);
PROCESS_WAIT_EVENT_UNTIL(etimer_expired(&et));
clock_delay_usec(ZONIK_FINAL_WAIT_DELAY);
i2c_master_enable();
if(i2c_burst_receive(ZONIK_ADDR, &zonik_buffer[0], ZONIK_FRAME_SIZE) !=
I2C_MASTER_ERR_NONE) {
zonik_status = ZONIK_ERROR;
PRINTF("Zonik: Error in I2C Burst Mode Receive");
}
#if DEBUG
PRINTF("\nZonik: ");
for(i=0; i<ZONIK_FRAME_SIZE; i++) {
PRINTF(" 0x%02x ", zonik_buffer[i]);
}
PRINTF("\n");
#endif
if(zonik_status != ZONIK_ERROR) {
zonik_status = ZONIK_ACTIVE;
}
}
}
PROCESS_END();
}
/*---------------------------------------------------------------------------*/
static int
status(int type)
{
switch(type) {
case SENSORS_ACTIVE:
case SENSORS_READY:
return zonik_status;
}
return 0;
}
/*---------------------------------------------------------------------------*/
static int
value(int type)
{
/* If the system is enabling the sensor internally. Return the same state */
if(zonik_status == ZONIK_HW_INIT) {
return ZONIK_HW_INIT;
}
/* If no valid parameter, return error */
if(zonik_status != ZONIK_ACTIVE) {
return ZONIK_DISABLED;
}
/* Return the dBA received data */
if(type == ZONIK_DBA_LEQ_VALUE) {
return ((uint16_t)zonik_buffer[2] << 8) + zonik_buffer[3];
}
/* Return the internal counter loop received data */
if(type == ZONIK_COUNT_VALUE) {
return ((uint16_t)zonik_buffer[0] << 8) + zonik_buffer[1];
}
return ZONIK_ERROR;
}
/*---------------------------------------------------------------------------*/
static int
configure(int type, int value)
{
if(type == ZONIK_ACTIVE) {
if(value == ZONIK_VALUE_DEACTIVATE) {
/* Disable the Zonik Sensor reading process */
process_exit(&zonik_stm_process);
zonik_status = ZONIK_DISABLED;
return zonik_status;
}
/* Enable the Zonik Sensor reading process */
i2c_init(I2C_SDA_PORT, I2C_SDA_PIN, I2C_SCL_PORT, I2C_SCL_PIN,
I2C_SCL_NORMAL_BUS_SPEED);
/* configuration of I2C interrupt control */
GPIO_SOFTWARE_CONTROL(ZONIK_INT1_PORT_BASE, ZONIK_INT1_PIN_MASK);
GPIO_SET_INPUT(ZONIK_INT1_PORT_BASE, ZONIK_INT1_PIN_MASK);
/* Launch the main process */
process_start(&zonik_stm_process, NULL);
zonik_status = ZONIK_HW_INIT;
return zonik_status;
}
/* Bad configuration */
return ZONIK_ERROR;
}
/*---------------------------------------------------------------------------*/
SENSORS_SENSOR(zonik, ZONIK_SENSOR, value, configure, status);
/*---------------------------------------------------------------------------*/
/**
* @}
* @}
*/