drivers/hwmon/asb100.c

   1 /*
   2  * asb100.c - Part of lm_sensors, Linux kernel modules for hardware
   3  *            monitoring
   4  *
   5  * Copyright (C) 2004 Mark M. Hoffman <mhoffman@lightlink.com>
   6  *
   7  * (derived from w83781d.c)
   8  *
   9  * Copyright (C) 1998 - 2003  Frodo Looijaard <frodol@dds.nl>,
  10  *                            Philip Edelbrock <phil@netroedge.com>, and
  11  *                            Mark Studebaker <mdsxyz123@yahoo.com>
  12  *
  13  * This program is free software; you can redistribute it and/or modify
  14  * it under the terms of the GNU General Public License as published by
  15  * the Free Software Foundation; either version 2 of the License, or
  16  * (at your option) any later version.
  17  *
  18  * This program is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU General Public License for more details.
  22  *
  23  * You should have received a copy of the GNU General Public License
  24  * along with this program; if not, write to the Free Software
  25  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  26  */
  27
  28 /*
  29  * This driver supports the hardware sensor chips: Asus ASB100 and
  30  * ASB100-A "BACH".
  31  *
  32  * ASB100-A supports pwm1, while plain ASB100 does not.  There is no known
  33  * way for the driver to tell which one is there.
  34  *
  35  * Chip         #vin    #fanin  #pwm    #temp   wchipid vendid  i2c     ISA
  36  * asb100       7       3       1       4       0x31    0x0694  yes     no
  37  */
  38
  39 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  40
  41 #include <linux/module.h>
  42 #include <linux/slab.h>
  43 #include <linux/i2c.h>
  44 #include <linux/hwmon.h>
  45 #include <linux/hwmon-sysfs.h>
  46 #include <linux/hwmon-vid.h>
  47 #include <linux/err.h>
  48 #include <linux/init.h>
  49 #include <linux/jiffies.h>
  50 #include <linux/mutex.h>
  51 #include "lm75.h"
  52
  53 /* I2C addresses to scan */
  54 static const unsigned short normal_i2c[] = { 0x2d, I2C_CLIENT_END };
  55
  56 static unsigned short force_subclients[4];
  57 module_param_array(force_subclients, short, NULL, 0);
  58 MODULE_PARM_DESC(force_subclients,
  59         "List of subclient addresses: {bus, clientaddr, subclientaddr1, subclientaddr2}");
  60
  61 /* Voltage IN registers 0-6 */
  62 #define ASB100_REG_IN(nr)       (0x20 + (nr))
  63 #define ASB100_REG_IN_MAX(nr)   (0x2b + (nr * 2))
  64 #define ASB100_REG_IN_MIN(nr)   (0x2c + (nr * 2))
  65
  66 /* FAN IN registers 1-3 */
  67 #define ASB100_REG_FAN(nr)      (0x28 + (nr))
  68 #define ASB100_REG_FAN_MIN(nr)  (0x3b + (nr))
  69
  70 /* TEMPERATURE registers 1-4 */
  71 static const u16 asb100_reg_temp[]      = {0, 0x27, 0x150, 0x250, 0x17};
  72 static const u16 asb100_reg_temp_max[]  = {0, 0x39, 0x155, 0x255, 0x18};
  73 static const u16 asb100_reg_temp_hyst[] = {0, 0x3a, 0x153, 0x253, 0x19};
  74
  75 #define ASB100_REG_TEMP(nr) (asb100_reg_temp[nr])
  76 #define ASB100_REG_TEMP_MAX(nr) (asb100_reg_temp_max[nr])
  77 #define ASB100_REG_TEMP_HYST(nr) (asb100_reg_temp_hyst[nr])
  78
  79 #define ASB100_REG_TEMP2_CONFIG 0x0152
  80 #define ASB100_REG_TEMP3_CONFIG 0x0252
  81
  82
  83 #define ASB100_REG_CONFIG       0x40
  84 #define ASB100_REG_ALARM1       0x41
  85 #define ASB100_REG_ALARM2       0x42
  86 #define ASB100_REG_SMIM1        0x43
  87 #define ASB100_REG_SMIM2        0x44
  88 #define ASB100_REG_VID_FANDIV   0x47
  89 #define ASB100_REG_I2C_ADDR     0x48
  90 #define ASB100_REG_CHIPID       0x49
  91 #define ASB100_REG_I2C_SUBADDR  0x4a
  92 #define ASB100_REG_PIN          0x4b
  93 #define ASB100_REG_IRQ          0x4c
  94 #define ASB100_REG_BANK         0x4e
  95 #define ASB100_REG_CHIPMAN      0x4f
  96
  97 #define ASB100_REG_WCHIPID      0x58
  98
  99 /* bit 7 -> enable, bits 0-3 -> duty cycle */
 100 #define ASB100_REG_PWM1         0x59
 101
 102 /*
 103  * CONVERSIONS
 104  * Rounding and limit checking is only done on the TO_REG variants.
 105  */
 106
 107 /* These constants are a guess, consistent w/ w83781d */
 108 #define ASB100_IN_MIN           0
 109 #define ASB100_IN_MAX           4080
 110
 111 /*
 112  * IN: 1/1000 V (0V to 4.08V)
 113  * REG: 16mV/bit
 114  */
 115 static u8 IN_TO_REG(unsigned val)
 116 {
 117         unsigned nval = clamp_val(val, ASB100_IN_MIN, ASB100_IN_MAX);
 118         return (nval + 8) / 16;
 119 }
 120
 121 static unsigned IN_FROM_REG(u8 reg)
 122 {
 123         return reg * 16;
 124 }
 125
 126 static u8 FAN_TO_REG(long rpm, int div)
 127 {
 128         if (rpm == -1)
 129                 return 0;
 130         if (rpm == 0)
 131                 return 255;
 132         rpm = clamp_val(rpm, 1, 1000000);
 133         return clamp_val((1350000 + rpm * div / 2) / (rpm * div), 1, 254);
 134 }
 135
 136 static int FAN_FROM_REG(u8 val, int div)
 137 {
 138         return val == 0 ? -1 : val == 255 ? 0 : 1350000 / (val * div);
 139 }
 140
 141 /* These constants are a guess, consistent w/ w83781d */
 142 #define ASB100_TEMP_MIN         -128000
 143 #define ASB100_TEMP_MAX         127000
 144
 145 /*
 146  * TEMP: 0.001C/bit (-128C to +127C)
 147  * REG: 1C/bit, two's complement
 148  */
 149 static u8 TEMP_TO_REG(long temp)
 150 {
 151         int ntemp = clamp_val(temp, ASB100_TEMP_MIN, ASB100_TEMP_MAX);
 152         ntemp += (ntemp < 0 ? -500 : 500);
 153         return (u8)(ntemp / 1000);
 154 }
 155
 156 static int TEMP_FROM_REG(u8 reg)
 157 {
 158         return (s8)reg * 1000;
 159 }
 160
 161 /*
 162  * PWM: 0 - 255 per sensors documentation
 163  * REG: (6.25% duty cycle per bit)
 164  */
 165 static u8 ASB100_PWM_TO_REG(int pwm)
 166 {
 167         pwm = clamp_val(pwm, 0, 255);
 168         return (u8)(pwm / 16);
 169 }
 170
 171 static int ASB100_PWM_FROM_REG(u8 reg)
 172 {
 173         return reg * 16;
 174 }
 175
 176 #define DIV_FROM_REG(val) (1 << (val))
 177
 178 /*
 179  * FAN DIV: 1, 2, 4, or 8 (defaults to 2)
 180  * REG: 0, 1, 2, or 3 (respectively) (defaults to 1)
 181  */
 182 static u8 DIV_TO_REG(long val)
 183 {
 184         return val == 8 ? 3 : val == 4 ? 2 : val == 1 ? 0 : 1;
 185 }
 186
 187 /*
 188  * For each registered client, we need to keep some data in memory. That
 189  * data is pointed to by client->data. The structure itself is
 190  * dynamically allocated, at the same time the client itself is allocated.
 191  */
 192 struct asb100_data {
 193         struct device *hwmon_dev;
 194         struct mutex lock;
 195
 196         struct mutex update_lock;
 197         unsigned long last_updated;     /* In jiffies */
 198
 199         /* array of 2 pointers to subclients */
 200         struct i2c_client *lm75[2];
 201
 202         char valid;             /* !=0 if following fields are valid */
 203         u8 in[7];               /* Register value */
 204         u8 in_max[7];           /* Register value */
 205         u8 in_min[7];           /* Register value */
 206         u8 fan[3];              /* Register value */
 207         u8 fan_min[3];          /* Register value */
 208         u16 temp[4];            /* Register value (0 and 3 are u8 only) */
 209         u16 temp_max[4];        /* Register value (0 and 3 are u8 only) */
 210         u16 temp_hyst[4];       /* Register value (0 and 3 are u8 only) */
 211         u8 fan_div[3];          /* Register encoding, right justified */
 212         u8 pwm;                 /* Register encoding */
 213         u8 vid;                 /* Register encoding, combined */
 214         u32 alarms;             /* Register encoding, combined */
 215         u8 vrm;
 216 };
 217
 218 static int asb100_read_value(struct i2c_client *client, u16 reg);
 219 static void asb100_write_value(struct i2c_client *client, u16 reg, u16 val);
 220
 221 static int asb100_probe(struct i2c_client *client,
 222                         const struct i2c_device_id *id);
 223 static int asb100_detect(struct i2c_client *client,
 224                          struct i2c_board_info *info);
 225 static int asb100_remove(struct i2c_client *client);
 226 static struct asb100_data *asb100_update_device(struct device *dev);
 227 static void asb100_init_client(struct i2c_client *client);
 228
 229 static const struct i2c_device_id asb100_id[] = {
 230         { "asb100", 0 },
 231         { }
 232 };
 233 MODULE_DEVICE_TABLE(i2c, asb100_id);
 234
 235 static struct i2c_driver asb100_driver = {
 236         .class          = I2C_CLASS_HWMON,
 237         .driver = {
 238                 .name   = "asb100",
 239         },
 240         .probe          = asb100_probe,
 241         .remove         = asb100_remove,
 242         .id_table       = asb100_id,
 243         .detect         = asb100_detect,
 244         .address_list   = normal_i2c,
 245 };
 246
 247 /* 7 Voltages */
 248 #define show_in_reg(reg) \
 249 static ssize_t show_##reg(struct device *dev, struct device_attribute *attr, \
 250                 char *buf) \
 251 { \
 252         int nr = to_sensor_dev_attr(attr)->index; \
 253         struct asb100_data *data = asb100_update_device(dev); \
 254         return sprintf(buf, "%d\n", IN_FROM_REG(data->reg[nr])); \
 255 }
 256
 257 show_in_reg(in)
 258 show_in_reg(in_min)
 259 show_in_reg(in_max)
 260
 261 #define set_in_reg(REG, reg) \
 262 static ssize_t set_in_##reg(struct device *dev, struct device_attribute *attr, \
 263                 const char *buf, size_t count) \
 264 { \
 265         int nr = to_sensor_dev_attr(attr)->index; \
 266         struct i2c_client *client = to_i2c_client(dev); \
 267         struct asb100_data *data = i2c_get_clientdata(client); \
 268         unsigned long val; \
 269         int err = kstrtoul(buf, 10, &val); \
 270         if (err) \
 271                 return err; \
 272         mutex_lock(&data->update_lock); \
 273         data->in_##reg[nr] = IN_TO_REG(val); \
 274         asb100_write_value(client, ASB100_REG_IN_##REG(nr), \
 275                 data->in_##reg[nr]); \
 276         mutex_unlock(&data->update_lock); \
 277         return count; \
 278 }
 279
 280 set_in_reg(MIN, min)
 281 set_in_reg(MAX, max)
 282
 283 #define sysfs_in(offset) \
 284 static SENSOR_DEVICE_ATTR(in##offset##_input, S_IRUGO, \
 285                 show_in, NULL, offset); \
 286 static SENSOR_DEVICE_ATTR(in##offset##_min, S_IRUGO | S_IWUSR, \
 287                 show_in_min, set_in_min, offset); \
 288 static SENSOR_DEVICE_ATTR(in##offset##_max, S_IRUGO | S_IWUSR, \
 289                 show_in_max, set_in_max, offset)
 290
 291 sysfs_in(0);
 292 sysfs_in(1);
 293 sysfs_in(2);
 294 sysfs_in(3);
 295 sysfs_in(4);
 296 sysfs_in(5);
 297 sysfs_in(6);
 298
 299 /* 3 Fans */
 300 static ssize_t show_fan(struct device *dev, struct device_attribute *attr,
 301                 char *buf)
 302 {
 303         int nr = to_sensor_dev_attr(attr)->index;
 304         struct asb100_data *data = asb100_update_device(dev);
 305         return sprintf(buf, "%d\n", FAN_FROM_REG(data->fan[nr],
 306                 DIV_FROM_REG(data->fan_div[nr])));
 307 }
 308
 309 static ssize_t show_fan_min(struct device *dev, struct device_attribute *attr,
 310                 char *buf)
 311 {
 312         int nr = to_sensor_dev_attr(attr)->index;
 313         struct asb100_data *data = asb100_update_device(dev);
 314         return sprintf(buf, "%d\n", FAN_FROM_REG(data->fan_min[nr],
 315                 DIV_FROM_REG(data->fan_div[nr])));
 316 }
 317
 318 static ssize_t show_fan_div(struct device *dev, struct device_attribute *attr,
 319                 char *buf)
 320 {
 321         int nr = to_sensor_dev_attr(attr)->index;
 322         struct asb100_data *data = asb100_update_device(dev);
 323         return sprintf(buf, "%d\n", DIV_FROM_REG(data->fan_div[nr]));
 324 }
 325
 326 static ssize_t set_fan_min(struct device *dev, struct device_attribute *attr,
 327                 const char *buf, size_t count)
 328 {
 329         int nr = to_sensor_dev_attr(attr)->index;
 330         struct i2c_client *client = to_i2c_client(dev);
 331         struct asb100_data *data = i2c_get_clientdata(client);
 332         unsigned long val;
 333         int err;
 334
 335         err = kstrtoul(buf, 10, &val);
 336         if (err)
 337                 return err;
 338
 339         mutex_lock(&data->update_lock);
 340         data->fan_min[nr] = FAN_TO_REG(val, DIV_FROM_REG(data->fan_div[nr]));
 341         asb100_write_value(client, ASB100_REG_FAN_MIN(nr), data->fan_min[nr]);
 342         mutex_unlock(&data->update_lock);
 343         return count;
 344 }
 345
 346 /*
 347  * Note: we save and restore the fan minimum here, because its value is
 348  * determined in part by the fan divisor.  This follows the principle of
 349  * least surprise; the user doesn't expect the fan minimum to change just
 350  * because the divisor changed.
 351  */
 352 static ssize_t set_fan_div(struct device *dev, struct device_attribute *attr,
 353                 const char *buf, size_t count)
 354 {
 355         int nr = to_sensor_dev_attr(attr)->index;
 356         struct i2c_client *client = to_i2c_client(dev);
 357         struct asb100_data *data = i2c_get_clientdata(client);
 358         unsigned long min;
 359         int reg;
 360         unsigned long val;
 361         int err;
 362
 363         err = kstrtoul(buf, 10, &val);
 364         if (err)
 365                 return err;
 366
 367         mutex_lock(&data->update_lock);
 368
 369         min = FAN_FROM_REG(data->fan_min[nr],
 370                         DIV_FROM_REG(data->fan_div[nr]));
 371         data->fan_div[nr] = DIV_TO_REG(val);
 372
 373         switch (nr) {
 374         case 0: /* fan 1 */
 375                 reg = asb100_read_value(client, ASB100_REG_VID_FANDIV);
 376                 reg = (reg & 0xcf) | (data->fan_div[0] << 4);
 377                 asb100_write_value(client, ASB100_REG_VID_FANDIV, reg);
 378                 break;
 379
 380         case 1: /* fan 2 */
 381                 reg = asb100_read_value(client, ASB100_REG_VID_FANDIV);
 382                 reg = (reg & 0x3f) | (data->fan_div[1] << 6);
 383                 asb100_write_value(client, ASB100_REG_VID_FANDIV, reg);
 384                 break;
 385
 386         case 2: /* fan 3 */
 387                 reg = asb100_read_value(client, ASB100_REG_PIN);
 388                 reg = (reg & 0x3f) | (data->fan_div[2] << 6);
 389                 asb100_write_value(client, ASB100_REG_PIN, reg);
 390                 break;
 391         }
 392
 393         data->fan_min[nr] =
 394                 FAN_TO_REG(min, DIV_FROM_REG(data->fan_div[nr]));
 395         asb100_write_value(client, ASB100_REG_FAN_MIN(nr), data->fan_min[nr]);
 396
 397         mutex_unlock(&data->update_lock);
 398
 399         return count;
 400 }
 401
 402 #define sysfs_fan(offset) \
 403 static SENSOR_DEVICE_ATTR(fan##offset##_input, S_IRUGO, \
 404                 show_fan, NULL, offset - 1); \
 405 static SENSOR_DEVICE_ATTR(fan##offset##_min, S_IRUGO | S_IWUSR, \
 406                 show_fan_min, set_fan_min, offset - 1); \
 407 static SENSOR_DEVICE_ATTR(fan##offset##_div, S_IRUGO | S_IWUSR, \
 408                 show_fan_div, set_fan_div, offset - 1)
 409
 410 sysfs_fan(1);
 411 sysfs_fan(2);
 412 sysfs_fan(3);
 413
 414 /* 4 Temp. Sensors */
 415 static int sprintf_temp_from_reg(u16 reg, char *buf, int nr)
 416 {
 417         int ret = 0;
 418
 419         switch (nr) {
 420         case 1: case 2:
 421                 ret = sprintf(buf, "%d\n", LM75_TEMP_FROM_REG(reg));
 422                 break;
 423         case 0: case 3: default:
 424                 ret = sprintf(buf, "%d\n", TEMP_FROM_REG(reg));
 425                 break;
 426         }
 427         return ret;
 428 }
 429
 430 #define show_temp_reg(reg) \
 431 static ssize_t show_##reg(struct device *dev, struct device_attribute *attr, \
 432                 char *buf) \
 433 { \
 434         int nr = to_sensor_dev_attr(attr)->index; \
 435         struct asb100_data *data = asb100_update_device(dev); \
 436         return sprintf_temp_from_reg(data->reg[nr], buf, nr); \
 437 }
 438
 439 show_temp_reg(temp);
 440 show_temp_reg(temp_max);
 441 show_temp_reg(temp_hyst);
 442
 443 #define set_temp_reg(REG, reg) \
 444 static ssize_t set_##reg(struct device *dev, struct device_attribute *attr, \
 445                 const char *buf, size_t count) \
 446 { \
 447         int nr = to_sensor_dev_attr(attr)->index; \
 448         struct i2c_client *client = to_i2c_client(dev); \
 449         struct asb100_data *data = i2c_get_clientdata(client); \
 450         long val; \
 451         int err = kstrtol(buf, 10, &val); \
 452         if (err) \
 453                 return err; \
 454         mutex_lock(&data->update_lock); \
 455         switch (nr) { \
 456         case 1: case 2: \
 457                 data->reg[nr] = LM75_TEMP_TO_REG(val); \
 458                 break; \
 459         case 0: case 3: default: \
 460                 data->reg[nr] = TEMP_TO_REG(val); \
 461                 break; \
 462         } \
 463         asb100_write_value(client, ASB100_REG_TEMP_##REG(nr+1), \
 464                         data->reg[nr]); \
 465         mutex_unlock(&data->update_lock); \
 466         return count; \
 467 }
 468
 469 set_temp_reg(MAX, temp_max);
 470 set_temp_reg(HYST, temp_hyst);
 471
 472 #define sysfs_temp(num) \
 473 static SENSOR_DEVICE_ATTR(temp##num##_input, S_IRUGO, \
 474                 show_temp, NULL, num - 1); \
 475 static SENSOR_DEVICE_ATTR(temp##num##_max, S_IRUGO | S_IWUSR, \
 476                 show_temp_max, set_temp_max, num - 1); \
 477 static SENSOR_DEVICE_ATTR(temp##num##_max_hyst, S_IRUGO | S_IWUSR, \
 478                 show_temp_hyst, set_temp_hyst, num - 1)
 479
 480 sysfs_temp(1);
 481 sysfs_temp(2);
 482 sysfs_temp(3);
 483 sysfs_temp(4);
 484
 485 /* VID */
 486 static ssize_t show_vid(struct device *dev, struct device_attribute *attr,
 487                 char *buf)
 488 {
 489         struct asb100_data *data = asb100_update_device(dev);
 490         return sprintf(buf, "%d\n", vid_from_reg(data->vid, data->vrm));
 491 }
 492
 493 static DEVICE_ATTR(cpu0_vid, S_IRUGO, show_vid, NULL);
 494
 495 /* VRM */
 496 static ssize_t show_vrm(struct device *dev, struct device_attribute *attr,
 497                 char *buf)
 498 {
 499         struct asb100_data *data = dev_get_drvdata(dev);
 500         return sprintf(buf, "%d\n", data->vrm);
 501 }
 502
 503 static ssize_t set_vrm(struct device *dev, struct device_attribute *attr,
 504                 const char *buf, size_t count)
 505 {
 506         struct asb100_data *data = dev_get_drvdata(dev);
 507         unsigned long val;
 508         int err;
 509
 510         err = kstrtoul(buf, 10, &val);
 511         if (err)
 512                 return err;
 513
 514         if (val > 255)
 515                 return -EINVAL;
 516
 517         data->vrm = val;
 518         return count;
 519 }
 520
 521 /* Alarms */
 522 static DEVICE_ATTR(vrm, S_IRUGO | S_IWUSR, show_vrm, set_vrm);
 523
 524 static ssize_t show_alarms(struct device *dev, struct device_attribute *attr,
 525                 char *buf)
 526 {
 527         struct asb100_data *data = asb100_update_device(dev);
 528         return sprintf(buf, "%u\n", data->alarms);
 529 }
 530
 531 static DEVICE_ATTR(alarms, S_IRUGO, show_alarms, NULL);
 532
 533 static ssize_t show_alarm(struct device *dev, struct device_attribute *attr,
 534                 char *buf)
 535 {
 536         int bitnr = to_sensor_dev_attr(attr)->index;
 537         struct asb100_data *data = asb100_update_device(dev);
 538         return sprintf(buf, "%u\n", (data->alarms >> bitnr) & 1);
 539 }
 540 static SENSOR_DEVICE_ATTR(in0_alarm, S_IRUGO, show_alarm, NULL, 0);
 541 static SENSOR_DEVICE_ATTR(in1_alarm, S_IRUGO, show_alarm, NULL, 1);
 542 static SENSOR_DEVICE_ATTR(in2_alarm, S_IRUGO, show_alarm, NULL, 2);
 543 static SENSOR_DEVICE_ATTR(in3_alarm, S_IRUGO, show_alarm, NULL, 3);
 544 static SENSOR_DEVICE_ATTR(in4_alarm, S_IRUGO, show_alarm, NULL, 8);
 545 static SENSOR_DEVICE_ATTR(fan1_alarm, S_IRUGO, show_alarm, NULL, 6);
 546 static SENSOR_DEVICE_ATTR(fan2_alarm, S_IRUGO, show_alarm, NULL, 7);
 547 static SENSOR_DEVICE_ATTR(fan3_alarm, S_IRUGO, show_alarm, NULL, 11);
 548 static SENSOR_DEVICE_ATTR(temp1_alarm, S_IRUGO, show_alarm, NULL, 4);
 549 static SENSOR_DEVICE_ATTR(temp2_alarm, S_IRUGO, show_alarm, NULL, 5);
 550 static SENSOR_DEVICE_ATTR(temp3_alarm, S_IRUGO, show_alarm, NULL, 13);
 551
 552 /* 1 PWM */
 553 static ssize_t show_pwm1(struct device *dev, struct device_attribute *attr,
 554                 char *buf)
 555 {
 556         struct asb100_data *data = asb100_update_device(dev);
 557         return sprintf(buf, "%d\n", ASB100_PWM_FROM_REG(data->pwm & 0x0f));
 558 }
 559
 560 static ssize_t set_pwm1(struct device *dev, struct device_attribute *attr,
 561                 const char *buf, size_t count)
 562 {
 563         struct i2c_client *client = to_i2c_client(dev);
 564         struct asb100_data *data = i2c_get_clientdata(client);
 565         unsigned long val;
 566         int err;
 567
 568         err = kstrtoul(buf, 10, &val);
 569         if (err)
 570                 return err;
 571
 572         mutex_lock(&data->update_lock);
 573         data->pwm &= 0x80; /* keep the enable bit */
 574         data->pwm |= (0x0f & ASB100_PWM_TO_REG(val));
 575         asb100_write_value(client, ASB100_REG_PWM1, data->pwm);
 576         mutex_unlock(&data->update_lock);
 577         return count;
 578 }
 579
 580 static ssize_t show_pwm_enable1(struct device *dev,
 581                 struct device_attribute *attr, char *buf)
 582 {
 583         struct asb100_data *data = asb100_update_device(dev);
 584         return sprintf(buf, "%d\n", (data->pwm & 0x80) ? 1 : 0);
 585 }
 586
 587 static ssize_t set_pwm_enable1(struct device *dev,
 588                 struct device_attribute *attr, const char *buf, size_t count)
 589 {
 590         struct i2c_client *client = to_i2c_client(dev);
 591         struct asb100_data *data = i2c_get_clientdata(client);
 592         unsigned long val;
 593         int err;
 594
 595         err = kstrtoul(buf, 10, &val);
 596         if (err)
 597                 return err;
 598
 599         mutex_lock(&data->update_lock);
 600         data->pwm &= 0x0f; /* keep the duty cycle bits */
 601         data->pwm |= (val ? 0x80 : 0x00);
 602         asb100_write_value(client, ASB100_REG_PWM1, data->pwm);
 603         mutex_unlock(&data->update_lock);
 604         return count;
 605 }
 606
 607 static DEVICE_ATTR(pwm1, S_IRUGO | S_IWUSR, show_pwm1, set_pwm1);
 608 static DEVICE_ATTR(pwm1_enable, S_IRUGO | S_IWUSR,
 609                 show_pwm_enable1, set_pwm_enable1);
 610
 611 static struct attribute *asb100_attributes[] = {
 612         &sensor_dev_attr_in0_input.dev_attr.attr,
 613         &sensor_dev_attr_in0_min.dev_attr.attr,
 614         &sensor_dev_attr_in0_max.dev_attr.attr,
 615         &sensor_dev_attr_in1_input.dev_attr.attr,
 616         &sensor_dev_attr_in1_min.dev_attr.attr,
 617         &sensor_dev_attr_in1_max.dev_attr.attr,
 618         &sensor_dev_attr_in2_input.dev_attr.attr,
 619         &sensor_dev_attr_in2_min.dev_attr.attr,
 620         &sensor_dev_attr_in2_max.dev_attr.attr,
 621         &sensor_dev_attr_in3_input.dev_attr.attr,
 622         &sensor_dev_attr_in3_min.dev_attr.attr,
 623         &sensor_dev_attr_in3_max.dev_attr.attr,
 624         &sensor_dev_attr_in4_input.dev_attr.attr,
 625         &sensor_dev_attr_in4_min.dev_attr.attr,
 626         &sensor_dev_attr_in4_max.dev_attr.attr,
 627         &sensor_dev_attr_in5_input.dev_attr.attr,
 628         &sensor_dev_attr_in5_min.dev_attr.attr,
 629         &sensor_dev_attr_in5_max.dev_attr.attr,
 630         &sensor_dev_attr_in6_input.dev_attr.attr,
 631         &sensor_dev_attr_in6_min.dev_attr.attr,
 632         &sensor_dev_attr_in6_max.dev_attr.attr,
 633
 634         &sensor_dev_attr_fan1_input.dev_attr.attr,
 635         &sensor_dev_attr_fan1_min.dev_attr.attr,
 636         &sensor_dev_attr_fan1_div.dev_attr.attr,
 637         &sensor_dev_attr_fan2_input.dev_attr.attr,
 638         &sensor_dev_attr_fan2_min.dev_attr.attr,
 639         &sensor_dev_attr_fan2_div.dev_attr.attr,
 640         &sensor_dev_attr_fan3_input.dev_attr.attr,
 641         &sensor_dev_attr_fan3_min.dev_attr.attr,
 642         &sensor_dev_attr_fan3_div.dev_attr.attr,
 643
 644         &sensor_dev_attr_temp1_input.dev_attr.attr,
 645         &sensor_dev_attr_temp1_max.dev_attr.attr,
 646         &sensor_dev_attr_temp1_max_hyst.dev_attr.attr,
 647         &sensor_dev_attr_temp2_input.dev_attr.attr,
 648         &sensor_dev_attr_temp2_max.dev_attr.attr,
 649         &sensor_dev_attr_temp2_max_hyst.dev_attr.attr,
 650         &sensor_dev_attr_temp3_input.dev_attr.attr,
 651         &sensor_dev_attr_temp3_max.dev_attr.attr,
 652         &sensor_dev_attr_temp3_max_hyst.dev_attr.attr,
 653         &sensor_dev_attr_temp4_input.dev_attr.attr,
 654         &sensor_dev_attr_temp4_max.dev_attr.attr,
 655         &sensor_dev_attr_temp4_max_hyst.dev_attr.attr,
 656
 657         &sensor_dev_attr_in0_alarm.dev_attr.attr,
 658         &sensor_dev_attr_in1_alarm.dev_attr.attr,
 659         &sensor_dev_attr_in2_alarm.dev_attr.attr,
 660         &sensor_dev_attr_in3_alarm.dev_attr.attr,
 661         &sensor_dev_attr_in4_alarm.dev_attr.attr,
 662         &sensor_dev_attr_fan1_alarm.dev_attr.attr,
 663         &sensor_dev_attr_fan2_alarm.dev_attr.attr,
 664         &sensor_dev_attr_fan3_alarm.dev_attr.attr,
 665         &sensor_dev_attr_temp1_alarm.dev_attr.attr,
 666         &sensor_dev_attr_temp2_alarm.dev_attr.attr,
 667         &sensor_dev_attr_temp3_alarm.dev_attr.attr,
 668
 669         &dev_attr_cpu0_vid.attr,
 670         &dev_attr_vrm.attr,
 671         &dev_attr_alarms.attr,
 672         &dev_attr_pwm1.attr,
 673         &dev_attr_pwm1_enable.attr,
 674
 675         NULL
 676 };
 677
 678 static const struct attribute_group asb100_group = {
 679         .attrs = asb100_attributes,
 680 };
 681
 682 static int asb100_detect_subclients(struct i2c_client *client)
 683 {
 684         int i, id, err;
 685         int address = client->addr;
 686         unsigned short sc_addr[2];
 687         struct asb100_data *data = i2c_get_clientdata(client);
 688         struct i2c_adapter *adapter = client->adapter;
 689
 690         id = i2c_adapter_id(adapter);
 691
 692         if (force_subclients[0] == id && force_subclients[1] == address) {
 693                 for (i = 2; i <= 3; i++) {
 694                         if (force_subclients[i] < 0x48 ||
 695                             force_subclients[i] > 0x4f) {
 696                                 dev_err(&client->dev,
 697                                         "invalid subclient address %d; must be 0x48-0x4f\n",
 698                                         force_subclients[i]);
 699                                 err = -ENODEV;
 700                                 goto ERROR_SC_2;
 701                         }
 702                 }
 703                 asb100_write_value(client, ASB100_REG_I2C_SUBADDR,
 704                                         (force_subclients[2] & 0x07) |
 705                                         ((force_subclients[3] & 0x07) << 4));
 706                 sc_addr[0] = force_subclients[2];
 707                 sc_addr[1] = force_subclients[3];
 708         } else {
 709                 int val = asb100_read_value(client, ASB100_REG_I2C_SUBADDR);
 710                 sc_addr[0] = 0x48 + (val & 0x07);
 711                 sc_addr[1] = 0x48 + ((val >> 4) & 0x07);
 712         }
 713
 714         if (sc_addr[0] == sc_addr[1]) {
 715                 dev_err(&client->dev,
 716                         "duplicate addresses 0x%x for subclients\n",
 717                         sc_addr[0]);
 718                 err = -ENODEV;
 719                 goto ERROR_SC_2;
 720         }
 721
 722         data->lm75[0] = i2c_new_dummy(adapter, sc_addr[0]);
 723         if (!data->lm75[0]) {
 724                 dev_err(&client->dev,
 725                         "subclient %d registration at address 0x%x failed.\n",
 726                         1, sc_addr[0]);
 727                 err = -ENOMEM;
 728                 goto ERROR_SC_2;
 729         }
 730
 731         data->lm75[1] = i2c_new_dummy(adapter, sc_addr[1]);
 732         if (!data->lm75[1]) {
 733                 dev_err(&client->dev,
 734                         "subclient %d registration at address 0x%x failed.\n",
 735                         2, sc_addr[1]);
 736                 err = -ENOMEM;
 737                 goto ERROR_SC_3;
 738         }
 739
 740         return 0;
 741
 742 /* Undo inits in case of errors */
 743 ERROR_SC_3:
 744         i2c_unregister_device(data->lm75[0]);
 745 ERROR_SC_2:
 746         return err;
 747 }
 748
 749 /* Return 0 if detection is successful, -ENODEV otherwise */
 750 static int asb100_detect(struct i2c_client *client,
 751                          struct i2c_board_info *info)
 752 {
 753         struct i2c_adapter *adapter = client->adapter;
 754         int val1, val2;
 755
 756         if (!i2c_check_functionality(adapter, I2C_FUNC_SMBUS_BYTE_DATA)) {
 757                 pr_debug("detect failed, smbus byte data not supported!\n");
 758                 return -ENODEV;
 759         }
 760
 761         val1 = i2c_smbus_read_byte_data(client, ASB100_REG_BANK);
 762         val2 = i2c_smbus_read_byte_data(client, ASB100_REG_CHIPMAN);
 763
 764         /* If we're in bank 0 */
 765         if ((!(val1 & 0x07)) &&
 766                         /* Check for ASB100 ID (low byte) */
 767                         (((!(val1 & 0x80)) && (val2 != 0x94)) ||
 768                         /* Check for ASB100 ID (high byte ) */
 769                         ((val1 & 0x80) && (val2 != 0x06)))) {
 770                 pr_debug("detect failed, bad chip id 0x%02x!\n", val2);
 771                 return -ENODEV;
 772         }
 773
 774         /* Put it now into bank 0 and Vendor ID High Byte */
 775         i2c_smbus_write_byte_data(client, ASB100_REG_BANK,
 776                 (i2c_smbus_read_byte_data(client, ASB100_REG_BANK) & 0x78)
 777                 | 0x80);
 778
 779         /* Determine the chip type. */
 780         val1 = i2c_smbus_read_byte_data(client, ASB100_REG_WCHIPID);
 781         val2 = i2c_smbus_read_byte_data(client, ASB100_REG_CHIPMAN);
 782
 783         if (val1 != 0x31 || val2 != 0x06)
 784                 return -ENODEV;
 785
 786         strlcpy(info->type, "asb100", I2C_NAME_SIZE);
 787
 788         return 0;
 789 }
 790
 791 static int asb100_probe(struct i2c_client *client,
 792                         const struct i2c_device_id *id)
 793 {
 794         int err;
 795         struct asb100_data *data;
 796
 797         data = devm_kzalloc(&client->dev, sizeof(struct asb100_data),
 798                             GFP_KERNEL);
 799         if (!data)
 800                 return -ENOMEM;
 801
 802         i2c_set_clientdata(client, data);
 803         mutex_init(&data->lock);
 804         mutex_init(&data->update_lock);
 805
 806         /* Attach secondary lm75 clients */
 807         err = asb100_detect_subclients(client);
 808         if (err)
 809                 return err;
 810
 811         /* Initialize the chip */
 812         asb100_init_client(client);
 813
 814         /* A few vars need to be filled upon startup */
 815         data->fan_min[0] = asb100_read_value(client, ASB100_REG_FAN_MIN(0));
 816         data->fan_min[1] = asb100_read_value(client, ASB100_REG_FAN_MIN(1));
 817         data->fan_min[2] = asb100_read_value(client, ASB100_REG_FAN_MIN(2));
 818
 819         /* Register sysfs hooks */
 820         err = sysfs_create_group(&client->dev.kobj, &asb100_group);
 821         if (err)
 822                 goto ERROR3;
 823
 824         data->hwmon_dev = hwmon_device_register(&client->dev);
 825         if (IS_ERR(data->hwmon_dev)) {
 826                 err = PTR_ERR(data->hwmon_dev);
 827                 goto ERROR4;
 828         }
 829
 830         return 0;
 831
 832 ERROR4:
 833         sysfs_remove_group(&client->dev.kobj, &asb100_group);
 834 ERROR3:
 835         i2c_unregister_device(data->lm75[1]);
 836         i2c_unregister_device(data->lm75[0]);
 837         return err;
 838 }
 839
 840 static int asb100_remove(struct i2c_client *client)
 841 {
 842         struct asb100_data *data = i2c_get_clientdata(client);
 843
 844         hwmon_device_unregister(data->hwmon_dev);
 845         sysfs_remove_group(&client->dev.kobj, &asb100_group);
 846
 847         i2c_unregister_device(data->lm75[1]);
 848         i2c_unregister_device(data->lm75[0]);
 849
 850         return 0;
 851 }
 852
 853 /*
 854  * The SMBus locks itself, usually, but nothing may access the chip between
 855  * bank switches.
 856  */
 857 static int asb100_read_value(struct i2c_client *client, u16 reg)
 858 {
 859         struct asb100_data *data = i2c_get_clientdata(client);
 860         struct i2c_client *cl;
 861         int res, bank;
 862
 863         mutex_lock(&data->lock);
 864
 865         bank = (reg >> 8) & 0x0f;
 866         if (bank > 2)
 867                 /* switch banks */
 868                 i2c_smbus_write_byte_data(client, ASB100_REG_BANK, bank);
 869
 870         if (bank == 0 || bank > 2) {
 871                 res = i2c_smbus_read_byte_data(client, reg & 0xff);
 872         } else {
 873                 /* switch to subclient */
 874                 cl = data->lm75[bank - 1];
 875
 876                 /* convert from ISA to LM75 I2C addresses */
 877                 switch (reg & 0xff) {
 878                 case 0x50: /* TEMP */
 879                         res = i2c_smbus_read_word_swapped(cl, 0);
 880                         break;
 881                 case 0x52: /* CONFIG */
 882                         res = i2c_smbus_read_byte_data(cl, 1);
 883                         break;
 884                 case 0x53: /* HYST */
 885                         res = i2c_smbus_read_word_swapped(cl, 2);
 886                         break;
 887                 case 0x55: /* MAX */
 888                 default:
 889                         res = i2c_smbus_read_word_swapped(cl, 3);
 890                         break;
 891                 }
 892         }
 893
 894         if (bank > 2)
 895                 i2c_smbus_write_byte_data(client, ASB100_REG_BANK, 0);
 896
 897         mutex_unlock(&data->lock);
 898
 899         return res;
 900 }
 901
 902 static void asb100_write_value(struct i2c_client *client, u16 reg, u16 value)
 903 {
 904         struct asb100_data *data = i2c_get_clientdata(client);
 905         struct i2c_client *cl;
 906         int bank;
 907
 908         mutex_lock(&data->lock);
 909
 910         bank = (reg >> 8) & 0x0f;
 911         if (bank > 2)
 912                 /* switch banks */
 913                 i2c_smbus_write_byte_data(client, ASB100_REG_BANK, bank);
 914
 915         if (bank == 0 || bank > 2) {
 916                 i2c_smbus_write_byte_data(client, reg & 0xff, value & 0xff);
 917         } else {
 918                 /* switch to subclient */
 919                 cl = data->lm75[bank - 1];
 920
 921                 /* convert from ISA to LM75 I2C addresses */
 922                 switch (reg & 0xff) {
 923                 case 0x52: /* CONFIG */
 924                         i2c_smbus_write_byte_data(cl, 1, value & 0xff);
 925                         break;
 926                 case 0x53: /* HYST */
 927                         i2c_smbus_write_word_swapped(cl, 2, value);
 928                         break;
 929                 case 0x55: /* MAX */
 930                         i2c_smbus_write_word_swapped(cl, 3, value);
 931                         break;
 932                 }
 933         }
 934
 935         if (bank > 2)
 936                 i2c_smbus_write_byte_data(client, ASB100_REG_BANK, 0);
 937
 938         mutex_unlock(&data->lock);
 939 }
 940
 941 static void asb100_init_client(struct i2c_client *client)
 942 {
 943         struct asb100_data *data = i2c_get_clientdata(client);
 944
 945         data->vrm = vid_which_vrm();
 946
 947         /* Start monitoring */
 948         asb100_write_value(client, ASB100_REG_CONFIG,
 949                 (asb100_read_value(client, ASB100_REG_CONFIG) & 0xf7) | 0x01);
 950 }
 951
 952 static struct asb100_data *asb100_update_device(struct device *dev)
 953 {
 954         struct i2c_client *client = to_i2c_client(dev);
 955         struct asb100_data *data = i2c_get_clientdata(client);
 956         int i;
 957
 958         mutex_lock(&data->update_lock);
 959
 960         if (time_after(jiffies, data->last_updated + HZ + HZ / 2)
 961                 || !data->valid) {
 962
 963                 dev_dbg(&client->dev, "starting device update...\n");
 964
 965                 /* 7 voltage inputs */
 966                 for (i = 0; i < 7; i++) {
 967                         data->in[i] = asb100_read_value(client,
 968                                 ASB100_REG_IN(i));
 969                         data->in_min[i] = asb100_read_value(client,
 970                                 ASB100_REG_IN_MIN(i));
 971                         data->in_max[i] = asb100_read_value(client,
 972                                 ASB100_REG_IN_MAX(i));
 973                 }
 974
 975                 /* 3 fan inputs */
 976                 for (i = 0; i < 3; i++) {
 977                         data->fan[i] = asb100_read_value(client,
 978                                         ASB100_REG_FAN(i));
 979                         data->fan_min[i] = asb100_read_value(client,
 980                                         ASB100_REG_FAN_MIN(i));
 981                 }
 982
 983                 /* 4 temperature inputs */
 984                 for (i = 1; i <= 4; i++) {
 985                         data->temp[i-1] = asb100_read_value(client,
 986                                         ASB100_REG_TEMP(i));
 987                         data->temp_max[i-1] = asb100_read_value(client,
 988                                         ASB100_REG_TEMP_MAX(i));
 989                         data->temp_hyst[i-1] = asb100_read_value(client,
 990                                         ASB100_REG_TEMP_HYST(i));
 991                 }
 992
 993                 /* VID and fan divisors */
 994                 i = asb100_read_value(client, ASB100_REG_VID_FANDIV);
 995                 data->vid = i & 0x0f;
 996                 data->vid |= (asb100_read_value(client,
 997                                 ASB100_REG_CHIPID) & 0x01) << 4;
 998                 data->fan_div[0] = (i >> 4) & 0x03;
 999                 data->fan_div[1] = (i >> 6) & 0x03;
1000                 data->fan_div[2] = (asb100_read_value(client,
1001                                 ASB100_REG_PIN) >> 6) & 0x03;
1002
1003                 /* PWM */
1004                 data->pwm = asb100_read_value(client, ASB100_REG_PWM1);
1005
1006                 /* alarms */
1007                 data->alarms = asb100_read_value(client, ASB100_REG_ALARM1) +
1008                         (asb100_read_value(client, ASB100_REG_ALARM2) << 8);
1009
1010                 data->last_updated = jiffies;
1011                 data->valid = 1;
1012
1013                 dev_dbg(&client->dev, "... device update complete\n");
1014         }
1015
1016         mutex_unlock(&data->update_lock);
1017
1018         return data;
1019 }
1020
1021 module_i2c_driver(asb100_driver);
1022
1023 MODULE_AUTHOR("Mark M. Hoffman <mhoffman@lightlink.com>");
1024 MODULE_DESCRIPTION("ASB100 Bach driver");
1025 MODULE_LICENSE("GPL");