345 lines
7.5 KiB
C
345 lines
7.5 KiB
C
/*
|
|
* Copyright (c) 2007, Swedish Institute of Computer Science
|
|
* 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.
|
|
*
|
|
* @(#)$Id: sht11.c,v 1.2 2008/07/08 08:23:47 adamdunkels Exp $
|
|
*/
|
|
|
|
/*
|
|
* Device driver for the Sensirion SHT1x/SHT7x family of humidity and
|
|
* temperature sensors.
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <io.h>
|
|
|
|
#include <dev/sht11.h>
|
|
#include "sht11-arch.h"
|
|
|
|
#define SDA_0() (SHT11_PxDIR |= BV(SHT11_ARCH_SDA)) /* SDA Output=0 */
|
|
#define SDA_1() (SHT11_PxDIR &= ~BV(SHT11_ARCH_SDA)) /* SDA Input */
|
|
#define SDA_IS_1 (SHT11_PxIN & BV(SHT11_ARCH_SDA))
|
|
|
|
#define SCL_0() (SHT11_PxOUT &= ~BV(SHT11_ARCH_SCL)) /* SCL Output=0 */
|
|
#define SCL_1() (SHT11_PxOUT |= BV(SHT11_ARCH_SCL)) /* SCL Output=1 */
|
|
|
|
/* adr command r/w */
|
|
#define STATUS_REG_W 0x06 /* 000 0011 0 */
|
|
#define STATUS_REG_R 0x07 /* 000 0011 1 */
|
|
#define MEASURE_TEMP 0x03 /* 000 0001 1 */
|
|
#define MEASURE_HUMI 0x05 /* 000 0010 1 */
|
|
#define RESET 0x1e /* 000 1111 0 */
|
|
|
|
/* This can probably be reduced to 250ns according to data sheet. */
|
|
#define delay_400ns() _NOP()
|
|
/*---------------------------------------------------------------------------*/
|
|
static void
|
|
sstart(void)
|
|
{
|
|
SDA_1(); SCL_0();
|
|
delay_400ns();
|
|
SCL_1();
|
|
delay_400ns();
|
|
SDA_0();
|
|
delay_400ns();
|
|
SCL_0();
|
|
delay_400ns();
|
|
SCL_1();
|
|
delay_400ns();
|
|
SDA_1();
|
|
delay_400ns();
|
|
SCL_0();
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
static void
|
|
sreset(void)
|
|
{
|
|
int i;
|
|
SDA_1();
|
|
SCL_0();
|
|
for(i = 0; i < 9 ; i++) {
|
|
SCL_1();
|
|
delay_400ns();
|
|
SCL_0();
|
|
}
|
|
sstart(); /* Start transmission, why??? */
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
/*
|
|
* Return true if we received an ACK.
|
|
*/
|
|
static int
|
|
swrite(unsigned _c)
|
|
{
|
|
unsigned char c = _c;
|
|
int i;
|
|
int ret;
|
|
|
|
for(i = 0; i < 8; i++, c <<= 1) {
|
|
if(c & 0x80) {
|
|
SDA_1();
|
|
} else {
|
|
SDA_0();
|
|
}
|
|
SCL_1();
|
|
delay_400ns();
|
|
SCL_0();
|
|
}
|
|
|
|
SDA_1();
|
|
SCL_1();
|
|
delay_400ns();
|
|
ret = !SDA_IS_1;
|
|
|
|
SCL_0();
|
|
|
|
return ret;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
static unsigned
|
|
sread(int send_ack)
|
|
{
|
|
int i;
|
|
unsigned char c = 0x00;
|
|
|
|
SDA_1();
|
|
for(i = 0; i < 8; i++) {
|
|
c <<= 1;
|
|
SCL_1();
|
|
delay_400ns();
|
|
if(SDA_IS_1) {
|
|
c |= 0x1;
|
|
}
|
|
SCL_0();
|
|
}
|
|
|
|
if(send_ack) {
|
|
SDA_0();
|
|
}
|
|
SCL_1();
|
|
delay_400ns();
|
|
SCL_0();
|
|
|
|
SDA_1(); /* Release SDA */
|
|
|
|
return c;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
#define CRC_CHECK
|
|
#ifdef CRC_CHECK
|
|
static unsigned char
|
|
rev8bits(unsigned char v)
|
|
{
|
|
unsigned char r = v;
|
|
int s = 7;
|
|
|
|
for (v >>= 1; v; v >>= 1) {
|
|
r <<= 1;
|
|
r |= v & 1;
|
|
s--;
|
|
}
|
|
r <<= s; /* Shift when v's highest bits are zero */
|
|
return r;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
/* BEWARE: Bit reversed CRC8 using polynomial ^8 + ^5 + ^4 + 1 */
|
|
static unsigned
|
|
crc8_add(unsigned acc, unsigned byte)
|
|
{
|
|
int i;
|
|
acc ^= byte;
|
|
for(i = 0; i < 8; i++) {
|
|
if(acc & 0x80) {
|
|
acc = (acc << 1) ^ 0x31;
|
|
} else {
|
|
acc <<= 1;
|
|
}
|
|
}
|
|
return acc & 0xff;
|
|
}
|
|
#endif /* CRC_CHECK */
|
|
/*---------------------------------------------------------------------------*/
|
|
/*
|
|
* Power up the device. The device can be used after an additional
|
|
* 11ms waiting time.
|
|
*/
|
|
void
|
|
sht11_init(void)
|
|
{
|
|
/*
|
|
* SCL Output={0,1}
|
|
* SDA 0: Output=0
|
|
* 1: Input and pull-up (Output=0)
|
|
*/
|
|
SHT11_PxOUT |= BV(SHT11_ARCH_PWR);
|
|
SHT11_PxOUT &= ~(BV(SHT11_ARCH_SDA) | BV(SHT11_ARCH_SCL));
|
|
SHT11_PxDIR |= BV(SHT11_ARCH_PWR) | BV(SHT11_ARCH_SCL);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
/*
|
|
* Power of device.
|
|
*/
|
|
void
|
|
sht11_off(void)
|
|
{
|
|
SHT11_PxOUT &= ~BV(SHT11_ARCH_PWR);
|
|
SHT11_PxOUT &= ~(BV(SHT11_ARCH_SDA) | BV(SHT11_ARCH_SCL));
|
|
SHT11_PxDIR |= BV(SHT11_ARCH_PWR) | BV(SHT11_ARCH_SCL);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
/*
|
|
* Only commands MEASURE_HUMI or MEASURE_TEMP!
|
|
*/
|
|
static unsigned int
|
|
scmd(unsigned cmd)
|
|
{
|
|
unsigned long n;
|
|
|
|
if(cmd != MEASURE_HUMI && cmd != MEASURE_TEMP) {
|
|
return -1;
|
|
}
|
|
|
|
sstart(); /* Start transmission */
|
|
if(!swrite(cmd)) {
|
|
goto fail;
|
|
}
|
|
|
|
for(n = 0; n < 250000; n++) {
|
|
if(!SDA_IS_1) {
|
|
unsigned t0, t1, rcrc;
|
|
t0 = sread(1);
|
|
t1 = sread(1);
|
|
rcrc = sread(0);
|
|
#ifdef CRC_CHECK
|
|
{
|
|
unsigned crc;
|
|
crc = crc8_add(0x0, cmd);
|
|
crc = crc8_add(crc, t0);
|
|
crc = crc8_add(crc, t1);
|
|
if(crc != rev8bits(rcrc)) {
|
|
goto fail;
|
|
}
|
|
}
|
|
#endif
|
|
return (t0 << 8) | t1;
|
|
}
|
|
}
|
|
|
|
fail:
|
|
sreset();
|
|
return -1;
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
/*
|
|
* Call may take up to 210ms.
|
|
*/
|
|
unsigned int
|
|
sht11_temp(void)
|
|
{
|
|
return scmd(MEASURE_TEMP);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
/*
|
|
* Call may take up to 210ms.
|
|
*/
|
|
unsigned int
|
|
sht11_humidity(void)
|
|
{
|
|
return scmd(MEASURE_HUMI);
|
|
}
|
|
/*---------------------------------------------------------------------------*/
|
|
#if 0 /* But ok! */
|
|
unsigned
|
|
sht11_sreg(void)
|
|
{
|
|
unsigned sreg, rcrc;
|
|
|
|
sstart(); /* Start transmission */
|
|
if(!swrite(STATUS_REG_R)) {
|
|
goto fail;
|
|
}
|
|
|
|
sreg = sread(1);
|
|
rcrc = sread(0);
|
|
|
|
#ifdef CRC_CHECK
|
|
{
|
|
unsigned crc;
|
|
crc = crc8_add(0x0, STATUS_REG_R);
|
|
crc = crc8_add(crc, sreg);
|
|
if (crc != rev8bits(rcrc))
|
|
goto fail;
|
|
}
|
|
#endif
|
|
|
|
return sreg;
|
|
|
|
fail:
|
|
sreset();
|
|
return -1;
|
|
}
|
|
#endif
|
|
/*---------------------------------------------------------------------------*/
|
|
#if 0
|
|
int
|
|
sht11_set_sreg(unsigned sreg)
|
|
{
|
|
sstart(); /* Start transmission */
|
|
if(!swrite(STATUS_REG_W)) {
|
|
goto fail;
|
|
}
|
|
if(!swrite(sreg)) {
|
|
goto fail;
|
|
}
|
|
|
|
return 0;
|
|
|
|
fail:
|
|
sreset();
|
|
return -1;
|
|
}
|
|
#endif
|
|
/*---------------------------------------------------------------------------*/
|
|
#if 0
|
|
int
|
|
sht11_reset(void)
|
|
{
|
|
sstart(); /* Start transmission */
|
|
if(!swrite(RESET)) {
|
|
goto fail;
|
|
}
|
|
|
|
return 0;
|
|
|
|
fail:
|
|
sreset();
|
|
return -1;
|
|
}
|
|
#endif
|
|
/*---------------------------------------------------------------------------*/
|