1 //===-- sanitizer_unwind_linux_libcdep.cpp --------------------------------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 //
9 // This file contains the unwind.h-based (aka "slow") stack unwinding routines
10 // available to the tools on Linux, Android, NetBSD, FreeBSD, and Solaris.
11 //===----------------------------------------------------------------------===//
12
13 #include "sanitizer_platform.h"
14 #if SANITIZER_FREEBSD || SANITIZER_LINUX || SANITIZER_NETBSD || \
15 SANITIZER_SOLARIS
16 #include "sanitizer_common.h"
17 #include "sanitizer_stacktrace.h"
18
19 #if SANITIZER_ANDROID
20 #include <dlfcn.h> // for dlopen()
21 #endif
22
23 #if SANITIZER_FREEBSD
24 #define _GNU_SOURCE // to declare _Unwind_Backtrace() from <unwind.h>
25 #endif
26 #include <unwind.h>
27
28 namespace __sanitizer {
29
30 namespace {
31
32 //---------------------------- UnwindSlow --------------------------------------
33
34 typedef struct {
35 uptr absolute_pc;
36 uptr stack_top;
37 uptr stack_size;
38 } backtrace_frame_t;
39
40 extern "C" {
41 typedef void *(*acquire_my_map_info_list_func)();
42 typedef void (*release_my_map_info_list_func)(void *map);
43 typedef sptr (*unwind_backtrace_signal_arch_func)(
44 void *siginfo, void *sigcontext, void *map_info_list,
45 backtrace_frame_t *backtrace, uptr ignore_depth, uptr max_depth);
46 acquire_my_map_info_list_func acquire_my_map_info_list;
47 release_my_map_info_list_func release_my_map_info_list;
48 unwind_backtrace_signal_arch_func unwind_backtrace_signal_arch;
49 } // extern "C"
50
51 #if defined(__arm__) && !SANITIZER_NETBSD
52 // NetBSD uses dwarf EH
53 #define UNWIND_STOP _URC_END_OF_STACK
54 #define UNWIND_CONTINUE _URC_NO_REASON
55 #else
56 #define UNWIND_STOP _URC_NORMAL_STOP
57 #define UNWIND_CONTINUE _URC_NO_REASON
58 #endif
59
Unwind_GetIP(struct _Unwind_Context * ctx)60 uptr Unwind_GetIP(struct _Unwind_Context *ctx) {
61 #if defined(__arm__) && !SANITIZER_MAC
62 uptr val;
63 _Unwind_VRS_Result res = _Unwind_VRS_Get(ctx, _UVRSC_CORE,
64 15 /* r15 = PC */, _UVRSD_UINT32, &val);
65 CHECK(res == _UVRSR_OK && "_Unwind_VRS_Get failed");
66 // Clear the Thumb bit.
67 return val & ~(uptr)1;
68 #else
69 return (uptr)_Unwind_GetIP(ctx);
70 #endif
71 }
72
73 struct UnwindTraceArg {
74 BufferedStackTrace *stack;
75 u32 max_depth;
76 };
77
Unwind_Trace(struct _Unwind_Context * ctx,void * param)78 _Unwind_Reason_Code Unwind_Trace(struct _Unwind_Context *ctx, void *param) {
79 UnwindTraceArg *arg = (UnwindTraceArg*)param;
80 CHECK_LT(arg->stack->size, arg->max_depth);
81 uptr pc = Unwind_GetIP(ctx);
82 const uptr kPageSize = GetPageSizeCached();
83 // Let's assume that any pointer in the 0th page (i.e. <0x1000 on i386 and
84 // x86_64) is invalid and stop unwinding here. If we're adding support for
85 // a platform where this isn't true, we need to reconsider this check.
86 if (pc < kPageSize) return UNWIND_STOP;
87 arg->stack->trace_buffer[arg->stack->size++] = pc;
88 if (arg->stack->size == arg->max_depth) return UNWIND_STOP;
89 return UNWIND_CONTINUE;
90 }
91
92 } // namespace
93
94 #if SANITIZER_ANDROID
SanitizerInitializeUnwinder()95 void SanitizerInitializeUnwinder() {
96 if (AndroidGetApiLevel() >= ANDROID_LOLLIPOP_MR1) return;
97
98 // Pre-lollipop Android can not unwind through signal handler frames with
99 // libgcc unwinder, but it has a libcorkscrew.so library with the necessary
100 // workarounds.
101 void *p = dlopen("libcorkscrew.so", RTLD_LAZY);
102 if (!p) {
103 VReport(1,
104 "Failed to open libcorkscrew.so. You may see broken stack traces "
105 "in SEGV reports.");
106 return;
107 }
108 acquire_my_map_info_list =
109 (acquire_my_map_info_list_func)(uptr)dlsym(p, "acquire_my_map_info_list");
110 release_my_map_info_list =
111 (release_my_map_info_list_func)(uptr)dlsym(p, "release_my_map_info_list");
112 unwind_backtrace_signal_arch = (unwind_backtrace_signal_arch_func)(uptr)dlsym(
113 p, "unwind_backtrace_signal_arch");
114 if (!acquire_my_map_info_list || !release_my_map_info_list ||
115 !unwind_backtrace_signal_arch) {
116 VReport(1,
117 "Failed to find one of the required symbols in libcorkscrew.so. "
118 "You may see broken stack traces in SEGV reports.");
119 acquire_my_map_info_list = 0;
120 unwind_backtrace_signal_arch = 0;
121 release_my_map_info_list = 0;
122 }
123 }
124 #endif
125
UnwindSlow(uptr pc,u32 max_depth)126 void BufferedStackTrace::UnwindSlow(uptr pc, u32 max_depth) {
127 CHECK_GE(max_depth, 2);
128 size = 0;
129 UnwindTraceArg arg = {this, Min(max_depth + 1, kStackTraceMax)};
130 _Unwind_Backtrace(Unwind_Trace, &arg);
131 // We need to pop a few frames so that pc is on top.
132 uptr to_pop = LocatePcInTrace(pc);
133 // trace_buffer[0] belongs to the current function so we always pop it,
134 // unless there is only 1 frame in the stack trace (1 frame is always better
135 // than 0!).
136 // 1-frame stacks don't normally happen, but this depends on the actual
137 // unwinder implementation (libgcc, libunwind, etc) which is outside of our
138 // control.
139 if (to_pop == 0 && size > 1)
140 to_pop = 1;
141 PopStackFrames(to_pop);
142 #if defined(__GNUC__) && defined(__sparc__)
143 // __builtin_return_address returns the address of the call instruction
144 // on the SPARC and not the return address, so we need to compensate.
145 trace_buffer[0] = GetNextInstructionPc(pc);
146 #else
147 trace_buffer[0] = pc;
148 #endif
149 }
150
UnwindSlow(uptr pc,void * context,u32 max_depth)151 void BufferedStackTrace::UnwindSlow(uptr pc, void *context, u32 max_depth) {
152 CHECK(context);
153 CHECK_GE(max_depth, 2);
154 if (!unwind_backtrace_signal_arch) {
155 UnwindSlow(pc, max_depth);
156 return;
157 }
158
159 void *map = acquire_my_map_info_list();
160 CHECK(map);
161 InternalMmapVector<backtrace_frame_t> frames(kStackTraceMax);
162 // siginfo argument appears to be unused.
163 sptr res = unwind_backtrace_signal_arch(/* siginfo */ 0, context, map,
164 frames.data(),
165 /* ignore_depth */ 0, max_depth);
166 release_my_map_info_list(map);
167 if (res < 0) return;
168 CHECK_LE((uptr)res, kStackTraceMax);
169
170 size = 0;
171 // +2 compensate for libcorkscrew unwinder returning addresses of call
172 // instructions instead of raw return addresses.
173 for (sptr i = 0; i < res; ++i)
174 trace_buffer[size++] = frames[i].absolute_pc + 2;
175 }
176
177 } // namespace __sanitizer
178
179 #endif // SANITIZER_FREEBSD || SANITIZER_LINUX || SANITIZER_NETBSD ||
180 // SANITIZER_SOLARIS
181