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         char valid;             /* !=0 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         strlcpy(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 int
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         return 0;
1255 }
1256
1257 static int
1258 w83781d_read_value_i2c(struct w83781d_data *data, u16 reg)
1259 {
1260         struct i2c_client *client = data->client;
1261         int res, bank;
1262         struct i2c_client *cl;
1263
1264         bank = (reg >> 8) & 0x0f;
1265         if (bank > 2)
1266                 /* switch banks */
1267                 i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
1268                                           bank);
1269         if (bank == 0 || bank > 2) {
1270                 res = i2c_smbus_read_byte_data(client, reg & 0xff);
1271         } else {
1272                 /* switch to subclient */
1273                 cl = data->lm75[bank - 1];
1274                 /* convert from ISA to LM75 I2C addresses */
1275                 switch (reg & 0xff) {
1276                 case 0x50:      /* TEMP */
1277                         res = i2c_smbus_read_word_swapped(cl, 0);
1278                         break;
1279                 case 0x52:      /* CONFIG */
1280                         res = i2c_smbus_read_byte_data(cl, 1);
1281                         break;
1282                 case 0x53:      /* HYST */
1283                         res = i2c_smbus_read_word_swapped(cl, 2);
1284                         break;
1285                 case 0x55:      /* OVER */
1286                 default:
1287                         res = i2c_smbus_read_word_swapped(cl, 3);
1288                         break;
1289                 }
1290         }
1291         if (bank > 2)
1292                 i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);
1293
1294         return res;
1295 }
1296
1297 static int
1298 w83781d_write_value_i2c(struct w83781d_data *data, u16 reg, u16 value)
1299 {
1300         struct i2c_client *client = data->client;
1301         int bank;
1302         struct i2c_client *cl;
1303
1304         bank = (reg >> 8) & 0x0f;
1305         if (bank > 2)
1306                 /* switch banks */
1307                 i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
1308                                           bank);
1309         if (bank == 0 || bank > 2) {
1310                 i2c_smbus_write_byte_data(client, reg & 0xff,
1311                                           value & 0xff);
1312         } else {
1313                 /* switch to subclient */
1314                 cl = data->lm75[bank - 1];
1315                 /* convert from ISA to LM75 I2C addresses */
1316                 switch (reg & 0xff) {
1317                 case 0x52:      /* CONFIG */
1318                         i2c_smbus_write_byte_data(cl, 1, value & 0xff);
1319                         break;
1320                 case 0x53:      /* HYST */
1321                         i2c_smbus_write_word_swapped(cl, 2, value);
1322                         break;
1323                 case 0x55:      /* OVER */
1324                         i2c_smbus_write_word_swapped(cl, 3, value);
1325                         break;
1326                 }
1327         }
1328         if (bank > 2)
1329                 i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);
1330
1331         return 0;
1332 }
1333
1334 static void
1335 w83781d_init_device(struct device *dev)
1336 {
1337         struct w83781d_data *data = dev_get_drvdata(dev);
1338         int i, p;
1339         int type = data->type;
1340         u8 tmp;
1341
1342         if (reset && type != as99127f) { /*
1343                                           * this resets registers we don't have
1344                                           * documentation for on the as99127f
1345                                           */
1346                 /*
1347                  * Resetting the chip has been the default for a long time,
1348                  * but it causes the BIOS initializations (fan clock dividers,
1349                  * thermal sensor types...) to be lost, so it is now optional.
1350                  * It might even go away if nobody reports it as being useful,
1351                  * as I see very little reason why this would be needed at
1352                  * all.
1353                  */
1354                 dev_info(dev,
1355                          "If reset=1 solved a problem you were having, please report!\n");
1356
1357                 /* save these registers */
1358                 i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
1359                 p = w83781d_read_value(data, W83781D_REG_PWMCLK12);
1360                 /*
1361                  * Reset all except Watchdog values and last conversion values
1362                  * This sets fan-divs to 2, among others
1363                  */
1364                 w83781d_write_value(data, W83781D_REG_CONFIG, 0x80);
1365                 /*
1366                  * Restore the registers and disable power-on abnormal beep.
1367                  * This saves FAN 1/2/3 input/output values set by BIOS.
1368                  */
1369                 w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
1370                 w83781d_write_value(data, W83781D_REG_PWMCLK12, p);
1371                 /*
1372                  * Disable master beep-enable (reset turns it on).
1373                  * Individual beep_mask should be reset to off but for some
1374                  * reason disabling this bit helps some people not get beeped
1375                  */
1376                 w83781d_write_value(data, W83781D_REG_BEEP_INTS2, 0);
1377         }
1378
1379         /*
1380          * Disable power-on abnormal beep, as advised by the datasheet.
1381          * Already done if reset=1.
1382          */
1383         if (init && !reset && type != as99127f) {
1384                 i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
1385                 w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
1386         }
1387
1388         data->vrm = vid_which_vrm();
1389
1390         if ((type != w83781d) && (type != as99127f)) {
1391                 tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
1392                 for (i = 1; i <= 3; i++) {
1393                         if (!(tmp & BIT_SCFG1[i - 1])) {
1394                                 data->sens[i - 1] = 4;
1395                         } else {
1396                                 if (w83781d_read_value
1397                                     (data,
1398                                      W83781D_REG_SCFG2) & BIT_SCFG2[i - 1])
1399                                         data->sens[i - 1] = 1;
1400                                 else
1401                                         data->sens[i - 1] = 2;
1402                         }
1403                         if (type == w83783s && i == 2)
1404                                 break;
1405                 }
1406         }
1407
1408         if (init && type != as99127f) {
1409                 /* Enable temp2 */
1410                 tmp = w83781d_read_value(data, W83781D_REG_TEMP2_CONFIG);
1411                 if (tmp & 0x01) {
1412                         dev_warn(dev,
1413                                  "Enabling temp2, readings might not make sense\n");
1414                         w83781d_write_value(data, W83781D_REG_TEMP2_CONFIG,
1415                                 tmp & 0xfe);
1416                 }
1417
1418                 /* Enable temp3 */
1419                 if (type != w83783s) {
1420                         tmp = w83781d_read_value(data,
1421                                 W83781D_REG_TEMP3_CONFIG);
1422                         if (tmp & 0x01) {
1423                                 dev_warn(dev,
1424                                          "Enabling temp3, readings might not make sense\n");
1425                                 w83781d_write_value(data,
1426                                         W83781D_REG_TEMP3_CONFIG, tmp & 0xfe);
1427                         }
1428                 }
1429         }
1430
1431         /* Start monitoring */
1432         w83781d_write_value(data, W83781D_REG_CONFIG,
1433                             (w83781d_read_value(data,
1434                                                 W83781D_REG_CONFIG) & 0xf7)
1435                             | 0x01);
1436
1437         /* A few vars need to be filled upon startup */
1438         for (i = 0; i < 3; i++) {
1439                 data->fan_min[i] = w83781d_read_value(data,
1440                                         W83781D_REG_FAN_MIN(i));
1441         }
1442
1443         mutex_init(&data->update_lock);
1444 }
1445
1446 static struct w83781d_data *w83781d_update_device(struct device *dev)
1447 {
1448         struct w83781d_data *data = dev_get_drvdata(dev);
1449         struct i2c_client *client = data->client;
1450         int i;
1451
1452         mutex_lock(&data->update_lock);
1453
1454         if (time_after(jiffies, data->last_updated + HZ + HZ / 2)
1455             || !data->valid) {
1456                 dev_dbg(dev, "Starting device update\n");
1457
1458                 for (i = 0; i <= 8; i++) {
1459                         if (data->type == w83783s && i == 1)
1460                                 continue;       /* 783S has no in1 */
1461                         data->in[i] =
1462                             w83781d_read_value(data, W83781D_REG_IN(i));
1463                         data->in_min[i] =
1464                             w83781d_read_value(data, W83781D_REG_IN_MIN(i));
1465                         data->in_max[i] =
1466                             w83781d_read_value(data, W83781D_REG_IN_MAX(i));
1467                         if ((data->type != w83782d) && (i == 6))
1468                                 break;
1469                 }
1470                 for (i = 0; i < 3; i++) {
1471                         data->fan[i] =
1472                             w83781d_read_value(data, W83781D_REG_FAN(i));
1473                         data->fan_min[i] =
1474                             w83781d_read_value(data, W83781D_REG_FAN_MIN(i));
1475                 }
1476                 if (data->type != w83781d && data->type != as99127f) {
1477                         for (i = 0; i < 4; i++) {
1478                                 data->pwm[i] =
1479                                     w83781d_read_value(data,
1480                                                        W83781D_REG_PWM[i]);
1481                                 /* Only W83782D on SMBus has PWM3 and PWM4 */
1482                                 if ((data->type != w83782d || !client)
1483                                     && i == 1)
1484                                         break;
1485                         }
1486                         /* Only PWM2 can be disabled */
1487                         data->pwm2_enable = (w83781d_read_value(data,
1488                                              W83781D_REG_PWMCLK12) & 0x08) >> 3;
1489                 }
1490
1491                 data->temp = w83781d_read_value(data, W83781D_REG_TEMP(1));
1492                 data->temp_max =
1493                     w83781d_read_value(data, W83781D_REG_TEMP_OVER(1));
1494                 data->temp_max_hyst =
1495                     w83781d_read_value(data, W83781D_REG_TEMP_HYST(1));
1496                 data->temp_add[0] =
1497                     w83781d_read_value(data, W83781D_REG_TEMP(2));
1498                 data->temp_max_add[0] =
1499                     w83781d_read_value(data, W83781D_REG_TEMP_OVER(2));
1500                 data->temp_max_hyst_add[0] =
1501                     w83781d_read_value(data, W83781D_REG_TEMP_HYST(2));
1502                 if (data->type != w83783s) {
1503                         data->temp_add[1] =
1504                             w83781d_read_value(data, W83781D_REG_TEMP(3));
1505                         data->temp_max_add[1] =
1506                             w83781d_read_value(data,
1507                                                W83781D_REG_TEMP_OVER(3));
1508                         data->temp_max_hyst_add[1] =
1509                             w83781d_read_value(data,
1510                                                W83781D_REG_TEMP_HYST(3));
1511                 }
1512                 i = w83781d_read_value(data, W83781D_REG_VID_FANDIV);
1513                 data->vid = i & 0x0f;
1514                 data->vid |= (w83781d_read_value(data,
1515                                         W83781D_REG_CHIPID) & 0x01) << 4;
1516                 data->fan_div[0] = (i >> 4) & 0x03;
1517                 data->fan_div[1] = (i >> 6) & 0x03;
1518                 data->fan_div[2] = (w83781d_read_value(data,
1519                                         W83781D_REG_PIN) >> 6) & 0x03;
1520                 if ((data->type != w83781d) && (data->type != as99127f)) {
1521                         i = w83781d_read_value(data, W83781D_REG_VBAT);
1522                         data->fan_div[0] |= (i >> 3) & 0x04;
1523                         data->fan_div[1] |= (i >> 4) & 0x04;
1524                         data->fan_div[2] |= (i >> 5) & 0x04;
1525                 }
1526                 if (data->type == w83782d) {
1527                         data->alarms = w83781d_read_value(data,
1528                                                 W83782D_REG_ALARM1)
1529                                      | (w83781d_read_value(data,
1530                                                 W83782D_REG_ALARM2) << 8)
1531                                      | (w83781d_read_value(data,
1532                                                 W83782D_REG_ALARM3) << 16);
1533                 } else if (data->type == w83783s) {
1534                         data->alarms = w83781d_read_value(data,
1535                                                 W83782D_REG_ALARM1)
1536                                      | (w83781d_read_value(data,
1537                                                 W83782D_REG_ALARM2) << 8);
1538                 } else {
1539                         /*
1540                          * No real-time status registers, fall back to
1541                          * interrupt status registers
1542                          */
1543                         data->alarms = w83781d_read_value(data,
1544                                                 W83781D_REG_ALARM1)
1545                                      | (w83781d_read_value(data,
1546                                                 W83781D_REG_ALARM2) << 8);
1547                 }
1548                 i = w83781d_read_value(data, W83781D_REG_BEEP_INTS2);
1549                 data->beep_mask = (i << 8) +
1550                     w83781d_read_value(data, W83781D_REG_BEEP_INTS1);
1551                 if ((data->type != w83781d) && (data->type != as99127f)) {
1552                         data->beep_mask |=
1553                             w83781d_read_value(data,
1554                                                W83781D_REG_BEEP_INTS3) << 16;
1555                 }
1556                 data->last_updated = jiffies;
1557                 data->valid = 1;
1558         }
1559
1560         mutex_unlock(&data->update_lock);
1561
1562         return data;
1563 }
1564
1565 static const struct i2c_device_id w83781d_ids[] = {
1566         { "w83781d", w83781d, },
1567         { "w83782d", w83782d, },
1568         { "w83783s", w83783s, },
1569         { "as99127f", as99127f },
1570         { /* LIST END */ }
1571 };
1572 MODULE_DEVICE_TABLE(i2c, w83781d_ids);
1573
1574 static struct i2c_driver w83781d_driver = {
1575         .class          = I2C_CLASS_HWMON,
1576         .driver = {
1577                 .name = "w83781d",
1578         },
1579         .probe_new      = w83781d_probe,
1580         .remove         = w83781d_remove,
1581         .id_table       = w83781d_ids,
1582         .detect         = w83781d_detect,
1583         .address_list   = normal_i2c,
1584 };
1585
1586 /*
1587  * ISA related code
1588  */
1589 #ifdef CONFIG_ISA
1590
1591 /* ISA device, if found */
1592 static struct platform_device *pdev;
1593
1594 static unsigned short isa_address = 0x290;
1595
1596 /*
1597  * I2C devices get this name attribute automatically, but for ISA devices
1598  * we must create it by ourselves.
1599  */
1600 static ssize_t
1601 name_show(struct device *dev, struct device_attribute *devattr, char *buf)
1602 {
1603         struct w83781d_data *data = dev_get_drvdata(dev);
1604         return sprintf(buf, "%s\n", data->name);
1605 }
1606 static DEVICE_ATTR_RO(name);
1607
1608 static struct w83781d_data *w83781d_data_if_isa(void)
1609 {
1610         return pdev ? platform_get_drvdata(pdev) : NULL;
1611 }
1612
1613 /* Returns 1 if the I2C chip appears to be an alias of the ISA chip */
1614 static int w83781d_alias_detect(struct i2c_client *client, u8 chipid)
1615 {
1616         struct w83781d_data *isa;
1617         int i;
1618
1619         if (!pdev)      /* No ISA chip */
1620                 return 0;
1621
1622         isa = platform_get_drvdata(pdev);
1623
1624         if (w83781d_read_value(isa, W83781D_REG_I2C_ADDR) != client->addr)
1625                 return 0;       /* Address doesn't match */
1626         if (w83781d_read_value(isa, W83781D_REG_WCHIPID) != chipid)
1627                 return 0;       /* Chip type doesn't match */
1628
1629         /*
1630          * We compare all the limit registers, the config register and the
1631          * interrupt mask registers
1632          */
1633         for (i = 0x2b; i <= 0x3d; i++) {
1634                 if (w83781d_read_value(isa, i) !=
1635                     i2c_smbus_read_byte_data(client, i))
1636                         return 0;
1637         }
1638         if (w83781d_read_value(isa, W83781D_REG_CONFIG) !=
1639             i2c_smbus_read_byte_data(client, W83781D_REG_CONFIG))
1640                 return 0;
1641         for (i = 0x43; i <= 0x46; i++) {
1642                 if (w83781d_read_value(isa, i) !=
1643                     i2c_smbus_read_byte_data(client, i))
1644                         return 0;
1645         }
1646
1647         return 1;
1648 }
1649
1650 static int
1651 w83781d_read_value_isa(struct w83781d_data *data, u16 reg)
1652 {
1653         int word_sized, res;
1654
1655         word_sized = (((reg & 0xff00) == 0x100)
1656                       || ((reg & 0xff00) == 0x200))
1657             && (((reg & 0x00ff) == 0x50)
1658                 || ((reg & 0x00ff) == 0x53)
1659                 || ((reg & 0x00ff) == 0x55));
1660         if (reg & 0xff00) {
1661                 outb_p(W83781D_REG_BANK,
1662                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1663                 outb_p(reg >> 8,
1664                        data->isa_addr + W83781D_DATA_REG_OFFSET);
1665         }
1666         outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1667         res = inb_p(data->isa_addr + W83781D_DATA_REG_OFFSET);
1668         if (word_sized) {
1669                 outb_p((reg & 0xff) + 1,
1670                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1671                 res =
1672                     (res << 8) + inb_p(data->isa_addr +
1673                                        W83781D_DATA_REG_OFFSET);
1674         }
1675         if (reg & 0xff00) {
1676                 outb_p(W83781D_REG_BANK,
1677                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1678                 outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1679         }
1680         return res;
1681 }
1682
1683 static void
1684 w83781d_write_value_isa(struct w83781d_data *data, u16 reg, u16 value)
1685 {
1686         int word_sized;
1687
1688         word_sized = (((reg & 0xff00) == 0x100)
1689                       || ((reg & 0xff00) == 0x200))
1690             && (((reg & 0x00ff) == 0x53)
1691                 || ((reg & 0x00ff) == 0x55));
1692         if (reg & 0xff00) {
1693                 outb_p(W83781D_REG_BANK,
1694                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1695                 outb_p(reg >> 8,
1696                        data->isa_addr + W83781D_DATA_REG_OFFSET);
1697         }
1698         outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1699         if (word_sized) {
1700                 outb_p(value >> 8,
1701                        data->isa_addr + W83781D_DATA_REG_OFFSET);
1702                 outb_p((reg & 0xff) + 1,
1703                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1704         }
1705         outb_p(value & 0xff, data->isa_addr + W83781D_DATA_REG_OFFSET);
1706         if (reg & 0xff00) {
1707                 outb_p(W83781D_REG_BANK,
1708                        data->isa_addr + W83781D_ADDR_REG_OFFSET);
1709                 outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1710         }
1711 }
1712
1713 /*
1714  * The SMBus locks itself, usually, but nothing may access the Winbond between
1715  * bank switches. ISA access must always be locked explicitly!
1716  * We ignore the W83781D BUSY flag at this moment - it could lead to deadlocks,
1717  * would slow down the W83781D access and should not be necessary.
1718  * There are some ugly typecasts here, but the good news is - they should
1719  * nowhere else be necessary!
1720  */
1721 static int
1722 w83781d_read_value(struct w83781d_data *data, u16 reg)
1723 {
1724         struct i2c_client *client = data->client;
1725         int res;
1726
1727         mutex_lock(&data->lock);
1728         if (client)
1729                 res = w83781d_read_value_i2c(data, reg);
1730         else
1731                 res = w83781d_read_value_isa(data, reg);
1732         mutex_unlock(&data->lock);
1733         return res;
1734 }
1735
1736 static int
1737 w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
1738 {
1739         struct i2c_client *client = data->client;
1740
1741         mutex_lock(&data->lock);
1742         if (client)
1743                 w83781d_write_value_i2c(data, reg, value);
1744         else
1745                 w83781d_write_value_isa(data, reg, value);
1746         mutex_unlock(&data->lock);
1747         return 0;
1748 }
1749
1750 static int
1751 w83781d_isa_probe(struct platform_device *pdev)
1752 {
1753         int err, reg;
1754         struct w83781d_data *data;
1755         struct resource *res;
1756
1757         /* Reserve the ISA region */
1758         res = platform_get_resource(pdev, IORESOURCE_IO, 0);
1759         if (!devm_request_region(&pdev->dev,
1760                                  res->start + W83781D_ADDR_REG_OFFSET, 2,
1761                                  "w83781d"))
1762                 return -EBUSY;
1763
1764         data = devm_kzalloc(&pdev->dev, sizeof(struct w83781d_data),
1765                             GFP_KERNEL);
1766         if (!data)
1767                 return -ENOMEM;
1768
1769         mutex_init(&data->lock);
1770         data->isa_addr = res->start;
1771         platform_set_drvdata(pdev, data);
1772
1773         reg = w83781d_read_value(data, W83781D_REG_WCHIPID);
1774         switch (reg) {
1775         case 0x30:
1776                 data->type = w83782d;
1777                 data->name = "w83782d";
1778                 break;
1779         default:
1780                 data->type = w83781d;
1781                 data->name = "w83781d";
1782         }
1783
1784         /* Initialize the W83781D chip */
1785         w83781d_init_device(&pdev->dev);
1786
1787         /* Register sysfs hooks */
1788         err = w83781d_create_files(&pdev->dev, data->type, 1);
1789         if (err)
1790                 goto exit_remove_files;
1791
1792         err = device_create_file(&pdev->dev, &dev_attr_name);
1793         if (err)
1794                 goto exit_remove_files;
1795
1796         data->hwmon_dev = hwmon_device_register(&pdev->dev);
1797         if (IS_ERR(data->hwmon_dev)) {
1798                 err = PTR_ERR(data->hwmon_dev);
1799                 goto exit_remove_files;
1800         }
1801
1802         return 0;
1803
1804  exit_remove_files:
1805         w83781d_remove_files(&pdev->dev);
1806         device_remove_file(&pdev->dev, &dev_attr_name);
1807         return err;
1808 }
1809
1810 static int
1811 w83781d_isa_remove(struct platform_device *pdev)
1812 {
1813         struct w83781d_data *data = platform_get_drvdata(pdev);
1814
1815         hwmon_device_unregister(data->hwmon_dev);
1816         w83781d_remove_files(&pdev->dev);
1817         device_remove_file(&pdev->dev, &dev_attr_name);
1818
1819         return 0;
1820 }
1821
1822 static struct platform_driver w83781d_isa_driver = {
1823         .driver = {
1824                 .name = "w83781d",
1825         },
1826         .probe = w83781d_isa_probe,
1827         .remove = w83781d_isa_remove,
1828 };
1829
1830 /* return 1 if a supported chip is found, 0 otherwise */
1831 static int __init
1832 w83781d_isa_found(unsigned short address)
1833 {
1834         int val, save, found = 0;
1835         int port;
1836
1837         /*
1838          * Some boards declare base+0 to base+7 as a PNP device, some base+4
1839          * to base+7 and some base+5 to base+6. So we better request each port
1840          * individually for the probing phase.
1841          */
1842         for (port = address; port < address + W83781D_EXTENT; port++) {
1843                 if (!request_region(port, 1, "w83781d")) {
1844                         pr_debug("Failed to request port 0x%x\n", port);
1845                         goto release;
1846                 }
1847         }
1848
1849 #define REALLY_SLOW_IO
1850         /*
1851          * We need the timeouts for at least some W83781D-like
1852          * chips. But only if we read 'undefined' registers.
1853          */
1854         val = inb_p(address + 1);
1855         if (inb_p(address + 2) != val
1856          || inb_p(address + 3) != val
1857          || inb_p(address + 7) != val) {
1858                 pr_debug("Detection failed at step %d\n", 1);
1859                 goto release;
1860         }
1861 #undef REALLY_SLOW_IO
1862
1863         /*
1864          * We should be able to change the 7 LSB of the address port. The
1865          * MSB (busy flag) should be clear initially, set after the write.
1866          */
1867         save = inb_p(address + W83781D_ADDR_REG_OFFSET);
1868         if (save & 0x80) {
1869                 pr_debug("Detection failed at step %d\n", 2);
1870                 goto release;
1871         }
1872         val = ~save & 0x7f;
1873         outb_p(val, address + W83781D_ADDR_REG_OFFSET);
1874         if (inb_p(address + W83781D_ADDR_REG_OFFSET) != (val | 0x80)) {
1875                 outb_p(save, address + W83781D_ADDR_REG_OFFSET);
1876                 pr_debug("Detection failed at step %d\n", 3);
1877                 goto release;
1878         }
1879
1880         /* We found a device, now see if it could be a W83781D */
1881         outb_p(W83781D_REG_CONFIG, address + W83781D_ADDR_REG_OFFSET);
1882         val = inb_p(address + W83781D_DATA_REG_OFFSET);
1883         if (val & 0x80) {
1884                 pr_debug("Detection failed at step %d\n", 4);
1885                 goto release;
1886         }
1887         outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
1888         save = inb_p(address + W83781D_DATA_REG_OFFSET);
1889         outb_p(W83781D_REG_CHIPMAN, address + W83781D_ADDR_REG_OFFSET);
1890         val = inb_p(address + W83781D_DATA_REG_OFFSET);
1891         if ((!(save & 0x80) && (val != 0xa3))
1892          || ((save & 0x80) && (val != 0x5c))) {
1893                 pr_debug("Detection failed at step %d\n", 5);
1894                 goto release;
1895         }
1896         outb_p(W83781D_REG_I2C_ADDR, address + W83781D_ADDR_REG_OFFSET);
1897         val = inb_p(address + W83781D_DATA_REG_OFFSET);
1898         if (val < 0x03 || val > 0x77) { /* Not a valid I2C address */
1899                 pr_debug("Detection failed at step %d\n", 6);
1900                 goto release;
1901         }
1902
1903         /* The busy flag should be clear again */
1904         if (inb_p(address + W83781D_ADDR_REG_OFFSET) & 0x80) {
1905                 pr_debug("Detection failed at step %d\n", 7);
1906                 goto release;
1907         }
1908
1909         /* Determine the chip type */
1910         outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
1911         save = inb_p(address + W83781D_DATA_REG_OFFSET);
1912         outb_p(save & 0xf8, address + W83781D_DATA_REG_OFFSET);
1913         outb_p(W83781D_REG_WCHIPID, address + W83781D_ADDR_REG_OFFSET);
1914         val = inb_p(address + W83781D_DATA_REG_OFFSET);
1915         if ((val & 0xfe) == 0x10        /* W83781D */
1916          || val == 0x30)                /* W83782D */
1917                 found = 1;
1918
1919         if (found)
1920                 pr_info("Found a %s chip at %#x\n",
1921                         val == 0x30 ? "W83782D" : "W83781D", (int)address);
1922
1923  release:
1924         for (port--; port >= address; port--)
1925                 release_region(port, 1);
1926         return found;
1927 }
1928
1929 static int __init
1930 w83781d_isa_device_add(unsigned short address)
1931 {
1932         struct resource res = {
1933                 .start  = address,
1934                 .end    = address + W83781D_EXTENT - 1,
1935                 .name   = "w83781d",
1936                 .flags  = IORESOURCE_IO,
1937         };
1938         int err;
1939
1940         pdev = platform_device_alloc("w83781d", address);
1941         if (!pdev) {
1942                 err = -ENOMEM;
1943                 pr_err("Device allocation failed\n");
1944                 goto exit;
1945         }
1946
1947         err = platform_device_add_resources(pdev, &res, 1);
1948         if (err) {
1949                 pr_err("Device resource addition failed (%d)\n", err);
1950                 goto exit_device_put;
1951         }
1952
1953         err = platform_device_add(pdev);
1954         if (err) {
1955                 pr_err("Device addition failed (%d)\n", err);
1956                 goto exit_device_put;
1957         }
1958
1959         return 0;
1960
1961  exit_device_put:
1962         platform_device_put(pdev);
1963  exit:
1964         pdev = NULL;
1965         return err;
1966 }
1967
1968 static int __init
1969 w83781d_isa_register(void)
1970 {
1971         int res;
1972
1973         if (w83781d_isa_found(isa_address)) {
1974                 res = platform_driver_register(&w83781d_isa_driver);
1975                 if (res)
1976                         goto exit;
1977
1978                 /* Sets global pdev as a side effect */
1979                 res = w83781d_isa_device_add(isa_address);
1980                 if (res)
1981                         goto exit_unreg_isa_driver;
1982         }
1983
1984         return 0;
1985
1986 exit_unreg_isa_driver:
1987         platform_driver_unregister(&w83781d_isa_driver);
1988 exit:
1989         return res;
1990 }
1991
1992 static void
1993 w83781d_isa_unregister(void)
1994 {
1995         if (pdev) {
1996                 platform_device_unregister(pdev);
1997                 platform_driver_unregister(&w83781d_isa_driver);
1998         }
1999 }
2000 #else /* !CONFIG_ISA */
2001
2002 static struct w83781d_data *w83781d_data_if_isa(void)
2003 {
2004         return NULL;
2005 }
2006
2007 static int
2008 w83781d_alias_detect(struct i2c_client *client, u8 chipid)
2009 {
2010         return 0;
2011 }
2012
2013 static int
2014 w83781d_read_value(struct w83781d_data *data, u16 reg)
2015 {
2016         int res;
2017
2018         mutex_lock(&data->lock);
2019         res = w83781d_read_value_i2c(data, reg);
2020         mutex_unlock(&data->lock);
2021
2022         return res;
2023 }
2024
2025 static int
2026 w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
2027 {
2028         mutex_lock(&data->lock);
2029         w83781d_write_value_i2c(data, reg, value);
2030         mutex_unlock(&data->lock);
2031
2032         return 0;
2033 }
2034
2035 static int __init
2036 w83781d_isa_register(void)
2037 {
2038         return 0;
2039 }
2040
2041 static void
2042 w83781d_isa_unregister(void)
2043 {
2044 }
2045 #endif /* CONFIG_ISA */
2046
2047 static int __init
2048 sensors_w83781d_init(void)
2049 {
2050         int res;
2051
2052         /*
2053          * We register the ISA device first, so that we can skip the
2054          * registration of an I2C interface to the same device.
2055          */
2056         res = w83781d_isa_register();
2057         if (res)
2058                 goto exit;
2059
2060         res = i2c_add_driver(&w83781d_driver);
2061         if (res)
2062                 goto exit_unreg_isa;
2063
2064         return 0;
2065
2066  exit_unreg_isa:
2067         w83781d_isa_unregister();
2068  exit:
2069         return res;
2070 }
2071
2072 static void __exit
2073 sensors_w83781d_exit(void)
2074 {
2075         w83781d_isa_unregister();
2076         i2c_del_driver(&w83781d_driver);
2077 }
2078
2079 MODULE_AUTHOR("Frodo Looijaard <frodol@dds.nl>, "
2080               "Philip Edelbrock <phil@netroedge.com>, "
2081               "and Mark Studebaker <mdsxyz123@yahoo.com>");
2082 MODULE_DESCRIPTION("W83781D driver");
2083 MODULE_LICENSE("GPL");
2084
2085 module_init(sensors_w83781d_init);
2086 module_exit(sensors_w83781d_exit);