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