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 <khali@linux-fr.org>
   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, "List of subclient addresses: "
  68                    "{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, "Sensor type %d is deprecated, please use 4 "
 830                         "instead\n", W83781D_DEFAULT_BETA);
 831                /* fall through */
 832        case 4:         /* thermistor */
 833                tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
 834                w83781d_write_value(data, W83781D_REG_SCFG1,
 835                                    tmp & ~BIT_SCFG1[nr]);
 836                data->sens[nr] = val;
 837                break;
 838        default:
 839                dev_err(dev, "Invalid sensor type %ld; must be 1, 2, or 4\n",
 840                       (long) val);
 841                break;
 842        }
 843
 844        mutex_unlock(&data->update_lock);
 845        return count;
 846}
 847
 848static SENSOR_DEVICE_ATTR(temp1_type, S_IRUGO | S_IWUSR,
 849        show_sensor, store_sensor, 0);
 850static SENSOR_DEVICE_ATTR(temp2_type, S_IRUGO | S_IWUSR,
 851        show_sensor, store_sensor, 1);
 852static SENSOR_DEVICE_ATTR(temp3_type, S_IRUGO | S_IWUSR,
 853        show_sensor, store_sensor, 2);
 854
 855/*
 856 * Assumes that adapter is of I2C, not ISA variety.
 857 * OTHERWISE DON'T CALL THIS
 858 */
 859static int
 860w83781d_detect_subclients(struct i2c_client *new_client)
 861{
 862        int i, val1 = 0, id;
 863        int err;
 864        int address = new_client->addr;
 865        unsigned short sc_addr[2];
 866        struct i2c_adapter *adapter = new_client->adapter;
 867        struct w83781d_data *data = i2c_get_clientdata(new_client);
 868        enum chips kind = data->type;
 869        int num_sc = 1;
 870
 871        id = i2c_adapter_id(adapter);
 872
 873        if (force_subclients[0] == id && force_subclients[1] == address) {
 874                for (i = 2; i <= 3; i++) {
 875                        if (force_subclients[i] < 0x48 ||
 876                            force_subclients[i] > 0x4f) {
 877                                dev_err(&new_client->dev, "Invalid subclient "
 878                                        "address %d; must be 0x48-0x4f\n",
 879                                        force_subclients[i]);
 880                                err = -EINVAL;
 881                                goto ERROR_SC_1;
 882                        }
 883                }
 884                w83781d_write_value(data, W83781D_REG_I2C_SUBADDR,
 885                                (force_subclients[2] & 0x07) |
 886                                ((force_subclients[3] & 0x07) << 4));
 887                sc_addr[0] = force_subclients[2];
 888        } else {
 889                val1 = w83781d_read_value(data, W83781D_REG_I2C_SUBADDR);
 890                sc_addr[0] = 0x48 + (val1 & 0x07);
 891        }
 892
 893        if (kind != w83783s) {
 894                num_sc = 2;
 895                if (force_subclients[0] == id &&
 896                    force_subclients[1] == address) {
 897                        sc_addr[1] = force_subclients[3];
 898                } else {
 899                        sc_addr[1] = 0x48 + ((val1 >> 4) & 0x07);
 900                }
 901                if (sc_addr[0] == sc_addr[1]) {
 902                        dev_err(&new_client->dev,
 903                               "Duplicate addresses 0x%x for subclients.\n",
 904                               sc_addr[0]);
 905                        err = -EBUSY;
 906                        goto ERROR_SC_2;
 907                }
 908        }
 909
 910        for (i = 0; i < num_sc; i++) {
 911                data->lm75[i] = i2c_new_dummy(adapter, sc_addr[i]);
 912                if (!data->lm75[i]) {
 913                        dev_err(&new_client->dev, "Subclient %d "
 914                                "registration at address 0x%x "
 915                                "failed.\n", i, sc_addr[i]);
 916                        err = -ENOMEM;
 917                        if (i == 1)
 918                                goto ERROR_SC_3;
 919                        goto ERROR_SC_2;
 920                }
 921        }
 922
 923        return 0;
 924
 925/* Undo inits in case of errors */
 926ERROR_SC_3:
 927        i2c_unregister_device(data->lm75[0]);
 928ERROR_SC_2:
 929ERROR_SC_1:
 930        return err;
 931}
 932
 933#define IN_UNIT_ATTRS(X)                                        \
 934        &sensor_dev_attr_in##X##_input.dev_attr.attr,           \
 935        &sensor_dev_attr_in##X##_min.dev_attr.attr,             \
 936        &sensor_dev_attr_in##X##_max.dev_attr.attr,             \
 937        &sensor_dev_attr_in##X##_alarm.dev_attr.attr,           \
 938        &sensor_dev_attr_in##X##_beep.dev_attr.attr
 939
 940#define FAN_UNIT_ATTRS(X)                                       \
 941        &sensor_dev_attr_fan##X##_input.dev_attr.attr,          \
 942        &sensor_dev_attr_fan##X##_min.dev_attr.attr,            \
 943        &sensor_dev_attr_fan##X##_div.dev_attr.attr,            \
 944        &sensor_dev_attr_fan##X##_alarm.dev_attr.attr,          \
 945        &sensor_dev_attr_fan##X##_beep.dev_attr.attr
 946
 947#define TEMP_UNIT_ATTRS(X)                                      \
 948        &sensor_dev_attr_temp##X##_input.dev_attr.attr,         \
 949        &sensor_dev_attr_temp##X##_max.dev_attr.attr,           \
 950        &sensor_dev_attr_temp##X##_max_hyst.dev_attr.attr,      \
 951        &sensor_dev_attr_temp##X##_alarm.dev_attr.attr,         \
 952        &sensor_dev_attr_temp##X##_beep.dev_attr.attr
 953
 954static struct attribute *w83781d_attributes[] = {
 955        IN_UNIT_ATTRS(0),
 956        IN_UNIT_ATTRS(2),
 957        IN_UNIT_ATTRS(3),
 958        IN_UNIT_ATTRS(4),
 959        IN_UNIT_ATTRS(5),
 960        IN_UNIT_ATTRS(6),
 961        FAN_UNIT_ATTRS(1),
 962        FAN_UNIT_ATTRS(2),
 963        FAN_UNIT_ATTRS(3),
 964        TEMP_UNIT_ATTRS(1),
 965        TEMP_UNIT_ATTRS(2),
 966        &dev_attr_cpu0_vid.attr,
 967        &dev_attr_vrm.attr,
 968        &dev_attr_alarms.attr,
 969        &dev_attr_beep_mask.attr,
 970        &sensor_dev_attr_beep_enable.dev_attr.attr,
 971        NULL
 972};
 973static const struct attribute_group w83781d_group = {
 974        .attrs = w83781d_attributes,
 975};
 976
 977static struct attribute *w83781d_attributes_in1[] = {
 978        IN_UNIT_ATTRS(1),
 979        NULL
 980};
 981static const struct attribute_group w83781d_group_in1 = {
 982        .attrs = w83781d_attributes_in1,
 983};
 984
 985static struct attribute *w83781d_attributes_in78[] = {
 986        IN_UNIT_ATTRS(7),
 987        IN_UNIT_ATTRS(8),
 988        NULL
 989};
 990static const struct attribute_group w83781d_group_in78 = {
 991        .attrs = w83781d_attributes_in78,
 992};
 993
 994static struct attribute *w83781d_attributes_temp3[] = {
 995        TEMP_UNIT_ATTRS(3),
 996        NULL
 997};
 998static const struct attribute_group w83781d_group_temp3 = {
 999        .attrs = w83781d_attributes_temp3,
1000};
1001
1002static struct attribute *w83781d_attributes_pwm12[] = {
1003        &sensor_dev_attr_pwm1.dev_attr.attr,
1004        &sensor_dev_attr_pwm2.dev_attr.attr,
1005        &dev_attr_pwm2_enable.attr,
1006        NULL
1007};
1008static const struct attribute_group w83781d_group_pwm12 = {
1009        .attrs = w83781d_attributes_pwm12,
1010};
1011
1012static struct attribute *w83781d_attributes_pwm34[] = {
1013        &sensor_dev_attr_pwm3.dev_attr.attr,
1014        &sensor_dev_attr_pwm4.dev_attr.attr,
1015        NULL
1016};
1017static const struct attribute_group w83781d_group_pwm34 = {
1018        .attrs = w83781d_attributes_pwm34,
1019};
1020
1021static struct attribute *w83781d_attributes_other[] = {
1022        &sensor_dev_attr_temp1_type.dev_attr.attr,
1023        &sensor_dev_attr_temp2_type.dev_attr.attr,
1024        &sensor_dev_attr_temp3_type.dev_attr.attr,
1025        NULL
1026};
1027static const struct attribute_group w83781d_group_other = {
1028        .attrs = w83781d_attributes_other,
1029};
1030
1031/* No clean up is done on error, it's up to the caller */
1032static int
1033w83781d_create_files(struct device *dev, int kind, int is_isa)
1034{
1035        int err;
1036
1037        err = sysfs_create_group(&dev->kobj, &w83781d_group);
1038        if (err)
1039                return err;
1040
1041        if (kind != w83783s) {
1042                err = sysfs_create_group(&dev->kobj, &w83781d_group_in1);
1043                if (err)
1044                        return err;
1045        }
1046        if (kind != as99127f && kind != w83781d && kind != w83783s) {
1047                err = sysfs_create_group(&dev->kobj, &w83781d_group_in78);
1048                if (err)
1049                        return err;
1050        }
1051        if (kind != w83783s) {
1052                err = sysfs_create_group(&dev->kobj, &w83781d_group_temp3);
1053                if (err)
1054                        return err;
1055
1056                if (kind != w83781d) {
1057                        err = sysfs_chmod_file(&dev->kobj,
1058                                &sensor_dev_attr_temp3_alarm.dev_attr.attr,
1059                                S_IRUGO | S_IWUSR);
1060                        if (err)
1061                                return err;
1062                }
1063        }
1064
1065        if (kind != w83781d && kind != as99127f) {
1066                err = sysfs_create_group(&dev->kobj, &w83781d_group_pwm12);
1067                if (err)
1068                        return err;
1069        }
1070        if (kind == w83782d && !is_isa) {
1071                err = sysfs_create_group(&dev->kobj, &w83781d_group_pwm34);
1072                if (err)
1073                        return err;
1074        }
1075
1076        if (kind != as99127f && kind != w83781d) {
1077                err = device_create_file(dev,
1078                                         &sensor_dev_attr_temp1_type.dev_attr);
1079                if (err)
1080                        return err;
1081                err = device_create_file(dev,
1082                                         &sensor_dev_attr_temp2_type.dev_attr);
1083                if (err)
1084                        return err;
1085                if (kind != w83783s) {
1086                        err = device_create_file(dev,
1087                                        &sensor_dev_attr_temp3_type.dev_attr);
1088                        if (err)
1089                                return err;
1090                }
1091        }
1092
1093        return 0;
1094}
1095
1096/* Return 0 if detection is successful, -ENODEV otherwise */
1097static int
1098w83781d_detect(struct i2c_client *client, struct i2c_board_info *info)
1099{
1100        int val1, val2;
1101        struct w83781d_data *isa = w83781d_data_if_isa();
1102        struct i2c_adapter *adapter = client->adapter;
1103        int address = client->addr;
1104        const char *client_name;
1105        enum vendor { winbond, asus } vendid;
1106
1107        if (!i2c_check_functionality(adapter, I2C_FUNC_SMBUS_BYTE_DATA))
1108                return -ENODEV;
1109
1110        /*
1111         * We block updates of the ISA device to minimize the risk of
1112         * concurrent access to the same W83781D chip through different
1113         * interfaces.
1114         */
1115        if (isa)
1116                mutex_lock(&isa->update_lock);
1117
1118        if (i2c_smbus_read_byte_data(client, W83781D_REG_CONFIG) & 0x80) {
1119                dev_dbg(&adapter->dev,
1120                        "Detection of w83781d chip failed at step 3\n");
1121                goto err_nodev;
1122        }
1123
1124        val1 = i2c_smbus_read_byte_data(client, W83781D_REG_BANK);
1125        val2 = i2c_smbus_read_byte_data(client, W83781D_REG_CHIPMAN);
1126        /* Check for Winbond or Asus ID if in bank 0 */
1127        if (!(val1 & 0x07) &&
1128            ((!(val1 & 0x80) && val2 != 0xa3 && val2 != 0xc3) ||
1129             ((val1 & 0x80) && val2 != 0x5c && val2 != 0x12))) {
1130                dev_dbg(&adapter->dev,
1131                        "Detection of w83781d chip failed at step 4\n");
1132                goto err_nodev;
1133        }
1134        /*
1135         * If Winbond SMBus, check address at 0x48.
1136         * Asus doesn't support, except for as99127f rev.2
1137         */
1138        if ((!(val1 & 0x80) && val2 == 0xa3) ||
1139            ((val1 & 0x80) && val2 == 0x5c)) {
1140                if (i2c_smbus_read_byte_data(client, W83781D_REG_I2C_ADDR)
1141                    != address) {
1142                        dev_dbg(&adapter->dev,
1143                                "Detection of w83781d chip failed at step 5\n");
1144                        goto err_nodev;
1145                }
1146        }
1147
1148        /* Put it now into bank 0 and Vendor ID High Byte */
1149        i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
1150                (i2c_smbus_read_byte_data(client, W83781D_REG_BANK)
1151                 & 0x78) | 0x80);
1152
1153        /* Get the vendor ID */
1154        val2 = i2c_smbus_read_byte_data(client, W83781D_REG_CHIPMAN);
1155        if (val2 == 0x5c)
1156                vendid = winbond;
1157        else if (val2 == 0x12)
1158                vendid = asus;
1159        else {
1160                dev_dbg(&adapter->dev,
1161                        "w83781d chip vendor is neither Winbond nor Asus\n");
1162                goto err_nodev;
1163        }
1164
1165        /* Determine the chip type. */
1166        val1 = i2c_smbus_read_byte_data(client, W83781D_REG_WCHIPID);
1167        if ((val1 == 0x10 || val1 == 0x11) && vendid == winbond)
1168                client_name = "w83781d";
1169        else if (val1 == 0x30 && vendid == winbond)
1170                client_name = "w83782d";
1171        else if (val1 == 0x40 && vendid == winbond && address == 0x2d)
1172                client_name = "w83783s";
1173        else if (val1 == 0x31)
1174                client_name = "as99127f";
1175        else
1176                goto err_nodev;
1177
1178        if (val1 <= 0x30 && w83781d_alias_detect(client, val1)) {
1179                dev_dbg(&adapter->dev, "Device at 0x%02x appears to "
1180                        "be the same as ISA device\n", address);
1181                goto err_nodev;
1182        }
1183
1184        if (isa)
1185                mutex_unlock(&isa->update_lock);
1186
1187        strlcpy(info->type, client_name, I2C_NAME_SIZE);
1188
1189        return 0;
1190
1191 err_nodev:
1192        if (isa)
1193                mutex_unlock(&isa->update_lock);
1194        return -ENODEV;
1195}
1196
1197static void w83781d_remove_files(struct device *dev)
1198{
1199        sysfs_remove_group(&dev->kobj, &w83781d_group);
1200        sysfs_remove_group(&dev->kobj, &w83781d_group_in1);
1201        sysfs_remove_group(&dev->kobj, &w83781d_group_in78);
1202        sysfs_remove_group(&dev->kobj, &w83781d_group_temp3);
1203        sysfs_remove_group(&dev->kobj, &w83781d_group_pwm12);
1204        sysfs_remove_group(&dev->kobj, &w83781d_group_pwm34);
1205        sysfs_remove_group(&dev->kobj, &w83781d_group_other);
1206}
1207
1208static int
1209w83781d_probe(struct i2c_client *client, const struct i2c_device_id *id)
1210{
1211        struct device *dev = &client->dev;
1212        struct w83781d_data *data;
1213        int err;
1214
1215        data = devm_kzalloc(dev, sizeof(struct w83781d_data), GFP_KERNEL);
1216        if (!data)
1217                return -ENOMEM;
1218
1219        i2c_set_clientdata(client, data);
1220        mutex_init(&data->lock);
1221        mutex_init(&data->update_lock);
1222
1223        data->type = id->driver_data;
1224        data->client = client;
1225
1226        /* attach secondary i2c lm75-like clients */
1227        err = w83781d_detect_subclients(client);
1228        if (err)
1229                return err;
1230
1231        /* Initialize the chip */
1232        w83781d_init_device(dev);
1233
1234        /* Register sysfs hooks */
1235        err = w83781d_create_files(dev, data->type, 0);
1236        if (err)
1237                goto exit_remove_files;
1238
1239        data->hwmon_dev = hwmon_device_register(dev);
1240        if (IS_ERR(data->hwmon_dev)) {
1241                err = PTR_ERR(data->hwmon_dev);
1242                goto exit_remove_files;
1243        }
1244
1245        return 0;
1246
1247 exit_remove_files:
1248        w83781d_remove_files(dev);
1249        if (data->lm75[0])
1250                i2c_unregister_device(data->lm75[0]);
1251        if (data->lm75[1])
1252                i2c_unregister_device(data->lm75[1]);
1253        return err;
1254}
1255
1256static int
1257w83781d_remove(struct i2c_client *client)
1258{
1259        struct w83781d_data *data = i2c_get_clientdata(client);
1260        struct device *dev = &client->dev;
1261
1262        hwmon_device_unregister(data->hwmon_dev);
1263        w83781d_remove_files(dev);
1264
1265        if (data->lm75[0])
1266                i2c_unregister_device(data->lm75[0]);
1267        if (data->lm75[1])
1268                i2c_unregister_device(data->lm75[1]);
1269
1270        return 0;
1271}
1272
1273static int
1274w83781d_read_value_i2c(struct w83781d_data *data, u16 reg)
1275{
1276        struct i2c_client *client = data->client;
1277        int res, bank;
1278        struct i2c_client *cl;
1279
1280        bank = (reg >> 8) & 0x0f;
1281        if (bank > 2)
1282                /* switch banks */
1283                i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
1284                                          bank);
1285        if (bank == 0 || bank > 2) {
1286                res = i2c_smbus_read_byte_data(client, reg & 0xff);
1287        } else {
1288                /* switch to subclient */
1289                cl = data->lm75[bank - 1];
1290                /* convert from ISA to LM75 I2C addresses */
1291                switch (reg & 0xff) {
1292                case 0x50:      /* TEMP */
1293                        res = i2c_smbus_read_word_swapped(cl, 0);
1294                        break;
1295                case 0x52:      /* CONFIG */
1296                        res = i2c_smbus_read_byte_data(cl, 1);
1297                        break;
1298                case 0x53:      /* HYST */
1299                        res = i2c_smbus_read_word_swapped(cl, 2);
1300                        break;
1301                case 0x55:      /* OVER */
1302                default:
1303                        res = i2c_smbus_read_word_swapped(cl, 3);
1304                        break;
1305                }
1306        }
1307        if (bank > 2)
1308                i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);
1309
1310        return res;
1311}
1312
1313static int
1314w83781d_write_value_i2c(struct w83781d_data *data, u16 reg, u16 value)
1315{
1316        struct i2c_client *client = data->client;
1317        int bank;
1318        struct i2c_client *cl;
1319
1320        bank = (reg >> 8) & 0x0f;
1321        if (bank > 2)
1322                /* switch banks */
1323                i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
1324                                          bank);
1325        if (bank == 0 || bank > 2) {
1326                i2c_smbus_write_byte_data(client, reg & 0xff,
1327                                          value & 0xff);
1328        } else {
1329                /* switch to subclient */
1330                cl = data->lm75[bank - 1];
1331                /* convert from ISA to LM75 I2C addresses */
1332                switch (reg & 0xff) {
1333                case 0x52:      /* CONFIG */
1334                        i2c_smbus_write_byte_data(cl, 1, value & 0xff);
1335                        break;
1336                case 0x53:      /* HYST */
1337                        i2c_smbus_write_word_swapped(cl, 2, value);
1338                        break;
1339                case 0x55:      /* OVER */
1340                        i2c_smbus_write_word_swapped(cl, 3, value);
1341                        break;
1342                }
1343        }
1344        if (bank > 2)
1345                i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);
1346
1347        return 0;
1348}
1349
1350static void
1351w83781d_init_device(struct device *dev)
1352{
1353        struct w83781d_data *data = dev_get_drvdata(dev);
1354        int i, p;
1355        int type = data->type;
1356        u8 tmp;
1357
1358        if (reset && type != as99127f) { /*
1359                                          * this resets registers we don't have
1360                                          * documentation for on the as99127f
1361                                          */
1362                /*
1363                 * Resetting the chip has been the default for a long time,
1364                 * but it causes the BIOS initializations (fan clock dividers,
1365                 * thermal sensor types...) to be lost, so it is now optional.
1366                 * It might even go away if nobody reports it as being useful,
1367                 * as I see very little reason why this would be needed at
1368                 * all.
1369                 */
1370                dev_info(dev, "If reset=1 solved a problem you were "
1371                         "having, please report!\n");
1372
1373                /* save these registers */
1374                i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
1375                p = w83781d_read_value(data, W83781D_REG_PWMCLK12);
1376                /*
1377                 * Reset all except Watchdog values and last conversion values
1378                 * This sets fan-divs to 2, among others
1379                 */
1380                w83781d_write_value(data, W83781D_REG_CONFIG, 0x80);
1381                /*
1382                 * Restore the registers and disable power-on abnormal beep.
1383                 * This saves FAN 1/2/3 input/output values set by BIOS.
1384                 */
1385                w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
1386                w83781d_write_value(data, W83781D_REG_PWMCLK12, p);
1387                /*
1388                 * Disable master beep-enable (reset turns it on).
1389                 * Individual beep_mask should be reset to off but for some
1390                 * reason disabling this bit helps some people not get beeped
1391                 */
1392                w83781d_write_value(data, W83781D_REG_BEEP_INTS2, 0);
1393        }
1394
1395        /*
1396         * Disable power-on abnormal beep, as advised by the datasheet.
1397         * Already done if reset=1.
1398         */
1399        if (init && !reset && type != as99127f) {
1400                i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
1401                w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
1402        }
1403
1404        data->vrm = vid_which_vrm();
1405
1406        if ((type != w83781d) && (type != as99127f)) {
1407                tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
1408                for (i = 1; i <= 3; i++) {
1409                        if (!(tmp & BIT_SCFG1[i - 1])) {
1410                                data->sens[i - 1] = 4;
1411                        } else {
1412                                if (w83781d_read_value
1413                                    (data,
1414                                     W83781D_REG_SCFG2) & BIT_SCFG2[i - 1])
1415                                        data->sens[i - 1] = 1;
1416                                else
1417                                        data->sens[i - 1] = 2;
1418                        }
1419                        if (type == w83783s && i == 2)
1420                                break;
1421                }
1422        }
1423
1424        if (init && type != as99127f) {
1425                /* Enable temp2 */
1426                tmp = w83781d_read_value(data, W83781D_REG_TEMP2_CONFIG);
1427                if (tmp & 0x01) {
1428                        dev_warn(dev, "Enabling temp2, readings "
1429                                 "might not make sense\n");
1430                        w83781d_write_value(data, W83781D_REG_TEMP2_CONFIG,
1431                                tmp & 0xfe);
1432                }
1433
1434                /* Enable temp3 */
1435                if (type != w83783s) {
1436                        tmp = w83781d_read_value(data,
1437                                W83781D_REG_TEMP3_CONFIG);
1438                        if (tmp & 0x01) {
1439                                dev_warn(dev, "Enabling temp3, "
1440                                         "readings might not make sense\n");
1441                                w83781d_write_value(data,
1442                                        W83781D_REG_TEMP3_CONFIG, tmp & 0xfe);
1443                        }
1444                }
1445        }
1446
1447        /* Start monitoring */
1448        w83781d_write_value(data, W83781D_REG_CONFIG,
1449                            (w83781d_read_value(data,
1450                                                W83781D_REG_CONFIG) & 0xf7)
1451                            | 0x01);
1452
1453        /* A few vars need to be filled upon startup */
1454        for (i = 0; i < 3; i++) {
1455                data->fan_min[i] = w83781d_read_value(data,
1456                                        W83781D_REG_FAN_MIN(i));
1457        }
1458
1459        mutex_init(&data->update_lock);
1460}
1461
1462static struct w83781d_data *w83781d_update_device(struct device *dev)
1463{
1464        struct w83781d_data *data = dev_get_drvdata(dev);
1465        struct i2c_client *client = data->client;
1466        int i;
1467
1468        mutex_lock(&data->update_lock);
1469
1470        if (time_after(jiffies, data->last_updated + HZ + HZ / 2)
1471            || !data->valid) {
1472                dev_dbg(dev, "Starting device update\n");
1473
1474                for (i = 0; i <= 8; i++) {
1475                        if (data->type == w83783s && i == 1)
1476                                continue;       /* 783S has no in1 */
1477                        data->in[i] =
1478                            w83781d_read_value(data, W83781D_REG_IN(i));
1479                        data->in_min[i] =
1480                            w83781d_read_value(data, W83781D_REG_IN_MIN(i));
1481                        data->in_max[i] =
1482                            w83781d_read_value(data, W83781D_REG_IN_MAX(i));
1483                        if ((data->type != w83782d) && (i == 6))
1484                                break;
1485                }
1486                for (i = 0; i < 3; i++) {
1487                        data->fan[i] =
1488                            w83781d_read_value(data, W83781D_REG_FAN(i));
1489                        data->fan_min[i] =
1490                            w83781d_read_value(data, W83781D_REG_FAN_MIN(i));
1491                }
1492                if (data->type != w83781d && data->type != as99127f) {
1493                        for (i = 0; i < 4; i++) {
1494                                data->pwm[i] =
1495                                    w83781d_read_value(data,
1496                                                       W83781D_REG_PWM[i]);
1497                                /* Only W83782D on SMBus has PWM3 and PWM4 */
1498                                if ((data->type != w83782d || !client)
1499                                    && i == 1)
1500                                        break;
1501                        }
1502                        /* Only PWM2 can be disabled */
1503                        data->pwm2_enable = (w83781d_read_value(data,
1504                                             W83781D_REG_PWMCLK12) & 0x08) >> 3;
1505                }
1506
1507                data->temp = w83781d_read_value(data, W83781D_REG_TEMP(1));
1508                data->temp_max =
1509                    w83781d_read_value(data, W83781D_REG_TEMP_OVER(1));
1510                data->temp_max_hyst =
1511                    w83781d_read_value(data, W83781D_REG_TEMP_HYST(1));
1512                data->temp_add[0] =
1513                    w83781d_read_value(data, W83781D_REG_TEMP(2));
1514                data->temp_max_add[0] =
1515                    w83781d_read_value(data, W83781D_REG_TEMP_OVER(2));
1516                data->temp_max_hyst_add[0] =
1517                    w83781d_read_value(data, W83781D_REG_TEMP_HYST(2));
1518                if (data->type != w83783s) {
1519                        data->temp_add[1] =
1520                            w83781d_read_value(data, W83781D_REG_TEMP(3));
1521                        data->temp_max_add[1] =
1522                            w83781d_read_value(data,
1523                                               W83781D_REG_TEMP_OVER(3));
1524                        data->temp_max_hyst_add[1] =
1525                            w83781d_read_value(data,
1526                                               W83781D_REG_TEMP_HYST(3));
1527                }
1528                i = w83781d_read_value(data, W83781D_REG_VID_FANDIV);
1529                data->vid = i & 0x0f;
1530                data->vid |= (w83781d_read_value(data,
1531                                        W83781D_REG_CHIPID) & 0x01) << 4;
1532                data->fan_div[0] = (i >> 4) & 0x03;
1533                data->fan_div[1] = (i >> 6) & 0x03;
1534                data->fan_div[2] = (w83781d_read_value(data,
1535                                        W83781D_REG_PIN) >> 6) & 0x03;
1536                if ((data->type != w83781d) && (data->type != as99127f)) {
1537                        i = w83781d_read_value(data, W83781D_REG_VBAT);
1538                        data->fan_div[0] |= (i >> 3) & 0x04;
1539                        data->fan_div[1] |= (i >> 4) & 0x04;
1540                        data->fan_div[2] |= (i >> 5) & 0x04;
1541                }
1542                if (data->type == w83782d) {
1543                        data->alarms = w83781d_read_value(data,
1544                                                W83782D_REG_ALARM1)
1545                                     | (w83781d_read_value(data,
1546                                                W83782D_REG_ALARM2) << 8)
1547                                     | (w83781d_read_value(data,
1548                                                W83782D_REG_ALARM3) << 16);
1549                } else if (data->type == w83783s) {
1550                        data->alarms = w83781d_read_value(data,
1551                                                W83782D_REG_ALARM1)
1552                                     | (w83781d_read_value(data,
1553                                                W83782D_REG_ALARM2) << 8);
1554                } else {
1555                        /*
1556                         * No real-time status registers, fall back to
1557                         * interrupt status registers
1558                         */
1559                        data->alarms = w83781d_read_value(data,
1560                                                W83781D_REG_ALARM1)
1561                                     | (w83781d_read_value(data,
1562                                                W83781D_REG_ALARM2) << 8);
1563                }
1564                i = w83781d_read_value(data, W83781D_REG_BEEP_INTS2);
1565                data->beep_mask = (i << 8) +
1566                    w83781d_read_value(data, W83781D_REG_BEEP_INTS1);
1567                if ((data->type != w83781d) && (data->type != as99127f)) {
1568                        data->beep_mask |=
1569                            w83781d_read_value(data,
1570                                               W83781D_REG_BEEP_INTS3) << 16;
1571                }
1572                data->last_updated = jiffies;
1573                data->valid = 1;
1574        }
1575
1576        mutex_unlock(&data->update_lock);
1577
1578        return data;
1579}
1580
1581static const struct i2c_device_id w83781d_ids[] = {
1582        { "w83781d", w83781d, },
1583        { "w83782d", w83782d, },
1584        { "w83783s", w83783s, },
1585        { "as99127f", as99127f },
1586        { /* LIST END */ }
1587};
1588MODULE_DEVICE_TABLE(i2c, w83781d_ids);
1589
1590static struct i2c_driver w83781d_driver = {
1591        .class          = I2C_CLASS_HWMON,
1592        .driver = {
1593                .name = "w83781d",
1594        },
1595        .probe          = w83781d_probe,
1596        .remove         = w83781d_remove,
1597        .id_table       = w83781d_ids,
1598        .detect         = w83781d_detect,
1599        .address_list   = normal_i2c,
1600};
1601
1602/*
1603 * ISA related code
1604 */
1605#ifdef CONFIG_ISA
1606
1607/* ISA device, if found */
1608static struct platform_device *pdev;
1609
1610static unsigned short isa_address = 0x290;
1611
1612/*
1613 * I2C devices get this name attribute automatically, but for ISA devices
1614 * we must create it by ourselves.
1615 */
1616static ssize_t
1617show_name(struct device *dev, struct device_attribute *devattr, char *buf)
1618{
1619        struct w83781d_data *data = dev_get_drvdata(dev);
1620        return sprintf(buf, "%s\n", data->name);
1621}
1622static DEVICE_ATTR(name, S_IRUGO, show_name, NULL);
1623
1624static struct w83781d_data *w83781d_data_if_isa(void)
1625{
1626        return pdev ? platform_get_drvdata(pdev) : NULL;
1627}
1628
1629/* Returns 1 if the I2C chip appears to be an alias of the ISA chip */
1630static int w83781d_alias_detect(struct i2c_client *client, u8 chipid)
1631{
1632        struct w83781d_data *isa;
1633        int i;
1634
1635        if (!pdev)      /* No ISA chip */
1636                return 0;
1637
1638        isa = platform_get_drvdata(pdev);
1639
1640        if (w83781d_read_value(isa, W83781D_REG_I2C_ADDR) != client->addr)
1641                return 0;       /* Address doesn't match */
1642        if (w83781d_read_value(isa, W83781D_REG_WCHIPID) != chipid)
1643                return 0;       /* Chip type doesn't match */
1644
1645        /*
1646         * We compare all the limit registers, the config register and the
1647         * interrupt mask registers
1648         */
1649        for (i = 0x2b; i <= 0x3d; i++) {
1650                if (w83781d_read_value(isa, i) !=
1651                    i2c_smbus_read_byte_data(client, i))
1652                        return 0;
1653        }
1654        if (w83781d_read_value(isa, W83781D_REG_CONFIG) !=
1655            i2c_smbus_read_byte_data(client, W83781D_REG_CONFIG))
1656                return 0;
1657        for (i = 0x43; i <= 0x46; i++) {
1658                if (w83781d_read_value(isa, i) !=
1659                    i2c_smbus_read_byte_data(client, i))
1660                        return 0;
1661        }
1662
1663        return 1;
1664}
1665
1666static int
1667w83781d_read_value_isa(struct w83781d_data *data, u16 reg)
1668{
1669        int word_sized, res;
1670
1671        word_sized = (((reg & 0xff00) == 0x100)
1672                      || ((reg & 0xff00) == 0x200))
1673            && (((reg & 0x00ff) == 0x50)
1674                || ((reg & 0x00ff) == 0x53)
1675                || ((reg & 0x00ff) == 0x55));
1676        if (reg & 0xff00) {
1677                outb_p(W83781D_REG_BANK,
1678                       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1679                outb_p(reg >> 8,
1680                       data->isa_addr + W83781D_DATA_REG_OFFSET);
1681        }
1682        outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1683        res = inb_p(data->isa_addr + W83781D_DATA_REG_OFFSET);
1684        if (word_sized) {
1685                outb_p((reg & 0xff) + 1,
1686                       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1687                res =
1688                    (res << 8) + inb_p(data->isa_addr +
1689                                       W83781D_DATA_REG_OFFSET);
1690        }
1691        if (reg & 0xff00) {
1692                outb_p(W83781D_REG_BANK,
1693                       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1694                outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1695        }
1696        return res;
1697}
1698
1699static void
1700w83781d_write_value_isa(struct w83781d_data *data, u16 reg, u16 value)
1701{
1702        int word_sized;
1703
1704        word_sized = (((reg & 0xff00) == 0x100)
1705                      || ((reg & 0xff00) == 0x200))
1706            && (((reg & 0x00ff) == 0x53)
1707                || ((reg & 0x00ff) == 0x55));
1708        if (reg & 0xff00) {
1709                outb_p(W83781D_REG_BANK,
1710                       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1711                outb_p(reg >> 8,
1712                       data->isa_addr + W83781D_DATA_REG_OFFSET);
1713        }
1714        outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1715        if (word_sized) {
1716                outb_p(value >> 8,
1717                       data->isa_addr + W83781D_DATA_REG_OFFSET);
1718                outb_p((reg & 0xff) + 1,
1719                       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1720        }
1721        outb_p(value & 0xff, data->isa_addr + W83781D_DATA_REG_OFFSET);
1722        if (reg & 0xff00) {
1723                outb_p(W83781D_REG_BANK,
1724                       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1725                outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1726        }
1727}
1728
1729/*
1730 * The SMBus locks itself, usually, but nothing may access the Winbond between
1731 * bank switches. ISA access must always be locked explicitly!
1732 * We ignore the W83781D BUSY flag at this moment - it could lead to deadlocks,
1733 * would slow down the W83781D access and should not be necessary.
1734 * There are some ugly typecasts here, but the good news is - they should
1735 * nowhere else be necessary!
1736 */
1737static int
1738w83781d_read_value(struct w83781d_data *data, u16 reg)
1739{
1740        struct i2c_client *client = data->client;
1741        int res;
1742
1743        mutex_lock(&data->lock);
1744        if (client)
1745                res = w83781d_read_value_i2c(data, reg);
1746        else
1747                res = w83781d_read_value_isa(data, reg);
1748        mutex_unlock(&data->lock);
1749        return res;
1750}
1751
1752static int
1753w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
1754{
1755        struct i2c_client *client = data->client;
1756
1757        mutex_lock(&data->lock);
1758        if (client)
1759                w83781d_write_value_i2c(data, reg, value);
1760        else
1761                w83781d_write_value_isa(data, reg, value);
1762        mutex_unlock(&data->lock);
1763        return 0;
1764}
1765
1766static int
1767w83781d_isa_probe(struct platform_device *pdev)
1768{
1769        int err, reg;
1770        struct w83781d_data *data;
1771        struct resource *res;
1772
1773        /* Reserve the ISA region */
1774        res = platform_get_resource(pdev, IORESOURCE_IO, 0);
1775        if (!devm_request_region(&pdev->dev,
1776                                 res->start + W83781D_ADDR_REG_OFFSET, 2,
1777                                 "w83781d"))
1778                return -EBUSY;
1779
1780        data = devm_kzalloc(&pdev->dev, sizeof(struct w83781d_data),
1781                            GFP_KERNEL);
1782        if (!data)
1783                return -ENOMEM;
1784
1785        mutex_init(&data->lock);
1786        data->isa_addr = res->start;
1787        platform_set_drvdata(pdev, data);
1788
1789        reg = w83781d_read_value(data, W83781D_REG_WCHIPID);
1790        switch (reg) {
1791        case 0x30:
1792                data->type = w83782d;
1793                data->name = "w83782d";
1794                break;
1795        default:
1796                data->type = w83781d;
1797                data->name = "w83781d";
1798        }
1799
1800        /* Initialize the W83781D chip */
1801        w83781d_init_device(&pdev->dev);
1802
1803        /* Register sysfs hooks */
1804        err = w83781d_create_files(&pdev->dev, data->type, 1);
1805        if (err)
1806                goto exit_remove_files;
1807
1808        err = device_create_file(&pdev->dev, &dev_attr_name);
1809        if (err)
1810                goto exit_remove_files;
1811
1812        data->hwmon_dev = hwmon_device_register(&pdev->dev);
1813        if (IS_ERR(data->hwmon_dev)) {
1814                err = PTR_ERR(data->hwmon_dev);
1815                goto exit_remove_files;
1816        }
1817
1818        return 0;
1819
1820 exit_remove_files:
1821        w83781d_remove_files(&pdev->dev);
1822        device_remove_file(&pdev->dev, &dev_attr_name);
1823        return err;
1824}
1825
1826static int
1827w83781d_isa_remove(struct platform_device *pdev)
1828{
1829        struct w83781d_data *data = platform_get_drvdata(pdev);
1830
1831        hwmon_device_unregister(data->hwmon_dev);
1832        w83781d_remove_files(&pdev->dev);
1833        device_remove_file(&pdev->dev, &dev_attr_name);
1834
1835        return 0;
1836}
1837
1838static struct platform_driver w83781d_isa_driver = {
1839        .driver = {
1840                .owner = THIS_MODULE,
1841                .name = "w83781d",
1842        },
1843        .probe = w83781d_isa_probe,
1844        .remove = w83781d_isa_remove,
1845};
1846
1847/* return 1 if a supported chip is found, 0 otherwise */
1848static int __init
1849w83781d_isa_found(unsigned short address)
1850{
1851        int val, save, found = 0;
1852        int port;
1853
1854        /*
1855         * Some boards declare base+0 to base+7 as a PNP device, some base+4
1856         * to base+7 and some base+5 to base+6. So we better request each port
1857         * individually for the probing phase.
1858         */
1859        for (port = address; port < address + W83781D_EXTENT; port++) {
1860                if (!request_region(port, 1, "w83781d")) {
1861                        pr_debug("Failed to request port 0x%x\n", port);
1862                        goto release;
1863                }
1864        }
1865
1866#define REALLY_SLOW_IO
1867        /*
1868         * We need the timeouts for at least some W83781D-like
1869         * chips. But only if we read 'undefined' registers.
1870         */
1871        val = inb_p(address + 1);
1872        if (inb_p(address + 2) != val
1873         || inb_p(address + 3) != val
1874         || inb_p(address + 7) != val) {
1875                pr_debug("Detection failed at step %d\n", 1);
1876                goto release;
1877        }
1878#undef REALLY_SLOW_IO
1879
1880        /*
1881         * We should be able to change the 7 LSB of the address port. The
1882         * MSB (busy flag) should be clear initially, set after the write.
1883         */
1884        save = inb_p(address + W83781D_ADDR_REG_OFFSET);
1885        if (save & 0x80) {
1886                pr_debug("Detection failed at step %d\n", 2);
1887                goto release;
1888        }
1889        val = ~save & 0x7f;
1890        outb_p(val, address + W83781D_ADDR_REG_OFFSET);
1891        if (inb_p(address + W83781D_ADDR_REG_OFFSET) != (val | 0x80)) {
1892                outb_p(save, address + W83781D_ADDR_REG_OFFSET);
1893                pr_debug("Detection failed at step %d\n", 3);
1894                goto release;
1895        }
1896
1897        /* We found a device, now see if it could be a W83781D */
1898        outb_p(W83781D_REG_CONFIG, address + W83781D_ADDR_REG_OFFSET);
1899        val = inb_p(address + W83781D_DATA_REG_OFFSET);
1900        if (val & 0x80) {
1901                pr_debug("Detection failed at step %d\n", 4);
1902                goto release;
1903        }
1904        outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
1905        save = inb_p(address + W83781D_DATA_REG_OFFSET);
1906        outb_p(W83781D_REG_CHIPMAN, address + W83781D_ADDR_REG_OFFSET);
1907        val = inb_p(address + W83781D_DATA_REG_OFFSET);
1908        if ((!(save & 0x80) && (val != 0xa3))
1909         || ((save & 0x80) && (val != 0x5c))) {
1910                pr_debug("Detection failed at step %d\n", 5);
1911                goto release;
1912        }
1913        outb_p(W83781D_REG_I2C_ADDR, address + W83781D_ADDR_REG_OFFSET);
1914        val = inb_p(address + W83781D_DATA_REG_OFFSET);
1915        if (val < 0x03 || val > 0x77) { /* Not a valid I2C address */
1916                pr_debug("Detection failed at step %d\n", 6);
1917                goto release;
1918        }
1919
1920        /* The busy flag should be clear again */
1921        if (inb_p(address + W83781D_ADDR_REG_OFFSET) & 0x80) {
1922                pr_debug("Detection failed at step %d\n", 7);
1923                goto release;
1924        }
1925
1926        /* Determine the chip type */
1927        outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
1928        save = inb_p(address + W83781D_DATA_REG_OFFSET);
1929        outb_p(save & 0xf8, address + W83781D_DATA_REG_OFFSET);
1930        outb_p(W83781D_REG_WCHIPID, address + W83781D_ADDR_REG_OFFSET);
1931        val = inb_p(address + W83781D_DATA_REG_OFFSET);
1932        if ((val & 0xfe) == 0x10        /* W83781D */
1933         || val == 0x30)                /* W83782D */
1934                found = 1;
1935
1936        if (found)
1937                pr_info("Found a %s chip at %#x\n",
1938                        val == 0x30 ? "W83782D" : "W83781D", (int)address);
1939
1940 release:
1941        for (port--; port >= address; port--)
1942                release_region(port, 1);
1943        return found;
1944}
1945
1946static int __init
1947w83781d_isa_device_add(unsigned short address)
1948{
1949        struct resource res = {
1950                .start  = address,
1951                .end    = address + W83781D_EXTENT - 1,
1952                .name   = "w83781d",
1953                .flags  = IORESOURCE_IO,
1954        };
1955        int err;
1956
1957        pdev = platform_device_alloc("w83781d", address);
1958        if (!pdev) {
1959                err = -ENOMEM;
1960                pr_err("Device allocation failed\n");
1961                goto exit;
1962        }
1963
1964        err = platform_device_add_resources(pdev, &res, 1);
1965        if (err) {
1966                pr_err("Device resource addition failed (%d)\n", err);
1967                goto exit_device_put;
1968        }
1969
1970        err = platform_device_add(pdev);
1971        if (err) {
1972                pr_err("Device addition failed (%d)\n", err);
1973                goto exit_device_put;
1974        }
1975
1976        return 0;
1977
1978 exit_device_put:
1979        platform_device_put(pdev);
1980 exit:
1981        pdev = NULL;
1982        return err;
1983}
1984
1985static int __init
1986w83781d_isa_register(void)
1987{
1988        int res;
1989
1990        if (w83781d_isa_found(isa_address)) {
1991                res = platform_driver_register(&w83781d_isa_driver);
1992                if (res)
1993                        goto exit;
1994
1995                /* Sets global pdev as a side effect */
1996                res = w83781d_isa_device_add(isa_address);
1997                if (res)
1998                        goto exit_unreg_isa_driver;
1999        }
2000
2001        return 0;
2002
2003exit_unreg_isa_driver:
2004        platform_driver_unregister(&w83781d_isa_driver);
2005exit:
2006        return res;
2007}
2008
2009static void
2010w83781d_isa_unregister(void)
2011{
2012        if (pdev) {
2013                platform_device_unregister(pdev);
2014                platform_driver_unregister(&w83781d_isa_driver);
2015        }
2016}
2017#else /* !CONFIG_ISA */
2018
2019static struct w83781d_data *w83781d_data_if_isa(void)
2020{
2021        return NULL;
2022}
2023
2024static int
2025w83781d_alias_detect(struct i2c_client *client, u8 chipid)
2026{
2027        return 0;
2028}
2029
2030static int
2031w83781d_read_value(struct w83781d_data *data, u16 reg)
2032{
2033        int res;
2034
2035        mutex_lock(&data->lock);
2036        res = w83781d_read_value_i2c(data, reg);
2037        mutex_unlock(&data->lock);
2038
2039        return res;
2040}
2041
2042static int
2043w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
2044{
2045        mutex_lock(&data->lock);
2046        w83781d_write_value_i2c(data, reg, value);
2047        mutex_unlock(&data->lock);
2048
2049        return 0;
2050}
2051
2052static int __init
2053w83781d_isa_register(void)
2054{
2055        return 0;
2056}
2057
2058static void
2059w83781d_isa_unregister(void)
2060{
2061}
2062#endif /* CONFIG_ISA */
2063
2064static int __init
2065sensors_w83781d_init(void)
2066{
2067        int res;
2068
2069        /*
2070         * We register the ISA device first, so that we can skip the
2071         * registration of an I2C interface to the same device.
2072         */
2073        res = w83781d_isa_register();
2074        if (res)
2075                goto exit;
2076
2077        res = i2c_add_driver(&w83781d_driver);
2078        if (res)
2079                goto exit_unreg_isa;
2080
2081        return 0;
2082
2083 exit_unreg_isa:
2084        w83781d_isa_unregister();
2085 exit:
2086        return res;
2087}
2088
2089static void __exit
2090sensors_w83781d_exit(void)
2091{
2092        w83781d_isa_unregister();
2093        i2c_del_driver(&w83781d_driver);
2094}
2095
2096MODULE_AUTHOR("Frodo Looijaard <frodol@dds.nl>, "
2097              "Philip Edelbrock <phil@netroedge.com>, "
2098              "and Mark Studebaker <mdsxyz123@yahoo.com>");
2099MODULE_DESCRIPTION("W83781D driver");
2100MODULE_LICENSE("GPL");
2101
2102module_init(sensors_w83781d_init);
2103module_exit(sensors_w83781d_exit);
2104
lxr.linux.no kindly hosted by Redpill Linpro AS, provider of Linux consulting and operations services since 1995.