Commit | Line | Data |
---|---|---|
efd59e3f | 1 | /* Target-dependent code for FreeBSD/Alpha. |
4be87837 | 2 | Copyright 2001, 2002, 2003 Free Software Foundation, Inc. |
efd59e3f MK |
3 | |
4 | This file is part of GDB. | |
5 | ||
6 | This program is free software; you can redistribute it and/or modify | |
7 | it under the terms of the GNU General Public License as published by | |
8 | the Free Software Foundation; either version 2 of the License, or | |
9 | (at your option) any later version. | |
10 | ||
11 | This program is distributed in the hope that it will be useful, | |
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | GNU General Public License for more details. | |
15 | ||
16 | You should have received a copy of the GNU General Public License | |
17 | along with this program; if not, write to the Free Software | |
18 | Foundation, Inc., 59 Temple Place - Suite 330, | |
19 | Boston, MA 02111-1307, USA. */ | |
20 | ||
21 | #include "defs.h" | |
22 | #include "value.h" | |
4be87837 | 23 | #include "osabi.h" |
efd59e3f | 24 | |
82a4efa1 JT |
25 | #include "alpha-tdep.h" |
26 | ||
27 | static int | |
efd59e3f MK |
28 | alphafbsd_use_struct_convention (int gcc_p, struct type *type) |
29 | { | |
30 | enum type_code code; | |
31 | int i; | |
32 | ||
33 | /* All aggregate types that won't fit in a register must be returned | |
34 | in memory. */ | |
138e7be5 | 35 | if (TYPE_LENGTH (type) > ALPHA_REGISTER_SIZE) |
efd59e3f MK |
36 | return 1; |
37 | ||
38 | /* The only aggregate types that can be returned in a register are | |
39 | structs and unions. Arrays must be returned in memory. */ | |
40 | code = TYPE_CODE (type); | |
41 | if (code != TYPE_CODE_STRUCT && code != TYPE_CODE_UNION) | |
42 | return 1; | |
43 | ||
44 | /* We need to check if this struct/union is "integer" like. For | |
45 | this to be true, the offset of each adressable subfield must be | |
46 | zero. Note that bit fields are not addressable. */ | |
47 | for (i = 0; i < TYPE_NFIELDS (type); i++) | |
48 | { | |
49 | /* If the field bitsize is non-zero, it isn't adressable. */ | |
50 | if (TYPE_FIELD_BITPOS (type, i) != 0 | |
51 | && TYPE_FIELD_BITSIZE (type, i) == 0) | |
52 | return 1; | |
53 | } | |
54 | ||
55 | return 0; | |
56 | } | |
138e7be5 MK |
57 | \f |
58 | ||
59 | /* Support for signal handlers. */ | |
60 | ||
61 | /* Return whether PC is in a BSD sigtramp routine. */ | |
62 | ||
63 | CORE_ADDR alphafbsd_sigtramp_start = 0x11ffff68; | |
64 | CORE_ADDR alphafbsd_sigtramp_end = 0x11ffffe0; | |
82a4efa1 | 65 | |
6c72f9f9 JT |
66 | static int |
67 | alphafbsd_pc_in_sigtramp (CORE_ADDR pc, char *func_name) | |
68 | { | |
138e7be5 | 69 | return (pc >= alphafbsd_sigtramp_start && pc < alphafbsd_sigtramp_end); |
6c72f9f9 JT |
70 | } |
71 | ||
138e7be5 MK |
72 | static LONGEST |
73 | alphafbsd_sigtramp_offset (CORE_ADDR pc) | |
74 | { | |
75 | return pc - alphafbsd_sigtramp_start; | |
76 | } | |
77 | ||
78 | /* Assuming NEXT_FRAME is for a frame following a BSD sigtramp | |
79 | routine, return the address of the associated sigcontext structure. */ | |
80 | ||
81 | static CORE_ADDR | |
82 | alphafbsd_sigcontext_addr (struct frame_info *next_frame) | |
83 | { | |
84 | ULONGEST sp; | |
85 | ||
86 | frame_unwind_unsigned_register (next_frame, ALPHA_SP_REGNUM, &sp); | |
87 | return sp + 24; | |
88 | } | |
89 | ||
90 | /* FreeBSD 5.0-RELEASE or later. */ | |
91 | ||
82a4efa1 JT |
92 | static void |
93 | alphafbsd_init_abi (struct gdbarch_info info, | |
94 | struct gdbarch *gdbarch) | |
95 | { | |
96 | struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch); | |
97 | ||
baa490c4 RH |
98 | /* Hook into the DWARF CFI frame unwinder. */ |
99 | alpha_dwarf2_init_abi (info, gdbarch); | |
100 | ||
101 | /* Hook into the MDEBUG frame unwinder. */ | |
102 | alpha_mdebug_init_abi (info, gdbarch); | |
103 | ||
138e7be5 MK |
104 | set_gdbarch_use_struct_convention (gdbarch, alphafbsd_use_struct_convention); |
105 | ||
6c72f9f9 JT |
106 | set_gdbarch_pc_in_sigtramp (gdbarch, alphafbsd_pc_in_sigtramp); |
107 | ||
138e7be5 MK |
108 | tdep->dynamic_sigtramp_offset = alphafbsd_sigtramp_offset; |
109 | tdep->sigcontext_addr = alphafbsd_sigcontext_addr; | |
110 | tdep->sc_pc_offset = 288; | |
111 | tdep->sc_regs_offset = 24; | |
112 | tdep->sc_fpregs_offset = 320; | |
accc6d1f JT |
113 | |
114 | tdep->jb_pc = 2; | |
115 | tdep->jb_elt_size = 8; | |
82a4efa1 | 116 | } |
138e7be5 MK |
117 | \f |
118 | ||
119 | /* Provide a prototype to silence -Wmissing-prototypes. */ | |
120 | void _initialize_alphafbsd_tdep (void); | |
82a4efa1 JT |
121 | |
122 | void | |
123 | _initialize_alphafbsd_tdep (void) | |
124 | { | |
05816f70 | 125 | gdbarch_register_osabi (bfd_arch_alpha, 0, GDB_OSABI_FREEBSD_ELF, |
70f80edf | 126 | alphafbsd_init_abi); |
82a4efa1 | 127 | } |