xref: /dflybsd-src/contrib/gcc-8.0/libbacktrace/simple.c (revision 38fd149817dfbff97799f62fcb70be98c4e32523)
1*38fd1498Szrj /* simple.c -- The backtrace_simple function.
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 "unwind.h"
36*38fd1498Szrj #include "backtrace.h"
37*38fd1498Szrj 
38*38fd1498Szrj /* The simple_backtrace routine.  */
39*38fd1498Szrj 
40*38fd1498Szrj /* Data passed through _Unwind_Backtrace.  */
41*38fd1498Szrj 
42*38fd1498Szrj struct backtrace_simple_data
43*38fd1498Szrj {
44*38fd1498Szrj   /* Number of frames to skip.  */
45*38fd1498Szrj   int skip;
46*38fd1498Szrj   /* Library state.  */
47*38fd1498Szrj   struct backtrace_state *state;
48*38fd1498Szrj   /* Callback routine.  */
49*38fd1498Szrj   backtrace_simple_callback callback;
50*38fd1498Szrj   /* Error callback routine.  */
51*38fd1498Szrj   backtrace_error_callback error_callback;
52*38fd1498Szrj   /* Data to pass to callback routine.  */
53*38fd1498Szrj   void *data;
54*38fd1498Szrj   /* Value to return from backtrace.  */
55*38fd1498Szrj   int ret;
56*38fd1498Szrj };
57*38fd1498Szrj 
58*38fd1498Szrj /* Unwind library callback routine.  This is passd to
59*38fd1498Szrj    _Unwind_Backtrace.  */
60*38fd1498Szrj 
61*38fd1498Szrj static _Unwind_Reason_Code
simple_unwind(struct _Unwind_Context * context,void * vdata)62*38fd1498Szrj simple_unwind (struct _Unwind_Context *context, void *vdata)
63*38fd1498Szrj {
64*38fd1498Szrj   struct backtrace_simple_data *bdata = (struct backtrace_simple_data *) vdata;
65*38fd1498Szrj   uintptr_t pc;
66*38fd1498Szrj   int ip_before_insn = 0;
67*38fd1498Szrj 
68*38fd1498Szrj #ifdef HAVE_GETIPINFO
69*38fd1498Szrj   pc = _Unwind_GetIPInfo (context, &ip_before_insn);
70*38fd1498Szrj #else
71*38fd1498Szrj   pc = _Unwind_GetIP (context);
72*38fd1498Szrj #endif
73*38fd1498Szrj 
74*38fd1498Szrj   if (bdata->skip > 0)
75*38fd1498Szrj     {
76*38fd1498Szrj       --bdata->skip;
77*38fd1498Szrj       return _URC_NO_REASON;
78*38fd1498Szrj     }
79*38fd1498Szrj 
80*38fd1498Szrj   if (!ip_before_insn)
81*38fd1498Szrj     --pc;
82*38fd1498Szrj 
83*38fd1498Szrj   bdata->ret = bdata->callback (bdata->data, pc);
84*38fd1498Szrj 
85*38fd1498Szrj   if (bdata->ret != 0)
86*38fd1498Szrj     return _URC_END_OF_STACK;
87*38fd1498Szrj 
88*38fd1498Szrj   return _URC_NO_REASON;
89*38fd1498Szrj }
90*38fd1498Szrj 
91*38fd1498Szrj /* Get a simple stack backtrace.  */
92*38fd1498Szrj 
93*38fd1498Szrj int
backtrace_simple(struct backtrace_state * state,int skip,backtrace_simple_callback callback,backtrace_error_callback error_callback,void * data)94*38fd1498Szrj backtrace_simple (struct backtrace_state *state, int skip,
95*38fd1498Szrj 		  backtrace_simple_callback callback,
96*38fd1498Szrj 		  backtrace_error_callback error_callback, void *data)
97*38fd1498Szrj {
98*38fd1498Szrj   struct backtrace_simple_data bdata;
99*38fd1498Szrj 
100*38fd1498Szrj   bdata.skip = skip + 1;
101*38fd1498Szrj   bdata.state = state;
102*38fd1498Szrj   bdata.callback = callback;
103*38fd1498Szrj   bdata.error_callback = error_callback;
104*38fd1498Szrj   bdata.data = data;
105*38fd1498Szrj   bdata.ret = 0;
106*38fd1498Szrj   _Unwind_Backtrace (simple_unwind, &bdata);
107*38fd1498Szrj   return bdata.ret;
108*38fd1498Szrj }
109