gdb/fortran: Use floatformats_ia64_quad for fortran 16-byte floats
[external/binutils.git] / gdb / amd64-sol2-tdep.c
1 /* Target-dependent code for AMD64 Solaris.
2
3    Copyright (C) 2001-2019 Free Software Foundation, Inc.
4
5    Contributed by Joseph Myers, CodeSourcery, LLC.
6
7    This file is part of GDB.
8
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
21
22 #include "defs.h"
23 #include "frame.h"
24 #include "gdbcore.h"
25 #include "regcache.h"
26 #include "osabi.h"
27 #include "symtab.h"
28
29 #include "sol2-tdep.h"
30 #include "amd64-tdep.h"
31 #include "common/x86-xstate.h"
32 #include "solib-svr4.h"
33
34 /* Mapping between the general-purpose registers in gregset_t format
35    and GDB's register cache layout.  */
36
37 /* From <sys/regset.h>.  */
38 static int amd64_sol2_gregset_reg_offset[] = {
39   14 * 8,                       /* %rax */
40   11 * 8,                       /* %rbx */
41   13 * 8,                       /* %rcx */
42   12 * 8,                       /* %rdx */
43   9 * 8,                        /* %rsi */
44   8 * 8,                        /* %rdi */
45   10 * 8,                       /* %rbp */
46   20 * 8,                       /* %rsp */
47   7 * 8,                        /* %r8 ...  */
48   6 * 8,
49   5 * 8,
50   4 * 8,
51   3 * 8,
52   2 * 8,
53   1 * 8,
54   0 * 8,                        /* ... %r15 */
55   17 * 8,                       /* %rip */
56   19 * 8,                       /* %eflags */
57   18 * 8,                       /* %cs */
58   21 * 8,                       /* %ss */
59   25 * 8,                       /* %ds */
60   24 * 8,                       /* %es */
61   22 * 8,                       /* %fs */
62   23 * 8                        /* %gs */
63 };
64 \f
65
66 /* Return whether THIS_FRAME corresponds to a Solaris sigtramp
67    routine.  */
68
69 static int
70 amd64_sol2_sigtramp_p (struct frame_info *this_frame)
71 {
72   CORE_ADDR pc = get_frame_pc (this_frame);
73   const char *name;
74
75   find_pc_partial_function (pc, &name, NULL, NULL);
76   return (name && (strcmp ("sigacthandler", name) == 0
77                    || strcmp (name, "ucbsigvechandler") == 0
78                    || strcmp (name, "__sighndlr") == 0));
79 }
80
81 /* Solaris doesn't have a 'struct sigcontext', but it does have a
82    'mcontext_t' that contains the saved set of machine registers.  */
83
84 static CORE_ADDR
85 amd64_sol2_mcontext_addr (struct frame_info *this_frame)
86 {
87   CORE_ADDR sp, ucontext_addr;
88
89   sp = get_frame_register_unsigned (this_frame, AMD64_RSP_REGNUM);
90   ucontext_addr = get_frame_memory_unsigned (this_frame, sp + 8, 8);
91
92   return ucontext_addr + 72;
93 }
94
95 static void
96 amd64_sol2_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
97 {
98   struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
99
100   tdep->gregset_reg_offset = amd64_sol2_gregset_reg_offset;
101   tdep->gregset_num_regs = ARRAY_SIZE (amd64_sol2_gregset_reg_offset);
102   tdep->sizeof_gregset = 28 * 8;
103
104   amd64_init_abi (info, gdbarch,
105                   amd64_target_description (X86_XSTATE_SSE_MASK, true));
106
107   tdep->sigtramp_p = amd64_sol2_sigtramp_p;
108   tdep->sigcontext_addr = amd64_sol2_mcontext_addr;
109   tdep->sc_reg_offset = tdep->gregset_reg_offset;
110   tdep->sc_num_regs = tdep->gregset_num_regs;
111
112   /* Solaris uses SVR4-style shared libraries.  */
113   set_gdbarch_skip_solib_resolver (gdbarch, sol2_skip_solib_resolver);
114   set_solib_svr4_fetch_link_map_offsets
115     (gdbarch, svr4_lp64_fetch_link_map_offsets);
116
117   /* How to print LWP PTIDs from core files.  */
118   set_gdbarch_core_pid_to_str (gdbarch, sol2_core_pid_to_str);
119 }
120
121 void
122 _initialize_amd64_sol2_tdep (void)
123 {
124   gdbarch_register_osabi (bfd_arch_i386, bfd_mach_x86_64,
125                           GDB_OSABI_SOLARIS, amd64_sol2_init_abi);
126 }