drivers/hwmon/w83781d.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  * w83781d.c - Part of lm_sensors, Linux kernel modules for hardware
   4  *             monitoring
   5  * Copyright (c) 1998 - 2001  Frodo Looijaard <frodol@dds.nl>,
   6  *                            Philip Edelbrock <phil@netroedge.com>,
   7  *                            and Mark Studebaker <mdsxyz123@yahoo.com>
   8  * Copyright (c) 2007 - 2008  Jean Delvare <jdelvare@suse.de>
   9  */
  10
  11 /*
  12  * Supports following chips:
  13  *
  14  * Chip         #vin    #fanin  #pwm    #temp   wchipid vendid  i2c     ISA
  15  * as99127f     7       3       0       3       0x31    0x12c3  yes     no
  16  * as99127f rev.2 (type_name = as99127f)        0x31    0x5ca3  yes     no
  17  * w83781d      7       3       0       3       0x10-1  0x5ca3  yes     yes
  18  * w83782d      9       3       2-4     3       0x30    0x5ca3  yes     yes
  19  * w83783s      5-6     3       2       1-2     0x40    0x5ca3  yes     no
  20  *
  21  */
  22
  23 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  24
  25 #include <linux/module.h>
  26 #include <linux/init.h>
  27 #include <linux/slab.h>
  28 #include <linux/jiffies.h>
  29 #include <linux/i2c.h>
  30 #include <linux/hwmon.h>
  31 #include <linux/hwmon-vid.h>
  32 #include <linux/hwmon-sysfs.h>
  33 #include <linux/sysfs.h>
  34 #include <linux/err.h>
  35 #include <linux/mutex.h>
  36
  37 #ifdef CONFIG_ISA
  38 #include <linux/platform_device.h>
  39 #include <linux/ioport.h>
  40 #include <linux/io.h>
  41 #endif
  42
  43 #include "lm75.h"
  44
  45 /* Addresses to scan */
  46 static const unsigned short normal_i2c[] = { 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d,
  47                                                 0x2e, 0x2f, I2C_CLIENT_END };
  48
  49 enum chips { w83781d, w83782d, w83783s, as99127f };
  50
  51 /* Insmod parameters */
  52 static unsigned short force_subclients[4];
  53 module_param_array(force_subclients, short, NULL, 0);
  54 MODULE_PARM_DESC(force_subclients,
  55                  "List of subclient addresses: {bus, clientaddr, subclientaddr1, subclientaddr2}");
  56
  57 static bool reset;
  58 module_param(reset, bool, 0);
  59 MODULE_PARM_DESC(reset, "Set to one to reset chip on load");
  60
  61 static bool init = 1;
  62 module_param(init, bool, 0);
  63 MODULE_PARM_DESC(init, "Set to zero to bypass chip initialization");
  64
  65 /* Constants specified below */
  66
  67 /* Length of ISA address segment */
  68 #define W83781D_EXTENT                  8
  69
  70 /* Where are the ISA address/data registers relative to the base address */
  71 #define W83781D_ADDR_REG_OFFSET         5
  72 #define W83781D_DATA_REG_OFFSET         6
  73
  74 /* The device registers */
  75 /* in nr from 0 to 8 */
  76 #define W83781D_REG_IN_MAX(nr)          ((nr < 7) ? (0x2b + (nr) * 2) : \
  77                                                     (0x554 + (((nr) - 7) * 2)))
  78 #define W83781D_REG_IN_MIN(nr)          ((nr < 7) ? (0x2c + (nr) * 2) : \
  79                                                     (0x555 + (((nr) - 7) * 2)))
  80 #define W83781D_REG_IN(nr)              ((nr < 7) ? (0x20 + (nr)) : \
  81                                                     (0x550 + (nr) - 7))
  82
  83 /* fan nr from 0 to 2 */
  84 #define W83781D_REG_FAN_MIN(nr)         (0x3b + (nr))
  85 #define W83781D_REG_FAN(nr)             (0x28 + (nr))
  86
  87 #define W83781D_REG_BANK                0x4E
  88 #define W83781D_REG_TEMP2_CONFIG        0x152
  89 #define W83781D_REG_TEMP3_CONFIG        0x252
  90 /* temp nr from 1 to 3 */
  91 #define W83781D_REG_TEMP(nr)            ((nr == 3) ? (0x0250) : \
  92                                         ((nr == 2) ? (0x0150) : \
  93                                                      (0x27)))
  94 #define W83781D_REG_TEMP_HYST(nr)       ((nr == 3) ? (0x253) : \
  95                                         ((nr == 2) ? (0x153) : \
  96                                                      (0x3A)))
  97 #define W83781D_REG_TEMP_OVER(nr)       ((nr == 3) ? (0x255) : \
  98                                         ((nr == 2) ? (0x155) : \
  99                                                      (0x39)))
 100
 101 #define W83781D_REG_CONFIG              0x40
 102
 103 /* Interrupt status (W83781D, AS99127F) */
 104 #define W83781D_REG_ALARM1              0x41
 105 #define W83781D_REG_ALARM2              0x42
 106
 107 /* Real-time status (W83782D, W83783S) */
 108 #define W83782D_REG_ALARM1              0x459
 109 #define W83782D_REG_ALARM2              0x45A
 110 #define W83782D_REG_ALARM3              0x45B
 111
 112 #define W83781D_REG_BEEP_CONFIG         0x4D
 113 #define W83781D_REG_BEEP_INTS1          0x56
 114 #define W83781D_REG_BEEP_INTS2          0x57
 115 #define W83781D_REG_BEEP_INTS3          0x453   /* not on W83781D */
 116
 117 #define W83781D_REG_VID_FANDIV          0x47
 118
 119 #define W83781D_REG_CHIPID              0x49
 120 #define W83781D_REG_WCHIPID             0x58
 121 #define W83781D_REG_CHIPMAN             0x4F
 122 #define W83781D_REG_PIN                 0x4B
 123
 124 /* 782D/783S only */
 125 #define W83781D_REG_VBAT                0x5D
 126
 127 /* PWM 782D (1-4) and 783S (1-2) only */
 128 static const u8 W83781D_REG_PWM[] = { 0x5B, 0x5A, 0x5E, 0x5F };
 129 #define W83781D_REG_PWMCLK12            0x5C
 130 #define W83781D_REG_PWMCLK34            0x45C
 131
 132 #define W83781D_REG_I2C_ADDR            0x48
 133 #define W83781D_REG_I2C_SUBADDR         0x4A
 134
 135 /*
 136  * The following are undocumented in the data sheets however we
 137  * received the information in an email from Winbond tech support
 138  */
 139 /* Sensor selection - not on 781d */
 140 #define W83781D_REG_SCFG1               0x5D
 141 static const u8 BIT_SCFG1[] = { 0x02, 0x04, 0x08 };
 142
 143 #define W83781D_REG_SCFG2               0x59
 144 static const u8 BIT_SCFG2[] = { 0x10, 0x20, 0x40 };
 145
 146 #define W83781D_DEFAULT_BETA            3435
 147
 148 /* Conversions */
 149 #define IN_TO_REG(val)                  clamp_val(((val) + 8) / 16, 0, 255)
 150 #define IN_FROM_REG(val)                ((val) * 16)
 151
 152 static inline u8
 153 FAN_TO_REG(long rpm, int div)
 154 {
 155         if (rpm == 0)
 156                 return 255;
 157         rpm = clamp_val(rpm, 1, 1000000);
 158         return clamp_val((1350000 + rpm * div / 2) / (rpm * div), 1, 254);
 159 }
 160
 161 static inline long
 162 FAN_FROM_REG(u8 val, int div)
 163 {
 164         if (val == 0)
 165                 return -1;
 166         if (val == 255)
 167                 return 0;
 168         return 1350000 / (val * div);
 169 }
 170
 171 #define TEMP_TO_REG(val)                clamp_val((val) / 1000, -127, 128)
 172 #define TEMP_FROM_REG(val)              ((val) * 1000)
 173
 174 #define BEEP_MASK_FROM_REG(val, type)   ((type) == as99127f ? \
 175                                          (~(val)) & 0x7fff : (val) & 0xff7fff)
 176 #define BEEP_MASK_TO_REG(val, type)     ((type) == as99127f ? \
 177                                          (~(val)) & 0x7fff : (val) & 0xff7fff)
 178
 179 #define DIV_FROM_REG(val)               (1 << (val))
 180
 181 static inline u8
 182 DIV_TO_REG(long val, enum chips type)
 183 {
 184         int i;
 185         val = clamp_val(val, 1,
 186                         ((type == w83781d || type == as99127f) ? 8 : 128)) >> 1;
 187         for (i = 0; i < 7; i++) {
 188                 if (val == 0)
 189                         break;
 190                 val >>= 1;
 191         }
 192         return i;
 193 }
 194
 195 struct w83781d_data {
 196         struct i2c_client *client;
 197         struct device *hwmon_dev;
 198         struct mutex lock;
 199         enum chips type;
 200
 201         /* For ISA device only */
 202         const char *name;
 203         int isa_addr;
 204
 205         struct mutex update_lock;
 206         bool valid;             /* true if following fields are valid */
 207         unsigned long last_updated;     /* In jiffies */
 208
 209         struct i2c_client *lm75[2];     /* for secondary I2C addresses */
 210         /* array of 2 pointers to subclients */
 211
 212         u8 in[9];               /* Register value - 8 & 9 for 782D only */
 213         u8 in_max[9];           /* Register value - 8 & 9 for 782D only */
 214         u8 in_min[9];           /* Register value - 8 & 9 for 782D only */
 215         u8 fan[3];              /* Register value */
 216         u8 fan_min[3];          /* Register value */
 217         s8 temp;                /* Register value */
 218         s8 temp_max;            /* Register value */
 219         s8 temp_max_hyst;       /* Register value */
 220         u16 temp_add[2];        /* Register value */
 221         u16 temp_max_add[2];    /* Register value */
 222         u16 temp_max_hyst_add[2];       /* Register value */
 223         u8 fan_div[3];          /* Register encoding, shifted right */
 224         u8 vid;                 /* Register encoding, combined */
 225         u32 alarms;             /* Register encoding, combined */
 226         u32 beep_mask;          /* Register encoding, combined */
 227         u8 pwm[4];              /* Register value */
 228         u8 pwm2_enable;         /* Boolean */
 229         u16 sens[3];            /*
 230                                  * 782D/783S only.
 231                                  * 1 = pentium diode; 2 = 3904 diode;
 232                                  * 4 = thermistor
 233                                  */
 234         u8 vrm;
 235 };
 236
 237 static struct w83781d_data *w83781d_data_if_isa(void);
 238 static int w83781d_alias_detect(struct i2c_client *client, u8 chipid);
 239
 240 static int w83781d_read_value(struct w83781d_data *data, u16 reg);
 241 static int w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value);
 242 static struct w83781d_data *w83781d_update_device(struct device *dev);
 243 static void w83781d_init_device(struct device *dev);
 244
 245 /* following are the sysfs callback functions */
 246 #define show_in_reg(reg) \
 247 static ssize_t show_##reg(struct device *dev, struct device_attribute *da, \
 248                 char *buf) \
 249 { \
 250         struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
 251         struct w83781d_data *data = w83781d_update_device(dev); \
 252         return sprintf(buf, "%ld\n", \
 253                        (long)IN_FROM_REG(data->reg[attr->index])); \
 254 }
 255 show_in_reg(in);
 256 show_in_reg(in_min);
 257 show_in_reg(in_max);
 258
 259 #define store_in_reg(REG, reg) \
 260 static ssize_t store_in_##reg(struct device *dev, struct device_attribute \
 261                 *da, const char *buf, size_t count) \
 262 { \
 263         struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
 264         struct w83781d_data *data = dev_get_drvdata(dev); \
 265         int nr = attr->index; \
 266         unsigned long val; \
 267         int err = kstrtoul(buf, 10, &val); \
 268         if (err) \
 269                 return err; \
 270         mutex_lock(&data->update_lock); \
 271         data->in_##reg[nr] = IN_TO_REG(val); \
 272         w83781d_write_value(data, W83781D_REG_IN_##REG(nr), \
 273                             data->in_##reg[nr]); \
 274         \
 275         mutex_unlock(&data->update_lock); \
 276         return count; \
 277 }
 278 store_in_reg(MIN, min);
 279 store_in_reg(MAX, max);
 280
 281 #define sysfs_in_offsets(offset) \
 282 static SENSOR_DEVICE_ATTR(in##offset##_input, S_IRUGO, \
 283                 show_in, NULL, offset); \
 284 static SENSOR_DEVICE_ATTR(in##offset##_min, S_IRUGO | S_IWUSR, \
 285                 show_in_min, store_in_min, offset); \
 286 static SENSOR_DEVICE_ATTR(in##offset##_max, S_IRUGO | S_IWUSR, \
 287                 show_in_max, store_in_max, offset)
 288
 289 sysfs_in_offsets(0);
 290 sysfs_in_offsets(1);
 291 sysfs_in_offsets(2);
 292 sysfs_in_offsets(3);
 293 sysfs_in_offsets(4);
 294 sysfs_in_offsets(5);
 295 sysfs_in_offsets(6);
 296 sysfs_in_offsets(7);
 297 sysfs_in_offsets(8);
 298
 299 #define show_fan_reg(reg) \
 300 static ssize_t show_##reg(struct device *dev, struct device_attribute *da, \
 301                 char *buf) \
 302 { \
 303         struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
 304         struct w83781d_data *data = w83781d_update_device(dev); \
 305         return sprintf(buf, "%ld\n", \
 306                 FAN_FROM_REG(data->reg[attr->index], \
 307                         DIV_FROM_REG(data->fan_div[attr->index]))); \
 308 }
 309 show_fan_reg(fan);
 310 show_fan_reg(fan_min);
 311
 312 static ssize_t
 313 store_fan_min(struct device *dev, struct device_attribute *da,
 314                 const char *buf, size_t count)
 315 {
 316         struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
 317         struct w83781d_data *data = dev_get_drvdata(dev);
 318         int nr = attr->index;
 319         unsigned long val;
 320         int err;
 321
 322         err = kstrtoul(buf, 10, &val);
 323         if (err)
 324                 return err;
 325
 326         mutex_lock(&data->update_lock);
 327         data->fan_min[nr] =
 328             FAN_TO_REG(val, DIV_FROM_REG(data->fan_div[nr]));
 329         w83781d_write_value(data, W83781D_REG_FAN_MIN(nr),
 330                             data->fan_min[nr]);
 331
 332         mutex_unlock(&data->update_lock);
 333         return count;
 334 }
 335
 336 static SENSOR_DEVICE_ATTR(fan1_input, S_IRUGO, show_fan, NULL, 0);
 337 static SENSOR_DEVICE_ATTR(fan1_min, S_IRUGO | S_IWUSR,
 338                 show_fan_min, store_fan_min, 0);
 339 static SENSOR_DEVICE_ATTR(fan2_input, S_IRUGO, show_fan, NULL, 1);
 340 static SENSOR_DEVICE_ATTR(fan2_min, S_IRUGO | S_IWUSR,
 341                 show_fan_min, store_fan_min, 1);
 342 static SENSOR_DEVICE_ATTR(fan3_input, S_IRUGO, show_fan, NULL, 2);
 343 static SENSOR_DEVICE_ATTR(fan3_min, S_IRUGO | S_IWUSR,
 344                 show_fan_min, store_fan_min, 2);
 345
 346 #define show_temp_reg(reg) \
 347 static ssize_t show_##reg(struct device *dev, struct device_attribute *da, \
 348                 char *buf) \
 349 { \
 350         struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
 351         struct w83781d_data *data = w83781d_update_device(dev); \
 352         int nr = attr->index; \
 353         if (nr >= 2) {  /* TEMP2 and TEMP3 */ \
 354                 return sprintf(buf, "%d\n", \
 355                         LM75_TEMP_FROM_REG(data->reg##_add[nr-2])); \
 356         } else {        /* TEMP1 */ \
 357                 return sprintf(buf, "%ld\n", (long)TEMP_FROM_REG(data->reg)); \
 358         } \
 359 }
 360 show_temp_reg(temp);
 361 show_temp_reg(temp_max);
 362 show_temp_reg(temp_max_hyst);
 363
 364 #define store_temp_reg(REG, reg) \
 365 static ssize_t store_temp_##reg(struct device *dev, \
 366                 struct device_attribute *da, const char *buf, size_t count) \
 367 { \
 368         struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
 369         struct w83781d_data *data = dev_get_drvdata(dev); \
 370         int nr = attr->index; \
 371         long val; \
 372         int err = kstrtol(buf, 10, &val); \
 373         if (err) \
 374                 return err; \
 375         mutex_lock(&data->update_lock); \
 376          \
 377         if (nr >= 2) {  /* TEMP2 and TEMP3 */ \
 378                 data->temp_##reg##_add[nr-2] = LM75_TEMP_TO_REG(val); \
 379                 w83781d_write_value(data, W83781D_REG_TEMP_##REG(nr), \
 380                                 data->temp_##reg##_add[nr-2]); \
 381         } else {        /* TEMP1 */ \
 382                 data->temp_##reg = TEMP_TO_REG(val); \
 383                 w83781d_write_value(data, W83781D_REG_TEMP_##REG(nr), \
 384                         data->temp_##reg); \
 385         } \
 386          \
 387         mutex_unlock(&data->update_lock); \
 388         return count; \
 389 }
 390 store_temp_reg(OVER, max);
 391 store_temp_reg(HYST, max_hyst);
 392
 393 #define sysfs_temp_offsets(offset) \
 394 static SENSOR_DEVICE_ATTR(temp##offset##_input, S_IRUGO, \
 395                 show_temp, NULL, offset); \
 396 static SENSOR_DEVICE_ATTR(temp##offset##_max, S_IRUGO | S_IWUSR, \
 397                 show_temp_max, store_temp_max, offset); \
 398 static SENSOR_DEVICE_ATTR(temp##offset##_max_hyst, S_IRUGO | S_IWUSR, \
 399                 show_temp_max_hyst, store_temp_max_hyst, offset);
 400
 401 sysfs_temp_offsets(1);
 402 sysfs_temp_offsets(2);
 403 sysfs_temp_offsets(3);
 404
 405 static ssize_t
 406 cpu0_vid_show(struct device *dev, struct device_attribute *attr, char *buf)
 407 {
 408         struct w83781d_data *data = w83781d_update_device(dev);
 409         return sprintf(buf, "%ld\n", (long) vid_from_reg(data->vid, data->vrm));
 410 }
 411
 412 static DEVICE_ATTR_RO(cpu0_vid);
 413
 414 static ssize_t
 415 vrm_show(struct device *dev, struct device_attribute *attr, char *buf)
 416 {
 417         struct w83781d_data *data = dev_get_drvdata(dev);
 418         return sprintf(buf, "%ld\n", (long) data->vrm);
 419 }
 420
 421 static ssize_t
 422 vrm_store(struct device *dev, struct device_attribute *attr, const char *buf,
 423           size_t count)
 424 {
 425         struct w83781d_data *data = dev_get_drvdata(dev);
 426         unsigned long val;
 427         int err;
 428
 429         err = kstrtoul(buf, 10, &val);
 430         if (err)
 431                 return err;
 432         data->vrm = clamp_val(val, 0, 255);
 433
 434         return count;
 435 }
 436
 437 static DEVICE_ATTR_RW(vrm);
 438
 439 static ssize_t
 440 alarms_show(struct device *dev, struct device_attribute *attr, char *buf)
 441 {
 442         struct w83781d_data *data = w83781d_update_device(dev);
 443         return sprintf(buf, "%u\n", data->alarms);
 444 }
 445
 446 static DEVICE_ATTR_RO(alarms);
 447
 448 static ssize_t show_alarm(struct device *dev, struct device_attribute *attr,
 449                 char *buf)
 450 {
 451         struct w83781d_data *data = w83781d_update_device(dev);
 452         int bitnr = to_sensor_dev_attr(attr)->index;
 453         return sprintf(buf, "%u\n", (data->alarms >> bitnr) & 1);
 454 }
 455
 456 /* The W83781D has a single alarm bit for temp2 and temp3 */
 457 static ssize_t show_temp3_alarm(struct device *dev,
 458                 struct device_attribute *attr, char *buf)
 459 {
 460         struct w83781d_data *data = w83781d_update_device(dev);
 461         int bitnr = (data->type == w83781d) ? 5 : 13;
 462         return sprintf(buf, "%u\n", (data->alarms >> bitnr) & 1);
 463 }
 464
 465 static SENSOR_DEVICE_ATTR(in0_alarm, S_IRUGO, show_alarm, NULL, 0);
 466 static SENSOR_DEVICE_ATTR(in1_alarm, S_IRUGO, show_alarm, NULL, 1);
 467 static SENSOR_DEVICE_ATTR(in2_alarm, S_IRUGO, show_alarm, NULL, 2);
 468 static SENSOR_DEVICE_ATTR(in3_alarm, S_IRUGO, show_alarm, NULL, 3);
 469 static SENSOR_DEVICE_ATTR(in4_alarm, S_IRUGO, show_alarm, NULL, 8);
 470 static SENSOR_DEVICE_ATTR(in5_alarm, S_IRUGO, show_alarm, NULL, 9);
 471 static SENSOR_DEVICE_ATTR(in6_alarm, S_IRUGO, show_alarm, NULL, 10);
 472 static SENSOR_DEVICE_ATTR(in7_alarm, S_IRUGO, show_alarm, NULL, 16);
 473 static SENSOR_DEVICE_ATTR(in8_alarm, S_IRUGO, show_alarm, NULL, 17);
 474 static SENSOR_DEVICE_ATTR(fan1_alarm, S_IRUGO, show_alarm, NULL, 6);
 475 static SENSOR_DEVICE_ATTR(fan2_alarm, S_IRUGO, show_alarm, NULL, 7);
 476 static SENSOR_DEVICE_ATTR(fan3_alarm, S_IRUGO, show_alarm, NULL, 11);
 477 static SENSOR_DEVICE_ATTR(temp1_alarm, S_IRUGO, show_alarm, NULL, 4);
 478 static SENSOR_DEVICE_ATTR(temp2_alarm, S_IRUGO, show_alarm, NULL, 5);
 479 static SENSOR_DEVICE_ATTR(temp3_alarm, S_IRUGO, show_temp3_alarm, NULL, 0);
 480
 481 static ssize_t beep_mask_show(struct device *dev,
 482                                struct device_attribute *attr, char *buf)
 483 {
 484         struct w83781d_data *data = w83781d_update_device(dev);
 485         return sprintf(buf, "%ld\n",
 486                        (long)BEEP_MASK_FROM_REG(data->beep_mask, data->type));
 487 }
 488
 489 static ssize_t
 490 beep_mask_store(struct device *dev, struct device_attribute *attr,
 491                 const char *buf, size_t count)
 492 {
 493         struct w83781d_data *data = dev_get_drvdata(dev);
 494         unsigned long val;
 495         int err;
 496
 497         err = kstrtoul(buf, 10, &val);
 498         if (err)
 499                 return err;
 500
 501         mutex_lock(&data->update_lock);
 502         data->beep_mask &= 0x8000; /* preserve beep enable */
 503         data->beep_mask |= BEEP_MASK_TO_REG(val, data->type);
 504         w83781d_write_value(data, W83781D_REG_BEEP_INTS1,
 505                             data->beep_mask & 0xff);
 506         w83781d_write_value(data, W83781D_REG_BEEP_INTS2,
 507                             (data->beep_mask >> 8) & 0xff);
 508         if (data->type != w83781d && data->type != as99127f) {
 509                 w83781d_write_value(data, W83781D_REG_BEEP_INTS3,
 510                                     ((data->beep_mask) >> 16) & 0xff);
 511         }
 512         mutex_unlock(&data->update_lock);
 513
 514         return count;
 515 }
 516
 517 static DEVICE_ATTR_RW(beep_mask);
 518
 519 static ssize_t show_beep(struct device *dev, struct device_attribute *attr,
 520                 char *buf)
 521 {
 522         struct w83781d_data *data = w83781d_update_device(dev);
 523         int bitnr = to_sensor_dev_attr(attr)->index;
 524         return sprintf(buf, "%u\n", (data->beep_mask >> bitnr) & 1);
 525 }
 526
 527 static ssize_t
 528 store_beep(struct device *dev, struct device_attribute *attr,
 529                 const char *buf, size_t count)
 530 {
 531         struct w83781d_data *data = dev_get_drvdata(dev);
 532         int bitnr = to_sensor_dev_attr(attr)->index;
 533         u8 reg;
 534         unsigned long bit;
 535         int err;
 536
 537         err = kstrtoul(buf, 10, &bit);
 538         if (err)
 539                 return err;
 540
 541         if (bit & ~1)
 542                 return -EINVAL;
 543
 544         mutex_lock(&data->update_lock);
 545         if (bit)
 546                 data->beep_mask |= (1 << bitnr);
 547         else
 548                 data->beep_mask &= ~(1 << bitnr);
 549
 550         if (bitnr < 8) {
 551                 reg = w83781d_read_value(data, W83781D_REG_BEEP_INTS1);
 552                 if (bit)
 553                         reg |= (1 << bitnr);
 554                 else
 555                         reg &= ~(1 << bitnr);
 556                 w83781d_write_value(data, W83781D_REG_BEEP_INTS1, reg);
 557         } else if (bitnr < 16) {
 558                 reg = w83781d_read_value(data, W83781D_REG_BEEP_INTS2);
 559                 if (bit)
 560                         reg |= (1 << (bitnr - 8));
 561                 else
 562                         reg &= ~(1 << (bitnr - 8));
 563                 w83781d_write_value(data, W83781D_REG_BEEP_INTS2, reg);
 564         } else {
 565                 reg = w83781d_read_value(data, W83781D_REG_BEEP_INTS3);
 566                 if (bit)
 567                         reg |= (1 << (bitnr - 16));
 568                 else
 569                         reg &= ~(1 << (bitnr - 16));
 570                 w83781d_write_value(data, W83781D_REG_BEEP_INTS3, reg);
 571         }
 572         mutex_unlock(&data->update_lock);
 573
 574         return count;
 575 }
 576
 577 /* The W83781D has a single beep bit for temp2 and temp3 */
 578 static ssize_t show_temp3_beep(struct device *dev,
 579                 struct device_attribute *attr, char *buf)
 580 {
 581         struct w83781d_data *data = w83781d_update_device(dev);
 582         int bitnr = (data->type == w83781d) ? 5 : 13;
 583         return sprintf(buf, "%u\n", (data->beep_mask >> bitnr) & 1);
 584 }
 585
 586 static SENSOR_DEVICE_ATTR(in0_beep, S_IRUGO | S_IWUSR,
 587                         show_beep, store_beep, 0);
 588 static SENSOR_DEVICE_ATTR(in1_beep, S_IRUGO | S_IWUSR,
 589                         show_beep, store_beep, 1);
 590 static SENSOR_DEVICE_ATTR(in2_beep, S_IRUGO | S_IWUSR,
 591                         show_beep, store_beep, 2);
 592 static SENSOR_DEVICE_ATTR(in3_beep, S_IRUGO | S_IWUSR,
 593                         show_beep, store_beep, 3);
 594 static SENSOR_DEVICE_ATTR(in4_beep, S_IRUGO | S_IWUSR,
 595                         show_beep, store_beep, 8);
 596 static SENSOR_DEVICE_ATTR(in5_beep, S_IRUGO | S_IWUSR,
 597                         show_beep, store_beep, 9);
 598 static SENSOR_DEVICE_ATTR(in6_beep, S_IRUGO | S_IWUSR,
 599                         show_beep, store_beep, 10);
 600 static SENSOR_DEVICE_ATTR(in7_beep, S_IRUGO | S_IWUSR,
 601                         show_beep, store_beep, 16);
 602 static SENSOR_DEVICE_ATTR(in8_beep, S_IRUGO | S_IWUSR,
 603                         show_beep, store_beep, 17);
 604 static SENSOR_DEVICE_ATTR(fan1_beep, S_IRUGO | S_IWUSR,
 605                         show_beep, store_beep, 6);
 606 static SENSOR_DEVICE_ATTR(fan2_beep, S_IRUGO | S_IWUSR,
 607                         show_beep, store_beep, 7);
 608 static SENSOR_DEVICE_ATTR(fan3_beep, S_IRUGO | S_IWUSR,
 609                         show_beep, store_beep, 11);
 610 static SENSOR_DEVICE_ATTR(temp1_beep, S_IRUGO | S_IWUSR,
 611                         show_beep, store_beep, 4);
 612 static SENSOR_DEVICE_ATTR(temp2_beep, S_IRUGO | S_IWUSR,
 613                         show_beep, store_beep, 5);
 614 static SENSOR_DEVICE_ATTR(temp3_beep, S_IRUGO,
 615                         show_temp3_beep, store_beep, 13);
 616 static SENSOR_DEVICE_ATTR(beep_enable, S_IRUGO | S_IWUSR,
 617                         show_beep, store_beep, 15);
 618
 619 static ssize_t
 620 show_fan_div(struct device *dev, struct device_attribute *da, char *buf)
 621 {
 622         struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
 623         struct w83781d_data *data = w83781d_update_device(dev);
 624         return sprintf(buf, "%ld\n",
 625                        (long) DIV_FROM_REG(data->fan_div[attr->index]));
 626 }
 627
 628 /*
 629  * Note: we save and restore the fan minimum here, because its value is
 630  * determined in part by the fan divisor.  This follows the principle of
 631  * least surprise; the user doesn't expect the fan minimum to change just
 632  * because the divisor changed.
 633  */
 634 static ssize_t
 635 store_fan_div(struct device *dev, struct device_attribute *da,
 636                 const char *buf, size_t count)
 637 {
 638         struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
 639         struct w83781d_data *data = dev_get_drvdata(dev);
 640         unsigned long min;
 641         int nr = attr->index;
 642         u8 reg;
 643         unsigned long val;
 644         int err;
 645
 646         err = kstrtoul(buf, 10, &val);
 647         if (err)
 648                 return err;
 649
 650         mutex_lock(&data->update_lock);
 651
 652         /* Save fan_min */
 653         min = FAN_FROM_REG(data->fan_min[nr],
 654                            DIV_FROM_REG(data->fan_div[nr]));
 655
 656         data->fan_div[nr] = DIV_TO_REG(val, data->type);
 657
 658         reg = (w83781d_read_value(data, nr == 2 ?
 659                                   W83781D_REG_PIN : W83781D_REG_VID_FANDIV)
 660                 & (nr == 0 ? 0xcf : 0x3f))
 661               | ((data->fan_div[nr] & 0x03) << (nr == 0 ? 4 : 6));
 662         w83781d_write_value(data, nr == 2 ?
 663                             W83781D_REG_PIN : W83781D_REG_VID_FANDIV, reg);
 664
 665         /* w83781d and as99127f don't have extended divisor bits */
 666         if (data->type != w83781d && data->type != as99127f) {
 667                 reg = (w83781d_read_value(data, W83781D_REG_VBAT)
 668                        & ~(1 << (5 + nr)))
 669                     | ((data->fan_div[nr] & 0x04) << (3 + nr));
 670                 w83781d_write_value(data, W83781D_REG_VBAT, reg);
 671         }
 672
 673         /* Restore fan_min */
 674         data->fan_min[nr] = FAN_TO_REG(min, DIV_FROM_REG(data->fan_div[nr]));
 675         w83781d_write_value(data, W83781D_REG_FAN_MIN(nr), data->fan_min[nr]);
 676
 677         mutex_unlock(&data->update_lock);
 678         return count;
 679 }
 680
 681 static SENSOR_DEVICE_ATTR(fan1_div, S_IRUGO | S_IWUSR,
 682                 show_fan_div, store_fan_div, 0);
 683 static SENSOR_DEVICE_ATTR(fan2_div, S_IRUGO | S_IWUSR,
 684                 show_fan_div, store_fan_div, 1);
 685 static SENSOR_DEVICE_ATTR(fan3_div, S_IRUGO | S_IWUSR,
 686                 show_fan_div, store_fan_div, 2);
 687
 688 static ssize_t
 689 show_pwm(struct device *dev, struct device_attribute *da, char *buf)
 690 {
 691         struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
 692         struct w83781d_data *data = w83781d_update_device(dev);
 693         return sprintf(buf, "%d\n", (int)data->pwm[attr->index]);
 694 }
 695
 696 static ssize_t
 697 pwm2_enable_show(struct device *dev, struct device_attribute *da, char *buf)
 698 {
 699         struct w83781d_data *data = w83781d_update_device(dev);
 700         return sprintf(buf, "%d\n", (int)data->pwm2_enable);
 701 }
 702
 703 static ssize_t
 704 store_pwm(struct device *dev, struct device_attribute *da, const char *buf,
 705                 size_t count)
 706 {
 707         struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
 708         struct w83781d_data *data = dev_get_drvdata(dev);
 709         int nr = attr->index;
 710         unsigned long val;
 711         int err;
 712
 713         err = kstrtoul(buf, 10, &val);
 714         if (err)
 715                 return err;
 716
 717         mutex_lock(&data->update_lock);
 718         data->pwm[nr] = clamp_val(val, 0, 255);
 719         w83781d_write_value(data, W83781D_REG_PWM[nr], data->pwm[nr]);
 720         mutex_unlock(&data->update_lock);
 721         return count;
 722 }
 723
 724 static ssize_t
 725 pwm2_enable_store(struct device *dev, struct device_attribute *da,
 726                 const char *buf, size_t count)
 727 {
 728         struct w83781d_data *data = dev_get_drvdata(dev);
 729         unsigned long val;
 730         u32 reg;
 731         int err;
 732
 733         err = kstrtoul(buf, 10, &val);
 734         if (err)
 735                 return err;
 736
 737         mutex_lock(&data->update_lock);
 738
 739         switch (val) {
 740         case 0:
 741         case 1:
 742                 reg = w83781d_read_value(data, W83781D_REG_PWMCLK12);
 743                 w83781d_write_value(data, W83781D_REG_PWMCLK12,
 744                                     (reg & 0xf7) | (val << 3));
 745
 746                 reg = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
 747                 w83781d_write_value(data, W83781D_REG_BEEP_CONFIG,
 748                                     (reg & 0xef) | (!val << 4));
 749
 750                 data->pwm2_enable = val;
 751                 break;
 752
 753         default:
 754                 mutex_unlock(&data->update_lock);
 755                 return -EINVAL;
 756         }
 757
 758         mutex_unlock(&data->update_lock);
 759         return count;
 760 }
 761
 762 static SENSOR_DEVICE_ATTR(pwm1, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 0);
 763 static SENSOR_DEVICE_ATTR(pwm2, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 1);
 764 static SENSOR_DEVICE_ATTR(pwm3, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 2);
 765 static SENSOR_DEVICE_ATTR(pwm4, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 3);
 766 /* only PWM2 can be enabled/disabled */
 767 static DEVICE_ATTR_RW(pwm2_enable);
 768
 769 static ssize_t
 770 show_sensor(struct device *dev, struct device_attribute *da, char *buf)
 771 {
 772         struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
 773         struct w83781d_data *data = w83781d_update_device(dev);
 774         return sprintf(buf, "%d\n", (int)data->sens[attr->index]);
 775 }
 776
 777 static ssize_t
 778 store_sensor(struct device *dev, struct device_attribute *da,
 779                 const char *buf, size_t count)
 780 {
 781         struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
 782         struct w83781d_data *data = dev_get_drvdata(dev);
 783         int nr = attr->index;
 784         unsigned long val;
 785         u32 tmp;
 786         int err;
 787
 788         err = kstrtoul(buf, 10, &val);
 789         if (err)
 790                 return err;
 791
 792         mutex_lock(&data->update_lock);
 793
 794         switch (val) {
 795         case 1:         /* PII/Celeron diode */
 796                 tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
 797                 w83781d_write_value(data, W83781D_REG_SCFG1,
 798                                     tmp | BIT_SCFG1[nr]);
 799                 tmp = w83781d_read_value(data, W83781D_REG_SCFG2);
 800                 w83781d_write_value(data, W83781D_REG_SCFG2,
 801                                     tmp | BIT_SCFG2[nr]);
 802                 data->sens[nr] = val;
 803                 break;
 804         case 2:         /* 3904 */
 805                 tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
 806                 w83781d_write_value(data, W83781D_REG_SCFG1,
 807                                     tmp | BIT_SCFG1[nr]);
 808                 tmp = w83781d_read_value(data, W83781D_REG_SCFG2);
 809                 w83781d_write_value(data, W83781D_REG_SCFG2,
 810                                     tmp & ~BIT_SCFG2[nr]);
 811                 data->sens[nr] = val;
 812                 break;
 813         case W83781D_DEFAULT_BETA:
 814                 dev_warn(dev,
 815                          "Sensor type %d is deprecated, please use 4 instead\n",
 816                          W83781D_DEFAULT_BETA);
 817                 fallthrough;
 818         case 4:         /* thermistor */
 819                 tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
 820                 w83781d_write_value(data, W83781D_REG_SCFG1,
 821                                     tmp & ~BIT_SCFG1[nr]);
 822                 data->sens[nr] = val;
 823                 break;
 824         default:
 825                 dev_err(dev, "Invalid sensor type %ld; must be 1, 2, or 4\n",
 826                        (long) val);
 827                 break;
 828         }
 829
 830         mutex_unlock(&data->update_lock);
 831         return count;
 832 }
 833
 834 static SENSOR_DEVICE_ATTR(temp1_type, S_IRUGO | S_IWUSR,
 835         show_sensor, store_sensor, 0);
 836 static SENSOR_DEVICE_ATTR(temp2_type, S_IRUGO | S_IWUSR,
 837         show_sensor, store_sensor, 1);
 838 static SENSOR_DEVICE_ATTR(temp3_type, S_IRUGO | S_IWUSR,
 839         show_sensor, store_sensor, 2);
 840
 841 /*
 842  * Assumes that adapter is of I2C, not ISA variety.
 843  * OTHERWISE DON'T CALL THIS
 844  */
 845 static int
 846 w83781d_detect_subclients(struct i2c_client *new_client)
 847 {
 848         int i, val1 = 0, id;
 849         int err;
 850         int address = new_client->addr;
 851         unsigned short sc_addr[2];
 852         struct i2c_adapter *adapter = new_client->adapter;
 853         struct w83781d_data *data = i2c_get_clientdata(new_client);
 854         enum chips kind = data->type;
 855         int num_sc = 1;
 856
 857         id = i2c_adapter_id(adapter);
 858
 859         if (force_subclients[0] == id && force_subclients[1] == address) {
 860                 for (i = 2; i <= 3; i++) {
 861                         if (force_subclients[i] < 0x48 ||
 862                             force_subclients[i] > 0x4f) {
 863                                 dev_err(&new_client->dev,
 864                                         "Invalid subclient address %d; must be 0x48-0x4f\n",
 865                                         force_subclients[i]);
 866                                 err = -EINVAL;
 867                                 goto ERROR_SC_1;
 868                         }
 869                 }
 870                 w83781d_write_value(data, W83781D_REG_I2C_SUBADDR,
 871                                 (force_subclients[2] & 0x07) |
 872                                 ((force_subclients[3] & 0x07) << 4));
 873                 sc_addr[0] = force_subclients[2];
 874         } else {
 875                 val1 = w83781d_read_value(data, W83781D_REG_I2C_SUBADDR);
 876                 sc_addr[0] = 0x48 + (val1 & 0x07);
 877         }
 878
 879         if (kind != w83783s) {
 880                 num_sc = 2;
 881                 if (force_subclients[0] == id &&
 882                     force_subclients[1] == address) {
 883                         sc_addr[1] = force_subclients[3];
 884                 } else {
 885                         sc_addr[1] = 0x48 + ((val1 >> 4) & 0x07);
 886                 }
 887                 if (sc_addr[0] == sc_addr[1]) {
 888                         dev_err(&new_client->dev,
 889                                "Duplicate addresses 0x%x for subclients.\n",
 890                                sc_addr[0]);
 891                         err = -EBUSY;
 892                         goto ERROR_SC_2;
 893                 }
 894         }
 895
 896         for (i = 0; i < num_sc; i++) {
 897                 data->lm75[i] = i2c_new_dummy_device(adapter, sc_addr[i]);
 898                 if (IS_ERR(data->lm75[i])) {
 899                         dev_err(&new_client->dev,
 900                                 "Subclient %d registration at address 0x%x failed.\n",
 901                                 i, sc_addr[i]);
 902                         err = PTR_ERR(data->lm75[i]);
 903                         if (i == 1)
 904                                 goto ERROR_SC_3;
 905                         goto ERROR_SC_2;
 906                 }
 907         }
 908
 909         return 0;
 910
 911 /* Undo inits in case of errors */
 912 ERROR_SC_3:
 913         i2c_unregister_device(data->lm75[0]);
 914 ERROR_SC_2:
 915 ERROR_SC_1:
 916         return err;
 917 }
 918
 919 #define IN_UNIT_ATTRS(X)                                        \
 920         &sensor_dev_attr_in##X##_input.dev_attr.attr,           \
 921         &sensor_dev_attr_in##X##_min.dev_attr.attr,             \
 922         &sensor_dev_attr_in##X##_max.dev_attr.attr,             \
 923         &sensor_dev_attr_in##X##_alarm.dev_attr.attr,           \
 924         &sensor_dev_attr_in##X##_beep.dev_attr.attr
 925
 926 #define FAN_UNIT_ATTRS(X)                                       \
 927         &sensor_dev_attr_fan##X##_input.dev_attr.attr,          \
 928         &sensor_dev_attr_fan##X##_min.dev_attr.attr,            \
 929         &sensor_dev_attr_fan##X##_div.dev_attr.attr,            \
 930         &sensor_dev_attr_fan##X##_alarm.dev_attr.attr,          \
 931         &sensor_dev_attr_fan##X##_beep.dev_attr.attr
 932
 933 #define TEMP_UNIT_ATTRS(X)                                      \
 934         &sensor_dev_attr_temp##X##_input.dev_attr.attr,         \
 935         &sensor_dev_attr_temp##X##_max.dev_attr.attr,           \
 936         &sensor_dev_attr_temp##X##_max_hyst.dev_attr.attr,      \
 937         &sensor_dev_attr_temp##X##_alarm.dev_attr.attr,         \
 938         &sensor_dev_attr_temp##X##_beep.dev_attr.attr
 939
 940 static struct attribute *w83781d_attributes[] = {
 941         IN_UNIT_ATTRS(0),
 942         IN_UNIT_ATTRS(2),
 943         IN_UNIT_ATTRS(3),
 944         IN_UNIT_ATTRS(4),
 945         IN_UNIT_ATTRS(5),
 946         IN_UNIT_ATTRS(6),
 947         FAN_UNIT_ATTRS(1),
 948         FAN_UNIT_ATTRS(2),
 949         FAN_UNIT_ATTRS(3),
 950         TEMP_UNIT_ATTRS(1),
 951         TEMP_UNIT_ATTRS(2),
 952         &dev_attr_cpu0_vid.attr,
 953         &dev_attr_vrm.attr,
 954         &dev_attr_alarms.attr,
 955         &dev_attr_beep_mask.attr,
 956         &sensor_dev_attr_beep_enable.dev_attr.attr,
 957         NULL
 958 };
 959 static const struct attribute_group w83781d_group = {
 960         .attrs = w83781d_attributes,
 961 };
 962
 963 static struct attribute *w83781d_attributes_in1[] = {
 964         IN_UNIT_ATTRS(1),
 965         NULL
 966 };
 967 static const struct attribute_group w83781d_group_in1 = {
 968         .attrs = w83781d_attributes_in1,
 969 };
 970
 971 static struct attribute *w83781d_attributes_in78[] = {
 972         IN_UNIT_ATTRS(7),
 973         IN_UNIT_ATTRS(8),
 974         NULL
 975 };
 976 static const struct attribute_group w83781d_group_in78 = {
 977         .attrs = w83781d_attributes_in78,
 978 };
 979
 980 static struct attribute *w83781d_attributes_temp3[] = {
 981         TEMP_UNIT_ATTRS(3),
 982         NULL
 983 };
 984 static const struct attribute_group w83781d_group_temp3 = {
 985         .attrs = w83781d_attributes_temp3,
 986 };
 987
 988 static struct attribute *w83781d_attributes_pwm12[] = {
 989         &sensor_dev_attr_pwm1.dev_attr.attr,
 990         &sensor_dev_attr_pwm2.dev_attr.attr,
 991         &dev_attr_pwm2_enable.attr,
 992         NULL
 993 };
 994 static const struct attribute_group w83781d_group_pwm12 = {
 995         .attrs = w83781d_attributes_pwm12,
 996 };
 997
 998 static struct attribute *w83781d_attributes_pwm34[] = {
 999         &sensor_dev_attr_pwm3.dev_attr.attr,
1000         &sensor_dev_attr_pwm4.dev_attr.attr,
1001         NULL
1002 };
1003 static const struct attribute_group w83781d_group_pwm34 = {
1004         .attrs = w83781d_attributes_pwm34,
1005 };
1006
1007 static struct attribute *w83781d_attributes_other[] = {
1008         &sensor_dev_attr_temp1_type.dev_attr.attr,
1009         &sensor_dev_attr_temp2_type.dev_attr.attr,
1010         &sensor_dev_attr_temp3_type.dev_attr.attr,
1011         NULL
1012 };
1013 static const struct attribute_group w83781d_group_other = {
1014         .attrs = w83781d_attributes_other,
1015 };
1016
1017 /* No clean up is done on error, it's up to the caller */
1018 static int
1019 w83781d_create_files(struct device *dev, int kind, int is_isa)
1020 {
1021         int err;
1022
1023         err = sysfs_create_group(&dev->kobj, &w83781d_group);
1024         if (err)
1025                 return err;
1026
1027         if (kind != w83783s) {
1028                 err = sysfs_create_group(&dev->kobj, &w83781d_group_in1);
1029                 if (err)
1030                         return err;
1031         }
1032         if (kind != as99127f && kind != w83781d && kind != w83783s) {
1033                 err = sysfs_create_group(&dev->kobj, &w83781d_group_in78);
1034                 if (err)
1035                         return err;
1036         }
1037         if (kind != w83783s) {
1038                 err = sysfs_create_group(&dev->kobj, &w83781d_group_temp3);
1039                 if (err)
1040                         return err;
1041
1042                 if (kind != w83781d) {
1043                         err = sysfs_chmod_file(&dev->kobj,
1044                                 &sensor_dev_attr_temp3_alarm.dev_attr.attr,
1045                                 S_IRUGO | S_IWUSR);
1046                         if (err)
1047                                 return err;
1048                 }
1049         }
1050
1051         if (kind != w83781d && kind != as99127f) {
1052                 err = sysfs_create_group(&dev->kobj, &w83781d_group_pwm12);
1053                 if (err)
1054                         return err;
1055         }
1056         if (kind == w83782d && !is_isa) {
1057                 err = sysfs_create_group(&dev->kobj, &w83781d_group_pwm34);
1058                 if (err)
1059                         return err;
1060         }
1061
1062         if (kind != as99127f && kind != w83781d) {
1063                 err = device_create_file(dev,
1064                                          &sensor_dev_attr_temp1_type.dev_attr);
1065                 if (err)
1066                         return err;
1067                 err = device_create_file(dev,
1068                                          &sensor_dev_attr_temp2_type.dev_attr);
1069                 if (err)
1070                         return err;
1071                 if (kind != w83783s) {
1072                         err = device_create_file(dev,
1073                                         &sensor_dev_attr_temp3_type.dev_attr);
1074                         if (err)
1075                                 return err;
1076                 }
1077         }
1078
1079         return 0;
1080 }
1081
1082 /* Return 0 if detection is successful, -ENODEV otherwise */
1083 static int
1084 w83781d_detect(struct i2c_client *client, struct i2c_board_info *info)
1085 {
1086         int val1, val2;
1087         struct w83781d_data *isa = w83781d_data_if_isa();
1088         struct i2c_adapter *adapter = client->adapter;
1089         int address = client->addr;
1090         const char *client_name;
1091         enum vendor { winbond, asus } vendid;
1092
1093         if (!i2c_check_functionality(adapter, I2C_FUNC_SMBUS_BYTE_DATA))
1094                 return -ENODEV;
1095
1096         /*
1097          * We block updates of the ISA device to minimize the risk of
1098          * concurrent access to the same W83781D chip through different
1099          * interfaces.
1100          */
1101         if (isa)
1102                 mutex_lock(&isa->update_lock);
1103
1104         if (i2c_smbus_read_byte_data(client, W83781D_REG_CONFIG) & 0x80) {
1105                 dev_dbg(&adapter->dev,
1106                         "Detection of w83781d chip failed at step 3\n");
1107                 goto err_nodev;
1108         }
1109
1110         val1 = i2c_smbus_read_byte_data(client, W83781D_REG_BANK);
1111         val2 = i2c_smbus_read_byte_data(client, W83781D_REG_CHIPMAN);
1112         /* Check for Winbond or Asus ID if in bank 0 */
1113         if (!(val1 & 0x07) &&
1114             ((!(val1 & 0x80) && val2 != 0xa3 && val2 != 0xc3) ||
1115              ((val1 & 0x80) && val2 != 0x5c && val2 != 0x12))) {
1116                 dev_dbg(&adapter->dev,
1117                         "Detection of w83781d chip failed at step 4\n");
1118                 goto err_nodev;
1119         }
1120         /*
1121          * If Winbond SMBus, check address at 0x48.
1122          * Asus doesn't support, except for as99127f rev.2
1123          */
1124         if ((!(val1 & 0x80) && val2 == 0xa3) ||
1125             ((val1 & 0x80) && val2 == 0x5c)) {
1126                 if (i2c_smbus_read_byte_data(client, W83781D_REG_I2C_ADDR)
1127                     != address) {
1128                         dev_dbg(&adapter->dev,
1129                                 "Detection of w83781d chip failed at step 5\n");
1130                         goto err_nodev;
1131                 }
1132         }
1133
1134         /* Put it now into bank 0 and Vendor ID High Byte */
1135         i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
1136                 (i2c_smbus_read_byte_data(client, W83781D_REG_BANK)
1137                  & 0x78) | 0x80);
1138
1139         /* Get the vendor ID */
1140         val2 = i2c_smbus_read_byte_data(client, W83781D_REG_CHIPMAN);
1141         if (val2 == 0x5c)
1142                 vendid = winbond;
1143         else if (val2 == 0x12)
1144                 vendid = asus;
1145         else {
1146                 dev_dbg(&adapter->dev,
1147                         "w83781d chip vendor is neither Winbond nor Asus\n");
1148                 goto err_nodev;
1149         }
1150
1151         /* Determine the chip type. */
1152         val1 = i2c_smbus_read_byte_data(client, W83781D_REG_WCHIPID);
1153         if ((val1 == 0x10 || val1 == 0x11) && vendid == winbond)
1154                 client_name = "w83781d";
1155         else if (val1 == 0x30 && vendid == winbond)
1156                 client_name = "w83782d";
1157         else if (val1 == 0x40 && vendid == winbond && address == 0x2d)
1158                 client_name = "w83783s";
1159         else if (val1 == 0x31)
1160                 client_name = "as99127f";
1161         else
1162                 goto err_nodev;
1163
1164         if (val1 <= 0x30 && w83781d_alias_detect(client, val1)) {
1165                 dev_dbg(&adapter->dev,
1166                         "Device at 0x%02x appears to be the same as ISA device\n",
1167                         address);
1168                 goto err_nodev;
1169         }
1170
1171         if (isa)
1172                 mutex_unlock(&isa->update_lock);
1173
1174         strscpy(info->type, client_name, I2C_NAME_SIZE);
1175
1176         return 0;
1177
1178  err_nodev:
1179         if (isa)
1180                 mutex_unlock(&isa->update_lock);
1181         return -ENODEV;
1182 }
1183
1184 static void w83781d_remove_files(struct device *dev)
1185 {
1186         sysfs_remove_group(&dev->kobj, &w83781d_group);
1187         sysfs_remove_group(&dev->kobj, &w83781d_group_in1);
1188         sysfs_remove_group(&dev->kobj, &w83781d_group_in78);
1189         sysfs_remove_group(&dev->kobj, &w83781d_group_temp3);
1190         sysfs_remove_group(&dev->kobj, &w83781d_group_pwm12);
1191         sysfs_remove_group(&dev->kobj, &w83781d_group_pwm34);
1192         sysfs_remove_group(&dev->kobj, &w83781d_group_other);
1193 }
1194
1195 static const struct i2c_device_id w83781d_ids[];
1196
1197 static int w83781d_probe(struct i2c_client *client)
1198 {
1199         struct device *dev = &client->dev;
1200         struct w83781d_data *data;
1201         int err;
1202
1203         data = devm_kzalloc(dev, sizeof(struct w83781d_data), GFP_KERNEL);
1204         if (!data)
1205                 return -ENOMEM;
1206
1207         i2c_set_clientdata(client, data);
1208         mutex_init(&data->lock);
1209         mutex_init(&data->update_lock);
1210
1211         data->type = i2c_match_id(w83781d_ids, client)->driver_data;
1212         data->client = client;
1213
1214         /* attach secondary i2c lm75-like clients */
1215         err = w83781d_detect_subclients(client);
1216         if (err)
1217                 return err;
1218
1219         /* Initialize the chip */
1220         w83781d_init_device(dev);
1221
1222         /* Register sysfs hooks */
1223         err = w83781d_create_files(dev, data->type, 0);
1224         if (err)
1225                 goto exit_remove_files;
1226
1227         data->hwmon_dev = hwmon_device_register(dev);
1228         if (IS_ERR(data->hwmon_dev)) {
1229                 err = PTR_ERR(data->hwmon_dev);
1230                 goto exit_remove_files;
1231         }
1232
1233         return 0;
1234
1235  exit_remove_files:
1236         w83781d_remove_files(dev);
1237         i2c_unregister_device(data->lm75[0]);
1238         i2c_unregister_device(data->lm75[1]);
1239         return err;
1240 }
1241
1242 static void
1243 w83781d_remove(struct i2c_client *client)
1244 {
1245         struct w83781d_data *data = i2c_get_clientdata(client);
1246         struct device *dev = &client->dev;
1247
1248         hwmon_device_unregister(data->hwmon_dev);
1249         w83781d_remove_files(dev);
1250
1251         i2c_unregister_device(data->lm75[0]);
1252         i2c_unregister_device(data->lm75[1]);
1253 }
1254
1255 static int
1256 w83781d_read_value_i2c(struct w83781d_data *data, u16 reg)
1257 {
1258         struct i2c_client *client = data->client;
1259         int res, bank;
1260         struct i2c_client *cl;
1261
1262         bank = (reg >> 8) & 0x0f;
1263         if (bank > 2)
1264                 /* switch banks */
1265                 i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
1266                                           bank);
1267         if (bank == 0 || bank > 2) {
1268                 res = i2c_smbus_read_byte_data(client, reg & 0xff);
1269         } else {
1270                 /* switch to subclient */
1271                 cl = data->lm75[bank - 1];
1272                 /* convert from ISA to LM75 I2C addresses */
1273                 switch (reg & 0xff) {
1274                 case 0x50:      /* TEMP */
1275                         res = i2c_smbus_read_word_swapped(cl, 0);
1276                         break;
1277                 case 0x52:      /* CONFIG */
1278                         res = i2c_smbus_read_byte_data(cl, 1);
1279                         break;
1280                 case 0x53:      /* HYST */
1281                         res = i2c_smbus_read_word_swapped(cl, 2);
1282                         break;
1283                 case 0x55:      /* OVER */
1284                 default:
1285                         res = i2c_smbus_read_word_swapped(cl, 3);
1286                         break;
1287                 }
1288         }
1289         if (bank > 2)
1290                 i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);
1291
1292         return res;
1293 }
1294
1295 static int
1296 w83781d_write_value_i2c(struct w83781d_data *data, u16 reg, u16 value)
1297 {
1298         struct i2c_client *client = data->client;
1299         int bank;
1300         struct i2c_client *cl;
1301
1302         bank = (reg >> 8) & 0x0f;
1303         if (bank > 2)
1304                 /* switch banks */
1305                 i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
1306                                           bank);
1307         if (bank == 0 || bank > 2) {
1308                 i2c_smbus_write_byte_data(client, reg & 0xff,
1309                                           value & 0xff);
1310         } else {
1311                 /* switch to subclient */
1312                 cl = data->lm75[bank - 1];
1313                 /* convert from ISA to LM75 I2C addresses */
1314                 switch (reg & 0xff) {
1315                 case 0x52:      /* CONFIG */
1316                         i2c_smbus_write_byte_data(cl, 1, value & 0xff);
1317                         break;
1318                 case 0x53:      /* HYST */
1319                         i2c_smbus_write_word_swapped(cl, 2, value);
1320                         break;
1321                 case 0x55:      /* OVER */
1322                         i2c_smbus_write_word_swapped(cl, 3, value);
1323                         break;
1324                 }
1325         }
1326         if (bank > 2)
1327                 i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);
1328
1329         return 0;
1330 }
1331
1332 static void
1333 w83781d_init_device(struct device *dev)
1334 {
1335         struct w83781d_data *data = dev_get_drvdata(dev);
1336         int i, p;
1337         int type = data->type;
1338         u8 tmp;
1339
1340         if (reset && type != as99127f) { /*
1341                                           * this resets registers we don't have
1342                                           * documentation for on the as99127f
1343                                           */
1344                 /*
1345                  * Resetting the chip has been the default for a long time,
1346                  * but it causes the BIOS initializations (fan clock dividers,
1347                  * thermal sensor types...) to be lost, so it is now optional.
1348                  * It might even go away if nobody reports it as being useful,
1349                  * as I see very little reason why this would be needed at
1350                  * all.
1351                  */
1352                 dev_info(dev,
1353                          "If reset=1 solved a problem you were having, please report!\n");
1354
1355                 /* save these registers */
1356                 i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
1357                 p = w83781d_read_value(data, W83781D_REG_PWMCLK12);
1358                 /*
1359                  * Reset all except Watchdog values and last conversion values
1360                  * This sets fan-divs to 2, among others
1361                  */
1362                 w83781d_write_value(data, W83781D_REG_CONFIG, 0x80);
1363                 /*
1364                  * Restore the registers and disable power-on abnormal beep.
1365                  * This saves FAN 1/2/3 input/output values set by BIOS.
1366                  */
1367                 w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
1368                 w83781d_write_value(data, W83781D_REG_PWMCLK12, p);
1369                 /*
1370                  * Disable master beep-enable (reset turns it on).
1371                  * Individual beep_mask should be reset to off but for some
1372                  * reason disabling this bit helps some people not get beeped
1373                  */
1374                 w83781d_write_value(data, W83781D_REG_BEEP_INTS2, 0);
1375         }
1376
1377         /*
1378          * Disable power-on abnormal beep, as advised by the datasheet.
1379          * Already done if reset=1.
1380          */
1381         if (init && !reset && type != as99127f) {
1382                 i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
1383                 w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
1384         }
1385
1386         data->vrm = vid_which_vrm();
1387
1388         if ((type != w83781d) && (type != as99127f)) {
1389                 tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
1390                 for (i = 1; i <= 3; i++) {
1391                         if (!(tmp & BIT_SCFG1[i - 1])) {
1392                                 data->sens[i - 1] = 4;
1393                         } else {
1394                                 if (w83781d_read_value
1395                                     (data,
1396                                      W83781D_REG_SCFG2) & BIT_SCFG2[i - 1])
1397                                         data->sens[i - 1] = 1;
1398                                 else
1399                                         data->sens[i - 1] = 2;
1400                         }
1401                         if (type == w83783s && i == 2)
1402                                 break;
1403                 }
1404         }
1405
1406         if (init && type != as99127f) {
1407                 /* Enable temp2 */
1408                 tmp = w83781d_read_value(data, W83781D_REG_TEMP2_CONFIG);
1409                 if (tmp & 0x01) {
1410                         dev_warn(dev,
1411                                  "Enabling temp2, readings might not make sense\n");
1412                         w83781d_write_value(data, W83781D_REG_TEMP2_CONFIG,
1413                                 tmp & 0xfe);
1414                 }
1415
1416                 /* Enable temp3 */
1417                 if (type != w83783s) {
1418                         tmp = w83781d_read_value(data,
1419                                 W83781D_REG_TEMP3_CONFIG);
1420                         if (tmp & 0x01) {
1421                                 dev_warn(dev,
1422                                          "Enabling temp3, readings might not make sense\n");
1423                                 w83781d_write_value(data,
1424                                         W83781D_REG_TEMP3_CONFIG, tmp & 0xfe);
1425                         }
1426                 }
1427         }
1428
1429         /* Start monitoring */
1430         w83781d_write_value(data, W83781D_REG_CONFIG,
1431                             (w83781d_read_value(data,
1432                                                 W83781D_REG_CONFIG) & 0xf7)
1433                             | 0x01);
1434
1435         /* A few vars need to be filled upon startup */
1436         for (i = 0; i < 3; i++) {
1437                 data->fan_min[i] = w83781d_read_value(data,
1438                                         W83781D_REG_FAN_MIN(i));
1439         }
1440
1441         mutex_init(&data->update_lock);
1442 }
1443
1444 static struct w83781d_data *w83781d_update_device(struct device *dev)
1445 {
1446         struct w83781d_data *data = dev_get_drvdata(dev);
1447         struct i2c_client *client = data->client;
1448         int i;
1449
1450         mutex_lock(&data->update_lock);
1451
1452         if (time_after(jiffies, data->last_updated + HZ + HZ / 2)
1453             || !data->valid) {
1454                 dev_dbg(dev, "Starting device update\n");
1455
1456                 for (i = 0; i <= 8; i++) {
1457                         if (data->type == w83783s && i == 1)
1458                                 continue;       /* 783S has no in1 */
1459                         data->in[i] =
1460                             w83781d_read_value(data, W83781D_REG_IN(i));
1461                         data->in_min[i] =
1462                             w83781d_read_value(data, W83781D_REG_IN_MIN(i));
1463                         data->in_max[i] =
1464                             w83781d_read_value(data, W83781D_REG_IN_MAX(i));
1465                         if ((data->type != w83782d) && (i == 6))
1466                                 break;
1467                 }
1468                 for (i = 0; i < 3; i++) {
1469                         data->fan[i] =
1470                             w83781d_read_value(data, W83781D_REG_FAN(i));
1471                         data->fan_min[i] =
1472                             w83781d_read_value(data, W83781D_REG_FAN_MIN(i));
1473                 }
1474                 if (data->type != w83781d && data->type != as99127f) {
1475                         for (i = 0; i < 4; i++) {
1476                                 data->pwm[i] =
1477                                     w83781d_read_value(data,
1478                                                        W83781D_REG_PWM[i]);
1479                                 /* Only W83782D on SMBus has PWM3 and PWM4 */
1480                                 if ((data->type != w83782d || !client)
1481                                     && i == 1)
1482                                         break;
1483                         }
1484                         /* Only PWM2 can be disabled */
1485                         data->pwm2_enable = (w83781d_read_value(data,
1486                                              W83781D_REG_PWMCLK12) & 0x08) >> 3;
1487                 }
1488
1489                 data->temp = w83781d_read_value(data, W83781D_REG_TEMP(1));
1490                 data->temp_max =
1491                     w83781d_read_value(data, W83781D_REG_TEMP_OVER(1));
1492                 data->temp_max_hyst =
1493                     w83781d_read_value(data, W83781D_REG_TEMP_HYST(1));
1494                 data->temp_add[0] =
1495                     w83781d_read_value(data, W83781D_REG_TEMP(2));
1496                 data->temp_max_add[0] =
1497                     w83781d_read_value(data, W83781D_REG_TEMP_OVER(2));
1498                 data->temp_max_hyst_add[0] =
1499                     w83781d_read_value(data, W83781D_REG_TEMP_HYST(2));
1500                 if (data->type != w83783s) {
1501                         data->temp_add[1] =
1502                             w83781d_read_value(data, W83781D_REG_TEMP(3));
1503                         data->temp_max_add[1] =
1504                             w83781d_read_value(data,
1505                                                W83781D_REG_TEMP_OVER(3));
1506                         data->temp_max_hyst_add[1] =
1507                             w83781d_read_value(data,
1508                                                W83781D_REG_TEMP_HYST(3));
1509                 }
1510                 i = w83781d_read_value(data, W83781D_REG_VID_FANDIV);
1511                 data->vid = i & 0x0f;
1512                 data->vid |= (w83781d_read_value(data,
1513                                         W83781D_REG_CHIPID) & 0x01) << 4;
1514                 data->fan_div[0] = (i >> 4) & 0x03;
1515                 data->fan_div[1] = (i >> 6) & 0x03;
1516                 data->fan_div[2] = (w83781d_read_value(data,
1517                                         W83781D_REG_PIN) >> 6) & 0x03;
1518                 if ((data->type != w83781d) && (data->type != as99127f)) {
1519                         i = w83781d_read_value(data, W83781D_REG_VBAT);
1520                         data->fan_div[0] |= (i >> 3) & 0x04;
1521                         data->fan_div[1] |= (i >> 4) & 0x04;
1522                         data->fan_div[2] |= (i >> 5) & 0x04;
1523                 }
1524                 if (data->type == w83782d) {
1525                         data->alarms = w83781d_read_value(data,
1526                                                 W83782D_REG_ALARM1)
1527                                      | (w83781d_read_value(data,
1528                                                 W83782D_REG_ALARM2) << 8)
1529                                      | (w83781d_read_value(data,
1530                                                 W83782D_REG_ALARM3) << 16);
1531                 } else if (data->type == w83783s) {
1532                         data->alarms = w83781d_read_value(data,
1533                                                 W83782D_REG_ALARM1)
1534                                      | (w83781d_read_value(data,
1535                                                 W83782D_REG_ALARM2) << 8);
1536                 } else {
1537                         /*
1538                          * No real-time status registers, fall back to
1539                          * interrupt status registers
1540                          */
1541                         data->alarms = w83781d_read_value(data,
1542                                                 W83781D_REG_ALARM1)
1543                                      | (w83781d_read_value(data,
1544                                                 W83781D_REG_ALARM2) << 8);
1545                 }
1546                 i = w83781d_read_value(data, W83781D_REG_BEEP_INTS2);
1547                 data->beep_mask = (i << 8) +
1548                     w83781d_read_value(data, W83781D_REG_BEEP_INTS1);
1549                 if ((data->type != w83781d) && (data->type != as99127f)) {
1550                         data->beep_mask |=
1551                             w83781d_read_value(data,
1552                                                W83781D_REG_BEEP_INTS3) << 16;
1553                 }
1554                 data->last_updated = jiffies;
1555                 data->valid = true;
1556         }
1557
1558         mutex_unlock(&data->update_lock);
1559
1560         return data;
1561 }
1562
1563 static const struct i2c_device_id w83781d_ids[] = {
1564         { "w83781d", w83781d, },
1565         { "w83782d", w83782d, },
1566         { "w83783s", w83783s, },
1567         { "as99127f", as99127f },
1568         { /* LIST END */ }
1569 };
1570 MODULE_DEVICE_TABLE(i2c, w83781d_ids);
1571
1572 static const struct of_device_id w83781d_of_match[] = {
1573         { .compatible = "winbond,w83781d" },
1574         { .compatible = "winbond,w83781g" },
1575         { .compatible = "winbond,w83782d" },
1576         { .compatible = "winbond,w83783s" },
1577         { .compatible = "asus,as99127f" },
1578         { },
1579 };
1580 MODULE_DEVICE_TABLE(of, w83781d_of_match);
1581
1582 static struct i2c_driver w83781d_driver = {
1583         .class          = I2C_CLASS_HWMON,
1584         .driver = {
1585                 .name = "w83781d",
1586                 .of_match_table = w83781d_of_match,
1587         },
1588         .probe          = w83781d_probe,
1589         .remove         = w83781d_remove,
1590         .id_table       = w83781d_ids,
1591         .detect         = w83781d_detect,
1592         .address_list   = normal_i2c,
1593 };
1594
1595 /*
1596  * ISA related code
1597  */
1598 #ifdef CONFIG_ISA
1599
1600 /* ISA device, if found */
1601 static struct platform_device *pdev;
1602
1603 static unsigned short isa_address = 0x290;
1604
1605 /*
1606  * I2C devices get this name attribute automatically, but for ISA devices
1607  * we must create it by ourselves.
1608  */
1609 static ssize_t
1610 name_show(struct device *dev, struct device_attribute *devattr, char *buf)
1611 {
1612         struct w83781d_data *data = dev_get_drvdata(dev);
1613         return sprintf(buf, "%s\n", data->name);
1614 }
1615 static DEVICE_ATTR_RO(name);
1616
1617 static struct w83781d_data *w83781d_data_if_isa(void)
1618 {
1619         return pdev ? platform_get_drvdata(pdev) : NULL;
1620 }
1621
1622 /* Returns 1 if the I2C chip appears to be an alias of the ISA chip */
1623 static int w83781d_alias_detect(struct i2c_client *client, u8 chipid)
1624 {
1625         struct w83781d_data *isa;
1626         int i;
1627
1628         if (!pdev)      /* No ISA chip */
1629                 return 0;
1630
1631         isa = platform_get_drvdata(pdev);
1632
1633         if (w83781d_read_value(isa, W83781D_REG_I2C_ADDR) != client->addr)
1634                 return 0;       /* Address doesn't match */
1635         if (w83781d_read_value(isa, W83781D_REG_WCHIPID) != chipid)
1636                 return 0;       /* Chip type doesn't match */
1637
1638         /*
1639          * We compare all the limit registers, the config register and the
1640          * interrupt mask registers
1641          */
1642         for (i = 0x2b; i <= 0x3d; i++) {
1643                 if (w83781d_read_value(isa, i) !=
1644                     i2c_smbus_read_byte_data(client, i))
1645                         return 0;
1646         }
1647         if (w83781d_read_value(isa, W83781D_REG_CONFIG) !=
1648             i2c_smbus_read_byte_data(client, W83781D_REG_CONFIG))
1649                 return 0;
1650         for (i = 0x43; i <= 0x46; i++) {
1651                 if (w83781d_read_value(isa, i) !=
1652                     i2c_smbus_read_byte_data(client, i))
1653                         return 0;
1654         }
1655
1656         return 1;
1657 }
1658
1659 static int
1660 w83781d_read_value_isa(struct w83781d_data *data, u16 reg)
1661 {
1662         int word_sized, res;
1663
1664         word_sized = (((reg & 0xff00) == 0x100)
1665                       || ((reg & 0xff00) == 0x200))
1666             && (((reg & 0x00ff) == 0x50)
1667                 || ((reg & 0x00ff) == 0x53)
1668                 || ((reg & 0x00ff) == 0x55));
1669         if (reg & 0xff00) {
1670                 outb_p(W83781D_REG_BANK,
1671                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1672                 outb_p(reg >> 8,
1673                        data->isa_addr + W83781D_DATA_REG_OFFSET);
1674         }
1675         outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1676         res = inb_p(data->isa_addr + W83781D_DATA_REG_OFFSET);
1677         if (word_sized) {
1678                 outb_p((reg & 0xff) + 1,
1679                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1680                 res =
1681                     (res << 8) + inb_p(data->isa_addr +
1682                                        W83781D_DATA_REG_OFFSET);
1683         }
1684         if (reg & 0xff00) {
1685                 outb_p(W83781D_REG_BANK,
1686                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1687                 outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1688         }
1689         return res;
1690 }
1691
1692 static void
1693 w83781d_write_value_isa(struct w83781d_data *data, u16 reg, u16 value)
1694 {
1695         int word_sized;
1696
1697         word_sized = (((reg & 0xff00) == 0x100)
1698                       || ((reg & 0xff00) == 0x200))
1699             && (((reg & 0x00ff) == 0x53)
1700                 || ((reg & 0x00ff) == 0x55));
1701         if (reg & 0xff00) {
1702                 outb_p(W83781D_REG_BANK,
1703                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1704                 outb_p(reg >> 8,
1705                        data->isa_addr + W83781D_DATA_REG_OFFSET);
1706         }
1707         outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1708         if (word_sized) {
1709                 outb_p(value >> 8,
1710                        data->isa_addr + W83781D_DATA_REG_OFFSET);
1711                 outb_p((reg & 0xff) + 1,
1712                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1713         }
1714         outb_p(value & 0xff, data->isa_addr + W83781D_DATA_REG_OFFSET);
1715         if (reg & 0xff00) {
1716                 outb_p(W83781D_REG_BANK,
1717                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1718                 outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1719         }
1720 }
1721
1722 /*
1723  * The SMBus locks itself, usually, but nothing may access the Winbond between
1724  * bank switches. ISA access must always be locked explicitly!
1725  * We ignore the W83781D BUSY flag at this moment - it could lead to deadlocks,
1726  * would slow down the W83781D access and should not be necessary.
1727  * There are some ugly typecasts here, but the good news is - they should
1728  * nowhere else be necessary!
1729  */
1730 static int
1731 w83781d_read_value(struct w83781d_data *data, u16 reg)
1732 {
1733         struct i2c_client *client = data->client;
1734         int res;
1735
1736         mutex_lock(&data->lock);
1737         if (client)
1738                 res = w83781d_read_value_i2c(data, reg);
1739         else
1740                 res = w83781d_read_value_isa(data, reg);
1741         mutex_unlock(&data->lock);
1742         return res;
1743 }
1744
1745 static int
1746 w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
1747 {
1748         struct i2c_client *client = data->client;
1749
1750         mutex_lock(&data->lock);
1751         if (client)
1752                 w83781d_write_value_i2c(data, reg, value);
1753         else
1754                 w83781d_write_value_isa(data, reg, value);
1755         mutex_unlock(&data->lock);
1756         return 0;
1757 }
1758
1759 static int
1760 w83781d_isa_probe(struct platform_device *pdev)
1761 {
1762         int err, reg;
1763         struct w83781d_data *data;
1764         struct resource *res;
1765
1766         /* Reserve the ISA region */
1767         res = platform_get_resource(pdev, IORESOURCE_IO, 0);
1768         if (!devm_request_region(&pdev->dev,
1769                                  res->start + W83781D_ADDR_REG_OFFSET, 2,
1770                                  "w83781d"))
1771                 return -EBUSY;
1772
1773         data = devm_kzalloc(&pdev->dev, sizeof(struct w83781d_data),
1774                             GFP_KERNEL);
1775         if (!data)
1776                 return -ENOMEM;
1777
1778         mutex_init(&data->lock);
1779         data->isa_addr = res->start;
1780         platform_set_drvdata(pdev, data);
1781
1782         reg = w83781d_read_value(data, W83781D_REG_WCHIPID);
1783         switch (reg) {
1784         case 0x30:
1785                 data->type = w83782d;
1786                 data->name = "w83782d";
1787                 break;
1788         default:
1789                 data->type = w83781d;
1790                 data->name = "w83781d";
1791         }
1792
1793         /* Initialize the W83781D chip */
1794         w83781d_init_device(&pdev->dev);
1795
1796         /* Register sysfs hooks */
1797         err = w83781d_create_files(&pdev->dev, data->type, 1);
1798         if (err)
1799                 goto exit_remove_files;
1800
1801         err = device_create_file(&pdev->dev, &dev_attr_name);
1802         if (err)
1803                 goto exit_remove_files;
1804
1805         data->hwmon_dev = hwmon_device_register(&pdev->dev);
1806         if (IS_ERR(data->hwmon_dev)) {
1807                 err = PTR_ERR(data->hwmon_dev);
1808                 goto exit_remove_files;
1809         }
1810
1811         return 0;
1812
1813  exit_remove_files:
1814         w83781d_remove_files(&pdev->dev);
1815         device_remove_file(&pdev->dev, &dev_attr_name);
1816         return err;
1817 }
1818
1819 static int
1820 w83781d_isa_remove(struct platform_device *pdev)
1821 {
1822         struct w83781d_data *data = platform_get_drvdata(pdev);
1823
1824         hwmon_device_unregister(data->hwmon_dev);
1825         w83781d_remove_files(&pdev->dev);
1826         device_remove_file(&pdev->dev, &dev_attr_name);
1827
1828         return 0;
1829 }
1830
1831 static struct platform_driver w83781d_isa_driver = {
1832         .driver = {
1833                 .name = "w83781d",
1834         },
1835         .probe = w83781d_isa_probe,
1836         .remove = w83781d_isa_remove,
1837 };
1838
1839 /* return 1 if a supported chip is found, 0 otherwise */
1840 static int __init
1841 w83781d_isa_found(unsigned short address)
1842 {
1843         int val, save, found = 0;
1844         int port;
1845
1846         /*
1847          * Some boards declare base+0 to base+7 as a PNP device, some base+4
1848          * to base+7 and some base+5 to base+6. So we better request each port
1849          * individually for the probing phase.
1850          */
1851         for (port = address; port < address + W83781D_EXTENT; port++) {
1852                 if (!request_region(port, 1, "w83781d")) {
1853                         pr_debug("Failed to request port 0x%x\n", port);
1854                         goto release;
1855                 }
1856         }
1857
1858 #define REALLY_SLOW_IO
1859         /*
1860          * We need the timeouts for at least some W83781D-like
1861          * chips. But only if we read 'undefined' registers.
1862          */
1863         val = inb_p(address + 1);
1864         if (inb_p(address + 2) != val
1865          || inb_p(address + 3) != val
1866          || inb_p(address + 7) != val) {
1867                 pr_debug("Detection failed at step %d\n", 1);
1868                 goto release;
1869         }
1870 #undef REALLY_SLOW_IO
1871
1872         /*
1873          * We should be able to change the 7 LSB of the address port. The
1874          * MSB (busy flag) should be clear initially, set after the write.
1875          */
1876         save = inb_p(address + W83781D_ADDR_REG_OFFSET);
1877         if (save & 0x80) {
1878                 pr_debug("Detection failed at step %d\n", 2);
1879                 goto release;
1880         }
1881         val = ~save & 0x7f;
1882         outb_p(val, address + W83781D_ADDR_REG_OFFSET);
1883         if (inb_p(address + W83781D_ADDR_REG_OFFSET) != (val | 0x80)) {
1884                 outb_p(save, address + W83781D_ADDR_REG_OFFSET);
1885                 pr_debug("Detection failed at step %d\n", 3);
1886                 goto release;
1887         }
1888
1889         /* We found a device, now see if it could be a W83781D */
1890         outb_p(W83781D_REG_CONFIG, address + W83781D_ADDR_REG_OFFSET);
1891         val = inb_p(address + W83781D_DATA_REG_OFFSET);
1892         if (val & 0x80) {
1893                 pr_debug("Detection failed at step %d\n", 4);
1894                 goto release;
1895         }
1896         outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
1897         save = inb_p(address + W83781D_DATA_REG_OFFSET);
1898         outb_p(W83781D_REG_CHIPMAN, address + W83781D_ADDR_REG_OFFSET);
1899         val = inb_p(address + W83781D_DATA_REG_OFFSET);
1900         if ((!(save & 0x80) && (val != 0xa3))
1901          || ((save & 0x80) && (val != 0x5c))) {
1902                 pr_debug("Detection failed at step %d\n", 5);
1903                 goto release;
1904         }
1905         outb_p(W83781D_REG_I2C_ADDR, address + W83781D_ADDR_REG_OFFSET);
1906         val = inb_p(address + W83781D_DATA_REG_OFFSET);
1907         if (val < 0x03 || val > 0x77) { /* Not a valid I2C address */
1908                 pr_debug("Detection failed at step %d\n", 6);
1909                 goto release;
1910         }
1911
1912         /* The busy flag should be clear again */
1913         if (inb_p(address + W83781D_ADDR_REG_OFFSET) & 0x80) {
1914                 pr_debug("Detection failed at step %d\n", 7);
1915                 goto release;
1916         }
1917
1918         /* Determine the chip type */
1919         outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
1920         save = inb_p(address + W83781D_DATA_REG_OFFSET);
1921         outb_p(save & 0xf8, address + W83781D_DATA_REG_OFFSET);
1922         outb_p(W83781D_REG_WCHIPID, address + W83781D_ADDR_REG_OFFSET);
1923         val = inb_p(address + W83781D_DATA_REG_OFFSET);
1924         if ((val & 0xfe) == 0x10        /* W83781D */
1925          || val == 0x30)                /* W83782D */
1926                 found = 1;
1927
1928         if (found)
1929                 pr_info("Found a %s chip at %#x\n",
1930                         val == 0x30 ? "W83782D" : "W83781D", (int)address);
1931
1932  release:
1933         for (port--; port >= address; port--)
1934                 release_region(port, 1);
1935         return found;
1936 }
1937
1938 static int __init
1939 w83781d_isa_device_add(unsigned short address)
1940 {
1941         struct resource res = {
1942                 .start  = address,
1943                 .end    = address + W83781D_EXTENT - 1,
1944                 .name   = "w83781d",
1945                 .flags  = IORESOURCE_IO,
1946         };
1947         int err;
1948
1949         pdev = platform_device_alloc("w83781d", address);
1950         if (!pdev) {
1951                 err = -ENOMEM;
1952                 pr_err("Device allocation failed\n");
1953                 goto exit;
1954         }
1955
1956         err = platform_device_add_resources(pdev, &res, 1);
1957         if (err) {
1958                 pr_err("Device resource addition failed (%d)\n", err);
1959                 goto exit_device_put;
1960         }
1961
1962         err = platform_device_add(pdev);
1963         if (err) {
1964                 pr_err("Device addition failed (%d)\n", err);
1965                 goto exit_device_put;
1966         }
1967
1968         return 0;
1969
1970  exit_device_put:
1971         platform_device_put(pdev);
1972  exit:
1973         pdev = NULL;
1974         return err;
1975 }
1976
1977 static int __init
1978 w83781d_isa_register(void)
1979 {
1980         int res;
1981
1982         if (w83781d_isa_found(isa_address)) {
1983                 res = platform_driver_register(&w83781d_isa_driver);
1984                 if (res)
1985                         goto exit;
1986
1987                 /* Sets global pdev as a side effect */
1988                 res = w83781d_isa_device_add(isa_address);
1989                 if (res)
1990                         goto exit_unreg_isa_driver;
1991         }
1992
1993         return 0;
1994
1995 exit_unreg_isa_driver:
1996         platform_driver_unregister(&w83781d_isa_driver);
1997 exit:
1998         return res;
1999 }
2000
2001 static void
2002 w83781d_isa_unregister(void)
2003 {
2004         if (pdev) {
2005                 platform_device_unregister(pdev);
2006                 platform_driver_unregister(&w83781d_isa_driver);
2007         }
2008 }
2009 #else /* !CONFIG_ISA */
2010
2011 static struct w83781d_data *w83781d_data_if_isa(void)
2012 {
2013         return NULL;
2014 }
2015
2016 static int
2017 w83781d_alias_detect(struct i2c_client *client, u8 chipid)
2018 {
2019         return 0;
2020 }
2021
2022 static int
2023 w83781d_read_value(struct w83781d_data *data, u16 reg)
2024 {
2025         int res;
2026
2027         mutex_lock(&data->lock);
2028         res = w83781d_read_value_i2c(data, reg);
2029         mutex_unlock(&data->lock);
2030
2031         return res;
2032 }
2033
2034 static int
2035 w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
2036 {
2037         mutex_lock(&data->lock);
2038         w83781d_write_value_i2c(data, reg, value);
2039         mutex_unlock(&data->lock);
2040
2041         return 0;
2042 }
2043
2044 static int __init
2045 w83781d_isa_register(void)
2046 {
2047         return 0;
2048 }
2049
2050 static void
2051 w83781d_isa_unregister(void)
2052 {
2053 }
2054 #endif /* CONFIG_ISA */
2055
2056 static int __init
2057 sensors_w83781d_init(void)
2058 {
2059         int res;
2060
2061         /*
2062          * We register the ISA device first, so that we can skip the
2063          * registration of an I2C interface to the same device.
2064          */
2065         res = w83781d_isa_register();
2066         if (res)
2067                 goto exit;
2068
2069         res = i2c_add_driver(&w83781d_driver);
2070         if (res)
2071                 goto exit_unreg_isa;
2072
2073         return 0;
2074
2075  exit_unreg_isa:
2076         w83781d_isa_unregister();
2077  exit:
2078         return res;
2079 }
2080
2081 static void __exit
2082 sensors_w83781d_exit(void)
2083 {
2084         w83781d_isa_unregister();
2085         i2c_del_driver(&w83781d_driver);
2086 }
2087
2088 MODULE_AUTHOR("Frodo Looijaard <frodol@dds.nl>, "
2089               "Philip Edelbrock <phil@netroedge.com>, "
2090               "and Mark Studebaker <mdsxyz123@yahoo.com>");
2091 MODULE_DESCRIPTION("W83781D driver");
2092 MODULE_LICENSE("GPL");
2093
2094 module_init(sensors_w83781d_init);
2095 module_exit(sensors_w83781d_exit);