SAFE public projects git trees. - safe/jmp/linux-2.6/blob - drivers/hwmon/asb100.c

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