Merge master.kernel.org:/pub/scm/linux/kernel/git/davem/sparc-2.6
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / drivers / edac / edac_mc.c
blobea06e3a4dc358837c21ebf5081396851610a1f3b
1 /*
2 * edac_mc kernel module
3 * (C) 2005 Linux Networx (http://lnxi.com)
4 * This file may be distributed under the terms of the
5 * GNU General Public License.
7 * Written by Thayne Harbaugh
8 * Based on work by Dan Hollis <goemon at anime dot net> and others.
9 * http://www.anime.net/~goemon/linux-ecc/
11 * Modified by Dave Peterson and Doug Thompson
15 #include <linux/config.h>
16 #include <linux/module.h>
17 #include <linux/proc_fs.h>
18 #include <linux/kernel.h>
19 #include <linux/types.h>
20 #include <linux/smp.h>
21 #include <linux/init.h>
22 #include <linux/sysctl.h>
23 #include <linux/highmem.h>
24 #include <linux/timer.h>
25 #include <linux/slab.h>
26 #include <linux/jiffies.h>
27 #include <linux/spinlock.h>
28 #include <linux/list.h>
29 #include <linux/sysdev.h>
30 #include <linux/ctype.h>
31 #include <linux/kthread.h>
32 #include <asm/uaccess.h>
33 #include <asm/page.h>
34 #include <asm/edac.h>
35 #include "edac_mc.h"
37 #define EDAC_MC_VERSION "Ver: 2.0.0 " __DATE__
39 /* For now, disable the EDAC sysfs code. The sysfs interface that EDAC
40 * presents to user space needs more thought, and is likely to change
41 * substantially.
43 #define DISABLE_EDAC_SYSFS
45 #ifdef CONFIG_EDAC_DEBUG
46 /* Values of 0 to 4 will generate output */
47 int edac_debug_level = 1;
48 EXPORT_SYMBOL_GPL(edac_debug_level);
49 #endif
51 /* EDAC Controls, setable by module parameter, and sysfs */
52 static int log_ue = 1;
53 static int log_ce = 1;
54 static int panic_on_ue;
55 static int poll_msec = 1000;
57 static int check_pci_parity = 0; /* default YES check PCI parity */
58 static int panic_on_pci_parity; /* default no panic on PCI Parity */
59 static atomic_t pci_parity_count = ATOMIC_INIT(0);
61 /* lock to memory controller's control array */
62 static DECLARE_MUTEX(mem_ctls_mutex);
63 static struct list_head mc_devices = LIST_HEAD_INIT(mc_devices);
65 static struct task_struct *edac_thread;
67 /* Structure of the whitelist and blacklist arrays */
68 struct edac_pci_device_list {
69 unsigned int vendor; /* Vendor ID */
70 unsigned int device; /* Deviice ID */
73 #define MAX_LISTED_PCI_DEVICES 32
75 /* List of PCI devices (vendor-id:device-id) that should be skipped */
76 static struct edac_pci_device_list pci_blacklist[MAX_LISTED_PCI_DEVICES];
77 static int pci_blacklist_count;
79 /* List of PCI devices (vendor-id:device-id) that should be scanned */
80 static struct edac_pci_device_list pci_whitelist[MAX_LISTED_PCI_DEVICES];
81 static int pci_whitelist_count ;
83 /* START sysfs data and methods */
85 #ifndef DISABLE_EDAC_SYSFS
87 static const char *mem_types[] = {
88 [MEM_EMPTY] = "Empty",
89 [MEM_RESERVED] = "Reserved",
90 [MEM_UNKNOWN] = "Unknown",
91 [MEM_FPM] = "FPM",
92 [MEM_EDO] = "EDO",
93 [MEM_BEDO] = "BEDO",
94 [MEM_SDR] = "Unbuffered-SDR",
95 [MEM_RDR] = "Registered-SDR",
96 [MEM_DDR] = "Unbuffered-DDR",
97 [MEM_RDDR] = "Registered-DDR",
98 [MEM_RMBS] = "RMBS"
101 static const char *dev_types[] = {
102 [DEV_UNKNOWN] = "Unknown",
103 [DEV_X1] = "x1",
104 [DEV_X2] = "x2",
105 [DEV_X4] = "x4",
106 [DEV_X8] = "x8",
107 [DEV_X16] = "x16",
108 [DEV_X32] = "x32",
109 [DEV_X64] = "x64"
112 static const char *edac_caps[] = {
113 [EDAC_UNKNOWN] = "Unknown",
114 [EDAC_NONE] = "None",
115 [EDAC_RESERVED] = "Reserved",
116 [EDAC_PARITY] = "PARITY",
117 [EDAC_EC] = "EC",
118 [EDAC_SECDED] = "SECDED",
119 [EDAC_S2ECD2ED] = "S2ECD2ED",
120 [EDAC_S4ECD4ED] = "S4ECD4ED",
121 [EDAC_S8ECD8ED] = "S8ECD8ED",
122 [EDAC_S16ECD16ED] = "S16ECD16ED"
125 /* sysfs object: /sys/devices/system/edac */
126 static struct sysdev_class edac_class = {
127 set_kset_name("edac"),
130 /* sysfs objects:
131 * /sys/devices/system/edac/mc
132 * /sys/devices/system/edac/pci
134 static struct kobject edac_memctrl_kobj;
135 static struct kobject edac_pci_kobj;
137 /* We use these to wait for the reference counts on edac_memctrl_kobj and
138 * edac_pci_kobj to reach 0.
140 static struct completion edac_memctrl_kobj_complete;
141 static struct completion edac_pci_kobj_complete;
144 * /sys/devices/system/edac/mc;
145 * data structures and methods
147 #if 0
148 static ssize_t memctrl_string_show(void *ptr, char *buffer)
150 char *value = (char*) ptr;
151 return sprintf(buffer, "%s\n", value);
153 #endif
155 static ssize_t memctrl_int_show(void *ptr, char *buffer)
157 int *value = (int*) ptr;
158 return sprintf(buffer, "%d\n", *value);
161 static ssize_t memctrl_int_store(void *ptr, const char *buffer, size_t count)
163 int *value = (int*) ptr;
165 if (isdigit(*buffer))
166 *value = simple_strtoul(buffer, NULL, 0);
168 return count;
171 struct memctrl_dev_attribute {
172 struct attribute attr;
173 void *value;
174 ssize_t (*show)(void *,char *);
175 ssize_t (*store)(void *, const char *, size_t);
178 /* Set of show/store abstract level functions for memory control object */
179 static ssize_t memctrl_dev_show(struct kobject *kobj,
180 struct attribute *attr, char *buffer)
182 struct memctrl_dev_attribute *memctrl_dev;
183 memctrl_dev = (struct memctrl_dev_attribute*)attr;
185 if (memctrl_dev->show)
186 return memctrl_dev->show(memctrl_dev->value, buffer);
188 return -EIO;
191 static ssize_t memctrl_dev_store(struct kobject *kobj, struct attribute *attr,
192 const char *buffer, size_t count)
194 struct memctrl_dev_attribute *memctrl_dev;
195 memctrl_dev = (struct memctrl_dev_attribute*)attr;
197 if (memctrl_dev->store)
198 return memctrl_dev->store(memctrl_dev->value, buffer, count);
200 return -EIO;
203 static struct sysfs_ops memctrlfs_ops = {
204 .show = memctrl_dev_show,
205 .store = memctrl_dev_store
208 #define MEMCTRL_ATTR(_name,_mode,_show,_store) \
209 struct memctrl_dev_attribute attr_##_name = { \
210 .attr = {.name = __stringify(_name), .mode = _mode }, \
211 .value = &_name, \
212 .show = _show, \
213 .store = _store, \
216 #define MEMCTRL_STRING_ATTR(_name,_data,_mode,_show,_store) \
217 struct memctrl_dev_attribute attr_##_name = { \
218 .attr = {.name = __stringify(_name), .mode = _mode }, \
219 .value = _data, \
220 .show = _show, \
221 .store = _store, \
224 /* cwrow<id> attribute f*/
225 #if 0
226 MEMCTRL_STRING_ATTR(mc_version,EDAC_MC_VERSION,S_IRUGO,memctrl_string_show,NULL);
227 #endif
229 /* csrow<id> control files */
230 MEMCTRL_ATTR(panic_on_ue,S_IRUGO|S_IWUSR,memctrl_int_show,memctrl_int_store);
231 MEMCTRL_ATTR(log_ue,S_IRUGO|S_IWUSR,memctrl_int_show,memctrl_int_store);
232 MEMCTRL_ATTR(log_ce,S_IRUGO|S_IWUSR,memctrl_int_show,memctrl_int_store);
233 MEMCTRL_ATTR(poll_msec,S_IRUGO|S_IWUSR,memctrl_int_show,memctrl_int_store);
235 /* Base Attributes of the memory ECC object */
236 static struct memctrl_dev_attribute *memctrl_attr[] = {
237 &attr_panic_on_ue,
238 &attr_log_ue,
239 &attr_log_ce,
240 &attr_poll_msec,
241 NULL,
244 /* Main MC kobject release() function */
245 static void edac_memctrl_master_release(struct kobject *kobj)
247 debugf1("%s()\n", __func__);
248 complete(&edac_memctrl_kobj_complete);
251 static struct kobj_type ktype_memctrl = {
252 .release = edac_memctrl_master_release,
253 .sysfs_ops = &memctrlfs_ops,
254 .default_attrs = (struct attribute **) memctrl_attr,
257 #endif /* DISABLE_EDAC_SYSFS */
259 /* Initialize the main sysfs entries for edac:
260 * /sys/devices/system/edac
262 * and children
264 * Return: 0 SUCCESS
265 * !0 FAILURE
267 static int edac_sysfs_memctrl_setup(void)
268 #ifdef DISABLE_EDAC_SYSFS
270 return 0;
272 #else
274 int err=0;
276 debugf1("%s()\n", __func__);
278 /* create the /sys/devices/system/edac directory */
279 err = sysdev_class_register(&edac_class);
281 if (!err) {
282 /* Init the MC's kobject */
283 memset(&edac_memctrl_kobj, 0, sizeof (edac_memctrl_kobj));
284 edac_memctrl_kobj.parent = &edac_class.kset.kobj;
285 edac_memctrl_kobj.ktype = &ktype_memctrl;
287 /* generate sysfs "..../edac/mc" */
288 err = kobject_set_name(&edac_memctrl_kobj,"mc");
290 if (!err) {
291 /* FIXME: maybe new sysdev_create_subdir() */
292 err = kobject_register(&edac_memctrl_kobj);
294 if (err)
295 debugf1("Failed to register '.../edac/mc'\n");
296 else
297 debugf1("Registered '.../edac/mc' kobject\n");
299 } else
300 debugf1("%s() error=%d\n", __func__, err);
302 return err;
304 #endif /* DISABLE_EDAC_SYSFS */
307 * MC teardown:
308 * the '..../edac/mc' kobject followed by '..../edac' itself
310 static void edac_sysfs_memctrl_teardown(void)
312 #ifndef DISABLE_EDAC_SYSFS
313 debugf0("MC: " __FILE__ ": %s()\n", __func__);
315 /* Unregister the MC's kobject and wait for reference count to reach
316 * 0.
318 init_completion(&edac_memctrl_kobj_complete);
319 kobject_unregister(&edac_memctrl_kobj);
320 wait_for_completion(&edac_memctrl_kobj_complete);
322 /* Unregister the 'edac' object */
323 sysdev_class_unregister(&edac_class);
324 #endif /* DISABLE_EDAC_SYSFS */
327 #ifndef DISABLE_EDAC_SYSFS
330 * /sys/devices/system/edac/pci;
331 * data structures and methods
334 struct list_control {
335 struct edac_pci_device_list *list;
336 int *count;
339 #if 0
340 /* Output the list as: vendor_id:device:id<,vendor_id:device_id> */
341 static ssize_t edac_pci_list_string_show(void *ptr, char *buffer)
343 struct list_control *listctl;
344 struct edac_pci_device_list *list;
345 char *p = buffer;
346 int len=0;
347 int i;
349 listctl = ptr;
350 list = listctl->list;
352 for (i = 0; i < *(listctl->count); i++, list++ ) {
353 if (len > 0)
354 len += snprintf(p + len, (PAGE_SIZE-len), ",");
356 len += snprintf(p + len,
357 (PAGE_SIZE-len),
358 "%x:%x",
359 list->vendor,list->device);
362 len += snprintf(p + len,(PAGE_SIZE-len), "\n");
363 return (ssize_t) len;
368 * Scan string from **s to **e looking for one 'vendor:device' tuple
369 * where each field is a hex value
371 * return 0 if an entry is NOT found
372 * return 1 if an entry is found
373 * fill in *vendor_id and *device_id with values found
375 * In both cases, make sure *s has been moved forward toward *e
377 static int parse_one_device(const char **s,const char **e,
378 unsigned int *vendor_id, unsigned int *device_id)
380 const char *runner, *p;
382 /* if null byte, we are done */
383 if (!**s) {
384 (*s)++; /* keep *s moving */
385 return 0;
388 /* skip over newlines & whitespace */
389 if ((**s == '\n') || isspace(**s)) {
390 (*s)++;
391 return 0;
394 if (!isxdigit(**s)) {
395 (*s)++;
396 return 0;
399 /* parse vendor_id */
400 runner = *s;
402 while (runner < *e) {
403 /* scan for vendor:device delimiter */
404 if (*runner == ':') {
405 *vendor_id = simple_strtol((char*) *s, (char**) &p, 16);
406 runner = p + 1;
407 break;
410 runner++;
413 if (!isxdigit(*runner)) {
414 *s = ++runner;
415 return 0;
418 /* parse device_id */
419 if (runner < *e) {
420 *device_id = simple_strtol((char*)runner, (char**)&p, 16);
421 runner = p;
424 *s = runner;
425 return 1;
428 static ssize_t edac_pci_list_string_store(void *ptr, const char *buffer,
429 size_t count)
431 struct list_control *listctl;
432 struct edac_pci_device_list *list;
433 unsigned int vendor_id, device_id;
434 const char *s, *e;
435 int *index;
437 s = (char*)buffer;
438 e = s + count;
439 listctl = ptr;
440 list = listctl->list;
441 index = listctl->count;
442 *index = 0;
444 while (*index < MAX_LISTED_PCI_DEVICES) {
445 if (parse_one_device(&s,&e,&vendor_id,&device_id)) {
446 list[ *index ].vendor = vendor_id;
447 list[ *index ].device = device_id;
448 (*index)++;
451 /* check for all data consume */
452 if (s >= e)
453 break;
456 return count;
459 #endif
460 static ssize_t edac_pci_int_show(void *ptr, char *buffer)
462 int *value = ptr;
463 return sprintf(buffer,"%d\n",*value);
466 static ssize_t edac_pci_int_store(void *ptr, const char *buffer, size_t count)
468 int *value = ptr;
470 if (isdigit(*buffer))
471 *value = simple_strtoul(buffer,NULL,0);
473 return count;
476 struct edac_pci_dev_attribute {
477 struct attribute attr;
478 void *value;
479 ssize_t (*show)(void *,char *);
480 ssize_t (*store)(void *, const char *,size_t);
483 /* Set of show/store abstract level functions for PCI Parity object */
484 static ssize_t edac_pci_dev_show(struct kobject *kobj, struct attribute *attr,
485 char *buffer)
487 struct edac_pci_dev_attribute *edac_pci_dev;
488 edac_pci_dev= (struct edac_pci_dev_attribute*)attr;
490 if (edac_pci_dev->show)
491 return edac_pci_dev->show(edac_pci_dev->value, buffer);
492 return -EIO;
495 static ssize_t edac_pci_dev_store(struct kobject *kobj,
496 struct attribute *attr, const char *buffer, size_t count)
498 struct edac_pci_dev_attribute *edac_pci_dev;
499 edac_pci_dev= (struct edac_pci_dev_attribute*)attr;
501 if (edac_pci_dev->show)
502 return edac_pci_dev->store(edac_pci_dev->value, buffer, count);
503 return -EIO;
506 static struct sysfs_ops edac_pci_sysfs_ops = {
507 .show = edac_pci_dev_show,
508 .store = edac_pci_dev_store
511 #define EDAC_PCI_ATTR(_name,_mode,_show,_store) \
512 struct edac_pci_dev_attribute edac_pci_attr_##_name = { \
513 .attr = {.name = __stringify(_name), .mode = _mode }, \
514 .value = &_name, \
515 .show = _show, \
516 .store = _store, \
519 #define EDAC_PCI_STRING_ATTR(_name,_data,_mode,_show,_store) \
520 struct edac_pci_dev_attribute edac_pci_attr_##_name = { \
521 .attr = {.name = __stringify(_name), .mode = _mode }, \
522 .value = _data, \
523 .show = _show, \
524 .store = _store, \
527 #if 0
528 static struct list_control pci_whitelist_control = {
529 .list = pci_whitelist,
530 .count = &pci_whitelist_count
533 static struct list_control pci_blacklist_control = {
534 .list = pci_blacklist,
535 .count = &pci_blacklist_count
538 /* whitelist attribute */
539 EDAC_PCI_STRING_ATTR(pci_parity_whitelist,
540 &pci_whitelist_control,
541 S_IRUGO|S_IWUSR,
542 edac_pci_list_string_show,
543 edac_pci_list_string_store);
545 EDAC_PCI_STRING_ATTR(pci_parity_blacklist,
546 &pci_blacklist_control,
547 S_IRUGO|S_IWUSR,
548 edac_pci_list_string_show,
549 edac_pci_list_string_store);
550 #endif
552 /* PCI Parity control files */
553 EDAC_PCI_ATTR(check_pci_parity, S_IRUGO|S_IWUSR, edac_pci_int_show,
554 edac_pci_int_store);
555 EDAC_PCI_ATTR(panic_on_pci_parity, S_IRUGO|S_IWUSR, edac_pci_int_show,
556 edac_pci_int_store);
557 EDAC_PCI_ATTR(pci_parity_count, S_IRUGO, edac_pci_int_show, NULL);
559 /* Base Attributes of the memory ECC object */
560 static struct edac_pci_dev_attribute *edac_pci_attr[] = {
561 &edac_pci_attr_check_pci_parity,
562 &edac_pci_attr_panic_on_pci_parity,
563 &edac_pci_attr_pci_parity_count,
564 NULL,
567 /* No memory to release */
568 static void edac_pci_release(struct kobject *kobj)
570 debugf1("%s()\n", __func__);
571 complete(&edac_pci_kobj_complete);
574 static struct kobj_type ktype_edac_pci = {
575 .release = edac_pci_release,
576 .sysfs_ops = &edac_pci_sysfs_ops,
577 .default_attrs = (struct attribute **) edac_pci_attr,
580 #endif /* DISABLE_EDAC_SYSFS */
583 * edac_sysfs_pci_setup()
586 static int edac_sysfs_pci_setup(void)
587 #ifdef DISABLE_EDAC_SYSFS
589 return 0;
591 #else
593 int err;
595 debugf1("%s()\n", __func__);
597 memset(&edac_pci_kobj, 0, sizeof(edac_pci_kobj));
598 edac_pci_kobj.parent = &edac_class.kset.kobj;
599 edac_pci_kobj.ktype = &ktype_edac_pci;
600 err = kobject_set_name(&edac_pci_kobj, "pci");
602 if (!err) {
603 /* Instanstiate the csrow object */
604 /* FIXME: maybe new sysdev_create_subdir() */
605 err = kobject_register(&edac_pci_kobj);
607 if (err)
608 debugf1("Failed to register '.../edac/pci'\n");
609 else
610 debugf1("Registered '.../edac/pci' kobject\n");
613 return err;
615 #endif /* DISABLE_EDAC_SYSFS */
617 static void edac_sysfs_pci_teardown(void)
619 #ifndef DISABLE_EDAC_SYSFS
620 debugf0("%s()\n", __func__);
621 init_completion(&edac_pci_kobj_complete);
622 kobject_unregister(&edac_pci_kobj);
623 wait_for_completion(&edac_pci_kobj_complete);
624 #endif
627 #ifndef DISABLE_EDAC_SYSFS
629 /* EDAC sysfs CSROW data structures and methods */
631 /* Set of more detailed csrow<id> attribute show/store functions */
632 static ssize_t csrow_ch0_dimm_label_show(struct csrow_info *csrow, char *data)
634 ssize_t size = 0;
636 if (csrow->nr_channels > 0) {
637 size = snprintf(data, EDAC_MC_LABEL_LEN,"%s\n",
638 csrow->channels[0].label);
641 return size;
644 static ssize_t csrow_ch1_dimm_label_show(struct csrow_info *csrow, char *data)
646 ssize_t size = 0;
648 if (csrow->nr_channels > 0) {
649 size = snprintf(data, EDAC_MC_LABEL_LEN, "%s\n",
650 csrow->channels[1].label);
653 return size;
656 static ssize_t csrow_ch0_dimm_label_store(struct csrow_info *csrow,
657 const char *data, size_t size)
659 ssize_t max_size = 0;
661 if (csrow->nr_channels > 0) {
662 max_size = min((ssize_t)size,(ssize_t)EDAC_MC_LABEL_LEN-1);
663 strncpy(csrow->channels[0].label, data, max_size);
664 csrow->channels[0].label[max_size] = '\0';
667 return size;
670 static ssize_t csrow_ch1_dimm_label_store(struct csrow_info *csrow,
671 const char *data, size_t size)
673 ssize_t max_size = 0;
675 if (csrow->nr_channels > 1) {
676 max_size = min((ssize_t)size,(ssize_t)EDAC_MC_LABEL_LEN-1);
677 strncpy(csrow->channels[1].label, data, max_size);
678 csrow->channels[1].label[max_size] = '\0';
681 return max_size;
684 static ssize_t csrow_ue_count_show(struct csrow_info *csrow, char *data)
686 return sprintf(data,"%u\n", csrow->ue_count);
689 static ssize_t csrow_ce_count_show(struct csrow_info *csrow, char *data)
691 return sprintf(data,"%u\n", csrow->ce_count);
694 static ssize_t csrow_ch0_ce_count_show(struct csrow_info *csrow, char *data)
696 ssize_t size = 0;
698 if (csrow->nr_channels > 0) {
699 size = sprintf(data,"%u\n", csrow->channels[0].ce_count);
702 return size;
705 static ssize_t csrow_ch1_ce_count_show(struct csrow_info *csrow, char *data)
707 ssize_t size = 0;
709 if (csrow->nr_channels > 1) {
710 size = sprintf(data,"%u\n", csrow->channels[1].ce_count);
713 return size;
716 static ssize_t csrow_size_show(struct csrow_info *csrow, char *data)
718 return sprintf(data,"%u\n", PAGES_TO_MiB(csrow->nr_pages));
721 static ssize_t csrow_mem_type_show(struct csrow_info *csrow, char *data)
723 return sprintf(data,"%s\n", mem_types[csrow->mtype]);
726 static ssize_t csrow_dev_type_show(struct csrow_info *csrow, char *data)
728 return sprintf(data,"%s\n", dev_types[csrow->dtype]);
731 static ssize_t csrow_edac_mode_show(struct csrow_info *csrow, char *data)
733 return sprintf(data,"%s\n", edac_caps[csrow->edac_mode]);
736 struct csrowdev_attribute {
737 struct attribute attr;
738 ssize_t (*show)(struct csrow_info *,char *);
739 ssize_t (*store)(struct csrow_info *, const char *,size_t);
742 #define to_csrow(k) container_of(k, struct csrow_info, kobj)
743 #define to_csrowdev_attr(a) container_of(a, struct csrowdev_attribute, attr)
745 /* Set of show/store higher level functions for csrow objects */
746 static ssize_t csrowdev_show(struct kobject *kobj, struct attribute *attr,
747 char *buffer)
749 struct csrow_info *csrow = to_csrow(kobj);
750 struct csrowdev_attribute *csrowdev_attr = to_csrowdev_attr(attr);
752 if (csrowdev_attr->show)
753 return csrowdev_attr->show(csrow, buffer);
755 return -EIO;
758 static ssize_t csrowdev_store(struct kobject *kobj, struct attribute *attr,
759 const char *buffer, size_t count)
761 struct csrow_info *csrow = to_csrow(kobj);
762 struct csrowdev_attribute * csrowdev_attr = to_csrowdev_attr(attr);
764 if (csrowdev_attr->store)
765 return csrowdev_attr->store(csrow, buffer, count);
767 return -EIO;
770 static struct sysfs_ops csrowfs_ops = {
771 .show = csrowdev_show,
772 .store = csrowdev_store
775 #define CSROWDEV_ATTR(_name,_mode,_show,_store) \
776 struct csrowdev_attribute attr_##_name = { \
777 .attr = {.name = __stringify(_name), .mode = _mode }, \
778 .show = _show, \
779 .store = _store, \
782 /* cwrow<id>/attribute files */
783 CSROWDEV_ATTR(size_mb,S_IRUGO,csrow_size_show,NULL);
784 CSROWDEV_ATTR(dev_type,S_IRUGO,csrow_dev_type_show,NULL);
785 CSROWDEV_ATTR(mem_type,S_IRUGO,csrow_mem_type_show,NULL);
786 CSROWDEV_ATTR(edac_mode,S_IRUGO,csrow_edac_mode_show,NULL);
787 CSROWDEV_ATTR(ue_count,S_IRUGO,csrow_ue_count_show,NULL);
788 CSROWDEV_ATTR(ce_count,S_IRUGO,csrow_ce_count_show,NULL);
789 CSROWDEV_ATTR(ch0_ce_count,S_IRUGO,csrow_ch0_ce_count_show,NULL);
790 CSROWDEV_ATTR(ch1_ce_count,S_IRUGO,csrow_ch1_ce_count_show,NULL);
792 /* control/attribute files */
793 CSROWDEV_ATTR(ch0_dimm_label,S_IRUGO|S_IWUSR,
794 csrow_ch0_dimm_label_show,
795 csrow_ch0_dimm_label_store);
796 CSROWDEV_ATTR(ch1_dimm_label,S_IRUGO|S_IWUSR,
797 csrow_ch1_dimm_label_show,
798 csrow_ch1_dimm_label_store);
800 /* Attributes of the CSROW<id> object */
801 static struct csrowdev_attribute *csrow_attr[] = {
802 &attr_dev_type,
803 &attr_mem_type,
804 &attr_edac_mode,
805 &attr_size_mb,
806 &attr_ue_count,
807 &attr_ce_count,
808 &attr_ch0_ce_count,
809 &attr_ch1_ce_count,
810 &attr_ch0_dimm_label,
811 &attr_ch1_dimm_label,
812 NULL,
815 /* No memory to release */
816 static void edac_csrow_instance_release(struct kobject *kobj)
818 struct csrow_info *cs;
820 debugf1("%s()\n", __func__);
821 cs = container_of(kobj, struct csrow_info, kobj);
822 complete(&cs->kobj_complete);
825 static struct kobj_type ktype_csrow = {
826 .release = edac_csrow_instance_release,
827 .sysfs_ops = &csrowfs_ops,
828 .default_attrs = (struct attribute **) csrow_attr,
831 /* Create a CSROW object under specifed edac_mc_device */
832 static int edac_create_csrow_object(struct kobject *edac_mci_kobj,
833 struct csrow_info *csrow, int index)
835 int err = 0;
837 debugf0("%s()\n", __func__);
838 memset(&csrow->kobj, 0, sizeof(csrow->kobj));
840 /* generate ..../edac/mc/mc<id>/csrow<index> */
842 csrow->kobj.parent = edac_mci_kobj;
843 csrow->kobj.ktype = &ktype_csrow;
845 /* name this instance of csrow<id> */
846 err = kobject_set_name(&csrow->kobj,"csrow%d",index);
848 if (!err) {
849 /* Instanstiate the csrow object */
850 err = kobject_register(&csrow->kobj);
852 if (err)
853 debugf0("Failed to register CSROW%d\n",index);
854 else
855 debugf0("Registered CSROW%d\n",index);
858 return err;
861 /* sysfs data structures and methods for the MCI kobjects */
863 static ssize_t mci_reset_counters_store(struct mem_ctl_info *mci,
864 const char *data, size_t count)
866 int row, chan;
868 mci->ue_noinfo_count = 0;
869 mci->ce_noinfo_count = 0;
870 mci->ue_count = 0;
871 mci->ce_count = 0;
873 for (row = 0; row < mci->nr_csrows; row++) {
874 struct csrow_info *ri = &mci->csrows[row];
876 ri->ue_count = 0;
877 ri->ce_count = 0;
879 for (chan = 0; chan < ri->nr_channels; chan++)
880 ri->channels[chan].ce_count = 0;
883 mci->start_time = jiffies;
884 return count;
887 static ssize_t mci_ue_count_show(struct mem_ctl_info *mci, char *data)
889 return sprintf(data,"%d\n", mci->ue_count);
892 static ssize_t mci_ce_count_show(struct mem_ctl_info *mci, char *data)
894 return sprintf(data,"%d\n", mci->ce_count);
897 static ssize_t mci_ce_noinfo_show(struct mem_ctl_info *mci, char *data)
899 return sprintf(data,"%d\n", mci->ce_noinfo_count);
902 static ssize_t mci_ue_noinfo_show(struct mem_ctl_info *mci, char *data)
904 return sprintf(data,"%d\n", mci->ue_noinfo_count);
907 static ssize_t mci_seconds_show(struct mem_ctl_info *mci, char *data)
909 return sprintf(data,"%ld\n", (jiffies - mci->start_time) / HZ);
912 static ssize_t mci_mod_name_show(struct mem_ctl_info *mci, char *data)
914 return sprintf(data,"%s %s\n", mci->mod_name, mci->mod_ver);
917 static ssize_t mci_ctl_name_show(struct mem_ctl_info *mci, char *data)
919 return sprintf(data,"%s\n", mci->ctl_name);
922 static int mci_output_edac_cap(char *buf, unsigned long edac_cap)
924 char *p = buf;
925 int bit_idx;
927 for (bit_idx = 0; bit_idx < 8 * sizeof(edac_cap); bit_idx++) {
928 if ((edac_cap >> bit_idx) & 0x1)
929 p += sprintf(p, "%s ", edac_caps[bit_idx]);
932 return p - buf;
935 static ssize_t mci_edac_capability_show(struct mem_ctl_info *mci, char *data)
937 char *p = data;
939 p += mci_output_edac_cap(p,mci->edac_ctl_cap);
940 p += sprintf(p, "\n");
941 return p - data;
944 static ssize_t mci_edac_current_capability_show(struct mem_ctl_info *mci,
945 char *data)
947 char *p = data;
949 p += mci_output_edac_cap(p,mci->edac_cap);
950 p += sprintf(p, "\n");
951 return p - data;
954 static int mci_output_mtype_cap(char *buf, unsigned long mtype_cap)
956 char *p = buf;
957 int bit_idx;
959 for (bit_idx = 0; bit_idx < 8 * sizeof(mtype_cap); bit_idx++) {
960 if ((mtype_cap >> bit_idx) & 0x1)
961 p += sprintf(p, "%s ", mem_types[bit_idx]);
964 return p - buf;
967 static ssize_t mci_supported_mem_type_show(struct mem_ctl_info *mci,
968 char *data)
970 char *p = data;
972 p += mci_output_mtype_cap(p,mci->mtype_cap);
973 p += sprintf(p, "\n");
974 return p - data;
977 static ssize_t mci_size_mb_show(struct mem_ctl_info *mci, char *data)
979 int total_pages, csrow_idx;
981 for (total_pages = csrow_idx = 0; csrow_idx < mci->nr_csrows;
982 csrow_idx++) {
983 struct csrow_info *csrow = &mci->csrows[csrow_idx];
985 if (!csrow->nr_pages)
986 continue;
988 total_pages += csrow->nr_pages;
991 return sprintf(data,"%u\n", PAGES_TO_MiB(total_pages));
994 struct mcidev_attribute {
995 struct attribute attr;
996 ssize_t (*show)(struct mem_ctl_info *,char *);
997 ssize_t (*store)(struct mem_ctl_info *, const char *,size_t);
1000 #define to_mci(k) container_of(k, struct mem_ctl_info, edac_mci_kobj)
1001 #define to_mcidev_attr(a) container_of(a, struct mcidev_attribute, attr)
1003 static ssize_t mcidev_show(struct kobject *kobj, struct attribute *attr,
1004 char *buffer)
1006 struct mem_ctl_info *mem_ctl_info = to_mci(kobj);
1007 struct mcidev_attribute * mcidev_attr = to_mcidev_attr(attr);
1009 if (mcidev_attr->show)
1010 return mcidev_attr->show(mem_ctl_info, buffer);
1012 return -EIO;
1015 static ssize_t mcidev_store(struct kobject *kobj, struct attribute *attr,
1016 const char *buffer, size_t count)
1018 struct mem_ctl_info *mem_ctl_info = to_mci(kobj);
1019 struct mcidev_attribute * mcidev_attr = to_mcidev_attr(attr);
1021 if (mcidev_attr->store)
1022 return mcidev_attr->store(mem_ctl_info, buffer, count);
1024 return -EIO;
1027 static struct sysfs_ops mci_ops = {
1028 .show = mcidev_show,
1029 .store = mcidev_store
1032 #define MCIDEV_ATTR(_name,_mode,_show,_store) \
1033 struct mcidev_attribute mci_attr_##_name = { \
1034 .attr = {.name = __stringify(_name), .mode = _mode }, \
1035 .show = _show, \
1036 .store = _store, \
1039 /* Control file */
1040 MCIDEV_ATTR(reset_counters,S_IWUSR,NULL,mci_reset_counters_store);
1042 /* Attribute files */
1043 MCIDEV_ATTR(mc_name,S_IRUGO,mci_ctl_name_show,NULL);
1044 MCIDEV_ATTR(module_name,S_IRUGO,mci_mod_name_show,NULL);
1045 MCIDEV_ATTR(edac_capability,S_IRUGO,mci_edac_capability_show,NULL);
1046 MCIDEV_ATTR(size_mb,S_IRUGO,mci_size_mb_show,NULL);
1047 MCIDEV_ATTR(seconds_since_reset,S_IRUGO,mci_seconds_show,NULL);
1048 MCIDEV_ATTR(ue_noinfo_count,S_IRUGO,mci_ue_noinfo_show,NULL);
1049 MCIDEV_ATTR(ce_noinfo_count,S_IRUGO,mci_ce_noinfo_show,NULL);
1050 MCIDEV_ATTR(ue_count,S_IRUGO,mci_ue_count_show,NULL);
1051 MCIDEV_ATTR(ce_count,S_IRUGO,mci_ce_count_show,NULL);
1052 MCIDEV_ATTR(edac_current_capability,S_IRUGO,
1053 mci_edac_current_capability_show,NULL);
1054 MCIDEV_ATTR(supported_mem_type,S_IRUGO,
1055 mci_supported_mem_type_show,NULL);
1057 static struct mcidev_attribute *mci_attr[] = {
1058 &mci_attr_reset_counters,
1059 &mci_attr_module_name,
1060 &mci_attr_mc_name,
1061 &mci_attr_edac_capability,
1062 &mci_attr_edac_current_capability,
1063 &mci_attr_supported_mem_type,
1064 &mci_attr_size_mb,
1065 &mci_attr_seconds_since_reset,
1066 &mci_attr_ue_noinfo_count,
1067 &mci_attr_ce_noinfo_count,
1068 &mci_attr_ue_count,
1069 &mci_attr_ce_count,
1070 NULL
1074 * Release of a MC controlling instance
1076 static void edac_mci_instance_release(struct kobject *kobj)
1078 struct mem_ctl_info *mci;
1080 mci = to_mci(kobj);
1081 debugf0("%s() idx=%d\n", __func__, mci->mc_idx);
1082 complete(&mci->kobj_complete);
1085 static struct kobj_type ktype_mci = {
1086 .release = edac_mci_instance_release,
1087 .sysfs_ops = &mci_ops,
1088 .default_attrs = (struct attribute **) mci_attr,
1091 #endif /* DISABLE_EDAC_SYSFS */
1093 #define EDAC_DEVICE_SYMLINK "device"
1096 * Create a new Memory Controller kobject instance,
1097 * mc<id> under the 'mc' directory
1099 * Return:
1100 * 0 Success
1101 * !0 Failure
1103 static int edac_create_sysfs_mci_device(struct mem_ctl_info *mci)
1104 #ifdef DISABLE_EDAC_SYSFS
1106 return 0;
1108 #else
1110 int i;
1111 int err;
1112 struct csrow_info *csrow;
1113 struct kobject *edac_mci_kobj=&mci->edac_mci_kobj;
1115 debugf0("%s() idx=%d\n", __func__, mci->mc_idx);
1116 memset(edac_mci_kobj, 0, sizeof(*edac_mci_kobj));
1118 /* set the name of the mc<id> object */
1119 err = kobject_set_name(edac_mci_kobj,"mc%d",mci->mc_idx);
1121 if (err)
1122 return err;
1124 /* link to our parent the '..../edac/mc' object */
1125 edac_mci_kobj->parent = &edac_memctrl_kobj;
1126 edac_mci_kobj->ktype = &ktype_mci;
1128 /* register the mc<id> kobject */
1129 err = kobject_register(edac_mci_kobj);
1131 if (err)
1132 return err;
1134 /* create a symlink for the device */
1135 err = sysfs_create_link(edac_mci_kobj, &mci->pdev->dev.kobj,
1136 EDAC_DEVICE_SYMLINK);
1138 if (err)
1139 goto fail0;
1141 /* Make directories for each CSROW object
1142 * under the mc<id> kobject
1144 for (i = 0; i < mci->nr_csrows; i++) {
1145 csrow = &mci->csrows[i];
1147 /* Only expose populated CSROWs */
1148 if (csrow->nr_pages > 0) {
1149 err = edac_create_csrow_object(edac_mci_kobj,csrow,i);
1151 if (err)
1152 goto fail1;
1156 return 0;
1158 /* CSROW error: backout what has already been registered, */
1159 fail1:
1160 for ( i--; i >= 0; i--) {
1161 if (csrow->nr_pages > 0) {
1162 init_completion(&csrow->kobj_complete);
1163 kobject_unregister(&mci->csrows[i].kobj);
1164 wait_for_completion(&csrow->kobj_complete);
1168 fail0:
1169 init_completion(&mci->kobj_complete);
1170 kobject_unregister(edac_mci_kobj);
1171 wait_for_completion(&mci->kobj_complete);
1172 return err;
1174 #endif /* DISABLE_EDAC_SYSFS */
1177 * remove a Memory Controller instance
1179 static void edac_remove_sysfs_mci_device(struct mem_ctl_info *mci)
1181 #ifndef DISABLE_EDAC_SYSFS
1182 int i;
1184 debugf0("%s()\n", __func__);
1186 /* remove all csrow kobjects */
1187 for (i = 0; i < mci->nr_csrows; i++) {
1188 if (mci->csrows[i].nr_pages > 0) {
1189 init_completion(&mci->csrows[i].kobj_complete);
1190 kobject_unregister(&mci->csrows[i].kobj);
1191 wait_for_completion(&mci->csrows[i].kobj_complete);
1195 sysfs_remove_link(&mci->edac_mci_kobj, EDAC_DEVICE_SYMLINK);
1196 init_completion(&mci->kobj_complete);
1197 kobject_unregister(&mci->edac_mci_kobj);
1198 wait_for_completion(&mci->kobj_complete);
1199 #endif /* DISABLE_EDAC_SYSFS */
1202 /* END OF sysfs data and methods */
1204 #ifdef CONFIG_EDAC_DEBUG
1206 void edac_mc_dump_channel(struct channel_info *chan)
1208 debugf4("\tchannel = %p\n", chan);
1209 debugf4("\tchannel->chan_idx = %d\n", chan->chan_idx);
1210 debugf4("\tchannel->ce_count = %d\n", chan->ce_count);
1211 debugf4("\tchannel->label = '%s'\n", chan->label);
1212 debugf4("\tchannel->csrow = %p\n\n", chan->csrow);
1214 EXPORT_SYMBOL_GPL(edac_mc_dump_channel);
1216 void edac_mc_dump_csrow(struct csrow_info *csrow)
1218 debugf4("\tcsrow = %p\n", csrow);
1219 debugf4("\tcsrow->csrow_idx = %d\n", csrow->csrow_idx);
1220 debugf4("\tcsrow->first_page = 0x%lx\n",
1221 csrow->first_page);
1222 debugf4("\tcsrow->last_page = 0x%lx\n", csrow->last_page);
1223 debugf4("\tcsrow->page_mask = 0x%lx\n", csrow->page_mask);
1224 debugf4("\tcsrow->nr_pages = 0x%x\n", csrow->nr_pages);
1225 debugf4("\tcsrow->nr_channels = %d\n",
1226 csrow->nr_channels);
1227 debugf4("\tcsrow->channels = %p\n", csrow->channels);
1228 debugf4("\tcsrow->mci = %p\n\n", csrow->mci);
1230 EXPORT_SYMBOL_GPL(edac_mc_dump_csrow);
1232 void edac_mc_dump_mci(struct mem_ctl_info *mci)
1234 debugf3("\tmci = %p\n", mci);
1235 debugf3("\tmci->mtype_cap = %lx\n", mci->mtype_cap);
1236 debugf3("\tmci->edac_ctl_cap = %lx\n", mci->edac_ctl_cap);
1237 debugf3("\tmci->edac_cap = %lx\n", mci->edac_cap);
1238 debugf4("\tmci->edac_check = %p\n", mci->edac_check);
1239 debugf3("\tmci->nr_csrows = %d, csrows = %p\n",
1240 mci->nr_csrows, mci->csrows);
1241 debugf3("\tpdev = %p\n", mci->pdev);
1242 debugf3("\tmod_name:ctl_name = %s:%s\n",
1243 mci->mod_name, mci->ctl_name);
1244 debugf3("\tpvt_info = %p\n\n", mci->pvt_info);
1246 EXPORT_SYMBOL_GPL(edac_mc_dump_mci);
1248 #endif /* CONFIG_EDAC_DEBUG */
1250 /* 'ptr' points to a possibly unaligned item X such that sizeof(X) is 'size'.
1251 * Adjust 'ptr' so that its alignment is at least as stringent as what the
1252 * compiler would provide for X and return the aligned result.
1254 * If 'size' is a constant, the compiler will optimize this whole function
1255 * down to either a no-op or the addition of a constant to the value of 'ptr'.
1257 static inline char * align_ptr(void *ptr, unsigned size)
1259 unsigned align, r;
1261 /* Here we assume that the alignment of a "long long" is the most
1262 * stringent alignment that the compiler will ever provide by default.
1263 * As far as I know, this is a reasonable assumption.
1265 if (size > sizeof(long))
1266 align = sizeof(long long);
1267 else if (size > sizeof(int))
1268 align = sizeof(long);
1269 else if (size > sizeof(short))
1270 align = sizeof(int);
1271 else if (size > sizeof(char))
1272 align = sizeof(short);
1273 else
1274 return (char *) ptr;
1276 r = size % align;
1278 if (r == 0)
1279 return (char *) ptr;
1281 return (char *) (((unsigned long) ptr) + align - r);
1285 * edac_mc_alloc: Allocate a struct mem_ctl_info structure
1286 * @size_pvt: size of private storage needed
1287 * @nr_csrows: Number of CWROWS needed for this MC
1288 * @nr_chans: Number of channels for the MC
1290 * Everything is kmalloc'ed as one big chunk - more efficient.
1291 * Only can be used if all structures have the same lifetime - otherwise
1292 * you have to allocate and initialize your own structures.
1294 * Use edac_mc_free() to free mc structures allocated by this function.
1296 * Returns:
1297 * NULL allocation failed
1298 * struct mem_ctl_info pointer
1300 struct mem_ctl_info *edac_mc_alloc(unsigned sz_pvt, unsigned nr_csrows,
1301 unsigned nr_chans)
1303 struct mem_ctl_info *mci;
1304 struct csrow_info *csi, *csrow;
1305 struct channel_info *chi, *chp, *chan;
1306 void *pvt;
1307 unsigned size;
1308 int row, chn;
1310 /* Figure out the offsets of the various items from the start of an mc
1311 * structure. We want the alignment of each item to be at least as
1312 * stringent as what the compiler would provide if we could simply
1313 * hardcode everything into a single struct.
1315 mci = (struct mem_ctl_info *) 0;
1316 csi = (struct csrow_info *)align_ptr(&mci[1], sizeof(*csi));
1317 chi = (struct channel_info *)
1318 align_ptr(&csi[nr_csrows], sizeof(*chi));
1319 pvt = align_ptr(&chi[nr_chans * nr_csrows], sz_pvt);
1320 size = ((unsigned long) pvt) + sz_pvt;
1322 if ((mci = kmalloc(size, GFP_KERNEL)) == NULL)
1323 return NULL;
1325 /* Adjust pointers so they point within the memory we just allocated
1326 * rather than an imaginary chunk of memory located at address 0.
1328 csi = (struct csrow_info *) (((char *) mci) + ((unsigned long) csi));
1329 chi = (struct channel_info *) (((char *) mci) + ((unsigned long) chi));
1330 pvt = sz_pvt ? (((char *) mci) + ((unsigned long) pvt)) : NULL;
1332 memset(mci, 0, size); /* clear all fields */
1333 mci->csrows = csi;
1334 mci->pvt_info = pvt;
1335 mci->nr_csrows = nr_csrows;
1337 for (row = 0; row < nr_csrows; row++) {
1338 csrow = &csi[row];
1339 csrow->csrow_idx = row;
1340 csrow->mci = mci;
1341 csrow->nr_channels = nr_chans;
1342 chp = &chi[row * nr_chans];
1343 csrow->channels = chp;
1345 for (chn = 0; chn < nr_chans; chn++) {
1346 chan = &chp[chn];
1347 chan->chan_idx = chn;
1348 chan->csrow = csrow;
1352 return mci;
1354 EXPORT_SYMBOL_GPL(edac_mc_alloc);
1357 * edac_mc_free: Free a previously allocated 'mci' structure
1358 * @mci: pointer to a struct mem_ctl_info structure
1360 void edac_mc_free(struct mem_ctl_info *mci)
1362 kfree(mci);
1364 EXPORT_SYMBOL_GPL(edac_mc_free);
1366 static struct mem_ctl_info *find_mci_by_pdev(struct pci_dev *pdev)
1368 struct mem_ctl_info *mci;
1369 struct list_head *item;
1371 debugf3("%s()\n", __func__);
1373 list_for_each(item, &mc_devices) {
1374 mci = list_entry(item, struct mem_ctl_info, link);
1376 if (mci->pdev == pdev)
1377 return mci;
1380 return NULL;
1383 static int add_mc_to_global_list(struct mem_ctl_info *mci)
1385 struct list_head *item, *insert_before;
1386 struct mem_ctl_info *p;
1387 int i;
1389 if (list_empty(&mc_devices)) {
1390 mci->mc_idx = 0;
1391 insert_before = &mc_devices;
1392 } else {
1393 if (find_mci_by_pdev(mci->pdev)) {
1394 edac_printk(KERN_WARNING, EDAC_MC,
1395 "%s (%s) %s %s already assigned %d\n",
1396 mci->pdev->dev.bus_id,
1397 pci_name(mci->pdev), mci->mod_name,
1398 mci->ctl_name, mci->mc_idx);
1399 return 1;
1402 insert_before = NULL;
1403 i = 0;
1405 list_for_each(item, &mc_devices) {
1406 p = list_entry(item, struct mem_ctl_info, link);
1408 if (p->mc_idx != i) {
1409 insert_before = item;
1410 break;
1413 i++;
1416 mci->mc_idx = i;
1418 if (insert_before == NULL)
1419 insert_before = &mc_devices;
1422 list_add_tail_rcu(&mci->link, insert_before);
1423 return 0;
1426 static void complete_mc_list_del(struct rcu_head *head)
1428 struct mem_ctl_info *mci;
1430 mci = container_of(head, struct mem_ctl_info, rcu);
1431 INIT_LIST_HEAD(&mci->link);
1432 complete(&mci->complete);
1435 static void del_mc_from_global_list(struct mem_ctl_info *mci)
1437 list_del_rcu(&mci->link);
1438 init_completion(&mci->complete);
1439 call_rcu(&mci->rcu, complete_mc_list_del);
1440 wait_for_completion(&mci->complete);
1444 * edac_mc_add_mc: Insert the 'mci' structure into the mci global list and
1445 * create sysfs entries associated with mci structure
1446 * @mci: pointer to the mci structure to be added to the list
1448 * Return:
1449 * 0 Success
1450 * !0 Failure
1453 /* FIXME - should a warning be printed if no error detection? correction? */
1454 int edac_mc_add_mc(struct mem_ctl_info *mci)
1456 debugf0("%s()\n", __func__);
1457 #ifdef CONFIG_EDAC_DEBUG
1458 if (edac_debug_level >= 3)
1459 edac_mc_dump_mci(mci);
1461 if (edac_debug_level >= 4) {
1462 int i;
1464 for (i = 0; i < mci->nr_csrows; i++) {
1465 int j;
1467 edac_mc_dump_csrow(&mci->csrows[i]);
1468 for (j = 0; j < mci->csrows[i].nr_channels; j++)
1469 edac_mc_dump_channel(
1470 &mci->csrows[i].channels[j]);
1473 #endif
1474 down(&mem_ctls_mutex);
1476 if (add_mc_to_global_list(mci))
1477 goto fail0;
1479 /* set load time so that error rate can be tracked */
1480 mci->start_time = jiffies;
1482 if (edac_create_sysfs_mci_device(mci)) {
1483 edac_mc_printk(mci, KERN_WARNING,
1484 "failed to create sysfs device\n");
1485 goto fail1;
1488 /* Report action taken */
1489 edac_mc_printk(mci, KERN_INFO, "Giving out device to %s %s: PCI %s\n",
1490 mci->mod_name, mci->ctl_name, pci_name(mci->pdev));
1492 up(&mem_ctls_mutex);
1493 return 0;
1495 fail1:
1496 del_mc_from_global_list(mci);
1498 fail0:
1499 up(&mem_ctls_mutex);
1500 return 1;
1502 EXPORT_SYMBOL_GPL(edac_mc_add_mc);
1505 * edac_mc_del_mc: Remove sysfs entries for specified mci structure and
1506 * remove mci structure from global list
1507 * @pdev: Pointer to 'struct pci_dev' representing mci structure to remove.
1509 * Return pointer to removed mci structure, or NULL if device not found.
1511 struct mem_ctl_info * edac_mc_del_mc(struct pci_dev *pdev)
1513 struct mem_ctl_info *mci;
1515 debugf0("MC: %s()\n", __func__);
1516 down(&mem_ctls_mutex);
1518 if ((mci = find_mci_by_pdev(pdev)) == NULL) {
1519 up(&mem_ctls_mutex);
1520 return NULL;
1523 edac_remove_sysfs_mci_device(mci);
1524 del_mc_from_global_list(mci);
1525 up(&mem_ctls_mutex);
1526 edac_printk(KERN_INFO, EDAC_MC,
1527 "Removed device %d for %s %s: PCI %s\n", mci->mc_idx,
1528 mci->mod_name, mci->ctl_name, pci_name(mci->pdev));
1529 return mci;
1531 EXPORT_SYMBOL_GPL(edac_mc_del_mc);
1533 void edac_mc_scrub_block(unsigned long page, unsigned long offset, u32 size)
1535 struct page *pg;
1536 void *virt_addr;
1537 unsigned long flags = 0;
1539 debugf3("%s()\n", __func__);
1541 /* ECC error page was not in our memory. Ignore it. */
1542 if(!pfn_valid(page))
1543 return;
1545 /* Find the actual page structure then map it and fix */
1546 pg = pfn_to_page(page);
1548 if (PageHighMem(pg))
1549 local_irq_save(flags);
1551 virt_addr = kmap_atomic(pg, KM_BOUNCE_READ);
1553 /* Perform architecture specific atomic scrub operation */
1554 atomic_scrub(virt_addr + offset, size);
1556 /* Unmap and complete */
1557 kunmap_atomic(virt_addr, KM_BOUNCE_READ);
1559 if (PageHighMem(pg))
1560 local_irq_restore(flags);
1562 EXPORT_SYMBOL_GPL(edac_mc_scrub_block);
1564 /* FIXME - should return -1 */
1565 int edac_mc_find_csrow_by_page(struct mem_ctl_info *mci, unsigned long page)
1567 struct csrow_info *csrows = mci->csrows;
1568 int row, i;
1570 debugf1("MC%d: %s(): 0x%lx\n", mci->mc_idx, __func__, page);
1571 row = -1;
1573 for (i = 0; i < mci->nr_csrows; i++) {
1574 struct csrow_info *csrow = &csrows[i];
1576 if (csrow->nr_pages == 0)
1577 continue;
1579 debugf3("MC%d: %s(): first(0x%lx) page(0x%lx) last(0x%lx) "
1580 "mask(0x%lx)\n", mci->mc_idx, __func__,
1581 csrow->first_page, page, csrow->last_page,
1582 csrow->page_mask);
1584 if ((page >= csrow->first_page) &&
1585 (page <= csrow->last_page) &&
1586 ((page & csrow->page_mask) ==
1587 (csrow->first_page & csrow->page_mask))) {
1588 row = i;
1589 break;
1593 if (row == -1)
1594 edac_mc_printk(mci, KERN_ERR,
1595 "could not look up page error address %lx\n",
1596 (unsigned long) page);
1598 return row;
1600 EXPORT_SYMBOL_GPL(edac_mc_find_csrow_by_page);
1602 /* FIXME - setable log (warning/emerg) levels */
1603 /* FIXME - integrate with evlog: http://evlog.sourceforge.net/ */
1604 void edac_mc_handle_ce(struct mem_ctl_info *mci,
1605 unsigned long page_frame_number, unsigned long offset_in_page,
1606 unsigned long syndrome, int row, int channel, const char *msg)
1608 unsigned long remapped_page;
1610 debugf3("MC%d: %s()\n", mci->mc_idx, __func__);
1612 /* FIXME - maybe make panic on INTERNAL ERROR an option */
1613 if (row >= mci->nr_csrows || row < 0) {
1614 /* something is wrong */
1615 edac_mc_printk(mci, KERN_ERR,
1616 "INTERNAL ERROR: row out of range "
1617 "(%d >= %d)\n", row, mci->nr_csrows);
1618 edac_mc_handle_ce_no_info(mci, "INTERNAL ERROR");
1619 return;
1622 if (channel >= mci->csrows[row].nr_channels || channel < 0) {
1623 /* something is wrong */
1624 edac_mc_printk(mci, KERN_ERR,
1625 "INTERNAL ERROR: channel out of range "
1626 "(%d >= %d)\n", channel,
1627 mci->csrows[row].nr_channels);
1628 edac_mc_handle_ce_no_info(mci, "INTERNAL ERROR");
1629 return;
1632 if (log_ce)
1633 /* FIXME - put in DIMM location */
1634 edac_mc_printk(mci, KERN_WARNING,
1635 "CE page 0x%lx, offset 0x%lx, grain %d, syndrome "
1636 "0x%lx, row %d, channel %d, label \"%s\": %s\n",
1637 page_frame_number, offset_in_page,
1638 mci->csrows[row].grain, syndrome, row, channel,
1639 mci->csrows[row].channels[channel].label, msg);
1641 mci->ce_count++;
1642 mci->csrows[row].ce_count++;
1643 mci->csrows[row].channels[channel].ce_count++;
1645 if (mci->scrub_mode & SCRUB_SW_SRC) {
1647 * Some MC's can remap memory so that it is still available
1648 * at a different address when PCI devices map into memory.
1649 * MC's that can't do this lose the memory where PCI devices
1650 * are mapped. This mapping is MC dependant and so we call
1651 * back into the MC driver for it to map the MC page to
1652 * a physical (CPU) page which can then be mapped to a virtual
1653 * page - which can then be scrubbed.
1655 remapped_page = mci->ctl_page_to_phys ?
1656 mci->ctl_page_to_phys(mci, page_frame_number) :
1657 page_frame_number;
1659 edac_mc_scrub_block(remapped_page, offset_in_page,
1660 mci->csrows[row].grain);
1663 EXPORT_SYMBOL_GPL(edac_mc_handle_ce);
1665 void edac_mc_handle_ce_no_info(struct mem_ctl_info *mci, const char *msg)
1667 if (log_ce)
1668 edac_mc_printk(mci, KERN_WARNING,
1669 "CE - no information available: %s\n", msg);
1671 mci->ce_noinfo_count++;
1672 mci->ce_count++;
1674 EXPORT_SYMBOL_GPL(edac_mc_handle_ce_no_info);
1676 void edac_mc_handle_ue(struct mem_ctl_info *mci,
1677 unsigned long page_frame_number, unsigned long offset_in_page,
1678 int row, const char *msg)
1680 int len = EDAC_MC_LABEL_LEN * 4;
1681 char labels[len + 1];
1682 char *pos = labels;
1683 int chan;
1684 int chars;
1686 debugf3("MC%d: %s()\n", mci->mc_idx, __func__);
1688 /* FIXME - maybe make panic on INTERNAL ERROR an option */
1689 if (row >= mci->nr_csrows || row < 0) {
1690 /* something is wrong */
1691 edac_mc_printk(mci, KERN_ERR,
1692 "INTERNAL ERROR: row out of range "
1693 "(%d >= %d)\n", row, mci->nr_csrows);
1694 edac_mc_handle_ue_no_info(mci, "INTERNAL ERROR");
1695 return;
1698 chars = snprintf(pos, len + 1, "%s",
1699 mci->csrows[row].channels[0].label);
1700 len -= chars;
1701 pos += chars;
1703 for (chan = 1; (chan < mci->csrows[row].nr_channels) && (len > 0);
1704 chan++) {
1705 chars = snprintf(pos, len + 1, ":%s",
1706 mci->csrows[row].channels[chan].label);
1707 len -= chars;
1708 pos += chars;
1711 if (log_ue)
1712 edac_mc_printk(mci, KERN_EMERG,
1713 "UE page 0x%lx, offset 0x%lx, grain %d, row %d, "
1714 "labels \"%s\": %s\n", page_frame_number,
1715 offset_in_page, mci->csrows[row].grain, row, labels,
1716 msg);
1718 if (panic_on_ue)
1719 panic("EDAC MC%d: UE page 0x%lx, offset 0x%lx, grain %d, "
1720 "row %d, labels \"%s\": %s\n", mci->mc_idx,
1721 page_frame_number, offset_in_page,
1722 mci->csrows[row].grain, row, labels, msg);
1724 mci->ue_count++;
1725 mci->csrows[row].ue_count++;
1727 EXPORT_SYMBOL_GPL(edac_mc_handle_ue);
1729 void edac_mc_handle_ue_no_info(struct mem_ctl_info *mci, const char *msg)
1731 if (panic_on_ue)
1732 panic("EDAC MC%d: Uncorrected Error", mci->mc_idx);
1734 if (log_ue)
1735 edac_mc_printk(mci, KERN_WARNING,
1736 "UE - no information available: %s\n", msg);
1737 mci->ue_noinfo_count++;
1738 mci->ue_count++;
1740 EXPORT_SYMBOL_GPL(edac_mc_handle_ue_no_info);
1742 #ifdef CONFIG_PCI
1744 static u16 get_pci_parity_status(struct pci_dev *dev, int secondary)
1746 int where;
1747 u16 status;
1749 where = secondary ? PCI_SEC_STATUS : PCI_STATUS;
1750 pci_read_config_word(dev, where, &status);
1752 /* If we get back 0xFFFF then we must suspect that the card has been
1753 * pulled but the Linux PCI layer has not yet finished cleaning up.
1754 * We don't want to report on such devices
1757 if (status == 0xFFFF) {
1758 u32 sanity;
1760 pci_read_config_dword(dev, 0, &sanity);
1762 if (sanity == 0xFFFFFFFF)
1763 return 0;
1766 status &= PCI_STATUS_DETECTED_PARITY | PCI_STATUS_SIG_SYSTEM_ERROR |
1767 PCI_STATUS_PARITY;
1769 if (status)
1770 /* reset only the bits we are interested in */
1771 pci_write_config_word(dev, where, status);
1773 return status;
1776 typedef void (*pci_parity_check_fn_t) (struct pci_dev *dev);
1778 /* Clear any PCI parity errors logged by this device. */
1779 static void edac_pci_dev_parity_clear(struct pci_dev *dev)
1781 u8 header_type;
1783 get_pci_parity_status(dev, 0);
1785 /* read the device TYPE, looking for bridges */
1786 pci_read_config_byte(dev, PCI_HEADER_TYPE, &header_type);
1788 if ((header_type & 0x7F) == PCI_HEADER_TYPE_BRIDGE)
1789 get_pci_parity_status(dev, 1);
1793 * PCI Parity polling
1796 static void edac_pci_dev_parity_test(struct pci_dev *dev)
1798 u16 status;
1799 u8 header_type;
1801 /* read the STATUS register on this device
1803 status = get_pci_parity_status(dev, 0);
1805 debugf2("PCI STATUS= 0x%04x %s\n", status, dev->dev.bus_id );
1807 /* check the status reg for errors */
1808 if (status) {
1809 if (status & (PCI_STATUS_SIG_SYSTEM_ERROR))
1810 edac_printk(KERN_CRIT, EDAC_PCI,
1811 "Signaled System Error on %s\n",
1812 pci_name(dev));
1814 if (status & (PCI_STATUS_PARITY)) {
1815 edac_printk(KERN_CRIT, EDAC_PCI,
1816 "Master Data Parity Error on %s\n",
1817 pci_name(dev));
1819 atomic_inc(&pci_parity_count);
1822 if (status & (PCI_STATUS_DETECTED_PARITY)) {
1823 edac_printk(KERN_CRIT, EDAC_PCI,
1824 "Detected Parity Error on %s\n",
1825 pci_name(dev));
1827 atomic_inc(&pci_parity_count);
1831 /* read the device TYPE, looking for bridges */
1832 pci_read_config_byte(dev, PCI_HEADER_TYPE, &header_type);
1834 debugf2("PCI HEADER TYPE= 0x%02x %s\n", header_type, dev->dev.bus_id );
1836 if ((header_type & 0x7F) == PCI_HEADER_TYPE_BRIDGE) {
1837 /* On bridges, need to examine secondary status register */
1838 status = get_pci_parity_status(dev, 1);
1840 debugf2("PCI SEC_STATUS= 0x%04x %s\n",
1841 status, dev->dev.bus_id );
1843 /* check the secondary status reg for errors */
1844 if (status) {
1845 if (status & (PCI_STATUS_SIG_SYSTEM_ERROR))
1846 edac_printk(KERN_CRIT, EDAC_PCI, "Bridge "
1847 "Signaled System Error on %s\n",
1848 pci_name(dev));
1850 if (status & (PCI_STATUS_PARITY)) {
1851 edac_printk(KERN_CRIT, EDAC_PCI, "Bridge "
1852 "Master Data Parity Error on "
1853 "%s\n", pci_name(dev));
1855 atomic_inc(&pci_parity_count);
1858 if (status & (PCI_STATUS_DETECTED_PARITY)) {
1859 edac_printk(KERN_CRIT, EDAC_PCI, "Bridge "
1860 "Detected Parity Error on %s\n",
1861 pci_name(dev));
1863 atomic_inc(&pci_parity_count);
1870 * check_dev_on_list: Scan for a PCI device on a white/black list
1871 * @list: an EDAC &edac_pci_device_list white/black list pointer
1872 * @free_index: index of next free entry on the list
1873 * @pci_dev: PCI Device pointer
1875 * see if list contains the device.
1877 * Returns: 0 not found
1878 * 1 found on list
1880 static int check_dev_on_list(struct edac_pci_device_list *list,
1881 int free_index, struct pci_dev *dev)
1883 int i;
1884 int rc = 0; /* Assume not found */
1885 unsigned short vendor=dev->vendor;
1886 unsigned short device=dev->device;
1888 /* Scan the list, looking for a vendor/device match */
1889 for (i = 0; i < free_index; i++, list++ ) {
1890 if ((list->vendor == vendor ) && (list->device == device )) {
1891 rc = 1;
1892 break;
1896 return rc;
1900 * pci_dev parity list iterator
1901 * Scan the PCI device list for one iteration, looking for SERRORs
1902 * Master Parity ERRORS or Parity ERRORs on primary or secondary devices
1904 static inline void edac_pci_dev_parity_iterator(pci_parity_check_fn_t fn)
1906 struct pci_dev *dev = NULL;
1908 /* request for kernel access to the next PCI device, if any,
1909 * and while we are looking at it have its reference count
1910 * bumped until we are done with it
1912 while((dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev)) != NULL) {
1913 /* if whitelist exists then it has priority, so only scan
1914 * those devices on the whitelist
1916 if (pci_whitelist_count > 0 ) {
1917 if (check_dev_on_list(pci_whitelist,
1918 pci_whitelist_count, dev))
1919 fn(dev);
1920 } else {
1922 * if no whitelist, then check if this devices is
1923 * blacklisted
1925 if (!check_dev_on_list(pci_blacklist,
1926 pci_blacklist_count, dev))
1927 fn(dev);
1932 static void do_pci_parity_check(void)
1934 unsigned long flags;
1935 int before_count;
1937 debugf3("%s()\n", __func__);
1939 if (!check_pci_parity)
1940 return;
1942 before_count = atomic_read(&pci_parity_count);
1944 /* scan all PCI devices looking for a Parity Error on devices and
1945 * bridges
1947 local_irq_save(flags);
1948 edac_pci_dev_parity_iterator(edac_pci_dev_parity_test);
1949 local_irq_restore(flags);
1951 /* Only if operator has selected panic on PCI Error */
1952 if (panic_on_pci_parity) {
1953 /* If the count is different 'after' from 'before' */
1954 if (before_count != atomic_read(&pci_parity_count))
1955 panic("EDAC: PCI Parity Error");
1959 static inline void clear_pci_parity_errors(void)
1961 /* Clear any PCI bus parity errors that devices initially have logged
1962 * in their registers.
1964 edac_pci_dev_parity_iterator(edac_pci_dev_parity_clear);
1967 #else /* CONFIG_PCI */
1969 static inline void do_pci_parity_check(void)
1971 /* no-op */
1974 static inline void clear_pci_parity_errors(void)
1976 /* no-op */
1979 #endif /* CONFIG_PCI */
1982 * Iterate over all MC instances and check for ECC, et al, errors
1984 static inline void check_mc_devices(void)
1986 struct list_head *item;
1987 struct mem_ctl_info *mci;
1989 debugf3("%s()\n", __func__);
1990 down(&mem_ctls_mutex);
1992 list_for_each(item, &mc_devices) {
1993 mci = list_entry(item, struct mem_ctl_info, link);
1995 if (mci->edac_check != NULL)
1996 mci->edac_check(mci);
1999 up(&mem_ctls_mutex);
2003 * Check MC status every poll_msec.
2004 * Check PCI status every poll_msec as well.
2006 * This where the work gets done for edac.
2008 * SMP safe, doesn't use NMI, and auto-rate-limits.
2010 static void do_edac_check(void)
2012 debugf3("%s()\n", __func__);
2013 check_mc_devices();
2014 do_pci_parity_check();
2017 static int edac_kernel_thread(void *arg)
2019 while (!kthread_should_stop()) {
2020 do_edac_check();
2022 /* goto sleep for the interval */
2023 schedule_timeout_interruptible((HZ * poll_msec) / 1000);
2024 try_to_freeze();
2027 return 0;
2031 * edac_mc_init
2032 * module initialization entry point
2034 static int __init edac_mc_init(void)
2036 edac_printk(KERN_INFO, EDAC_MC, EDAC_MC_VERSION "\n");
2039 * Harvest and clear any boot/initialization PCI parity errors
2041 * FIXME: This only clears errors logged by devices present at time of
2042 * module initialization. We should also do an initial clear
2043 * of each newly hotplugged device.
2045 clear_pci_parity_errors();
2047 /* Create the MC sysfs entries */
2048 if (edac_sysfs_memctrl_setup()) {
2049 edac_printk(KERN_ERR, EDAC_MC,
2050 "Error initializing sysfs code\n");
2051 return -ENODEV;
2054 /* Create the PCI parity sysfs entries */
2055 if (edac_sysfs_pci_setup()) {
2056 edac_sysfs_memctrl_teardown();
2057 edac_printk(KERN_ERR, EDAC_MC,
2058 "EDAC PCI: Error initializing sysfs code\n");
2059 return -ENODEV;
2062 /* create our kernel thread */
2063 edac_thread = kthread_run(edac_kernel_thread, NULL, "kedac");
2065 if (IS_ERR(edac_thread)) {
2066 /* remove the sysfs entries */
2067 edac_sysfs_memctrl_teardown();
2068 edac_sysfs_pci_teardown();
2069 return PTR_ERR(edac_thread);
2072 return 0;
2076 * edac_mc_exit()
2077 * module exit/termination functioni
2079 static void __exit edac_mc_exit(void)
2081 debugf0("%s()\n", __func__);
2082 kthread_stop(edac_thread);
2084 /* tear down the sysfs device */
2085 edac_sysfs_memctrl_teardown();
2086 edac_sysfs_pci_teardown();
2089 module_init(edac_mc_init);
2090 module_exit(edac_mc_exit);
2092 MODULE_LICENSE("GPL");
2093 MODULE_AUTHOR("Linux Networx (http://lnxi.com) Thayne Harbaugh et al\n"
2094 "Based on work by Dan Hollis et al");
2095 MODULE_DESCRIPTION("Core library routines for MC reporting");
2097 module_param(panic_on_ue, int, 0644);
2098 MODULE_PARM_DESC(panic_on_ue, "Panic on uncorrected error: 0=off 1=on");
2099 module_param(check_pci_parity, int, 0644);
2100 MODULE_PARM_DESC(check_pci_parity, "Check for PCI bus parity errors: 0=off 1=on");
2101 module_param(panic_on_pci_parity, int, 0644);
2102 MODULE_PARM_DESC(panic_on_pci_parity, "Panic on PCI Bus Parity error: 0=off 1=on");
2103 module_param(log_ue, int, 0644);
2104 MODULE_PARM_DESC(log_ue, "Log uncorrectable error to console: 0=off 1=on");
2105 module_param(log_ce, int, 0644);
2106 MODULE_PARM_DESC(log_ce, "Log correctable error to console: 0=off 1=on");
2107 module_param(poll_msec, int, 0644);
2108 MODULE_PARM_DESC(poll_msec, "Polling period in milliseconds");
2109 #ifdef CONFIG_EDAC_DEBUG
2110 module_param(edac_debug_level, int, 0644);
2111 MODULE_PARM_DESC(edac_debug_level, "Debug level");
2112 #endif