Merge branch 'vendor/GCC50' - gcc 5.0 snapshot 1 FEB 2015
[dragonfly.git] / contrib / gcc-5.0 / libgcc / config / aarch64 / linux-unwind.h
1 /* Copyright (C) 2009-2015 Free Software Foundation, Inc.
2    Contributed by ARM Ltd.
3
4    This file is free software; you can redistribute it and/or modify it
5    under the terms of the GNU General Public License as published by the
6    Free Software Foundation; either version 3, or (at your option) any
7    later version.
8
9    This file is distributed in the hope that it will be useful, but
10    WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    General Public License for more details.
13
14    Under Section 7 of GPL version 3, you are granted additional
15    permissions described in the GCC Runtime Library Exception, version
16    3.1, as published by the Free Software Foundation.
17
18    You should have received a copy of the GNU General Public License and
19    a copy of the GCC Runtime Library Exception along with this program;
20    see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
21    <http://www.gnu.org/licenses/>.  */
22
23 #ifndef inhibit_libc
24
25 #include <signal.h>
26 #include <sys/ucontext.h>
27
28
29 /* Since insns are always stored LE, on a BE system the opcodes will
30    be loaded byte-reversed.  Therefore, define two sets of opcodes,
31    one for LE and one for BE.  */
32
33 #if __AARCH64EB__
34 #define MOVZ_X8_8B      0x681180d2
35 #define SVC_0           0x010000d4
36 #else
37 #define MOVZ_X8_8B      0xd2801168
38 #define SVC_0           0xd4000001
39 #endif
40
41 #define MD_FALLBACK_FRAME_STATE_FOR aarch64_fallback_frame_state
42
43 static _Unwind_Reason_Code
44 aarch64_fallback_frame_state (struct _Unwind_Context *context,
45                               _Unwind_FrameState * fs)
46 {
47   /* The kernel creates an rt_sigframe on the stack immediately prior
48      to delivering a signal.
49
50      This structure must have the same shape as the linux kernel
51      equivalent.  */
52   struct rt_sigframe
53   {
54     siginfo_t info;
55     struct ucontext uc;
56   };
57
58   struct rt_sigframe *rt_;
59   _Unwind_Ptr new_cfa;
60   unsigned *pc = context->ra;
61   struct sigcontext *sc;
62   struct _aarch64_ctx *extension_marker;
63   int i;
64
65   /* A signal frame will have a return address pointing to
66      __default_sa_restorer. This code is hardwired as:
67
68      0xd2801168         movz x8, #0x8b
69      0xd4000001         svc  0x0
70    */
71   if (pc[0] != MOVZ_X8_8B || pc[1] != SVC_0)
72     {
73       return _URC_END_OF_STACK;
74     }
75
76   rt_ = context->cfa;
77   sc = &rt_->uc.uc_mcontext;
78
79 /* This define duplicates the definition in aarch64.md */
80 #define SP_REGNUM 31
81
82   new_cfa = (_Unwind_Ptr) sc;
83   fs->regs.cfa_how = CFA_REG_OFFSET;
84   fs->regs.cfa_reg = __LIBGCC_STACK_POINTER_REGNUM__;
85   fs->regs.cfa_offset = new_cfa - (_Unwind_Ptr) context->cfa;
86
87   for (i = 0; i < AARCH64_DWARF_NUMBER_R; i++)
88     {
89       fs->regs.reg[AARCH64_DWARF_R0 + i].how = REG_SAVED_OFFSET;
90       fs->regs.reg[AARCH64_DWARF_R0 + i].loc.offset =
91         (_Unwind_Ptr) & (sc->regs[i]) - new_cfa;
92     }
93
94   /* The core context may be extended with an arbitrary set of
95      additional contexts appended sequentially. Each additional
96      context contains a magic identifier and size in bytes.  The size
97      field can be used to skip over unrecognized context extensions.
98      The end of the context sequence is marked by a context with magic
99      0 or size 0.  */
100   for (extension_marker = (struct _aarch64_ctx *) &sc->__reserved;
101        extension_marker->magic;
102        extension_marker = (struct _aarch64_ctx *)
103        ((unsigned char *) extension_marker + extension_marker->size))
104     {
105       if (extension_marker->magic == FPSIMD_MAGIC)
106         {
107           struct fpsimd_context *ctx =
108             (struct fpsimd_context *) extension_marker;
109           int i;
110
111           for (i = 0; i < AARCH64_DWARF_NUMBER_V; i++)
112             {
113               _Unwind_Sword offset;
114
115               fs->regs.reg[AARCH64_DWARF_V0 + i].how = REG_SAVED_OFFSET;
116
117               /* sigcontext contains 32 128bit registers for V0 to
118                  V31.  The kernel will have saved the contents of the
119                  V registers.  We want to unwind the callee save D
120                  registers.  Each D register comprises the least
121                  significant half of the corresponding V register.  We
122                  need to offset into the saved V register dependent on
123                  our endianness to find the saved D register.  */
124
125               offset = (_Unwind_Ptr) & (ctx->vregs[i]) - new_cfa;
126
127               /* The endianness adjustment code below expects that a
128                  saved V register is 16 bytes.  */
129               gcc_assert (sizeof (ctx->vregs[0]) == 16);
130 #if defined (__AARCH64EB__)
131               offset = offset + 8;
132 #endif
133               fs->regs.reg[AARCH64_DWARF_V0 + i].loc.offset = offset;
134             }
135         }
136       else
137         {
138           /* There is context provided that we do not recognize!  */
139         }
140     }
141
142   fs->regs.reg[31].how = REG_SAVED_OFFSET;
143   fs->regs.reg[31].loc.offset = (_Unwind_Ptr) & (sc->sp) - new_cfa;
144
145   fs->signal_frame = 1;
146
147   fs->regs.reg[__LIBGCC_DWARF_ALT_FRAME_RETURN_COLUMN__].how =
148     REG_SAVED_VAL_OFFSET;
149   fs->regs.reg[__LIBGCC_DWARF_ALT_FRAME_RETURN_COLUMN__].loc.offset =
150     (_Unwind_Ptr) (sc->pc) - new_cfa;
151
152   fs->retaddr_column = __LIBGCC_DWARF_ALT_FRAME_RETURN_COLUMN__;
153
154   return _URC_NO_REASON;
155 }
156
157 #endif