?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
PM / sleep: Asynchronous threads for suspend_noirq
[linux/fpc-iii.git] / drivers / acpi / apei / erst.c
blobed65e9c4b5b0415c1dcc77690a4add725a49a0bd
1 /*
2 * APEI Error Record Serialization Table support
3 *
4 * ERST is a way provided by APEI to save and retrieve hardware error
5 * information to and from a persistent store.
6 *
7 * For more information about ERST, please refer to ACPI Specification
8 * version 4.0, section 17.4.
9 *
10 * Copyright 2010 Intel Corp.
11 * Author: Huang Ying <ying.huang@intel.com>
12 *
13 * This program is free software; you can redistribute it and/or
14 * modify it under the terms of the GNU General Public License version
15 * 2 as published by the Free Software Foundation.
16 *
17 * This program is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 * GNU General Public License for more details.
21 *
22 * You should have received a copy of the GNU General Public License
23 * along with this program; if not, write to the Free Software
24 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
25 */
26
27 #include <linux/kernel.h>
28 #include <linux/module.h>
29 #include <linux/init.h>
30 #include <linux/delay.h>
31 #include <linux/io.h>
32 #include <linux/acpi.h>
33 #include <linux/uaccess.h>
34 #include <linux/cper.h>
35 #include <linux/nmi.h>
36 #include <linux/hardirq.h>
37 #include <linux/pstore.h>
38 #include <acpi/apei.h>
39
40 #include "apei-internal.h"
41
42 #undef pr_fmt
43 #define pr_fmt(fmt) "ERST: " fmt
44
45 /* ERST command status */
46 #define ERST_STATUS_SUCCESS 0x0
47 #define ERST_STATUS_NOT_ENOUGH_SPACE 0x1
48 #define ERST_STATUS_HARDWARE_NOT_AVAILABLE 0x2
49 #define ERST_STATUS_FAILED 0x3
50 #define ERST_STATUS_RECORD_STORE_EMPTY 0x4
51 #define ERST_STATUS_RECORD_NOT_FOUND 0x5
52
53 #define ERST_TAB_ENTRY(tab) \
54 ((struct acpi_whea_header *)((char *)(tab) + \
55 sizeof(struct acpi_table_erst)))
56
57 #define SPIN_UNIT 100 /* 100ns */
58 /* Firmware should respond within 1 milliseconds */
59 #define FIRMWARE_TIMEOUT (1 * NSEC_PER_MSEC)
60 #define FIRMWARE_MAX_STALL 50 /* 50us */
61
62 int erst_disable;
63 EXPORT_SYMBOL_GPL(erst_disable);
64
65 static struct acpi_table_erst *erst_tab;
66
67 /* ERST Error Log Address Range atrributes */
68 #define ERST_RANGE_RESERVED 0x0001
69 #define ERST_RANGE_NVRAM 0x0002
70 #define ERST_RANGE_SLOW 0x0004
71
72 /*
73 * ERST Error Log Address Range, used as buffer for reading/writing
74 * error records.
75 */
76 static struct erst_erange {
77 u64 base;
78 u64 size;
79 void __iomem *vaddr;
80 u32 attr;
81 } erst_erange;
82
83 /*
84 * Prevent ERST interpreter to run simultaneously, because the
85 * corresponding firmware implementation may not work properly when
86 * invoked simultaneously.
87 *
88 * It is used to provide exclusive accessing for ERST Error Log
89 * Address Range too.
90 */
91 static DEFINE_RAW_SPINLOCK(erst_lock);
92
93 static inline int erst_errno(int command_status)
94 {
95 switch (command_status) {
96 case ERST_STATUS_SUCCESS:
97 return 0;
98 case ERST_STATUS_HARDWARE_NOT_AVAILABLE:
99 return -ENODEV;
100 case ERST_STATUS_NOT_ENOUGH_SPACE:
101 return -ENOSPC;
102 case ERST_STATUS_RECORD_STORE_EMPTY:
103 case ERST_STATUS_RECORD_NOT_FOUND:
104 return -ENOENT;
105 default:
106 return -EINVAL;
107 }
108 }
109
110 static int erst_timedout(u64 *t, u64 spin_unit)
111 {
112 if ((s64)*t < spin_unit) {
113 pr_warn(FW_WARN "Firmware does not respond in time.\n");
114 return 1;
115 }
116 *t -= spin_unit;
117 ndelay(spin_unit);
118 touch_nmi_watchdog();
119 return 0;
120 }
121
122 static int erst_exec_load_var1(struct apei_exec_context *ctx,
123 struct acpi_whea_header *entry)
124 {
125 return __apei_exec_read_register(entry, &ctx->var1);
126 }
127
128 static int erst_exec_load_var2(struct apei_exec_context *ctx,
129 struct acpi_whea_header *entry)
130 {
131 return __apei_exec_read_register(entry, &ctx->var2);
132 }
133
134 static int erst_exec_store_var1(struct apei_exec_context *ctx,
135 struct acpi_whea_header *entry)
136 {
137 return __apei_exec_write_register(entry, ctx->var1);
138 }
139
140 static int erst_exec_add(struct apei_exec_context *ctx,
141 struct acpi_whea_header *entry)
142 {
143 ctx->var1 += ctx->var2;
144 return 0;
145 }
146
147 static int erst_exec_subtract(struct apei_exec_context *ctx,
148 struct acpi_whea_header *entry)
149 {
150 ctx->var1 -= ctx->var2;
151 return 0;
152 }
153
154 static int erst_exec_add_value(struct apei_exec_context *ctx,
155 struct acpi_whea_header *entry)
156 {
157 int rc;
158 u64 val;
159
160 rc = __apei_exec_read_register(entry, &val);
161 if (rc)
162 return rc;
163 val += ctx->value;
164 rc = __apei_exec_write_register(entry, val);
165 return rc;
166 }
167
168 static int erst_exec_subtract_value(struct apei_exec_context *ctx,
169 struct acpi_whea_header *entry)
170 {
171 int rc;
172 u64 val;
173
174 rc = __apei_exec_read_register(entry, &val);
175 if (rc)
176 return rc;
177 val -= ctx->value;
178 rc = __apei_exec_write_register(entry, val);
179 return rc;
180 }
181
182 static int erst_exec_stall(struct apei_exec_context *ctx,
183 struct acpi_whea_header *entry)
184 {
185 u64 stall_time;
186
187 if (ctx->value > FIRMWARE_MAX_STALL) {
188 if (!in_nmi())
189 pr_warn(FW_WARN
190 "Too long stall time for stall instruction: 0x%llx.\n",
191 ctx->value);
192 stall_time = FIRMWARE_MAX_STALL;
193 } else
194 stall_time = ctx->value;
195 udelay(stall_time);
196 return 0;
197 }
198
199 static int erst_exec_stall_while_true(struct apei_exec_context *ctx,
200 struct acpi_whea_header *entry)
201 {
202 int rc;
203 u64 val;
204 u64 timeout = FIRMWARE_TIMEOUT;
205 u64 stall_time;
206
207 if (ctx->var1 > FIRMWARE_MAX_STALL) {
208 if (!in_nmi())
209 pr_warn(FW_WARN
210 "Too long stall time for stall while true instruction: 0x%llx.\n",
211 ctx->var1);
212 stall_time = FIRMWARE_MAX_STALL;
213 } else
214 stall_time = ctx->var1;
215
216 for (;;) {
217 rc = __apei_exec_read_register(entry, &val);
218 if (rc)
219 return rc;
220 if (val != ctx->value)
221 break;
222 if (erst_timedout(&timeout, stall_time * NSEC_PER_USEC))
223 return -EIO;
224 }
225 return 0;
226 }
227
228 static int erst_exec_skip_next_instruction_if_true(
229 struct apei_exec_context *ctx,
230 struct acpi_whea_header *entry)
231 {
232 int rc;
233 u64 val;
234
235 rc = __apei_exec_read_register(entry, &val);
236 if (rc)
237 return rc;
238 if (val == ctx->value) {
239 ctx->ip += 2;
240 return APEI_EXEC_SET_IP;
241 }
242
243 return 0;
244 }
245
246 static int erst_exec_goto(struct apei_exec_context *ctx,
247 struct acpi_whea_header *entry)
248 {
249 ctx->ip = ctx->value;
250 return APEI_EXEC_SET_IP;
251 }
252
253 static int erst_exec_set_src_address_base(struct apei_exec_context *ctx,
254 struct acpi_whea_header *entry)
255 {
256 return __apei_exec_read_register(entry, &ctx->src_base);
257 }
258
259 static int erst_exec_set_dst_address_base(struct apei_exec_context *ctx,
260 struct acpi_whea_header *entry)
261 {
262 return __apei_exec_read_register(entry, &ctx->dst_base);
263 }
264
265 static int erst_exec_move_data(struct apei_exec_context *ctx,
266 struct acpi_whea_header *entry)
267 {
268 int rc;
269 u64 offset;
270 void *src, *dst;
271
272 /* ioremap does not work in interrupt context */
273 if (in_interrupt()) {
274 pr_warn("MOVE_DATA can not be used in interrupt context.\n");
275 return -EBUSY;
276 }
277
278 rc = __apei_exec_read_register(entry, &offset);
279 if (rc)
280 return rc;
281
282 src = ioremap(ctx->src_base + offset, ctx->var2);
283 if (!src)
284 return -ENOMEM;
285 dst = ioremap(ctx->dst_base + offset, ctx->var2);
286 if (!dst) {
287 iounmap(src);
288 return -ENOMEM;
289 }
290
291 memmove(dst, src, ctx->var2);
292
293 iounmap(src);
294 iounmap(dst);
295
296 return 0;
297 }
298
299 static struct apei_exec_ins_type erst_ins_type[] = {
300 [ACPI_ERST_READ_REGISTER] = {
301 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
302 .run = apei_exec_read_register,
303 },
304 [ACPI_ERST_READ_REGISTER_VALUE] = {
305 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
306 .run = apei_exec_read_register_value,
307 },
308 [ACPI_ERST_WRITE_REGISTER] = {
309 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
310 .run = apei_exec_write_register,
311 },
312 [ACPI_ERST_WRITE_REGISTER_VALUE] = {
313 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
314 .run = apei_exec_write_register_value,
315 },
316 [ACPI_ERST_NOOP] = {
317 .flags = 0,
318 .run = apei_exec_noop,
319 },
320 [ACPI_ERST_LOAD_VAR1] = {
321 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
322 .run = erst_exec_load_var1,
323 },
324 [ACPI_ERST_LOAD_VAR2] = {
325 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
326 .run = erst_exec_load_var2,
327 },
328 [ACPI_ERST_STORE_VAR1] = {
329 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
330 .run = erst_exec_store_var1,
331 },
332 [ACPI_ERST_ADD] = {
333 .flags = 0,
334 .run = erst_exec_add,
335 },
336 [ACPI_ERST_SUBTRACT] = {
337 .flags = 0,
338 .run = erst_exec_subtract,
339 },
340 [ACPI_ERST_ADD_VALUE] = {
341 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
342 .run = erst_exec_add_value,
343 },
344 [ACPI_ERST_SUBTRACT_VALUE] = {
345 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
346 .run = erst_exec_subtract_value,
347 },
348 [ACPI_ERST_STALL] = {
349 .flags = 0,
350 .run = erst_exec_stall,
351 },
352 [ACPI_ERST_STALL_WHILE_TRUE] = {
353 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
354 .run = erst_exec_stall_while_true,
355 },
356 [ACPI_ERST_SKIP_NEXT_IF_TRUE] = {
357 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
358 .run = erst_exec_skip_next_instruction_if_true,
359 },
360 [ACPI_ERST_GOTO] = {
361 .flags = 0,
362 .run = erst_exec_goto,
363 },
364 [ACPI_ERST_SET_SRC_ADDRESS_BASE] = {
365 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
366 .run = erst_exec_set_src_address_base,
367 },
368 [ACPI_ERST_SET_DST_ADDRESS_BASE] = {
369 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
370 .run = erst_exec_set_dst_address_base,
371 },
372 [ACPI_ERST_MOVE_DATA] = {
373 .flags = APEI_EXEC_INS_ACCESS_REGISTER,
374 .run = erst_exec_move_data,
375 },
376 };
377
378 static inline void erst_exec_ctx_init(struct apei_exec_context *ctx)
379 {
380 apei_exec_ctx_init(ctx, erst_ins_type, ARRAY_SIZE(erst_ins_type),
381 ERST_TAB_ENTRY(erst_tab), erst_tab->entries);
382 }
383
384 static int erst_get_erange(struct erst_erange *range)
385 {
386 struct apei_exec_context ctx;
387 int rc;
388
389 erst_exec_ctx_init(&ctx);
390 rc = apei_exec_run(&ctx, ACPI_ERST_GET_ERROR_RANGE);
391 if (rc)
392 return rc;
393 range->base = apei_exec_ctx_get_output(&ctx);
394 rc = apei_exec_run(&ctx, ACPI_ERST_GET_ERROR_LENGTH);
395 if (rc)
396 return rc;
397 range->size = apei_exec_ctx_get_output(&ctx);
398 rc = apei_exec_run(&ctx, ACPI_ERST_GET_ERROR_ATTRIBUTES);
399 if (rc)
400 return rc;
401 range->attr = apei_exec_ctx_get_output(&ctx);
402
403 return 0;
404 }
405
406 static ssize_t __erst_get_record_count(void)
407 {
408 struct apei_exec_context ctx;
409 int rc;
410
411 erst_exec_ctx_init(&ctx);
412 rc = apei_exec_run(&ctx, ACPI_ERST_GET_RECORD_COUNT);
413 if (rc)
414 return rc;
415 return apei_exec_ctx_get_output(&ctx);
416 }
417
418 ssize_t erst_get_record_count(void)
419 {
420 ssize_t count;
421 unsigned long flags;
422
423 if (erst_disable)
424 return -ENODEV;
425
426 raw_spin_lock_irqsave(&erst_lock, flags);
427 count = __erst_get_record_count();
428 raw_spin_unlock_irqrestore(&erst_lock, flags);
429
430 return count;
431 }
432 EXPORT_SYMBOL_GPL(erst_get_record_count);
433
434 #define ERST_RECORD_ID_CACHE_SIZE_MIN 16
435 #define ERST_RECORD_ID_CACHE_SIZE_MAX 1024
436
437 struct erst_record_id_cache {
438 struct mutex lock;
439 u64 *entries;
440 int len;
441 int size;
442 int refcount;
443 };
444
445 static struct erst_record_id_cache erst_record_id_cache = {
446 .lock = __MUTEX_INITIALIZER(erst_record_id_cache.lock),
447 .refcount = 0,
448 };
449
450 static int __erst_get_next_record_id(u64 *record_id)
451 {
452 struct apei_exec_context ctx;
453 int rc;
454
455 erst_exec_ctx_init(&ctx);
456 rc = apei_exec_run(&ctx, ACPI_ERST_GET_RECORD_ID);
457 if (rc)
458 return rc;
459 *record_id = apei_exec_ctx_get_output(&ctx);
460
461 return 0;
462 }
463
464 int erst_get_record_id_begin(int *pos)
465 {
466 int rc;
467
468 if (erst_disable)
469 return -ENODEV;
470
471 rc = mutex_lock_interruptible(&erst_record_id_cache.lock);
472 if (rc)
473 return rc;
474 erst_record_id_cache.refcount++;
475 mutex_unlock(&erst_record_id_cache.lock);
476
477 *pos = 0;
478
479 return 0;
480 }
481 EXPORT_SYMBOL_GPL(erst_get_record_id_begin);
482
483 /* erst_record_id_cache.lock must be held by caller */
484 static int __erst_record_id_cache_add_one(void)
485 {
486 u64 id, prev_id, first_id;
487 int i, rc;
488 u64 *entries;
489 unsigned long flags;
490
491 id = prev_id = first_id = APEI_ERST_INVALID_RECORD_ID;
492 retry:
493 raw_spin_lock_irqsave(&erst_lock, flags);
494 rc = __erst_get_next_record_id(&id);
495 raw_spin_unlock_irqrestore(&erst_lock, flags);
496 if (rc == -ENOENT)
497 return 0;
498 if (rc)
499 return rc;
500 if (id == APEI_ERST_INVALID_RECORD_ID)
501 return 0;
502 /* can not skip current ID, or loop back to first ID */
503 if (id == prev_id || id == first_id)
504 return 0;
505 if (first_id == APEI_ERST_INVALID_RECORD_ID)
506 first_id = id;
507 prev_id = id;
508
509 entries = erst_record_id_cache.entries;
510 for (i = 0; i < erst_record_id_cache.len; i++) {
511 if (entries[i] == id)
512 break;
513 }
514 /* record id already in cache, try next */
515 if (i < erst_record_id_cache.len)
516 goto retry;
517 if (erst_record_id_cache.len >= erst_record_id_cache.size) {
518 int new_size, alloc_size;
519 u64 *new_entries;
520
521 new_size = erst_record_id_cache.size * 2;
522 new_size = clamp_val(new_size, ERST_RECORD_ID_CACHE_SIZE_MIN,
523 ERST_RECORD_ID_CACHE_SIZE_MAX);
524 if (new_size <= erst_record_id_cache.size) {
525 if (printk_ratelimit())
526 pr_warn(FW_WARN "too many record IDs!\n");
527 return 0;
528 }
529 alloc_size = new_size * sizeof(entries[0]);
530 if (alloc_size < PAGE_SIZE)
531 new_entries = kmalloc(alloc_size, GFP_KERNEL);
532 else
533 new_entries = vmalloc(alloc_size);
534 if (!new_entries)
535 return -ENOMEM;
536 memcpy(new_entries, entries,
537 erst_record_id_cache.len * sizeof(entries[0]));
538 if (erst_record_id_cache.size < PAGE_SIZE)
539 kfree(entries);
540 else
541 vfree(entries);
542 erst_record_id_cache.entries = entries = new_entries;
543 erst_record_id_cache.size = new_size;
544 }
545 entries[i] = id;
546 erst_record_id_cache.len++;
547
548 return 1;
549 }
550
551 /*
552 * Get the record ID of an existing error record on the persistent
553 * storage. If there is no error record on the persistent storage, the
554 * returned record_id is APEI_ERST_INVALID_RECORD_ID.
555 */
556 int erst_get_record_id_next(int *pos, u64 *record_id)
557 {
558 int rc = 0;
559 u64 *entries;
560
561 if (erst_disable)
562 return -ENODEV;
563
564 /* must be enclosed by erst_get_record_id_begin/end */
565 BUG_ON(!erst_record_id_cache.refcount);
566 BUG_ON(*pos < 0 || *pos > erst_record_id_cache.len);
567
568 mutex_lock(&erst_record_id_cache.lock);
569 entries = erst_record_id_cache.entries;
570 for (; *pos < erst_record_id_cache.len; (*pos)++)
571 if (entries[*pos] != APEI_ERST_INVALID_RECORD_ID)
572 break;
573 /* found next record id in cache */
574 if (*pos < erst_record_id_cache.len) {
575 *record_id = entries[*pos];
576 (*pos)++;
577 goto out_unlock;
578 }
579
580 /* Try to add one more record ID to cache */
581 rc = __erst_record_id_cache_add_one();
582 if (rc < 0)
583 goto out_unlock;
584 /* successfully add one new ID */
585 if (rc == 1) {
586 *record_id = erst_record_id_cache.entries[*pos];
587 (*pos)++;
588 rc = 0;
589 } else {
590 *pos = -1;
591 *record_id = APEI_ERST_INVALID_RECORD_ID;
592 }
593 out_unlock:
594 mutex_unlock(&erst_record_id_cache.lock);
595
596 return rc;
597 }
598 EXPORT_SYMBOL_GPL(erst_get_record_id_next);
599
600 /* erst_record_id_cache.lock must be held by caller */
601 static void __erst_record_id_cache_compact(void)
602 {
603 int i, wpos = 0;
604 u64 *entries;
605
606 if (erst_record_id_cache.refcount)
607 return;
608
609 entries = erst_record_id_cache.entries;
610 for (i = 0; i < erst_record_id_cache.len; i++) {
611 if (entries[i] == APEI_ERST_INVALID_RECORD_ID)
612 continue;
613 if (wpos != i)
614 entries[wpos] = entries[i];
615 wpos++;
616 }
617 erst_record_id_cache.len = wpos;
618 }
619
620 void erst_get_record_id_end(void)
621 {
622 /*
623 * erst_disable != 0 should be detected by invoker via the
624 * return value of erst_get_record_id_begin/next, so this
625 * function should not be called for erst_disable != 0.
626 */
627 BUG_ON(erst_disable);
628
629 mutex_lock(&erst_record_id_cache.lock);
630 erst_record_id_cache.refcount--;
631 BUG_ON(erst_record_id_cache.refcount < 0);
632 __erst_record_id_cache_compact();
633 mutex_unlock(&erst_record_id_cache.lock);
634 }
635 EXPORT_SYMBOL_GPL(erst_get_record_id_end);
636
637 static int __erst_write_to_storage(u64 offset)
638 {
639 struct apei_exec_context ctx;
640 u64 timeout = FIRMWARE_TIMEOUT;
641 u64 val;
642 int rc;
643
644 erst_exec_ctx_init(&ctx);
645 rc = apei_exec_run_optional(&ctx, ACPI_ERST_BEGIN_WRITE);
646 if (rc)
647 return rc;
648 apei_exec_ctx_set_input(&ctx, offset);
649 rc = apei_exec_run(&ctx, ACPI_ERST_SET_RECORD_OFFSET);
650 if (rc)
651 return rc;
652 rc = apei_exec_run(&ctx, ACPI_ERST_EXECUTE_OPERATION);
653 if (rc)
654 return rc;
655 for (;;) {
656 rc = apei_exec_run(&ctx, ACPI_ERST_CHECK_BUSY_STATUS);
657 if (rc)
658 return rc;
659 val = apei_exec_ctx_get_output(&ctx);
660 if (!val)
661 break;
662 if (erst_timedout(&timeout, SPIN_UNIT))
663 return -EIO;
664 }
665 rc = apei_exec_run(&ctx, ACPI_ERST_GET_COMMAND_STATUS);
666 if (rc)
667 return rc;
668 val = apei_exec_ctx_get_output(&ctx);
669 rc = apei_exec_run_optional(&ctx, ACPI_ERST_END);
670 if (rc)
671 return rc;
672
673 return erst_errno(val);
674 }
675
676 static int __erst_read_from_storage(u64 record_id, u64 offset)
677 {
678 struct apei_exec_context ctx;
679 u64 timeout = FIRMWARE_TIMEOUT;
680 u64 val;
681 int rc;
682
683 erst_exec_ctx_init(&ctx);
684 rc = apei_exec_run_optional(&ctx, ACPI_ERST_BEGIN_READ);
685 if (rc)
686 return rc;
687 apei_exec_ctx_set_input(&ctx, offset);
688 rc = apei_exec_run(&ctx, ACPI_ERST_SET_RECORD_OFFSET);
689 if (rc)
690 return rc;
691 apei_exec_ctx_set_input(&ctx, record_id);
692 rc = apei_exec_run(&ctx, ACPI_ERST_SET_RECORD_ID);
693 if (rc)
694 return rc;
695 rc = apei_exec_run(&ctx, ACPI_ERST_EXECUTE_OPERATION);
696 if (rc)
697 return rc;
698 for (;;) {
699 rc = apei_exec_run(&ctx, ACPI_ERST_CHECK_BUSY_STATUS);
700 if (rc)
701 return rc;
702 val = apei_exec_ctx_get_output(&ctx);
703 if (!val)
704 break;
705 if (erst_timedout(&timeout, SPIN_UNIT))
706 return -EIO;
707 };
708 rc = apei_exec_run(&ctx, ACPI_ERST_GET_COMMAND_STATUS);
709 if (rc)
710 return rc;
711 val = apei_exec_ctx_get_output(&ctx);
712 rc = apei_exec_run_optional(&ctx, ACPI_ERST_END);
713 if (rc)
714 return rc;
715
716 return erst_errno(val);
717 }
718
719 static int __erst_clear_from_storage(u64 record_id)
720 {
721 struct apei_exec_context ctx;
722 u64 timeout = FIRMWARE_TIMEOUT;
723 u64 val;
724 int rc;
725
726 erst_exec_ctx_init(&ctx);
727 rc = apei_exec_run_optional(&ctx, ACPI_ERST_BEGIN_CLEAR);
728 if (rc)
729 return rc;
730 apei_exec_ctx_set_input(&ctx, record_id);
731 rc = apei_exec_run(&ctx, ACPI_ERST_SET_RECORD_ID);
732 if (rc)
733 return rc;
734 rc = apei_exec_run(&ctx, ACPI_ERST_EXECUTE_OPERATION);
735 if (rc)
736 return rc;
737 for (;;) {
738 rc = apei_exec_run(&ctx, ACPI_ERST_CHECK_BUSY_STATUS);
739 if (rc)
740 return rc;
741 val = apei_exec_ctx_get_output(&ctx);
742 if (!val)
743 break;
744 if (erst_timedout(&timeout, SPIN_UNIT))
745 return -EIO;
746 }
747 rc = apei_exec_run(&ctx, ACPI_ERST_GET_COMMAND_STATUS);
748 if (rc)
749 return rc;
750 val = apei_exec_ctx_get_output(&ctx);
751 rc = apei_exec_run_optional(&ctx, ACPI_ERST_END);
752 if (rc)
753 return rc;
754
755 return erst_errno(val);
756 }
757
758 /* NVRAM ERST Error Log Address Range is not supported yet */
759 static void pr_unimpl_nvram(void)
760 {
761 if (printk_ratelimit())
762 pr_warn("NVRAM ERST Log Address Range not implemented yet.\n");
763 }
764
765 static int __erst_write_to_nvram(const struct cper_record_header *record)
766 {
767 /* do not print message, because printk is not safe for NMI */
768 return -ENOSYS;
769 }
770
771 static int __erst_read_to_erange_from_nvram(u64 record_id, u64 *offset)
772 {
773 pr_unimpl_nvram();
774 return -ENOSYS;
775 }
776
777 static int __erst_clear_from_nvram(u64 record_id)
778 {
779 pr_unimpl_nvram();
780 return -ENOSYS;
781 }
782
783 int erst_write(const struct cper_record_header *record)
784 {
785 int rc;
786 unsigned long flags;
787 struct cper_record_header *rcd_erange;
788
789 if (erst_disable)
790 return -ENODEV;
791
792 if (memcmp(record->signature, CPER_SIG_RECORD, CPER_SIG_SIZE))
793 return -EINVAL;
794
795 if (erst_erange.attr & ERST_RANGE_NVRAM) {
796 if (!raw_spin_trylock_irqsave(&erst_lock, flags))
797 return -EBUSY;
798 rc = __erst_write_to_nvram(record);
799 raw_spin_unlock_irqrestore(&erst_lock, flags);
800 return rc;
801 }
802
803 if (record->record_length > erst_erange.size)
804 return -EINVAL;
805
806 if (!raw_spin_trylock_irqsave(&erst_lock, flags))
807 return -EBUSY;
808 memcpy(erst_erange.vaddr, record, record->record_length);
809 rcd_erange = erst_erange.vaddr;
810 /* signature for serialization system */
811 memcpy(&rcd_erange->persistence_information, "ER", 2);
812
813 rc = __erst_write_to_storage(0);
814 raw_spin_unlock_irqrestore(&erst_lock, flags);
815
816 return rc;
817 }
818 EXPORT_SYMBOL_GPL(erst_write);
819
820 static int __erst_read_to_erange(u64 record_id, u64 *offset)
821 {
822 int rc;
823
824 if (erst_erange.attr & ERST_RANGE_NVRAM)
825 return __erst_read_to_erange_from_nvram(
826 record_id, offset);
827
828 rc = __erst_read_from_storage(record_id, 0);
829 if (rc)
830 return rc;
831 *offset = 0;
832
833 return 0;
834 }
835
836 static ssize_t __erst_read(u64 record_id, struct cper_record_header *record,
837 size_t buflen)
838 {
839 int rc;
840 u64 offset, len = 0;
841 struct cper_record_header *rcd_tmp;
842
843 rc = __erst_read_to_erange(record_id, &offset);
844 if (rc)
845 return rc;
846 rcd_tmp = erst_erange.vaddr + offset;
847 len = rcd_tmp->record_length;
848 if (len <= buflen)
849 memcpy(record, rcd_tmp, len);
850
851 return len;
852 }
853
854 /*
855 * If return value > buflen, the buffer size is not big enough,
856 * else if return value < 0, something goes wrong,
857 * else everything is OK, and return value is record length
858 */
859 ssize_t erst_read(u64 record_id, struct cper_record_header *record,
860 size_t buflen)
861 {
862 ssize_t len;
863 unsigned long flags;
864
865 if (erst_disable)
866 return -ENODEV;
867
868 raw_spin_lock_irqsave(&erst_lock, flags);
869 len = __erst_read(record_id, record, buflen);
870 raw_spin_unlock_irqrestore(&erst_lock, flags);
871 return len;
872 }
873 EXPORT_SYMBOL_GPL(erst_read);
874
875 int erst_clear(u64 record_id)
876 {
877 int rc, i;
878 unsigned long flags;
879 u64 *entries;
880
881 if (erst_disable)
882 return -ENODEV;
883
884 rc = mutex_lock_interruptible(&erst_record_id_cache.lock);
885 if (rc)
886 return rc;
887 raw_spin_lock_irqsave(&erst_lock, flags);
888 if (erst_erange.attr & ERST_RANGE_NVRAM)
889 rc = __erst_clear_from_nvram(record_id);
890 else
891 rc = __erst_clear_from_storage(record_id);
892 raw_spin_unlock_irqrestore(&erst_lock, flags);
893 if (rc)
894 goto out;
895 entries = erst_record_id_cache.entries;
896 for (i = 0; i < erst_record_id_cache.len; i++) {
897 if (entries[i] == record_id)
898 entries[i] = APEI_ERST_INVALID_RECORD_ID;
899 }
900 __erst_record_id_cache_compact();
901 out:
902 mutex_unlock(&erst_record_id_cache.lock);
903 return rc;
904 }
905 EXPORT_SYMBOL_GPL(erst_clear);
906
907 static int __init setup_erst_disable(char *str)
908 {
909 erst_disable = 1;
910 return 0;
911 }
912
913 __setup("erst_disable", setup_erst_disable);
914
915 static int erst_check_table(struct acpi_table_erst *erst_tab)
916 {
917 if ((erst_tab->header_length !=
918 (sizeof(struct acpi_table_erst) - sizeof(erst_tab->header)))
919 && (erst_tab->header_length != sizeof(struct acpi_table_erst)))
920 return -EINVAL;
921 if (erst_tab->header.length < sizeof(struct acpi_table_erst))
922 return -EINVAL;
923 if (erst_tab->entries !=
924 (erst_tab->header.length - sizeof(struct acpi_table_erst)) /
925 sizeof(struct acpi_erst_entry))
926 return -EINVAL;
927
928 return 0;
929 }
930
931 static int erst_open_pstore(struct pstore_info *psi);
932 static int erst_close_pstore(struct pstore_info *psi);
933 static ssize_t erst_reader(u64 *id, enum pstore_type_id *type, int *count,
934 struct timespec *time, char **buf,
935 bool *compressed, struct pstore_info *psi);
936 static int erst_writer(enum pstore_type_id type, enum kmsg_dump_reason reason,
937 u64 *id, unsigned int part, int count, bool compressed,
938 size_t size, struct pstore_info *psi);
939 static int erst_clearer(enum pstore_type_id type, u64 id, int count,
940 struct timespec time, struct pstore_info *psi);
941
942 static struct pstore_info erst_info = {
943 .owner = THIS_MODULE,
944 .name = "erst",
945 .flags = PSTORE_FLAGS_FRAGILE,
946 .open = erst_open_pstore,
947 .close = erst_close_pstore,
948 .read = erst_reader,
949 .write = erst_writer,
950 .erase = erst_clearer
951 };
952
953 #define CPER_CREATOR_PSTORE \
954 UUID_LE(0x75a574e3, 0x5052, 0x4b29, 0x8a, 0x8e, 0xbe, 0x2c, \
955 0x64, 0x90, 0xb8, 0x9d)
956 #define CPER_SECTION_TYPE_DMESG \
957 UUID_LE(0xc197e04e, 0xd545, 0x4a70, 0x9c, 0x17, 0xa5, 0x54, \
958 0x94, 0x19, 0xeb, 0x12)
959 #define CPER_SECTION_TYPE_DMESG_Z \
960 UUID_LE(0x4f118707, 0x04dd, 0x4055, 0xb5, 0xdd, 0x95, 0x6d, \
961 0x34, 0xdd, 0xfa, 0xc6)
962 #define CPER_SECTION_TYPE_MCE \
963 UUID_LE(0xfe08ffbe, 0x95e4, 0x4be7, 0xbc, 0x73, 0x40, 0x96, \
964 0x04, 0x4a, 0x38, 0xfc)
965
966 struct cper_pstore_record {
967 struct cper_record_header hdr;
968 struct cper_section_descriptor sec_hdr;
969 char data[];
970 } __packed;
971
972 static int reader_pos;
973
974 static int erst_open_pstore(struct pstore_info *psi)
975 {
976 int rc;
977
978 if (erst_disable)
979 return -ENODEV;
980
981 rc = erst_get_record_id_begin(&reader_pos);
982
983 return rc;
984 }
985
986 static int erst_close_pstore(struct pstore_info *psi)
987 {
988 erst_get_record_id_end();
989
990 return 0;
991 }
992
993 static ssize_t erst_reader(u64 *id, enum pstore_type_id *type, int *count,
994 struct timespec *time, char **buf,
995 bool *compressed, struct pstore_info *psi)
996 {
997 int rc;
998 ssize_t len = 0;
999 u64 record_id;
1000 struct cper_pstore_record *rcd;
1001 size_t rcd_len = sizeof(*rcd) + erst_info.bufsize;
1002
1003 if (erst_disable)
1004 return -ENODEV;
1005
1006 rcd = kmalloc(rcd_len, GFP_KERNEL);
1007 if (!rcd) {
1008 rc = -ENOMEM;
1009 goto out;
1010 }
1011 skip:
1012 rc = erst_get_record_id_next(&reader_pos, &record_id);
1013 if (rc)
1014 goto out;
1015
1016 /* no more record */
1017 if (record_id == APEI_ERST_INVALID_RECORD_ID) {
1018 rc = -EINVAL;
1019 goto out;
1020 }
1021
1022 len = erst_read(record_id, &rcd->hdr, rcd_len);
1023 /* The record may be cleared by others, try read next record */
1024 if (len == -ENOENT)
1025 goto skip;
1026 else if (len < sizeof(*rcd)) {
1027 rc = -EIO;
1028 goto out;
1029 }
1030 if (uuid_le_cmp(rcd->hdr.creator_id, CPER_CREATOR_PSTORE) != 0)
1031 goto skip;
1032
1033 *buf = kmalloc(len, GFP_KERNEL);
1034 if (*buf == NULL) {
1035 rc = -ENOMEM;
1036 goto out;
1037 }
1038 memcpy(*buf, rcd->data, len - sizeof(*rcd));
1039 *id = record_id;
1040 *compressed = false;
1041 if (uuid_le_cmp(rcd->sec_hdr.section_type,
1042 CPER_SECTION_TYPE_DMESG_Z) == 0) {
1043 *type = PSTORE_TYPE_DMESG;
1044 *compressed = true;
1045 } else if (uuid_le_cmp(rcd->sec_hdr.section_type,
1046 CPER_SECTION_TYPE_DMESG) == 0)
1047 *type = PSTORE_TYPE_DMESG;
1048 else if (uuid_le_cmp(rcd->sec_hdr.section_type,
1049 CPER_SECTION_TYPE_MCE) == 0)
1050 *type = PSTORE_TYPE_MCE;
1051 else
1052 *type = PSTORE_TYPE_UNKNOWN;
1053
1054 if (rcd->hdr.validation_bits & CPER_VALID_TIMESTAMP)
1055 time->tv_sec = rcd->hdr.timestamp;
1056 else
1057 time->tv_sec = 0;
1058 time->tv_nsec = 0;
1059
1060 out:
1061 kfree(rcd);
1062 return (rc < 0) ? rc : (len - sizeof(*rcd));
1063 }
1064
1065 static int erst_writer(enum pstore_type_id type, enum kmsg_dump_reason reason,
1066 u64 *id, unsigned int part, int count, bool compressed,
1067 size_t size, struct pstore_info *psi)
1068 {
1069 struct cper_pstore_record *rcd = (struct cper_pstore_record *)
1070 (erst_info.buf - sizeof(*rcd));
1071 int ret;
1072
1073 memset(rcd, 0, sizeof(*rcd));
1074 memcpy(rcd->hdr.signature, CPER_SIG_RECORD, CPER_SIG_SIZE);
1075 rcd->hdr.revision = CPER_RECORD_REV;
1076 rcd->hdr.signature_end = CPER_SIG_END;
1077 rcd->hdr.section_count = 1;
1078 rcd->hdr.error_severity = CPER_SEV_FATAL;
1079 /* timestamp valid. platform_id, partition_id are invalid */
1080 rcd->hdr.validation_bits = CPER_VALID_TIMESTAMP;
1081 rcd->hdr.timestamp = get_seconds();
1082 rcd->hdr.record_length = sizeof(*rcd) + size;
1083 rcd->hdr.creator_id = CPER_CREATOR_PSTORE;
1084 rcd->hdr.notification_type = CPER_NOTIFY_MCE;
1085 rcd->hdr.record_id = cper_next_record_id();
1086 rcd->hdr.flags = CPER_HW_ERROR_FLAGS_PREVERR;
1087
1088 rcd->sec_hdr.section_offset = sizeof(*rcd);
1089 rcd->sec_hdr.section_length = size;
1090 rcd->sec_hdr.revision = CPER_SEC_REV;
1091 /* fru_id and fru_text is invalid */
1092 rcd->sec_hdr.validation_bits = 0;
1093 rcd->sec_hdr.flags = CPER_SEC_PRIMARY;
1094 switch (type) {
1095 case PSTORE_TYPE_DMESG:
1096 if (compressed)
1097 rcd->sec_hdr.section_type = CPER_SECTION_TYPE_DMESG_Z;
1098 else
1099 rcd->sec_hdr.section_type = CPER_SECTION_TYPE_DMESG;
1100 break;
1101 case PSTORE_TYPE_MCE:
1102 rcd->sec_hdr.section_type = CPER_SECTION_TYPE_MCE;
1103 break;
1104 default:
1105 return -EINVAL;
1106 }
1107 rcd->sec_hdr.section_severity = CPER_SEV_FATAL;
1108
1109 ret = erst_write(&rcd->hdr);
1110 *id = rcd->hdr.record_id;
1111
1112 return ret;
1113 }
1114
1115 static int erst_clearer(enum pstore_type_id type, u64 id, int count,
1116 struct timespec time, struct pstore_info *psi)
1117 {
1118 return erst_clear(id);
1119 }
1120
1121 static int __init erst_init(void)
1122 {
1123 int rc = 0;
1124 acpi_status status;
1125 struct apei_exec_context ctx;
1126 struct apei_resources erst_resources;
1127 struct resource *r;
1128 char *buf;
1129
1130 if (acpi_disabled)
1131 goto err;
1132
1133 if (erst_disable) {
1134 pr_info(
1135 "Error Record Serialization Table (ERST) support is disabled.\n");
1136 goto err;
1137 }
1138
1139 status = acpi_get_table(ACPI_SIG_ERST, 0,
1140 (struct acpi_table_header **)&erst_tab);
1141 if (status == AE_NOT_FOUND)
1142 goto err;
1143 else if (ACPI_FAILURE(status)) {
1144 const char *msg = acpi_format_exception(status);
1145 pr_err("Failed to get table, %s\n", msg);
1146 rc = -EINVAL;
1147 goto err;
1148 }
1149
1150 rc = erst_check_table(erst_tab);
1151 if (rc) {
1152 pr_err(FW_BUG "ERST table is invalid.\n");
1153 goto err;
1154 }
1155
1156 apei_resources_init(&erst_resources);
1157 erst_exec_ctx_init(&ctx);
1158 rc = apei_exec_collect_resources(&ctx, &erst_resources);
1159 if (rc)
1160 goto err_fini;
1161 rc = apei_resources_request(&erst_resources, "APEI ERST");
1162 if (rc)
1163 goto err_fini;
1164 rc = apei_exec_pre_map_gars(&ctx);
1165 if (rc)
1166 goto err_release;
1167 rc = erst_get_erange(&erst_erange);
1168 if (rc) {
1169 if (rc == -ENODEV)
1170 pr_info(
1171 "The corresponding hardware device or firmware implementation "
1172 "is not available.\n");
1173 else
1174 pr_err("Failed to get Error Log Address Range.\n");
1175 goto err_unmap_reg;
1176 }
1177
1178 r = request_mem_region(erst_erange.base, erst_erange.size, "APEI ERST");
1179 if (!r) {
1180 pr_err("Can not request [mem %#010llx-%#010llx] for ERST.\n",
1181 (unsigned long long)erst_erange.base,
1182 (unsigned long long)erst_erange.base + erst_erange.size - 1);
1183 rc = -EIO;
1184 goto err_unmap_reg;
1185 }
1186 rc = -ENOMEM;
1187 erst_erange.vaddr = ioremap_cache(erst_erange.base,
1188 erst_erange.size);
1189 if (!erst_erange.vaddr)
1190 goto err_release_erange;
1191
1192 pr_info(
1193 "Error Record Serialization Table (ERST) support is initialized.\n");
1194
1195 buf = kmalloc(erst_erange.size, GFP_KERNEL);
1196 spin_lock_init(&erst_info.buf_lock);
1197 if (buf) {
1198 erst_info.buf = buf + sizeof(struct cper_pstore_record);
1199 erst_info.bufsize = erst_erange.size -
1200 sizeof(struct cper_pstore_record);
1201 rc = pstore_register(&erst_info);
1202 if (rc) {
1203 if (rc != -EPERM)
1204 pr_info(
1205 "Could not register with persistent store.\n");
1206 erst_info.buf = NULL;
1207 erst_info.bufsize = 0;
1208 kfree(buf);
1209 }
1210 } else
1211 pr_err(
1212 "Failed to allocate %lld bytes for persistent store error log.\n",
1213 erst_erange.size);
1214
1215 return 0;
1216
1217 err_release_erange:
1218 release_mem_region(erst_erange.base, erst_erange.size);
1219 err_unmap_reg:
1220 apei_exec_post_unmap_gars(&ctx);
1221 err_release:
1222 apei_resources_release(&erst_resources);
1223 err_fini:
1224 apei_resources_fini(&erst_resources);
1225 err:
1226 erst_disable = 1;
1227 return rc;
1228 }
1229
1230 device_initcall(erst_init);
Linux with added FPC-III support