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