1*38fd1498Szrj /* backtrace.c -- Entry point for stack backtrace library.
2*38fd1498Szrj Copyright (C) 2012-2018 Free Software Foundation, Inc.
3*38fd1498Szrj Written by Ian Lance Taylor, Google.
4*38fd1498Szrj
5*38fd1498Szrj Redistribution and use in source and binary forms, with or without
6*38fd1498Szrj modification, are permitted provided that the following conditions are
7*38fd1498Szrj met:
8*38fd1498Szrj
9*38fd1498Szrj (1) Redistributions of source code must retain the above copyright
10*38fd1498Szrj notice, this list of conditions and the following disclaimer.
11*38fd1498Szrj
12*38fd1498Szrj (2) Redistributions in binary form must reproduce the above copyright
13*38fd1498Szrj notice, this list of conditions and the following disclaimer in
14*38fd1498Szrj the documentation and/or other materials provided with the
15*38fd1498Szrj distribution.
16*38fd1498Szrj
17*38fd1498Szrj (3) The name of the author may not be used to
18*38fd1498Szrj endorse or promote products derived from this software without
19*38fd1498Szrj specific prior written permission.
20*38fd1498Szrj
21*38fd1498Szrj THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22*38fd1498Szrj IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
23*38fd1498Szrj WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
24*38fd1498Szrj DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
25*38fd1498Szrj INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
26*38fd1498Szrj (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
27*38fd1498Szrj SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28*38fd1498Szrj HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
29*38fd1498Szrj STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
30*38fd1498Szrj IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31*38fd1498Szrj POSSIBILITY OF SUCH DAMAGE. */
32*38fd1498Szrj
33*38fd1498Szrj #include "config.h"
34*38fd1498Szrj
35*38fd1498Szrj #include <sys/types.h>
36*38fd1498Szrj
37*38fd1498Szrj #include "unwind.h"
38*38fd1498Szrj #include "backtrace.h"
39*38fd1498Szrj #include "internal.h"
40*38fd1498Szrj
41*38fd1498Szrj /* The main backtrace_full routine. */
42*38fd1498Szrj
43*38fd1498Szrj /* Data passed through _Unwind_Backtrace. */
44*38fd1498Szrj
45*38fd1498Szrj struct backtrace_data
46*38fd1498Szrj {
47*38fd1498Szrj /* Number of frames to skip. */
48*38fd1498Szrj int skip;
49*38fd1498Szrj /* Library state. */
50*38fd1498Szrj struct backtrace_state *state;
51*38fd1498Szrj /* Callback routine. */
52*38fd1498Szrj backtrace_full_callback callback;
53*38fd1498Szrj /* Error callback routine. */
54*38fd1498Szrj backtrace_error_callback error_callback;
55*38fd1498Szrj /* Data to pass to callback routines. */
56*38fd1498Szrj void *data;
57*38fd1498Szrj /* Value to return from backtrace_full. */
58*38fd1498Szrj int ret;
59*38fd1498Szrj /* Whether there is any memory available. */
60*38fd1498Szrj int can_alloc;
61*38fd1498Szrj };
62*38fd1498Szrj
63*38fd1498Szrj /* Unwind library callback routine. This is passed to
64*38fd1498Szrj _Unwind_Backtrace. */
65*38fd1498Szrj
66*38fd1498Szrj static _Unwind_Reason_Code
unwind(struct _Unwind_Context * context,void * vdata)67*38fd1498Szrj unwind (struct _Unwind_Context *context, void *vdata)
68*38fd1498Szrj {
69*38fd1498Szrj struct backtrace_data *bdata = (struct backtrace_data *) vdata;
70*38fd1498Szrj uintptr_t pc;
71*38fd1498Szrj int ip_before_insn = 0;
72*38fd1498Szrj
73*38fd1498Szrj #ifdef HAVE_GETIPINFO
74*38fd1498Szrj pc = _Unwind_GetIPInfo (context, &ip_before_insn);
75*38fd1498Szrj #else
76*38fd1498Szrj pc = _Unwind_GetIP (context);
77*38fd1498Szrj #endif
78*38fd1498Szrj
79*38fd1498Szrj if (bdata->skip > 0)
80*38fd1498Szrj {
81*38fd1498Szrj --bdata->skip;
82*38fd1498Szrj return _URC_NO_REASON;
83*38fd1498Szrj }
84*38fd1498Szrj
85*38fd1498Szrj if (!ip_before_insn)
86*38fd1498Szrj --pc;
87*38fd1498Szrj
88*38fd1498Szrj if (!bdata->can_alloc)
89*38fd1498Szrj bdata->ret = bdata->callback (bdata->data, pc, NULL, 0, NULL);
90*38fd1498Szrj else
91*38fd1498Szrj bdata->ret = backtrace_pcinfo (bdata->state, pc, bdata->callback,
92*38fd1498Szrj bdata->error_callback, bdata->data);
93*38fd1498Szrj if (bdata->ret != 0)
94*38fd1498Szrj return _URC_END_OF_STACK;
95*38fd1498Szrj
96*38fd1498Szrj return _URC_NO_REASON;
97*38fd1498Szrj }
98*38fd1498Szrj
99*38fd1498Szrj /* Get a stack backtrace. */
100*38fd1498Szrj
101*38fd1498Szrj int
backtrace_full(struct backtrace_state * state,int skip,backtrace_full_callback callback,backtrace_error_callback error_callback,void * data)102*38fd1498Szrj backtrace_full (struct backtrace_state *state, int skip,
103*38fd1498Szrj backtrace_full_callback callback,
104*38fd1498Szrj backtrace_error_callback error_callback, void *data)
105*38fd1498Szrj {
106*38fd1498Szrj struct backtrace_data bdata;
107*38fd1498Szrj void *p;
108*38fd1498Szrj
109*38fd1498Szrj bdata.skip = skip + 1;
110*38fd1498Szrj bdata.state = state;
111*38fd1498Szrj bdata.callback = callback;
112*38fd1498Szrj bdata.error_callback = error_callback;
113*38fd1498Szrj bdata.data = data;
114*38fd1498Szrj bdata.ret = 0;
115*38fd1498Szrj
116*38fd1498Szrj /* If we can't allocate any memory at all, don't try to produce
117*38fd1498Szrj file/line information. */
118*38fd1498Szrj p = backtrace_alloc (state, 4096, NULL, NULL);
119*38fd1498Szrj if (p == NULL)
120*38fd1498Szrj bdata.can_alloc = 0;
121*38fd1498Szrj else
122*38fd1498Szrj {
123*38fd1498Szrj backtrace_free (state, p, 4096, NULL, NULL);
124*38fd1498Szrj bdata.can_alloc = 1;
125*38fd1498Szrj }
126*38fd1498Szrj
127*38fd1498Szrj _Unwind_Backtrace (unwind, &bdata);
128*38fd1498Szrj return bdata.ret;
129*38fd1498Szrj }
130