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 */
46static const unsigned short normal_i2c[] = { 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d,
47						0x2e, 0x2f, I2C_CLIENT_END };
48
49enum chips { w83781d, w83782d, w83783s, as99127f };
50
51/* Insmod parameters */
52static unsigned short force_subclients[4];
53module_param_array(force_subclients, short, NULL, 0);
54MODULE_PARM_DESC(force_subclients,
55		 "List of subclient addresses: {bus, clientaddr, subclientaddr1, subclientaddr2}");
56
57static bool reset;
58module_param(reset, bool, 0);
59MODULE_PARM_DESC(reset, "Set to one to reset chip on load");
60
61static bool init = 1;
62module_param(init, bool, 0);
63MODULE_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 */
128static 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
141static const u8 BIT_SCFG1[] = { 0x02, 0x04, 0x08 };
142
143#define W83781D_REG_SCFG2		0x59
144static 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
152static inline u8
153FAN_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
161static inline long
162FAN_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
181static inline u8
182DIV_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
195struct 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
237static struct w83781d_data *w83781d_data_if_isa(void);
238static int w83781d_alias_detect(struct i2c_client *client, u8 chipid);
239
240static int w83781d_read_value(struct w83781d_data *data, u16 reg);
241static int w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value);
242static struct w83781d_data *w83781d_update_device(struct device *dev);
243static void w83781d_init_device(struct device *dev);
244
245/* following are the sysfs callback functions */
246#define show_in_reg(reg) \
247static 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}
255show_in_reg(in);
256show_in_reg(in_min);
257show_in_reg(in_max);
258
259#define store_in_reg(REG, reg) \
260static 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}
278store_in_reg(MIN, min);
279store_in_reg(MAX, max);
280
281#define sysfs_in_offsets(offset) \
282static SENSOR_DEVICE_ATTR(in##offset##_input, S_IRUGO, \
283		show_in, NULL, offset); \
284static SENSOR_DEVICE_ATTR(in##offset##_min, S_IRUGO | S_IWUSR, \
285		show_in_min, store_in_min, offset); \
286static SENSOR_DEVICE_ATTR(in##offset##_max, S_IRUGO | S_IWUSR, \
287		show_in_max, store_in_max, offset)
288
289sysfs_in_offsets(0);
290sysfs_in_offsets(1);
291sysfs_in_offsets(2);
292sysfs_in_offsets(3);
293sysfs_in_offsets(4);
294sysfs_in_offsets(5);
295sysfs_in_offsets(6);
296sysfs_in_offsets(7);
297sysfs_in_offsets(8);
298
299#define show_fan_reg(reg) \
300static 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}
309show_fan_reg(fan);
310show_fan_reg(fan_min);
311
312static ssize_t
313store_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
336static SENSOR_DEVICE_ATTR(fan1_input, S_IRUGO, show_fan, NULL, 0);
337static SENSOR_DEVICE_ATTR(fan1_min, S_IRUGO | S_IWUSR,
338		show_fan_min, store_fan_min, 0);
339static SENSOR_DEVICE_ATTR(fan2_input, S_IRUGO, show_fan, NULL, 1);
340static SENSOR_DEVICE_ATTR(fan2_min, S_IRUGO | S_IWUSR,
341		show_fan_min, store_fan_min, 1);
342static SENSOR_DEVICE_ATTR(fan3_input, S_IRUGO, show_fan, NULL, 2);
343static SENSOR_DEVICE_ATTR(fan3_min, S_IRUGO | S_IWUSR,
344		show_fan_min, store_fan_min, 2);
345
346#define show_temp_reg(reg) \
347static 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}
360show_temp_reg(temp);
361show_temp_reg(temp_max);
362show_temp_reg(temp_max_hyst);
363
364#define store_temp_reg(REG, reg) \
365static 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}
390store_temp_reg(OVER, max);
391store_temp_reg(HYST, max_hyst);
392
393#define sysfs_temp_offsets(offset) \
394static SENSOR_DEVICE_ATTR(temp##offset##_input, S_IRUGO, \
395		show_temp, NULL, offset); \
396static SENSOR_DEVICE_ATTR(temp##offset##_max, S_IRUGO | S_IWUSR, \
397		show_temp_max, store_temp_max, offset); \
398static SENSOR_DEVICE_ATTR(temp##offset##_max_hyst, S_IRUGO | S_IWUSR, \
399		show_temp_max_hyst, store_temp_max_hyst, offset);
400
401sysfs_temp_offsets(1);
402sysfs_temp_offsets(2);
403sysfs_temp_offsets(3);
404
405static ssize_t
406cpu0_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
412static DEVICE_ATTR_RO(cpu0_vid);
413
414static ssize_t
415vrm_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
421static ssize_t
422vrm_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
437static DEVICE_ATTR_RW(vrm);
438
439static ssize_t
440alarms_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
446static DEVICE_ATTR_RO(alarms);
447
448static 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 */
457static 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
465static SENSOR_DEVICE_ATTR(in0_alarm, S_IRUGO, show_alarm, NULL, 0);
466static SENSOR_DEVICE_ATTR(in1_alarm, S_IRUGO, show_alarm, NULL, 1);
467static SENSOR_DEVICE_ATTR(in2_alarm, S_IRUGO, show_alarm, NULL, 2);
468static SENSOR_DEVICE_ATTR(in3_alarm, S_IRUGO, show_alarm, NULL, 3);
469static SENSOR_DEVICE_ATTR(in4_alarm, S_IRUGO, show_alarm, NULL, 8);
470static SENSOR_DEVICE_ATTR(in5_alarm, S_IRUGO, show_alarm, NULL, 9);
471static SENSOR_DEVICE_ATTR(in6_alarm, S_IRUGO, show_alarm, NULL, 10);
472static SENSOR_DEVICE_ATTR(in7_alarm, S_IRUGO, show_alarm, NULL, 16);
473static SENSOR_DEVICE_ATTR(in8_alarm, S_IRUGO, show_alarm, NULL, 17);
474static SENSOR_DEVICE_ATTR(fan1_alarm, S_IRUGO, show_alarm, NULL, 6);
475static SENSOR_DEVICE_ATTR(fan2_alarm, S_IRUGO, show_alarm, NULL, 7);
476static SENSOR_DEVICE_ATTR(fan3_alarm, S_IRUGO, show_alarm, NULL, 11);
477static SENSOR_DEVICE_ATTR(temp1_alarm, S_IRUGO, show_alarm, NULL, 4);
478static SENSOR_DEVICE_ATTR(temp2_alarm, S_IRUGO, show_alarm, NULL, 5);
479static SENSOR_DEVICE_ATTR(temp3_alarm, S_IRUGO, show_temp3_alarm, NULL, 0);
480
481static 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
489static ssize_t
490beep_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
517static DEVICE_ATTR_RW(beep_mask);
518
519static 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
527static ssize_t
528store_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 */
578static 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
586static SENSOR_DEVICE_ATTR(in0_beep, S_IRUGO | S_IWUSR,
587			show_beep, store_beep, 0);
588static SENSOR_DEVICE_ATTR(in1_beep, S_IRUGO | S_IWUSR,
589			show_beep, store_beep, 1);
590static SENSOR_DEVICE_ATTR(in2_beep, S_IRUGO | S_IWUSR,
591			show_beep, store_beep, 2);
592static SENSOR_DEVICE_ATTR(in3_beep, S_IRUGO | S_IWUSR,
593			show_beep, store_beep, 3);
594static SENSOR_DEVICE_ATTR(in4_beep, S_IRUGO | S_IWUSR,
595			show_beep, store_beep, 8);
596static SENSOR_DEVICE_ATTR(in5_beep, S_IRUGO | S_IWUSR,
597			show_beep, store_beep, 9);
598static SENSOR_DEVICE_ATTR(in6_beep, S_IRUGO | S_IWUSR,
599			show_beep, store_beep, 10);
600static SENSOR_DEVICE_ATTR(in7_beep, S_IRUGO | S_IWUSR,
601			show_beep, store_beep, 16);
602static SENSOR_DEVICE_ATTR(in8_beep, S_IRUGO | S_IWUSR,
603			show_beep, store_beep, 17);
604static SENSOR_DEVICE_ATTR(fan1_beep, S_IRUGO | S_IWUSR,
605			show_beep, store_beep, 6);
606static SENSOR_DEVICE_ATTR(fan2_beep, S_IRUGO | S_IWUSR,
607			show_beep, store_beep, 7);
608static SENSOR_DEVICE_ATTR(fan3_beep, S_IRUGO | S_IWUSR,
609			show_beep, store_beep, 11);
610static SENSOR_DEVICE_ATTR(temp1_beep, S_IRUGO | S_IWUSR,
611			show_beep, store_beep, 4);
612static SENSOR_DEVICE_ATTR(temp2_beep, S_IRUGO | S_IWUSR,
613			show_beep, store_beep, 5);
614static SENSOR_DEVICE_ATTR(temp3_beep, S_IRUGO,
615			show_temp3_beep, store_beep, 13);
616static SENSOR_DEVICE_ATTR(beep_enable, S_IRUGO | S_IWUSR,
617			show_beep, store_beep, 15);
618
619static ssize_t
620show_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 */
634static ssize_t
635store_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
681static SENSOR_DEVICE_ATTR(fan1_div, S_IRUGO | S_IWUSR,
682		show_fan_div, store_fan_div, 0);
683static SENSOR_DEVICE_ATTR(fan2_div, S_IRUGO | S_IWUSR,
684		show_fan_div, store_fan_div, 1);
685static SENSOR_DEVICE_ATTR(fan3_div, S_IRUGO | S_IWUSR,
686		show_fan_div, store_fan_div, 2);
687
688static ssize_t
689show_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
696static ssize_t
697pwm2_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
703static ssize_t
704store_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
724static ssize_t
725pwm2_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
762static SENSOR_DEVICE_ATTR(pwm1, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 0);
763static SENSOR_DEVICE_ATTR(pwm2, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 1);
764static SENSOR_DEVICE_ATTR(pwm3, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 2);
765static SENSOR_DEVICE_ATTR(pwm4, S_IRUGO | S_IWUSR, show_pwm, store_pwm, 3);
766/* only PWM2 can be enabled/disabled */
767static DEVICE_ATTR_RW(pwm2_enable);
768
769static ssize_t
770show_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
777static ssize_t
778store_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
834static SENSOR_DEVICE_ATTR(temp1_type, S_IRUGO | S_IWUSR,
835	show_sensor, store_sensor, 0);
836static SENSOR_DEVICE_ATTR(temp2_type, S_IRUGO | S_IWUSR,
837	show_sensor, store_sensor, 1);
838static 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 */
845static int
846w83781d_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 */
912ERROR_SC_3:
913	i2c_unregister_device(data->lm75[0]);
914ERROR_SC_2:
915ERROR_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
940static 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};
959static const struct attribute_group w83781d_group = {
960	.attrs = w83781d_attributes,
961};
962
963static struct attribute *w83781d_attributes_in1[] = {
964	IN_UNIT_ATTRS(1),
965	NULL
966};
967static const struct attribute_group w83781d_group_in1 = {
968	.attrs = w83781d_attributes_in1,
969};
970
971static struct attribute *w83781d_attributes_in78[] = {
972	IN_UNIT_ATTRS(7),
973	IN_UNIT_ATTRS(8),
974	NULL
975};
976static const struct attribute_group w83781d_group_in78 = {
977	.attrs = w83781d_attributes_in78,
978};
979
980static struct attribute *w83781d_attributes_temp3[] = {
981	TEMP_UNIT_ATTRS(3),
982	NULL
983};
984static const struct attribute_group w83781d_group_temp3 = {
985	.attrs = w83781d_attributes_temp3,
986};
987
988static 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};
994static const struct attribute_group w83781d_group_pwm12 = {
995	.attrs = w83781d_attributes_pwm12,
996};
997
998static struct attribute *w83781d_attributes_pwm34[] = {
999	&sensor_dev_attr_pwm3.dev_attr.attr,
1000	&sensor_dev_attr_pwm4.dev_attr.attr,
1001	NULL
1002};
1003static const struct attribute_group w83781d_group_pwm34 = {
1004	.attrs = w83781d_attributes_pwm34,
1005};
1006
1007static 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};
1013static 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 */
1018static int
1019w83781d_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 */
1083static int
1084w83781d_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
1184static 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
1195static const struct i2c_device_id w83781d_ids[];
1196
1197static 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
1242static int
1243w83781d_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
1257static int
1258w83781d_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
1297static int
1298w83781d_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
1334static void
1335w83781d_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
1446static 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
1565static const struct i2c_device_id w83781d_ids[] = {
1566	{ "w83781d", w83781d, },
1567	{ "w83782d", w83782d, },
1568	{ "w83783s", w83783s, },
1569	{ "as99127f", as99127f },
1570	{ /* LIST END */ }
1571};
1572MODULE_DEVICE_TABLE(i2c, w83781d_ids);
1573
1574static struct i2c_driver w83781d_driver = {
1575	.class		= I2C_CLASS_HWMON,
1576	.driver = {
1577		.name = "w83781d",
1578	},
1579	.probe_new	= w83781d_probe,
1580	.remove		= w83781d_remove,
1581	.id_table	= w83781d_ids,
1582	.detect		= w83781d_detect,
1583	.address_list	= normal_i2c,
1584};
1585
1586/*
1587 * ISA related code
1588 */
1589#ifdef CONFIG_ISA
1590
1591/* ISA device, if found */
1592static struct platform_device *pdev;
1593
1594static unsigned short isa_address = 0x290;
1595
1596/*
1597 * I2C devices get this name attribute automatically, but for ISA devices
1598 * we must create it by ourselves.
1599 */
1600static ssize_t
1601name_show(struct device *dev, struct device_attribute *devattr, char *buf)
1602{
1603	struct w83781d_data *data = dev_get_drvdata(dev);
1604	return sprintf(buf, "%s\n", data->name);
1605}
1606static DEVICE_ATTR_RO(name);
1607
1608static struct w83781d_data *w83781d_data_if_isa(void)
1609{
1610	return pdev ? platform_get_drvdata(pdev) : NULL;
1611}
1612
1613/* Returns 1 if the I2C chip appears to be an alias of the ISA chip */
1614static int w83781d_alias_detect(struct i2c_client *client, u8 chipid)
1615{
1616	struct w83781d_data *isa;
1617	int i;
1618
1619	if (!pdev)	/* No ISA chip */
1620		return 0;
1621
1622	isa = platform_get_drvdata(pdev);
1623
1624	if (w83781d_read_value(isa, W83781D_REG_I2C_ADDR) != client->addr)
1625		return 0;	/* Address doesn't match */
1626	if (w83781d_read_value(isa, W83781D_REG_WCHIPID) != chipid)
1627		return 0;	/* Chip type doesn't match */
1628
1629	/*
1630	 * We compare all the limit registers, the config register and the
1631	 * interrupt mask registers
1632	 */
1633	for (i = 0x2b; i <= 0x3d; i++) {
1634		if (w83781d_read_value(isa, i) !=
1635		    i2c_smbus_read_byte_data(client, i))
1636			return 0;
1637	}
1638	if (w83781d_read_value(isa, W83781D_REG_CONFIG) !=
1639	    i2c_smbus_read_byte_data(client, W83781D_REG_CONFIG))
1640		return 0;
1641	for (i = 0x43; i <= 0x46; i++) {
1642		if (w83781d_read_value(isa, i) !=
1643		    i2c_smbus_read_byte_data(client, i))
1644			return 0;
1645	}
1646
1647	return 1;
1648}
1649
1650static int
1651w83781d_read_value_isa(struct w83781d_data *data, u16 reg)
1652{
1653	int word_sized, res;
1654
1655	word_sized = (((reg & 0xff00) == 0x100)
1656		      || ((reg & 0xff00) == 0x200))
1657	    && (((reg & 0x00ff) == 0x50)
1658		|| ((reg & 0x00ff) == 0x53)
1659		|| ((reg & 0x00ff) == 0x55));
1660	if (reg & 0xff00) {
1661		outb_p(W83781D_REG_BANK,
1662		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1663		outb_p(reg >> 8,
1664		       data->isa_addr + W83781D_DATA_REG_OFFSET);
1665	}
1666	outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1667	res = inb_p(data->isa_addr + W83781D_DATA_REG_OFFSET);
1668	if (word_sized) {
1669		outb_p((reg & 0xff) + 1,
1670		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1671		res =
1672		    (res << 8) + inb_p(data->isa_addr +
1673				       W83781D_DATA_REG_OFFSET);
1674	}
1675	if (reg & 0xff00) {
1676		outb_p(W83781D_REG_BANK,
1677		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1678		outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1679	}
1680	return res;
1681}
1682
1683static void
1684w83781d_write_value_isa(struct w83781d_data *data, u16 reg, u16 value)
1685{
1686	int word_sized;
1687
1688	word_sized = (((reg & 0xff00) == 0x100)
1689		      || ((reg & 0xff00) == 0x200))
1690	    && (((reg & 0x00ff) == 0x53)
1691		|| ((reg & 0x00ff) == 0x55));
1692	if (reg & 0xff00) {
1693		outb_p(W83781D_REG_BANK,
1694		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1695		outb_p(reg >> 8,
1696		       data->isa_addr + W83781D_DATA_REG_OFFSET);
1697	}
1698	outb_p(reg & 0xff, data->isa_addr + W83781D_ADDR_REG_OFFSET);
1699	if (word_sized) {
1700		outb_p(value >> 8,
1701		       data->isa_addr + W83781D_DATA_REG_OFFSET);
1702		outb_p((reg & 0xff) + 1,
1703		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1704	}
1705	outb_p(value & 0xff, data->isa_addr + W83781D_DATA_REG_OFFSET);
1706	if (reg & 0xff00) {
1707		outb_p(W83781D_REG_BANK,
1708		       data->isa_addr + W83781D_ADDR_REG_OFFSET);
1709		outb_p(0, data->isa_addr + W83781D_DATA_REG_OFFSET);
1710	}
1711}
1712
1713/*
1714 * The SMBus locks itself, usually, but nothing may access the Winbond between
1715 * bank switches. ISA access must always be locked explicitly!
1716 * We ignore the W83781D BUSY flag at this moment - it could lead to deadlocks,
1717 * would slow down the W83781D access and should not be necessary.
1718 * There are some ugly typecasts here, but the good news is - they should
1719 * nowhere else be necessary!
1720 */
1721static int
1722w83781d_read_value(struct w83781d_data *data, u16 reg)
1723{
1724	struct i2c_client *client = data->client;
1725	int res;
1726
1727	mutex_lock(&data->lock);
1728	if (client)
1729		res = w83781d_read_value_i2c(data, reg);
1730	else
1731		res = w83781d_read_value_isa(data, reg);
1732	mutex_unlock(&data->lock);
1733	return res;
1734}
1735
1736static int
1737w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
1738{
1739	struct i2c_client *client = data->client;
1740
1741	mutex_lock(&data->lock);
1742	if (client)
1743		w83781d_write_value_i2c(data, reg, value);
1744	else
1745		w83781d_write_value_isa(data, reg, value);
1746	mutex_unlock(&data->lock);
1747	return 0;
1748}
1749
1750static int
1751w83781d_isa_probe(struct platform_device *pdev)
1752{
1753	int err, reg;
1754	struct w83781d_data *data;
1755	struct resource *res;
1756
1757	/* Reserve the ISA region */
1758	res = platform_get_resource(pdev, IORESOURCE_IO, 0);
1759	if (!devm_request_region(&pdev->dev,
1760				 res->start + W83781D_ADDR_REG_OFFSET, 2,
1761				 "w83781d"))
1762		return -EBUSY;
1763
1764	data = devm_kzalloc(&pdev->dev, sizeof(struct w83781d_data),
1765			    GFP_KERNEL);
1766	if (!data)
1767		return -ENOMEM;
1768
1769	mutex_init(&data->lock);
1770	data->isa_addr = res->start;
1771	platform_set_drvdata(pdev, data);
1772
1773	reg = w83781d_read_value(data, W83781D_REG_WCHIPID);
1774	switch (reg) {
1775	case 0x30:
1776		data->type = w83782d;
1777		data->name = "w83782d";
1778		break;
1779	default:
1780		data->type = w83781d;
1781		data->name = "w83781d";
1782	}
1783
1784	/* Initialize the W83781D chip */
1785	w83781d_init_device(&pdev->dev);
1786
1787	/* Register sysfs hooks */
1788	err = w83781d_create_files(&pdev->dev, data->type, 1);
1789	if (err)
1790		goto exit_remove_files;
1791
1792	err = device_create_file(&pdev->dev, &dev_attr_name);
1793	if (err)
1794		goto exit_remove_files;
1795
1796	data->hwmon_dev = hwmon_device_register(&pdev->dev);
1797	if (IS_ERR(data->hwmon_dev)) {
1798		err = PTR_ERR(data->hwmon_dev);
1799		goto exit_remove_files;
1800	}
1801
1802	return 0;
1803
1804 exit_remove_files:
1805	w83781d_remove_files(&pdev->dev);
1806	device_remove_file(&pdev->dev, &dev_attr_name);
1807	return err;
1808}
1809
1810static int
1811w83781d_isa_remove(struct platform_device *pdev)
1812{
1813	struct w83781d_data *data = platform_get_drvdata(pdev);
1814
1815	hwmon_device_unregister(data->hwmon_dev);
1816	w83781d_remove_files(&pdev->dev);
1817	device_remove_file(&pdev->dev, &dev_attr_name);
1818
1819	return 0;
1820}
1821
1822static struct platform_driver w83781d_isa_driver = {
1823	.driver = {
1824		.name = "w83781d",
1825	},
1826	.probe = w83781d_isa_probe,
1827	.remove = w83781d_isa_remove,
1828};
1829
1830/* return 1 if a supported chip is found, 0 otherwise */
1831static int __init
1832w83781d_isa_found(unsigned short address)
1833{
1834	int val, save, found = 0;
1835	int port;
1836
1837	/*
1838	 * Some boards declare base+0 to base+7 as a PNP device, some base+4
1839	 * to base+7 and some base+5 to base+6. So we better request each port
1840	 * individually for the probing phase.
1841	 */
1842	for (port = address; port < address + W83781D_EXTENT; port++) {
1843		if (!request_region(port, 1, "w83781d")) {
1844			pr_debug("Failed to request port 0x%x\n", port);
1845			goto release;
1846		}
1847	}
1848
1849#define REALLY_SLOW_IO
1850	/*
1851	 * We need the timeouts for at least some W83781D-like
1852	 * chips. But only if we read 'undefined' registers.
1853	 */
1854	val = inb_p(address + 1);
1855	if (inb_p(address + 2) != val
1856	 || inb_p(address + 3) != val
1857	 || inb_p(address + 7) != val) {
1858		pr_debug("Detection failed at step %d\n", 1);
1859		goto release;
1860	}
1861#undef REALLY_SLOW_IO
1862
1863	/*
1864	 * We should be able to change the 7 LSB of the address port. The
1865	 * MSB (busy flag) should be clear initially, set after the write.
1866	 */
1867	save = inb_p(address + W83781D_ADDR_REG_OFFSET);
1868	if (save & 0x80) {
1869		pr_debug("Detection failed at step %d\n", 2);
1870		goto release;
1871	}
1872	val = ~save & 0x7f;
1873	outb_p(val, address + W83781D_ADDR_REG_OFFSET);
1874	if (inb_p(address + W83781D_ADDR_REG_OFFSET) != (val | 0x80)) {
1875		outb_p(save, address + W83781D_ADDR_REG_OFFSET);
1876		pr_debug("Detection failed at step %d\n", 3);
1877		goto release;
1878	}
1879
1880	/* We found a device, now see if it could be a W83781D */
1881	outb_p(W83781D_REG_CONFIG, address + W83781D_ADDR_REG_OFFSET);
1882	val = inb_p(address + W83781D_DATA_REG_OFFSET);
1883	if (val & 0x80) {
1884		pr_debug("Detection failed at step %d\n", 4);
1885		goto release;
1886	}
1887	outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
1888	save = inb_p(address + W83781D_DATA_REG_OFFSET);
1889	outb_p(W83781D_REG_CHIPMAN, address + W83781D_ADDR_REG_OFFSET);
1890	val = inb_p(address + W83781D_DATA_REG_OFFSET);
1891	if ((!(save & 0x80) && (val != 0xa3))
1892	 || ((save & 0x80) && (val != 0x5c))) {
1893		pr_debug("Detection failed at step %d\n", 5);
1894		goto release;
1895	}
1896	outb_p(W83781D_REG_I2C_ADDR, address + W83781D_ADDR_REG_OFFSET);
1897	val = inb_p(address + W83781D_DATA_REG_OFFSET);
1898	if (val < 0x03 || val > 0x77) {	/* Not a valid I2C address */
1899		pr_debug("Detection failed at step %d\n", 6);
1900		goto release;
1901	}
1902
1903	/* The busy flag should be clear again */
1904	if (inb_p(address + W83781D_ADDR_REG_OFFSET) & 0x80) {
1905		pr_debug("Detection failed at step %d\n", 7);
1906		goto release;
1907	}
1908
1909	/* Determine the chip type */
1910	outb_p(W83781D_REG_BANK, address + W83781D_ADDR_REG_OFFSET);
1911	save = inb_p(address + W83781D_DATA_REG_OFFSET);
1912	outb_p(save & 0xf8, address + W83781D_DATA_REG_OFFSET);
1913	outb_p(W83781D_REG_WCHIPID, address + W83781D_ADDR_REG_OFFSET);
1914	val = inb_p(address + W83781D_DATA_REG_OFFSET);
1915	if ((val & 0xfe) == 0x10	/* W83781D */
1916	 || val == 0x30)		/* W83782D */
1917		found = 1;
1918
1919	if (found)
1920		pr_info("Found a %s chip at %#x\n",
1921			val == 0x30 ? "W83782D" : "W83781D", (int)address);
1922
1923 release:
1924	for (port--; port >= address; port--)
1925		release_region(port, 1);
1926	return found;
1927}
1928
1929static int __init
1930w83781d_isa_device_add(unsigned short address)
1931{
1932	struct resource res = {
1933		.start	= address,
1934		.end	= address + W83781D_EXTENT - 1,
1935		.name	= "w83781d",
1936		.flags	= IORESOURCE_IO,
1937	};
1938	int err;
1939
1940	pdev = platform_device_alloc("w83781d", address);
1941	if (!pdev) {
1942		err = -ENOMEM;
1943		pr_err("Device allocation failed\n");
1944		goto exit;
1945	}
1946
1947	err = platform_device_add_resources(pdev, &res, 1);
1948	if (err) {
1949		pr_err("Device resource addition failed (%d)\n", err);
1950		goto exit_device_put;
1951	}
1952
1953	err = platform_device_add(pdev);
1954	if (err) {
1955		pr_err("Device addition failed (%d)\n", err);
1956		goto exit_device_put;
1957	}
1958
1959	return 0;
1960
1961 exit_device_put:
1962	platform_device_put(pdev);
1963 exit:
1964	pdev = NULL;
1965	return err;
1966}
1967
1968static int __init
1969w83781d_isa_register(void)
1970{
1971	int res;
1972
1973	if (w83781d_isa_found(isa_address)) {
1974		res = platform_driver_register(&w83781d_isa_driver);
1975		if (res)
1976			goto exit;
1977
1978		/* Sets global pdev as a side effect */
1979		res = w83781d_isa_device_add(isa_address);
1980		if (res)
1981			goto exit_unreg_isa_driver;
1982	}
1983
1984	return 0;
1985
1986exit_unreg_isa_driver:
1987	platform_driver_unregister(&w83781d_isa_driver);
1988exit:
1989	return res;
1990}
1991
1992static void
1993w83781d_isa_unregister(void)
1994{
1995	if (pdev) {
1996		platform_device_unregister(pdev);
1997		platform_driver_unregister(&w83781d_isa_driver);
1998	}
1999}
2000#else /* !CONFIG_ISA */
2001
2002static struct w83781d_data *w83781d_data_if_isa(void)
2003{
2004	return NULL;
2005}
2006
2007static int
2008w83781d_alias_detect(struct i2c_client *client, u8 chipid)
2009{
2010	return 0;
2011}
2012
2013static int
2014w83781d_read_value(struct w83781d_data *data, u16 reg)
2015{
2016	int res;
2017
2018	mutex_lock(&data->lock);
2019	res = w83781d_read_value_i2c(data, reg);
2020	mutex_unlock(&data->lock);
2021
2022	return res;
2023}
2024
2025static int
2026w83781d_write_value(struct w83781d_data *data, u16 reg, u16 value)
2027{
2028	mutex_lock(&data->lock);
2029	w83781d_write_value_i2c(data, reg, value);
2030	mutex_unlock(&data->lock);
2031
2032	return 0;
2033}
2034
2035static int __init
2036w83781d_isa_register(void)
2037{
2038	return 0;
2039}
2040
2041static void
2042w83781d_isa_unregister(void)
2043{
2044}
2045#endif /* CONFIG_ISA */
2046
2047static int __init
2048sensors_w83781d_init(void)
2049{
2050	int res;
2051
2052	/*
2053	 * We register the ISA device first, so that we can skip the
2054	 * registration of an I2C interface to the same device.
2055	 */
2056	res = w83781d_isa_register();
2057	if (res)
2058		goto exit;
2059
2060	res = i2c_add_driver(&w83781d_driver);
2061	if (res)
2062		goto exit_unreg_isa;
2063
2064	return 0;
2065
2066 exit_unreg_isa:
2067	w83781d_isa_unregister();
2068 exit:
2069	return res;
2070}
2071
2072static void __exit
2073sensors_w83781d_exit(void)
2074{
2075	w83781d_isa_unregister();
2076	i2c_del_driver(&w83781d_driver);
2077}
2078
2079MODULE_AUTHOR("Frodo Looijaard <frodol@dds.nl>, "
2080	      "Philip Edelbrock <phil@netroedge.com>, "
2081	      "and Mark Studebaker <mdsxyz123@yahoo.com>");
2082MODULE_DESCRIPTION("W83781D driver");
2083MODULE_LICENSE("GPL");
2084
2085module_init(sensors_w83781d_init);
2086module_exit(sensors_w83781d_exit);
2087