nodemcu-firmware/app/modules/tsl2561.c

128 lines
4.4 KiB
C
Raw Normal View History

2015-08-22 00:15:28 +02:00
/*
* tsl2561.c
*
* Created on: Aug 21, 2015
2015-08-23 02:27:39 +02:00
* Author: Michael Lucas (Aeprox @github)
2015-08-22 00:15:28 +02:00
*/
#include "module.h"
2015-08-22 00:15:28 +02:00
#include "lauxlib.h"
#include "platform.h"
#include "../tsl2561/tsl2561.h"
static uint16_t ch0;
static uint16_t ch1;
2015-08-23 14:52:15 +02:00
/* Initialises the device on pins sdapin and sclpin
* Lua: status = tsl2561.init(sdapin, sclpin, address(optional), package(optional))
2015-08-23 01:42:39 +02:00
*/
2015-08-22 00:15:28 +02:00
static int ICACHE_FLASH_ATTR tsl2561_init(lua_State* L) {
2015-08-23 02:27:39 +02:00
uint32_t sda;
uint32_t scl;
// check parameters
2015-08-23 02:27:39 +02:00
if (!lua_isnumber(L, 1) || !lua_isnumber(L, 2)) {
return luaL_error(L, "wrong arg range");
}
2015-08-22 00:15:28 +02:00
2015-08-23 02:27:39 +02:00
sda = luaL_checkinteger(L, 1);
scl = luaL_checkinteger(L, 2);
2015-08-22 00:15:28 +02:00
2015-08-23 02:27:39 +02:00
if (scl == 0 || sda == 0) {
return luaL_error(L, "no i2c for D0");
}
// init I2C
2015-08-23 02:27:39 +02:00
uint8_t error = tsl2561Init(sda, scl);
// Parse optional parameters
if (lua_isnumber(L, 3)) {
uint8_t address = luaL_checkinteger(L, 3);
if (!((address == TSL2561_ADDRESS_GND) || (address == TSL2561_ADDRESS_FLOAT) || (address == TSL2561_ADDRESS_VDD))) {
return luaL_error(L, "Invalid argument: address");
}
else{
tsl2561SetAddress(address);
}
}
if (lua_isnumber(L, 4)) {
uint8_t package = luaL_checkinteger(L, 4);
if (!((package == TSL2561_PACKAGE_T_FN_CL) || (package == TSL2561_PACKAGE_CS))) {
return luaL_error(L, "Invalid argument: package");
}
else{
tsl2561SetPackage(package);
}
}
2015-08-23 02:27:39 +02:00
lua_pushnumber(L, error);
return 1;
2015-08-22 00:15:28 +02:00
}
2015-08-23 14:52:15 +02:00
/* Sets the integration time and gain settings of the device
* Lua: status = tsl2561.settiming(integration, gain)
2015-08-23 01:42:39 +02:00
*/
2015-08-22 00:15:28 +02:00
static int ICACHE_FLASH_ATTR tsl2561_lua_settiming(lua_State* L) {
// check variables
if (!lua_isnumber(L, 1) || !lua_isnumber(L, 2)) {
2015-08-23 02:27:39 +02:00
return luaL_error(L, "wrong arg range");
2015-08-22 00:15:28 +02:00
}
uint8_t integration = luaL_checkinteger(L, 1);
2015-08-23 02:27:39 +02:00
if (!((integration == TSL2561_INTEGRATIONTIME_13MS) || (integration == TSL2561_INTEGRATIONTIME_101MS) || (integration == TSL2561_INTEGRATIONTIME_402MS))) {
return luaL_error(L, "Invalid argument: integration");
2015-08-23 01:42:39 +02:00
}
2015-08-22 00:15:28 +02:00
uint8_t gain = luaL_checkinteger(L, 2);
2015-08-23 02:27:39 +02:00
if (!((gain == TSL2561_GAIN_16X) || (gain == TSL2561_GAIN_1X))) {
return luaL_error(L, "Invalid argument: gain");
2015-08-23 01:42:39 +02:00
}
2015-08-22 00:15:28 +02:00
2015-08-23 02:27:39 +02:00
lua_pushnumber(L, tsl2561SetTiming(integration, gain));
2015-08-22 00:15:28 +02:00
return 1;
}
2015-08-23 14:52:15 +02:00
/* Reads sensor values from device and return calculated lux
* Lua: lux, status = tsl2561.getlux()
2015-08-23 01:42:39 +02:00
*/
2015-08-22 00:15:28 +02:00
static int ICACHE_FLASH_ATTR tsl2561_lua_calclux(lua_State* L) {
2015-08-23 02:27:39 +02:00
uint8_t error = tsl2561GetLuminosity(&ch0, &ch1);
if (error) {
2015-08-23 01:42:39 +02:00
lua_pushnumber(L, 0);
lua_pushnumber(L, error);
2015-08-23 02:27:39 +02:00
} else {
lua_pushnumber(L, tsl2561CalculateLux(ch0, ch1));
2015-08-23 01:42:39 +02:00
lua_pushnumber(L, error);
}
return 2;
2015-08-22 00:15:28 +02:00
}
2015-08-23 14:52:15 +02:00
/* Reads sensor values from device and returns them
* Lua: ch0, ch1, status = tsl2561.getrawchannels()
2015-08-23 01:42:39 +02:00
*/
2015-08-22 00:15:28 +02:00
static int ICACHE_FLASH_ATTR tsl2561_lua_getchannels(lua_State* L) {
2015-08-23 02:27:39 +02:00
uint8_t error = tsl2561GetLuminosity(&ch0, &ch1);
lua_pushnumber(L, ch0);
lua_pushnumber(L, ch1);
lua_pushnumber(L, error);
2015-08-22 00:15:28 +02:00
2015-08-22 17:54:26 +02:00
return 3;
2015-08-22 00:15:28 +02:00
}
// Module function map
static const LUA_REG_TYPE tsl2561_map[] = {
{ LSTRKEY( "settiming" ), LFUNCVAL( tsl2561_lua_settiming)},
{ LSTRKEY( "getlux" ), LFUNCVAL( tsl2561_lua_calclux )},
{ LSTRKEY( "getrawchannels" ), LFUNCVAL( tsl2561_lua_getchannels )},
{ LSTRKEY( "init" ), LFUNCVAL( tsl2561_init )},
{ LSTRKEY( "TSL2561_OK" ), LNUMVAL( TSL2561_ERROR_OK )},
2015-08-23 02:27:39 +02:00
{ LSTRKEY( "TSL2561_ERROR_I2CINIT" ), LNUMVAL( TSL2561_ERROR_I2CINIT )},
{ LSTRKEY( "TSL2561_ERROR_I2CBUSY" ), LNUMVAL( TSL2561_ERROR_I2CBUSY )},
{ LSTRKEY( "TSL2561_ERROR_NOINIT" ), LNUMVAL( TSL2561_ERROR_NOINIT )},
{ LSTRKEY( "TSL2561_ERROR_LAST" ), LNUMVAL( TSL2561_ERROR_LAST )},
{ LSTRKEY( "INTEGRATIONTIME_13MS" ), LNUMVAL( TSL2561_INTEGRATIONTIME_13MS )},
2015-08-23 02:27:39 +02:00
{ LSTRKEY( "INTEGRATIONTIME_101MS" ), LNUMVAL( TSL2561_INTEGRATIONTIME_101MS )},
{ LSTRKEY( "INTEGRATIONTIME_402MS" ), LNUMVAL( TSL2561_INTEGRATIONTIME_402MS )},
{ LSTRKEY( "GAIN_1X" ), LNUMVAL( TSL2561_GAIN_1X )},
{ LSTRKEY( "GAIN_16X" ), LNUMVAL( TSL2561_GAIN_16X )},
{ LSTRKEY( "PACKAGE_CS" ), LNUMVAL( TSL2561_PACKAGE_CS )},
{ LSTRKEY( "PACKAGE_T_FN_CL" ), LNUMVAL( TSL2561_PACKAGE_T_FN_CL )},
{ LSTRKEY( "ADDRESS_GND" ), LNUMVAL( TSL2561_ADDRESS_GND )},
{ LSTRKEY( "ADDRESS_FLOAT" ), LNUMVAL( TSL2561_ADDRESS_FLOAT )},
{ LSTRKEY( "ADDRESS_VDD" ), LNUMVAL( TSL2561_ADDRESS_VDD )},
2015-08-23 02:27:39 +02:00
{ LNILKEY, LNILVAL}
2015-08-22 00:15:28 +02:00
};
NODEMCU_MODULE(TSL2561, "tsl2561", tsl2561_map, NULL);