1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
/* Copyright 2013-2014 IBM Corp.
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
* implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#include <skiboot.h>
#include <lock.h>
#include <fsp.h>
#include <platform.h>
#include <processor.h>
#include <cpu.h>
#include <stack.h>
void __noreturn assert_fail(const char *msg)
{
/**
* @fwts-label FailedAssert
* @fwts-advice OPAL hit an assert(). During normal usage (even
* testing) we should never hit an assert. There are other code
* paths for controlled shutdown/panic in the event of catastrophic
* errors.
*/
prlog(PR_EMERG, "Assert fail: %s\n", msg);
_abort(msg);
}
void __noreturn _abort(const char *msg)
{
static bool in_abort = false;
if (in_abort)
for (;;) ;
in_abort = true;
prlog(PR_EMERG, "Aborting!\n");
backtrace();
if (platform.terminate)
platform.terminate(msg);
for (;;) ;
}
char __attrconst tohex(uint8_t nibble)
{
static const char __tohex[] = {'0','1','2','3','4','5','6','7','8','9',
'A','B','C','D','E','F'};
if (nibble > 0xf)
return '?';
return __tohex[nibble];
}
static unsigned long get_symbol(unsigned long addr, char **sym, char **sym_end)
{
unsigned long prev = 0, next;
char *psym = NULL, *p = __sym_map_start;
*sym = *sym_end = NULL;
while(p < __sym_map_end) {
next = strtoul(p, &p, 16) | SKIBOOT_BASE;
if (next > addr && prev <= addr) {
p = psym + 3;;
if (p >= __sym_map_end)
return 0;
*sym = p;
while(p < __sym_map_end && *p != 10)
p++;
*sym_end = p;
return prev;
}
prev = next;
psym = p;
while(p < __sym_map_end && *p != 10)
p++;
p++;
}
return 0;
}
size_t snprintf_symbol(char *buf, size_t len, uint64_t addr)
{
unsigned long saddr;
char *sym, *sym_end;
size_t l;
saddr = get_symbol(addr, &sym, &sym_end);
if (!saddr)
return 0;
if (len > sym_end - sym)
l = sym_end - sym;
else
l = len - 1;
memcpy(buf, sym, l);
/*
* This snprintf will insert the terminating NUL even if the
* symbol has used up the entire buffer less 1.
*/
l += snprintf(buf + l, len - l, "+0x%llx", addr - saddr);
return l;
}
|
