drivers/staging/iio/light/tsl2583.c

   1 /*
   2  * Device driver for monitoring ambient light intensity (lux)
   3  * within the TAOS tsl258x family of devices (tsl2580, tsl2581).
   4  *
   5  * Copyright (c) 2011, TAOS Corporation.
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful, but WITHOUT
  13  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  15  * more details.
  16  *
  17  * You should have received a copy of the GNU General Public License along
  18  * with this program; if not, write to the Free Software Foundation, Inc.,
  19  * 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  20  */
  21
  22 #include <linux/kernel.h>
  23 #include <linux/i2c.h>
  24 #include <linux/errno.h>
  25 #include <linux/delay.h>
  26 #include <linux/string.h>
  27 #include <linux/mutex.h>
  28 #include <linux/unistd.h>
  29 #include <linux/slab.h>
  30 #include <linux/module.h>
  31 #include <linux/iio/iio.h>
  32
  33 #define TSL258X_MAX_DEVICE_REGS         32
  34
  35 /* Triton register offsets */
  36 #define TSL258X_REG_MAX         8
  37
  38 /* Device Registers and Masks */
  39 #define TSL258X_CNTRL                   0x00
  40 #define TSL258X_ALS_TIME                0X01
  41 #define TSL258X_INTERRUPT               0x02
  42 #define TSL258X_GAIN                    0x07
  43 #define TSL258X_REVID                   0x11
  44 #define TSL258X_CHIPID                  0x12
  45 #define TSL258X_ALS_CHAN0LO             0x14
  46 #define TSL258X_ALS_CHAN0HI             0x15
  47 #define TSL258X_ALS_CHAN1LO             0x16
  48 #define TSL258X_ALS_CHAN1HI             0x17
  49 #define TSL258X_TMR_LO                  0x18
  50 #define TSL258X_TMR_HI                  0x19
  51
  52 /* tsl2583 cmd reg masks */
  53 #define TSL258X_CMD_REG                 0x80
  54 #define TSL258X_CMD_SPL_FN              0x60
  55 #define TSL258X_CMD_ALS_INT_CLR 0X01
  56
  57 /* tsl2583 cntrl reg masks */
  58 #define TSL258X_CNTL_ADC_ENBL   0x02
  59 #define TSL258X_CNTL_PWR_ON             0x01
  60
  61 /* tsl2583 status reg masks */
  62 #define TSL258X_STA_ADC_VALID   0x01
  63 #define TSL258X_STA_ADC_INTR    0x10
  64
  65 /* Lux calculation constants */
  66 #define TSL258X_LUX_CALC_OVER_FLOW              65535
  67
  68 enum {
  69         TSL258X_CHIP_UNKNOWN = 0,
  70         TSL258X_CHIP_WORKING = 1,
  71         TSL258X_CHIP_SUSPENDED = 2
  72 };
  73
  74 /* Per-device data */
  75 struct taos_als_info {
  76         u16 als_ch0;
  77         u16 als_ch1;
  78         u16 lux;
  79 };
  80
  81 struct taos_settings {
  82         int als_time;
  83         int als_gain;
  84         int als_gain_trim;
  85         int als_cal_target;
  86 };
  87
  88 struct tsl2583_chip {
  89         struct mutex als_mutex;
  90         struct i2c_client *client;
  91         struct taos_als_info als_cur_info;
  92         struct taos_settings taos_settings;
  93         int als_time_scale;
  94         int als_saturation;
  95         int taos_chip_status;
  96         u8 taos_config[8];
  97 };
  98
  99 /*
 100  * Initial values for device - this values can/will be changed by driver.
 101  * and applications as needed.
 102  * These values are dynamic.
 103  */
 104 static const u8 taos_config[8] = {
 105                 0x00, 0xee, 0x00, 0x03, 0x00, 0xFF, 0xFF, 0x00
 106 }; /*   cntrl atime intC  Athl0 Athl1 Athh0 Athh1 gain */
 107
 108 struct taos_lux {
 109         unsigned int ratio;
 110         unsigned int ch0;
 111         unsigned int ch1;
 112 };
 113
 114 /* This structure is intentionally large to accommodate updates via sysfs. */
 115 /* Sized to 11 = max 10 segments + 1 termination segment */
 116 /* Assumption is one and only one type of glass used  */
 117 static struct taos_lux taos_device_lux[11] = {
 118         {  9830,  8520, 15729 },
 119         { 12452, 10807, 23344 },
 120         { 14746,  6383, 11705 },
 121         { 17695,  4063,  6554 },
 122 };
 123
 124 struct gainadj {
 125         s16 ch0;
 126         s16 ch1;
 127 };
 128
 129 /* Index = (0 - 3) Used to validate the gain selection index */
 130 static const struct gainadj gainadj[] = {
 131         { 1, 1 },
 132         { 8, 8 },
 133         { 16, 16 },
 134         { 107, 115 }
 135 };
 136
 137 /*
 138  * Provides initial operational parameter defaults.
 139  * These defaults may be changed through the device's sysfs files.
 140  */
 141 static void taos_defaults(struct tsl2583_chip *chip)
 142 {
 143         /* Operational parameters */
 144         chip->taos_settings.als_time = 100;
 145         /* must be a multiple of 50mS */
 146         chip->taos_settings.als_gain = 0;
 147         /* this is actually an index into the gain table */
 148         /* assume clear glass as default */
 149         chip->taos_settings.als_gain_trim = 1000;
 150         /* default gain trim to account for aperture effects */
 151         chip->taos_settings.als_cal_target = 130;
 152         /* Known external ALS reading used for calibration */
 153 }
 154
 155 /*
 156  * Read a number of bytes starting at register (reg) location.
 157  * Return 0, or i2c_smbus_write_byte ERROR code.
 158  */
 159 static int
 160 taos_i2c_read(struct i2c_client *client, u8 reg, u8 *val, unsigned int len)
 161 {
 162         int i, ret;
 163
 164         for (i = 0; i < len; i++) {
 165                 /* select register to write */
 166                 ret = i2c_smbus_write_byte(client, (TSL258X_CMD_REG | reg));
 167                 if (ret < 0) {
 168                         dev_err(&client->dev,
 169                                 "taos_i2c_read failed to write register %x\n",
 170                                 reg);
 171                         return ret;
 172                 }
 173                 /* read the data */
 174                 ret = i2c_smbus_read_byte(client);
 175                 if (ret < 0) {
 176                         dev_err(&client->dev,
 177                                 "%s failed to read byte after writing to register %x\n",
 178                                 __func__, reg);
 179                         return ret;
 180                 }
 181                 *val = ret;
 182                 val++;
 183                 reg++;
 184         }
 185         return 0;
 186 }
 187
 188 /*
 189  * Reads and calculates current lux value.
 190  * The raw ch0 and ch1 values of the ambient light sensed in the last
 191  * integration cycle are read from the device.
 192  * Time scale factor array values are adjusted based on the integration time.
 193  * The raw values are multiplied by a scale factor, and device gain is obtained
 194  * using gain index. Limit checks are done next, then the ratio of a multiple
 195  * of ch1 value, to the ch0 value, is calculated. The array taos_device_lux[]
 196  * declared above is then scanned to find the first ratio value that is just
 197  * above the ratio we just calculated. The ch0 and ch1 multiplier constants in
 198  * the array are then used along with the time scale factor array values, to
 199  * calculate the lux.
 200  */
 201 static int taos_get_lux(struct iio_dev *indio_dev)
 202 {
 203         u16 ch0, ch1; /* separated ch0/ch1 data from device */
 204         u32 lux; /* raw lux calculated from device data */
 205         u64 lux64;
 206         u32 ratio;
 207         u8 buf[5];
 208         struct taos_lux *p;
 209         struct tsl2583_chip *chip = iio_priv(indio_dev);
 210         int i, ret;
 211         u32 ch0lux = 0;
 212         u32 ch1lux = 0;
 213
 214         if (mutex_trylock(&chip->als_mutex) == 0) {
 215                 dev_info(&chip->client->dev, "taos_get_lux device is busy\n");
 216                 return chip->als_cur_info.lux; /* busy, so return LAST VALUE */
 217         }
 218
 219         if (chip->taos_chip_status != TSL258X_CHIP_WORKING) {
 220                 /* device is not enabled */
 221                 dev_err(&chip->client->dev, "taos_get_lux device is not enabled\n");
 222                 ret = -EBUSY;
 223                 goto out_unlock;
 224         }
 225
 226         ret = taos_i2c_read(chip->client, (TSL258X_CMD_REG), &buf[0], 1);
 227         if (ret < 0) {
 228                 dev_err(&chip->client->dev, "taos_get_lux failed to read CMD_REG\n");
 229                 goto out_unlock;
 230         }
 231         /* is data new & valid */
 232         if (!(buf[0] & TSL258X_STA_ADC_INTR)) {
 233                 dev_err(&chip->client->dev, "taos_get_lux data not valid\n");
 234                 ret = chip->als_cur_info.lux; /* return LAST VALUE */
 235                 goto out_unlock;
 236         }
 237
 238         for (i = 0; i < 4; i++) {
 239                 int reg = TSL258X_CMD_REG | (TSL258X_ALS_CHAN0LO + i);
 240
 241                 ret = taos_i2c_read(chip->client, reg, &buf[i], 1);
 242                 if (ret < 0) {
 243                         dev_err(&chip->client->dev,
 244                                 "taos_get_lux failed to read register %x\n",
 245                                 reg);
 246                         goto out_unlock;
 247                 }
 248         }
 249
 250         /*
 251          * clear status, really interrupt status (interrupts are off), but
 252          * we use the bit anyway - don't forget 0x80 - this is a command
 253          */
 254         ret = i2c_smbus_write_byte(chip->client,
 255                                    (TSL258X_CMD_REG | TSL258X_CMD_SPL_FN |
 256                                     TSL258X_CMD_ALS_INT_CLR));
 257
 258         if (ret < 0) {
 259                 dev_err(&chip->client->dev,
 260                         "taos_i2c_write_command failed in taos_get_lux, err = %d\n",
 261                         ret);
 262                 goto out_unlock; /* have no data, so return failure */
 263         }
 264
 265         /* extract ALS/lux data */
 266         ch0 = le16_to_cpup((const __le16 *)&buf[0]);
 267         ch1 = le16_to_cpup((const __le16 *)&buf[2]);
 268
 269         chip->als_cur_info.als_ch0 = ch0;
 270         chip->als_cur_info.als_ch1 = ch1;
 271
 272         if ((ch0 >= chip->als_saturation) || (ch1 >= chip->als_saturation))
 273                 goto return_max;
 274
 275         if (!ch0) {
 276                 /* have no data, so return LAST VALUE */
 277                 ret = 0;
 278                 chip->als_cur_info.lux = 0;
 279                 goto out_unlock;
 280         }
 281         /* calculate ratio */
 282         ratio = (ch1 << 15) / ch0;
 283         /* convert to unscaled lux using the pointer to the table */
 284         for (p = (struct taos_lux *)taos_device_lux;
 285              p->ratio != 0 && p->ratio < ratio; p++)
 286                 ;
 287
 288         if (p->ratio == 0) {
 289                 lux = 0;
 290         } else {
 291                 ch0lux = ((ch0 * p->ch0) +
 292                           (gainadj[chip->taos_settings.als_gain].ch0 >> 1))
 293                          / gainadj[chip->taos_settings.als_gain].ch0;
 294                 ch1lux = ((ch1 * p->ch1) +
 295                           (gainadj[chip->taos_settings.als_gain].ch1 >> 1))
 296                          / gainadj[chip->taos_settings.als_gain].ch1;
 297                 lux = ch0lux - ch1lux;
 298         }
 299
 300         /* note: lux is 31 bit max at this point */
 301         if (ch1lux > ch0lux) {
 302                 dev_dbg(&chip->client->dev, "No Data - Return last value\n");
 303                 ret = 0;
 304                 chip->als_cur_info.lux = 0;
 305                 goto out_unlock;
 306         }
 307
 308         /* adjust for active time scale */
 309         if (chip->als_time_scale == 0)
 310                 lux = 0;
 311         else
 312                 lux = (lux + (chip->als_time_scale >> 1)) /
 313                         chip->als_time_scale;
 314
 315         /* Adjust for active gain scale.
 316          * The taos_device_lux tables above have a factor of 8192 built in,
 317          * so we need to shift right.
 318          * User-specified gain provides a multiplier.
 319          * Apply user-specified gain before shifting right to retain precision.
 320          * Use 64 bits to avoid overflow on multiplication.
 321          * Then go back to 32 bits before division to avoid using div_u64().
 322          */
 323         lux64 = lux;
 324         lux64 = lux64 * chip->taos_settings.als_gain_trim;
 325         lux64 >>= 13;
 326         lux = lux64;
 327         lux = (lux + 500) / 1000;
 328         if (lux > TSL258X_LUX_CALC_OVER_FLOW) { /* check for overflow */
 329 return_max:
 330                 lux = TSL258X_LUX_CALC_OVER_FLOW;
 331         }
 332
 333         /* Update the structure with the latest VALID lux. */
 334         chip->als_cur_info.lux = lux;
 335         ret = lux;
 336
 337 out_unlock:
 338         mutex_unlock(&chip->als_mutex);
 339         return ret;
 340 }
 341
 342 /*
 343  * Obtain single reading and calculate the als_gain_trim (later used
 344  * to derive actual lux).
 345  * Return updated gain_trim value.
 346  */
 347 static int taos_als_calibrate(struct iio_dev *indio_dev)
 348 {
 349         struct tsl2583_chip *chip = iio_priv(indio_dev);
 350         u8 reg_val;
 351         unsigned int gain_trim_val;
 352         int ret;
 353         int lux_val;
 354
 355         ret = i2c_smbus_write_byte(chip->client,
 356                                    (TSL258X_CMD_REG | TSL258X_CNTRL));
 357         if (ret < 0) {
 358                 dev_err(&chip->client->dev,
 359                         "taos_als_calibrate failed to reach the CNTRL register, ret=%d\n",
 360                         ret);
 361                 return ret;
 362         }
 363
 364         reg_val = i2c_smbus_read_byte(chip->client);
 365         if (reg_val < 0) {
 366                 dev_err(&chip->client->dev,
 367                         "%s failed to read after writing to the CNTRL register\n",
 368                         __func__);
 369                 return ret;
 370         }
 371
 372         if ((reg_val & (TSL258X_CNTL_ADC_ENBL | TSL258X_CNTL_PWR_ON))
 373                         != (TSL258X_CNTL_ADC_ENBL | TSL258X_CNTL_PWR_ON)) {
 374                 dev_err(&chip->client->dev,
 375                         "taos_als_calibrate failed: device not powered on with ADC enabled\n");
 376                 return -1;
 377         }
 378
 379         ret = i2c_smbus_write_byte(chip->client,
 380                                    (TSL258X_CMD_REG | TSL258X_CNTRL));
 381         if (ret < 0) {
 382                 dev_err(&chip->client->dev,
 383                         "taos_als_calibrate failed to reach the STATUS register, ret=%d\n",
 384                         ret);
 385                 return ret;
 386         }
 387         reg_val = i2c_smbus_read_byte(chip->client);
 388         if (reg_val < 0) {
 389                 dev_err(&chip->client->dev,
 390                         "%s failed to read after writing to the STATUS register\n",
 391                         __func__);
 392                 return ret;
 393         }
 394
 395         if ((reg_val & TSL258X_STA_ADC_VALID) != TSL258X_STA_ADC_VALID) {
 396                 dev_err(&chip->client->dev,
 397                         "taos_als_calibrate failed: STATUS - ADC not valid.\n");
 398                 return -ENODATA;
 399         }
 400         lux_val = taos_get_lux(indio_dev);
 401         if (lux_val < 0) {
 402                 dev_err(&chip->client->dev, "taos_als_calibrate failed to get lux\n");
 403                 return lux_val;
 404         }
 405         gain_trim_val = (unsigned int)(((chip->taos_settings.als_cal_target)
 406                         * chip->taos_settings.als_gain_trim) / lux_val);
 407
 408         if ((gain_trim_val < 250) || (gain_trim_val > 4000)) {
 409                 dev_err(&chip->client->dev,
 410                         "taos_als_calibrate failed: trim_val of %d is out of range\n",
 411                         gain_trim_val);
 412                 return -ENODATA;
 413         }
 414         chip->taos_settings.als_gain_trim = (int)gain_trim_val;
 415
 416         return (int)gain_trim_val;
 417 }
 418
 419 /*
 420  * Turn the device on.
 421  * Configuration must be set before calling this function.
 422  */
 423 static int taos_chip_on(struct iio_dev *indio_dev)
 424 {
 425         int i;
 426         int ret;
 427         u8 *uP;
 428         u8 utmp;
 429         int als_count;
 430         int als_time;
 431         struct tsl2583_chip *chip = iio_priv(indio_dev);
 432
 433         /* and make sure we're not already on */
 434         if (chip->taos_chip_status == TSL258X_CHIP_WORKING) {
 435                 /* if forcing a register update - turn off, then on */
 436                 dev_info(&chip->client->dev, "device is already enabled\n");
 437                 return -EINVAL;
 438         }
 439
 440         /* determine als integration register */
 441         als_count = (chip->taos_settings.als_time * 100 + 135) / 270;
 442         if (!als_count)
 443                 als_count = 1; /* ensure at least one cycle */
 444
 445         /* convert back to time (encompasses overrides) */
 446         als_time = (als_count * 27 + 5) / 10;
 447         chip->taos_config[TSL258X_ALS_TIME] = 256 - als_count;
 448
 449         /* Set the gain based on taos_settings struct */
 450         chip->taos_config[TSL258X_GAIN] = chip->taos_settings.als_gain;
 451
 452         /* set chip struct re scaling and saturation */
 453         chip->als_saturation = als_count * 922; /* 90% of full scale */
 454         chip->als_time_scale = (als_time + 25) / 50;
 455
 456         /*
 457          * TSL258x Specific power-on / adc enable sequence
 458          * Power on the device 1st.
 459          */
 460         utmp = TSL258X_CNTL_PWR_ON;
 461         ret = i2c_smbus_write_byte_data(chip->client,
 462                                         TSL258X_CMD_REG | TSL258X_CNTRL, utmp);
 463         if (ret < 0) {
 464                 dev_err(&chip->client->dev, "taos_chip_on failed on CNTRL reg.\n");
 465                 return ret;
 466         }
 467
 468         /*
 469          * Use the following shadow copy for our delay before enabling ADC.
 470          * Write all the registers.
 471          */
 472         for (i = 0, uP = chip->taos_config; i < TSL258X_REG_MAX; i++) {
 473                 ret = i2c_smbus_write_byte_data(chip->client,
 474                                                 TSL258X_CMD_REG + i,
 475                                                 *uP++);
 476                 if (ret < 0) {
 477                         dev_err(&chip->client->dev,
 478                                 "taos_chip_on failed on reg %d.\n", i);
 479                         return ret;
 480                 }
 481         }
 482
 483         usleep_range(3000, 3500);
 484         /*
 485          * NOW enable the ADC
 486          * initialize the desired mode of operation
 487          */
 488         utmp = TSL258X_CNTL_PWR_ON | TSL258X_CNTL_ADC_ENBL;
 489         ret = i2c_smbus_write_byte_data(chip->client,
 490                                         TSL258X_CMD_REG | TSL258X_CNTRL,
 491                                         utmp);
 492         if (ret < 0) {
 493                 dev_err(&chip->client->dev, "taos_chip_on failed on 2nd CTRL reg.\n");
 494                 return ret;
 495         }
 496         chip->taos_chip_status = TSL258X_CHIP_WORKING;
 497
 498         return ret;
 499 }
 500
 501 static int taos_chip_off(struct iio_dev *indio_dev)
 502 {
 503         struct tsl2583_chip *chip = iio_priv(indio_dev);
 504
 505         /* turn device off */
 506         chip->taos_chip_status = TSL258X_CHIP_SUSPENDED;
 507         return i2c_smbus_write_byte_data(chip->client,
 508                                         TSL258X_CMD_REG | TSL258X_CNTRL,
 509                                         0x00);
 510 }
 511
 512 /* Sysfs Interface Functions */
 513
 514 static ssize_t taos_power_state_show(struct device *dev,
 515                                      struct device_attribute *attr, char *buf)
 516 {
 517         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 518         struct tsl2583_chip *chip = iio_priv(indio_dev);
 519
 520         return sprintf(buf, "%d\n", chip->taos_chip_status);
 521 }
 522
 523 static ssize_t taos_power_state_store(struct device *dev,
 524                                       struct device_attribute *attr,
 525                                       const char *buf, size_t len)
 526 {
 527         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 528         int value;
 529
 530         if (kstrtoint(buf, 0, &value))
 531                 return -EINVAL;
 532
 533         if (!value)
 534                 taos_chip_off(indio_dev);
 535         else
 536                 taos_chip_on(indio_dev);
 537
 538         return len;
 539 }
 540
 541 static ssize_t taos_gain_show(struct device *dev,
 542                               struct device_attribute *attr, char *buf)
 543 {
 544         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 545         struct tsl2583_chip *chip = iio_priv(indio_dev);
 546         char gain[4] = {0};
 547
 548         switch (chip->taos_settings.als_gain) {
 549         case 0:
 550                 strcpy(gain, "001");
 551                 break;
 552         case 1:
 553                 strcpy(gain, "008");
 554                 break;
 555         case 2:
 556                 strcpy(gain, "016");
 557                 break;
 558         case 3:
 559                 strcpy(gain, "111");
 560                 break;
 561         }
 562
 563         return sprintf(buf, "%s\n", gain);
 564 }
 565
 566 static ssize_t taos_gain_store(struct device *dev,
 567                                struct device_attribute *attr,
 568                                const char *buf, size_t len)
 569 {
 570         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 571         struct tsl2583_chip *chip = iio_priv(indio_dev);
 572         int value;
 573
 574         if (kstrtoint(buf, 0, &value))
 575                 return -EINVAL;
 576
 577         switch (value) {
 578         case 1:
 579                 chip->taos_settings.als_gain = 0;
 580                 break;
 581         case 8:
 582                 chip->taos_settings.als_gain = 1;
 583                 break;
 584         case 16:
 585                 chip->taos_settings.als_gain = 2;
 586                 break;
 587         case 111:
 588                 chip->taos_settings.als_gain = 3;
 589                 break;
 590         default:
 591                 dev_err(dev, "Invalid Gain Index (must be 1,8,16,111)\n");
 592                 return -1;
 593         }
 594
 595         return len;
 596 }
 597
 598 static ssize_t taos_gain_available_show(struct device *dev,
 599                                         struct device_attribute *attr,
 600                                         char *buf)
 601 {
 602         return sprintf(buf, "%s\n", "1 8 16 111");
 603 }
 604
 605 static ssize_t taos_als_time_show(struct device *dev,
 606                                   struct device_attribute *attr, char *buf)
 607 {
 608         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 609         struct tsl2583_chip *chip = iio_priv(indio_dev);
 610
 611         return sprintf(buf, "%d\n", chip->taos_settings.als_time);
 612 }
 613
 614 static ssize_t taos_als_time_store(struct device *dev,
 615                                    struct device_attribute *attr,
 616                                    const char *buf, size_t len)
 617 {
 618         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 619         struct tsl2583_chip *chip = iio_priv(indio_dev);
 620         int value;
 621
 622         if (kstrtoint(buf, 0, &value))
 623                 return -EINVAL;
 624
 625         if ((value < 50) || (value > 650))
 626                 return -EINVAL;
 627
 628         if (value % 50)
 629                 return -EINVAL;
 630
 631         chip->taos_settings.als_time = value;
 632
 633         return len;
 634 }
 635
 636 static ssize_t taos_als_time_available_show(struct device *dev,
 637                                             struct device_attribute *attr,
 638                                             char *buf)
 639 {
 640         return sprintf(buf, "%s\n",
 641                 "50 100 150 200 250 300 350 400 450 500 550 600 650");
 642 }
 643
 644 static ssize_t taos_als_trim_show(struct device *dev,
 645                                   struct device_attribute *attr, char *buf)
 646 {
 647         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 648         struct tsl2583_chip *chip = iio_priv(indio_dev);
 649
 650         return sprintf(buf, "%d\n", chip->taos_settings.als_gain_trim);
 651 }
 652
 653 static ssize_t taos_als_trim_store(struct device *dev,
 654                                    struct device_attribute *attr,
 655                                    const char *buf, size_t len)
 656 {
 657         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 658         struct tsl2583_chip *chip = iio_priv(indio_dev);
 659         int value;
 660
 661         if (kstrtoint(buf, 0, &value))
 662                 return -EINVAL;
 663
 664         if (value)
 665                 chip->taos_settings.als_gain_trim = value;
 666
 667         return len;
 668 }
 669
 670 static ssize_t taos_als_cal_target_show(struct device *dev,
 671                                         struct device_attribute *attr,
 672                                         char *buf)
 673 {
 674         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 675         struct tsl2583_chip *chip = iio_priv(indio_dev);
 676
 677         return sprintf(buf, "%d\n", chip->taos_settings.als_cal_target);
 678 }
 679
 680 static ssize_t taos_als_cal_target_store(struct device *dev,
 681                                          struct device_attribute *attr,
 682                                          const char *buf, size_t len)
 683 {
 684         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 685         struct tsl2583_chip *chip = iio_priv(indio_dev);
 686         int value;
 687
 688         if (kstrtoint(buf, 0, &value))
 689                 return -EINVAL;
 690
 691         if (value)
 692                 chip->taos_settings.als_cal_target = value;
 693
 694         return len;
 695 }
 696
 697 static ssize_t taos_lux_show(struct device *dev, struct device_attribute *attr,
 698                              char *buf)
 699 {
 700         int ret;
 701
 702         ret = taos_get_lux(dev_to_iio_dev(dev));
 703         if (ret < 0)
 704                 return ret;
 705
 706         return sprintf(buf, "%d\n", ret);
 707 }
 708
 709 static ssize_t taos_do_calibrate(struct device *dev,
 710                                  struct device_attribute *attr,
 711                                  const char *buf, size_t len)
 712 {
 713         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 714         int value;
 715
 716         if (kstrtoint(buf, 0, &value))
 717                 return -EINVAL;
 718
 719         if (value == 1)
 720                 taos_als_calibrate(indio_dev);
 721
 722         return len;
 723 }
 724
 725 static ssize_t taos_luxtable_show(struct device *dev,
 726                                   struct device_attribute *attr, char *buf)
 727 {
 728         int i;
 729         int offset = 0;
 730
 731         for (i = 0; i < ARRAY_SIZE(taos_device_lux); i++) {
 732                 offset += sprintf(buf + offset, "%u,%u,%u,",
 733                                   taos_device_lux[i].ratio,
 734                                   taos_device_lux[i].ch0,
 735                                   taos_device_lux[i].ch1);
 736                 if (taos_device_lux[i].ratio == 0) {
 737                         /*
 738                          * We just printed the first "0" entry.
 739                          * Now get rid of the extra "," and break.
 740                          */
 741                         offset--;
 742                         break;
 743                 }
 744         }
 745
 746         offset += sprintf(buf + offset, "\n");
 747         return offset;
 748 }
 749
 750 static ssize_t taos_luxtable_store(struct device *dev,
 751                                    struct device_attribute *attr,
 752                                    const char *buf, size_t len)
 753 {
 754         struct iio_dev *indio_dev = dev_to_iio_dev(dev);
 755         struct tsl2583_chip *chip = iio_priv(indio_dev);
 756         int value[ARRAY_SIZE(taos_device_lux) * 3 + 1];
 757         int n;
 758
 759         get_options(buf, ARRAY_SIZE(value), value);
 760
 761         /* We now have an array of ints starting at value[1], and
 762          * enumerated by value[0].
 763          * We expect each group of three ints is one table entry,
 764          * and the last table entry is all 0.
 765          */
 766         n = value[0];
 767         if ((n % 3) || n < 6 || n > ((ARRAY_SIZE(taos_device_lux) - 1) * 3)) {
 768                 dev_info(dev, "LUX TABLE INPUT ERROR 1 Value[0]=%d\n", n);
 769                 return -EINVAL;
 770         }
 771         if ((value[(n - 2)] | value[(n - 1)] | value[n]) != 0) {
 772                 dev_info(dev, "LUX TABLE INPUT ERROR 2 Value[0]=%d\n", n);
 773                 return -EINVAL;
 774         }
 775
 776         if (chip->taos_chip_status == TSL258X_CHIP_WORKING)
 777                 taos_chip_off(indio_dev);
 778
 779         /* Zero out the table */
 780         memset(taos_device_lux, 0, sizeof(taos_device_lux));
 781         memcpy(taos_device_lux, &value[1], (value[0] * 4));
 782
 783         taos_chip_on(indio_dev);
 784
 785         return len;
 786 }
 787
 788 static DEVICE_ATTR(power_state, S_IRUGO | S_IWUSR,
 789                 taos_power_state_show, taos_power_state_store);
 790
 791 static DEVICE_ATTR(illuminance0_calibscale, S_IRUGO | S_IWUSR,
 792                 taos_gain_show, taos_gain_store);
 793 static DEVICE_ATTR(illuminance0_calibscale_available, S_IRUGO,
 794                 taos_gain_available_show, NULL);
 795
 796 static DEVICE_ATTR(illuminance0_integration_time, S_IRUGO | S_IWUSR,
 797                 taos_als_time_show, taos_als_time_store);
 798 static DEVICE_ATTR(illuminance0_integration_time_available, S_IRUGO,
 799                 taos_als_time_available_show, NULL);
 800
 801 static DEVICE_ATTR(illuminance0_calibbias, S_IRUGO | S_IWUSR,
 802                 taos_als_trim_show, taos_als_trim_store);
 803
 804 static DEVICE_ATTR(illuminance0_input_target, S_IRUGO | S_IWUSR,
 805                 taos_als_cal_target_show, taos_als_cal_target_store);
 806
 807 static DEVICE_ATTR(illuminance0_input, S_IRUGO, taos_lux_show, NULL);
 808 static DEVICE_ATTR(illuminance0_calibrate, S_IWUSR, NULL, taos_do_calibrate);
 809 static DEVICE_ATTR(illuminance0_lux_table, S_IRUGO | S_IWUSR,
 810                 taos_luxtable_show, taos_luxtable_store);
 811
 812 static struct attribute *sysfs_attrs_ctrl[] = {
 813         &dev_attr_power_state.attr,
 814         &dev_attr_illuminance0_calibscale.attr,                 /* Gain  */
 815         &dev_attr_illuminance0_calibscale_available.attr,
 816         &dev_attr_illuminance0_integration_time.attr,   /* I time*/
 817         &dev_attr_illuminance0_integration_time_available.attr,
 818         &dev_attr_illuminance0_calibbias.attr,                  /* trim  */
 819         &dev_attr_illuminance0_input_target.attr,
 820         &dev_attr_illuminance0_input.attr,
 821         &dev_attr_illuminance0_calibrate.attr,
 822         &dev_attr_illuminance0_lux_table.attr,
 823         NULL
 824 };
 825
 826 static const struct attribute_group tsl2583_attribute_group = {
 827         .attrs = sysfs_attrs_ctrl,
 828 };
 829
 830 /* Use the default register values to identify the Taos device */
 831 static int taos_tsl258x_device(unsigned char *bufp)
 832 {
 833         return ((bufp[TSL258X_CHIPID] & 0xf0) == 0x90);
 834 }
 835
 836 static const struct iio_info tsl2583_info = {
 837         .attrs = &tsl2583_attribute_group,
 838         .driver_module = THIS_MODULE,
 839 };
 840
 841 /*
 842  * Client probe function - When a valid device is found, the driver's device
 843  * data structure is updated, and initialization completes successfully.
 844  */
 845 static int taos_probe(struct i2c_client *clientp,
 846                       const struct i2c_device_id *idp)
 847 {
 848         int i, ret;
 849         unsigned char buf[TSL258X_MAX_DEVICE_REGS];
 850         struct tsl2583_chip *chip;
 851         struct iio_dev *indio_dev;
 852
 853         if (!i2c_check_functionality(clientp->adapter,
 854                                      I2C_FUNC_SMBUS_BYTE_DATA)) {
 855                 dev_err(&clientp->dev, "taos_probe() - i2c smbus byte data func unsupported\n");
 856                 return -EOPNOTSUPP;
 857         }
 858
 859         indio_dev = devm_iio_device_alloc(&clientp->dev, sizeof(*chip));
 860         if (!indio_dev)
 861                 return -ENOMEM;
 862         chip = iio_priv(indio_dev);
 863         chip->client = clientp;
 864         i2c_set_clientdata(clientp, indio_dev);
 865
 866         mutex_init(&chip->als_mutex);
 867         chip->taos_chip_status = TSL258X_CHIP_UNKNOWN;
 868         memcpy(chip->taos_config, taos_config, sizeof(chip->taos_config));
 869
 870         for (i = 0; i < TSL258X_MAX_DEVICE_REGS; i++) {
 871                 ret = i2c_smbus_write_byte(clientp,
 872                                 (TSL258X_CMD_REG | (TSL258X_CNTRL + i)));
 873                 if (ret < 0) {
 874                         dev_err(&clientp->dev,
 875                                 "i2c_smbus_write_byte to cmd reg failed in taos_probe(), err = %d\n",
 876                                 ret);
 877                         return ret;
 878                 }
 879                 ret = i2c_smbus_read_byte(clientp);
 880                 if (ret < 0) {
 881                         dev_err(&clientp->dev,
 882                                 "i2c_smbus_read_byte from reg failed in taos_probe(), err = %d\n",
 883                                 ret);
 884                         return ret;
 885                 }
 886                 buf[i] = ret;
 887         }
 888
 889         if (!taos_tsl258x_device(buf)) {
 890                 dev_info(&clientp->dev,
 891                          "i2c device found but does not match expected id in taos_probe()\n");
 892                 return -EINVAL;
 893         }
 894
 895         ret = i2c_smbus_write_byte(clientp, (TSL258X_CMD_REG | TSL258X_CNTRL));
 896         if (ret < 0) {
 897                 dev_err(&clientp->dev,
 898                         "i2c_smbus_write_byte() to cmd reg failed in taos_probe(), err = %d\n",
 899                         ret);
 900                 return ret;
 901         }
 902
 903         indio_dev->info = &tsl2583_info;
 904         indio_dev->dev.parent = &clientp->dev;
 905         indio_dev->modes = INDIO_DIRECT_MODE;
 906         indio_dev->name = chip->client->name;
 907         ret = devm_iio_device_register(indio_dev->dev.parent, indio_dev);
 908         if (ret) {
 909                 dev_err(&clientp->dev, "iio registration failed\n");
 910                 return ret;
 911         }
 912
 913         /* Load up the V2 defaults (these are hard coded defaults for now) */
 914         taos_defaults(chip);
 915
 916         /* Make sure the chip is on */
 917         taos_chip_on(indio_dev);
 918
 919         dev_info(&clientp->dev, "Light sensor found.\n");
 920         return 0;
 921 }
 922
 923 #ifdef CONFIG_PM_SLEEP
 924 static int taos_suspend(struct device *dev)
 925 {
 926         struct iio_dev *indio_dev = i2c_get_clientdata(to_i2c_client(dev));
 927         struct tsl2583_chip *chip = iio_priv(indio_dev);
 928         int ret = 0;
 929
 930         mutex_lock(&chip->als_mutex);
 931
 932         if (chip->taos_chip_status == TSL258X_CHIP_WORKING) {
 933                 ret = taos_chip_off(indio_dev);
 934                 chip->taos_chip_status = TSL258X_CHIP_SUSPENDED;
 935         }
 936
 937         mutex_unlock(&chip->als_mutex);
 938         return ret;
 939 }
 940
 941 static int taos_resume(struct device *dev)
 942 {
 943         struct iio_dev *indio_dev = i2c_get_clientdata(to_i2c_client(dev));
 944         struct tsl2583_chip *chip = iio_priv(indio_dev);
 945         int ret = 0;
 946
 947         mutex_lock(&chip->als_mutex);
 948
 949         if (chip->taos_chip_status == TSL258X_CHIP_SUSPENDED)
 950                 ret = taos_chip_on(indio_dev);
 951
 952         mutex_unlock(&chip->als_mutex);
 953         return ret;
 954 }
 955
 956 static SIMPLE_DEV_PM_OPS(taos_pm_ops, taos_suspend, taos_resume);
 957 #define TAOS_PM_OPS (&taos_pm_ops)
 958 #else
 959 #define TAOS_PM_OPS NULL
 960 #endif
 961
 962 static struct i2c_device_id taos_idtable[] = {
 963         { "tsl2580", 0 },
 964         { "tsl2581", 1 },
 965         { "tsl2583", 2 },
 966         {}
 967 };
 968 MODULE_DEVICE_TABLE(i2c, taos_idtable);
 969
 970 #ifdef CONFIG_OF
 971 static const struct of_device_id taos2583_of_match[] = {
 972         { .compatible = "amstaos,tsl2580", },
 973         { .compatible = "amstaos,tsl2581", },
 974         { .compatible = "amstaos,tsl2583", },
 975         { },
 976 };
 977 MODULE_DEVICE_TABLE(of, taos2583_of_match);
 978 #else
 979 #define taos2583_of_match NULL
 980 #endif
 981
 982 /* Driver definition */
 983 static struct i2c_driver taos_driver = {
 984         .driver = {
 985                 .name = "tsl2583",
 986                 .pm = TAOS_PM_OPS,
 987                 .of_match_table = taos2583_of_match,
 988         },
 989         .id_table = taos_idtable,
 990         .probe = taos_probe,
 991 };
 992 module_i2c_driver(taos_driver);
 993
 994 MODULE_AUTHOR("J. August Brenner<jbrenner@taosinc.com>");
 995 MODULE_DESCRIPTION("TAOS tsl2583 ambient light sensor driver");
 996 MODULE_LICENSE("GPL");