2 * APEI Generic Hardware Error Source support
4 * Generic Hardware Error Source provides a way to report platform
5 * hardware errors (such as that from chipset). It works in so called
6 * "Firmware First" mode, that is, hardware errors are reported to
7 * firmware firstly, then reported to Linux by firmware. This way,
8 * some non-standard hardware error registers or non-standard hardware
9 * link can be checked by firmware to produce more hardware error
10 * information for Linux.
12 * For more information about Generic Hardware Error Source, please
13 * refer to ACPI Specification version 4.0, section 17.3.2.6
15 * Copyright 2010,2011 Intel Corp.
16 * Author: Huang Ying <ying.huang@intel.com>
18 * This program is free software; you can redistribute it and/or
19 * modify it under the terms of the GNU General Public License version
20 * 2 as published by the Free Software Foundation;
22 * This program is distributed in the hope that it will be useful,
23 * but WITHOUT ANY WARRANTY; without even the implied warranty of
24 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
25 * GNU General Public License for more details.
27 * You should have received a copy of the GNU General Public License
28 * along with this program; if not, write to the Free Software
29 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
32 #include <linux/kernel.h>
33 #include <linux/module.h>
34 #include <linux/init.h>
35 #include <linux/acpi.h>
36 #include <linux/acpi_io.h>
38 #include <linux/interrupt.h>
39 #include <linux/timer.h>
40 #include <linux/cper.h>
41 #include <linux/kdebug.h>
42 #include <linux/platform_device.h>
43 #include <linux/mutex.h>
44 #include <linux/ratelimit.h>
45 #include <linux/vmalloc.h>
46 #include <linux/irq_work.h>
47 #include <linux/llist.h>
48 #include <linux/genalloc.h>
49 #include <linux/pci.h>
50 #include <linux/aer.h>
52 #include <acpi/ghes.h>
54 #include <asm/tlbflush.h>
57 #include "apei-internal.h"
59 #define GHES_PFX "GHES: "
61 #define GHES_ESTATUS_MAX_SIZE 65536
62 #define GHES_ESOURCE_PREALLOC_MAX_SIZE 65536
64 #define GHES_ESTATUS_POOL_MIN_ALLOC_ORDER 3
66 /* This is just an estimation for memory pool allocation */
67 #define GHES_ESTATUS_CACHE_AVG_SIZE 512
69 #define GHES_ESTATUS_CACHES_SIZE 4
71 #define GHES_ESTATUS_IN_CACHE_MAX_NSEC 10000000000ULL
72 /* Prevent too many caches are allocated because of RCU */
73 #define GHES_ESTATUS_CACHE_ALLOCED_MAX (GHES_ESTATUS_CACHES_SIZE * 3 / 2)
75 #define GHES_ESTATUS_CACHE_LEN(estatus_len) \
76 (sizeof(struct ghes_estatus_cache) + (estatus_len))
77 #define GHES_ESTATUS_FROM_CACHE(estatus_cache) \
78 ((struct acpi_hest_generic_status *) \
79 ((struct ghes_estatus_cache *)(estatus_cache) + 1))
81 #define GHES_ESTATUS_NODE_LEN(estatus_len) \
82 (sizeof(struct ghes_estatus_node) + (estatus_len))
83 #define GHES_ESTATUS_FROM_NODE(estatus_node) \
84 ((struct acpi_hest_generic_status *) \
85 ((struct ghes_estatus_node *)(estatus_node) + 1))
88 module_param_named(disable, ghes_disable, bool, 0);
90 static int ghes_panic_timeout __read_mostly = 30;
93 * All error sources notified with SCI shares one notifier function,
94 * so they need to be linked and checked one by one. This is applied
97 * RCU is used for these lists, so ghes_list_mutex is only used for
98 * list changing, not for traversing.
100 static LIST_HEAD(ghes_sci);
101 static LIST_HEAD(ghes_nmi);
102 static DEFINE_MUTEX(ghes_list_mutex);
105 * NMI may be triggered on any CPU, so ghes_nmi_lock is used for
108 static DEFINE_RAW_SPINLOCK(ghes_nmi_lock);
111 * Because the memory area used to transfer hardware error information
112 * from BIOS to Linux can be determined only in NMI, IRQ or timer
113 * handler, but general ioremap can not be used in atomic context, so
114 * a special version of atomic ioremap is implemented for that.
118 * Two virtual pages are used, one for NMI context, the other for
119 * IRQ/PROCESS context
121 #define GHES_IOREMAP_PAGES 2
122 #define GHES_IOREMAP_NMI_PAGE(base) (base)
123 #define GHES_IOREMAP_IRQ_PAGE(base) ((base) + PAGE_SIZE)
125 /* virtual memory area for atomic ioremap */
126 static struct vm_struct *ghes_ioremap_area;
128 * These 2 spinlock is used to prevent atomic ioremap virtual memory
129 * area from being mapped simultaneously.
131 static DEFINE_RAW_SPINLOCK(ghes_ioremap_lock_nmi);
132 static DEFINE_SPINLOCK(ghes_ioremap_lock_irq);
135 * printk is not safe in NMI context. So in NMI handler, we allocate
136 * required memory from lock-less memory allocator
137 * (ghes_estatus_pool), save estatus into it, put them into lock-less
138 * list (ghes_estatus_llist), then delay printk into IRQ context via
139 * irq_work (ghes_proc_irq_work). ghes_estatus_size_request record
140 * required pool size by all NMI error source.
142 static struct gen_pool *ghes_estatus_pool;
143 static unsigned long ghes_estatus_pool_size_request;
144 static struct llist_head ghes_estatus_llist;
145 static struct irq_work ghes_proc_irq_work;
147 struct ghes_estatus_cache *ghes_estatus_caches[GHES_ESTATUS_CACHES_SIZE];
148 static atomic_t ghes_estatus_cache_alloced;
150 static int ghes_ioremap_init(void)
152 ghes_ioremap_area = __get_vm_area(PAGE_SIZE * GHES_IOREMAP_PAGES,
153 VM_IOREMAP, VMALLOC_START, VMALLOC_END);
154 if (!ghes_ioremap_area) {
155 pr_err(GHES_PFX "Failed to allocate virtual memory area for atomic ioremap.\n");
162 static void ghes_ioremap_exit(void)
164 free_vm_area(ghes_ioremap_area);
167 static void __iomem *ghes_ioremap_pfn_nmi(u64 pfn)
171 vaddr = (unsigned long)GHES_IOREMAP_NMI_PAGE(ghes_ioremap_area->addr);
172 ioremap_page_range(vaddr, vaddr + PAGE_SIZE,
173 pfn << PAGE_SHIFT, PAGE_KERNEL);
175 return (void __iomem *)vaddr;
178 static void __iomem *ghes_ioremap_pfn_irq(u64 pfn)
182 vaddr = (unsigned long)GHES_IOREMAP_IRQ_PAGE(ghes_ioremap_area->addr);
183 ioremap_page_range(vaddr, vaddr + PAGE_SIZE,
184 pfn << PAGE_SHIFT, PAGE_KERNEL);
186 return (void __iomem *)vaddr;
189 static void ghes_iounmap_nmi(void __iomem *vaddr_ptr)
191 unsigned long vaddr = (unsigned long __force)vaddr_ptr;
192 void *base = ghes_ioremap_area->addr;
194 BUG_ON(vaddr != (unsigned long)GHES_IOREMAP_NMI_PAGE(base));
195 unmap_kernel_range_noflush(vaddr, PAGE_SIZE);
196 __flush_tlb_one(vaddr);
199 static void ghes_iounmap_irq(void __iomem *vaddr_ptr)
201 unsigned long vaddr = (unsigned long __force)vaddr_ptr;
202 void *base = ghes_ioremap_area->addr;
204 BUG_ON(vaddr != (unsigned long)GHES_IOREMAP_IRQ_PAGE(base));
205 unmap_kernel_range_noflush(vaddr, PAGE_SIZE);
206 __flush_tlb_one(vaddr);
209 static int ghes_estatus_pool_init(void)
211 ghes_estatus_pool = gen_pool_create(GHES_ESTATUS_POOL_MIN_ALLOC_ORDER, -1);
212 if (!ghes_estatus_pool)
217 static void ghes_estatus_pool_free_chunk_page(struct gen_pool *pool,
218 struct gen_pool_chunk *chunk,
221 free_page(chunk->start_addr);
224 static void ghes_estatus_pool_exit(void)
226 gen_pool_for_each_chunk(ghes_estatus_pool,
227 ghes_estatus_pool_free_chunk_page, NULL);
228 gen_pool_destroy(ghes_estatus_pool);
231 static int ghes_estatus_pool_expand(unsigned long len)
233 unsigned long i, pages, size, addr;
236 ghes_estatus_pool_size_request += PAGE_ALIGN(len);
237 size = gen_pool_size(ghes_estatus_pool);
238 if (size >= ghes_estatus_pool_size_request)
240 pages = (ghes_estatus_pool_size_request - size) / PAGE_SIZE;
241 for (i = 0; i < pages; i++) {
242 addr = __get_free_page(GFP_KERNEL);
245 ret = gen_pool_add(ghes_estatus_pool, addr, PAGE_SIZE, -1);
253 static void ghes_estatus_pool_shrink(unsigned long len)
255 ghes_estatus_pool_size_request -= PAGE_ALIGN(len);
258 static struct ghes *ghes_new(struct acpi_hest_generic *generic)
261 unsigned int error_block_length;
264 ghes = kzalloc(sizeof(*ghes), GFP_KERNEL);
266 return ERR_PTR(-ENOMEM);
267 ghes->generic = generic;
268 rc = apei_map_generic_address(&generic->error_status_address);
271 error_block_length = generic->error_block_length;
272 if (error_block_length > GHES_ESTATUS_MAX_SIZE) {
273 pr_warning(FW_WARN GHES_PFX
274 "Error status block length is too long: %u for "
275 "generic hardware error source: %d.\n",
276 error_block_length, generic->header.source_id);
277 error_block_length = GHES_ESTATUS_MAX_SIZE;
279 ghes->estatus = kmalloc(error_block_length, GFP_KERNEL);
280 if (!ghes->estatus) {
288 apei_unmap_generic_address(&generic->error_status_address);
294 static void ghes_fini(struct ghes *ghes)
296 kfree(ghes->estatus);
297 apei_unmap_generic_address(&ghes->generic->error_status_address);
300 static inline int ghes_severity(int severity)
303 case CPER_SEV_INFORMATIONAL:
305 case CPER_SEV_CORRECTED:
306 return GHES_SEV_CORRECTED;
307 case CPER_SEV_RECOVERABLE:
308 return GHES_SEV_RECOVERABLE;
310 return GHES_SEV_PANIC;
312 /* Unknown, go panic */
313 return GHES_SEV_PANIC;
317 static void ghes_copy_tofrom_phys(void *buffer, u64 paddr, u32 len,
321 unsigned long flags = 0;
322 int in_nmi = in_nmi();
327 offset = paddr - (paddr & PAGE_MASK);
329 raw_spin_lock(&ghes_ioremap_lock_nmi);
330 vaddr = ghes_ioremap_pfn_nmi(paddr >> PAGE_SHIFT);
332 spin_lock_irqsave(&ghes_ioremap_lock_irq, flags);
333 vaddr = ghes_ioremap_pfn_irq(paddr >> PAGE_SHIFT);
335 trunk = PAGE_SIZE - offset;
336 trunk = min(trunk, len);
338 memcpy_fromio(buffer, vaddr + offset, trunk);
340 memcpy_toio(vaddr + offset, buffer, trunk);
345 ghes_iounmap_nmi(vaddr);
346 raw_spin_unlock(&ghes_ioremap_lock_nmi);
348 ghes_iounmap_irq(vaddr);
349 spin_unlock_irqrestore(&ghes_ioremap_lock_irq, flags);
354 static int ghes_read_estatus(struct ghes *ghes, int silent)
356 struct acpi_hest_generic *g = ghes->generic;
361 rc = apei_read(&buf_paddr, &g->error_status_address);
363 if (!silent && printk_ratelimit())
364 pr_warning(FW_WARN GHES_PFX
365 "Failed to read error status block address for hardware error source: %d.\n",
366 g->header.source_id);
372 ghes_copy_tofrom_phys(ghes->estatus, buf_paddr,
373 sizeof(*ghes->estatus), 1);
374 if (!ghes->estatus->block_status)
377 ghes->buffer_paddr = buf_paddr;
378 ghes->flags |= GHES_TO_CLEAR;
381 len = apei_estatus_len(ghes->estatus);
382 if (len < sizeof(*ghes->estatus))
384 if (len > ghes->generic->error_block_length)
386 if (apei_estatus_check_header(ghes->estatus))
388 ghes_copy_tofrom_phys(ghes->estatus + 1,
389 buf_paddr + sizeof(*ghes->estatus),
390 len - sizeof(*ghes->estatus), 1);
391 if (apei_estatus_check(ghes->estatus))
396 if (rc && !silent && printk_ratelimit())
397 pr_warning(FW_WARN GHES_PFX
398 "Failed to read error status block!\n");
402 static void ghes_clear_estatus(struct ghes *ghes)
404 ghes->estatus->block_status = 0;
405 if (!(ghes->flags & GHES_TO_CLEAR))
407 ghes_copy_tofrom_phys(ghes->estatus, ghes->buffer_paddr,
408 sizeof(ghes->estatus->block_status), 0);
409 ghes->flags &= ~GHES_TO_CLEAR;
412 static void ghes_handle_memory_failure(struct acpi_hest_generic_data *gdata, int sev)
414 #ifdef CONFIG_ACPI_APEI_MEMORY_FAILURE
416 int sec_sev = ghes_severity(gdata->error_severity);
417 struct cper_sec_mem_err *mem_err;
418 mem_err = (struct cper_sec_mem_err *)(gdata + 1);
420 if (sec_sev == GHES_SEV_CORRECTED &&
421 (gdata->flags & CPER_SEC_ERROR_THRESHOLD_EXCEEDED) &&
422 (mem_err->validation_bits & CPER_MEM_VALID_PHYSICAL_ADDRESS)) {
423 pfn = mem_err->physical_addr >> PAGE_SHIFT;
425 memory_failure_queue(pfn, 0, MF_SOFT_OFFLINE);
426 else if (printk_ratelimit())
427 pr_warn(FW_WARN GHES_PFX
428 "Invalid address in generic error data: %#llx\n",
429 mem_err->physical_addr);
431 if (sev == GHES_SEV_RECOVERABLE &&
432 sec_sev == GHES_SEV_RECOVERABLE &&
433 mem_err->validation_bits & CPER_MEM_VALID_PHYSICAL_ADDRESS) {
434 pfn = mem_err->physical_addr >> PAGE_SHIFT;
435 memory_failure_queue(pfn, 0, 0);
440 static void ghes_do_proc(struct ghes *ghes,
441 const struct acpi_hest_generic_status *estatus)
444 struct acpi_hest_generic_data *gdata;
446 sev = ghes_severity(estatus->error_severity);
447 apei_estatus_for_each_section(estatus, gdata) {
448 sec_sev = ghes_severity(gdata->error_severity);
449 if (!uuid_le_cmp(*(uuid_le *)gdata->section_type,
450 CPER_SEC_PLATFORM_MEM)) {
451 struct cper_sec_mem_err *mem_err;
452 mem_err = (struct cper_sec_mem_err *)(gdata+1);
453 ghes_edac_report_mem_error(ghes, sev, mem_err);
455 #ifdef CONFIG_X86_MCE
456 apei_mce_report_mem_error(sev == GHES_SEV_CORRECTED,
459 ghes_handle_memory_failure(gdata, sev);
461 #ifdef CONFIG_ACPI_APEI_PCIEAER
462 else if (!uuid_le_cmp(*(uuid_le *)gdata->section_type,
464 struct cper_sec_pcie *pcie_err;
465 pcie_err = (struct cper_sec_pcie *)(gdata+1);
466 if (sev == GHES_SEV_RECOVERABLE &&
467 sec_sev == GHES_SEV_RECOVERABLE &&
468 pcie_err->validation_bits & CPER_PCIE_VALID_DEVICE_ID &&
469 pcie_err->validation_bits & CPER_PCIE_VALID_AER_INFO) {
473 devfn = PCI_DEVFN(pcie_err->device_id.device,
474 pcie_err->device_id.function);
475 aer_severity = cper_severity_to_aer(sev);
478 * If firmware reset the component to contain
479 * the error, we must reinitialize it before
480 * use, so treat it as a fatal AER error.
482 if (gdata->flags & CPER_SEC_RESET)
483 aer_severity = AER_FATAL;
485 aer_recover_queue(pcie_err->device_id.segment,
486 pcie_err->device_id.bus,
488 (struct aer_capability_regs *)
497 static void __ghes_print_estatus(const char *pfx,
498 const struct acpi_hest_generic *generic,
499 const struct acpi_hest_generic_status *estatus)
501 static atomic_t seqno;
502 unsigned int curr_seqno;
506 if (ghes_severity(estatus->error_severity) <=
512 curr_seqno = atomic_inc_return(&seqno);
513 snprintf(pfx_seq, sizeof(pfx_seq), "%s{%u}" HW_ERR, pfx, curr_seqno);
514 printk("%s""Hardware error from APEI Generic Hardware Error Source: %d\n",
515 pfx_seq, generic->header.source_id);
516 apei_estatus_print(pfx_seq, estatus);
519 static int ghes_print_estatus(const char *pfx,
520 const struct acpi_hest_generic *generic,
521 const struct acpi_hest_generic_status *estatus)
523 /* Not more than 2 messages every 5 seconds */
524 static DEFINE_RATELIMIT_STATE(ratelimit_corrected, 5*HZ, 2);
525 static DEFINE_RATELIMIT_STATE(ratelimit_uncorrected, 5*HZ, 2);
526 struct ratelimit_state *ratelimit;
528 if (ghes_severity(estatus->error_severity) <= GHES_SEV_CORRECTED)
529 ratelimit = &ratelimit_corrected;
531 ratelimit = &ratelimit_uncorrected;
532 if (__ratelimit(ratelimit)) {
533 __ghes_print_estatus(pfx, generic, estatus);
540 * GHES error status reporting throttle, to report more kinds of
541 * errors, instead of just most frequently occurred errors.
543 static int ghes_estatus_cached(struct acpi_hest_generic_status *estatus)
547 unsigned long long now;
548 struct ghes_estatus_cache *cache;
549 struct acpi_hest_generic_status *cache_estatus;
551 len = apei_estatus_len(estatus);
553 for (i = 0; i < GHES_ESTATUS_CACHES_SIZE; i++) {
554 cache = rcu_dereference(ghes_estatus_caches[i]);
557 if (len != cache->estatus_len)
559 cache_estatus = GHES_ESTATUS_FROM_CACHE(cache);
560 if (memcmp(estatus, cache_estatus, len))
562 atomic_inc(&cache->count);
564 if (now - cache->time_in < GHES_ESTATUS_IN_CACHE_MAX_NSEC)
572 static struct ghes_estatus_cache *ghes_estatus_cache_alloc(
573 struct acpi_hest_generic *generic,
574 struct acpi_hest_generic_status *estatus)
578 struct ghes_estatus_cache *cache;
579 struct acpi_hest_generic_status *cache_estatus;
581 alloced = atomic_add_return(1, &ghes_estatus_cache_alloced);
582 if (alloced > GHES_ESTATUS_CACHE_ALLOCED_MAX) {
583 atomic_dec(&ghes_estatus_cache_alloced);
586 len = apei_estatus_len(estatus);
587 cache_len = GHES_ESTATUS_CACHE_LEN(len);
588 cache = (void *)gen_pool_alloc(ghes_estatus_pool, cache_len);
590 atomic_dec(&ghes_estatus_cache_alloced);
593 cache_estatus = GHES_ESTATUS_FROM_CACHE(cache);
594 memcpy(cache_estatus, estatus, len);
595 cache->estatus_len = len;
596 atomic_set(&cache->count, 0);
597 cache->generic = generic;
598 cache->time_in = sched_clock();
602 static void ghes_estatus_cache_free(struct ghes_estatus_cache *cache)
606 len = apei_estatus_len(GHES_ESTATUS_FROM_CACHE(cache));
607 len = GHES_ESTATUS_CACHE_LEN(len);
608 gen_pool_free(ghes_estatus_pool, (unsigned long)cache, len);
609 atomic_dec(&ghes_estatus_cache_alloced);
612 static void ghes_estatus_cache_rcu_free(struct rcu_head *head)
614 struct ghes_estatus_cache *cache;
616 cache = container_of(head, struct ghes_estatus_cache, rcu);
617 ghes_estatus_cache_free(cache);
620 static void ghes_estatus_cache_add(
621 struct acpi_hest_generic *generic,
622 struct acpi_hest_generic_status *estatus)
624 int i, slot = -1, count;
625 unsigned long long now, duration, period, max_period = 0;
626 struct ghes_estatus_cache *cache, *slot_cache = NULL, *new_cache;
628 new_cache = ghes_estatus_cache_alloc(generic, estatus);
629 if (new_cache == NULL)
633 for (i = 0; i < GHES_ESTATUS_CACHES_SIZE; i++) {
634 cache = rcu_dereference(ghes_estatus_caches[i]);
640 duration = now - cache->time_in;
641 if (duration >= GHES_ESTATUS_IN_CACHE_MAX_NSEC) {
646 count = atomic_read(&cache->count);
648 do_div(period, (count + 1));
649 if (period > max_period) {
655 /* new_cache must be put into array after its contents are written */
657 if (slot != -1 && cmpxchg(ghes_estatus_caches + slot,
658 slot_cache, new_cache) == slot_cache) {
660 call_rcu(&slot_cache->rcu, ghes_estatus_cache_rcu_free);
662 ghes_estatus_cache_free(new_cache);
666 static int ghes_proc(struct ghes *ghes)
670 rc = ghes_read_estatus(ghes, 0);
673 if (!ghes_estatus_cached(ghes->estatus)) {
674 if (ghes_print_estatus(NULL, ghes->generic, ghes->estatus))
675 ghes_estatus_cache_add(ghes->generic, ghes->estatus);
677 ghes_do_proc(ghes, ghes->estatus);
679 ghes_clear_estatus(ghes);
683 static void ghes_add_timer(struct ghes *ghes)
685 struct acpi_hest_generic *g = ghes->generic;
686 unsigned long expire;
688 if (!g->notify.poll_interval) {
689 pr_warning(FW_WARN GHES_PFX "Poll interval is 0 for generic hardware error source: %d, disabled.\n",
690 g->header.source_id);
693 expire = jiffies + msecs_to_jiffies(g->notify.poll_interval);
694 ghes->timer.expires = round_jiffies_relative(expire);
695 add_timer(&ghes->timer);
698 static void ghes_poll_func(unsigned long data)
700 struct ghes *ghes = (void *)data;
703 if (!(ghes->flags & GHES_EXITING))
704 ghes_add_timer(ghes);
707 static irqreturn_t ghes_irq_func(int irq, void *data)
709 struct ghes *ghes = data;
712 rc = ghes_proc(ghes);
719 static int ghes_notify_sci(struct notifier_block *this,
720 unsigned long event, void *data)
723 int ret = NOTIFY_DONE;
726 list_for_each_entry_rcu(ghes, &ghes_sci, list) {
727 if (!ghes_proc(ghes))
735 static struct llist_node *llist_nodes_reverse(struct llist_node *llnode)
737 struct llist_node *next, *tail = NULL;
749 static void ghes_proc_in_irq(struct irq_work *irq_work)
751 struct llist_node *llnode, *next;
752 struct ghes_estatus_node *estatus_node;
753 struct acpi_hest_generic *generic;
754 struct acpi_hest_generic_status *estatus;
757 llnode = llist_del_all(&ghes_estatus_llist);
759 * Because the time order of estatus in list is reversed,
760 * revert it back to proper order.
762 llnode = llist_nodes_reverse(llnode);
765 estatus_node = llist_entry(llnode, struct ghes_estatus_node,
767 estatus = GHES_ESTATUS_FROM_NODE(estatus_node);
768 len = apei_estatus_len(estatus);
769 node_len = GHES_ESTATUS_NODE_LEN(len);
770 ghes_do_proc(estatus_node->ghes, estatus);
771 if (!ghes_estatus_cached(estatus)) {
772 generic = estatus_node->generic;
773 if (ghes_print_estatus(NULL, generic, estatus))
774 ghes_estatus_cache_add(generic, estatus);
776 gen_pool_free(ghes_estatus_pool, (unsigned long)estatus_node,
782 static void ghes_print_queued_estatus(void)
784 struct llist_node *llnode;
785 struct ghes_estatus_node *estatus_node;
786 struct acpi_hest_generic *generic;
787 struct acpi_hest_generic_status *estatus;
790 llnode = llist_del_all(&ghes_estatus_llist);
792 * Because the time order of estatus in list is reversed,
793 * revert it back to proper order.
795 llnode = llist_nodes_reverse(llnode);
797 estatus_node = llist_entry(llnode, struct ghes_estatus_node,
799 estatus = GHES_ESTATUS_FROM_NODE(estatus_node);
800 len = apei_estatus_len(estatus);
801 node_len = GHES_ESTATUS_NODE_LEN(len);
802 generic = estatus_node->generic;
803 ghes_print_estatus(NULL, generic, estatus);
804 llnode = llnode->next;
808 static int ghes_notify_nmi(unsigned int cmd, struct pt_regs *regs)
810 struct ghes *ghes, *ghes_global = NULL;
811 int sev, sev_global = -1;
814 raw_spin_lock(&ghes_nmi_lock);
815 list_for_each_entry_rcu(ghes, &ghes_nmi, list) {
816 if (ghes_read_estatus(ghes, 1)) {
817 ghes_clear_estatus(ghes);
820 sev = ghes_severity(ghes->estatus->error_severity);
821 if (sev > sev_global) {
831 if (sev_global >= GHES_SEV_PANIC) {
833 ghes_print_queued_estatus();
834 __ghes_print_estatus(KERN_EMERG, ghes_global->generic,
835 ghes_global->estatus);
836 /* reboot to log the error! */
837 if (panic_timeout == 0)
838 panic_timeout = ghes_panic_timeout;
839 panic("Fatal hardware error!");
842 list_for_each_entry_rcu(ghes, &ghes_nmi, list) {
843 #ifdef CONFIG_ARCH_HAVE_NMI_SAFE_CMPXCHG
845 struct ghes_estatus_node *estatus_node;
846 struct acpi_hest_generic_status *estatus;
848 if (!(ghes->flags & GHES_TO_CLEAR))
850 #ifdef CONFIG_ARCH_HAVE_NMI_SAFE_CMPXCHG
851 if (ghes_estatus_cached(ghes->estatus))
853 /* Save estatus for further processing in IRQ context */
854 len = apei_estatus_len(ghes->estatus);
855 node_len = GHES_ESTATUS_NODE_LEN(len);
856 estatus_node = (void *)gen_pool_alloc(ghes_estatus_pool,
859 estatus_node->ghes = ghes;
860 estatus_node->generic = ghes->generic;
861 estatus = GHES_ESTATUS_FROM_NODE(estatus_node);
862 memcpy(estatus, ghes->estatus, len);
863 llist_add(&estatus_node->llnode, &ghes_estatus_llist);
867 ghes_clear_estatus(ghes);
869 #ifdef CONFIG_ARCH_HAVE_NMI_SAFE_CMPXCHG
870 irq_work_queue(&ghes_proc_irq_work);
874 raw_spin_unlock(&ghes_nmi_lock);
878 static struct notifier_block ghes_notifier_sci = {
879 .notifier_call = ghes_notify_sci,
882 static unsigned long ghes_esource_prealloc_size(
883 const struct acpi_hest_generic *generic)
885 unsigned long block_length, prealloc_records, prealloc_size;
887 block_length = min_t(unsigned long, generic->error_block_length,
888 GHES_ESTATUS_MAX_SIZE);
889 prealloc_records = max_t(unsigned long,
890 generic->records_to_preallocate, 1);
891 prealloc_size = min_t(unsigned long, block_length * prealloc_records,
892 GHES_ESOURCE_PREALLOC_MAX_SIZE);
894 return prealloc_size;
897 static int ghes_probe(struct platform_device *ghes_dev)
899 struct acpi_hest_generic *generic;
900 struct ghes *ghes = NULL;
904 generic = *(struct acpi_hest_generic **)ghes_dev->dev.platform_data;
905 if (!generic->enabled)
908 switch (generic->notify.type) {
909 case ACPI_HEST_NOTIFY_POLLED:
910 case ACPI_HEST_NOTIFY_EXTERNAL:
911 case ACPI_HEST_NOTIFY_SCI:
912 case ACPI_HEST_NOTIFY_NMI:
914 case ACPI_HEST_NOTIFY_LOCAL:
915 pr_warning(GHES_PFX "Generic hardware error source: %d notified via local interrupt is not supported!\n",
916 generic->header.source_id);
919 pr_warning(FW_WARN GHES_PFX "Unknown notification type: %u for generic hardware error source: %d\n",
920 generic->notify.type, generic->header.source_id);
925 if (generic->error_block_length <
926 sizeof(struct acpi_hest_generic_status)) {
927 pr_warning(FW_BUG GHES_PFX "Invalid error block length: %u for generic hardware error source: %d\n",
928 generic->error_block_length,
929 generic->header.source_id);
932 ghes = ghes_new(generic);
939 rc = ghes_edac_register(ghes, &ghes_dev->dev);
943 switch (generic->notify.type) {
944 case ACPI_HEST_NOTIFY_POLLED:
945 ghes->timer.function = ghes_poll_func;
946 ghes->timer.data = (unsigned long)ghes;
947 init_timer_deferrable(&ghes->timer);
948 ghes_add_timer(ghes);
950 case ACPI_HEST_NOTIFY_EXTERNAL:
951 /* External interrupt vector is GSI */
952 rc = acpi_gsi_to_irq(generic->notify.vector, &ghes->irq);
954 pr_err(GHES_PFX "Failed to map GSI to IRQ for generic hardware error source: %d\n",
955 generic->header.source_id);
958 rc = request_irq(ghes->irq, ghes_irq_func, 0, "GHES IRQ", ghes);
960 pr_err(GHES_PFX "Failed to register IRQ for generic hardware error source: %d\n",
961 generic->header.source_id);
965 case ACPI_HEST_NOTIFY_SCI:
966 mutex_lock(&ghes_list_mutex);
967 if (list_empty(&ghes_sci))
968 register_acpi_hed_notifier(&ghes_notifier_sci);
969 list_add_rcu(&ghes->list, &ghes_sci);
970 mutex_unlock(&ghes_list_mutex);
972 case ACPI_HEST_NOTIFY_NMI:
973 len = ghes_esource_prealloc_size(generic);
974 ghes_estatus_pool_expand(len);
975 mutex_lock(&ghes_list_mutex);
976 if (list_empty(&ghes_nmi))
977 register_nmi_handler(NMI_LOCAL, ghes_notify_nmi, 0,
979 list_add_rcu(&ghes->list, &ghes_nmi);
980 mutex_unlock(&ghes_list_mutex);
985 platform_set_drvdata(ghes_dev, ghes);
989 ghes_edac_unregister(ghes);
998 static int ghes_remove(struct platform_device *ghes_dev)
1001 struct acpi_hest_generic *generic;
1004 ghes = platform_get_drvdata(ghes_dev);
1005 generic = ghes->generic;
1007 ghes->flags |= GHES_EXITING;
1008 switch (generic->notify.type) {
1009 case ACPI_HEST_NOTIFY_POLLED:
1010 del_timer_sync(&ghes->timer);
1012 case ACPI_HEST_NOTIFY_EXTERNAL:
1013 free_irq(ghes->irq, ghes);
1015 case ACPI_HEST_NOTIFY_SCI:
1016 mutex_lock(&ghes_list_mutex);
1017 list_del_rcu(&ghes->list);
1018 if (list_empty(&ghes_sci))
1019 unregister_acpi_hed_notifier(&ghes_notifier_sci);
1020 mutex_unlock(&ghes_list_mutex);
1022 case ACPI_HEST_NOTIFY_NMI:
1023 mutex_lock(&ghes_list_mutex);
1024 list_del_rcu(&ghes->list);
1025 if (list_empty(&ghes_nmi))
1026 unregister_nmi_handler(NMI_LOCAL, "ghes");
1027 mutex_unlock(&ghes_list_mutex);
1029 * To synchronize with NMI handler, ghes can only be
1030 * freed after NMI handler finishes.
1033 len = ghes_esource_prealloc_size(generic);
1034 ghes_estatus_pool_shrink(len);
1043 ghes_edac_unregister(ghes);
1047 platform_set_drvdata(ghes_dev, NULL);
1052 static struct platform_driver ghes_platform_driver = {
1055 .owner = THIS_MODULE,
1057 .probe = ghes_probe,
1058 .remove = ghes_remove,
1061 static int __init ghes_init(void)
1069 pr_info(GHES_PFX "HEST is not enabled!\n");
1074 pr_info(GHES_PFX "GHES is not enabled!\n");
1078 init_irq_work(&ghes_proc_irq_work, ghes_proc_in_irq);
1080 rc = ghes_ioremap_init();
1084 rc = ghes_estatus_pool_init();
1086 goto err_ioremap_exit;
1088 rc = ghes_estatus_pool_expand(GHES_ESTATUS_CACHE_AVG_SIZE *
1089 GHES_ESTATUS_CACHE_ALLOCED_MAX);
1093 rc = platform_driver_register(&ghes_platform_driver);
1097 rc = apei_osc_setup();
1098 if (rc == 0 && osc_sb_apei_support_acked)
1099 pr_info(GHES_PFX "APEI firmware first mode is enabled by APEI bit and WHEA _OSC.\n");
1100 else if (rc == 0 && !osc_sb_apei_support_acked)
1101 pr_info(GHES_PFX "APEI firmware first mode is enabled by WHEA _OSC.\n");
1102 else if (rc && osc_sb_apei_support_acked)
1103 pr_info(GHES_PFX "APEI firmware first mode is enabled by APEI bit.\n");
1105 pr_info(GHES_PFX "Failed to enable APEI firmware first mode.\n");
1109 ghes_estatus_pool_exit();
1111 ghes_ioremap_exit();
1116 static void __exit ghes_exit(void)
1118 platform_driver_unregister(&ghes_platform_driver);
1119 ghes_estatus_pool_exit();
1120 ghes_ioremap_exit();
1123 module_init(ghes_init);
1124 module_exit(ghes_exit);
1126 MODULE_AUTHOR("Huang Ying");
1127 MODULE_DESCRIPTION("APEI Generic Hardware Error Source support");
1128 MODULE_LICENSE("GPL");
1129 MODULE_ALIAS("platform:GHES");