| /* |
| * Device driver for monitoring ambient light intensity (lux) |
| * within the TAOS tsl258x family of devices (tsl2580, tsl2581). |
| * |
| * Copyright (c) 2011, TAOS Corporation. |
| * |
| * This program is free software; you can redistribute it and/or modify |
| * it under the terms of the GNU General Public License as published by |
| * the Free Software Foundation; either version 2 of the License, or |
| * (at your option) any later version. |
| * |
| * This program is distributed in the hope that it will be useful, but WITHOUT |
| * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
| * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for |
| * more details. |
| * |
| * You should have received a copy of the GNU General Public License along |
| * with this program; if not, write to the Free Software Foundation, Inc., |
| * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. |
| */ |
| |
| #include <linux/kernel.h> |
| #include <linux/i2c.h> |
| #include <linux/errno.h> |
| #include <linux/delay.h> |
| #include <linux/string.h> |
| #include <linux/mutex.h> |
| #include <linux/unistd.h> |
| #include <linux/slab.h> |
| #include <linux/module.h> |
| #include <linux/iio/iio.h> |
| |
| #define TSL258X_MAX_DEVICE_REGS 32 |
| |
| /* Triton register offsets */ |
| #define TSL258X_REG_MAX 8 |
| |
| /* Device Registers and Masks */ |
| #define TSL258X_CNTRL 0x00 |
| #define TSL258X_ALS_TIME 0X01 |
| #define TSL258X_INTERRUPT 0x02 |
| #define TSL258X_GAIN 0x07 |
| #define TSL258X_REVID 0x11 |
| #define TSL258X_CHIPID 0x12 |
| #define TSL258X_ALS_CHAN0LO 0x14 |
| #define TSL258X_ALS_CHAN0HI 0x15 |
| #define TSL258X_ALS_CHAN1LO 0x16 |
| #define TSL258X_ALS_CHAN1HI 0x17 |
| #define TSL258X_TMR_LO 0x18 |
| #define TSL258X_TMR_HI 0x19 |
| |
| /* tsl2583 cmd reg masks */ |
| #define TSL258X_CMD_REG 0x80 |
| #define TSL258X_CMD_SPL_FN 0x60 |
| #define TSL258X_CMD_ALS_INT_CLR 0X01 |
| |
| /* tsl2583 cntrl reg masks */ |
| #define TSL258X_CNTL_ADC_ENBL 0x02 |
| #define TSL258X_CNTL_PWR_ON 0x01 |
| |
| /* tsl2583 status reg masks */ |
| #define TSL258X_STA_ADC_VALID 0x01 |
| #define TSL258X_STA_ADC_INTR 0x10 |
| |
| /* Lux calculation constants */ |
| #define TSL258X_LUX_CALC_OVER_FLOW 65535 |
| |
| enum { |
| TSL258X_CHIP_UNKNOWN = 0, |
| TSL258X_CHIP_WORKING = 1, |
| TSL258X_CHIP_SUSPENDED = 2 |
| }; |
| |
| /* Per-device data */ |
| struct taos_als_info { |
| u16 als_ch0; |
| u16 als_ch1; |
| u16 lux; |
| }; |
| |
| struct taos_settings { |
| int als_time; |
| int als_gain; |
| int als_gain_trim; |
| int als_cal_target; |
| }; |
| |
| struct tsl2583_chip { |
| struct mutex als_mutex; |
| struct i2c_client *client; |
| struct taos_als_info als_cur_info; |
| struct taos_settings taos_settings; |
| int als_time_scale; |
| int als_saturation; |
| int taos_chip_status; |
| u8 taos_config[8]; |
| }; |
| |
| /* |
| * Initial values for device - this values can/will be changed by driver. |
| * and applications as needed. |
| * These values are dynamic. |
| */ |
| static const u8 taos_config[8] = { |
| 0x00, 0xee, 0x00, 0x03, 0x00, 0xFF, 0xFF, 0x00 |
| }; /* cntrl atime intC Athl0 Athl1 Athh0 Athh1 gain */ |
| |
| struct taos_lux { |
| unsigned int ratio; |
| unsigned int ch0; |
| unsigned int ch1; |
| }; |
| |
| /* This structure is intentionally large to accommodate updates via sysfs. */ |
| /* Sized to 11 = max 10 segments + 1 termination segment */ |
| /* Assumption is one and only one type of glass used */ |
| static struct taos_lux taos_device_lux[11] = { |
| { 9830, 8520, 15729 }, |
| { 12452, 10807, 23344 }, |
| { 14746, 6383, 11705 }, |
| { 17695, 4063, 6554 }, |
| }; |
| |
| struct gainadj { |
| s16 ch0; |
| s16 ch1; |
| }; |
| |
| /* Index = (0 - 3) Used to validate the gain selection index */ |
| static const struct gainadj gainadj[] = { |
| { 1, 1 }, |
| { 8, 8 }, |
| { 16, 16 }, |
| { 107, 115 } |
| }; |
| |
| /* |
| * Provides initial operational parameter defaults. |
| * These defaults may be changed through the device's sysfs files. |
| */ |
| static void taos_defaults(struct tsl2583_chip *chip) |
| { |
| /* Operational parameters */ |
| chip->taos_settings.als_time = 100; |
| /* must be a multiple of 50mS */ |
| chip->taos_settings.als_gain = 0; |
| /* this is actually an index into the gain table */ |
| /* assume clear glass as default */ |
| chip->taos_settings.als_gain_trim = 1000; |
| /* default gain trim to account for aperture effects */ |
| chip->taos_settings.als_cal_target = 130; |
| /* Known external ALS reading used for calibration */ |
| } |
| |
| /* |
| * Read a number of bytes starting at register (reg) location. |
| * Return 0, or i2c_smbus_write_byte ERROR code. |
| */ |
| static int |
| taos_i2c_read(struct i2c_client *client, u8 reg, u8 *val, unsigned int len) |
| { |
| int i, ret; |
| |
| for (i = 0; i < len; i++) { |
| /* select register to write */ |
| ret = i2c_smbus_write_byte(client, (TSL258X_CMD_REG | reg)); |
| if (ret < 0) { |
| dev_err(&client->dev, "taos_i2c_read failed to write" |
| " register %x\n", reg); |
| return ret; |
| } |
| /* read the data */ |
| *val = i2c_smbus_read_byte(client); |
| val++; |
| reg++; |
| } |
| return 0; |
| } |
| |
| /* |
| * Reads and calculates current lux value. |
| * The raw ch0 and ch1 values of the ambient light sensed in the last |
| * integration cycle are read from the device. |
| * Time scale factor array values are adjusted based on the integration time. |
| * The raw values are multiplied by a scale factor, and device gain is obtained |
| * using gain index. Limit checks are done next, then the ratio of a multiple |
| * of ch1 value, to the ch0 value, is calculated. The array taos_device_lux[] |
| * declared above is then scanned to find the first ratio value that is just |
| * above the ratio we just calculated. The ch0 and ch1 multiplier constants in |
| * the array are then used along with the time scale factor array values, to |
| * calculate the lux. |
| */ |
| static int taos_get_lux(struct iio_dev *indio_dev) |
| { |
| u16 ch0, ch1; /* separated ch0/ch1 data from device */ |
| u32 lux; /* raw lux calculated from device data */ |
| u64 lux64; |
| u32 ratio; |
| u8 buf[5]; |
| struct taos_lux *p; |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| int i, ret; |
| u32 ch0lux = 0; |
| u32 ch1lux = 0; |
| |
| if (mutex_trylock(&chip->als_mutex) == 0) { |
| dev_info(&chip->client->dev, "taos_get_lux device is busy\n"); |
| return chip->als_cur_info.lux; /* busy, so return LAST VALUE */ |
| } |
| |
| if (chip->taos_chip_status != TSL258X_CHIP_WORKING) { |
| /* device is not enabled */ |
| dev_err(&chip->client->dev, "taos_get_lux device is not enabled\n"); |
| ret = -EBUSY ; |
| goto out_unlock; |
| } |
| |
| ret = taos_i2c_read(chip->client, (TSL258X_CMD_REG), &buf[0], 1); |
| if (ret < 0) { |
| dev_err(&chip->client->dev, "taos_get_lux failed to read CMD_REG\n"); |
| goto out_unlock; |
| } |
| /* is data new & valid */ |
| if (!(buf[0] & TSL258X_STA_ADC_INTR)) { |
| dev_err(&chip->client->dev, "taos_get_lux data not valid\n"); |
| ret = chip->als_cur_info.lux; /* return LAST VALUE */ |
| goto out_unlock; |
| } |
| |
| for (i = 0; i < 4; i++) { |
| int reg = TSL258X_CMD_REG | (TSL258X_ALS_CHAN0LO + i); |
| ret = taos_i2c_read(chip->client, reg, &buf[i], 1); |
| if (ret < 0) { |
| dev_err(&chip->client->dev, "taos_get_lux failed to read" |
| " register %x\n", reg); |
| goto out_unlock; |
| } |
| } |
| |
| /* clear status, really interrupt status (interrupts are off), but |
| * we use the bit anyway - don't forget 0x80 - this is a command*/ |
| ret = i2c_smbus_write_byte(chip->client, |
| (TSL258X_CMD_REG | TSL258X_CMD_SPL_FN | |
| TSL258X_CMD_ALS_INT_CLR)); |
| |
| if (ret < 0) { |
| dev_err(&chip->client->dev, |
| "taos_i2c_write_command failed in taos_get_lux, err = %d\n", |
| ret); |
| goto out_unlock; /* have no data, so return failure */ |
| } |
| |
| /* extract ALS/lux data */ |
| ch0 = le16_to_cpup((const __le16 *)&buf[0]); |
| ch1 = le16_to_cpup((const __le16 *)&buf[2]); |
| |
| chip->als_cur_info.als_ch0 = ch0; |
| chip->als_cur_info.als_ch1 = ch1; |
| |
| if ((ch0 >= chip->als_saturation) || (ch1 >= chip->als_saturation)) |
| goto return_max; |
| |
| if (ch0 == 0) { |
| /* have no data, so return LAST VALUE */ |
| ret = chip->als_cur_info.lux = 0; |
| goto out_unlock; |
| } |
| /* calculate ratio */ |
| ratio = (ch1 << 15) / ch0; |
| /* convert to unscaled lux using the pointer to the table */ |
| for (p = (struct taos_lux *) taos_device_lux; |
| p->ratio != 0 && p->ratio < ratio; p++) |
| ; |
| |
| if (p->ratio == 0) { |
| lux = 0; |
| } else { |
| ch0lux = ((ch0 * p->ch0) + |
| (gainadj[chip->taos_settings.als_gain].ch0 >> 1)) |
| / gainadj[chip->taos_settings.als_gain].ch0; |
| ch1lux = ((ch1 * p->ch1) + |
| (gainadj[chip->taos_settings.als_gain].ch1 >> 1)) |
| / gainadj[chip->taos_settings.als_gain].ch1; |
| lux = ch0lux - ch1lux; |
| } |
| |
| /* note: lux is 31 bit max at this point */ |
| if (ch1lux > ch0lux) { |
| dev_dbg(&chip->client->dev, "No Data - Return last value\n"); |
| ret = chip->als_cur_info.lux = 0; |
| goto out_unlock; |
| } |
| |
| /* adjust for active time scale */ |
| if (chip->als_time_scale == 0) |
| lux = 0; |
| else |
| lux = (lux + (chip->als_time_scale >> 1)) / |
| chip->als_time_scale; |
| |
| /* Adjust for active gain scale. |
| * The taos_device_lux tables above have a factor of 8192 built in, |
| * so we need to shift right. |
| * User-specified gain provides a multiplier. |
| * Apply user-specified gain before shifting right to retain precision. |
| * Use 64 bits to avoid overflow on multiplication. |
| * Then go back to 32 bits before division to avoid using div_u64(). |
| */ |
| lux64 = lux; |
| lux64 = lux64 * chip->taos_settings.als_gain_trim; |
| lux64 >>= 13; |
| lux = lux64; |
| lux = (lux + 500) / 1000; |
| if (lux > TSL258X_LUX_CALC_OVER_FLOW) { /* check for overflow */ |
| return_max: |
| lux = TSL258X_LUX_CALC_OVER_FLOW; |
| } |
| |
| /* Update the structure with the latest VALID lux. */ |
| chip->als_cur_info.lux = lux; |
| ret = lux; |
| |
| out_unlock: |
| mutex_unlock(&chip->als_mutex); |
| return ret; |
| } |
| |
| /* |
| * Obtain single reading and calculate the als_gain_trim (later used |
| * to derive actual lux). |
| * Return updated gain_trim value. |
| */ |
| static int taos_als_calibrate(struct iio_dev *indio_dev) |
| { |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| u8 reg_val; |
| unsigned int gain_trim_val; |
| int ret; |
| int lux_val; |
| |
| ret = i2c_smbus_write_byte(chip->client, |
| (TSL258X_CMD_REG | TSL258X_CNTRL)); |
| if (ret < 0) { |
| dev_err(&chip->client->dev, |
| "taos_als_calibrate failed to reach the CNTRL register, ret=%d\n", |
| ret); |
| return ret; |
| } |
| |
| reg_val = i2c_smbus_read_byte(chip->client); |
| if ((reg_val & (TSL258X_CNTL_ADC_ENBL | TSL258X_CNTL_PWR_ON)) |
| != (TSL258X_CNTL_ADC_ENBL | TSL258X_CNTL_PWR_ON)) { |
| dev_err(&chip->client->dev, |
| "taos_als_calibrate failed: device not powered on with ADC enabled\n"); |
| return -1; |
| } |
| |
| ret = i2c_smbus_write_byte(chip->client, |
| (TSL258X_CMD_REG | TSL258X_CNTRL)); |
| if (ret < 0) { |
| dev_err(&chip->client->dev, |
| "taos_als_calibrate failed to reach the STATUS register, ret=%d\n", |
| ret); |
| return ret; |
| } |
| reg_val = i2c_smbus_read_byte(chip->client); |
| |
| if ((reg_val & TSL258X_STA_ADC_VALID) != TSL258X_STA_ADC_VALID) { |
| dev_err(&chip->client->dev, |
| "taos_als_calibrate failed: STATUS - ADC not valid.\n"); |
| return -ENODATA; |
| } |
| lux_val = taos_get_lux(indio_dev); |
| if (lux_val < 0) { |
| dev_err(&chip->client->dev, "taos_als_calibrate failed to get lux\n"); |
| return lux_val; |
| } |
| gain_trim_val = (unsigned int) (((chip->taos_settings.als_cal_target) |
| * chip->taos_settings.als_gain_trim) / lux_val); |
| |
| if ((gain_trim_val < 250) || (gain_trim_val > 4000)) { |
| dev_err(&chip->client->dev, |
| "taos_als_calibrate failed: trim_val of %d is out of range\n", |
| gain_trim_val); |
| return -ENODATA; |
| } |
| chip->taos_settings.als_gain_trim = (int) gain_trim_val; |
| |
| return (int) gain_trim_val; |
| } |
| |
| /* |
| * Turn the device on. |
| * Configuration must be set before calling this function. |
| */ |
| static int taos_chip_on(struct iio_dev *indio_dev) |
| { |
| int i; |
| int ret; |
| u8 *uP; |
| u8 utmp; |
| int als_count; |
| int als_time; |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| |
| /* and make sure we're not already on */ |
| if (chip->taos_chip_status == TSL258X_CHIP_WORKING) { |
| /* if forcing a register update - turn off, then on */ |
| dev_info(&chip->client->dev, "device is already enabled\n"); |
| return -EINVAL; |
| } |
| |
| /* determine als integration register */ |
| als_count = (chip->taos_settings.als_time * 100 + 135) / 270; |
| if (als_count == 0) |
| als_count = 1; /* ensure at least one cycle */ |
| |
| /* convert back to time (encompasses overrides) */ |
| als_time = (als_count * 27 + 5) / 10; |
| chip->taos_config[TSL258X_ALS_TIME] = 256 - als_count; |
| |
| /* Set the gain based on taos_settings struct */ |
| chip->taos_config[TSL258X_GAIN] = chip->taos_settings.als_gain; |
| |
| /* set chip struct re scaling and saturation */ |
| chip->als_saturation = als_count * 922; /* 90% of full scale */ |
| chip->als_time_scale = (als_time + 25) / 50; |
| |
| /* TSL258x Specific power-on / adc enable sequence |
| * Power on the device 1st. */ |
| utmp = TSL258X_CNTL_PWR_ON; |
| ret = i2c_smbus_write_byte_data(chip->client, |
| TSL258X_CMD_REG | TSL258X_CNTRL, utmp); |
| if (ret < 0) { |
| dev_err(&chip->client->dev, "taos_chip_on failed on CNTRL reg.\n"); |
| return -1; |
| } |
| |
| /* Use the following shadow copy for our delay before enabling ADC. |
| * Write all the registers. */ |
| for (i = 0, uP = chip->taos_config; i < TSL258X_REG_MAX; i++) { |
| ret = i2c_smbus_write_byte_data(chip->client, |
| TSL258X_CMD_REG + i, |
| *uP++); |
| if (ret < 0) { |
| dev_err(&chip->client->dev, |
| "taos_chip_on failed on reg %d.\n", i); |
| return -1; |
| } |
| } |
| |
| msleep(3); |
| /* NOW enable the ADC |
| * initialize the desired mode of operation */ |
| utmp = TSL258X_CNTL_PWR_ON | TSL258X_CNTL_ADC_ENBL; |
| ret = i2c_smbus_write_byte_data(chip->client, |
| TSL258X_CMD_REG | TSL258X_CNTRL, |
| utmp); |
| if (ret < 0) { |
| dev_err(&chip->client->dev, "taos_chip_on failed on 2nd CTRL reg.\n"); |
| return -1; |
| } |
| chip->taos_chip_status = TSL258X_CHIP_WORKING; |
| |
| return ret; |
| } |
| |
| static int taos_chip_off(struct iio_dev *indio_dev) |
| { |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| int ret; |
| |
| /* turn device off */ |
| chip->taos_chip_status = TSL258X_CHIP_SUSPENDED; |
| ret = i2c_smbus_write_byte_data(chip->client, |
| TSL258X_CMD_REG | TSL258X_CNTRL, |
| 0x00); |
| return ret; |
| } |
| |
| /* Sysfs Interface Functions */ |
| |
| static ssize_t taos_power_state_show(struct device *dev, |
| struct device_attribute *attr, char *buf) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| |
| return sprintf(buf, "%d\n", chip->taos_chip_status); |
| } |
| |
| static ssize_t taos_power_state_store(struct device *dev, |
| struct device_attribute *attr, const char *buf, size_t len) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| unsigned long value; |
| |
| if (strict_strtoul(buf, 0, &value)) |
| return -EINVAL; |
| |
| if (value == 0) |
| taos_chip_off(indio_dev); |
| else |
| taos_chip_on(indio_dev); |
| |
| return len; |
| } |
| |
| static ssize_t taos_gain_show(struct device *dev, |
| struct device_attribute *attr, char *buf) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| char gain[4] = {0}; |
| |
| switch (chip->taos_settings.als_gain) { |
| case 0: |
| strcpy(gain, "001"); |
| break; |
| case 1: |
| strcpy(gain, "008"); |
| break; |
| case 2: |
| strcpy(gain, "016"); |
| break; |
| case 3: |
| strcpy(gain, "111"); |
| break; |
| } |
| |
| return sprintf(buf, "%s\n", gain); |
| } |
| |
| static ssize_t taos_gain_store(struct device *dev, |
| struct device_attribute *attr, const char *buf, size_t len) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| unsigned long value; |
| |
| if (strict_strtoul(buf, 0, &value)) |
| return -EINVAL; |
| |
| switch (value) { |
| case 1: |
| chip->taos_settings.als_gain = 0; |
| break; |
| case 8: |
| chip->taos_settings.als_gain = 1; |
| break; |
| case 16: |
| chip->taos_settings.als_gain = 2; |
| break; |
| case 111: |
| chip->taos_settings.als_gain = 3; |
| break; |
| default: |
| dev_err(dev, "Invalid Gain Index (must be 1,8,16,111)\n"); |
| return -1; |
| } |
| |
| return len; |
| } |
| |
| static ssize_t taos_gain_available_show(struct device *dev, |
| struct device_attribute *attr, char *buf) |
| { |
| return sprintf(buf, "%s\n", "1 8 16 111"); |
| } |
| |
| static ssize_t taos_als_time_show(struct device *dev, |
| struct device_attribute *attr, char *buf) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| |
| return sprintf(buf, "%d\n", chip->taos_settings.als_time); |
| } |
| |
| static ssize_t taos_als_time_store(struct device *dev, |
| struct device_attribute *attr, const char *buf, size_t len) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| unsigned long value; |
| |
| if (strict_strtoul(buf, 0, &value)) |
| return -EINVAL; |
| |
| if ((value < 50) || (value > 650)) |
| return -EINVAL; |
| |
| if (value % 50) |
| return -EINVAL; |
| |
| chip->taos_settings.als_time = value; |
| |
| return len; |
| } |
| |
| static ssize_t taos_als_time_available_show(struct device *dev, |
| struct device_attribute *attr, char *buf) |
| { |
| return sprintf(buf, "%s\n", |
| "50 100 150 200 250 300 350 400 450 500 550 600 650"); |
| } |
| |
| static ssize_t taos_als_trim_show(struct device *dev, |
| struct device_attribute *attr, char *buf) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| |
| return sprintf(buf, "%d\n", chip->taos_settings.als_gain_trim); |
| } |
| |
| static ssize_t taos_als_trim_store(struct device *dev, |
| struct device_attribute *attr, const char *buf, size_t len) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| unsigned long value; |
| |
| if (strict_strtoul(buf, 0, &value)) |
| return -EINVAL; |
| |
| if (value) |
| chip->taos_settings.als_gain_trim = value; |
| |
| return len; |
| } |
| |
| static ssize_t taos_als_cal_target_show(struct device *dev, |
| struct device_attribute *attr, char *buf) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| |
| return sprintf(buf, "%d\n", chip->taos_settings.als_cal_target); |
| } |
| |
| static ssize_t taos_als_cal_target_store(struct device *dev, |
| struct device_attribute *attr, const char *buf, size_t len) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| unsigned long value; |
| |
| if (strict_strtoul(buf, 0, &value)) |
| return -EINVAL; |
| |
| if (value) |
| chip->taos_settings.als_cal_target = value; |
| |
| return len; |
| } |
| |
| static ssize_t taos_lux_show(struct device *dev, struct device_attribute *attr, |
| char *buf) |
| { |
| int ret; |
| |
| ret = taos_get_lux(dev_to_iio_dev(dev)); |
| if (ret < 0) |
| return ret; |
| |
| return sprintf(buf, "%d\n", ret); |
| } |
| |
| static ssize_t taos_do_calibrate(struct device *dev, |
| struct device_attribute *attr, const char *buf, size_t len) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| unsigned long value; |
| |
| if (strict_strtoul(buf, 0, &value)) |
| return -EINVAL; |
| |
| if (value == 1) |
| taos_als_calibrate(indio_dev); |
| |
| return len; |
| } |
| |
| static ssize_t taos_luxtable_show(struct device *dev, |
| struct device_attribute *attr, char *buf) |
| { |
| int i; |
| int offset = 0; |
| |
| for (i = 0; i < ARRAY_SIZE(taos_device_lux); i++) { |
| offset += sprintf(buf + offset, "%d,%d,%d,", |
| taos_device_lux[i].ratio, |
| taos_device_lux[i].ch0, |
| taos_device_lux[i].ch1); |
| if (taos_device_lux[i].ratio == 0) { |
| /* We just printed the first "0" entry. |
| * Now get rid of the extra "," and break. */ |
| offset--; |
| break; |
| } |
| } |
| |
| offset += sprintf(buf + offset, "\n"); |
| return offset; |
| } |
| |
| static ssize_t taos_luxtable_store(struct device *dev, |
| struct device_attribute *attr, const char *buf, size_t len) |
| { |
| struct iio_dev *indio_dev = dev_to_iio_dev(dev); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| int value[ARRAY_SIZE(taos_device_lux)*3 + 1]; |
| int n; |
| |
| get_options(buf, ARRAY_SIZE(value), value); |
| |
| /* We now have an array of ints starting at value[1], and |
| * enumerated by value[0]. |
| * We expect each group of three ints is one table entry, |
| * and the last table entry is all 0. |
| */ |
| n = value[0]; |
| if ((n % 3) || n < 6 || n > ((ARRAY_SIZE(taos_device_lux) - 1) * 3)) { |
| dev_info(dev, "LUX TABLE INPUT ERROR 1 Value[0]=%d\n", n); |
| return -EINVAL; |
| } |
| if ((value[(n - 2)] | value[(n - 1)] | value[n]) != 0) { |
| dev_info(dev, "LUX TABLE INPUT ERROR 2 Value[0]=%d\n", n); |
| return -EINVAL; |
| } |
| |
| if (chip->taos_chip_status == TSL258X_CHIP_WORKING) |
| taos_chip_off(indio_dev); |
| |
| /* Zero out the table */ |
| memset(taos_device_lux, 0, sizeof(taos_device_lux)); |
| memcpy(taos_device_lux, &value[1], (value[0] * 4)); |
| |
| taos_chip_on(indio_dev); |
| |
| return len; |
| } |
| |
| static DEVICE_ATTR(power_state, S_IRUGO | S_IWUSR, |
| taos_power_state_show, taos_power_state_store); |
| |
| static DEVICE_ATTR(illuminance0_calibscale, S_IRUGO | S_IWUSR, |
| taos_gain_show, taos_gain_store); |
| static DEVICE_ATTR(illuminance0_calibscale_available, S_IRUGO, |
| taos_gain_available_show, NULL); |
| |
| static DEVICE_ATTR(illuminance0_integration_time, S_IRUGO | S_IWUSR, |
| taos_als_time_show, taos_als_time_store); |
| static DEVICE_ATTR(illuminance0_integration_time_available, S_IRUGO, |
| taos_als_time_available_show, NULL); |
| |
| static DEVICE_ATTR(illuminance0_calibbias, S_IRUGO | S_IWUSR, |
| taos_als_trim_show, taos_als_trim_store); |
| |
| static DEVICE_ATTR(illuminance0_input_target, S_IRUGO | S_IWUSR, |
| taos_als_cal_target_show, taos_als_cal_target_store); |
| |
| static DEVICE_ATTR(illuminance0_input, S_IRUGO, taos_lux_show, NULL); |
| static DEVICE_ATTR(illuminance0_calibrate, S_IWUSR, NULL, taos_do_calibrate); |
| static DEVICE_ATTR(illuminance0_lux_table, S_IRUGO | S_IWUSR, |
| taos_luxtable_show, taos_luxtable_store); |
| |
| static struct attribute *sysfs_attrs_ctrl[] = { |
| &dev_attr_power_state.attr, |
| &dev_attr_illuminance0_calibscale.attr, /* Gain */ |
| &dev_attr_illuminance0_calibscale_available.attr, |
| &dev_attr_illuminance0_integration_time.attr, /* I time*/ |
| &dev_attr_illuminance0_integration_time_available.attr, |
| &dev_attr_illuminance0_calibbias.attr, /* trim */ |
| &dev_attr_illuminance0_input_target.attr, |
| &dev_attr_illuminance0_input.attr, |
| &dev_attr_illuminance0_calibrate.attr, |
| &dev_attr_illuminance0_lux_table.attr, |
| NULL |
| }; |
| |
| static struct attribute_group tsl2583_attribute_group = { |
| .attrs = sysfs_attrs_ctrl, |
| }; |
| |
| /* Use the default register values to identify the Taos device */ |
| static int taos_tsl258x_device(unsigned char *bufp) |
| { |
| return ((bufp[TSL258X_CHIPID] & 0xf0) == 0x90); |
| } |
| |
| static const struct iio_info tsl2583_info = { |
| .attrs = &tsl2583_attribute_group, |
| .driver_module = THIS_MODULE, |
| }; |
| |
| /* |
| * Client probe function - When a valid device is found, the driver's device |
| * data structure is updated, and initialization completes successfully. |
| */ |
| static int __devinit taos_probe(struct i2c_client *clientp, |
| const struct i2c_device_id *idp) |
| { |
| int i, ret; |
| unsigned char buf[TSL258X_MAX_DEVICE_REGS]; |
| struct tsl2583_chip *chip; |
| struct iio_dev *indio_dev; |
| |
| if (!i2c_check_functionality(clientp->adapter, |
| I2C_FUNC_SMBUS_BYTE_DATA)) { |
| dev_err(&clientp->dev, |
| "taos_probe() - i2c smbus byte data " |
| "functions unsupported\n"); |
| return -EOPNOTSUPP; |
| } |
| |
| indio_dev = iio_device_alloc(sizeof(*chip)); |
| if (indio_dev == NULL) { |
| ret = -ENOMEM; |
| dev_err(&clientp->dev, "iio allocation failed\n"); |
| goto fail1; |
| } |
| chip = iio_priv(indio_dev); |
| chip->client = clientp; |
| i2c_set_clientdata(clientp, indio_dev); |
| |
| mutex_init(&chip->als_mutex); |
| chip->taos_chip_status = TSL258X_CHIP_UNKNOWN; |
| memcpy(chip->taos_config, taos_config, sizeof(chip->taos_config)); |
| |
| for (i = 0; i < TSL258X_MAX_DEVICE_REGS; i++) { |
| ret = i2c_smbus_write_byte(clientp, |
| (TSL258X_CMD_REG | (TSL258X_CNTRL + i))); |
| if (ret < 0) { |
| dev_err(&clientp->dev, "i2c_smbus_write_bytes() to cmd " |
| "reg failed in taos_probe(), err = %d\n", ret); |
| goto fail2; |
| } |
| ret = i2c_smbus_read_byte(clientp); |
| if (ret < 0) { |
| dev_err(&clientp->dev, "i2c_smbus_read_byte from " |
| "reg failed in taos_probe(), err = %d\n", ret); |
| |
| goto fail2; |
| } |
| buf[i] = ret; |
| } |
| |
| if (!taos_tsl258x_device(buf)) { |
| dev_info(&clientp->dev, "i2c device found but does not match " |
| "expected id in taos_probe()\n"); |
| goto fail2; |
| } |
| |
| ret = i2c_smbus_write_byte(clientp, (TSL258X_CMD_REG | TSL258X_CNTRL)); |
| if (ret < 0) { |
| dev_err(&clientp->dev, "i2c_smbus_write_byte() to cmd reg " |
| "failed in taos_probe(), err = %d\n", ret); |
| goto fail2; |
| } |
| |
| indio_dev->info = &tsl2583_info; |
| indio_dev->dev.parent = &clientp->dev; |
| indio_dev->modes = INDIO_DIRECT_MODE; |
| indio_dev->name = chip->client->name; |
| ret = iio_device_register(indio_dev); |
| if (ret) { |
| dev_err(&clientp->dev, "iio registration failed\n"); |
| goto fail2; |
| } |
| |
| /* Load up the V2 defaults (these are hard coded defaults for now) */ |
| taos_defaults(chip); |
| |
| /* Make sure the chip is on */ |
| taos_chip_on(indio_dev); |
| |
| dev_info(&clientp->dev, "Light sensor found.\n"); |
| return 0; |
| fail1: |
| iio_device_free(indio_dev); |
| fail2: |
| return ret; |
| } |
| |
| #ifdef CONFIG_PM_SLEEP |
| static int taos_suspend(struct device *dev) |
| { |
| struct iio_dev *indio_dev = i2c_get_clientdata(to_i2c_client(dev)); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| int ret = 0; |
| |
| mutex_lock(&chip->als_mutex); |
| |
| if (chip->taos_chip_status == TSL258X_CHIP_WORKING) { |
| ret = taos_chip_off(indio_dev); |
| chip->taos_chip_status = TSL258X_CHIP_SUSPENDED; |
| } |
| |
| mutex_unlock(&chip->als_mutex); |
| return ret; |
| } |
| |
| static int taos_resume(struct device *dev) |
| { |
| struct iio_dev *indio_dev = i2c_get_clientdata(to_i2c_client(dev)); |
| struct tsl2583_chip *chip = iio_priv(indio_dev); |
| int ret = 0; |
| |
| mutex_lock(&chip->als_mutex); |
| |
| if (chip->taos_chip_status == TSL258X_CHIP_SUSPENDED) |
| ret = taos_chip_on(indio_dev); |
| |
| mutex_unlock(&chip->als_mutex); |
| return ret; |
| } |
| |
| static SIMPLE_DEV_PM_OPS(taos_pm_ops, taos_suspend, taos_resume); |
| #define TAOS_PM_OPS (&taos_pm_ops) |
| #else |
| #define TAOS_PM_OPS NULL |
| #endif |
| |
| static int __devexit taos_remove(struct i2c_client *client) |
| { |
| iio_device_unregister(i2c_get_clientdata(client)); |
| iio_device_free(i2c_get_clientdata(client)); |
| |
| return 0; |
| } |
| |
| static struct i2c_device_id taos_idtable[] = { |
| { "tsl2580", 0 }, |
| { "tsl2581", 1 }, |
| { "tsl2583", 2 }, |
| {} |
| }; |
| MODULE_DEVICE_TABLE(i2c, taos_idtable); |
| |
| /* Driver definition */ |
| static struct i2c_driver taos_driver = { |
| .driver = { |
| .name = "tsl2583", |
| .pm = TAOS_PM_OPS, |
| }, |
| .id_table = taos_idtable, |
| .probe = taos_probe, |
| .remove = __devexit_p(taos_remove), |
| }; |
| module_i2c_driver(taos_driver); |
| |
| MODULE_AUTHOR("J. August Brenner<jbrenner@taosinc.com>"); |
| MODULE_DESCRIPTION("TAOS tsl2583 ambient light sensor driver"); |
| MODULE_LICENSE("GPL"); |