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