drivers/staging/iio/meter/ade7759.c

   1 /*
   2  * ADE7759 Active Energy Metering IC with di/dt Sensor Interface Driver
   3  *
   4  * Copyright 2010 Analog Devices Inc.
   5  *
   6  * Licensed under the GPL-2 or later.
   7  */
   8
   9 #include <linux/interrupt.h>
  10 #include <linux/irq.h>
  11 #include <linux/gpio.h>
  12 #include <linux/delay.h>
  13 #include <linux/mutex.h>
  14 #include <linux/device.h>
  15 #include <linux/kernel.h>
  16 #include <linux/spi/spi.h>
  17 #include <linux/slab.h>
  18 #include <linux/sysfs.h>
  19 #include <linux/list.h>
  20
  21 #include "../iio.h"
  22 #include "../sysfs.h"
  23 #include "meter.h"
  24 #include "ade7759.h"
  25
  26 static int ade7759_spi_write_reg_8(struct device *dev,
  27                 u8 reg_address,
  28                 u8 val)
  29 {
  30         int ret;
  31         struct iio_dev *indio_dev = dev_get_drvdata(dev);
  32         struct ade7759_state *st = iio_priv(indio_dev);
  33
  34         mutex_lock(&st->buf_lock);
  35         st->tx[0] = ADE7759_WRITE_REG(reg_address);
  36         st->tx[1] = val;
  37
  38         ret = spi_write(st->us, st->tx, 2);
  39         mutex_unlock(&st->buf_lock);
  40
  41         return ret;
  42 }
  43
  44 static int ade7759_spi_write_reg_16(struct device *dev,
  45                 u8 reg_address,
  46                 u16 value)
  47 {
  48         int ret;
  49         struct iio_dev *indio_dev = dev_get_drvdata(dev);
  50         struct ade7759_state *st = iio_priv(indio_dev);
  51
  52         mutex_lock(&st->buf_lock);
  53         st->tx[0] = ADE7759_WRITE_REG(reg_address);
  54         st->tx[1] = (value >> 8) & 0xFF;
  55         st->tx[2] = value & 0xFF;
  56         ret = spi_write(st->us, st->tx, 3);
  57         mutex_unlock(&st->buf_lock);
  58
  59         return ret;
  60 }
  61
  62 static int ade7759_spi_read_reg_8(struct device *dev,
  63                 u8 reg_address,
  64                 u8 *val)
  65 {
  66         struct iio_dev *indio_dev = dev_get_drvdata(dev);
  67         struct ade7759_state *st = iio_priv(indio_dev);
  68         int ret;
  69
  70         ret = spi_w8r8(st->us, ADE7759_READ_REG(reg_address));
  71         if (ret < 0) {
  72                 dev_err(&st->us->dev, "problem when reading 8 bit register 0x%02X",
  73                                 reg_address);
  74                 return ret;
  75         }
  76         *val = ret;
  77
  78         return 0;
  79 }
  80
  81 static int ade7759_spi_read_reg_16(struct device *dev,
  82                 u8 reg_address,
  83                 u16 *val)
  84 {
  85         struct iio_dev *indio_dev = dev_get_drvdata(dev);
  86         struct ade7759_state *st = iio_priv(indio_dev);
  87         int ret;
  88
  89         ret = spi_w8r16(st->us, ADE7759_READ_REG(reg_address));
  90         if (ret < 0) {
  91                 dev_err(&st->us->dev, "problem when reading 16 bit register 0x%02X",
  92                         reg_address);
  93                 return ret;
  94         }
  95
  96         *val = ret;
  97         *val = be16_to_cpup(val);
  98
  99         return 0;
 100 }
 101
 102 static int ade7759_spi_read_reg_40(struct device *dev,
 103                 u8 reg_address,
 104                 u64 *val)
 105 {
 106         struct spi_message msg;
 107         struct iio_dev *indio_dev = dev_get_drvdata(dev);
 108         struct ade7759_state *st = iio_priv(indio_dev);
 109         int ret;
 110         struct spi_transfer xfers[] = {
 111                 {
 112                         .tx_buf = st->tx,
 113                         .rx_buf = st->rx,
 114                         .bits_per_word = 8,
 115                         .len = 6,
 116                 },
 117         };
 118
 119         mutex_lock(&st->buf_lock);
 120         st->tx[0] = ADE7759_READ_REG(reg_address);
 121         memset(&st->tx[1], 0 , 5);
 122
 123         spi_message_init(&msg);
 124         spi_message_add_tail(xfers, &msg);
 125         ret = spi_sync(st->us, &msg);
 126         if (ret) {
 127                 dev_err(&st->us->dev, "problem when reading 40 bit register 0x%02X",
 128                                 reg_address);
 129                 goto error_ret;
 130         }
 131         *val = ((u64)st->rx[1] << 32) | (st->rx[2] << 24) |
 132                 (st->rx[3] << 16) | (st->rx[4] << 8) | st->rx[5];
 133
 134 error_ret:
 135         mutex_unlock(&st->buf_lock);
 136         return ret;
 137 }
 138
 139 static ssize_t ade7759_read_8bit(struct device *dev,
 140                 struct device_attribute *attr,
 141                 char *buf)
 142 {
 143         int ret;
 144         u8 val = 0;
 145         struct iio_dev_attr *this_attr = to_iio_dev_attr(attr);
 146
 147         ret = ade7759_spi_read_reg_8(dev, this_attr->address, &val);
 148         if (ret)
 149                 return ret;
 150
 151         return sprintf(buf, "%u\n", val);
 152 }
 153
 154 static ssize_t ade7759_read_16bit(struct device *dev,
 155                 struct device_attribute *attr,
 156                 char *buf)
 157 {
 158         int ret;
 159         u16 val = 0;
 160         struct iio_dev_attr *this_attr = to_iio_dev_attr(attr);
 161
 162         ret = ade7759_spi_read_reg_16(dev, this_attr->address, &val);
 163         if (ret)
 164                 return ret;
 165
 166         return sprintf(buf, "%u\n", val);
 167 }
 168
 169 static ssize_t ade7759_read_40bit(struct device *dev,
 170                 struct device_attribute *attr,
 171                 char *buf)
 172 {
 173         int ret;
 174         u64 val = 0;
 175         struct iio_dev_attr *this_attr = to_iio_dev_attr(attr);
 176
 177         ret = ade7759_spi_read_reg_40(dev, this_attr->address, &val);
 178         if (ret)
 179                 return ret;
 180
 181         return sprintf(buf, "%llu\n", val);
 182 }
 183
 184 static ssize_t ade7759_write_8bit(struct device *dev,
 185                 struct device_attribute *attr,
 186                 const char *buf,
 187                 size_t len)
 188 {
 189         struct iio_dev_attr *this_attr = to_iio_dev_attr(attr);
 190         int ret;
 191         long val;
 192
 193         ret = strict_strtol(buf, 10, &val);
 194         if (ret)
 195                 goto error_ret;
 196         ret = ade7759_spi_write_reg_8(dev, this_attr->address, val);
 197
 198 error_ret:
 199         return ret ? ret : len;
 200 }
 201
 202 static ssize_t ade7759_write_16bit(struct device *dev,
 203                 struct device_attribute *attr,
 204                 const char *buf,
 205                 size_t len)
 206 {
 207         struct iio_dev_attr *this_attr = to_iio_dev_attr(attr);
 208         int ret;
 209         long val;
 210
 211         ret = strict_strtol(buf, 10, &val);
 212         if (ret)
 213                 goto error_ret;
 214         ret = ade7759_spi_write_reg_16(dev, this_attr->address, val);
 215
 216 error_ret:
 217         return ret ? ret : len;
 218 }
 219
 220 static int ade7759_reset(struct device *dev)
 221 {
 222         int ret;
 223         u16 val;
 224         ade7759_spi_read_reg_16(dev,
 225                         ADE7759_MODE,
 226                         &val);
 227         val |= 1 << 6; /* Software Chip Reset */
 228         ret = ade7759_spi_write_reg_16(dev,
 229                         ADE7759_MODE,
 230                         val);
 231
 232         return ret;
 233 }
 234
 235 static ssize_t ade7759_write_reset(struct device *dev,
 236                 struct device_attribute *attr,
 237                 const char *buf, size_t len)
 238 {
 239         if (len < 1)
 240                 return -1;
 241         switch (buf[0]) {
 242         case '1':
 243         case 'y':
 244         case 'Y':
 245                 return ade7759_reset(dev);
 246         }
 247         return -1;
 248 }
 249
 250 static IIO_DEV_ATTR_AENERGY(ade7759_read_40bit, ADE7759_AENERGY);
 251 static IIO_DEV_ATTR_CFDEN(S_IWUSR | S_IRUGO,
 252                 ade7759_read_16bit,
 253                 ade7759_write_16bit,
 254                 ADE7759_CFDEN);
 255 static IIO_DEV_ATTR_CFNUM(S_IWUSR | S_IRUGO,
 256                 ade7759_read_8bit,
 257                 ade7759_write_8bit,
 258                 ADE7759_CFNUM);
 259 static IIO_DEV_ATTR_CHKSUM(ade7759_read_8bit, ADE7759_CHKSUM);
 260 static IIO_DEV_ATTR_PHCAL(S_IWUSR | S_IRUGO,
 261                 ade7759_read_16bit,
 262                 ade7759_write_16bit,
 263                 ADE7759_PHCAL);
 264 static IIO_DEV_ATTR_APOS(S_IWUSR | S_IRUGO,
 265                 ade7759_read_16bit,
 266                 ade7759_write_16bit,
 267                 ADE7759_APOS);
 268 static IIO_DEV_ATTR_SAGCYC(S_IWUSR | S_IRUGO,
 269                 ade7759_read_8bit,
 270                 ade7759_write_8bit,
 271                 ADE7759_SAGCYC);
 272 static IIO_DEV_ATTR_SAGLVL(S_IWUSR | S_IRUGO,
 273                 ade7759_read_8bit,
 274                 ade7759_write_8bit,
 275                 ADE7759_SAGLVL);
 276 static IIO_DEV_ATTR_LINECYC(S_IWUSR | S_IRUGO,
 277                 ade7759_read_8bit,
 278                 ade7759_write_8bit,
 279                 ADE7759_LINECYC);
 280 static IIO_DEV_ATTR_LENERGY(ade7759_read_40bit, ADE7759_LENERGY);
 281 static IIO_DEV_ATTR_PGA_GAIN(S_IWUSR | S_IRUGO,
 282                 ade7759_read_8bit,
 283                 ade7759_write_8bit,
 284                 ADE7759_GAIN);
 285 static IIO_DEV_ATTR_ACTIVE_POWER_GAIN(S_IWUSR | S_IRUGO,
 286                 ade7759_read_16bit,
 287                 ade7759_write_16bit,
 288                 ADE7759_APGAIN);
 289 static IIO_DEV_ATTR_CH_OFF(1, S_IWUSR | S_IRUGO,
 290                 ade7759_read_8bit,
 291                 ade7759_write_8bit,
 292                 ADE7759_CH1OS);
 293 static IIO_DEV_ATTR_CH_OFF(2, S_IWUSR | S_IRUGO,
 294                 ade7759_read_8bit,
 295                 ade7759_write_8bit,
 296                 ADE7759_CH2OS);
 297
 298 static int ade7759_set_irq(struct device *dev, bool enable)
 299 {
 300         int ret;
 301         u8 irqen;
 302         ret = ade7759_spi_read_reg_8(dev, ADE7759_IRQEN, &irqen);
 303         if (ret)
 304                 goto error_ret;
 305
 306         if (enable)
 307                 irqen |= 1 << 3; /* Enables an interrupt when a data is
 308                                     present in the waveform register */
 309         else
 310                 irqen &= ~(1 << 3);
 311
 312         ret = ade7759_spi_write_reg_8(dev, ADE7759_IRQEN, irqen);
 313
 314 error_ret:
 315         return ret;
 316 }
 317
 318 /* Power down the device */
 319 static int ade7759_stop_device(struct device *dev)
 320 {
 321         u16 val;
 322
 323         ade7759_spi_read_reg_16(dev,
 324                         ADE7759_MODE,
 325                         &val);
 326         val |= 1 << 4;  /* AD converters can be turned off */
 327
 328         return ade7759_spi_write_reg_16(dev, ADE7759_MODE, val);
 329 }
 330
 331 static int ade7759_initial_setup(struct iio_dev *indio_dev)
 332 {
 333         int ret;
 334         struct ade7759_state *st = iio_priv(indio_dev);
 335         struct device *dev = &indio_dev->dev;
 336
 337         /* use low spi speed for init */
 338         st->us->mode = SPI_MODE_3;
 339         spi_setup(st->us);
 340
 341         /* Disable IRQ */
 342         ret = ade7759_set_irq(dev, false);
 343         if (ret) {
 344                 dev_err(dev, "disable irq failed");
 345                 goto err_ret;
 346         }
 347
 348         ade7759_reset(dev);
 349         msleep(ADE7759_STARTUP_DELAY);
 350
 351 err_ret:
 352         return ret;
 353 }
 354
 355 static ssize_t ade7759_read_frequency(struct device *dev,
 356                 struct device_attribute *attr,
 357                 char *buf)
 358 {
 359         int ret;
 360         u16 t;
 361         int sps;
 362         ret = ade7759_spi_read_reg_16(dev,
 363                         ADE7759_MODE,
 364                         &t);
 365         if (ret)
 366                 return ret;
 367
 368         t = (t >> 3) & 0x3;
 369         sps = 27900 / (1 + t);
 370
 371         return sprintf(buf, "%d\n", sps);
 372 }
 373
 374 static ssize_t ade7759_write_frequency(struct device *dev,
 375                 struct device_attribute *attr,
 376                 const char *buf,
 377                 size_t len)
 378 {
 379         struct iio_dev *indio_dev = dev_get_drvdata(dev);
 380         struct ade7759_state *st = iio_priv(indio_dev);
 381         unsigned long val;
 382         int ret;
 383         u16 reg, t;
 384
 385         ret = strict_strtol(buf, 10, &val);
 386         if (ret)
 387                 return ret;
 388
 389         mutex_lock(&indio_dev->mlock);
 390
 391         t = (27900 / val);
 392         if (t > 0)
 393                 t--;
 394
 395         if (t > 1)
 396                 st->us->max_speed_hz = ADE7759_SPI_SLOW;
 397         else
 398                 st->us->max_speed_hz = ADE7759_SPI_FAST;
 399
 400         ret = ade7759_spi_read_reg_16(dev, ADE7759_MODE, &reg);
 401         if (ret)
 402                 goto out;
 403
 404         reg &= ~(3 << 13);
 405         reg |= t << 13;
 406
 407         ret = ade7759_spi_write_reg_16(dev, ADE7759_MODE, reg);
 408
 409 out:
 410         mutex_unlock(&indio_dev->mlock);
 411
 412         return ret ? ret : len;
 413 }
 414 static IIO_DEV_ATTR_TEMP_RAW(ade7759_read_8bit);
 415 static IIO_CONST_ATTR(temp_offset, "70 C");
 416 static IIO_CONST_ATTR(temp_scale, "1 C");
 417
 418 static IIO_DEV_ATTR_SAMP_FREQ(S_IWUSR | S_IRUGO,
 419                 ade7759_read_frequency,
 420                 ade7759_write_frequency);
 421
 422 static IIO_DEV_ATTR_RESET(ade7759_write_reset);
 423
 424 static IIO_CONST_ATTR_SAMP_FREQ_AVAIL("27900 14000 7000 3500");
 425
 426 static struct attribute *ade7759_attributes[] = {
 427         &iio_dev_attr_temp_raw.dev_attr.attr,
 428         &iio_const_attr_temp_offset.dev_attr.attr,
 429         &iio_const_attr_temp_scale.dev_attr.attr,
 430         &iio_dev_attr_sampling_frequency.dev_attr.attr,
 431         &iio_const_attr_sampling_frequency_available.dev_attr.attr,
 432         &iio_dev_attr_reset.dev_attr.attr,
 433         &iio_dev_attr_phcal.dev_attr.attr,
 434         &iio_dev_attr_cfden.dev_attr.attr,
 435         &iio_dev_attr_aenergy.dev_attr.attr,
 436         &iio_dev_attr_cfnum.dev_attr.attr,
 437         &iio_dev_attr_apos.dev_attr.attr,
 438         &iio_dev_attr_sagcyc.dev_attr.attr,
 439         &iio_dev_attr_saglvl.dev_attr.attr,
 440         &iio_dev_attr_linecyc.dev_attr.attr,
 441         &iio_dev_attr_lenergy.dev_attr.attr,
 442         &iio_dev_attr_chksum.dev_attr.attr,
 443         &iio_dev_attr_pga_gain.dev_attr.attr,
 444         &iio_dev_attr_active_power_gain.dev_attr.attr,
 445         &iio_dev_attr_choff_1.dev_attr.attr,
 446         &iio_dev_attr_choff_2.dev_attr.attr,
 447         NULL,
 448 };
 449
 450 static const struct attribute_group ade7759_attribute_group = {
 451         .attrs = ade7759_attributes,
 452 };
 453
 454 static const struct iio_info ade7759_info = {
 455         .attrs = &ade7759_attribute_group,
 456         .driver_module = THIS_MODULE,
 457 };
 458
 459 static int __devinit ade7759_probe(struct spi_device *spi)
 460 {
 461         int ret;
 462         struct ade7759_state *st;
 463         struct iio_dev *indio_dev;
 464
 465         /* setup the industrialio driver allocated elements */
 466         indio_dev = iio_allocate_device(sizeof(*st));
 467         if (indio_dev == NULL) {
 468                 ret = -ENOMEM;
 469                 goto error_ret;
 470         }
 471         /* this is only used for removal purposes */
 472         spi_set_drvdata(spi, indio_dev);
 473
 474         st = iio_priv(indio_dev);
 475         st->us = spi;
 476         mutex_init(&st->buf_lock);
 477         indio_dev->name = spi->dev.driver->name;
 478         indio_dev->dev.parent = &spi->dev;
 479         indio_dev->info = &ade7759_info;
 480         indio_dev->modes = INDIO_DIRECT_MODE;
 481
 482         ret = iio_device_register(indio_dev);
 483         if (ret)
 484                 goto error_free_dev;
 485
 486         /* Get the device into a sane initial state */
 487         ret = ade7759_initial_setup(indio_dev);
 488         if (ret)
 489                 goto error_unreg_dev;
 490         return 0;
 491
 492
 493 error_unreg_dev:
 494         iio_device_unregister(indio_dev);
 495 error_free_dev:
 496         iio_free_device(indio_dev);
 497 error_ret:
 498         return ret;
 499 }
 500
 501 /* fixme, confirm ordering in this function */
 502 static int ade7759_remove(struct spi_device *spi)
 503 {
 504         int ret;
 505         struct iio_dev *indio_dev = spi_get_drvdata(spi);
 506
 507         ret = ade7759_stop_device(&(indio_dev->dev));
 508         if (ret)
 509                 goto err_ret;
 510
 511         iio_device_unregister(indio_dev);
 512
 513 err_ret:
 514         return ret;
 515 }
 516
 517 static struct spi_driver ade7759_driver = {
 518         .driver = {
 519                 .name = "ade7759",
 520                 .owner = THIS_MODULE,
 521         },
 522         .probe = ade7759_probe,
 523         .remove = __devexit_p(ade7759_remove),
 524 };
 525
 526 static __init int ade7759_init(void)
 527 {
 528         return spi_register_driver(&ade7759_driver);
 529 }
 530 module_init(ade7759_init);
 531
 532 static __exit void ade7759_exit(void)
 533 {
 534         spi_unregister_driver(&ade7759_driver);
 535 }
 536 module_exit(ade7759_exit);
 537
 538 MODULE_AUTHOR("Barry Song <21cnbao@gmail.com>");
 539 MODULE_DESCRIPTION("Analog Devices ADE7759 Active Energy Metering IC Driver");
 540 MODULE_LICENSE("GPL v2");