w83781d.c 57.0 KB
Newer Older
L
Linus Torvalds 已提交
1
/*
2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
 * w83781d.c - Part of lm_sensors, Linux kernel modules for hardware
 *	       monitoring
 * Copyright (c) 1998 - 2001  Frodo Looijaard <frodol@dds.nl>,
 *			      Philip Edelbrock <phil@netroedge.com>,
 *			      and Mark Studebaker <mdsxyz123@yahoo.com>
 * Copyright (c) 2007 - 2008  Jean Delvare <khali@linux-fr.org>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */
L
Linus Torvalds 已提交
23 24

/*
25 26 27 28 29 30 31 32 33 34
 * Supports following chips:
 *
 * Chip	#vin	#fanin	#pwm	#temp	wchipid	vendid	i2c	ISA
 * as99127f	7	3	0	3	0x31	0x12c3	yes	no
 * as99127f rev.2 (type_name = as99127f)	0x31	0x5ca3	yes	no
 * w83781d	7	3	0	3	0x10-1	0x5ca3	yes	yes
 * w83782d	9	3	2-4	3	0x30	0x5ca3	yes	yes
 * w83783s	5-6	3	2	1-2	0x40	0x5ca3	yes	no
 *
 */
L
Linus Torvalds 已提交
35

36 37
#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt

L
Linus Torvalds 已提交
38 39 40 41 42
#include <linux/module.h>
#include <linux/init.h>
#include <linux/slab.h>
#include <linux/jiffies.h>
#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 51 52

#ifdef CONFIG_ISA
#include <linux/platform_device.h>
#include <linux/ioport.h>
53
#include <linux/io.h>
54
#endif
L
Linus Torvalds 已提交
55

56
#include "lm75.h"
57

L
Linus Torvalds 已提交
58
/* Addresses to scan */
59 60
static const unsigned short normal_i2c[] = { 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d,
						0x2e, 0x2f, I2C_CLIENT_END };
61

J
Jean Delvare 已提交
62 63 64
enum chips { w83781d, w83782d, w83783s, as99127f };

/* Insmod parameters */
65 66 67
static unsigned short force_subclients[4];
module_param_array(force_subclients, short, NULL, 0);
MODULE_PARM_DESC(force_subclients, "List of subclient addresses: "
L
Linus Torvalds 已提交
68 69
		    "{bus, clientaddr, subclientaddr1, subclientaddr2}");

70
static bool reset;
71 72 73
module_param(reset, bool, 0);
MODULE_PARM_DESC(reset, "Set to one to reset chip on load");

74
static bool init = 1;
L
Linus Torvalds 已提交
75 76 77 78 79 80 81 82 83 84 85 86
module_param(init, bool, 0);
MODULE_PARM_DESC(init, "Set to zero to bypass chip initialization");

/* Constants specified below */

/* Length of ISA address segment */
#define W83781D_EXTENT			8

/* Where are the ISA address/data registers relative to the base address */
#define W83781D_ADDR_REG_OFFSET		5
#define W83781D_DATA_REG_OFFSET		6

87 88
/* The device registers */
/* in nr from 0 to 8 */
L
Linus Torvalds 已提交
89 90 91 92 93 94 95
#define W83781D_REG_IN_MAX(nr)		((nr < 7) ? (0x2b + (nr) * 2) : \
						    (0x554 + (((nr) - 7) * 2)))
#define W83781D_REG_IN_MIN(nr)		((nr < 7) ? (0x2c + (nr) * 2) : \
						    (0x555 + (((nr) - 7) * 2)))
#define W83781D_REG_IN(nr)		((nr < 7) ? (0x20 + (nr)) : \
						    (0x550 + (nr) - 7))

96 97 98
/* fan nr from 0 to 2 */
#define W83781D_REG_FAN_MIN(nr)		(0x3b + (nr))
#define W83781D_REG_FAN(nr)		(0x28 + (nr))
L
Linus Torvalds 已提交
99 100 101 102

#define W83781D_REG_BANK		0x4E
#define W83781D_REG_TEMP2_CONFIG	0x152
#define W83781D_REG_TEMP3_CONFIG	0x252
103
/* temp nr from 1 to 3 */
L
Linus Torvalds 已提交
104 105 106 107 108 109 110 111 112 113 114
#define W83781D_REG_TEMP(nr)		((nr == 3) ? (0x0250) : \
					((nr == 2) ? (0x0150) : \
						     (0x27)))
#define W83781D_REG_TEMP_HYST(nr)	((nr == 3) ? (0x253) : \
					((nr == 2) ? (0x153) : \
						     (0x3A)))
#define W83781D_REG_TEMP_OVER(nr)	((nr == 3) ? (0x255) : \
					((nr == 2) ? (0x155) : \
						     (0x39)))

#define W83781D_REG_CONFIG		0x40
115 116

/* Interrupt status (W83781D, AS99127F) */
L
Linus Torvalds 已提交
117 118 119
#define W83781D_REG_ALARM1		0x41
#define W83781D_REG_ALARM2		0x42

120
/* Real-time status (W83782D, W83783S) */
121 122 123 124
#define W83782D_REG_ALARM1		0x459
#define W83782D_REG_ALARM2		0x45A
#define W83782D_REG_ALARM3		0x45B

L
Linus Torvalds 已提交
125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140
#define W83781D_REG_BEEP_CONFIG		0x4D
#define W83781D_REG_BEEP_INTS1		0x56
#define W83781D_REG_BEEP_INTS2		0x57
#define W83781D_REG_BEEP_INTS3		0x453	/* not on W83781D */

#define W83781D_REG_VID_FANDIV		0x47

#define W83781D_REG_CHIPID		0x49
#define W83781D_REG_WCHIPID		0x58
#define W83781D_REG_CHIPMAN		0x4F
#define W83781D_REG_PIN			0x4B

/* 782D/783S only */
#define W83781D_REG_VBAT		0x5D

/* PWM 782D (1-4) and 783S (1-2) only */
141
static const u8 W83781D_REG_PWM[] = { 0x5B, 0x5A, 0x5E, 0x5F };
L
Linus Torvalds 已提交
142 143 144 145 146 147
#define W83781D_REG_PWMCLK12		0x5C
#define W83781D_REG_PWMCLK34		0x45C

#define W83781D_REG_I2C_ADDR		0x48
#define W83781D_REG_I2C_SUBADDR		0x4A

148 149 150 151
/*
 * The following are undocumented in the data sheets however we
 * received the information in an email from Winbond tech support
 */
L
Linus Torvalds 已提交
152 153 154 155 156 157 158 159 160
/* Sensor selection - not on 781d */
#define W83781D_REG_SCFG1		0x5D
static const u8 BIT_SCFG1[] = { 0x02, 0x04, 0x08 };

#define W83781D_REG_SCFG2		0x59
static const u8 BIT_SCFG2[] = { 0x10, 0x20, 0x40 };

#define W83781D_DEFAULT_BETA		3435

161 162 163
/* Conversions */
#define IN_TO_REG(val)			SENSORS_LIMIT(((val) + 8) / 16, 0, 255)
#define IN_FROM_REG(val)		((val) * 16)
L
Linus Torvalds 已提交
164 165 166 167 168 169 170 171 172 173

static inline u8
FAN_TO_REG(long rpm, int div)
{
	if (rpm == 0)
		return 255;
	rpm = SENSORS_LIMIT(rpm, 1, 1000000);
	return SENSORS_LIMIT((1350000 + rpm * div / 2) / (rpm * div), 1, 254);
}

174 175 176 177 178 179 180 181 182
static inline long
FAN_FROM_REG(u8 val, int div)
{
	if (val == 0)
		return -1;
	if (val == 255)
		return 0;
	return 1350000 / (val * div);
}
L
Linus Torvalds 已提交
183

184 185
#define TEMP_TO_REG(val)		SENSORS_LIMIT((val) / 1000, -127, 128)
#define TEMP_FROM_REG(val)		((val) * 1000)
L
Linus Torvalds 已提交
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)
L
Linus Torvalds 已提交
191 192 193 194 195 196 197 198 199 200

#define DIV_FROM_REG(val)		(1 << (val))

static inline u8
DIV_TO_REG(long val, enum chips type)
{
	int i;
	val = SENSORS_LIMIT(val, 1,
			    ((type == w83781d
			      || type == as99127f) ? 8 : 128)) >> 1;
201
	for (i = 0; i < 7; i++) {
L
Linus Torvalds 已提交
202 203 204 205
		if (val == 0)
			break;
		val >>= 1;
	}
206
	return i;
L
Linus Torvalds 已提交
207 208 209
}

struct w83781d_data {
210
	struct i2c_client *client;
211
	struct device *hwmon_dev;
212
	struct mutex lock;
L
Linus Torvalds 已提交
213 214
	enum chips type;

215 216 217 218
	/* For ISA device only */
	const char *name;
	int isa_addr;

219
	struct mutex update_lock;
L
Linus Torvalds 已提交
220 221 222 223 224 225 226 227 228 229 230
	char valid;		/* !=0 if following fields are valid */
	unsigned long last_updated;	/* In jiffies */

	struct i2c_client *lm75[2];	/* for secondary I2C addresses */
	/* array of 2 pointers to subclients */

	u8 in[9];		/* Register value - 8 & 9 for 782D only */
	u8 in_max[9];		/* Register value - 8 & 9 for 782D only */
	u8 in_min[9];		/* Register value - 8 & 9 for 782D only */
	u8 fan[3];		/* Register value */
	u8 fan_min[3];		/* Register value */
231 232 233
	s8 temp;		/* Register value */
	s8 temp_max;		/* Register value */
	s8 temp_max_hyst;	/* Register value */
L
Linus Torvalds 已提交
234 235 236 237 238 239 240 241
	u16 temp_add[2];	/* Register value */
	u16 temp_max_add[2];	/* Register value */
	u16 temp_max_hyst_add[2];	/* Register value */
	u8 fan_div[3];		/* Register encoding, shifted right */
	u8 vid;			/* Register encoding, combined */
	u32 alarms;		/* Register encoding, combined */
	u32 beep_mask;		/* Register encoding, combined */
	u8 pwm[4];		/* Register value */
242
	u8 pwm2_enable;		/* Boolean */
243 244 245 246 247
	u16 sens[3];		/*
				 * 782D/783S only.
				 * 1 = pentium diode; 2 = 3904 diode;
				 * 4 = thermistor
				 */
L
Linus Torvalds 已提交
248 249 250
	u8 vrm;
};

251 252 253
static struct w83781d_data *w83781d_data_if_isa(void);
static int w83781d_alias_detect(struct i2c_client *client, u8 chipid);

254 255
static int w83781d_read_value(struct w83781d_data *data, u16 reg);
static int w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value);
L
Linus Torvalds 已提交
256
static struct w83781d_data *w83781d_update_device(struct device *dev);
257
static void w83781d_init_device(struct device *dev);
L
Linus Torvalds 已提交
258 259 260

/* following are the sysfs callback functions */
#define show_in_reg(reg) \
261
static ssize_t show_##reg(struct device *dev, struct device_attribute *da, \
262
		char *buf) \
L
Linus Torvalds 已提交
263
{ \
264
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
L
Linus Torvalds 已提交
265
	struct w83781d_data *data = w83781d_update_device(dev); \
266 267
	return sprintf(buf, "%ld\n", \
		       (long)IN_FROM_REG(data->reg[attr->index])); \
L
Linus Torvalds 已提交
268 269 270 271 272 273
}
show_in_reg(in);
show_in_reg(in_min);
show_in_reg(in_max);

#define store_in_reg(REG, reg) \
274
static ssize_t store_in_##reg(struct device *dev, struct device_attribute \
275
		*da, const char *buf, size_t count) \
L
Linus Torvalds 已提交
276
{ \
277
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
278
	struct w83781d_data *data = dev_get_drvdata(dev); \
279
	int nr = attr->index; \
280 281 282 283
	unsigned long val; \
	int err = kstrtoul(buf, 10, &val); \
	if (err) \
		return err; \
284
	mutex_lock(&data->update_lock); \
L
Linus Torvalds 已提交
285
	data->in_##reg[nr] = IN_TO_REG(val); \
286 287 288
	w83781d_write_value(data, W83781D_REG_IN_##REG(nr), \
			    data->in_##reg[nr]); \
	\
289
	mutex_unlock(&data->update_lock); \
L
Linus Torvalds 已提交
290 291 292 293 294 295
	return count; \
}
store_in_reg(MIN, min);
store_in_reg(MAX, max);

#define sysfs_in_offsets(offset) \
296 297 298 299 300 301
static SENSOR_DEVICE_ATTR(in##offset##_input, S_IRUGO, \
		show_in, NULL, offset); \
static SENSOR_DEVICE_ATTR(in##offset##_min, S_IRUGO | S_IWUSR, \
		show_in_min, store_in_min, offset); \
static SENSOR_DEVICE_ATTR(in##offset##_max, S_IRUGO | S_IWUSR, \
		show_in_max, store_in_max, offset)
L
Linus Torvalds 已提交
302 303 304 305 306 307 308 309 310 311 312 313

sysfs_in_offsets(0);
sysfs_in_offsets(1);
sysfs_in_offsets(2);
sysfs_in_offsets(3);
sysfs_in_offsets(4);
sysfs_in_offsets(5);
sysfs_in_offsets(6);
sysfs_in_offsets(7);
sysfs_in_offsets(8);

#define show_fan_reg(reg) \
314
static ssize_t show_##reg(struct device *dev, struct device_attribute *da, \
315
		char *buf) \
L
Linus Torvalds 已提交
316
{ \
317
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
L
Linus Torvalds 已提交
318
	struct w83781d_data *data = w83781d_update_device(dev); \
319
	return sprintf(buf, "%ld\n", \
320 321
		FAN_FROM_REG(data->reg[attr->index], \
			DIV_FROM_REG(data->fan_div[attr->index]))); \
L
Linus Torvalds 已提交
322 323 324 325 326
}
show_fan_reg(fan);
show_fan_reg(fan_min);

static ssize_t
327 328
store_fan_min(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
329
{
330
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
331
	struct w83781d_data *data = dev_get_drvdata(dev);
332
	int nr = attr->index;
333 334
	unsigned long val;
	int err;
L
Linus Torvalds 已提交
335

336 337 338
	err = kstrtoul(buf, 10, &val);
	if (err)
		return err;
L
Linus Torvalds 已提交
339

340
	mutex_lock(&data->update_lock);
341 342
	data->fan_min[nr] =
	    FAN_TO_REG(val, DIV_FROM_REG(data->fan_div[nr]));
343
	w83781d_write_value(data, W83781D_REG_FAN_MIN(nr),
344
			    data->fan_min[nr]);
L
Linus Torvalds 已提交
345

346
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
347 348 349
	return count;
}

350 351 352 353 354 355 356 357 358
static SENSOR_DEVICE_ATTR(fan1_input, S_IRUGO, show_fan, NULL, 0);
static SENSOR_DEVICE_ATTR(fan1_min, S_IRUGO | S_IWUSR,
		show_fan_min, store_fan_min, 0);
static SENSOR_DEVICE_ATTR(fan2_input, S_IRUGO, show_fan, NULL, 1);
static SENSOR_DEVICE_ATTR(fan2_min, S_IRUGO | S_IWUSR,
		show_fan_min, store_fan_min, 1);
static SENSOR_DEVICE_ATTR(fan3_input, S_IRUGO, show_fan, NULL, 2);
static SENSOR_DEVICE_ATTR(fan3_min, S_IRUGO | S_IWUSR,
		show_fan_min, store_fan_min, 2);
L
Linus Torvalds 已提交
359 360

#define show_temp_reg(reg) \
361
static ssize_t show_##reg(struct device *dev, struct device_attribute *da, \
362
		char *buf) \
L
Linus Torvalds 已提交
363
{ \
364
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
L
Linus Torvalds 已提交
365
	struct w83781d_data *data = w83781d_update_device(dev); \
366
	int nr = attr->index; \
L
Linus Torvalds 已提交
367
	if (nr >= 2) {	/* TEMP2 and TEMP3 */ \
368
		return sprintf(buf, "%d\n", \
L
Linus Torvalds 已提交
369 370
			LM75_TEMP_FROM_REG(data->reg##_add[nr-2])); \
	} else {	/* TEMP1 */ \
371
		return sprintf(buf, "%ld\n", (long)TEMP_FROM_REG(data->reg)); \
L
Linus Torvalds 已提交
372 373 374 375 376 377 378
	} \
}
show_temp_reg(temp);
show_temp_reg(temp_max);
show_temp_reg(temp_max_hyst);

#define store_temp_reg(REG, reg) \
379
static ssize_t store_temp_##reg(struct device *dev, \
380
		struct device_attribute *da, const char *buf, size_t count) \
L
Linus Torvalds 已提交
381
{ \
382
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
383
	struct w83781d_data *data = dev_get_drvdata(dev); \
384
	int nr = attr->index; \
385
	long val; \
386 387 388
	int err = kstrtol(buf, 10, &val); \
	if (err) \
		return err; \
389
	mutex_lock(&data->update_lock); \
L
Linus Torvalds 已提交
390 391 392
	 \
	if (nr >= 2) {	/* TEMP2 and TEMP3 */ \
		data->temp_##reg##_add[nr-2] = LM75_TEMP_TO_REG(val); \
393
		w83781d_write_value(data, W83781D_REG_TEMP_##REG(nr), \
L
Linus Torvalds 已提交
394 395 396
				data->temp_##reg##_add[nr-2]); \
	} else {	/* TEMP1 */ \
		data->temp_##reg = TEMP_TO_REG(val); \
397
		w83781d_write_value(data, W83781D_REG_TEMP_##REG(nr), \
L
Linus Torvalds 已提交
398 399 400
			data->temp_##reg); \
	} \
	 \
401
	mutex_unlock(&data->update_lock); \
L
Linus Torvalds 已提交
402 403 404 405 406 407
	return count; \
}
store_temp_reg(OVER, max);
store_temp_reg(HYST, max_hyst);

#define sysfs_temp_offsets(offset) \
408 409 410 411 412 413
static SENSOR_DEVICE_ATTR(temp##offset##_input, S_IRUGO, \
		show_temp, NULL, offset); \
static SENSOR_DEVICE_ATTR(temp##offset##_max, S_IRUGO | S_IWUSR, \
		show_temp_max, store_temp_max, offset); \
static SENSOR_DEVICE_ATTR(temp##offset##_max_hyst, S_IRUGO | S_IWUSR, \
		show_temp_max_hyst, store_temp_max_hyst, offset);
L
Linus Torvalds 已提交
414 415 416 417 418 419

sysfs_temp_offsets(1);
sysfs_temp_offsets(2);
sysfs_temp_offsets(3);

static ssize_t
420
show_vid_reg(struct device *dev, struct device_attribute *attr, char *buf)
L
Linus Torvalds 已提交
421 422 423 424 425
{
	struct w83781d_data *data = w83781d_update_device(dev);
	return sprintf(buf, "%ld\n", (long) vid_from_reg(data->vid, data->vrm));
}

426 427
static DEVICE_ATTR(cpu0_vid, S_IRUGO, show_vid_reg, NULL);

L
Linus Torvalds 已提交
428
static ssize_t
429
show_vrm_reg(struct device *dev, struct device_attribute *attr, char *buf)
L
Linus Torvalds 已提交
430
{
431
	struct w83781d_data *data = dev_get_drvdata(dev);
L
Linus Torvalds 已提交
432 433 434 435
	return sprintf(buf, "%ld\n", (long) data->vrm);
}

static ssize_t
436 437
store_vrm_reg(struct device *dev, struct device_attribute *attr,
	      const char *buf, size_t count)
L
Linus Torvalds 已提交
438
{
439
	struct w83781d_data *data = dev_get_drvdata(dev);
440 441
	unsigned long val;
	int err;
L
Linus Torvalds 已提交
442

443 444 445 446
	err = kstrtoul(buf, 10, &val);
	if (err)
		return err;
	data->vrm = SENSORS_LIMIT(val, 0, 255);
L
Linus Torvalds 已提交
447 448 449 450

	return count;
}

451 452
static DEVICE_ATTR(vrm, S_IRUGO | S_IWUSR, show_vrm_reg, store_vrm_reg);

L
Linus Torvalds 已提交
453
static ssize_t
454
show_alarms_reg(struct device *dev, struct device_attribute *attr, char *buf)
L
Linus Torvalds 已提交
455 456
{
	struct w83781d_data *data = w83781d_update_device(dev);
457
	return sprintf(buf, "%u\n", data->alarms);
L
Linus Torvalds 已提交
458 459
}

460 461
static DEVICE_ATTR(alarms, S_IRUGO, show_alarms_reg, NULL);

462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494
static ssize_t show_alarm(struct device *dev, struct device_attribute *attr,
		char *buf)
{
	struct w83781d_data *data = w83781d_update_device(dev);
	int bitnr = to_sensor_dev_attr(attr)->index;
	return sprintf(buf, "%u\n", (data->alarms >> bitnr) & 1);
}

/* The W83781D has a single alarm bit for temp2 and temp3 */
static ssize_t show_temp3_alarm(struct device *dev,
		struct device_attribute *attr, char *buf)
{
	struct w83781d_data *data = w83781d_update_device(dev);
	int bitnr = (data->type == w83781d) ? 5 : 13;
	return sprintf(buf, "%u\n", (data->alarms >> bitnr) & 1);
}

static SENSOR_DEVICE_ATTR(in0_alarm, S_IRUGO, show_alarm, NULL, 0);
static SENSOR_DEVICE_ATTR(in1_alarm, S_IRUGO, show_alarm, NULL, 1);
static SENSOR_DEVICE_ATTR(in2_alarm, S_IRUGO, show_alarm, NULL, 2);
static SENSOR_DEVICE_ATTR(in3_alarm, S_IRUGO, show_alarm, NULL, 3);
static SENSOR_DEVICE_ATTR(in4_alarm, S_IRUGO, show_alarm, NULL, 8);
static SENSOR_DEVICE_ATTR(in5_alarm, S_IRUGO, show_alarm, NULL, 9);
static SENSOR_DEVICE_ATTR(in6_alarm, S_IRUGO, show_alarm, NULL, 10);
static SENSOR_DEVICE_ATTR(in7_alarm, S_IRUGO, show_alarm, NULL, 16);
static SENSOR_DEVICE_ATTR(in8_alarm, S_IRUGO, show_alarm, NULL, 17);
static SENSOR_DEVICE_ATTR(fan1_alarm, S_IRUGO, show_alarm, NULL, 6);
static SENSOR_DEVICE_ATTR(fan2_alarm, S_IRUGO, show_alarm, NULL, 7);
static SENSOR_DEVICE_ATTR(fan3_alarm, S_IRUGO, show_alarm, NULL, 11);
static SENSOR_DEVICE_ATTR(temp1_alarm, S_IRUGO, show_alarm, NULL, 4);
static SENSOR_DEVICE_ATTR(temp2_alarm, S_IRUGO, show_alarm, NULL, 5);
static SENSOR_DEVICE_ATTR(temp3_alarm, S_IRUGO, show_temp3_alarm, NULL, 0);

495 496
static ssize_t show_beep_mask(struct device *dev,
			       struct device_attribute *attr, char *buf)
L
Linus Torvalds 已提交
497 498 499 500 501 502 503
{
	struct w83781d_data *data = w83781d_update_device(dev);
	return sprintf(buf, "%ld\n",
		       (long)BEEP_MASK_FROM_REG(data->beep_mask, data->type));
}

static ssize_t
504 505
store_beep_mask(struct device *dev, struct device_attribute *attr,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
506
{
507
	struct w83781d_data *data = dev_get_drvdata(dev);
508 509
	unsigned long val;
	int err;
L
Linus Torvalds 已提交
510

511 512 513
	err = kstrtoul(buf, 10, &val);
	if (err)
		return err;
L
Linus Torvalds 已提交
514

515
	mutex_lock(&data->update_lock);
516 517
	data->beep_mask &= 0x8000; /* preserve beep enable */
	data->beep_mask |= BEEP_MASK_TO_REG(val, data->type);
518 519 520
	w83781d_write_value(data, W83781D_REG_BEEP_INTS1,
			    data->beep_mask & 0xff);
	w83781d_write_value(data, W83781D_REG_BEEP_INTS2,
521
			    (data->beep_mask >> 8) & 0xff);
522 523 524 525 526
	if (data->type != w83781d && data->type != as99127f) {
		w83781d_write_value(data, W83781D_REG_BEEP_INTS3,
				    ((data->beep_mask) >> 16) & 0xff);
	}
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
527

528 529
	return count;
}
L
Linus Torvalds 已提交
530

531 532
static DEVICE_ATTR(beep_mask, S_IRUGO | S_IWUSR,
		show_beep_mask, store_beep_mask);
L
Linus Torvalds 已提交
533

534 535 536 537 538 539 540 541 542 543 544 545 546 547 548
static ssize_t show_beep(struct device *dev, struct device_attribute *attr,
		char *buf)
{
	struct w83781d_data *data = w83781d_update_device(dev);
	int bitnr = to_sensor_dev_attr(attr)->index;
	return sprintf(buf, "%u\n", (data->beep_mask >> bitnr) & 1);
}

static ssize_t
store_beep(struct device *dev, struct device_attribute *attr,
		const char *buf, size_t count)
{
	struct w83781d_data *data = dev_get_drvdata(dev);
	int bitnr = to_sensor_dev_attr(attr)->index;
	u8 reg;
549 550 551 552 553 554
	unsigned long bit;
	int err;

	err = kstrtoul(buf, 10, &bit);
	if (err)
		return err;
555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630

	if (bit & ~1)
		return -EINVAL;

	mutex_lock(&data->update_lock);
	if (bit)
		data->beep_mask |= (1 << bitnr);
	else
		data->beep_mask &= ~(1 << bitnr);

	if (bitnr < 8) {
		reg = w83781d_read_value(data, W83781D_REG_BEEP_INTS1);
		if (bit)
			reg |= (1 << bitnr);
		else
			reg &= ~(1 << bitnr);
		w83781d_write_value(data, W83781D_REG_BEEP_INTS1, reg);
	} else if (bitnr < 16) {
		reg = w83781d_read_value(data, W83781D_REG_BEEP_INTS2);
		if (bit)
			reg |= (1 << (bitnr - 8));
		else
			reg &= ~(1 << (bitnr - 8));
		w83781d_write_value(data, W83781D_REG_BEEP_INTS2, reg);
	} else {
		reg = w83781d_read_value(data, W83781D_REG_BEEP_INTS3);
		if (bit)
			reg |= (1 << (bitnr - 16));
		else
			reg &= ~(1 << (bitnr - 16));
		w83781d_write_value(data, W83781D_REG_BEEP_INTS3, reg);
	}
	mutex_unlock(&data->update_lock);

	return count;
}

/* The W83781D has a single beep bit for temp2 and temp3 */
static ssize_t show_temp3_beep(struct device *dev,
		struct device_attribute *attr, char *buf)
{
	struct w83781d_data *data = w83781d_update_device(dev);
	int bitnr = (data->type == w83781d) ? 5 : 13;
	return sprintf(buf, "%u\n", (data->beep_mask >> bitnr) & 1);
}

static SENSOR_DEVICE_ATTR(in0_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 0);
static SENSOR_DEVICE_ATTR(in1_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 1);
static SENSOR_DEVICE_ATTR(in2_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 2);
static SENSOR_DEVICE_ATTR(in3_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 3);
static SENSOR_DEVICE_ATTR(in4_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 8);
static SENSOR_DEVICE_ATTR(in5_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 9);
static SENSOR_DEVICE_ATTR(in6_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 10);
static SENSOR_DEVICE_ATTR(in7_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 16);
static SENSOR_DEVICE_ATTR(in8_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 17);
static SENSOR_DEVICE_ATTR(fan1_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 6);
static SENSOR_DEVICE_ATTR(fan2_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 7);
static SENSOR_DEVICE_ATTR(fan3_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 11);
static SENSOR_DEVICE_ATTR(temp1_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 4);
static SENSOR_DEVICE_ATTR(temp2_beep, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 5);
static SENSOR_DEVICE_ATTR(temp3_beep, S_IRUGO,
			show_temp3_beep, store_beep, 13);
631 632
static SENSOR_DEVICE_ATTR(beep_enable, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 15);
633

L
Linus Torvalds 已提交
634
static ssize_t
635
show_fan_div(struct device *dev, struct device_attribute *da, char *buf)
L
Linus Torvalds 已提交
636
{
637
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
L
Linus Torvalds 已提交
638 639
	struct w83781d_data *data = w83781d_update_device(dev);
	return sprintf(buf, "%ld\n",
640
		       (long) DIV_FROM_REG(data->fan_div[attr->index]));
L
Linus Torvalds 已提交
641 642
}

643 644 645 646 647 648
/*
 * Note: we save and restore the fan minimum here, because its value is
 * determined in part by the fan divisor.  This follows the principle of
 * least surprise; the user doesn't expect the fan minimum to change just
 * because the divisor changed.
 */
L
Linus Torvalds 已提交
649
static ssize_t
650 651
store_fan_div(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
652
{
653
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
654
	struct w83781d_data *data = dev_get_drvdata(dev);
L
Linus Torvalds 已提交
655
	unsigned long min;
656
	int nr = attr->index;
L
Linus Torvalds 已提交
657
	u8 reg;
658 659 660 661 662 663
	unsigned long val;
	int err;

	err = kstrtoul(buf, 10, &val);
	if (err)
		return err;
L
Linus Torvalds 已提交
664

665
	mutex_lock(&data->update_lock);
J
Jean Delvare 已提交
666

L
Linus Torvalds 已提交
667 668 669 670 671 672
	/* Save fan_min */
	min = FAN_FROM_REG(data->fan_min[nr],
			   DIV_FROM_REG(data->fan_div[nr]));

	data->fan_div[nr] = DIV_TO_REG(val, data->type);

673 674 675 676 677 678
	reg = (w83781d_read_value(data, nr == 2 ?
				  W83781D_REG_PIN : W83781D_REG_VID_FANDIV)
		& (nr == 0 ? 0xcf : 0x3f))
	      | ((data->fan_div[nr] & 0x03) << (nr == 0 ? 4 : 6));
	w83781d_write_value(data, nr == 2 ?
			    W83781D_REG_PIN : W83781D_REG_VID_FANDIV, reg);
L
Linus Torvalds 已提交
679 680 681

	/* w83781d and as99127f don't have extended divisor bits */
	if (data->type != w83781d && data->type != as99127f) {
682
		reg = (w83781d_read_value(data, W83781D_REG_VBAT)
L
Linus Torvalds 已提交
683 684
		       & ~(1 << (5 + nr)))
		    | ((data->fan_div[nr] & 0x04) << (3 + nr));
685
		w83781d_write_value(data, W83781D_REG_VBAT, reg);
L
Linus Torvalds 已提交
686 687 688 689
	}

	/* Restore fan_min */
	data->fan_min[nr] = FAN_TO_REG(min, DIV_FROM_REG(data->fan_div[nr]));
690
	w83781d_write_value(data, W83781D_REG_FAN_MIN(nr), data->fan_min[nr]);
L
Linus Torvalds 已提交
691

692
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
693 694 695
	return count;
}

696 697 698 699 700 701
static SENSOR_DEVICE_ATTR(fan1_div, S_IRUGO | S_IWUSR,
		show_fan_div, store_fan_div, 0);
static SENSOR_DEVICE_ATTR(fan2_div, S_IRUGO | S_IWUSR,
		show_fan_div, store_fan_div, 1);
static SENSOR_DEVICE_ATTR(fan3_div, S_IRUGO | S_IWUSR,
		show_fan_div, store_fan_div, 2);
L
Linus Torvalds 已提交
702 703

static ssize_t
704
show_pwm(struct device *dev, struct device_attribute *da, char *buf)
L
Linus Torvalds 已提交
705
{
706
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
L
Linus Torvalds 已提交
707
	struct w83781d_data *data = w83781d_update_device(dev);
708
	return sprintf(buf, "%d\n", (int)data->pwm[attr->index]);
L
Linus Torvalds 已提交
709 710 711
}

static ssize_t
712
show_pwm2_enable(struct device *dev, struct device_attribute *da, char *buf)
L
Linus Torvalds 已提交
713 714
{
	struct w83781d_data *data = w83781d_update_device(dev);
715
	return sprintf(buf, "%d\n", (int)data->pwm2_enable);
L
Linus Torvalds 已提交
716 717 718
}

static ssize_t
719 720
store_pwm(struct device *dev, struct device_attribute *da, const char *buf,
		size_t count)
L
Linus Torvalds 已提交
721
{
722
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
723
	struct w83781d_data *data = dev_get_drvdata(dev);
724
	int nr = attr->index;
725 726
	unsigned long val;
	int err;
L
Linus Torvalds 已提交
727

728 729 730
	err = kstrtoul(buf, 10, &val);
	if (err)
		return err;
L
Linus Torvalds 已提交
731

732
	mutex_lock(&data->update_lock);
733 734
	data->pwm[nr] = SENSORS_LIMIT(val, 0, 255);
	w83781d_write_value(data, W83781D_REG_PWM[nr], data->pwm[nr]);
735
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
736 737 738 739
	return count;
}

static ssize_t
740 741
store_pwm2_enable(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
742
{
743
	struct w83781d_data *data = dev_get_drvdata(dev);
744 745 746
	unsigned long val;
	u32 reg;
	int err;
L
Linus Torvalds 已提交
747

748 749 750
	err = kstrtoul(buf, 10, &val);
	if (err)
		return err;
L
Linus Torvalds 已提交
751

752
	mutex_lock(&data->update_lock);
L
Linus Torvalds 已提交
753 754 755 756

	switch (val) {
	case 0:
	case 1:
757 758
		reg = w83781d_read_value(data, W83781D_REG_PWMCLK12);
		w83781d_write_value(data, W83781D_REG_PWMCLK12,
L
Linus Torvalds 已提交
759 760
				    (reg & 0xf7) | (val << 3));

761 762
		reg = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
		w83781d_write_value(data, W83781D_REG_BEEP_CONFIG,
L
Linus Torvalds 已提交
763 764
				    (reg & 0xef) | (!val << 4));

765
		data->pwm2_enable = val;
L
Linus Torvalds 已提交
766 767 768
		break;

	default:
769
		mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
770 771 772
		return -EINVAL;
	}

773
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
774 775 776
	return count;
}

777 778 779 780 781 782 783
static SENSOR_DEVICE_ATTR(pwm1, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 0);
static SENSOR_DEVICE_ATTR(pwm2, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 1);
static SENSOR_DEVICE_ATTR(pwm3, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 2);
static SENSOR_DEVICE_ATTR(pwm4, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 3);
/* only PWM2 can be enabled/disabled */
static DEVICE_ATTR(pwm2_enable, S_IRUGO | S_IWUSR,
		show_pwm2_enable, store_pwm2_enable);
L
Linus Torvalds 已提交
784 785

static ssize_t
786
show_sensor(struct device *dev, struct device_attribute *da, char *buf)
L
Linus Torvalds 已提交
787
{
788
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
L
Linus Torvalds 已提交
789
	struct w83781d_data *data = w83781d_update_device(dev);
790
	return sprintf(buf, "%d\n", (int)data->sens[attr->index]);
L
Linus Torvalds 已提交
791 792 793
}

static ssize_t
794 795
store_sensor(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
796
{
797
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
798
	struct w83781d_data *data = dev_get_drvdata(dev);
799
	int nr = attr->index;
800 801 802
	unsigned long val;
	u32 tmp;
	int err;
L
Linus Torvalds 已提交
803

804 805 806
	err = kstrtoul(buf, 10, &val);
	if (err)
		return err;
L
Linus Torvalds 已提交
807

808
	mutex_lock(&data->update_lock);
L
Linus Torvalds 已提交
809 810 811

	switch (val) {
	case 1:		/* PII/Celeron diode */
812 813
		tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
		w83781d_write_value(data, W83781D_REG_SCFG1,
814
				    tmp | BIT_SCFG1[nr]);
815 816
		tmp = w83781d_read_value(data, W83781D_REG_SCFG2);
		w83781d_write_value(data, W83781D_REG_SCFG2,
817 818
				    tmp | BIT_SCFG2[nr]);
		data->sens[nr] = val;
L
Linus Torvalds 已提交
819 820
		break;
	case 2:		/* 3904 */
821 822
		tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
		w83781d_write_value(data, W83781D_REG_SCFG1,
823
				    tmp | BIT_SCFG1[nr]);
824 825
		tmp = w83781d_read_value(data, W83781D_REG_SCFG2);
		w83781d_write_value(data, W83781D_REG_SCFG2,
826 827
				    tmp & ~BIT_SCFG2[nr]);
		data->sens[nr] = val;
L
Linus Torvalds 已提交
828
		break;
J
Jean Delvare 已提交
829 830 831 832 833
	case W83781D_DEFAULT_BETA:
		dev_warn(dev, "Sensor type %d is deprecated, please use 4 "
			 "instead\n", W83781D_DEFAULT_BETA);
		/* fall through */
	case 4:		/* thermistor */
834 835
		tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
		w83781d_write_value(data, W83781D_REG_SCFG1,
836 837
				    tmp & ~BIT_SCFG1[nr]);
		data->sens[nr] = val;
L
Linus Torvalds 已提交
838 839
		break;
	default:
J
Jean Delvare 已提交
840 841
		dev_err(dev, "Invalid sensor type %ld; must be 1, 2, or 4\n",
		       (long) val);
L
Linus Torvalds 已提交
842 843 844
		break;
	}

845
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
846 847 848
	return count;
}

849 850 851
static SENSOR_DEVICE_ATTR(temp1_type, S_IRUGO | S_IWUSR,
	show_sensor, store_sensor, 0);
static SENSOR_DEVICE_ATTR(temp2_type, S_IRUGO | S_IWUSR,
852
	show_sensor, store_sensor, 1);
853
static SENSOR_DEVICE_ATTR(temp3_type, S_IRUGO | S_IWUSR,
854
	show_sensor, store_sensor, 2);
L
Linus Torvalds 已提交
855

856 857
/*
 * Assumes that adapter is of I2C, not ISA variety.
L
Linus Torvalds 已提交
858 859 860
 * OTHERWISE DON'T CALL THIS
 */
static int
861
w83781d_detect_subclients(struct i2c_client *new_client)
L
Linus Torvalds 已提交
862 863 864
{
	int i, val1 = 0, id;
	int err;
865 866 867
	int address = new_client->addr;
	unsigned short sc_addr[2];
	struct i2c_adapter *adapter = new_client->adapter;
L
Linus Torvalds 已提交
868
	struct w83781d_data *data = i2c_get_clientdata(new_client);
869
	enum chips kind = data->type;
L
Linus Torvalds 已提交
870 871 872 873 874 875 876 877 878 879 880 881 882 883

	id = i2c_adapter_id(adapter);

	if (force_subclients[0] == id && force_subclients[1] == address) {
		for (i = 2; i <= 3; i++) {
			if (force_subclients[i] < 0x48 ||
			    force_subclients[i] > 0x4f) {
				dev_err(&new_client->dev, "Invalid subclient "
					"address %d; must be 0x48-0x4f\n",
					force_subclients[i]);
				err = -EINVAL;
				goto ERROR_SC_1;
			}
		}
884
		w83781d_write_value(data, W83781D_REG_I2C_SUBADDR,
L
Linus Torvalds 已提交
885 886
				(force_subclients[2] & 0x07) |
				((force_subclients[3] & 0x07) << 4));
887
		sc_addr[0] = force_subclients[2];
L
Linus Torvalds 已提交
888
	} else {
889
		val1 = w83781d_read_value(data, W83781D_REG_I2C_SUBADDR);
890
		sc_addr[0] = 0x48 + (val1 & 0x07);
L
Linus Torvalds 已提交
891 892 893 894 895
	}

	if (kind != w83783s) {
		if (force_subclients[0] == id &&
		    force_subclients[1] == address) {
896
			sc_addr[1] = force_subclients[3];
L
Linus Torvalds 已提交
897
		} else {
898
			sc_addr[1] = 0x48 + ((val1 >> 4) & 0x07);
L
Linus Torvalds 已提交
899
		}
900
		if (sc_addr[0] == sc_addr[1]) {
L
Linus Torvalds 已提交
901 902
			dev_err(&new_client->dev,
			       "Duplicate addresses 0x%x for subclients.\n",
903
			       sc_addr[0]);
L
Linus Torvalds 已提交
904 905 906 907 908 909
			err = -EBUSY;
			goto ERROR_SC_2;
		}
	}

	for (i = 0; i <= 1; i++) {
910 911
		data->lm75[i] = i2c_new_dummy(adapter, sc_addr[i]);
		if (!data->lm75[i]) {
L
Linus Torvalds 已提交
912 913
			dev_err(&new_client->dev, "Subclient %d "
				"registration at address 0x%x "
914 915
				"failed.\n", i, sc_addr[i]);
			err = -ENOMEM;
L
Linus Torvalds 已提交
916 917 918 919 920 921 922 923 924 925 926 927
			if (i == 1)
				goto ERROR_SC_3;
			goto ERROR_SC_2;
		}
		if (kind == w83783s)
			break;
	}

	return 0;

/* Undo inits in case of errors */
ERROR_SC_3:
928
	i2c_unregister_device(data->lm75[0]);
L
Linus Torvalds 已提交
929 930 931 932 933
ERROR_SC_2:
ERROR_SC_1:
	return err;
}

934 935 936
#define IN_UNIT_ATTRS(X)					\
	&sensor_dev_attr_in##X##_input.dev_attr.attr,		\
	&sensor_dev_attr_in##X##_min.dev_attr.attr,		\
J
Jean Delvare 已提交
937
	&sensor_dev_attr_in##X##_max.dev_attr.attr,		\
938 939
	&sensor_dev_attr_in##X##_alarm.dev_attr.attr,		\
	&sensor_dev_attr_in##X##_beep.dev_attr.attr
940

941 942 943
#define FAN_UNIT_ATTRS(X)					\
	&sensor_dev_attr_fan##X##_input.dev_attr.attr,		\
	&sensor_dev_attr_fan##X##_min.dev_attr.attr,		\
944 945 946
	&sensor_dev_attr_fan##X##_div.dev_attr.attr,		\
	&sensor_dev_attr_fan##X##_alarm.dev_attr.attr,		\
	&sensor_dev_attr_fan##X##_beep.dev_attr.attr
947

948 949 950
#define TEMP_UNIT_ATTRS(X)					\
	&sensor_dev_attr_temp##X##_input.dev_attr.attr,		\
	&sensor_dev_attr_temp##X##_max.dev_attr.attr,		\
951 952 953
	&sensor_dev_attr_temp##X##_max_hyst.dev_attr.attr,	\
	&sensor_dev_attr_temp##X##_alarm.dev_attr.attr,		\
	&sensor_dev_attr_temp##X##_beep.dev_attr.attr
954

955
static struct attribute *w83781d_attributes[] = {
956 957 958 959 960 961 962 963 964 965 966 967 968 969 970
	IN_UNIT_ATTRS(0),
	IN_UNIT_ATTRS(2),
	IN_UNIT_ATTRS(3),
	IN_UNIT_ATTRS(4),
	IN_UNIT_ATTRS(5),
	IN_UNIT_ATTRS(6),
	FAN_UNIT_ATTRS(1),
	FAN_UNIT_ATTRS(2),
	FAN_UNIT_ATTRS(3),
	TEMP_UNIT_ATTRS(1),
	TEMP_UNIT_ATTRS(2),
	&dev_attr_cpu0_vid.attr,
	&dev_attr_vrm.attr,
	&dev_attr_alarms.attr,
	&dev_attr_beep_mask.attr,
971
	&sensor_dev_attr_beep_enable.dev_attr.attr,
972 973 974 975 976 977
	NULL
};
static const struct attribute_group w83781d_group = {
	.attrs = w83781d_attributes,
};

978
static struct attribute *w83781d_attributes_in1[] = {
979
	IN_UNIT_ATTRS(1),
980 981 982 983 984 985 986
	NULL
};
static const struct attribute_group w83781d_group_in1 = {
	.attrs = w83781d_attributes_in1,
};

static struct attribute *w83781d_attributes_in78[] = {
987 988
	IN_UNIT_ATTRS(7),
	IN_UNIT_ATTRS(8),
989 990 991 992 993 994 995
	NULL
};
static const struct attribute_group w83781d_group_in78 = {
	.attrs = w83781d_attributes_in78,
};

static struct attribute *w83781d_attributes_temp3[] = {
996
	TEMP_UNIT_ATTRS(3),
997 998 999 1000 1001 1002 1003
	NULL
};
static const struct attribute_group w83781d_group_temp3 = {
	.attrs = w83781d_attributes_temp3,
};

static struct attribute *w83781d_attributes_pwm12[] = {
1004 1005
	&sensor_dev_attr_pwm1.dev_attr.attr,
	&sensor_dev_attr_pwm2.dev_attr.attr,
1006 1007 1008 1009 1010 1011 1012 1013
	&dev_attr_pwm2_enable.attr,
	NULL
};
static const struct attribute_group w83781d_group_pwm12 = {
	.attrs = w83781d_attributes_pwm12,
};

static struct attribute *w83781d_attributes_pwm34[] = {
1014 1015
	&sensor_dev_attr_pwm3.dev_attr.attr,
	&sensor_dev_attr_pwm4.dev_attr.attr,
1016 1017 1018 1019 1020 1021 1022
	NULL
};
static const struct attribute_group w83781d_group_pwm34 = {
	.attrs = w83781d_attributes_pwm34,
};

static struct attribute *w83781d_attributes_other[] = {
1023 1024 1025
	&sensor_dev_attr_temp1_type.dev_attr.attr,
	&sensor_dev_attr_temp2_type.dev_attr.attr,
	&sensor_dev_attr_temp3_type.dev_attr.attr,
1026 1027
	NULL
};
1028 1029
static const struct attribute_group w83781d_group_other = {
	.attrs = w83781d_attributes_other,
1030 1031
};

1032
/* No clean up is done on error, it's up to the caller */
L
Linus Torvalds 已提交
1033
static int
1034
w83781d_create_files(struct device *dev, int kind, int is_isa)
L
Linus Torvalds 已提交
1035 1036 1037
{
	int err;

1038 1039
	err = sysfs_create_group(&dev->kobj, &w83781d_group);
	if (err)
1040 1041 1042
		return err;

	if (kind != w83783s) {
1043 1044
		err = sysfs_create_group(&dev->kobj, &w83781d_group_in1);
		if (err)
1045 1046 1047
			return err;
	}
	if (kind != as99127f && kind != w83781d && kind != w83783s) {
1048 1049
		err = sysfs_create_group(&dev->kobj, &w83781d_group_in78);
		if (err)
1050 1051 1052
			return err;
	}
	if (kind != w83783s) {
1053 1054
		err = sysfs_create_group(&dev->kobj, &w83781d_group_temp3);
		if (err)
1055
			return err;
1056

1057
		if (kind != w83781d) {
1058 1059 1060 1061 1062
			err = sysfs_chmod_file(&dev->kobj,
				&sensor_dev_attr_temp3_alarm.dev_attr.attr,
				S_IRUGO | S_IWUSR);
			if (err)
				return err;
1063
		}
L
Linus Torvalds 已提交
1064 1065
	}

1066
	if (kind != w83781d && kind != as99127f) {
1067 1068
		err = sysfs_create_group(&dev->kobj, &w83781d_group_pwm12);
		if (err)
1069
			return err;
L
Linus Torvalds 已提交
1070
	}
1071
	if (kind == w83782d && !is_isa) {
1072 1073
		err = sysfs_create_group(&dev->kobj, &w83781d_group_pwm34);
		if (err)
1074 1075 1076 1077
			return err;
	}

	if (kind != as99127f && kind != w83781d) {
1078 1079 1080 1081 1082 1083 1084
		err = device_create_file(dev,
					 &sensor_dev_attr_temp1_type.dev_attr);
		if (err)
			return err;
		err = device_create_file(dev,
					 &sensor_dev_attr_temp2_type.dev_attr);
		if (err)
1085 1086
			return err;
		if (kind != w83783s) {
1087
			err = device_create_file(dev,
1088
					&sensor_dev_attr_temp3_type.dev_attr);
1089
			if (err)
1090
				return err;
L
Linus Torvalds 已提交
1091
		}
1092
	}
L
Linus Torvalds 已提交
1093

1094 1095
	return 0;
}
L
Linus Torvalds 已提交
1096

1097
/* Return 0 if detection is successful, -ENODEV otherwise */
1098
static int
1099
w83781d_detect(struct i2c_client *client, struct i2c_board_info *info)
1100
{
1101
	int val1, val2;
1102 1103 1104
	struct w83781d_data *isa = w83781d_data_if_isa();
	struct i2c_adapter *adapter = client->adapter;
	int address = client->addr;
1105
	const char *client_name;
1106 1107
	enum vendor { winbond, asus } vendid;

1108 1109
	if (!i2c_check_functionality(adapter, I2C_FUNC_SMBUS_BYTE_DATA))
		return -ENODEV;
L
Linus Torvalds 已提交
1110

1111 1112 1113 1114 1115
	/*
	 * We block updates of the ISA device to minimize the risk of
	 * concurrent access to the same W83781D chip through different
	 * interfaces.
	 */
1116 1117
	if (isa)
		mutex_lock(&isa->update_lock);
L
Linus Torvalds 已提交
1118

1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129
	if (i2c_smbus_read_byte_data(client, W83781D_REG_CONFIG) & 0x80) {
		dev_dbg(&adapter->dev,
			"Detection of w83781d chip failed at step 3\n");
		goto err_nodev;
	}

	val1 = i2c_smbus_read_byte_data(client, W83781D_REG_BANK);
	val2 = i2c_smbus_read_byte_data(client, W83781D_REG_CHIPMAN);
	/* Check for Winbond or Asus ID if in bank 0 */
	if (!(val1 & 0x07) &&
	    ((!(val1 & 0x80) && val2 != 0xa3 && val2 != 0xc3) ||
1130
	     ((val1 & 0x80) && val2 != 0x5c && val2 != 0x12))) {
1131 1132 1133 1134
		dev_dbg(&adapter->dev,
			"Detection of w83781d chip failed at step 4\n");
		goto err_nodev;
	}
1135 1136 1137 1138
	/*
	 * If Winbond SMBus, check address at 0x48.
	 * Asus doesn't support, except for as99127f rev.2
	 */
1139
	if ((!(val1 & 0x80) && val2 == 0xa3) ||
1140
	    ((val1 & 0x80) && val2 == 0x5c)) {
1141 1142 1143 1144
		if (i2c_smbus_read_byte_data(client, W83781D_REG_I2C_ADDR)
		    != address) {
			dev_dbg(&adapter->dev,
				"Detection of w83781d chip failed at step 5\n");
1145
			goto err_nodev;
L
Linus Torvalds 已提交
1146 1147 1148
		}
	}

1149
	/* Put it now into bank 0 and Vendor ID High Byte */
1150 1151 1152
	i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
		(i2c_smbus_read_byte_data(client, W83781D_REG_BANK)
		 & 0x78) | 0x80);
L
Linus Torvalds 已提交
1153

1154 1155 1156 1157 1158 1159 1160 1161 1162 1163
	/* Get the vendor ID */
	val2 = i2c_smbus_read_byte_data(client, W83781D_REG_CHIPMAN);
	if (val2 == 0x5c)
		vendid = winbond;
	else if (val2 == 0x12)
		vendid = asus;
	else {
		dev_dbg(&adapter->dev,
			"w83781d chip vendor is neither Winbond nor Asus\n");
		goto err_nodev;
L
Linus Torvalds 已提交
1164 1165
	}

1166 1167 1168
	/* Determine the chip type. */
	val1 = i2c_smbus_read_byte_data(client, W83781D_REG_WCHIPID);
	if ((val1 == 0x10 || val1 == 0x11) && vendid == winbond)
L
Linus Torvalds 已提交
1169
		client_name = "w83781d";
1170
	else if (val1 == 0x30 && vendid == winbond)
L
Linus Torvalds 已提交
1171
		client_name = "w83782d";
1172
	else if (val1 == 0x40 && vendid == winbond && address == 0x2d)
L
Linus Torvalds 已提交
1173
		client_name = "w83783s";
1174
	else if (val1 == 0x31)
L
Linus Torvalds 已提交
1175
		client_name = "as99127f";
1176 1177 1178 1179 1180 1181 1182
	else
		goto err_nodev;

	if (val1 <= 0x30 && w83781d_alias_detect(client, val1)) {
		dev_dbg(&adapter->dev, "Device at 0x%02x appears to "
			"be the same as ISA device\n", address);
		goto err_nodev;
L
Linus Torvalds 已提交
1183 1184
	}

1185 1186 1187
	if (isa)
		mutex_unlock(&isa->update_lock);

1188 1189 1190 1191 1192 1193 1194 1195 1196 1197
	strlcpy(info->type, client_name, I2C_NAME_SIZE);

	return 0;

 err_nodev:
	if (isa)
		mutex_unlock(&isa->update_lock);
	return -ENODEV;
}

1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208
static void w83781d_remove_files(struct device *dev)
{
	sysfs_remove_group(&dev->kobj, &w83781d_group);
	sysfs_remove_group(&dev->kobj, &w83781d_group_in1);
	sysfs_remove_group(&dev->kobj, &w83781d_group_in78);
	sysfs_remove_group(&dev->kobj, &w83781d_group_temp3);
	sysfs_remove_group(&dev->kobj, &w83781d_group_pwm12);
	sysfs_remove_group(&dev->kobj, &w83781d_group_pwm34);
	sysfs_remove_group(&dev->kobj, &w83781d_group_other);
}

1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224
static int
w83781d_probe(struct i2c_client *client, const struct i2c_device_id *id)
{
	struct device *dev = &client->dev;
	struct w83781d_data *data;
	int err;

	data = kzalloc(sizeof(struct w83781d_data), GFP_KERNEL);
	if (!data) {
		err = -ENOMEM;
		goto ERROR1;
	}

	i2c_set_clientdata(client, data);
	mutex_init(&data->lock);
	mutex_init(&data->update_lock);
L
Linus Torvalds 已提交
1225

1226 1227
	data->type = id->driver_data;
	data->client = client;
L
Linus Torvalds 已提交
1228 1229

	/* attach secondary i2c lm75-like clients */
1230 1231
	err = w83781d_detect_subclients(client);
	if (err)
1232
		goto ERROR3;
L
Linus Torvalds 已提交
1233 1234

	/* Initialize the chip */
1235
	w83781d_init_device(dev);
L
Linus Torvalds 已提交
1236 1237

	/* Register sysfs hooks */
1238
	err = w83781d_create_files(dev, data->type, 0);
1239
	if (err)
1240 1241
		goto ERROR4;

1242 1243 1244
	data->hwmon_dev = hwmon_device_register(dev);
	if (IS_ERR(data->hwmon_dev)) {
		err = PTR_ERR(data->hwmon_dev);
1245
		goto ERROR4;
L
Linus Torvalds 已提交
1246 1247 1248 1249
	}

	return 0;

1250
ERROR4:
1251
	w83781d_remove_files(dev);
1252 1253 1254 1255
	if (data->lm75[0])
		i2c_unregister_device(data->lm75[0]);
	if (data->lm75[1])
		i2c_unregister_device(data->lm75[1]);
L
Linus Torvalds 已提交
1256 1257 1258 1259 1260 1261 1262
ERROR3:
	kfree(data);
ERROR1:
	return err;
}

static int
1263
w83781d_remove(struct i2c_client *client)
L
Linus Torvalds 已提交
1264
{
1265
	struct w83781d_data *data = i2c_get_clientdata(client);
1266
	struct device *dev = &client->dev;
L
Linus Torvalds 已提交
1267

1268
	hwmon_device_unregister(data->hwmon_dev);
1269
	w83781d_remove_files(dev);
L
Linus Torvalds 已提交
1270

1271 1272 1273 1274
	if (data->lm75[0])
		i2c_unregister_device(data->lm75[0]);
	if (data->lm75[1])
		i2c_unregister_device(data->lm75[1]);
1275

1276
	kfree(data);
L
Linus Torvalds 已提交
1277 1278 1279 1280 1281

	return 0;
}

static int
1282
w83781d_read_value_i2c(struct w83781d_data *data, u16 reg)
L
Linus Torvalds 已提交
1283
{
1284
	struct i2c_client *client = data->client;
1285
	int res, bank;
L
Linus Torvalds 已提交
1286 1287
	struct i2c_client *cl;

1288 1289 1290 1291 1292 1293 1294
	bank = (reg >> 8) & 0x0f;
	if (bank > 2)
		/* switch banks */
		i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
					  bank);
	if (bank == 0 || bank > 2) {
		res = i2c_smbus_read_byte_data(client, reg & 0xff);
L
Linus Torvalds 已提交
1295
	} else {
1296 1297 1298 1299 1300
		/* switch to subclient */
		cl = data->lm75[bank - 1];
		/* convert from ISA to LM75 I2C addresses */
		switch (reg & 0xff) {
		case 0x50:	/* TEMP */
1301
			res = i2c_smbus_read_word_swapped(cl, 0);
1302 1303 1304 1305 1306
			break;
		case 0x52:	/* CONFIG */
			res = i2c_smbus_read_byte_data(cl, 1);
			break;
		case 0x53:	/* HYST */
1307
			res = i2c_smbus_read_word_swapped(cl, 2);
1308 1309 1310
			break;
		case 0x55:	/* OVER */
		default:
1311
			res = i2c_smbus_read_word_swapped(cl, 3);
1312
			break;
L
Linus Torvalds 已提交
1313 1314
		}
	}
1315 1316 1317
	if (bank > 2)
		i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);

L
Linus Torvalds 已提交
1318 1319 1320 1321
	return res;
}

static int
1322
w83781d_write_value_i2c(struct w83781d_data *data, u16 reg, u16 value)
L
Linus Torvalds 已提交
1323
{
1324
	struct i2c_client *client = data->client;
1325
	int bank;
L
Linus Torvalds 已提交
1326 1327
	struct i2c_client *cl;

1328 1329 1330 1331 1332 1333 1334 1335
	bank = (reg >> 8) & 0x0f;
	if (bank > 2)
		/* switch banks */
		i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
					  bank);
	if (bank == 0 || bank > 2) {
		i2c_smbus_write_byte_data(client, reg & 0xff,
					  value & 0xff);
L
Linus Torvalds 已提交
1336
	} else {
1337 1338 1339 1340 1341 1342 1343 1344
		/* switch to subclient */
		cl = data->lm75[bank - 1];
		/* convert from ISA to LM75 I2C addresses */
		switch (reg & 0xff) {
		case 0x52:	/* CONFIG */
			i2c_smbus_write_byte_data(cl, 1, value & 0xff);
			break;
		case 0x53:	/* HYST */
1345
			i2c_smbus_write_word_swapped(cl, 2, value);
1346 1347
			break;
		case 0x55:	/* OVER */
1348
			i2c_smbus_write_word_swapped(cl, 3, value);
1349
			break;
L
Linus Torvalds 已提交
1350 1351
		}
	}
1352 1353 1354
	if (bank > 2)
		i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);

L
Linus Torvalds 已提交
1355 1356 1357 1358
	return 0;
}

static void
1359
w83781d_init_device(struct device *dev)
L
Linus Torvalds 已提交
1360
{
1361
	struct w83781d_data *data = dev_get_drvdata(dev);
L
Linus Torvalds 已提交
1362 1363 1364 1365
	int i, p;
	int type = data->type;
	u8 tmp;

1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377
	if (reset && type != as99127f) { /*
					  * this resets registers we don't have
					  * documentation for on the as99127f
					  */
		/*
		 * Resetting the chip has been the default for a long time,
		 * but it causes the BIOS initializations (fan clock dividers,
		 * thermal sensor types...) to be lost, so it is now optional.
		 * It might even go away if nobody reports it as being useful,
		 * as I see very little reason why this would be needed at
		 * all.
		 */
1378
		dev_info(dev, "If reset=1 solved a problem you were "
1379 1380
			 "having, please report!\n");

L
Linus Torvalds 已提交
1381
		/* save these registers */
1382 1383
		i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
		p = w83781d_read_value(data, W83781D_REG_PWMCLK12);
1384 1385 1386 1387
		/*
		 * Reset all except Watchdog values and last conversion values
		 * This sets fan-divs to 2, among others
		 */
1388
		w83781d_write_value(data, W83781D_REG_CONFIG, 0x80);
1389 1390 1391 1392
		/*
		 * Restore the registers and disable power-on abnormal beep.
		 * This saves FAN 1/2/3 input/output values set by BIOS.
		 */
1393 1394
		w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
		w83781d_write_value(data, W83781D_REG_PWMCLK12, p);
1395 1396 1397 1398 1399
		/*
		 * Disable master beep-enable (reset turns it on).
		 * Individual beep_mask should be reset to off but for some
		 * reason disabling this bit helps some people not get beeped
		 */
1400
		w83781d_write_value(data, W83781D_REG_BEEP_INTS2, 0);
L
Linus Torvalds 已提交
1401 1402
	}

1403 1404 1405 1406
	/*
	 * Disable power-on abnormal beep, as advised by the datasheet.
	 * Already done if reset=1.
	 */
1407
	if (init && !reset && type != as99127f) {
1408 1409
		i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
		w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
1410 1411
	}

1412
	data->vrm = vid_which_vrm();
L
Linus Torvalds 已提交
1413 1414

	if ((type != w83781d) && (type != as99127f)) {
1415
		tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
L
Linus Torvalds 已提交
1416 1417
		for (i = 1; i <= 3; i++) {
			if (!(tmp & BIT_SCFG1[i - 1])) {
J
Jean Delvare 已提交
1418
				data->sens[i - 1] = 4;
L
Linus Torvalds 已提交
1419 1420
			} else {
				if (w83781d_read_value
1421
				    (data,
L
Linus Torvalds 已提交
1422 1423 1424 1425 1426
				     W83781D_REG_SCFG2) & BIT_SCFG2[i - 1])
					data->sens[i - 1] = 1;
				else
					data->sens[i - 1] = 2;
			}
1427
			if (type == w83783s && i == 2)
L
Linus Torvalds 已提交
1428 1429 1430 1431 1432 1433
				break;
		}
	}

	if (init && type != as99127f) {
		/* Enable temp2 */
1434
		tmp = w83781d_read_value(data, W83781D_REG_TEMP2_CONFIG);
L
Linus Torvalds 已提交
1435
		if (tmp & 0x01) {
1436
			dev_warn(dev, "Enabling temp2, readings "
L
Linus Torvalds 已提交
1437
				 "might not make sense\n");
1438
			w83781d_write_value(data, W83781D_REG_TEMP2_CONFIG,
L
Linus Torvalds 已提交
1439 1440 1441 1442
				tmp & 0xfe);
		}

		/* Enable temp3 */
1443
		if (type != w83783s) {
1444
			tmp = w83781d_read_value(data,
L
Linus Torvalds 已提交
1445 1446
				W83781D_REG_TEMP3_CONFIG);
			if (tmp & 0x01) {
1447
				dev_warn(dev, "Enabling temp3, "
L
Linus Torvalds 已提交
1448
					 "readings might not make sense\n");
1449
				w83781d_write_value(data,
L
Linus Torvalds 已提交
1450 1451 1452 1453 1454 1455
					W83781D_REG_TEMP3_CONFIG, tmp & 0xfe);
			}
		}
	}

	/* Start monitoring */
1456 1457
	w83781d_write_value(data, W83781D_REG_CONFIG,
			    (w83781d_read_value(data,
L
Linus Torvalds 已提交
1458 1459
						W83781D_REG_CONFIG) & 0xf7)
			    | 0x01);
1460 1461

	/* A few vars need to be filled upon startup */
1462 1463
	for (i = 0; i < 3; i++) {
		data->fan_min[i] = w83781d_read_value(data,
1464 1465 1466 1467
					W83781D_REG_FAN_MIN(i));
	}

	mutex_init(&data->update_lock);
L
Linus Torvalds 已提交
1468 1469 1470 1471
}

static struct w83781d_data *w83781d_update_device(struct device *dev)
{
1472
	struct w83781d_data *data = dev_get_drvdata(dev);
1473
	struct i2c_client *client = data->client;
L
Linus Torvalds 已提交
1474 1475
	int i;

1476
	mutex_lock(&data->update_lock);
L
Linus Torvalds 已提交
1477 1478 1479 1480 1481 1482

	if (time_after(jiffies, data->last_updated + HZ + HZ / 2)
	    || !data->valid) {
		dev_dbg(dev, "Starting device update\n");

		for (i = 0; i <= 8; i++) {
1483
			if (data->type == w83783s && i == 1)
L
Linus Torvalds 已提交
1484 1485
				continue;	/* 783S has no in1 */
			data->in[i] =
1486
			    w83781d_read_value(data, W83781D_REG_IN(i));
L
Linus Torvalds 已提交
1487
			data->in_min[i] =
1488
			    w83781d_read_value(data, W83781D_REG_IN_MIN(i));
L
Linus Torvalds 已提交
1489
			data->in_max[i] =
1490
			    w83781d_read_value(data, W83781D_REG_IN_MAX(i));
1491
			if ((data->type != w83782d) && (i == 6))
L
Linus Torvalds 已提交
1492 1493
				break;
		}
1494 1495
		for (i = 0; i < 3; i++) {
			data->fan[i] =
1496
			    w83781d_read_value(data, W83781D_REG_FAN(i));
1497
			data->fan_min[i] =
1498
			    w83781d_read_value(data, W83781D_REG_FAN_MIN(i));
L
Linus Torvalds 已提交
1499 1500
		}
		if (data->type != w83781d && data->type != as99127f) {
1501 1502
			for (i = 0; i < 4; i++) {
				data->pwm[i] =
1503
				    w83781d_read_value(data,
1504
						       W83781D_REG_PWM[i]);
1505 1506
				/* Only W83782D on SMBus has PWM3 and PWM4 */
				if ((data->type != w83782d || !client)
1507
				    && i == 1)
L
Linus Torvalds 已提交
1508 1509 1510
					break;
			}
			/* Only PWM2 can be disabled */
1511
			data->pwm2_enable = (w83781d_read_value(data,
1512
					     W83781D_REG_PWMCLK12) & 0x08) >> 3;
L
Linus Torvalds 已提交
1513 1514
		}

1515
		data->temp = w83781d_read_value(data, W83781D_REG_TEMP(1));
L
Linus Torvalds 已提交
1516
		data->temp_max =
1517
		    w83781d_read_value(data, W83781D_REG_TEMP_OVER(1));
L
Linus Torvalds 已提交
1518
		data->temp_max_hyst =
1519
		    w83781d_read_value(data, W83781D_REG_TEMP_HYST(1));
L
Linus Torvalds 已提交
1520
		data->temp_add[0] =
1521
		    w83781d_read_value(data, W83781D_REG_TEMP(2));
L
Linus Torvalds 已提交
1522
		data->temp_max_add[0] =
1523
		    w83781d_read_value(data, W83781D_REG_TEMP_OVER(2));
L
Linus Torvalds 已提交
1524
		data->temp_max_hyst_add[0] =
1525
		    w83781d_read_value(data, W83781D_REG_TEMP_HYST(2));
1526
		if (data->type != w83783s) {
L
Linus Torvalds 已提交
1527
			data->temp_add[1] =
1528
			    w83781d_read_value(data, W83781D_REG_TEMP(3));
L
Linus Torvalds 已提交
1529
			data->temp_max_add[1] =
1530
			    w83781d_read_value(data,
L
Linus Torvalds 已提交
1531 1532
					       W83781D_REG_TEMP_OVER(3));
			data->temp_max_hyst_add[1] =
1533
			    w83781d_read_value(data,
L
Linus Torvalds 已提交
1534 1535
					       W83781D_REG_TEMP_HYST(3));
		}
1536
		i = w83781d_read_value(data, W83781D_REG_VID_FANDIV);
1537
		data->vid = i & 0x0f;
1538
		data->vid |= (w83781d_read_value(data,
1539
					W83781D_REG_CHIPID) & 0x01) << 4;
L
Linus Torvalds 已提交
1540 1541
		data->fan_div[0] = (i >> 4) & 0x03;
		data->fan_div[1] = (i >> 6) & 0x03;
1542
		data->fan_div[2] = (w83781d_read_value(data,
1543
					W83781D_REG_PIN) >> 6) & 0x03;
L
Linus Torvalds 已提交
1544
		if ((data->type != w83781d) && (data->type != as99127f)) {
1545
			i = w83781d_read_value(data, W83781D_REG_VBAT);
L
Linus Torvalds 已提交
1546 1547
			data->fan_div[0] |= (i >> 3) & 0x04;
			data->fan_div[1] |= (i >> 4) & 0x04;
1548
			data->fan_div[2] |= (i >> 5) & 0x04;
L
Linus Torvalds 已提交
1549
		}
1550
		if (data->type == w83782d) {
1551
			data->alarms = w83781d_read_value(data,
1552
						W83782D_REG_ALARM1)
1553
				     | (w83781d_read_value(data,
1554
						W83782D_REG_ALARM2) << 8)
1555
				     | (w83781d_read_value(data,
1556 1557
						W83782D_REG_ALARM3) << 16);
		} else if (data->type == w83783s) {
1558
			data->alarms = w83781d_read_value(data,
1559
						W83782D_REG_ALARM1)
1560
				     | (w83781d_read_value(data,
1561 1562
						W83782D_REG_ALARM2) << 8);
		} else {
1563 1564 1565 1566
			/*
			 * No real-time status registers, fall back to
			 * interrupt status registers
			 */
1567
			data->alarms = w83781d_read_value(data,
1568
						W83781D_REG_ALARM1)
1569
				     | (w83781d_read_value(data,
1570
						W83781D_REG_ALARM2) << 8);
L
Linus Torvalds 已提交
1571
		}
1572
		i = w83781d_read_value(data, W83781D_REG_BEEP_INTS2);
1573
		data->beep_mask = (i << 8) +
1574
		    w83781d_read_value(data, W83781D_REG_BEEP_INTS1);
L
Linus Torvalds 已提交
1575 1576
		if ((data->type != w83781d) && (data->type != as99127f)) {
			data->beep_mask |=
1577
			    w83781d_read_value(data,
L
Linus Torvalds 已提交
1578 1579 1580 1581 1582 1583
					       W83781D_REG_BEEP_INTS3) << 16;
		}
		data->last_updated = jiffies;
		data->valid = 1;
	}

1584
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
1585 1586 1587 1588

	return data;
}

1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606
static const struct i2c_device_id w83781d_ids[] = {
	{ "w83781d", w83781d, },
	{ "w83782d", w83782d, },
	{ "w83783s", w83783s, },
	{ "as99127f", as99127f },
	{ /* LIST END */ }
};
MODULE_DEVICE_TABLE(i2c, w83781d_ids);

static struct i2c_driver w83781d_driver = {
	.class		= I2C_CLASS_HWMON,
	.driver = {
		.name = "w83781d",
	},
	.probe		= w83781d_probe,
	.remove		= w83781d_remove,
	.id_table	= w83781d_ids,
	.detect		= w83781d_detect,
1607
	.address_list	= normal_i2c,
1608 1609 1610 1611 1612
};

/*
 * ISA related code
 */
1613 1614 1615 1616 1617 1618 1619
#ifdef CONFIG_ISA

/* ISA device, if found */
static struct platform_device *pdev;

static unsigned short isa_address = 0x290;

1620 1621 1622 1623
/*
 * I2C devices get this name attribute automatically, but for ISA devices
 * we must create it by ourselves.
 */
1624 1625 1626 1627
static ssize_t
show_name(struct device *dev, struct device_attribute *devattr, char *buf)
{
	struct w83781d_data *data = dev_get_drvdata(dev);
1628
	return sprintf(buf, "%s\n", data->name);
1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639
}
static DEVICE_ATTR(name, S_IRUGO, show_name, NULL);

static struct w83781d_data *w83781d_data_if_isa(void)
{
	return pdev ? platform_get_drvdata(pdev) : NULL;
}

/* Returns 1 if the I2C chip appears to be an alias of the ISA chip */
static int w83781d_alias_detect(struct i2c_client *client, u8 chipid)
{
1640
	struct w83781d_data *isa;
1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652
	int i;

	if (!pdev)	/* No ISA chip */
		return 0;

	isa = platform_get_drvdata(pdev);

	if (w83781d_read_value(isa, W83781D_REG_I2C_ADDR) != client->addr)
		return 0;	/* Address doesn't match */
	if (w83781d_read_value(isa, W83781D_REG_WCHIPID) != chipid)
		return 0;	/* Chip type doesn't match */

1653 1654 1655 1656
	/*
	 * We compare all the limit registers, the config register and the
	 * interrupt mask registers
	 */
1657
	for (i = 0x2b; i <= 0x3d; i++) {
1658 1659
		if (w83781d_read_value(isa, i) !=
		    i2c_smbus_read_byte_data(client, i))
1660 1661 1662
			return 0;
	}
	if (w83781d_read_value(isa, W83781D_REG_CONFIG) !=
1663
	    i2c_smbus_read_byte_data(client, W83781D_REG_CONFIG))
1664 1665
		return 0;
	for (i = 0x43; i <= 0x46; i++) {
1666 1667
		if (w83781d_read_value(isa, i) !=
		    i2c_smbus_read_byte_data(client, i))
1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685
			return 0;
	}

	return 1;
}

static int
w83781d_read_value_isa(struct w83781d_data *data, u16 reg)
{
	int word_sized, res;

	word_sized = (((reg & 0xff00) == 0x100)
		      || ((reg & 0xff00) == 0x200))
	    && (((reg & 0x00ff) == 0x50)
		|| ((reg & 0x00ff) == 0x53)
		|| ((reg & 0x00ff) == 0x55));
	if (reg & 0xff00) {
		outb_p(W83781D_REG_BANK,
1686
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1687
		outb_p(reg >> 8,
1688
		       data->isa_addr + W83781D_DATA_REG_OFFSET);
1689
	}
1690 1691
	outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
	res = inb_p(data->isa_addr + W83781D_DATA_REG_OFFSET);
1692 1693
	if (word_sized) {
		outb_p((reg & 0xff) + 1,
1694
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1695
		res =
1696
		    (res << 8) + inb_p(data->isa_addr +
1697 1698 1699 1700
				       W83781D_DATA_REG_OFFSET);
	}
	if (reg & 0xff00) {
		outb_p(W83781D_REG_BANK,
1701 1702
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
		outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717
	}
	return res;
}

static void
w83781d_write_value_isa(struct w83781d_data *data, u16 reg, u16 value)
{
	int word_sized;

	word_sized = (((reg & 0xff00) == 0x100)
		      || ((reg & 0xff00) == 0x200))
	    && (((reg & 0x00ff) == 0x53)
		|| ((reg & 0x00ff) == 0x55));
	if (reg & 0xff00) {
		outb_p(W83781D_REG_BANK,
1718
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1719
		outb_p(reg >> 8,
1720
		       data->isa_addr + W83781D_DATA_REG_OFFSET);
1721
	}
1722
	outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1723 1724
	if (word_sized) {
		outb_p(value >> 8,
1725
		       data->isa_addr + W83781D_DATA_REG_OFFSET);
1726
		outb_p((reg & 0xff) + 1,
1727
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1728
	}
1729
	outb_p(value & 0xff, data->isa_addr + W83781D_DATA_REG_OFFSET);
1730 1731
	if (reg & 0xff00) {
		outb_p(W83781D_REG_BANK,
1732 1733
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
		outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1734 1735 1736
	}
}

1737 1738 1739 1740 1741 1742 1743 1744
/*
 * The SMBus locks itself, usually, but nothing may access the Winbond between
 * bank switches. ISA access must always be locked explicitly!
 * We ignore the W83781D BUSY flag at this moment - it could lead to deadlocks,
 * would slow down the W83781D access and should not be necessary.
 * There are some ugly typecasts here, but the good news is - they should
 * nowhere else be necessary!
 */
1745 1746 1747
static int
w83781d_read_value(struct w83781d_data *data, u16 reg)
{
1748
	struct i2c_client *client = data->client;
1749 1750 1751
	int res;

	mutex_lock(&data->lock);
1752
	if (client)
1753 1754 1755 1756 1757 1758 1759 1760 1761 1762
		res = w83781d_read_value_i2c(data, reg);
	else
		res = w83781d_read_value_isa(data, reg);
	mutex_unlock(&data->lock);
	return res;
}

static int
w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
{
1763
	struct i2c_client *client = data->client;
1764 1765

	mutex_lock(&data->lock);
1766
	if (client)
1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794
		w83781d_write_value_i2c(data, reg, value);
	else
		w83781d_write_value_isa(data, reg, value);
	mutex_unlock(&data->lock);
	return 0;
}

static int __devinit
w83781d_isa_probe(struct platform_device *pdev)
{
	int err, reg;
	struct w83781d_data *data;
	struct resource *res;

	/* Reserve the ISA region */
	res = platform_get_resource(pdev, IORESOURCE_IO, 0);
	if (!request_region(res->start + W83781D_ADDR_REG_OFFSET, 2,
			    "w83781d")) {
		err = -EBUSY;
		goto exit;
	}

	data = kzalloc(sizeof(struct w83781d_data), GFP_KERNEL);
	if (!data) {
		err = -ENOMEM;
		goto exit_release_region;
	}
	mutex_init(&data->lock);
1795
	data->isa_addr = res->start;
1796 1797 1798 1799 1800 1801
	platform_set_drvdata(pdev, data);

	reg = w83781d_read_value(data, W83781D_REG_WCHIPID);
	switch (reg) {
	case 0x30:
		data->type = w83782d;
1802
		data->name = "w83782d";
1803 1804 1805
		break;
	default:
		data->type = w83781d;
1806
		data->name = "w83781d";
1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829
	}

	/* Initialize the W83781D chip */
	w83781d_init_device(&pdev->dev);

	/* Register sysfs hooks */
	err = w83781d_create_files(&pdev->dev, data->type, 1);
	if (err)
		goto exit_remove_files;

	err = device_create_file(&pdev->dev, &dev_attr_name);
	if (err)
		goto exit_remove_files;

	data->hwmon_dev = hwmon_device_register(&pdev->dev);
	if (IS_ERR(data->hwmon_dev)) {
		err = PTR_ERR(data->hwmon_dev);
		goto exit_remove_files;
	}

	return 0;

 exit_remove_files:
1830
	w83781d_remove_files(&pdev->dev);
1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844
	device_remove_file(&pdev->dev, &dev_attr_name);
	kfree(data);
 exit_release_region:
	release_region(res->start + W83781D_ADDR_REG_OFFSET, 2);
 exit:
	return err;
}

static int __devexit
w83781d_isa_remove(struct platform_device *pdev)
{
	struct w83781d_data *data = platform_get_drvdata(pdev);

	hwmon_device_unregister(data->hwmon_dev);
1845
	w83781d_remove_files(&pdev->dev);
1846
	device_remove_file(&pdev->dev, &dev_attr_name);
1847
	release_region(data->isa_addr + W83781D_ADDR_REG_OFFSET, 2);
1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861
	kfree(data);

	return 0;
}

static struct platform_driver w83781d_isa_driver = {
	.driver = {
		.owner = THIS_MODULE,
		.name = "w83781d",
	},
	.probe = w83781d_isa_probe,
	.remove = __devexit_p(w83781d_isa_remove),
};

1862 1863 1864 1865 1866
/* return 1 if a supported chip is found, 0 otherwise */
static int __init
w83781d_isa_found(unsigned short address)
{
	int val, save, found = 0;
1867 1868
	int port;

1869 1870
	/*
	 * Some boards declare base+0 to base+7 as a PNP device, some base+4
1871
	 * to base+7 and some base+5 to base+6. So we better request each port
1872 1873
	 * individually for the probing phase.
	 */
1874 1875
	for (port = address; port < address + W83781D_EXTENT; port++) {
		if (!request_region(port, 1, "w83781d")) {
1876
			pr_debug("Failed to request port 0x%x\n", port);
1877 1878
			goto release;
		}
1879
	}
1880 1881

#define REALLY_SLOW_IO
1882 1883 1884 1885
	/*
	 * We need the timeouts for at least some W83781D-like
	 * chips. But only if we read 'undefined' registers.
	 */
1886 1887 1888 1889
	val = inb_p(address + 1);
	if (inb_p(address + 2) != val
	 || inb_p(address + 3) != val
	 || inb_p(address + 7) != val) {
1890
		pr_debug("Detection failed at step %d\n", 1);
1891 1892 1893 1894
		goto release;
	}
#undef REALLY_SLOW_IO

1895 1896 1897 1898
	/*
	 * We should be able to change the 7 LSB of the address port. The
	 * MSB (busy flag) should be clear initially, set after the write.
	 */
1899 1900
	save = inb_p(address + W83781D_ADDR_REG_OFFSET);
	if (save & 0x80) {
1901
		pr_debug("Detection failed at step %d\n", 2);
1902 1903 1904 1905 1906 1907
		goto release;
	}
	val = ~save & 0x7f;
	outb_p(val, address + W83781D_ADDR_REG_OFFSET);
	if (inb_p(address + W83781D_ADDR_REG_OFFSET) != (val | 0x80)) {
		outb_p(save, address + W83781D_ADDR_REG_OFFSET);
1908
		pr_debug("Detection failed at step %d\n", 3);
1909 1910 1911 1912 1913 1914 1915
		goto release;
	}

	/* We found a device, now see if it could be a W83781D */
	outb_p(W83781D_REG_CONFIG, address + W83781D_ADDR_REG_OFFSET);
	val = inb_p(address + W83781D_DATA_REG_OFFSET);
	if (val & 0x80) {
1916
		pr_debug("Detection failed at step %d\n", 4);
1917 1918 1919 1920 1921 1922 1923 1924
		goto release;
	}
	outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
	save = inb_p(address + W83781D_DATA_REG_OFFSET);
	outb_p(W83781D_REG_CHIPMAN, address + W83781D_ADDR_REG_OFFSET);
	val = inb_p(address + W83781D_DATA_REG_OFFSET);
	if ((!(save & 0x80) && (val != 0xa3))
	 || ((save & 0x80) && (val != 0x5c))) {
1925
		pr_debug("Detection failed at step %d\n", 5);
1926 1927 1928 1929 1930
		goto release;
	}
	outb_p(W83781D_REG_I2C_ADDR, address + W83781D_ADDR_REG_OFFSET);
	val = inb_p(address + W83781D_DATA_REG_OFFSET);
	if (val < 0x03 || val > 0x77) {	/* Not a valid I2C address */
1931
		pr_debug("Detection failed at step %d\n", 6);
1932 1933 1934 1935 1936
		goto release;
	}

	/* The busy flag should be clear again */
	if (inb_p(address + W83781D_ADDR_REG_OFFSET) & 0x80) {
1937
		pr_debug("Detection failed at step %d\n", 7);
1938 1939 1940 1941 1942 1943 1944 1945 1946 1947
		goto release;
	}

	/* Determine the chip type */
	outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
	save = inb_p(address + W83781D_DATA_REG_OFFSET);
	outb_p(save & 0xf8, address + W83781D_DATA_REG_OFFSET);
	outb_p(W83781D_REG_WCHIPID, address + W83781D_ADDR_REG_OFFSET);
	val = inb_p(address + W83781D_DATA_REG_OFFSET);
	if ((val & 0xfe) == 0x10	/* W83781D */
1948
	 || val == 0x30)		/* W83782D */
1949 1950 1951
		found = 1;

	if (found)
1952
		pr_info("Found a %s chip at %#x\n",
1953 1954 1955
			val == 0x30 ? "W83782D" : "W83781D", (int)address);

 release:
1956 1957
	for (port--; port >= address; port--)
		release_region(port, 1);
1958 1959 1960 1961 1962 1963 1964 1965
	return found;
}

static int __init
w83781d_isa_device_add(unsigned short address)
{
	struct resource res = {
		.start	= address,
1966
		.end	= address + W83781D_EXTENT - 1,
1967 1968 1969 1970 1971 1972 1973 1974
		.name	= "w83781d",
		.flags	= IORESOURCE_IO,
	};
	int err;

	pdev = platform_device_alloc("w83781d", address);
	if (!pdev) {
		err = -ENOMEM;
1975
		pr_err("Device allocation failed\n");
1976 1977 1978 1979 1980
		goto exit;
	}

	err = platform_device_add_resources(pdev, &res, 1);
	if (err) {
1981
		pr_err("Device resource addition failed (%d)\n", err);
1982 1983 1984 1985 1986
		goto exit_device_put;
	}

	err = platform_device_add(pdev);
	if (err) {
1987
		pr_err("Device addition failed (%d)\n", err);
1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999
		goto exit_device_put;
	}

	return 0;

 exit_device_put:
	platform_device_put(pdev);
 exit:
	pdev = NULL;
	return err;
}

L
Linus Torvalds 已提交
2000
static int __init
2001
w83781d_isa_register(void)
L
Linus Torvalds 已提交
2002
{
2003 2004
	int res;

2005 2006 2007
	if (w83781d_isa_found(isa_address)) {
		res = platform_driver_register(&w83781d_isa_driver);
		if (res)
J
Jean Delvare 已提交
2008
			goto exit;
2009

2010 2011 2012 2013 2014
		/* Sets global pdev as a side effect */
		res = w83781d_isa_device_add(isa_address);
		if (res)
			goto exit_unreg_isa_driver;
	}
2015 2016

	return 0;
2017

2018
exit_unreg_isa_driver:
2019
	platform_driver_unregister(&w83781d_isa_driver);
2020
exit:
2021
	return res;
L
Linus Torvalds 已提交
2022 2023
}

2024
static void
2025
w83781d_isa_unregister(void)
L
Linus Torvalds 已提交
2026
{
2027 2028 2029 2030
	if (pdev) {
		platform_device_unregister(pdev);
		platform_driver_unregister(&w83781d_isa_driver);
	}
2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072
}
#else /* !CONFIG_ISA */

static struct w83781d_data *w83781d_data_if_isa(void)
{
	return NULL;
}

static int
w83781d_alias_detect(struct i2c_client *client, u8 chipid)
{
	return 0;
}

static int
w83781d_read_value(struct w83781d_data *data, u16 reg)
{
	int res;

	mutex_lock(&data->lock);
	res = w83781d_read_value_i2c(data, reg);
	mutex_unlock(&data->lock);

	return res;
}

static int
w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
{
	mutex_lock(&data->lock);
	w83781d_write_value_i2c(data, reg, value);
	mutex_unlock(&data->lock);

	return 0;
}

static int __init
w83781d_isa_register(void)
{
	return 0;
}

2073
static void
2074 2075 2076 2077 2078 2079 2080 2081 2082 2083
w83781d_isa_unregister(void)
{
}
#endif /* CONFIG_ISA */

static int __init
sensors_w83781d_init(void)
{
	int res;

2084 2085 2086 2087
	/*
	 * We register the ISA device first, so that we can skip the
	 * registration of an I2C interface to the same device.
	 */
2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105 2106 2107
	res = w83781d_isa_register();
	if (res)
		goto exit;

	res = i2c_add_driver(&w83781d_driver);
	if (res)
		goto exit_unreg_isa;

	return 0;

 exit_unreg_isa:
	w83781d_isa_unregister();
 exit:
	return res;
}

static void __exit
sensors_w83781d_exit(void)
{
	w83781d_isa_unregister();
L
Linus Torvalds 已提交
2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118
	i2c_del_driver(&w83781d_driver);
}

MODULE_AUTHOR("Frodo Looijaard <frodol@dds.nl>, "
	      "Philip Edelbrock <phil@netroedge.com>, "
	      "and Mark Studebaker <mdsxyz123@yahoo.com>");
MODULE_DESCRIPTION("W83781D driver");
MODULE_LICENSE("GPL");

module_init(sensors_w83781d_init);
module_exit(sensors_w83781d_exit);