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_do_proc(struct ghes
*ghes
,
413 const struct acpi_hest_generic_status
*estatus
)
416 struct acpi_hest_generic_data
*gdata
;
418 sev
= ghes_severity(estatus
->error_severity
);
419 apei_estatus_for_each_section(estatus
, gdata
) {
420 sec_sev
= ghes_severity(gdata
->error_severity
);
421 if (!uuid_le_cmp(*(uuid_le
*)gdata
->section_type
,
422 CPER_SEC_PLATFORM_MEM
)) {
423 struct cper_sec_mem_err
*mem_err
;
424 mem_err
= (struct cper_sec_mem_err
*)(gdata
+1);
425 ghes_edac_report_mem_error(ghes
, sev
, mem_err
);
427 #ifdef CONFIG_X86_MCE
428 apei_mce_report_mem_error(sev
== GHES_SEV_CORRECTED
,
431 #ifdef CONFIG_ACPI_APEI_MEMORY_FAILURE
432 if (sev
== GHES_SEV_RECOVERABLE
&&
433 sec_sev
== GHES_SEV_RECOVERABLE
&&
434 mem_err
->validation_bits
& CPER_MEM_VALID_PHYSICAL_ADDRESS
) {
436 pfn
= mem_err
->physical_addr
>> PAGE_SHIFT
;
437 memory_failure_queue(pfn
, 0, 0);
441 #ifdef CONFIG_ACPI_APEI_PCIEAER
442 else if (!uuid_le_cmp(*(uuid_le
*)gdata
->section_type
,
444 struct cper_sec_pcie
*pcie_err
;
445 pcie_err
= (struct cper_sec_pcie
*)(gdata
+1);
446 if (sev
== GHES_SEV_RECOVERABLE
&&
447 sec_sev
== GHES_SEV_RECOVERABLE
&&
448 pcie_err
->validation_bits
& CPER_PCIE_VALID_DEVICE_ID
&&
449 pcie_err
->validation_bits
& CPER_PCIE_VALID_AER_INFO
) {
452 devfn
= PCI_DEVFN(pcie_err
->device_id
.device
,
453 pcie_err
->device_id
.function
);
454 aer_severity
= cper_severity_to_aer(sev
);
455 aer_recover_queue(pcie_err
->device_id
.segment
,
456 pcie_err
->device_id
.bus
,
458 (struct aer_capability_regs
*)
467 static void __ghes_print_estatus(const char *pfx
,
468 const struct acpi_hest_generic
*generic
,
469 const struct acpi_hest_generic_status
*estatus
)
471 static atomic_t seqno
;
472 unsigned int curr_seqno
;
476 if (ghes_severity(estatus
->error_severity
) <=
482 curr_seqno
= atomic_inc_return(&seqno
);
483 snprintf(pfx_seq
, sizeof(pfx_seq
), "%s{%u}" HW_ERR
, pfx
, curr_seqno
);
484 printk("%s""Hardware error from APEI Generic Hardware Error Source: %d\n",
485 pfx_seq
, generic
->header
.source_id
);
486 apei_estatus_print(pfx_seq
, estatus
);
489 static int ghes_print_estatus(const char *pfx
,
490 const struct acpi_hest_generic
*generic
,
491 const struct acpi_hest_generic_status
*estatus
)
493 /* Not more than 2 messages every 5 seconds */
494 static DEFINE_RATELIMIT_STATE(ratelimit_corrected
, 5*HZ
, 2);
495 static DEFINE_RATELIMIT_STATE(ratelimit_uncorrected
, 5*HZ
, 2);
496 struct ratelimit_state
*ratelimit
;
498 if (ghes_severity(estatus
->error_severity
) <= GHES_SEV_CORRECTED
)
499 ratelimit
= &ratelimit_corrected
;
501 ratelimit
= &ratelimit_uncorrected
;
502 if (__ratelimit(ratelimit
)) {
503 __ghes_print_estatus(pfx
, generic
, estatus
);
510 * GHES error status reporting throttle, to report more kinds of
511 * errors, instead of just most frequently occurred errors.
513 static int ghes_estatus_cached(struct acpi_hest_generic_status
*estatus
)
517 unsigned long long now
;
518 struct ghes_estatus_cache
*cache
;
519 struct acpi_hest_generic_status
*cache_estatus
;
521 len
= apei_estatus_len(estatus
);
523 for (i
= 0; i
< GHES_ESTATUS_CACHES_SIZE
; i
++) {
524 cache
= rcu_dereference(ghes_estatus_caches
[i
]);
527 if (len
!= cache
->estatus_len
)
529 cache_estatus
= GHES_ESTATUS_FROM_CACHE(cache
);
530 if (memcmp(estatus
, cache_estatus
, len
))
532 atomic_inc(&cache
->count
);
534 if (now
- cache
->time_in
< GHES_ESTATUS_IN_CACHE_MAX_NSEC
)
542 static struct ghes_estatus_cache
*ghes_estatus_cache_alloc(
543 struct acpi_hest_generic
*generic
,
544 struct acpi_hest_generic_status
*estatus
)
548 struct ghes_estatus_cache
*cache
;
549 struct acpi_hest_generic_status
*cache_estatus
;
551 alloced
= atomic_add_return(1, &ghes_estatus_cache_alloced
);
552 if (alloced
> GHES_ESTATUS_CACHE_ALLOCED_MAX
) {
553 atomic_dec(&ghes_estatus_cache_alloced
);
556 len
= apei_estatus_len(estatus
);
557 cache_len
= GHES_ESTATUS_CACHE_LEN(len
);
558 cache
= (void *)gen_pool_alloc(ghes_estatus_pool
, cache_len
);
560 atomic_dec(&ghes_estatus_cache_alloced
);
563 cache_estatus
= GHES_ESTATUS_FROM_CACHE(cache
);
564 memcpy(cache_estatus
, estatus
, len
);
565 cache
->estatus_len
= len
;
566 atomic_set(&cache
->count
, 0);
567 cache
->generic
= generic
;
568 cache
->time_in
= sched_clock();
572 static void ghes_estatus_cache_free(struct ghes_estatus_cache
*cache
)
576 len
= apei_estatus_len(GHES_ESTATUS_FROM_CACHE(cache
));
577 len
= GHES_ESTATUS_CACHE_LEN(len
);
578 gen_pool_free(ghes_estatus_pool
, (unsigned long)cache
, len
);
579 atomic_dec(&ghes_estatus_cache_alloced
);
582 static void ghes_estatus_cache_rcu_free(struct rcu_head
*head
)
584 struct ghes_estatus_cache
*cache
;
586 cache
= container_of(head
, struct ghes_estatus_cache
, rcu
);
587 ghes_estatus_cache_free(cache
);
590 static void ghes_estatus_cache_add(
591 struct acpi_hest_generic
*generic
,
592 struct acpi_hest_generic_status
*estatus
)
594 int i
, slot
= -1, count
;
595 unsigned long long now
, duration
, period
, max_period
= 0;
596 struct ghes_estatus_cache
*cache
, *slot_cache
= NULL
, *new_cache
;
598 new_cache
= ghes_estatus_cache_alloc(generic
, estatus
);
599 if (new_cache
== NULL
)
603 for (i
= 0; i
< GHES_ESTATUS_CACHES_SIZE
; i
++) {
604 cache
= rcu_dereference(ghes_estatus_caches
[i
]);
610 duration
= now
- cache
->time_in
;
611 if (duration
>= GHES_ESTATUS_IN_CACHE_MAX_NSEC
) {
616 count
= atomic_read(&cache
->count
);
618 do_div(period
, (count
+ 1));
619 if (period
> max_period
) {
625 /* new_cache must be put into array after its contents are written */
627 if (slot
!= -1 && cmpxchg(ghes_estatus_caches
+ slot
,
628 slot_cache
, new_cache
) == slot_cache
) {
630 call_rcu(&slot_cache
->rcu
, ghes_estatus_cache_rcu_free
);
632 ghes_estatus_cache_free(new_cache
);
636 static int ghes_proc(struct ghes
*ghes
)
640 rc
= ghes_read_estatus(ghes
, 0);
643 if (!ghes_estatus_cached(ghes
->estatus
)) {
644 if (ghes_print_estatus(NULL
, ghes
->generic
, ghes
->estatus
))
645 ghes_estatus_cache_add(ghes
->generic
, ghes
->estatus
);
647 ghes_do_proc(ghes
, ghes
->estatus
);
649 ghes_clear_estatus(ghes
);
653 static void ghes_add_timer(struct ghes
*ghes
)
655 struct acpi_hest_generic
*g
= ghes
->generic
;
656 unsigned long expire
;
658 if (!g
->notify
.poll_interval
) {
659 pr_warning(FW_WARN GHES_PFX
"Poll interval is 0 for generic hardware error source: %d, disabled.\n",
660 g
->header
.source_id
);
663 expire
= jiffies
+ msecs_to_jiffies(g
->notify
.poll_interval
);
664 ghes
->timer
.expires
= round_jiffies_relative(expire
);
665 add_timer(&ghes
->timer
);
668 static void ghes_poll_func(unsigned long data
)
670 struct ghes
*ghes
= (void *)data
;
673 if (!(ghes
->flags
& GHES_EXITING
))
674 ghes_add_timer(ghes
);
677 static irqreturn_t
ghes_irq_func(int irq
, void *data
)
679 struct ghes
*ghes
= data
;
682 rc
= ghes_proc(ghes
);
689 static int ghes_notify_sci(struct notifier_block
*this,
690 unsigned long event
, void *data
)
693 int ret
= NOTIFY_DONE
;
696 list_for_each_entry_rcu(ghes
, &ghes_sci
, list
) {
697 if (!ghes_proc(ghes
))
705 static struct llist_node
*llist_nodes_reverse(struct llist_node
*llnode
)
707 struct llist_node
*next
, *tail
= NULL
;
719 static void ghes_proc_in_irq(struct irq_work
*irq_work
)
721 struct llist_node
*llnode
, *next
;
722 struct ghes_estatus_node
*estatus_node
;
723 struct acpi_hest_generic
*generic
;
724 struct acpi_hest_generic_status
*estatus
;
727 llnode
= llist_del_all(&ghes_estatus_llist
);
729 * Because the time order of estatus in list is reversed,
730 * revert it back to proper order.
732 llnode
= llist_nodes_reverse(llnode
);
735 estatus_node
= llist_entry(llnode
, struct ghes_estatus_node
,
737 estatus
= GHES_ESTATUS_FROM_NODE(estatus_node
);
738 len
= apei_estatus_len(estatus
);
739 node_len
= GHES_ESTATUS_NODE_LEN(len
);
740 ghes_do_proc(estatus_node
->ghes
, estatus
);
741 if (!ghes_estatus_cached(estatus
)) {
742 generic
= estatus_node
->generic
;
743 if (ghes_print_estatus(NULL
, generic
, estatus
))
744 ghes_estatus_cache_add(generic
, estatus
);
746 gen_pool_free(ghes_estatus_pool
, (unsigned long)estatus_node
,
752 static void ghes_print_queued_estatus(void)
754 struct llist_node
*llnode
;
755 struct ghes_estatus_node
*estatus_node
;
756 struct acpi_hest_generic
*generic
;
757 struct acpi_hest_generic_status
*estatus
;
760 llnode
= llist_del_all(&ghes_estatus_llist
);
762 * Because the time order of estatus in list is reversed,
763 * revert it back to proper order.
765 llnode
= llist_nodes_reverse(llnode
);
767 estatus_node
= llist_entry(llnode
, struct ghes_estatus_node
,
769 estatus
= GHES_ESTATUS_FROM_NODE(estatus_node
);
770 len
= apei_estatus_len(estatus
);
771 node_len
= GHES_ESTATUS_NODE_LEN(len
);
772 generic
= estatus_node
->generic
;
773 ghes_print_estatus(NULL
, generic
, estatus
);
774 llnode
= llnode
->next
;
778 static int ghes_notify_nmi(unsigned int cmd
, struct pt_regs
*regs
)
780 struct ghes
*ghes
, *ghes_global
= NULL
;
781 int sev
, sev_global
= -1;
784 raw_spin_lock(&ghes_nmi_lock
);
785 list_for_each_entry_rcu(ghes
, &ghes_nmi
, list
) {
786 if (ghes_read_estatus(ghes
, 1)) {
787 ghes_clear_estatus(ghes
);
790 sev
= ghes_severity(ghes
->estatus
->error_severity
);
791 if (sev
> sev_global
) {
801 if (sev_global
>= GHES_SEV_PANIC
) {
803 ghes_print_queued_estatus();
804 __ghes_print_estatus(KERN_EMERG
, ghes_global
->generic
,
805 ghes_global
->estatus
);
806 /* reboot to log the error! */
807 if (panic_timeout
== 0)
808 panic_timeout
= ghes_panic_timeout
;
809 panic("Fatal hardware error!");
812 list_for_each_entry_rcu(ghes
, &ghes_nmi
, list
) {
813 #ifdef CONFIG_ARCH_HAVE_NMI_SAFE_CMPXCHG
815 struct ghes_estatus_node
*estatus_node
;
816 struct acpi_hest_generic_status
*estatus
;
818 if (!(ghes
->flags
& GHES_TO_CLEAR
))
820 #ifdef CONFIG_ARCH_HAVE_NMI_SAFE_CMPXCHG
821 if (ghes_estatus_cached(ghes
->estatus
))
823 /* Save estatus for further processing in IRQ context */
824 len
= apei_estatus_len(ghes
->estatus
);
825 node_len
= GHES_ESTATUS_NODE_LEN(len
);
826 estatus_node
= (void *)gen_pool_alloc(ghes_estatus_pool
,
829 estatus_node
->ghes
= ghes
;
830 estatus_node
->generic
= ghes
->generic
;
831 estatus
= GHES_ESTATUS_FROM_NODE(estatus_node
);
832 memcpy(estatus
, ghes
->estatus
, len
);
833 llist_add(&estatus_node
->llnode
, &ghes_estatus_llist
);
837 ghes_clear_estatus(ghes
);
839 #ifdef CONFIG_ARCH_HAVE_NMI_SAFE_CMPXCHG
840 irq_work_queue(&ghes_proc_irq_work
);
844 raw_spin_unlock(&ghes_nmi_lock
);
848 static struct notifier_block ghes_notifier_sci
= {
849 .notifier_call
= ghes_notify_sci
,
852 static unsigned long ghes_esource_prealloc_size(
853 const struct acpi_hest_generic
*generic
)
855 unsigned long block_length
, prealloc_records
, prealloc_size
;
857 block_length
= min_t(unsigned long, generic
->error_block_length
,
858 GHES_ESTATUS_MAX_SIZE
);
859 prealloc_records
= max_t(unsigned long,
860 generic
->records_to_preallocate
, 1);
861 prealloc_size
= min_t(unsigned long, block_length
* prealloc_records
,
862 GHES_ESOURCE_PREALLOC_MAX_SIZE
);
864 return prealloc_size
;
867 static int ghes_probe(struct platform_device
*ghes_dev
)
869 struct acpi_hest_generic
*generic
;
870 struct ghes
*ghes
= NULL
;
874 generic
= *(struct acpi_hest_generic
**)ghes_dev
->dev
.platform_data
;
875 if (!generic
->enabled
)
878 switch (generic
->notify
.type
) {
879 case ACPI_HEST_NOTIFY_POLLED
:
880 case ACPI_HEST_NOTIFY_EXTERNAL
:
881 case ACPI_HEST_NOTIFY_SCI
:
882 case ACPI_HEST_NOTIFY_NMI
:
884 case ACPI_HEST_NOTIFY_LOCAL
:
885 pr_warning(GHES_PFX
"Generic hardware error source: %d notified via local interrupt is not supported!\n",
886 generic
->header
.source_id
);
889 pr_warning(FW_WARN GHES_PFX
"Unknown notification type: %u for generic hardware error source: %d\n",
890 generic
->notify
.type
, generic
->header
.source_id
);
895 if (generic
->error_block_length
<
896 sizeof(struct acpi_hest_generic_status
)) {
897 pr_warning(FW_BUG GHES_PFX
"Invalid error block length: %u for generic hardware error source: %d\n",
898 generic
->error_block_length
,
899 generic
->header
.source_id
);
902 ghes
= ghes_new(generic
);
909 rc
= ghes_edac_register(ghes
, &ghes_dev
->dev
);
913 switch (generic
->notify
.type
) {
914 case ACPI_HEST_NOTIFY_POLLED
:
915 ghes
->timer
.function
= ghes_poll_func
;
916 ghes
->timer
.data
= (unsigned long)ghes
;
917 init_timer_deferrable(&ghes
->timer
);
918 ghes_add_timer(ghes
);
920 case ACPI_HEST_NOTIFY_EXTERNAL
:
921 /* External interrupt vector is GSI */
922 if (acpi_gsi_to_irq(generic
->notify
.vector
, &ghes
->irq
)) {
923 pr_err(GHES_PFX
"Failed to map GSI to IRQ for generic hardware error source: %d\n",
924 generic
->header
.source_id
);
927 if (request_irq(ghes
->irq
, ghes_irq_func
,
928 0, "GHES IRQ", ghes
)) {
929 pr_err(GHES_PFX
"Failed to register IRQ for generic hardware error source: %d\n",
930 generic
->header
.source_id
);
934 case ACPI_HEST_NOTIFY_SCI
:
935 mutex_lock(&ghes_list_mutex
);
936 if (list_empty(&ghes_sci
))
937 register_acpi_hed_notifier(&ghes_notifier_sci
);
938 list_add_rcu(&ghes
->list
, &ghes_sci
);
939 mutex_unlock(&ghes_list_mutex
);
941 case ACPI_HEST_NOTIFY_NMI
:
942 len
= ghes_esource_prealloc_size(generic
);
943 ghes_estatus_pool_expand(len
);
944 mutex_lock(&ghes_list_mutex
);
945 if (list_empty(&ghes_nmi
))
946 register_nmi_handler(NMI_LOCAL
, ghes_notify_nmi
, 0,
948 list_add_rcu(&ghes
->list
, &ghes_nmi
);
949 mutex_unlock(&ghes_list_mutex
);
954 platform_set_drvdata(ghes_dev
, ghes
);
958 ghes_edac_unregister(ghes
);
967 static int ghes_remove(struct platform_device
*ghes_dev
)
970 struct acpi_hest_generic
*generic
;
973 ghes
= platform_get_drvdata(ghes_dev
);
974 generic
= ghes
->generic
;
976 ghes
->flags
|= GHES_EXITING
;
977 switch (generic
->notify
.type
) {
978 case ACPI_HEST_NOTIFY_POLLED
:
979 del_timer_sync(&ghes
->timer
);
981 case ACPI_HEST_NOTIFY_EXTERNAL
:
982 free_irq(ghes
->irq
, ghes
);
984 case ACPI_HEST_NOTIFY_SCI
:
985 mutex_lock(&ghes_list_mutex
);
986 list_del_rcu(&ghes
->list
);
987 if (list_empty(&ghes_sci
))
988 unregister_acpi_hed_notifier(&ghes_notifier_sci
);
989 mutex_unlock(&ghes_list_mutex
);
991 case ACPI_HEST_NOTIFY_NMI
:
992 mutex_lock(&ghes_list_mutex
);
993 list_del_rcu(&ghes
->list
);
994 if (list_empty(&ghes_nmi
))
995 unregister_nmi_handler(NMI_LOCAL
, "ghes");
996 mutex_unlock(&ghes_list_mutex
);
998 * To synchronize with NMI handler, ghes can only be
999 * freed after NMI handler finishes.
1002 len
= ghes_esource_prealloc_size(generic
);
1003 ghes_estatus_pool_shrink(len
);
1012 ghes_edac_unregister(ghes
);
1016 platform_set_drvdata(ghes_dev
, NULL
);
1021 static struct platform_driver ghes_platform_driver
= {
1024 .owner
= THIS_MODULE
,
1026 .probe
= ghes_probe
,
1027 .remove
= ghes_remove
,
1030 static int __init
ghes_init(void)
1038 pr_info(GHES_PFX
"HEST is not enabled!\n");
1043 pr_info(GHES_PFX
"GHES is not enabled!\n");
1047 init_irq_work(&ghes_proc_irq_work
, ghes_proc_in_irq
);
1049 rc
= ghes_ioremap_init();
1053 rc
= ghes_estatus_pool_init();
1055 goto err_ioremap_exit
;
1057 rc
= ghes_estatus_pool_expand(GHES_ESTATUS_CACHE_AVG_SIZE
*
1058 GHES_ESTATUS_CACHE_ALLOCED_MAX
);
1062 rc
= platform_driver_register(&ghes_platform_driver
);
1066 rc
= apei_osc_setup();
1067 if (rc
== 0 && osc_sb_apei_support_acked
)
1068 pr_info(GHES_PFX
"APEI firmware first mode is enabled by APEI bit and WHEA _OSC.\n");
1069 else if (rc
== 0 && !osc_sb_apei_support_acked
)
1070 pr_info(GHES_PFX
"APEI firmware first mode is enabled by WHEA _OSC.\n");
1071 else if (rc
&& osc_sb_apei_support_acked
)
1072 pr_info(GHES_PFX
"APEI firmware first mode is enabled by APEI bit.\n");
1074 pr_info(GHES_PFX
"Failed to enable APEI firmware first mode.\n");
1078 ghes_estatus_pool_exit();
1080 ghes_ioremap_exit();
1085 static void __exit
ghes_exit(void)
1087 platform_driver_unregister(&ghes_platform_driver
);
1088 ghes_estatus_pool_exit();
1089 ghes_ioremap_exit();
1092 module_init(ghes_init
);
1093 module_exit(ghes_exit
);
1095 MODULE_AUTHOR("Huang Ying");
1096 MODULE_DESCRIPTION("APEI Generic Hardware Error Source support");
1097 MODULE_LICENSE("GPL");
1098 MODULE_ALIAS("platform:GHES");