xref: /linux/drivers/hwmon/i5k_amb.c (revision 8fa5723aa7e053d498336b48448b292fc2e0458b)
1 /*
2  * A hwmon driver for the Intel 5000 series chipset FB-DIMM AMB
3  * temperature sensors
4  * Copyright (C) 2007 IBM
5  *
6  * Author: Darrick J. Wong <djwong@us.ibm.com>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
21  */
22 
23 #include <linux/module.h>
24 #include <linux/jiffies.h>
25 #include <linux/hwmon.h>
26 #include <linux/hwmon-sysfs.h>
27 #include <linux/err.h>
28 #include <linux/mutex.h>
29 #include <linux/delay.h>
30 #include <linux/log2.h>
31 #include <linux/pci.h>
32 #include <linux/platform_device.h>
33 
34 #define DRVNAME "i5k_amb"
35 
36 #define I5K_REG_AMB_BASE_ADDR		0x48
37 #define I5K_REG_AMB_LEN_ADDR		0x50
38 #define I5K_REG_CHAN0_PRESENCE_ADDR	0x64
39 #define I5K_REG_CHAN1_PRESENCE_ADDR	0x66
40 
41 #define AMB_REG_TEMP_MIN_ADDR		0x80
42 #define AMB_REG_TEMP_MID_ADDR		0x81
43 #define AMB_REG_TEMP_MAX_ADDR		0x82
44 #define AMB_REG_TEMP_STATUS_ADDR	0x84
45 #define AMB_REG_TEMP_ADDR		0x85
46 
47 #define AMB_CONFIG_SIZE			2048
48 #define AMB_FUNC_3_OFFSET		768
49 
50 static unsigned long amb_reg_temp_status(unsigned int amb)
51 {
52 	return AMB_FUNC_3_OFFSET + AMB_REG_TEMP_STATUS_ADDR +
53 	       AMB_CONFIG_SIZE * amb;
54 }
55 
56 static unsigned long amb_reg_temp_min(unsigned int amb)
57 {
58 	return AMB_FUNC_3_OFFSET + AMB_REG_TEMP_MIN_ADDR +
59 	       AMB_CONFIG_SIZE * amb;
60 }
61 
62 static unsigned long amb_reg_temp_mid(unsigned int amb)
63 {
64 	return AMB_FUNC_3_OFFSET + AMB_REG_TEMP_MID_ADDR +
65 	       AMB_CONFIG_SIZE * amb;
66 }
67 
68 static unsigned long amb_reg_temp_max(unsigned int amb)
69 {
70 	return AMB_FUNC_3_OFFSET + AMB_REG_TEMP_MAX_ADDR +
71 	       AMB_CONFIG_SIZE * amb;
72 }
73 
74 static unsigned long amb_reg_temp(unsigned int amb)
75 {
76 	return AMB_FUNC_3_OFFSET + AMB_REG_TEMP_ADDR +
77 	       AMB_CONFIG_SIZE * amb;
78 }
79 
80 #define MAX_MEM_CHANNELS		4
81 #define MAX_AMBS_PER_CHANNEL		16
82 #define MAX_AMBS			(MAX_MEM_CHANNELS * \
83 					 MAX_AMBS_PER_CHANNEL)
84 #define CHANNEL_SHIFT			4
85 #define DIMM_MASK			0xF
86 /*
87  * Ugly hack: For some reason the highest bit is set if there
88  * are _any_ DIMMs in the channel.  Attempting to read from
89  * this "high-order" AMB results in a memory bus error, so
90  * for now we'll just ignore that top bit, even though that
91  * might prevent us from seeing the 16th DIMM in the channel.
92  */
93 #define REAL_MAX_AMBS_PER_CHANNEL	15
94 #define KNOBS_PER_AMB			6
95 
96 static unsigned long amb_num_from_reg(unsigned int byte_num, unsigned int bit)
97 {
98 	return byte_num * MAX_AMBS_PER_CHANNEL + bit;
99 }
100 
101 #define AMB_SYSFS_NAME_LEN		16
102 struct i5k_device_attribute {
103 	struct sensor_device_attribute s_attr;
104 	char name[AMB_SYSFS_NAME_LEN];
105 };
106 
107 struct i5k_amb_data {
108 	struct device *hwmon_dev;
109 
110 	unsigned long amb_base;
111 	unsigned long amb_len;
112 	u16 amb_present[MAX_MEM_CHANNELS];
113 	void __iomem *amb_mmio;
114 	struct i5k_device_attribute *attrs;
115 	unsigned int num_attrs;
116 	unsigned long chipset_id;
117 };
118 
119 static ssize_t show_name(struct device *dev, struct device_attribute *devattr,
120 			 char *buf)
121 {
122 	return sprintf(buf, "%s\n", DRVNAME);
123 }
124 
125 
126 static DEVICE_ATTR(name, S_IRUGO, show_name, NULL);
127 
128 static struct platform_device *amb_pdev;
129 
130 static u8 amb_read_byte(struct i5k_amb_data *data, unsigned long offset)
131 {
132 	return ioread8(data->amb_mmio + offset);
133 }
134 
135 static void amb_write_byte(struct i5k_amb_data *data, unsigned long offset,
136 			   u8 val)
137 {
138 	iowrite8(val, data->amb_mmio + offset);
139 }
140 
141 static ssize_t show_amb_alarm(struct device *dev,
142 			     struct device_attribute *devattr,
143 			     char *buf)
144 {
145 	struct sensor_device_attribute *attr = to_sensor_dev_attr(devattr);
146 	struct i5k_amb_data *data = dev_get_drvdata(dev);
147 
148 	if (!(amb_read_byte(data, amb_reg_temp_status(attr->index)) & 0x20) &&
149 	     (amb_read_byte(data, amb_reg_temp_status(attr->index)) & 0x8))
150 		return sprintf(buf, "1\n");
151 	else
152 		return sprintf(buf, "0\n");
153 }
154 
155 static ssize_t store_amb_min(struct device *dev,
156 			     struct device_attribute *devattr,
157 			     const char *buf,
158 			     size_t count)
159 {
160 	struct sensor_device_attribute *attr = to_sensor_dev_attr(devattr);
161 	struct i5k_amb_data *data = dev_get_drvdata(dev);
162 	unsigned long temp = simple_strtoul(buf, NULL, 10) / 500;
163 
164 	if (temp > 255)
165 		temp = 255;
166 
167 	amb_write_byte(data, amb_reg_temp_min(attr->index), temp);
168 	return count;
169 }
170 
171 static ssize_t store_amb_mid(struct device *dev,
172 			     struct device_attribute *devattr,
173 			     const char *buf,
174 			     size_t count)
175 {
176 	struct sensor_device_attribute *attr = to_sensor_dev_attr(devattr);
177 	struct i5k_amb_data *data = dev_get_drvdata(dev);
178 	unsigned long temp = simple_strtoul(buf, NULL, 10) / 500;
179 
180 	if (temp > 255)
181 		temp = 255;
182 
183 	amb_write_byte(data, amb_reg_temp_mid(attr->index), temp);
184 	return count;
185 }
186 
187 static ssize_t store_amb_max(struct device *dev,
188 			     struct device_attribute *devattr,
189 			     const char *buf,
190 			     size_t count)
191 {
192 	struct sensor_device_attribute *attr = to_sensor_dev_attr(devattr);
193 	struct i5k_amb_data *data = dev_get_drvdata(dev);
194 	unsigned long temp = simple_strtoul(buf, NULL, 10) / 500;
195 
196 	if (temp > 255)
197 		temp = 255;
198 
199 	amb_write_byte(data, amb_reg_temp_max(attr->index), temp);
200 	return count;
201 }
202 
203 static ssize_t show_amb_min(struct device *dev,
204 			     struct device_attribute *devattr,
205 			     char *buf)
206 {
207 	struct sensor_device_attribute *attr = to_sensor_dev_attr(devattr);
208 	struct i5k_amb_data *data = dev_get_drvdata(dev);
209 	return sprintf(buf, "%d\n",
210 		500 * amb_read_byte(data, amb_reg_temp_min(attr->index)));
211 }
212 
213 static ssize_t show_amb_mid(struct device *dev,
214 			     struct device_attribute *devattr,
215 			     char *buf)
216 {
217 	struct sensor_device_attribute *attr = to_sensor_dev_attr(devattr);
218 	struct i5k_amb_data *data = dev_get_drvdata(dev);
219 	return sprintf(buf, "%d\n",
220 		500 * amb_read_byte(data, amb_reg_temp_mid(attr->index)));
221 }
222 
223 static ssize_t show_amb_max(struct device *dev,
224 			     struct device_attribute *devattr,
225 			     char *buf)
226 {
227 	struct sensor_device_attribute *attr = to_sensor_dev_attr(devattr);
228 	struct i5k_amb_data *data = dev_get_drvdata(dev);
229 	return sprintf(buf, "%d\n",
230 		500 * amb_read_byte(data, amb_reg_temp_max(attr->index)));
231 }
232 
233 static ssize_t show_amb_temp(struct device *dev,
234 			     struct device_attribute *devattr,
235 			     char *buf)
236 {
237 	struct sensor_device_attribute *attr = to_sensor_dev_attr(devattr);
238 	struct i5k_amb_data *data = dev_get_drvdata(dev);
239 	return sprintf(buf, "%d\n",
240 		500 * amb_read_byte(data, amb_reg_temp(attr->index)));
241 }
242 
243 static ssize_t show_label(struct device *dev,
244 			  struct device_attribute *devattr,
245 			  char *buf)
246 {
247 	struct sensor_device_attribute *attr = to_sensor_dev_attr(devattr);
248 
249 	return sprintf(buf, "Ch. %d DIMM %d\n", attr->index >> CHANNEL_SHIFT,
250 		       attr->index & DIMM_MASK);
251 }
252 
253 static int __devinit i5k_amb_hwmon_init(struct platform_device *pdev)
254 {
255 	int i, j, k, d = 0;
256 	u16 c;
257 	int res = 0;
258 	int num_ambs = 0;
259 	struct i5k_amb_data *data = platform_get_drvdata(pdev);
260 
261 	/* Count the number of AMBs found */
262 	/* ignore the high-order bit, see "Ugly hack" comment above */
263 	for (i = 0; i < MAX_MEM_CHANNELS; i++)
264 		num_ambs += hweight16(data->amb_present[i] & 0x7fff);
265 
266 	/* Set up sysfs stuff */
267 	data->attrs = kzalloc(sizeof(*data->attrs) * num_ambs * KNOBS_PER_AMB,
268 				GFP_KERNEL);
269 	if (!data->attrs)
270 		return -ENOMEM;
271 	data->num_attrs = 0;
272 
273 	for (i = 0; i < MAX_MEM_CHANNELS; i++) {
274 		c = data->amb_present[i];
275 		for (j = 0; j < REAL_MAX_AMBS_PER_CHANNEL; j++, c >>= 1) {
276 			struct i5k_device_attribute *iattr;
277 
278 			k = amb_num_from_reg(i, j);
279 			if (!(c & 0x1))
280 				continue;
281 			d++;
282 
283 			/* sysfs label */
284 			iattr = data->attrs + data->num_attrs;
285 			snprintf(iattr->name, AMB_SYSFS_NAME_LEN,
286 				 "temp%d_label", d);
287 			iattr->s_attr.dev_attr.attr.name = iattr->name;
288 			iattr->s_attr.dev_attr.attr.mode = S_IRUGO;
289 			iattr->s_attr.dev_attr.show = show_label;
290 			iattr->s_attr.index = k;
291 			res = device_create_file(&pdev->dev,
292 						 &iattr->s_attr.dev_attr);
293 			if (res)
294 				goto exit_remove;
295 			data->num_attrs++;
296 
297 			/* Temperature sysfs knob */
298 			iattr = data->attrs + data->num_attrs;
299 			snprintf(iattr->name, AMB_SYSFS_NAME_LEN,
300 				 "temp%d_input", d);
301 			iattr->s_attr.dev_attr.attr.name = iattr->name;
302 			iattr->s_attr.dev_attr.attr.mode = S_IRUGO;
303 			iattr->s_attr.dev_attr.show = show_amb_temp;
304 			iattr->s_attr.index = k;
305 			res = device_create_file(&pdev->dev,
306 						 &iattr->s_attr.dev_attr);
307 			if (res)
308 				goto exit_remove;
309 			data->num_attrs++;
310 
311 			/* Temperature min sysfs knob */
312 			iattr = data->attrs + data->num_attrs;
313 			snprintf(iattr->name, AMB_SYSFS_NAME_LEN,
314 				 "temp%d_min", d);
315 			iattr->s_attr.dev_attr.attr.name = iattr->name;
316 			iattr->s_attr.dev_attr.attr.mode = S_IWUSR | S_IRUGO;
317 			iattr->s_attr.dev_attr.show = show_amb_min;
318 			iattr->s_attr.dev_attr.store = store_amb_min;
319 			iattr->s_attr.index = k;
320 			res = device_create_file(&pdev->dev,
321 						 &iattr->s_attr.dev_attr);
322 			if (res)
323 				goto exit_remove;
324 			data->num_attrs++;
325 
326 			/* Temperature mid sysfs knob */
327 			iattr = data->attrs + data->num_attrs;
328 			snprintf(iattr->name, AMB_SYSFS_NAME_LEN,
329 				 "temp%d_mid", d);
330 			iattr->s_attr.dev_attr.attr.name = iattr->name;
331 			iattr->s_attr.dev_attr.attr.mode = S_IWUSR | S_IRUGO;
332 			iattr->s_attr.dev_attr.show = show_amb_mid;
333 			iattr->s_attr.dev_attr.store = store_amb_mid;
334 			iattr->s_attr.index = k;
335 			res = device_create_file(&pdev->dev,
336 						 &iattr->s_attr.dev_attr);
337 			if (res)
338 				goto exit_remove;
339 			data->num_attrs++;
340 
341 			/* Temperature max sysfs knob */
342 			iattr = data->attrs + data->num_attrs;
343 			snprintf(iattr->name, AMB_SYSFS_NAME_LEN,
344 				 "temp%d_max", d);
345 			iattr->s_attr.dev_attr.attr.name = iattr->name;
346 			iattr->s_attr.dev_attr.attr.mode = S_IWUSR | S_IRUGO;
347 			iattr->s_attr.dev_attr.show = show_amb_max;
348 			iattr->s_attr.dev_attr.store = store_amb_max;
349 			iattr->s_attr.index = k;
350 			res = device_create_file(&pdev->dev,
351 						 &iattr->s_attr.dev_attr);
352 			if (res)
353 				goto exit_remove;
354 			data->num_attrs++;
355 
356 			/* Temperature alarm sysfs knob */
357 			iattr = data->attrs + data->num_attrs;
358 			snprintf(iattr->name, AMB_SYSFS_NAME_LEN,
359 				 "temp%d_alarm", d);
360 			iattr->s_attr.dev_attr.attr.name = iattr->name;
361 			iattr->s_attr.dev_attr.attr.mode = S_IRUGO;
362 			iattr->s_attr.dev_attr.show = show_amb_alarm;
363 			iattr->s_attr.index = k;
364 			res = device_create_file(&pdev->dev,
365 						 &iattr->s_attr.dev_attr);
366 			if (res)
367 				goto exit_remove;
368 			data->num_attrs++;
369 		}
370 	}
371 
372 	res = device_create_file(&pdev->dev, &dev_attr_name);
373 	if (res)
374 		goto exit_remove;
375 
376 	data->hwmon_dev = hwmon_device_register(&pdev->dev);
377 	if (IS_ERR(data->hwmon_dev)) {
378 		res = PTR_ERR(data->hwmon_dev);
379 		goto exit_remove;
380 	}
381 
382 	return res;
383 
384 exit_remove:
385 	device_remove_file(&pdev->dev, &dev_attr_name);
386 	for (i = 0; i < data->num_attrs; i++)
387 		device_remove_file(&pdev->dev, &data->attrs[i].s_attr.dev_attr);
388 	kfree(data->attrs);
389 
390 	return res;
391 }
392 
393 static int __devinit i5k_amb_add(void)
394 {
395 	int res = -ENODEV;
396 
397 	/* only ever going to be one of these */
398 	amb_pdev = platform_device_alloc(DRVNAME, 0);
399 	if (!amb_pdev)
400 		return -ENOMEM;
401 
402 	res = platform_device_add(amb_pdev);
403 	if (res)
404 		goto err;
405 	return 0;
406 
407 err:
408 	platform_device_put(amb_pdev);
409 	return res;
410 }
411 
412 static int __devinit i5k_find_amb_registers(struct i5k_amb_data *data,
413 					    unsigned long devid)
414 {
415 	struct pci_dev *pcidev;
416 	u32 val32;
417 	int res = -ENODEV;
418 
419 	/* Find AMB register memory space */
420 	pcidev = pci_get_device(PCI_VENDOR_ID_INTEL,
421 				devid,
422 				NULL);
423 	if (!pcidev)
424 		return -ENODEV;
425 
426 	if (pci_read_config_dword(pcidev, I5K_REG_AMB_BASE_ADDR, &val32))
427 		goto out;
428 	data->amb_base = val32;
429 
430 	if (pci_read_config_dword(pcidev, I5K_REG_AMB_LEN_ADDR, &val32))
431 		goto out;
432 	data->amb_len = val32;
433 
434 	/* Is it big enough? */
435 	if (data->amb_len < AMB_CONFIG_SIZE * MAX_AMBS) {
436 		dev_err(&pcidev->dev, "AMB region too small!\n");
437 		goto out;
438 	}
439 
440 	data->chipset_id = devid;
441 
442 	res = 0;
443 out:
444 	pci_dev_put(pcidev);
445 	return res;
446 }
447 
448 static int __devinit i5k_channel_probe(u16 *amb_present, unsigned long dev_id)
449 {
450 	struct pci_dev *pcidev;
451 	u16 val16;
452 	int res = -ENODEV;
453 
454 	/* Copy the DIMM presence map for these two channels */
455 	pcidev = pci_get_device(PCI_VENDOR_ID_INTEL, dev_id, NULL);
456 	if (!pcidev)
457 		return -ENODEV;
458 
459 	if (pci_read_config_word(pcidev, I5K_REG_CHAN0_PRESENCE_ADDR, &val16))
460 		goto out;
461 	amb_present[0] = val16;
462 
463 	if (pci_read_config_word(pcidev, I5K_REG_CHAN1_PRESENCE_ADDR, &val16))
464 		goto out;
465 	amb_present[1] = val16;
466 
467 	res = 0;
468 
469 out:
470 	pci_dev_put(pcidev);
471 	return res;
472 }
473 
474 static unsigned long i5k_channel_pci_id(struct i5k_amb_data *data,
475 					unsigned long channel)
476 {
477 	switch (data->chipset_id) {
478 	case PCI_DEVICE_ID_INTEL_5000_ERR:
479 		return PCI_DEVICE_ID_INTEL_5000_FBD0 + channel;
480 	case PCI_DEVICE_ID_INTEL_5400_ERR:
481 		return PCI_DEVICE_ID_INTEL_5400_FBD0 + channel;
482 	default:
483 		BUG();
484 	}
485 }
486 
487 static unsigned long chipset_ids[] = {
488 	PCI_DEVICE_ID_INTEL_5000_ERR,
489 	PCI_DEVICE_ID_INTEL_5400_ERR,
490 	0
491 };
492 
493 static int __devinit i5k_amb_probe(struct platform_device *pdev)
494 {
495 	struct i5k_amb_data *data;
496 	struct resource *reso;
497 	int i;
498 	int res = -ENODEV;
499 
500 	data = kzalloc(sizeof(*data), GFP_KERNEL);
501 	if (!data)
502 		return -ENOMEM;
503 
504 	/* Figure out where the AMB registers live */
505 	i = 0;
506 	do {
507 		res = i5k_find_amb_registers(data, chipset_ids[i]);
508 		i++;
509 	} while (res && chipset_ids[i]);
510 
511 	if (res)
512 		goto err;
513 
514 	/* Copy the DIMM presence map for the first two channels */
515 	res = i5k_channel_probe(&data->amb_present[0],
516 				i5k_channel_pci_id(data, 0));
517 	if (res)
518 		goto err;
519 
520 	/* Copy the DIMM presence map for the optional second two channels */
521 	i5k_channel_probe(&data->amb_present[2],
522 			  i5k_channel_pci_id(data, 1));
523 
524 	/* Set up resource regions */
525 	reso = request_mem_region(data->amb_base, data->amb_len, DRVNAME);
526 	if (!reso) {
527 		res = -EBUSY;
528 		goto err;
529 	}
530 
531 	data->amb_mmio = ioremap_nocache(data->amb_base, data->amb_len);
532 	if (!data->amb_mmio) {
533 		res = -EBUSY;
534 		goto err_map_failed;
535 	}
536 
537 	platform_set_drvdata(pdev, data);
538 
539 	res = i5k_amb_hwmon_init(pdev);
540 	if (res)
541 		goto err_init_failed;
542 
543 	return res;
544 
545 err_init_failed:
546 	iounmap(data->amb_mmio);
547 	platform_set_drvdata(pdev, NULL);
548 err_map_failed:
549 	release_mem_region(data->amb_base, data->amb_len);
550 err:
551 	kfree(data);
552 	return res;
553 }
554 
555 static int __devexit i5k_amb_remove(struct platform_device *pdev)
556 {
557 	int i;
558 	struct i5k_amb_data *data = platform_get_drvdata(pdev);
559 
560 	hwmon_device_unregister(data->hwmon_dev);
561 	device_remove_file(&pdev->dev, &dev_attr_name);
562 	for (i = 0; i < data->num_attrs; i++)
563 		device_remove_file(&pdev->dev, &data->attrs[i].s_attr.dev_attr);
564 	kfree(data->attrs);
565 	iounmap(data->amb_mmio);
566 	release_mem_region(data->amb_base, data->amb_len);
567 	platform_set_drvdata(pdev, NULL);
568 	kfree(data);
569 	return 0;
570 }
571 
572 static struct platform_driver i5k_amb_driver = {
573 	.driver = {
574 		.owner = THIS_MODULE,
575 		.name = DRVNAME,
576 	},
577 	.probe = i5k_amb_probe,
578 	.remove = __devexit_p(i5k_amb_remove),
579 };
580 
581 static int __init i5k_amb_init(void)
582 {
583 	int res;
584 
585 	res = platform_driver_register(&i5k_amb_driver);
586 	if (res)
587 		return res;
588 
589 	res = i5k_amb_add();
590 	if (res)
591 		platform_driver_unregister(&i5k_amb_driver);
592 
593 	return res;
594 }
595 
596 static void __exit i5k_amb_exit(void)
597 {
598 	platform_device_unregister(amb_pdev);
599 	platform_driver_unregister(&i5k_amb_driver);
600 }
601 
602 MODULE_AUTHOR("Darrick J. Wong <djwong@us.ibm.com>");
603 MODULE_DESCRIPTION("Intel 5000 chipset FB-DIMM AMB temperature sensor");
604 MODULE_LICENSE("GPL");
605 
606 module_init(i5k_amb_init);
607 module_exit(i5k_amb_exit);
608