Mercurial > hg > CbC > CbC_gcc
annotate gcc/unwind-dw2-fde-glibc.c @ 67:f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
| author | nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> |
|---|---|
| date | Tue, 22 Mar 2011 17:18:12 +0900 |
| parents | 77e2b8dfacca |
| children |
| rev | line source |
|---|---|
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
1 /* Copyright (C) 2001, 2002, 2003, 2004, 2005, 2009, 2010 |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
2 Free Software Foundation, Inc. |
| 0 | 3 Contributed by Jakub Jelinek <jakub@redhat.com>. |
| 4 | |
| 5 This file is part of GCC. | |
| 6 | |
| 7 GCC is free software; you can redistribute it and/or modify | |
| 8 it under the terms of the GNU General Public License as published by | |
| 9 the Free Software Foundation; either version 3, or (at your option) | |
| 10 any later version. | |
| 11 | |
| 12 GCC is distributed in the hope that it will be useful, | |
| 13 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 15 GNU General Public License for more details. | |
| 16 | |
| 17 Under Section 7 of GPL version 3, you are granted additional | |
| 18 permissions described in the GCC Runtime Library Exception, version | |
| 19 3.1, as published by the Free Software Foundation. | |
| 20 | |
| 21 You should have received a copy of the GNU General Public License and | |
| 22 a copy of the GCC Runtime Library Exception along with this program; | |
| 23 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see | |
| 24 <http://www.gnu.org/licenses/>. */ | |
| 25 | |
| 26 /* Locate the FDE entry for a given address, using PT_GNU_EH_FRAME ELF | |
| 27 segment and dl_iterate_phdr to avoid register/deregister calls at | |
| 28 DSO load/unload. */ | |
| 29 | |
| 30 #ifndef _GNU_SOURCE | |
| 31 #define _GNU_SOURCE 1 | |
| 32 #endif | |
| 33 | |
| 34 #include "tconfig.h" | |
| 35 #include "tsystem.h" | |
| 36 #ifndef inhibit_libc | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
37 #include <elf.h> /* Get DT_CONFIG. */ |
| 0 | 38 #endif |
| 39 #include "coretypes.h" | |
| 40 #include "tm.h" | |
| 41 #include "dwarf2.h" | |
| 42 #include "unwind.h" | |
| 43 #define NO_BASE_OF_ENCODED_VALUE | |
| 44 #include "unwind-pe.h" | |
| 45 #include "unwind-dw2-fde.h" | |
| 46 #include "unwind-compat.h" | |
| 47 #include "gthr.h" | |
| 48 | |
| 49 #if !defined(inhibit_libc) && defined(HAVE_LD_EH_FRAME_HDR) \ | |
| 50 && (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ > 2) \ | |
| 51 || (__GLIBC__ == 2 && __GLIBC_MINOR__ == 2 && defined(DT_CONFIG))) | |
|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
52 # define USE_PT_GNU_EH_FRAME |
|
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
53 #endif |
|
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
54 |
|
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
55 #if !defined(inhibit_libc) && defined(HAVE_LD_EH_FRAME_HDR) \ |
|
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
56 && defined(__FreeBSD__) && __FreeBSD__ >= 7 |
|
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
57 # define ElfW __ElfN |
|
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
58 # define USE_PT_GNU_EH_FRAME |
|
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
59 #endif |
|
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
60 |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
61 #if !defined(inhibit_libc) && defined(HAVE_LD_EH_FRAME_HDR) \ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
62 && defined(TARGET_DL_ITERATE_PHDR) \ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
63 && defined(__sun__) && defined(__svr4__) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
64 # define USE_PT_GNU_EH_FRAME |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
65 #endif |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
66 |
|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
67 #if defined(USE_PT_GNU_EH_FRAME) |
| 0 | 68 |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
69 #include <link.h> |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
70 |
| 0 | 71 #ifndef __RELOC_POINTER |
| 72 # define __RELOC_POINTER(ptr, base) ((ptr) + (base)) | |
| 73 #endif | |
| 74 | |
| 75 static const fde * _Unwind_Find_registered_FDE (void *pc, struct dwarf_eh_bases *bases); | |
| 76 | |
| 77 #define _Unwind_Find_FDE _Unwind_Find_registered_FDE | |
| 78 #include "unwind-dw2-fde.c" | |
| 79 #undef _Unwind_Find_FDE | |
| 80 | |
| 81 #ifndef PT_GNU_EH_FRAME | |
| 82 #define PT_GNU_EH_FRAME (PT_LOOS + 0x474e550) | |
| 83 #endif | |
| 84 | |
| 85 struct unw_eh_callback_data | |
| 86 { | |
| 87 _Unwind_Ptr pc; | |
| 88 void *tbase; | |
| 89 void *dbase; | |
| 90 void *func; | |
| 91 const fde *ret; | |
| 92 int check_cache; | |
| 93 }; | |
| 94 | |
| 95 struct unw_eh_frame_hdr | |
| 96 { | |
| 97 unsigned char version; | |
| 98 unsigned char eh_frame_ptr_enc; | |
| 99 unsigned char fde_count_enc; | |
| 100 unsigned char table_enc; | |
| 101 }; | |
| 102 | |
| 103 #define FRAME_HDR_CACHE_SIZE 8 | |
| 104 | |
| 105 static struct frame_hdr_cache_element | |
| 106 { | |
| 107 _Unwind_Ptr pc_low; | |
| 108 _Unwind_Ptr pc_high; | |
| 109 _Unwind_Ptr load_base; | |
| 110 const ElfW(Phdr) *p_eh_frame_hdr; | |
| 111 const ElfW(Phdr) *p_dynamic; | |
| 112 struct frame_hdr_cache_element *link; | |
| 113 } frame_hdr_cache[FRAME_HDR_CACHE_SIZE]; | |
| 114 | |
| 115 static struct frame_hdr_cache_element *frame_hdr_cache_head; | |
| 116 | |
| 117 /* Like base_of_encoded_value, but take the base from a struct | |
| 118 unw_eh_callback_data instead of an _Unwind_Context. */ | |
| 119 | |
| 120 static _Unwind_Ptr | |
| 121 base_from_cb_data (unsigned char encoding, struct unw_eh_callback_data *data) | |
| 122 { | |
| 123 if (encoding == DW_EH_PE_omit) | |
| 124 return 0; | |
| 125 | |
| 126 switch (encoding & 0x70) | |
| 127 { | |
| 128 case DW_EH_PE_absptr: | |
| 129 case DW_EH_PE_pcrel: | |
| 130 case DW_EH_PE_aligned: | |
| 131 return 0; | |
| 132 | |
| 133 case DW_EH_PE_textrel: | |
| 134 return (_Unwind_Ptr) data->tbase; | |
| 135 case DW_EH_PE_datarel: | |
| 136 return (_Unwind_Ptr) data->dbase; | |
| 137 default: | |
| 138 gcc_unreachable (); | |
| 139 } | |
| 140 } | |
| 141 | |
| 142 static int | |
| 143 _Unwind_IteratePhdrCallback (struct dl_phdr_info *info, size_t size, void *ptr) | |
| 144 { | |
| 145 struct unw_eh_callback_data *data = (struct unw_eh_callback_data *) ptr; | |
| 146 const ElfW(Phdr) *phdr, *p_eh_frame_hdr, *p_dynamic; | |
| 147 long n, match; | |
| 148 #ifdef __FRV_FDPIC__ | |
| 149 struct elf32_fdpic_loadaddr load_base; | |
| 150 #else | |
| 151 _Unwind_Ptr load_base; | |
| 152 #endif | |
| 153 const unsigned char *p; | |
| 154 const struct unw_eh_frame_hdr *hdr; | |
| 155 _Unwind_Ptr eh_frame; | |
| 156 struct object ob; | |
|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
157 _Unwind_Ptr pc_low = 0, pc_high = 0; |
|
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
158 |
| 0 | 159 struct ext_dl_phdr_info |
| 160 { | |
| 161 ElfW(Addr) dlpi_addr; | |
| 162 const char *dlpi_name; | |
| 163 const ElfW(Phdr) *dlpi_phdr; | |
| 164 ElfW(Half) dlpi_phnum; | |
| 165 unsigned long long int dlpi_adds; | |
| 166 unsigned long long int dlpi_subs; | |
| 167 }; | |
| 168 | |
| 169 match = 0; | |
| 170 phdr = info->dlpi_phdr; | |
| 171 load_base = info->dlpi_addr; | |
| 172 p_eh_frame_hdr = NULL; | |
| 173 p_dynamic = NULL; | |
| 174 | |
| 175 struct frame_hdr_cache_element *prev_cache_entry = NULL, | |
| 176 *last_cache_entry = NULL; | |
| 177 | |
| 178 if (data->check_cache && size >= sizeof (struct ext_dl_phdr_info)) | |
| 179 { | |
| 180 static unsigned long long adds = -1ULL, subs; | |
| 181 struct ext_dl_phdr_info *einfo = (struct ext_dl_phdr_info *) info; | |
| 182 | |
| 183 /* We use a least recently used cache replacement policy. Also, | |
| 184 the most recently used cache entries are placed at the head | |
| 185 of the search chain. */ | |
| 186 | |
| 187 if (einfo->dlpi_adds == adds && einfo->dlpi_subs == subs) | |
| 188 { | |
| 189 /* Find data->pc in shared library cache. | |
| 190 Set load_base, p_eh_frame_hdr and p_dynamic | |
| 191 plus match from the cache and goto | |
| 192 "Read .eh_frame_hdr header." below. */ | |
| 193 | |
| 194 struct frame_hdr_cache_element *cache_entry; | |
| 195 | |
| 196 for (cache_entry = frame_hdr_cache_head; | |
| 197 cache_entry; | |
| 198 cache_entry = cache_entry->link) | |
| 199 { | |
| 200 if (data->pc >= cache_entry->pc_low | |
| 201 && data->pc < cache_entry->pc_high) | |
| 202 { | |
| 203 load_base = cache_entry->load_base; | |
| 204 p_eh_frame_hdr = cache_entry->p_eh_frame_hdr; | |
| 205 p_dynamic = cache_entry->p_dynamic; | |
| 206 | |
| 207 /* And move the entry we're using to the head. */ | |
| 208 if (cache_entry != frame_hdr_cache_head) | |
| 209 { | |
| 210 prev_cache_entry->link = cache_entry->link; | |
| 211 cache_entry->link = frame_hdr_cache_head; | |
| 212 frame_hdr_cache_head = cache_entry; | |
| 213 } | |
| 214 goto found; | |
| 215 } | |
|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
216 |
| 0 | 217 last_cache_entry = cache_entry; |
| 218 /* Exit early if we found an unused entry. */ | |
| 219 if ((cache_entry->pc_low | cache_entry->pc_high) == 0) | |
| 220 break; | |
| 221 if (cache_entry->link != NULL) | |
|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
222 prev_cache_entry = cache_entry; |
| 0 | 223 } |
| 224 } | |
| 225 else | |
| 226 { | |
| 227 adds = einfo->dlpi_adds; | |
| 228 subs = einfo->dlpi_subs; | |
| 229 /* Initialize the cache. Create a chain of cache entries, | |
| 230 with the final one terminated by a NULL link. */ | |
| 231 int i; | |
| 232 for (i = 0; i < FRAME_HDR_CACHE_SIZE; i++) | |
| 233 { | |
| 234 frame_hdr_cache[i].pc_low = 0; | |
| 235 frame_hdr_cache[i].pc_high = 0; | |
| 236 frame_hdr_cache[i].link = &frame_hdr_cache[i+1]; | |
| 237 } | |
| 238 frame_hdr_cache[i-1].link = NULL; | |
| 239 frame_hdr_cache_head = &frame_hdr_cache[0]; | |
| 240 data->check_cache = 0; | |
| 241 } | |
| 242 } | |
| 243 | |
| 244 /* Make sure struct dl_phdr_info is at least as big as we need. */ | |
| 245 if (size < offsetof (struct dl_phdr_info, dlpi_phnum) | |
| 246 + sizeof (info->dlpi_phnum)) | |
| 247 return -1; | |
| 248 | |
| 249 /* See if PC falls into one of the loaded segments. Find the eh_frame | |
| 250 segment at the same time. */ | |
| 251 for (n = info->dlpi_phnum; --n >= 0; phdr++) | |
| 252 { | |
| 253 if (phdr->p_type == PT_LOAD) | |
| 254 { | |
| 255 _Unwind_Ptr vaddr = (_Unwind_Ptr) | |
| 256 __RELOC_POINTER (phdr->p_vaddr, load_base); | |
| 257 if (data->pc >= vaddr && data->pc < vaddr + phdr->p_memsz) | |
| 258 { | |
| 259 match = 1; | |
| 260 pc_low = vaddr; | |
| 261 pc_high = vaddr + phdr->p_memsz; | |
| 262 } | |
| 263 } | |
| 264 else if (phdr->p_type == PT_GNU_EH_FRAME) | |
| 265 p_eh_frame_hdr = phdr; | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
266 #ifdef PT_SUNW_UNWIND |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
267 /* Sun ld emits PT_SUNW_UNWIND .eh_frame_hdr sections instead of |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
268 PT_SUNW_EH_FRAME/PT_GNU_EH_FRAME, so accept them as well. */ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
269 else if (phdr->p_type == PT_SUNW_UNWIND) |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
270 p_eh_frame_hdr = phdr; |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
271 #endif |
| 0 | 272 else if (phdr->p_type == PT_DYNAMIC) |
| 273 p_dynamic = phdr; | |
| 274 } | |
|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
275 |
| 0 | 276 if (!match) |
| 277 return 0; | |
| 278 | |
| 279 if (size >= sizeof (struct ext_dl_phdr_info)) | |
| 280 { | |
| 281 /* Move the cache entry we're about to overwrite to the head of | |
| 282 the list. If either last_cache_entry or prev_cache_entry are | |
| 283 NULL, that cache entry is already at the head. */ | |
| 284 if (last_cache_entry != NULL && prev_cache_entry != NULL) | |
| 285 { | |
| 286 prev_cache_entry->link = last_cache_entry->link; | |
| 287 last_cache_entry->link = frame_hdr_cache_head; | |
| 288 frame_hdr_cache_head = last_cache_entry; | |
| 289 } | |
| 290 | |
| 291 frame_hdr_cache_head->load_base = load_base; | |
| 292 frame_hdr_cache_head->p_eh_frame_hdr = p_eh_frame_hdr; | |
| 293 frame_hdr_cache_head->p_dynamic = p_dynamic; | |
| 294 frame_hdr_cache_head->pc_low = pc_low; | |
| 295 frame_hdr_cache_head->pc_high = pc_high; | |
| 296 } | |
| 297 | |
| 298 found: | |
| 299 | |
| 300 if (!p_eh_frame_hdr) | |
| 301 return 0; | |
| 302 | |
| 303 /* Read .eh_frame_hdr header. */ | |
| 304 hdr = (const struct unw_eh_frame_hdr *) | |
| 305 __RELOC_POINTER (p_eh_frame_hdr->p_vaddr, load_base); | |
| 306 if (hdr->version != 1) | |
| 307 return 1; | |
| 308 | |
| 309 #ifdef CRT_GET_RFIB_DATA | |
| 310 # ifdef __i386__ | |
| 311 data->dbase = NULL; | |
| 312 if (p_dynamic) | |
| 313 { | |
| 314 /* For dynamically linked executables and shared libraries, | |
| 315 DT_PLTGOT is the gp value for that object. */ | |
| 316 ElfW(Dyn) *dyn = (ElfW(Dyn) *) | |
| 317 __RELOC_POINTER (p_dynamic->p_vaddr, load_base); | |
| 318 for (; dyn->d_tag != DT_NULL ; dyn++) | |
| 319 if (dyn->d_tag == DT_PLTGOT) | |
| 320 { | |
| 321 data->dbase = (void *) dyn->d_un.d_ptr; | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
322 #if defined __linux__ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
323 /* On IA-32 Linux, _DYNAMIC is writable and GLIBC has |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
324 relocated it. */ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
325 #elif defined __sun__ && defined __svr4__ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
326 /* On Solaris 2/x86, we need to do this ourselves. */ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
327 data->dbase += load_base; |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
328 #endif |
| 0 | 329 break; |
| 330 } | |
| 331 } | |
| 332 # elif defined __FRV_FDPIC__ && defined __linux__ | |
| 333 data->dbase = load_base.got_value; | |
|
67
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
334 # elif defined __x86_64__ && defined __sun__ && defined __svr4__ |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
335 /* While CRT_GET_RFIB_DATA is also defined for 64-bit Solaris 10+/x86, it |
|
f6334be47118
update gcc from gcc-4.6-20100522 to gcc-4.6-20110318
nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
55
diff
changeset
|
336 doesn't apply since it uses DW_EH_PE_pcrel encoding. */ |
| 0 | 337 # else |
| 338 # error What is DW_EH_PE_datarel base on this platform? | |
| 339 # endif | |
| 340 #endif | |
| 341 | |
| 342 p = read_encoded_value_with_base (hdr->eh_frame_ptr_enc, | |
| 343 base_from_cb_data (hdr->eh_frame_ptr_enc, | |
| 344 data), | |
| 345 (const unsigned char *) (hdr + 1), | |
| 346 &eh_frame); | |
| 347 | |
| 348 /* We require here specific table encoding to speed things up. | |
| 349 Also, DW_EH_PE_datarel here means using PT_GNU_EH_FRAME start | |
| 350 as base, not the processor specific DW_EH_PE_datarel. */ | |
| 351 if (hdr->fde_count_enc != DW_EH_PE_omit | |
| 352 && hdr->table_enc == (DW_EH_PE_datarel | DW_EH_PE_sdata4)) | |
| 353 { | |
| 354 _Unwind_Ptr fde_count; | |
| 355 | |
| 356 p = read_encoded_value_with_base (hdr->fde_count_enc, | |
| 357 base_from_cb_data (hdr->fde_count_enc, | |
| 358 data), | |
| 359 p, &fde_count); | |
| 360 /* Shouldn't happen. */ | |
| 361 if (fde_count == 0) | |
| 362 return 1; | |
| 363 if ((((_Unwind_Ptr) p) & 3) == 0) | |
| 364 { | |
| 365 struct fde_table { | |
| 366 signed initial_loc __attribute__ ((mode (SI))); | |
| 367 signed fde __attribute__ ((mode (SI))); | |
| 368 }; | |
| 369 const struct fde_table *table = (const struct fde_table *) p; | |
| 370 size_t lo, hi, mid; | |
| 371 _Unwind_Ptr data_base = (_Unwind_Ptr) hdr; | |
| 372 fde *f; | |
| 373 unsigned int f_enc, f_enc_size; | |
| 374 _Unwind_Ptr range; | |
| 375 | |
| 376 mid = fde_count - 1; | |
| 377 if (data->pc < table[0].initial_loc + data_base) | |
| 378 return 1; | |
| 379 else if (data->pc < table[mid].initial_loc + data_base) | |
| 380 { | |
| 381 lo = 0; | |
| 382 hi = mid; | |
| 383 | |
| 384 while (lo < hi) | |
| 385 { | |
| 386 mid = (lo + hi) / 2; | |
| 387 if (data->pc < table[mid].initial_loc + data_base) | |
| 388 hi = mid; | |
| 389 else if (data->pc >= table[mid + 1].initial_loc + data_base) | |
| 390 lo = mid + 1; | |
| 391 else | |
| 392 break; | |
| 393 } | |
| 394 | |
| 395 gcc_assert (lo < hi); | |
| 396 } | |
| 397 | |
| 398 f = (fde *) (table[mid].fde + data_base); | |
| 399 f_enc = get_fde_encoding (f); | |
| 400 f_enc_size = size_of_encoded_value (f_enc); | |
| 401 read_encoded_value_with_base (f_enc & 0x0f, 0, | |
| 402 &f->pc_begin[f_enc_size], &range); | |
| 403 if (data->pc < table[mid].initial_loc + data_base + range) | |
| 404 data->ret = f; | |
| 405 data->func = (void *) (table[mid].initial_loc + data_base); | |
| 406 return 1; | |
| 407 } | |
| 408 } | |
| 409 | |
| 410 /* We have no sorted search table, so need to go the slow way. | |
| 411 As soon as GLIBC will provide API so to notify that a library has been | |
| 412 removed, we could cache this (and thus use search_object). */ | |
| 413 ob.pc_begin = NULL; | |
| 414 ob.tbase = data->tbase; | |
| 415 ob.dbase = data->dbase; | |
| 416 ob.u.single = (fde *) eh_frame; | |
| 417 ob.s.i = 0; | |
| 418 ob.s.b.mixed_encoding = 1; /* Need to assume worst case. */ | |
| 419 data->ret = linear_search_fdes (&ob, (fde *) eh_frame, (void *) data->pc); | |
| 420 if (data->ret != NULL) | |
| 421 { | |
| 422 _Unwind_Ptr func; | |
| 423 unsigned int encoding = get_fde_encoding (data->ret); | |
|
55
77e2b8dfacca
update it from 4.4.3 to 4.5.0
ryoma <e075725@ie.u-ryukyu.ac.jp>
parents:
0
diff
changeset
|
424 |
| 0 | 425 read_encoded_value_with_base (encoding, |
| 426 base_from_cb_data (encoding, data), | |
| 427 data->ret->pc_begin, &func); | |
| 428 data->func = (void *) func; | |
| 429 } | |
| 430 return 1; | |
| 431 } | |
| 432 | |
| 433 const fde * | |
| 434 _Unwind_Find_FDE (void *pc, struct dwarf_eh_bases *bases) | |
| 435 { | |
| 436 struct unw_eh_callback_data data; | |
| 437 const fde *ret; | |
| 438 | |
| 439 ret = _Unwind_Find_registered_FDE (pc, bases); | |
| 440 if (ret != NULL) | |
| 441 return ret; | |
| 442 | |
| 443 data.pc = (_Unwind_Ptr) pc; | |
| 444 data.tbase = NULL; | |
| 445 data.dbase = NULL; | |
| 446 data.func = NULL; | |
| 447 data.ret = NULL; | |
| 448 data.check_cache = 1; | |
| 449 | |
| 450 if (dl_iterate_phdr (_Unwind_IteratePhdrCallback, &data) < 0) | |
| 451 return NULL; | |
| 452 | |
| 453 if (data.ret) | |
| 454 { | |
| 455 bases->tbase = data.tbase; | |
| 456 bases->dbase = data.dbase; | |
| 457 bases->func = data.func; | |
| 458 } | |
| 459 return data.ret; | |
| 460 } | |
| 461 | |
| 462 #else | |
| 463 /* Prevent multiple include of header files. */ | |
| 464 #define _Unwind_Find_FDE _Unwind_Find_FDE | |
| 465 #include "unwind-dw2-fde.c" | |
| 466 #endif | |
| 467 | |
| 468 #if defined (USE_GAS_SYMVER) && defined (SHARED) && defined (USE_LIBUNWIND_EXCEPTIONS) | |
| 469 alias (_Unwind_Find_FDE); | |
| 470 #endif |