[deliverable/linux.git] / drivers / staging / iio / light / isl29018.c

/*
 * A iio driver for the light sensor ISL 29018.
 *
 * IIO driver for monitoring ambient light intensity in luxi, proximity
 * sensing and infrared sensing.
 *
 * Copyright (c) 2010, NVIDIA 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/module.h>
#include <linux/i2c.h>
#include <linux/err.h>
#include <linux/mutex.h>
#include <linux/delay.h>
#include <linux/slab.h>
#include "../iio.h"

#define CONVERSION_TIME_MS		100

#define ISL29018_REG_ADD_COMMAND1	0x00
#define COMMMAND1_OPMODE_SHIFT		5
#define COMMMAND1_OPMODE_MASK		(7 << COMMMAND1_OPMODE_SHIFT)
#define COMMMAND1_OPMODE_POWER_DOWN	0
#define COMMMAND1_OPMODE_ALS_ONCE	1
#define COMMMAND1_OPMODE_IR_ONCE	2
#define COMMMAND1_OPMODE_PROX_ONCE	3

#define ISL29018_REG_ADD_COMMANDII	0x01
#define COMMANDII_RESOLUTION_SHIFT	2
#define COMMANDII_RESOLUTION_MASK	(0x3 << COMMANDII_RESOLUTION_SHIFT)

#define COMMANDII_RANGE_SHIFT		0
#define COMMANDII_RANGE_MASK		(0x3 << COMMANDII_RANGE_SHIFT)

#define COMMANDII_SCHEME_SHIFT		7
#define COMMANDII_SCHEME_MASK		(0x1 << COMMANDII_SCHEME_SHIFT)

#define ISL29018_REG_ADD_DATA_LSB	0x02
#define ISL29018_REG_ADD_DATA_MSB	0x03
#define ISL29018_MAX_REGS		ISL29018_REG_ADD_DATA_MSB

struct isl29018_chip {
	struct iio_dev		*indio_dev;
	struct i2c_client	*client;
	struct mutex		lock;
	unsigned int		range;
	unsigned int		adc_bit;
	int			prox_scheme;
	u8			reg_cache[ISL29018_MAX_REGS];
};

static int isl29018_write_data(struct i2c_client *client, u8 reg,
			u8 val, u8 mask, u8 shift)
{
	u8 regval;
	int ret = 0;
	struct isl29018_chip *chip = i2c_get_clientdata(client);

	regval = chip->reg_cache[reg];
	regval &= ~mask;
	regval |= val << shift;

	ret = i2c_smbus_write_byte_data(client, reg, regval);
	if (ret) {
		dev_err(&client->dev, "Write to device fails status %x\n", ret);
		return ret;
	}
	chip->reg_cache[reg] = regval;

	return 0;
}

static int isl29018_set_range(struct i2c_client *client, unsigned long range,
		unsigned int *new_range)
{
	static const unsigned long supp_ranges[] = {1000, 4000, 16000, 64000};
	int i;

	for (i = 0; i < ARRAY_SIZE(supp_ranges); ++i) {
		if (range <= supp_ranges[i]) {
			*new_range = (unsigned int)supp_ranges[i];
			break;
		}
	}

	if (i >= ARRAY_SIZE(supp_ranges))
		return -EINVAL;

	return isl29018_write_data(client, ISL29018_REG_ADD_COMMANDII,
			i, COMMANDII_RANGE_MASK, COMMANDII_RANGE_SHIFT);
}

static int isl29018_set_resolution(struct i2c_client *client,
			unsigned long adcbit, unsigned int *conf_adc_bit)
{
	static const unsigned long supp_adcbit[] = {16, 12, 8, 4};
	int i;

	for (i = 0; i < ARRAY_SIZE(supp_adcbit); ++i) {
		if (adcbit >= supp_adcbit[i]) {
			*conf_adc_bit = (unsigned int)supp_adcbit[i];
			break;
		}
	}

	if (i >= ARRAY_SIZE(supp_adcbit))
		return -EINVAL;

	return isl29018_write_data(client, ISL29018_REG_ADD_COMMANDII,
			i, COMMANDII_RESOLUTION_MASK,
			COMMANDII_RESOLUTION_SHIFT);
}

static int isl29018_read_sensor_input(struct i2c_client *client, int mode)
{
	int status;
	int lsb;
	int msb;

	/* Set mode */
	status = isl29018_write_data(client, ISL29018_REG_ADD_COMMAND1,
			mode, COMMMAND1_OPMODE_MASK, COMMMAND1_OPMODE_SHIFT);
	if (status) {
		dev_err(&client->dev, "Error in setting operating mode\n");
		return status;
	}
	msleep(CONVERSION_TIME_MS);
	lsb = i2c_smbus_read_byte_data(client, ISL29018_REG_ADD_DATA_LSB);
	if (lsb < 0) {
		dev_err(&client->dev, "Error in reading LSB DATA\n");
		return lsb;
	}

	msb = i2c_smbus_read_byte_data(client, ISL29018_REG_ADD_DATA_MSB);
	if (msb < 0) {
		dev_err(&client->dev, "Error in reading MSB DATA\n");
		return msb;
	}
	dev_vdbg(&client->dev, "MSB 0x%x and LSB 0x%x\n", msb, lsb);

	return (msb << 8) | lsb;
}

static int isl29018_read_lux(struct i2c_client *client, int *lux)
{
	int lux_data;
	struct isl29018_chip *chip = i2c_get_clientdata(client);

	lux_data = isl29018_read_sensor_input(client,
				COMMMAND1_OPMODE_ALS_ONCE);

	if (lux_data < 0)
		return lux_data;

	*lux = (lux_data * chip->range) >> chip->adc_bit;

	return 0;
}

static int isl29018_read_ir(struct i2c_client *client, int *ir)
{
	int ir_data;

	ir_data = isl29018_read_sensor_input(client, COMMMAND1_OPMODE_IR_ONCE);

	if (ir_data < 0)
		return ir_data;

	*ir = ir_data;

	return 0;
}

static int isl29018_read_proximity_ir(struct i2c_client *client, int scheme,
		int *near_ir)
{
	int status;
	int prox_data = -1;
	int ir_data = -1;

	/* Do proximity sensing with required scheme */
	status = isl29018_write_data(client, ISL29018_REG_ADD_COMMANDII,
			scheme, COMMANDII_SCHEME_MASK, COMMANDII_SCHEME_SHIFT);
	if (status) {
		dev_err(&client->dev, "Error in setting operating mode\n");
		return status;
	}

	prox_data = isl29018_read_sensor_input(client,
					COMMMAND1_OPMODE_PROX_ONCE);
	if (prox_data < 0)
		return prox_data;

	if (scheme == 1) {
		*near_ir = prox_data;
		return 0;
	}

	ir_data = isl29018_read_sensor_input(client,
				COMMMAND1_OPMODE_IR_ONCE);

	if (ir_data < 0)
		return ir_data;

	if (prox_data >= ir_data)
		*near_ir = prox_data - ir_data;
	else
		*near_ir = 0;

	return 0;
}

static ssize_t get_sensor_data(struct device *dev, char *buf, int mode)
{
	struct iio_dev *indio_dev = dev_get_drvdata(dev);
	struct isl29018_chip *chip = indio_dev->dev_data;
	struct i2c_client *client = chip->client;
	int value = 0;
	int status;

	mutex_lock(&chip->lock);
	switch (mode) {
	case COMMMAND1_OPMODE_PROX_ONCE:
		status = isl29018_read_proximity_ir(client,
				chip->prox_scheme, &value);
		break;

	case COMMMAND1_OPMODE_ALS_ONCE:
		status = isl29018_read_lux(client, &value);
		break;

	case COMMMAND1_OPMODE_IR_ONCE:
		status = isl29018_read_ir(client, &value);
		break;

	default:
		dev_err(&client->dev, "Mode %d is not supported\n", mode);
		mutex_unlock(&chip->lock);
		return -EBUSY;
	}
	if (status < 0) {
		dev_err(&client->dev, "Error in Reading data");
		mutex_unlock(&chip->lock);
		return status;
	}

	mutex_unlock(&chip->lock);

	return sprintf(buf, "%d\n", value);
}

/* Sysfs interface */
/* range */
static ssize_t show_range(struct device *dev,
			struct device_attribute *attr, char *buf)
{
	struct iio_dev *indio_dev = dev_get_drvdata(dev);
	struct isl29018_chip *chip = indio_dev->dev_data;

	return sprintf(buf, "%u\n", chip->range);
}

static ssize_t store_range(struct device *dev,
		struct device_attribute *attr, const char *buf, size_t count)
{
	struct iio_dev *indio_dev = dev_get_drvdata(dev);
	struct isl29018_chip *chip = indio_dev->dev_data;
	struct i2c_client *client = chip->client;
	int status;
	unsigned long lval;
	unsigned int new_range;

	if (strict_strtoul(buf, 10, &lval))
		return -EINVAL;

	if (!(lval == 1000UL || lval == 4000UL ||
			lval == 16000UL || lval == 64000UL)) {
		dev_err(dev, "The range is not supported\n");
		return -EINVAL;
	}

	mutex_lock(&chip->lock);
	status = isl29018_set_range(client, lval, &new_range);
	if (status < 0) {
		mutex_unlock(&chip->lock);
		dev_err(dev, "Error in setting max range\n");
		return status;
	}
	chip->range = new_range;
	mutex_unlock(&chip->lock);

	return count;
}

/* resolution */
static ssize_t show_resolution(struct device *dev,
			struct device_attribute *attr, char *buf)
{
	struct iio_dev *indio_dev = dev_get_drvdata(dev);
	struct isl29018_chip *chip = indio_dev->dev_data;

	return sprintf(buf, "%u\n", chip->adc_bit);
}

static ssize_t store_resolution(struct device *dev,
		struct device_attribute *attr, const char *buf, size_t count)
{
	struct iio_dev *indio_dev = dev_get_drvdata(dev);
	struct isl29018_chip *chip = indio_dev->dev_data;
	struct i2c_client *client = chip->client;
	int status;
	unsigned long lval;
	unsigned int new_adc_bit;

	if (strict_strtoul(buf, 10, &lval))
		return -EINVAL;
	if (!(lval == 4 || lval == 8 || lval == 12 || lval == 16)) {
		dev_err(dev, "The resolution is not supported\n");
		return -EINVAL;
	}

	mutex_lock(&chip->lock);
	status = isl29018_set_resolution(client, lval, &new_adc_bit);
	if (status < 0) {
		mutex_unlock(&chip->lock);
		dev_err(dev, "Error in setting resolution\n");
		return status;
	}
	chip->adc_bit = new_adc_bit;
	mutex_unlock(&chip->lock);

	return count;
}

/* proximity scheme */
static ssize_t show_prox_infrared_supression(struct device *dev,
			struct device_attribute *attr, char *buf)
{
	struct iio_dev *indio_dev = dev_get_drvdata(dev);
	struct isl29018_chip *chip = indio_dev->dev_data;

	/* return the "proximity scheme" i.e. if the chip does on chip
	infrared supression (1 means perform on chip supression) */
	return sprintf(buf, "%d\n", chip->prox_scheme);
}

static ssize_t store_prox_infrared_supression(struct device *dev,
		struct device_attribute *attr, const char *buf, size_t count)
{
	struct iio_dev *indio_dev = dev_get_drvdata(dev);
	struct isl29018_chip *chip = indio_dev->dev_data;
	unsigned long lval;

	if (strict_strtoul(buf, 10, &lval))
		return -EINVAL;
	if (!(lval == 0UL || lval == 1UL)) {
		dev_err(dev, "The mode is not supported\n");
		return -EINVAL;
	}

	/* get the  "proximity scheme" i.e. if the chip does on chip
	infrared supression (1 means perform on chip supression) */
	mutex_lock(&chip->lock);
	chip->prox_scheme = (int)lval;
	mutex_unlock(&chip->lock);

	return count;
}

/* Read lux */
static ssize_t show_lux(struct device *dev,
		struct device_attribute *devattr, char *buf)
{
	return get_sensor_data(dev, buf, COMMMAND1_OPMODE_ALS_ONCE);
}

/* Read ir */
static ssize_t show_ir(struct device *dev,
		struct device_attribute *devattr, char *buf)
{
	return get_sensor_data(dev, buf, COMMMAND1_OPMODE_IR_ONCE);
}

/* Read nearest ir */
static ssize_t show_proxim_ir(struct device *dev,
		struct device_attribute *devattr, char *buf)
{
	return get_sensor_data(dev, buf, COMMMAND1_OPMODE_PROX_ONCE);
}

static IIO_DEVICE_ATTR(range, S_IRUGO | S_IWUSR, show_range, store_range, 0);
static IIO_CONST_ATTR(range_available, "1000 4000 16000 64000");
static IIO_CONST_ATTR(adc_resolution_available, "4 8 12 16");
static IIO_DEVICE_ATTR(adc_resolution, S_IRUGO | S_IWUSR,
					show_resolution, store_resolution, 0);
static IIO_DEVICE_ATTR(proximity_on_chip_ambient_infrared_supression,
					S_IRUGO | S_IWUSR,
					show_prox_infrared_supression,
					store_prox_infrared_supression, 0);
static IIO_DEVICE_ATTR(illuminance0_input, S_IRUGO, show_lux, NULL, 0);
static IIO_DEVICE_ATTR(intensity_infrared_raw, S_IRUGO, show_ir, NULL, 0);
static IIO_DEVICE_ATTR(proximity_raw, S_IRUGO, show_proxim_ir, NULL, 0);

#define ISL29018_DEV_ATTR(name) (&iio_dev_attr_##name.dev_attr.attr)
#define ISL29018_CONST_ATTR(name) (&iio_const_attr_##name.dev_attr.attr)
static struct attribute *isl29018_attributes[] = {
	ISL29018_DEV_ATTR(range),
	ISL29018_CONST_ATTR(range_available),
	ISL29018_DEV_ATTR(adc_resolution),
	ISL29018_CONST_ATTR(adc_resolution_available),
	ISL29018_DEV_ATTR(proximity_on_chip_ambient_infrared_supression),
	ISL29018_DEV_ATTR(illuminance0_input),
	ISL29018_DEV_ATTR(intensity_infrared_raw),
	ISL29018_DEV_ATTR(proximity_raw),
	NULL
};

static const struct attribute_group isl29108_group = {
	.attrs = isl29018_attributes,
};

static int isl29018_chip_init(struct i2c_client *client)
{
	struct isl29018_chip *chip = i2c_get_clientdata(client);
	int status;
	int new_adc_bit;
	unsigned int new_range;

	memset(chip->reg_cache, 0, sizeof(chip->reg_cache));

	/* set defaults */
	status = isl29018_set_range(client, chip->range, &new_range);
	if (status < 0) {
		dev_err(&client->dev, "Init of isl29018 fails\n");
		return status;
	}

	status = isl29018_set_resolution(client, chip->adc_bit,
						&new_adc_bit);

	return 0;
}

static const struct iio_info isl29108_info = {
	.attrs = &isl29108_group,
	.driver_module = THIS_MODULE,
};

static int __devinit isl29018_probe(struct i2c_client *client,
			 const struct i2c_device_id *id)
{
	struct isl29018_chip *chip;
	int err;

	chip = kzalloc(sizeof(struct isl29018_chip), GFP_KERNEL);
	if (!chip) {
		dev_err(&client->dev, "Memory allocation fails\n");
		err = -ENOMEM;
		goto exit;
	}

	i2c_set_clientdata(client, chip);
	chip->client = client;

	mutex_init(&chip->lock);

	chip->range = 1000;
	chip->adc_bit = 16;

	err = isl29018_chip_init(client);
	if (err)
		goto exit_free;

	chip->indio_dev = iio_allocate_device(0);
	if (!chip->indio_dev) {
		dev_err(&client->dev, "iio allocation fails\n");
		goto exit_free;
	}
	chip->indio_dev->info = &isl29108_info;
	chip->indio_dev->name = id->name;
	chip->indio_dev->dev.parent = &client->dev;
	chip->indio_dev->dev_data = (void *)(chip);
	chip->indio_dev->modes = INDIO_DIRECT_MODE;
	err = iio_device_register(chip->indio_dev);
	if (err) {
		dev_err(&client->dev, "iio registration fails\n");
		goto exit_iio_free;
	}

	return 0;
exit_iio_free:
	iio_free_device(chip->indio_dev);
exit_free:
	kfree(chip);
exit:
	return err;
}

static int __devexit isl29018_remove(struct i2c_client *client)
{
	struct isl29018_chip *chip = i2c_get_clientdata(client);

	dev_dbg(&client->dev, "%s()\n", __func__);
	iio_device_unregister(chip->indio_dev);
	kfree(chip);

	return 0;
}

static const struct i2c_device_id isl29018_id[] = {
	{"isl29018", 0},
	{}
};

MODULE_DEVICE_TABLE(i2c, isl29018_id);

static struct i2c_driver isl29018_driver = {
	.class	= I2C_CLASS_HWMON,
	.driver	 = {
			.name = "isl29018",
			.owner = THIS_MODULE,
		    },
	.probe	 = isl29018_probe,
	.remove	 = __devexit_p(isl29018_remove),
	.id_table = isl29018_id,
};

static int __init isl29018_init(void)
{
	return i2c_add_driver(&isl29018_driver);
}

static void __exit isl29018_exit(void)
{
	i2c_del_driver(&isl29018_driver);
}

module_init(isl29018_init);
module_exit(isl29018_exit);

MODULE_DESCRIPTION("ISL29018 Ambient Light Sensor driver");
MODULE_LICENSE("GPL");
Commit	Line	Data
94042874 RK	1	/*
	2	* A iio driver for the light sensor ISL 29018.
	3	*
	4	* IIO driver for monitoring ambient light intensity in luxi, proximity
	5	* sensing and infrared sensing.
	6	*
	7	* Copyright (c) 2010, NVIDIA Corporation.
	8	*
	9	* This program is free software; you can redistribute it and/or modify
	10	* it under the terms of the GNU General Public License as published by
	11	* the Free Software Foundation; either version 2 of the License, or
	12	* (at your option) any later version.
	13	*
	14	* This program is distributed in the hope that it will be useful, but WITHOUT
	15	* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
	16	* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
	17	* more details.
	18	*
	19	* You should have received a copy of the GNU General Public License along
	20	* with this program; if not, write to the Free Software Foundation, Inc.,
	21	* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
	22	*/
	23
	24	#include <linux/module.h>
	25	#include <linux/i2c.h>
	26	#include <linux/err.h>
	27	#include <linux/mutex.h>
	28	#include <linux/delay.h>
	29	#include <linux/slab.h>
	30	#include "../iio.h"
	31
	32	#define CONVERSION_TIME_MS 100
	33
	34	#define ISL29018_REG_ADD_COMMAND1 0x00
	35	#define COMMMAND1_OPMODE_SHIFT 5
	36	#define COMMMAND1_OPMODE_MASK (7 << COMMMAND1_OPMODE_SHIFT)
	37	#define COMMMAND1_OPMODE_POWER_DOWN 0
	38	#define COMMMAND1_OPMODE_ALS_ONCE 1
	39	#define COMMMAND1_OPMODE_IR_ONCE 2
	40	#define COMMMAND1_OPMODE_PROX_ONCE 3
	41
	42	#define ISL29018_REG_ADD_COMMANDII 0x01
	43	#define COMMANDII_RESOLUTION_SHIFT 2
	44	#define COMMANDII_RESOLUTION_MASK (0x3 << COMMANDII_RESOLUTION_SHIFT)
	45
	46	#define COMMANDII_RANGE_SHIFT 0
	47	#define COMMANDII_RANGE_MASK (0x3 << COMMANDII_RANGE_SHIFT)
	48
	49	#define COMMANDII_SCHEME_SHIFT 7
	50	#define COMMANDII_SCHEME_MASK (0x1 << COMMANDII_SCHEME_SHIFT)
	51
	52	#define ISL29018_REG_ADD_DATA_LSB 0x02
	53	#define ISL29018_REG_ADD_DATA_MSB 0x03
	54	#define ISL29018_MAX_REGS ISL29018_REG_ADD_DATA_MSB
	55
	56	struct isl29018_chip {
	57	struct iio_dev *indio_dev;
	58	struct i2c_client *client;
	59	struct mutex lock;
	60	unsigned int range;
	61	unsigned int adc_bit;
	62	int prox_scheme;
	63	u8 reg_cache[ISL29018_MAX_REGS];
	64	};
65
66	static int isl29018_write_data(struct i2c_client *client, u8 reg,
67	u8 val, u8 mask, u8 shift)
68	{
69	u8 regval;
70	int ret = 0;
71	struct isl29018_chip *chip = i2c_get_clientdata(client);
72
73	regval = chip->reg_cache[reg];
74	regval &= ~mask;
75	regval \|= val << shift;
76
77	ret = i2c_smbus_write_byte_data(client, reg, regval);
78	if (ret) {
79	dev_err(&client->dev, "Write to device fails status %x\n", ret);
80	return ret;
81	}
82	chip->reg_cache[reg] = regval;
83
84	return 0;
85	}
86
87	static int isl29018_set_range(struct i2c_client *client, unsigned long range,
88	unsigned int *new_range)
89	{
90	static const unsigned long supp_ranges[] = {1000, 4000, 16000, 64000};
91	int i;
92
93	for (i = 0; i < ARRAY_SIZE(supp_ranges); ++i) {
94	if (range <= supp_ranges[i]) {
95	*new_range = (unsigned int)supp_ranges[i];
96	break;
97	}
98	}
99
100	if (i >= ARRAY_SIZE(supp_ranges))
101	return -EINVAL;
102
103	return isl29018_write_data(client, ISL29018_REG_ADD_COMMANDII,
104	i, COMMANDII_RANGE_MASK, COMMANDII_RANGE_SHIFT);
105	}
106
107	static int isl29018_set_resolution(struct i2c_client *client,
108	unsigned long adcbit, unsigned int *conf_adc_bit)
109	{
110	static const unsigned long supp_adcbit[] = {16, 12, 8, 4};
111	int i;
112
113	for (i = 0; i < ARRAY_SIZE(supp_adcbit); ++i) {
114	if (adcbit >= supp_adcbit[i]) {
115	*conf_adc_bit = (unsigned int)supp_adcbit[i];
116	break;
117	}
118	}
119
120	if (i >= ARRAY_SIZE(supp_adcbit))
121	return -EINVAL;
122
123	return isl29018_write_data(client, ISL29018_REG_ADD_COMMANDII,
124	i, COMMANDII_RESOLUTION_MASK,
125	COMMANDII_RESOLUTION_SHIFT);
126	}
127
128	static int isl29018_read_sensor_input(struct i2c_client *client, int mode)
129	{
130	int status;
131	int lsb;
132	int msb;
133
134	/* Set mode */
135	status = isl29018_write_data(client, ISL29018_REG_ADD_COMMAND1,
136	mode, COMMMAND1_OPMODE_MASK, COMMMAND1_OPMODE_SHIFT);
137	if (status) {
138	dev_err(&client->dev, "Error in setting operating mode\n");
139	return status;
140	}
141	msleep(CONVERSION_TIME_MS);
142	lsb = i2c_smbus_read_byte_data(client, ISL29018_REG_ADD_DATA_LSB);
143	if (lsb < 0) {
144	dev_err(&client->dev, "Error in reading LSB DATA\n");
145	return lsb;
146	}
147
148	msb = i2c_smbus_read_byte_data(client, ISL29018_REG_ADD_DATA_MSB);
149	if (msb < 0) {
150	dev_err(&client->dev, "Error in reading MSB DATA\n");
151	return msb;
152	}
153	dev_vdbg(&client->dev, "MSB 0x%x and LSB 0x%x\n", msb, lsb);
154
155	return (msb << 8) \| lsb;
156	}
157
158	static int isl29018_read_lux(struct i2c_client client, int lux)
159	{
160	int lux_data;
161	struct isl29018_chip *chip = i2c_get_clientdata(client);
162
163	lux_data = isl29018_read_sensor_input(client,
164	COMMMAND1_OPMODE_ALS_ONCE);
165
166	if (lux_data < 0)
167	return lux_data;
168
169	lux = (lux_data chip->range) >> chip->adc_bit;
170
171	return 0;
172	}
173
174	static int isl29018_read_ir(struct i2c_client client, int ir)
175	{
176	int ir_data;
177
178	ir_data = isl29018_read_sensor_input(client, COMMMAND1_OPMODE_IR_ONCE);
179
180	if (ir_data < 0)
181	return ir_data;
182
183	*ir = ir_data;
184
185	return 0;
186	}
187
188	static int isl29018_read_proximity_ir(struct i2c_client *client, int scheme,
189	int *near_ir)
190	{
191	int status;
192	int prox_data = -1;
193	int ir_data = -1;
194
195	/* Do proximity sensing with required scheme */
196	status = isl29018_write_data(client, ISL29018_REG_ADD_COMMANDII,
197	scheme, COMMANDII_SCHEME_MASK, COMMANDII_SCHEME_SHIFT);
198	if (status) {
199	dev_err(&client->dev, "Error in setting operating mode\n");
200	return status;
201	}
202
203	prox_data = isl29018_read_sensor_input(client,
204	COMMMAND1_OPMODE_PROX_ONCE);
205	if (prox_data < 0)
206	return prox_data;
207
208	if (scheme == 1) {
209	*near_ir = prox_data;
210	return 0;
211	}
212
213	ir_data = isl29018_read_sensor_input(client,
214	COMMMAND1_OPMODE_IR_ONCE);
215
216	if (ir_data < 0)
217	return ir_data;
218
219	if (prox_data >= ir_data)
220	*near_ir = prox_data - ir_data;
221	else
222	*near_ir = 0;
223
224	return 0;
225	}
226
227	static ssize_t get_sensor_data(struct device dev, char buf, int mode)
228	{
229	struct iio_dev *indio_dev = dev_get_drvdata(dev);
230	struct isl29018_chip *chip = indio_dev->dev_data;
231	struct i2c_client *client = chip->client;
232	int value = 0;
233	int status;
234
235	mutex_lock(&chip->lock);
236	switch (mode) {
237	case COMMMAND1_OPMODE_PROX_ONCE:
238	status = isl29018_read_proximity_ir(client,
239	chip->prox_scheme, &value);
240	break;
241
242	case COMMMAND1_OPMODE_ALS_ONCE:
243	status = isl29018_read_lux(client, &value);
244	break;
245
246	case COMMMAND1_OPMODE_IR_ONCE:
247	status = isl29018_read_ir(client, &value);
248	break;
249
250	default:
251	dev_err(&client->dev, "Mode %d is not supported\n", mode);
252	mutex_unlock(&chip->lock);
253	return -EBUSY;
254	}
255	if (status < 0) {
256	dev_err(&client->dev, "Error in Reading data");
257	mutex_unlock(&chip->lock);
258	return status;
259	}
260
261	mutex_unlock(&chip->lock);
262
263	return sprintf(buf, "%d\n", value);
264	}
265
266	/* Sysfs interface */
267	/* range */
268	static ssize_t show_range(struct device *dev,
269	struct device_attribute attr, char buf)
270	{
271	struct iio_dev *indio_dev = dev_get_drvdata(dev);
272	struct isl29018_chip *chip = indio_dev->dev_data;
273
274	return sprintf(buf, "%u\n", chip->range);
275	}
276
277	static ssize_t store_range(struct device *dev,
278	struct device_attribute attr, const char buf, size_t count)
279	{
280	struct iio_dev *indio_dev = dev_get_drvdata(dev);
281	struct isl29018_chip *chip = indio_dev->dev_data;
282	struct i2c_client *client = chip->client;
283	int status;
284	unsigned long lval;
285	unsigned int new_range;
286
287	if (strict_strtoul(buf, 10, &lval))
288	return -EINVAL;
289
290	if (!(lval == 1000UL \|\| lval == 4000UL \|\|
291	lval == 16000UL \|\| lval == 64000UL)) {
292	dev_err(dev, "The range is not supported\n");
293	return -EINVAL;
294	}
295
296	mutex_lock(&chip->lock);
297	status = isl29018_set_range(client, lval, &new_range);
298	if (status < 0) {
299	mutex_unlock(&chip->lock);
300	dev_err(dev, "Error in setting max range\n");
301	return status;
302	}
303	chip->range = new_range;
304	mutex_unlock(&chip->lock);
305
306	return count;
307	}
308
309	/* resolution */
310	static ssize_t show_resolution(struct device *dev,
311	struct device_attribute attr, char buf)
312	{
313	struct iio_dev *indio_dev = dev_get_drvdata(dev);
314	struct isl29018_chip *chip = indio_dev->dev_data;
315
316	return sprintf(buf, "%u\n", chip->adc_bit);
317	}
318
319	static ssize_t store_resolution(struct device *dev,
320	struct device_attribute attr, const char buf, size_t count)
321	{
322	struct iio_dev *indio_dev = dev_get_drvdata(dev);
323	struct isl29018_chip *chip = indio_dev->dev_data;
324	struct i2c_client *client = chip->client;
325	int status;
326	unsigned long lval;
327	unsigned int new_adc_bit;
328
329	if (strict_strtoul(buf, 10, &lval))
330	return -EINVAL;
331	if (!(lval == 4 \|\| lval == 8 \|\| lval == 12 \|\| lval == 16)) {
332	dev_err(dev, "The resolution is not supported\n");
333	return -EINVAL;
334	}
335
336	mutex_lock(&chip->lock);
337	status = isl29018_set_resolution(client, lval, &new_adc_bit);
338	if (status < 0) {
339	mutex_unlock(&chip->lock);
340	dev_err(dev, "Error in setting resolution\n");
341	return status;
342	}
343	chip->adc_bit = new_adc_bit;
344	mutex_unlock(&chip->lock);
345
346	return count;
347	}
348
349	/* proximity scheme */
350	static ssize_t show_prox_infrared_supression(struct device *dev,
351	struct device_attribute attr, char buf)
352	{
353	struct iio_dev *indio_dev = dev_get_drvdata(dev);
354	struct isl29018_chip *chip = indio_dev->dev_data;
355
356	/* return the "proximity scheme" i.e. if the chip does on chip
357	infrared supression (1 means perform on chip supression) */
358	return sprintf(buf, "%d\n", chip->prox_scheme);
359	}
360
361	static ssize_t store_prox_infrared_supression(struct device *dev,
362	struct device_attribute attr, const char buf, size_t count)
363	{
364	struct iio_dev *indio_dev = dev_get_drvdata(dev);
365	struct isl29018_chip *chip = indio_dev->dev_data;
366	unsigned long lval;
367
368	if (strict_strtoul(buf, 10, &lval))
369	return -EINVAL;
370	if (!(lval == 0UL \|\| lval == 1UL)) {
371	dev_err(dev, "The mode is not supported\n");
372	return -EINVAL;
373	}
374
375	/* get the "proximity scheme" i.e. if the chip does on chip
376	infrared supression (1 means perform on chip supression) */
377	mutex_lock(&chip->lock);
378	chip->prox_scheme = (int)lval;
379	mutex_unlock(&chip->lock);
380
381	return count;
382	}
383
384	/* Read lux */
385	static ssize_t show_lux(struct device *dev,
386	struct device_attribute devattr, char buf)
387	{
388	return get_sensor_data(dev, buf, COMMMAND1_OPMODE_ALS_ONCE);
389	}
390
391	/* Read ir */
392	static ssize_t show_ir(struct device *dev,
393	struct device_attribute devattr, char buf)
394	{
395	return get_sensor_data(dev, buf, COMMMAND1_OPMODE_IR_ONCE);
396	}
397
398	/* Read nearest ir */
399	static ssize_t show_proxim_ir(struct device *dev,
400	struct device_attribute devattr, char buf)
401	{
402	return get_sensor_data(dev, buf, COMMMAND1_OPMODE_PROX_ONCE);
403	}
404
94042874 RK	405	static IIO_DEVICE_ATTR(range, S_IRUGO \| S_IWUSR, show_range, store_range, 0);
	406	static IIO_CONST_ATTR(range_available, "1000 4000 16000 64000");
	407	static IIO_CONST_ATTR(adc_resolution_available, "4 8 12 16");
	408	static IIO_DEVICE_ATTR(adc_resolution, S_IRUGO \| S_IWUSR,
	409	show_resolution, store_resolution, 0);
	410	static IIO_DEVICE_ATTR(proximity_on_chip_ambient_infrared_supression,
	411	S_IRUGO \| S_IWUSR,
	412	show_prox_infrared_supression,
	413	store_prox_infrared_supression, 0);
	414	static IIO_DEVICE_ATTR(illuminance0_input, S_IRUGO, show_lux, NULL, 0);
	415	static IIO_DEVICE_ATTR(intensity_infrared_raw, S_IRUGO, show_ir, NULL, 0);
	416	static IIO_DEVICE_ATTR(proximity_raw, S_IRUGO, show_proxim_ir, NULL, 0);
94042874 RK	417
	418	#define ISL29018_DEV_ATTR(name) (&iio_dev_attr_##name.dev_attr.attr)
	419	#define ISL29018_CONST_ATTR(name) (&iio_const_attr_##name.dev_attr.attr)
	420	static struct attribute *isl29018_attributes[] = {
94042874 RK	421	ISL29018_DEV_ATTR(range),
	422	ISL29018_CONST_ATTR(range_available),
	423	ISL29018_DEV_ATTR(adc_resolution),
	424	ISL29018_CONST_ATTR(adc_resolution_available),
	425	ISL29018_DEV_ATTR(proximity_on_chip_ambient_infrared_supression),
	426	ISL29018_DEV_ATTR(illuminance0_input),
	427	ISL29018_DEV_ATTR(intensity_infrared_raw),
	428	ISL29018_DEV_ATTR(proximity_raw),
	429	NULL
	430	};
	431
	432	static const struct attribute_group isl29108_group = {
	433	.attrs = isl29018_attributes,
	434	};
	435
	436	static int isl29018_chip_init(struct i2c_client *client)
	437	{
	438	struct isl29018_chip *chip = i2c_get_clientdata(client);
	439	int status;
	440	int new_adc_bit;
	441	unsigned int new_range;
	442
	443	memset(chip->reg_cache, 0, sizeof(chip->reg_cache));
	444
	445	/* set defaults */
	446	status = isl29018_set_range(client, chip->range, &new_range);
	447	if (status < 0) {
	448	dev_err(&client->dev, "Init of isl29018 fails\n");
	449	return status;
	450	}
	451
	452	status = isl29018_set_resolution(client, chip->adc_bit,
	453	&new_adc_bit);
	454
	455	return 0;
	456	}
	457
6fe8135f JC	458	static const struct iio_info isl29108_info = {
	459	.attrs = &isl29108_group,
	460	.driver_module = THIS_MODULE,
	461	};
	462
94042874 RK	463	static int __devinit isl29018_probe(struct i2c_client *client,
	464	const struct i2c_device_id *id)
	465	{
	466	struct isl29018_chip *chip;
	467	int err;
	468
	469	chip = kzalloc(sizeof(struct isl29018_chip), GFP_KERNEL);
	470	if (!chip) {
	471	dev_err(&client->dev, "Memory allocation fails\n");
	472	err = -ENOMEM;
	473	goto exit;
	474	}
	475
	476	i2c_set_clientdata(client, chip);
	477	chip->client = client;
	478
	479	mutex_init(&chip->lock);
	480
	481	chip->range = 1000;
	482	chip->adc_bit = 16;
	483
	484	err = isl29018_chip_init(client);
	485	if (err)
	486	goto exit_free;
	487
6f7c8ee5	488	chip->indio_dev = iio_allocate_device(0);
94042874 RK	489	if (!chip->indio_dev) {
	490	dev_err(&client->dev, "iio allocation fails\n");
	491	goto exit_free;
	492	}
6fe8135f	493	chip->indio_dev->info = &isl29108_info;
845bd12a	494	chip->indio_dev->name = id->name;
94042874 RK	495	chip->indio_dev->dev.parent = &client->dev;
94042874 RK	496	chip->indio_dev->dev_data = (void *)(chip);
94042874 RK	497	chip->indio_dev->modes = INDIO_DIRECT_MODE;
	498	err = iio_device_register(chip->indio_dev);
	499	if (err) {
	500	dev_err(&client->dev, "iio registration fails\n");
	501	goto exit_iio_free;
	502	}
	503
	504	return 0;
	505	exit_iio_free:
	506	iio_free_device(chip->indio_dev);
	507	exit_free:
	508	kfree(chip);
	509	exit:
	510	return err;
	511	}
	512
	513	static int __devexit isl29018_remove(struct i2c_client *client)
	514	{
	515	struct isl29018_chip *chip = i2c_get_clientdata(client);
	516
	517	dev_dbg(&client->dev, "%s()\n", __func__);
	518	iio_device_unregister(chip->indio_dev);
	519	kfree(chip);
	520
	521	return 0;
	522	}
	523
	524	static const struct i2c_device_id isl29018_id[] = {
	525	{"isl29018", 0},
	526	{}
	527	};
	528
	529	MODULE_DEVICE_TABLE(i2c, isl29018_id);
	530
	531	static struct i2c_driver isl29018_driver = {
	532	.class = I2C_CLASS_HWMON,
	533	.driver = {
	534	.name = "isl29018",
	535	.owner = THIS_MODULE,
	536	},
	537	.probe = isl29018_probe,
	538	.remove = __devexit_p(isl29018_remove),
	539	.id_table = isl29018_id,
	540	};
	541
	542	static int __init isl29018_init(void)
	543	{
	544	return i2c_add_driver(&isl29018_driver);
	545	}
	546
	547	static void __exit isl29018_exit(void)
	548	{
	549	i2c_del_driver(&isl29018_driver);
	550	}
	551
	552	module_init(isl29018_init);
	553	module_exit(isl29018_exit);
	554
	555	MODULE_DESCRIPTION("ISL29018 Ambient Light Sensor driver");
	556	MODULE_LICENSE("GPL");