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