w83781d.c 57.1 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4
/*
    w83781d.c - Part of lm_sensors, Linux kernel modules for hardware
                monitoring
    Copyright (c) 1998 - 2001  Frodo Looijaard <frodol@dds.nl>,
5 6
                               Philip Edelbrock <phil@netroedge.com>,
                               and Mark Studebaker <mdsxyz123@yahoo.com>
7
    Copyright (c) 2007 - 2008  Jean Delvare <khali@linux-fr.org>
L
Linus Torvalds 已提交
8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35

    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.
*/

/*
    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

*/

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 71 72 73
static int reset;
module_param(reset, bool, 0);
MODULE_PARM_DESC(reset, "Set to one to reset chip on load");

L
Linus Torvalds 已提交
74 75 76 77 78 79 80 81 82 83 84 85 86
static int init = 1;
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 148 149 150 151 152 153 154 155 156 157 158
#define W83781D_REG_PWMCLK12		0x5C
#define W83781D_REG_PWMCLK34		0x45C

#define W83781D_REG_I2C_ADDR		0x48
#define W83781D_REG_I2C_SUBADDR		0x4A

/* The following are undocumented in the data sheets however we
   received the information in an email from Winbond tech support */
/* 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

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

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);
}

172 173 174 175 176 177 178 179 180
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 已提交
181

182 183
#define TEMP_TO_REG(val)		SENSORS_LIMIT((val) / 1000, -127, 128)
#define TEMP_FROM_REG(val)		((val) * 1000)
L
Linus Torvalds 已提交
184 185

#define BEEP_MASK_FROM_REG(val,type)	((type) == as99127f ? \
186
					 (~(val)) & 0x7fff : (val) & 0xff7fff)
L
Linus Torvalds 已提交
187
#define BEEP_MASK_TO_REG(val,type)	((type) == as99127f ? \
188
					 (~(val)) & 0x7fff : (val) & 0xff7fff)
L
Linus Torvalds 已提交
189 190 191 192 193 194 195 196 197 198

#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;
199
	for (i = 0; i < 7; i++) {
L
Linus Torvalds 已提交
200 201 202 203
		if (val == 0)
			break;
		val >>= 1;
	}
204
	return i;
L
Linus Torvalds 已提交
205 206 207
}

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

213 214 215 216
	/* For ISA device only */
	const char *name;
	int isa_addr;

217
	struct mutex update_lock;
L
Linus Torvalds 已提交
218 219 220 221 222 223 224 225 226 227 228
	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 */
229 230 231
	s8 temp;		/* Register value */
	s8 temp_max;		/* Register value */
	s8 temp_max_hyst;	/* Register value */
L
Linus Torvalds 已提交
232 233 234 235 236 237 238 239
	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 */
240
	u8 pwm2_enable;		/* Boolean */
L
Linus Torvalds 已提交
241 242
	u16 sens[3];		/* 782D/783S only.
				   1 = pentium diode; 2 = 3904 diode;
J
Jean Delvare 已提交
243
				   4 = thermistor */
L
Linus Torvalds 已提交
244 245 246
	u8 vrm;
};

247 248 249
static struct w83781d_data *w83781d_data_if_isa(void);
static int w83781d_alias_detect(struct i2c_client *client, u8 chipid);

250 251
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 已提交
252
static struct w83781d_data *w83781d_update_device(struct device *dev);
253
static void w83781d_init_device(struct device *dev);
L
Linus Torvalds 已提交
254 255 256

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

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

#define sysfs_in_offsets(offset) \
291 292 293 294 295 296
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 已提交
297 298 299 300 301 302 303 304 305 306 307 308

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) \
309 310
static ssize_t show_##reg (struct device *dev, struct device_attribute *da, \
		char *buf) \
L
Linus Torvalds 已提交
311
{ \
312
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da); \
L
Linus Torvalds 已提交
313 314
	struct w83781d_data *data = w83781d_update_device(dev); \
	return sprintf(buf,"%ld\n", \
315 316
		FAN_FROM_REG(data->reg[attr->index], \
			DIV_FROM_REG(data->fan_div[attr->index]))); \
L
Linus Torvalds 已提交
317 318 319 320 321
}
show_fan_reg(fan);
show_fan_reg(fan_min);

static ssize_t
322 323
store_fan_min(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
324
{
325
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
326
	struct w83781d_data *data = dev_get_drvdata(dev);
327
	int nr = attr->index;
L
Linus Torvalds 已提交
328 329 330 331
	u32 val;

	val = simple_strtoul(buf, NULL, 10);

332
	mutex_lock(&data->update_lock);
333 334
	data->fan_min[nr] =
	    FAN_TO_REG(val, DIV_FROM_REG(data->fan_div[nr]));
335
	w83781d_write_value(data, W83781D_REG_FAN_MIN(nr),
336
			    data->fan_min[nr]);
L
Linus Torvalds 已提交
337

338
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
339 340 341
	return count;
}

342 343 344 345 346 347 348 349 350
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 已提交
351 352

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

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

#define sysfs_temp_offsets(offset) \
400 401 402 403 404 405
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 已提交
406 407 408 409 410 411

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

static ssize_t
412
show_vid_reg(struct device *dev, struct device_attribute *attr, char *buf)
L
Linus Torvalds 已提交
413 414 415 416 417
{
	struct w83781d_data *data = w83781d_update_device(dev);
	return sprintf(buf, "%ld\n", (long) vid_from_reg(data->vid, data->vrm));
}

418 419
static DEVICE_ATTR(cpu0_vid, S_IRUGO, show_vid_reg, NULL);

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

static ssize_t
428
store_vrm_reg(struct device *dev, struct device_attribute *attr, const char *buf, size_t count)
L
Linus Torvalds 已提交
429
{
430
	struct w83781d_data *data = dev_get_drvdata(dev);
L
Linus Torvalds 已提交
431 432 433 434 435 436 437 438
	u32 val;

	val = simple_strtoul(buf, NULL, 10);
	data->vrm = val;

	return count;
}

439 440
static DEVICE_ATTR(vrm, S_IRUGO | S_IWUSR, show_vrm_reg, store_vrm_reg);

L
Linus Torvalds 已提交
441
static ssize_t
442
show_alarms_reg(struct device *dev, struct device_attribute *attr, char *buf)
L
Linus Torvalds 已提交
443 444
{
	struct w83781d_data *data = w83781d_update_device(dev);
445
	return sprintf(buf, "%u\n", data->alarms);
L
Linus Torvalds 已提交
446 447
}

448 449
static DEVICE_ATTR(alarms, S_IRUGO, show_alarms_reg, NULL);

450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482
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);

483
static ssize_t show_beep_mask (struct device *dev, struct device_attribute *attr, char *buf)
L
Linus Torvalds 已提交
484 485 486 487 488 489 490
{
	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
491 492
store_beep_mask(struct device *dev, struct device_attribute *attr,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
493
{
494
	struct w83781d_data *data = dev_get_drvdata(dev);
495
	u32 val;
L
Linus Torvalds 已提交
496 497 498

	val = simple_strtoul(buf, NULL, 10);

499
	mutex_lock(&data->update_lock);
500 501
	data->beep_mask &= 0x8000; /* preserve beep enable */
	data->beep_mask |= BEEP_MASK_TO_REG(val, data->type);
502 503 504
	w83781d_write_value(data, W83781D_REG_BEEP_INTS1,
			    data->beep_mask & 0xff);
	w83781d_write_value(data, W83781D_REG_BEEP_INTS2,
505
			    (data->beep_mask >> 8) & 0xff);
506 507 508 509 510
	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 已提交
511

512 513
	return count;
}
L
Linus Torvalds 已提交
514

515 516
static DEVICE_ATTR(beep_mask, S_IRUGO | S_IWUSR,
		show_beep_mask, store_beep_mask);
L
Linus Torvalds 已提交
517

518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 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
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;
	unsigned long bit;
	u8 reg;

	bit = simple_strtoul(buf, NULL, 10);
	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);
611 612
static SENSOR_DEVICE_ATTR(beep_enable, S_IRUGO | S_IWUSR,
			show_beep, store_beep, 15);
613

L
Linus Torvalds 已提交
614
static ssize_t
615
show_fan_div(struct device *dev, struct device_attribute *da, char *buf)
L
Linus Torvalds 已提交
616
{
617
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
L
Linus Torvalds 已提交
618 619
	struct w83781d_data *data = w83781d_update_device(dev);
	return sprintf(buf, "%ld\n",
620
		       (long) DIV_FROM_REG(data->fan_div[attr->index]));
L
Linus Torvalds 已提交
621 622 623 624
}

/* 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
A
Andreas Mohr 已提交
625
   least surprise; the user doesn't expect the fan minimum to change just
L
Linus Torvalds 已提交
626 627
   because the divisor changed. */
static ssize_t
628 629
store_fan_div(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
630
{
631
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
632
	struct w83781d_data *data = dev_get_drvdata(dev);
L
Linus Torvalds 已提交
633
	unsigned long min;
634
	int nr = attr->index;
L
Linus Torvalds 已提交
635 636 637
	u8 reg;
	unsigned long val = simple_strtoul(buf, NULL, 10);

638
	mutex_lock(&data->update_lock);
J
Jean Delvare 已提交
639

L
Linus Torvalds 已提交
640 641 642 643 644 645
	/* 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);

646
	reg = (w83781d_read_value(data, nr==2 ? W83781D_REG_PIN : W83781D_REG_VID_FANDIV)
L
Linus Torvalds 已提交
647 648
	       & (nr==0 ? 0xcf : 0x3f))
	    | ((data->fan_div[nr] & 0x03) << (nr==0 ? 4 : 6));
649
	w83781d_write_value(data, nr==2 ? W83781D_REG_PIN : W83781D_REG_VID_FANDIV, reg);
L
Linus Torvalds 已提交
650 651 652

	/* w83781d and as99127f don't have extended divisor bits */
	if (data->type != w83781d && data->type != as99127f) {
653
		reg = (w83781d_read_value(data, W83781D_REG_VBAT)
L
Linus Torvalds 已提交
654 655
		       & ~(1 << (5 + nr)))
		    | ((data->fan_div[nr] & 0x04) << (3 + nr));
656
		w83781d_write_value(data, W83781D_REG_VBAT, reg);
L
Linus Torvalds 已提交
657 658 659 660
	}

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

663
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
664 665 666
	return count;
}

667 668 669 670 671 672
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 已提交
673 674

static ssize_t
675
show_pwm(struct device *dev, struct device_attribute *da, char *buf)
L
Linus Torvalds 已提交
676
{
677
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
L
Linus Torvalds 已提交
678
	struct w83781d_data *data = w83781d_update_device(dev);
679
	return sprintf(buf, "%d\n", (int)data->pwm[attr->index]);
L
Linus Torvalds 已提交
680 681 682
}

static ssize_t
683
show_pwm2_enable(struct device *dev, struct device_attribute *da, char *buf)
L
Linus Torvalds 已提交
684 685
{
	struct w83781d_data *data = w83781d_update_device(dev);
686
	return sprintf(buf, "%d\n", (int)data->pwm2_enable);
L
Linus Torvalds 已提交
687 688 689
}

static ssize_t
690 691
store_pwm(struct device *dev, struct device_attribute *da, const char *buf,
		size_t count)
L
Linus Torvalds 已提交
692
{
693
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
694
	struct w83781d_data *data = dev_get_drvdata(dev);
695
	int nr = attr->index;
L
Linus Torvalds 已提交
696 697 698 699
	u32 val;

	val = simple_strtoul(buf, NULL, 10);

700
	mutex_lock(&data->update_lock);
701 702
	data->pwm[nr] = SENSORS_LIMIT(val, 0, 255);
	w83781d_write_value(data, W83781D_REG_PWM[nr], data->pwm[nr]);
703
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
704 705 706 707
	return count;
}

static ssize_t
708 709
store_pwm2_enable(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
710
{
711
	struct w83781d_data *data = dev_get_drvdata(dev);
L
Linus Torvalds 已提交
712 713 714 715
	u32 val, reg;

	val = simple_strtoul(buf, NULL, 10);

716
	mutex_lock(&data->update_lock);
L
Linus Torvalds 已提交
717 718 719 720

	switch (val) {
	case 0:
	case 1:
721 722
		reg = w83781d_read_value(data, W83781D_REG_PWMCLK12);
		w83781d_write_value(data, W83781D_REG_PWMCLK12,
L
Linus Torvalds 已提交
723 724
				    (reg & 0xf7) | (val << 3));

725 726
		reg = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
		w83781d_write_value(data, W83781D_REG_BEEP_CONFIG,
L
Linus Torvalds 已提交
727 728
				    (reg & 0xef) | (!val << 4));

729
		data->pwm2_enable = val;
L
Linus Torvalds 已提交
730 731 732
		break;

	default:
733
		mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
734 735 736
		return -EINVAL;
	}

737
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
738 739 740
	return count;
}

741 742 743 744 745 746 747
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 已提交
748 749

static ssize_t
750
show_sensor(struct device *dev, struct device_attribute *da, char *buf)
L
Linus Torvalds 已提交
751
{
752
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
L
Linus Torvalds 已提交
753
	struct w83781d_data *data = w83781d_update_device(dev);
754
	return sprintf(buf, "%d\n", (int)data->sens[attr->index]);
L
Linus Torvalds 已提交
755 756 757
}

static ssize_t
758 759
store_sensor(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count)
L
Linus Torvalds 已提交
760
{
761
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
762
	struct w83781d_data *data = dev_get_drvdata(dev);
763
	int nr = attr->index;
L
Linus Torvalds 已提交
764 765 766 767
	u32 val, tmp;

	val = simple_strtoul(buf, NULL, 10);

768
	mutex_lock(&data->update_lock);
L
Linus Torvalds 已提交
769 770 771

	switch (val) {
	case 1:		/* PII/Celeron diode */
772 773
		tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
		w83781d_write_value(data, W83781D_REG_SCFG1,
774
				    tmp | BIT_SCFG1[nr]);
775 776
		tmp = w83781d_read_value(data, W83781D_REG_SCFG2);
		w83781d_write_value(data, W83781D_REG_SCFG2,
777 778
				    tmp | BIT_SCFG2[nr]);
		data->sens[nr] = val;
L
Linus Torvalds 已提交
779 780
		break;
	case 2:		/* 3904 */
781 782
		tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
		w83781d_write_value(data, W83781D_REG_SCFG1,
783
				    tmp | BIT_SCFG1[nr]);
784 785
		tmp = w83781d_read_value(data, W83781D_REG_SCFG2);
		w83781d_write_value(data, W83781D_REG_SCFG2,
786 787
				    tmp & ~BIT_SCFG2[nr]);
		data->sens[nr] = val;
L
Linus Torvalds 已提交
788
		break;
J
Jean Delvare 已提交
789 790 791 792 793
	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 */
794 795
		tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
		w83781d_write_value(data, W83781D_REG_SCFG1,
796 797
				    tmp & ~BIT_SCFG1[nr]);
		data->sens[nr] = val;
L
Linus Torvalds 已提交
798 799
		break;
	default:
J
Jean Delvare 已提交
800 801
		dev_err(dev, "Invalid sensor type %ld; must be 1, 2, or 4\n",
		       (long) val);
L
Linus Torvalds 已提交
802 803 804
		break;
	}

805
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
806 807 808
	return count;
}

809 810 811
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,
812
	show_sensor, store_sensor, 1);
813
static SENSOR_DEVICE_ATTR(temp3_type, S_IRUGO | S_IWUSR,
814
	show_sensor, store_sensor, 2);
L
Linus Torvalds 已提交
815 816 817 818 819

/* Assumes that adapter is of I2C, not ISA variety.
 * OTHERWISE DON'T CALL THIS
 */
static int
820
w83781d_detect_subclients(struct i2c_client *new_client)
L
Linus Torvalds 已提交
821 822 823
{
	int i, val1 = 0, id;
	int err;
824 825 826
	int address = new_client->addr;
	unsigned short sc_addr[2];
	struct i2c_adapter *adapter = new_client->adapter;
L
Linus Torvalds 已提交
827
	struct w83781d_data *data = i2c_get_clientdata(new_client);
828
	enum chips kind = data->type;
L
Linus Torvalds 已提交
829 830 831 832 833 834 835 836 837 838 839 840 841 842

	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;
			}
		}
843
		w83781d_write_value(data, W83781D_REG_I2C_SUBADDR,
L
Linus Torvalds 已提交
844 845
				(force_subclients[2] & 0x07) |
				((force_subclients[3] & 0x07) << 4));
846
		sc_addr[0] = force_subclients[2];
L
Linus Torvalds 已提交
847
	} else {
848
		val1 = w83781d_read_value(data, W83781D_REG_I2C_SUBADDR);
849
		sc_addr[0] = 0x48 + (val1 & 0x07);
L
Linus Torvalds 已提交
850 851 852 853 854
	}

	if (kind != w83783s) {
		if (force_subclients[0] == id &&
		    force_subclients[1] == address) {
855
			sc_addr[1] = force_subclients[3];
L
Linus Torvalds 已提交
856
		} else {
857
			sc_addr[1] = 0x48 + ((val1 >> 4) & 0x07);
L
Linus Torvalds 已提交
858
		}
859
		if (sc_addr[0] == sc_addr[1]) {
L
Linus Torvalds 已提交
860 861
			dev_err(&new_client->dev,
			       "Duplicate addresses 0x%x for subclients.\n",
862
			       sc_addr[0]);
L
Linus Torvalds 已提交
863 864 865 866 867 868
			err = -EBUSY;
			goto ERROR_SC_2;
		}
	}

	for (i = 0; i <= 1; i++) {
869 870
		data->lm75[i] = i2c_new_dummy(adapter, sc_addr[i]);
		if (!data->lm75[i]) {
L
Linus Torvalds 已提交
871 872
			dev_err(&new_client->dev, "Subclient %d "
				"registration at address 0x%x "
873 874
				"failed.\n", i, sc_addr[i]);
			err = -ENOMEM;
L
Linus Torvalds 已提交
875 876 877 878 879 880 881 882 883 884 885 886
			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:
887
	i2c_unregister_device(data->lm75[0]);
L
Linus Torvalds 已提交
888 889 890 891 892
ERROR_SC_2:
ERROR_SC_1:
	return err;
}

893 894 895
#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 已提交
896
	&sensor_dev_attr_in##X##_max.dev_attr.attr,		\
897 898
	&sensor_dev_attr_in##X##_alarm.dev_attr.attr,		\
	&sensor_dev_attr_in##X##_beep.dev_attr.attr
899

900 901 902
#define FAN_UNIT_ATTRS(X)					\
	&sensor_dev_attr_fan##X##_input.dev_attr.attr,		\
	&sensor_dev_attr_fan##X##_min.dev_attr.attr,		\
903 904 905
	&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
906

907 908 909
#define TEMP_UNIT_ATTRS(X)					\
	&sensor_dev_attr_temp##X##_input.dev_attr.attr,		\
	&sensor_dev_attr_temp##X##_max.dev_attr.attr,		\
910 911 912
	&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
913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929

static struct attribute* w83781d_attributes[] = {
	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,
930
	&sensor_dev_attr_beep_enable.dev_attr.attr,
931 932 933 934 935 936 937 938 939 940 941
	NULL
};
static const struct attribute_group w83781d_group = {
	.attrs = w83781d_attributes,
};

static struct attribute *w83781d_attributes_opt[] = {
	IN_UNIT_ATTRS(1),
	IN_UNIT_ATTRS(7),
	IN_UNIT_ATTRS(8),
	TEMP_UNIT_ATTRS(3),
942 943 944 945
	&sensor_dev_attr_pwm1.dev_attr.attr,
	&sensor_dev_attr_pwm2.dev_attr.attr,
	&sensor_dev_attr_pwm3.dev_attr.attr,
	&sensor_dev_attr_pwm4.dev_attr.attr,
946
	&dev_attr_pwm2_enable.attr,
947 948 949
	&sensor_dev_attr_temp1_type.dev_attr.attr,
	&sensor_dev_attr_temp2_type.dev_attr.attr,
	&sensor_dev_attr_temp3_type.dev_attr.attr,
950 951 952 953 954 955
	NULL
};
static const struct attribute_group w83781d_group_opt = {
	.attrs = w83781d_attributes_opt,
};

956
/* No clean up is done on error, it's up to the caller */
L
Linus Torvalds 已提交
957
static int
958
w83781d_create_files(struct device *dev, int kind, int is_isa)
L
Linus Torvalds 已提交
959 960 961
{
	int err;

962 963 964 965
	if ((err = sysfs_create_group(&dev->kobj, &w83781d_group)))
		return err;

	if (kind != w83783s) {
966 967 968 969 970
		if ((err = device_create_file(dev,
				&sensor_dev_attr_in1_input.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in1_min.dev_attr))
		    || (err = device_create_file(dev,
971 972 973 974 975
				&sensor_dev_attr_in1_max.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in1_alarm.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in1_beep.dev_attr)))
976 977 978
			return err;
	}
	if (kind != as99127f && kind != w83781d && kind != w83783s) {
979 980 981 982 983 984
		if ((err = device_create_file(dev,
				&sensor_dev_attr_in7_input.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in7_min.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in7_max.dev_attr))
985 986 987 988
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in7_alarm.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in7_beep.dev_attr))
989 990 991 992 993
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in8_input.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in8_min.dev_attr))
		    || (err = device_create_file(dev,
994 995 996 997 998
				&sensor_dev_attr_in8_max.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in8_alarm.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_in8_beep.dev_attr)))
999 1000 1001
			return err;
	}
	if (kind != w83783s) {
1002 1003 1004 1005
		if ((err = device_create_file(dev,
				&sensor_dev_attr_temp3_input.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_temp3_max.dev_attr))
1006
		    || (err = device_create_file(dev,
1007 1008 1009 1010 1011
				&sensor_dev_attr_temp3_max_hyst.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_temp3_alarm.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_temp3_beep.dev_attr)))
1012
			return err;
1013

1014
		if (kind != w83781d) {
1015 1016 1017 1018 1019
			err = sysfs_chmod_file(&dev->kobj,
				&sensor_dev_attr_temp3_alarm.dev_attr.attr,
				S_IRUGO | S_IWUSR);
			if (err)
				return err;
1020
		}
L
Linus Torvalds 已提交
1021 1022
	}

1023
	if (kind != w83781d && kind != as99127f) {
1024 1025 1026 1027
		if ((err = device_create_file(dev,
				&sensor_dev_attr_pwm1.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_pwm2.dev_attr))
1028 1029
		    || (err = device_create_file(dev, &dev_attr_pwm2_enable)))
			return err;
L
Linus Torvalds 已提交
1030
	}
1031
	if (kind == w83782d && !is_isa) {
1032 1033 1034 1035
		if ((err = device_create_file(dev,
				&sensor_dev_attr_pwm3.dev_attr))
		    || (err = device_create_file(dev,
				&sensor_dev_attr_pwm4.dev_attr)))
1036 1037 1038 1039
			return err;
	}

	if (kind != as99127f && kind != w83781d) {
1040 1041
		if ((err = device_create_file(dev,
				&sensor_dev_attr_temp1_type.dev_attr))
1042
		    || (err = device_create_file(dev,
1043
				&sensor_dev_attr_temp2_type.dev_attr)))
1044 1045 1046
			return err;
		if (kind != w83783s) {
			if ((err = device_create_file(dev,
1047
					&sensor_dev_attr_temp3_type.dev_attr)))
1048
				return err;
L
Linus Torvalds 已提交
1049
		}
1050
	}
L
Linus Torvalds 已提交
1051

1052 1053
	return 0;
}
L
Linus Torvalds 已提交
1054

1055
/* Return 0 if detection is successful, -ENODEV otherwise */
1056
static int
1057
w83781d_detect(struct i2c_client *client, struct i2c_board_info *info)
1058
{
1059
	int val1, val2;
1060 1061 1062
	struct w83781d_data *isa = w83781d_data_if_isa();
	struct i2c_adapter *adapter = client->adapter;
	int address = client->addr;
1063
	const char *client_name;
1064 1065
	enum vendor { winbond, asus } vendid;

1066 1067
	if (!i2c_check_functionality(adapter, I2C_FUNC_SMBUS_BYTE_DATA))
		return -ENODEV;
L
Linus Torvalds 已提交
1068

1069 1070 1071 1072 1073
	/* We block updates of the ISA device to minimize the risk of
	   concurrent access to the same W83781D chip through different
	   interfaces. */
	if (isa)
		mutex_lock(&isa->update_lock);
L
Linus Torvalds 已提交
1074

1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098
	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) ||
	     ( (val1 & 0x80) && val2 != 0x5c && val2 != 0x12))) {
		dev_dbg(&adapter->dev,
			"Detection of w83781d chip failed at step 4\n");
		goto err_nodev;
	}
	/* If Winbond SMBus, check address at 0x48.
	   Asus doesn't support, except for as99127f rev.2 */
	if ((!(val1 & 0x80) && val2 == 0xa3) ||
	    ( (val1 & 0x80) && val2 == 0x5c)) {
		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");
1099
			goto err_nodev;
L
Linus Torvalds 已提交
1100 1101 1102
		}
	}

1103
	/* Put it now into bank 0 and Vendor ID High Byte */
1104 1105 1106
	i2c_smbus_write_byte_data(client, W83781D_REG_BANK,
		(i2c_smbus_read_byte_data(client, W83781D_REG_BANK)
		 & 0x78) | 0x80);
L
Linus Torvalds 已提交
1107

1108 1109 1110 1111 1112 1113 1114 1115 1116 1117
	/* 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 已提交
1118 1119
	}

1120 1121 1122
	/* Determine the chip type. */
	val1 = i2c_smbus_read_byte_data(client, W83781D_REG_WCHIPID);
	if ((val1 == 0x10 || val1 == 0x11) && vendid == winbond)
L
Linus Torvalds 已提交
1123
		client_name = "w83781d";
1124
	else if (val1 == 0x30 && vendid == winbond)
L
Linus Torvalds 已提交
1125
		client_name = "w83782d";
1126
	else if (val1 == 0x40 && vendid == winbond && address == 0x2d)
L
Linus Torvalds 已提交
1127
		client_name = "w83783s";
1128
	else if (val1 == 0x31)
L
Linus Torvalds 已提交
1129
		client_name = "as99127f";
1130 1131 1132 1133 1134 1135 1136
	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 已提交
1137 1138
	}

1139 1140 1141
	if (isa)
		mutex_unlock(&isa->update_lock);

1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167
	strlcpy(info->type, client_name, I2C_NAME_SIZE);

	return 0;

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

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 已提交
1168

1169 1170
	data->type = id->driver_data;
	data->client = client;
L
Linus Torvalds 已提交
1171 1172

	/* attach secondary i2c lm75-like clients */
1173 1174
	err = w83781d_detect_subclients(client);
	if (err)
1175
		goto ERROR3;
L
Linus Torvalds 已提交
1176 1177

	/* Initialize the chip */
1178
	w83781d_init_device(dev);
L
Linus Torvalds 已提交
1179 1180

	/* Register sysfs hooks */
1181
	err = w83781d_create_files(dev, data->type, 0);
1182
	if (err)
1183 1184
		goto ERROR4;

1185 1186 1187
	data->hwmon_dev = hwmon_device_register(dev);
	if (IS_ERR(data->hwmon_dev)) {
		err = PTR_ERR(data->hwmon_dev);
1188
		goto ERROR4;
L
Linus Torvalds 已提交
1189 1190 1191 1192
	}

	return 0;

1193
ERROR4:
1194 1195 1196
	sysfs_remove_group(&dev->kobj, &w83781d_group);
	sysfs_remove_group(&dev->kobj, &w83781d_group_opt);

1197 1198 1199 1200
	if (data->lm75[0])
		i2c_unregister_device(data->lm75[0]);
	if (data->lm75[1])
		i2c_unregister_device(data->lm75[1]);
L
Linus Torvalds 已提交
1201 1202 1203 1204 1205 1206 1207
ERROR3:
	kfree(data);
ERROR1:
	return err;
}

static int
1208
w83781d_remove(struct i2c_client *client)
L
Linus Torvalds 已提交
1209
{
1210
	struct w83781d_data *data = i2c_get_clientdata(client);
1211
	struct device *dev = &client->dev;
L
Linus Torvalds 已提交
1212

1213
	hwmon_device_unregister(data->hwmon_dev);
L
Linus Torvalds 已提交
1214

1215 1216
	sysfs_remove_group(&dev->kobj, &w83781d_group);
	sysfs_remove_group(&dev->kobj, &w83781d_group_opt);
L
Linus Torvalds 已提交
1217

1218 1219 1220 1221
	if (data->lm75[0])
		i2c_unregister_device(data->lm75[0]);
	if (data->lm75[1])
		i2c_unregister_device(data->lm75[1]);
1222

1223
	kfree(data);
L
Linus Torvalds 已提交
1224 1225 1226 1227 1228

	return 0;
}

static int
1229
w83781d_read_value_i2c(struct w83781d_data *data, u16 reg)
L
Linus Torvalds 已提交
1230
{
1231
	struct i2c_client *client = data->client;
1232
	int res, bank;
L
Linus Torvalds 已提交
1233 1234
	struct i2c_client *cl;

1235 1236 1237 1238 1239 1240 1241
	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 已提交
1242
	} else {
1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259
		/* switch to subclient */
		cl = data->lm75[bank - 1];
		/* convert from ISA to LM75 I2C addresses */
		switch (reg & 0xff) {
		case 0x50:	/* TEMP */
			res = swab16(i2c_smbus_read_word_data(cl, 0));
			break;
		case 0x52:	/* CONFIG */
			res = i2c_smbus_read_byte_data(cl, 1);
			break;
		case 0x53:	/* HYST */
			res = swab16(i2c_smbus_read_word_data(cl, 2));
			break;
		case 0x55:	/* OVER */
		default:
			res = swab16(i2c_smbus_read_word_data(cl, 3));
			break;
L
Linus Torvalds 已提交
1260 1261
		}
	}
1262 1263 1264
	if (bank > 2)
		i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);

L
Linus Torvalds 已提交
1265 1266 1267 1268
	return res;
}

static int
1269
w83781d_write_value_i2c(struct w83781d_data *data, u16 reg, u16 value)
L
Linus Torvalds 已提交
1270
{
1271
	struct i2c_client *client = data->client;
1272
	int bank;
L
Linus Torvalds 已提交
1273 1274
	struct i2c_client *cl;

1275 1276 1277 1278 1279 1280 1281 1282
	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 已提交
1283
	} else {
1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296
		/* 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 */
			i2c_smbus_write_word_data(cl, 2, swab16(value));
			break;
		case 0x55:	/* OVER */
			i2c_smbus_write_word_data(cl, 3, swab16(value));
			break;
L
Linus Torvalds 已提交
1297 1298
		}
	}
1299 1300 1301
	if (bank > 2)
		i2c_smbus_write_byte_data(client, W83781D_REG_BANK, 0);

L
Linus Torvalds 已提交
1302 1303 1304 1305
	return 0;
}

static void
1306
w83781d_init_device(struct device *dev)
L
Linus Torvalds 已提交
1307
{
1308
	struct w83781d_data *data = dev_get_drvdata(dev);
L
Linus Torvalds 已提交
1309 1310 1311 1312
	int i, p;
	int type = data->type;
	u8 tmp;

1313
	if (reset && type != as99127f) { /* this resets registers we don't have
L
Linus Torvalds 已提交
1314
					   documentation for on the as99127f */
1315 1316 1317 1318 1319 1320
		/* 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. */
1321
		dev_info(dev, "If reset=1 solved a problem you were "
1322 1323
			 "having, please report!\n");

L
Linus Torvalds 已提交
1324
		/* save these registers */
1325 1326
		i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
		p = w83781d_read_value(data, W83781D_REG_PWMCLK12);
L
Linus Torvalds 已提交
1327 1328
		/* Reset all except Watchdog values and last conversion values
		   This sets fan-divs to 2, among others */
1329
		w83781d_write_value(data, W83781D_REG_CONFIG, 0x80);
L
Linus Torvalds 已提交
1330 1331
		/* Restore the registers and disable power-on abnormal beep.
		   This saves FAN 1/2/3 input/output values set by BIOS. */
1332 1333
		w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
		w83781d_write_value(data, W83781D_REG_PWMCLK12, p);
L
Linus Torvalds 已提交
1334 1335 1336
		/* 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 */
1337
		w83781d_write_value(data, W83781D_REG_BEEP_INTS2, 0);
L
Linus Torvalds 已提交
1338 1339
	}

1340 1341 1342
	/* Disable power-on abnormal beep, as advised by the datasheet.
	   Already done if reset=1. */
	if (init && !reset && type != as99127f) {
1343 1344
		i = w83781d_read_value(data, W83781D_REG_BEEP_CONFIG);
		w83781d_write_value(data, W83781D_REG_BEEP_CONFIG, i | 0x80);
1345 1346
	}

1347
	data->vrm = vid_which_vrm();
L
Linus Torvalds 已提交
1348 1349

	if ((type != w83781d) && (type != as99127f)) {
1350
		tmp = w83781d_read_value(data, W83781D_REG_SCFG1);
L
Linus Torvalds 已提交
1351 1352
		for (i = 1; i <= 3; i++) {
			if (!(tmp & BIT_SCFG1[i - 1])) {
J
Jean Delvare 已提交
1353
				data->sens[i - 1] = 4;
L
Linus Torvalds 已提交
1354 1355
			} else {
				if (w83781d_read_value
1356
				    (data,
L
Linus Torvalds 已提交
1357 1358 1359 1360 1361
				     W83781D_REG_SCFG2) & BIT_SCFG2[i - 1])
					data->sens[i - 1] = 1;
				else
					data->sens[i - 1] = 2;
			}
1362
			if (type == w83783s && i == 2)
L
Linus Torvalds 已提交
1363 1364 1365 1366 1367 1368
				break;
		}
	}

	if (init && type != as99127f) {
		/* Enable temp2 */
1369
		tmp = w83781d_read_value(data, W83781D_REG_TEMP2_CONFIG);
L
Linus Torvalds 已提交
1370
		if (tmp & 0x01) {
1371
			dev_warn(dev, "Enabling temp2, readings "
L
Linus Torvalds 已提交
1372
				 "might not make sense\n");
1373
			w83781d_write_value(data, W83781D_REG_TEMP2_CONFIG,
L
Linus Torvalds 已提交
1374 1375 1376 1377
				tmp & 0xfe);
		}

		/* Enable temp3 */
1378
		if (type != w83783s) {
1379
			tmp = w83781d_read_value(data,
L
Linus Torvalds 已提交
1380 1381
				W83781D_REG_TEMP3_CONFIG);
			if (tmp & 0x01) {
1382
				dev_warn(dev, "Enabling temp3, "
L
Linus Torvalds 已提交
1383
					 "readings might not make sense\n");
1384
				w83781d_write_value(data,
L
Linus Torvalds 已提交
1385 1386 1387 1388 1389 1390
					W83781D_REG_TEMP3_CONFIG, tmp & 0xfe);
			}
		}
	}

	/* Start monitoring */
1391 1392
	w83781d_write_value(data, W83781D_REG_CONFIG,
			    (w83781d_read_value(data,
L
Linus Torvalds 已提交
1393 1394
						W83781D_REG_CONFIG) & 0xf7)
			    | 0x01);
1395 1396

	/* A few vars need to be filled upon startup */
1397 1398
	for (i = 0; i < 3; i++) {
		data->fan_min[i] = w83781d_read_value(data,
1399 1400 1401 1402
					W83781D_REG_FAN_MIN(i));
	}

	mutex_init(&data->update_lock);
L
Linus Torvalds 已提交
1403 1404 1405 1406
}

static struct w83781d_data *w83781d_update_device(struct device *dev)
{
1407
	struct w83781d_data *data = dev_get_drvdata(dev);
1408
	struct i2c_client *client = data->client;
L
Linus Torvalds 已提交
1409 1410
	int i;

1411
	mutex_lock(&data->update_lock);
L
Linus Torvalds 已提交
1412 1413 1414 1415 1416 1417

	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++) {
1418
			if (data->type == w83783s && i == 1)
L
Linus Torvalds 已提交
1419 1420
				continue;	/* 783S has no in1 */
			data->in[i] =
1421
			    w83781d_read_value(data, W83781D_REG_IN(i));
L
Linus Torvalds 已提交
1422
			data->in_min[i] =
1423
			    w83781d_read_value(data, W83781D_REG_IN_MIN(i));
L
Linus Torvalds 已提交
1424
			data->in_max[i] =
1425
			    w83781d_read_value(data, W83781D_REG_IN_MAX(i));
1426
			if ((data->type != w83782d) && (i == 6))
L
Linus Torvalds 已提交
1427 1428
				break;
		}
1429 1430
		for (i = 0; i < 3; i++) {
			data->fan[i] =
1431
			    w83781d_read_value(data, W83781D_REG_FAN(i));
1432
			data->fan_min[i] =
1433
			    w83781d_read_value(data, W83781D_REG_FAN_MIN(i));
L
Linus Torvalds 已提交
1434 1435
		}
		if (data->type != w83781d && data->type != as99127f) {
1436 1437
			for (i = 0; i < 4; i++) {
				data->pwm[i] =
1438
				    w83781d_read_value(data,
1439
						       W83781D_REG_PWM[i]);
1440 1441
				/* Only W83782D on SMBus has PWM3 and PWM4 */
				if ((data->type != w83782d || !client)
1442
				    && i == 1)
L
Linus Torvalds 已提交
1443 1444 1445
					break;
			}
			/* Only PWM2 can be disabled */
1446
			data->pwm2_enable = (w83781d_read_value(data,
L
Linus Torvalds 已提交
1447 1448 1449
					      W83781D_REG_PWMCLK12) & 0x08) >> 3;
		}

1450
		data->temp = w83781d_read_value(data, W83781D_REG_TEMP(1));
L
Linus Torvalds 已提交
1451
		data->temp_max =
1452
		    w83781d_read_value(data, W83781D_REG_TEMP_OVER(1));
L
Linus Torvalds 已提交
1453
		data->temp_max_hyst =
1454
		    w83781d_read_value(data, W83781D_REG_TEMP_HYST(1));
L
Linus Torvalds 已提交
1455
		data->temp_add[0] =
1456
		    w83781d_read_value(data, W83781D_REG_TEMP(2));
L
Linus Torvalds 已提交
1457
		data->temp_max_add[0] =
1458
		    w83781d_read_value(data, W83781D_REG_TEMP_OVER(2));
L
Linus Torvalds 已提交
1459
		data->temp_max_hyst_add[0] =
1460
		    w83781d_read_value(data, W83781D_REG_TEMP_HYST(2));
1461
		if (data->type != w83783s) {
L
Linus Torvalds 已提交
1462
			data->temp_add[1] =
1463
			    w83781d_read_value(data, W83781D_REG_TEMP(3));
L
Linus Torvalds 已提交
1464
			data->temp_max_add[1] =
1465
			    w83781d_read_value(data,
L
Linus Torvalds 已提交
1466 1467
					       W83781D_REG_TEMP_OVER(3));
			data->temp_max_hyst_add[1] =
1468
			    w83781d_read_value(data,
L
Linus Torvalds 已提交
1469 1470
					       W83781D_REG_TEMP_HYST(3));
		}
1471
		i = w83781d_read_value(data, W83781D_REG_VID_FANDIV);
1472
		data->vid = i & 0x0f;
1473
		data->vid |= (w83781d_read_value(data,
1474
					W83781D_REG_CHIPID) & 0x01) << 4;
L
Linus Torvalds 已提交
1475 1476
		data->fan_div[0] = (i >> 4) & 0x03;
		data->fan_div[1] = (i >> 6) & 0x03;
1477
		data->fan_div[2] = (w83781d_read_value(data,
1478
					W83781D_REG_PIN) >> 6) & 0x03;
L
Linus Torvalds 已提交
1479
		if ((data->type != w83781d) && (data->type != as99127f)) {
1480
			i = w83781d_read_value(data, W83781D_REG_VBAT);
L
Linus Torvalds 已提交
1481 1482
			data->fan_div[0] |= (i >> 3) & 0x04;
			data->fan_div[1] |= (i >> 4) & 0x04;
1483
			data->fan_div[2] |= (i >> 5) & 0x04;
L
Linus Torvalds 已提交
1484
		}
1485
		if (data->type == w83782d) {
1486
			data->alarms = w83781d_read_value(data,
1487
						W83782D_REG_ALARM1)
1488
				     | (w83781d_read_value(data,
1489
						W83782D_REG_ALARM2) << 8)
1490
				     | (w83781d_read_value(data,
1491 1492
						W83782D_REG_ALARM3) << 16);
		} else if (data->type == w83783s) {
1493
			data->alarms = w83781d_read_value(data,
1494
						W83782D_REG_ALARM1)
1495
				     | (w83781d_read_value(data,
1496 1497 1498 1499
						W83782D_REG_ALARM2) << 8);
		} else {
			/* No real-time status registers, fall back to
			   interrupt status registers */
1500
			data->alarms = w83781d_read_value(data,
1501
						W83781D_REG_ALARM1)
1502
				     | (w83781d_read_value(data,
1503
						W83781D_REG_ALARM2) << 8);
L
Linus Torvalds 已提交
1504
		}
1505
		i = w83781d_read_value(data, W83781D_REG_BEEP_INTS2);
1506
		data->beep_mask = (i << 8) +
1507
		    w83781d_read_value(data, W83781D_REG_BEEP_INTS1);
L
Linus Torvalds 已提交
1508 1509
		if ((data->type != w83781d) && (data->type != as99127f)) {
			data->beep_mask |=
1510
			    w83781d_read_value(data,
L
Linus Torvalds 已提交
1511 1512 1513 1514 1515 1516
					       W83781D_REG_BEEP_INTS3) << 16;
		}
		data->last_updated = jiffies;
		data->valid = 1;
	}

1517
	mutex_unlock(&data->update_lock);
L
Linus Torvalds 已提交
1518 1519 1520 1521

	return data;
}

1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539
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,
1540
	.address_list	= normal_i2c,
1541 1542 1543 1544 1545
};

/*
 * ISA related code
 */
1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558
#ifdef CONFIG_ISA

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

static unsigned short isa_address = 0x290;

/* I2C devices get this name attribute automatically, but for ISA devices
   we must create it by ourselves. */
static ssize_t
show_name(struct device *dev, struct device_attribute *devattr, char *buf)
{
	struct w83781d_data *data = dev_get_drvdata(dev);
1559
	return sprintf(buf, "%s\n", data->name);
1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570
}
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)
{
1571
	struct w83781d_data *isa;
1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586
	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 */

	/* We compare all the limit registers, the config register and the
	 * interrupt mask registers */
	for (i = 0x2b; i <= 0x3d; i++) {
1587 1588
		if (w83781d_read_value(isa, i) !=
		    i2c_smbus_read_byte_data(client, i))
1589 1590 1591
			return 0;
	}
	if (w83781d_read_value(isa, W83781D_REG_CONFIG) !=
1592
	    i2c_smbus_read_byte_data(client, W83781D_REG_CONFIG))
1593 1594
		return 0;
	for (i = 0x43; i <= 0x46; i++) {
1595 1596
		if (w83781d_read_value(isa, i) !=
		    i2c_smbus_read_byte_data(client, i))
1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614
			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,
1615
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1616
		outb_p(reg >> 8,
1617
		       data->isa_addr + W83781D_DATA_REG_OFFSET);
1618
	}
1619 1620
	outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
	res = inb_p(data->isa_addr + W83781D_DATA_REG_OFFSET);
1621 1622
	if (word_sized) {
		outb_p((reg & 0xff) + 1,
1623
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1624
		res =
1625
		    (res << 8) + inb_p(data->isa_addr +
1626 1627 1628 1629
				       W83781D_DATA_REG_OFFSET);
	}
	if (reg & 0xff00) {
		outb_p(W83781D_REG_BANK,
1630 1631
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
		outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646
	}
	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,
1647
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1648
		outb_p(reg >> 8,
1649
		       data->isa_addr + W83781D_DATA_REG_OFFSET);
1650
	}
1651
	outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1652 1653
	if (word_sized) {
		outb_p(value >> 8,
1654
		       data->isa_addr + W83781D_DATA_REG_OFFSET);
1655
		outb_p((reg & 0xff) + 1,
1656
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1657
	}
1658
	outb_p(value & 0xff, data->isa_addr + W83781D_DATA_REG_OFFSET);
1659 1660
	if (reg & 0xff00) {
		outb_p(W83781D_REG_BANK,
1661 1662
		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
		outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674
	}
}

/* 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! */
static int
w83781d_read_value(struct w83781d_data *data, u16 reg)
{
1675
	struct i2c_client *client = data->client;
1676 1677 1678
	int res;

	mutex_lock(&data->lock);
1679
	if (client)
1680 1681 1682 1683 1684 1685 1686 1687 1688 1689
		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)
{
1690
	struct i2c_client *client = data->client;
1691 1692

	mutex_lock(&data->lock);
1693
	if (client)
1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721
		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);
1722
	data->isa_addr = res->start;
1723 1724 1725 1726 1727 1728
	platform_set_drvdata(pdev, data);

	reg = w83781d_read_value(data, W83781D_REG_WCHIPID);
	switch (reg) {
	case 0x30:
		data->type = w83782d;
1729
		data->name = "w83782d";
1730 1731 1732
		break;
	default:
		data->type = w83781d;
1733
		data->name = "w83781d";
1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775
	}

	/* 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:
	sysfs_remove_group(&pdev->dev.kobj, &w83781d_group);
	sysfs_remove_group(&pdev->dev.kobj, &w83781d_group_opt);
	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);
	sysfs_remove_group(&pdev->dev.kobj, &w83781d_group);
	sysfs_remove_group(&pdev->dev.kobj, &w83781d_group_opt);
	device_remove_file(&pdev->dev, &dev_attr_name);
1776
	release_region(data->isa_addr + W83781D_ADDR_REG_OFFSET, 2);
1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790
	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),
};

1791 1792 1793 1794 1795
/* return 1 if a supported chip is found, 0 otherwise */
static int __init
w83781d_isa_found(unsigned short address)
{
	int val, save, found = 0;
1796 1797 1798 1799 1800 1801 1802
	int port;

	/* Some boards declare base+0 to base+7 as a PNP device, some base+4
	 * to base+7 and some base+5 to base+6. So we better request each port
	 * individually for the probing phase. */
	for (port = address; port < address + W83781D_EXTENT; port++) {
		if (!request_region(port, 1, "w83781d")) {
1803
			pr_debug("Failed to request port 0x%x\n", port);
1804 1805
			goto release;
		}
1806
	}
1807 1808 1809 1810 1811 1812 1813 1814

#define REALLY_SLOW_IO
	/* We need the timeouts for at least some W83781D-like
	   chips. But only if we read 'undefined' registers. */
	val = inb_p(address + 1);
	if (inb_p(address + 2) != val
	 || inb_p(address + 3) != val
	 || inb_p(address + 7) != val) {
1815
		pr_debug("Detection failed at step %d\n", 1);
1816 1817 1818 1819 1820 1821 1822 1823
		goto release;
	}
#undef REALLY_SLOW_IO

	/* 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. */
	save = inb_p(address + W83781D_ADDR_REG_OFFSET);
	if (save & 0x80) {
1824
		pr_debug("Detection failed at step %d\n", 2);
1825 1826 1827 1828 1829 1830
		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);
1831
		pr_debug("Detection failed at step %d\n", 3);
1832 1833 1834 1835 1836 1837 1838
		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) {
1839
		pr_debug("Detection failed at step %d\n", 4);
1840 1841 1842 1843 1844 1845 1846 1847
		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))) {
1848
		pr_debug("Detection failed at step %d\n", 5);
1849 1850 1851 1852 1853
		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 */
1854
		pr_debug("Detection failed at step %d\n", 6);
1855 1856 1857 1858 1859
		goto release;
	}

	/* The busy flag should be clear again */
	if (inb_p(address + W83781D_ADDR_REG_OFFSET) & 0x80) {
1860
		pr_debug("Detection failed at step %d\n", 7);
1861 1862 1863 1864 1865 1866 1867 1868 1869 1870
		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 */
1871
	 || val == 0x30)		/* W83782D */
1872 1873 1874
		found = 1;

	if (found)
1875
		pr_info("Found a %s chip at %#x\n",
1876 1877 1878
			val == 0x30 ? "W83782D" : "W83781D", (int)address);

 release:
1879 1880
	for (port--; port >= address; port--)
		release_region(port, 1);
1881 1882 1883 1884 1885 1886 1887 1888
	return found;
}

static int __init
w83781d_isa_device_add(unsigned short address)
{
	struct resource res = {
		.start	= address,
1889
		.end	= address + W83781D_EXTENT - 1,
1890 1891 1892 1893 1894 1895 1896 1897
		.name	= "w83781d",
		.flags	= IORESOURCE_IO,
	};
	int err;

	pdev = platform_device_alloc("w83781d", address);
	if (!pdev) {
		err = -ENOMEM;
1898
		pr_err("Device allocation failed\n");
1899 1900 1901 1902 1903
		goto exit;
	}

	err = platform_device_add_resources(pdev, &res, 1);
	if (err) {
1904
		pr_err("Device resource addition failed (%d)\n", err);
1905 1906 1907 1908 1909
		goto exit_device_put;
	}

	err = platform_device_add(pdev);
	if (err) {
1910
		pr_err("Device addition failed (%d)\n", err);
1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922
		goto exit_device_put;
	}

	return 0;

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

L
Linus Torvalds 已提交
1923
static int __init
1924
w83781d_isa_register(void)
L
Linus Torvalds 已提交
1925
{
1926 1927
	int res;

1928 1929 1930
	if (w83781d_isa_found(isa_address)) {
		res = platform_driver_register(&w83781d_isa_driver);
		if (res)
J
Jean Delvare 已提交
1931
			goto exit;
1932

1933 1934 1935 1936 1937
		/* Sets global pdev as a side effect */
		res = w83781d_isa_device_add(isa_address);
		if (res)
			goto exit_unreg_isa_driver;
	}
1938 1939

	return 0;
1940

1941
exit_unreg_isa_driver:
1942
	platform_driver_unregister(&w83781d_isa_driver);
1943
exit:
1944
	return res;
L
Linus Torvalds 已提交
1945 1946
}

1947
static void
1948
w83781d_isa_unregister(void)
L
Linus Torvalds 已提交
1949
{
1950 1951 1952 1953
	if (pdev) {
		platform_device_unregister(pdev);
		platform_driver_unregister(&w83781d_isa_driver);
	}
1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995
}
#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;
}

1996
static void
1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028
w83781d_isa_unregister(void)
{
}
#endif /* CONFIG_ISA */

static int __init
sensors_w83781d_init(void)
{
	int res;

	/* We register the ISA device first, so that we can skip the
	 * registration of an I2C interface to the same device. */
	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 已提交
2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039
	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);