about summary refs log tree commit diff
path: root/sysdeps/generic/unwind-dw2-fde-glibc.c
diff options
context:
space:
mode:
authorZack Weinberg <zackw@panix.com>2017-06-08 15:39:03 -0400
committerZack Weinberg <zackw@panix.com>2017-06-08 15:39:03 -0400
commit5046dbb4a7eba5eccfd258f92f4735c9ffc8d069 (patch)
tree4470480d904b65cf14ca524f96f79eca818c3eaf /sysdeps/generic/unwind-dw2-fde-glibc.c
parent199fc19d3aaaf57944ef036e15904febe877fc93 (diff)
downloadglibc-5046dbb4a7eba5eccfd258f92f4735c9ffc8d069.tar.gz
glibc-5046dbb4a7eba5eccfd258f92f4735c9ffc8d069.tar.xz
glibc-5046dbb4a7eba5eccfd258f92f4735c9ffc8d069.zip
Prepare for radical source tree reorganization. zack/build-layout-experiment
All top-level files and directories are moved into a temporary storage
directory, REORG.TODO, except for files that will certainly still
exist in their current form at top level when we're done (COPYING,
COPYING.LIB, LICENSES, NEWS, README), all old ChangeLog files (which
are moved to the new directory OldChangeLogs, instead), and the
generated file INSTALL (which is just deleted; in the new order, there
will be no generated files checked into version control).
Diffstat (limited to 'sysdeps/generic/unwind-dw2-fde-glibc.c')
-rw-r--r--sysdeps/generic/unwind-dw2-fde-glibc.c279
1 files changed, 0 insertions, 279 deletions
diff --git a/sysdeps/generic/unwind-dw2-fde-glibc.c b/sysdeps/generic/unwind-dw2-fde-glibc.c
deleted file mode 100644
index 9d698d575b..0000000000
--- a/sysdeps/generic/unwind-dw2-fde-glibc.c
+++ /dev/null
@@ -1,279 +0,0 @@
-/* Copyright (C) 2001-2017 Free Software Foundation, Inc.
-   Contributed by Jakub Jelinek <jakub@redhat.com>.
-
-   This file is part of the GNU C Library.
-
-   The GNU C Library is free software; you can redistribute it and/or
-   modify it under the terms of the GNU Lesser General Public
-   License as published by the Free Software Foundation; either
-   version 2.1 of the License, or (at your option) any later version.
-
-   The GNU C Library is distributed in the hope that it will be useful,
-   but WITHOUT ANY WARRANTY; without even the implied warranty of
-   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-   Lesser General Public License for more details.
-
-   You should have received a copy of the GNU Lesser General Public
-   License along with the GNU C Library; if not, see
-   <http://www.gnu.org/licenses/>.  */
-
-/* Locate the FDE entry for a given address, using PT_GNU_EH_FRAME ELF
-   segment and dl_iterate_phdr to avoid register/deregister calls at
-   DSO load/unload.  */
-
-#ifdef _LIBC
-# include <shlib-compat.h>
-#endif
-
-#if !defined _LIBC || SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_2_5)
-
-#include <link.h>
-#include <stddef.h>
-
-#define _Unwind_Find_FDE _Unwind_Find_registered_FDE
-
-#include <unwind-dw2-fde.c>
-
-#undef _Unwind_Find_FDE
-
-extern fde * _Unwind_Find_registered_FDE (void *pc,
-					  struct dwarf_eh_bases *bases);
-extern fde * _Unwind_Find_FDE (void *, struct dwarf_eh_bases *);
-
-struct unw_eh_callback_data
-{
-  _Unwind_Ptr pc;
-  void *tbase;
-  void *dbase;
-  void *func;
-  fde *ret;
-};
-
-struct unw_eh_frame_hdr
-{
-  unsigned char version;
-  unsigned char eh_frame_ptr_enc;
-  unsigned char fde_count_enc;
-  unsigned char table_enc;
-};
-
-/* Like base_of_encoded_value, but take the base from a struct object
-   instead of an _Unwind_Context.  */
-
-static _Unwind_Ptr
-base_from_cb_data (unsigned char encoding, struct unw_eh_callback_data *data)
-{
-  if (encoding == DW_EH_PE_omit)
-    return 0;
-
-  switch (encoding & 0x70)
-    {
-    case DW_EH_PE_absptr:
-    case DW_EH_PE_pcrel:
-    case DW_EH_PE_aligned:
-      return 0;
-
-    case DW_EH_PE_textrel:
-      return (_Unwind_Ptr) data->tbase;
-    case DW_EH_PE_datarel:
-      return (_Unwind_Ptr) data->dbase;
-    }
-  abort ();
-}
-
-static int
-_Unwind_IteratePhdrCallback (struct dl_phdr_info *info, size_t size, void *ptr)
-{
-  struct unw_eh_callback_data *data = (struct unw_eh_callback_data *) ptr;
-  const ElfW(Phdr) *phdr, *p_eh_frame_hdr;
-  const ElfW(Phdr) *p_dynamic __attribute__ ((unused));
-  long n, match;
-  _Unwind_Ptr load_base;
-  const unsigned char *p;
-  const struct unw_eh_frame_hdr *hdr;
-  _Unwind_Ptr eh_frame;
-  struct object ob;
-
-  /* Make sure struct dl_phdr_info is at least as big as we need.  */
-  if (size < offsetof (struct dl_phdr_info, dlpi_phnum)
-	     + sizeof (info->dlpi_phnum))
-    return -1;
-
-  match = 0;
-  phdr = info->dlpi_phdr;
-  load_base = info->dlpi_addr;
-  p_eh_frame_hdr = NULL;
-  p_dynamic = NULL;
-
-  /* See if PC falls into one of the loaded segments.  Find the eh_frame
-     segment at the same time.  */
-  for (n = info->dlpi_phnum; --n >= 0; phdr++)
-    {
-      if (phdr->p_type == PT_LOAD)
-	{
-	  _Unwind_Ptr vaddr = phdr->p_vaddr + load_base;
-	  if (data->pc >= vaddr && data->pc < vaddr + phdr->p_memsz)
-	    match = 1;
-	}
-      else if (phdr->p_type == PT_GNU_EH_FRAME)
-	p_eh_frame_hdr = phdr;
-      else if (phdr->p_type == PT_DYNAMIC)
-	p_dynamic = phdr;
-    }
-  if (!match || !p_eh_frame_hdr)
-    return 0;
-
-  /* Read .eh_frame_hdr header.  */
-  hdr = (const struct unw_eh_frame_hdr *)
-	(p_eh_frame_hdr->p_vaddr + load_base);
-  if (hdr->version != 1)
-    return 1;
-
-#ifdef CRT_GET_RFIB_DATA
-# ifdef __i386__
-  data->dbase = NULL;
-  if (p_dynamic)
-    {
-      /* For dynamicly linked executables and shared libraries,
-	 DT_PLTGOT is the gp value for that object.  */
-      ElfW(Dyn) *dyn = (ElfW(Dyn) *)(p_dynamic->p_vaddr + load_base);
-      for (; dyn->d_tag != DT_NULL ; dyn++)
-	if (dyn->d_tag == DT_PLTGOT)
-	  {
-	    /* On IA-32, _DYNAMIC is writable and GLIBC has relocated it.  */
-	    data->dbase = (void *) dyn->d_un.d_ptr;
-	    break;
-	  }
-    }
-# else
-#  error What is DW_EH_PE_datarel base on this platform?
-# endif
-#endif
-#ifdef CRT_GET_RFIB_TEXT
-# error What is DW_EH_PE_textrel base on this platform?
-#endif
-
-  p = read_encoded_value_with_base (hdr->eh_frame_ptr_enc,
-				    base_from_cb_data (hdr->eh_frame_ptr_enc,
-						       data),
-				    (const unsigned char *) (hdr + 1),
-				    &eh_frame);
-
-  /* We require here specific table encoding to speed things up.
-     Also, DW_EH_PE_datarel here means using PT_GNU_EH_FRAME start
-     as base, not the processor specific DW_EH_PE_datarel.  */
-  if (hdr->fde_count_enc != DW_EH_PE_omit
-      && hdr->table_enc == (DW_EH_PE_datarel | DW_EH_PE_sdata4))
-    {
-      _Unwind_Ptr fde_count;
-
-      p = read_encoded_value_with_base (hdr->fde_count_enc,
-					base_from_cb_data (hdr->fde_count_enc,
-							   data),
-					p, &fde_count);
-      /* Shouldn't happen.  */
-      if (fde_count == 0)
-	return 1;
-      if ((((_Unwind_Ptr) p) & 3) == 0)
-	{
-	  struct fde_table {
-	    signed initial_loc __attribute__ ((mode (SI)));
-	    signed fde __attribute__ ((mode (SI)));
-	  };
-	  const struct fde_table *table = (const struct fde_table *) p;
-	  size_t lo, hi, mid;
-	  _Unwind_Ptr data_base = (_Unwind_Ptr) hdr;
-	  fde *f;
-	  unsigned int f_enc, f_enc_size;
-	  _Unwind_Ptr range;
-
-	  mid = fde_count - 1;
-	  if (data->pc < table[0].initial_loc + data_base)
-	    return 1;
-	  else if (data->pc < table[mid].initial_loc + data_base)
-	    {
-	      lo = 0;
-	      hi = mid;
-
-	      while (lo < hi)
-		{
-		  mid = (lo + hi) / 2;
-		  if (data->pc < table[mid].initial_loc + data_base)
-		    hi = mid;
-		  else if (data->pc >= table[mid + 1].initial_loc + data_base)
-		    lo = mid + 1;
-		  else
-		    break;
-		}
-
-	      if (lo >= hi)
-		__gxx_abort ();
-	    }
-
-	  f = (fde *) (table[mid].fde + data_base);
-	  f_enc = get_fde_encoding (f);
-	  f_enc_size = size_of_encoded_value (f_enc);
-	  read_encoded_value_with_base (f_enc & 0x0f, 0,
-					&f->pc_begin[f_enc_size], &range);
-	  if (data->pc < table[mid].initial_loc + data_base + range)
-	    data->ret = f;
-	  data->func = (void *) (table[mid].initial_loc + data_base);
-	  return 1;
-	}
-    }
-
-  /* We have no sorted search table, so need to go the slow way.
-     As soon as GLIBC will provide API so to notify that a library has been
-     removed, we could cache this (and thus use search_object).  */
-  ob.pc_begin = NULL;
-  ob.tbase = data->tbase;
-  ob.dbase = data->dbase;
-  ob.u.single = (fde *) eh_frame;
-  ob.s.i = 0;
-  ob.s.b.mixed_encoding = 1;  /* Need to assume worst case.  */
-  data->ret = linear_search_fdes (&ob, (fde *) eh_frame, (void *) data->pc);
-  if (data->ret != NULL)
-    {
-      unsigned int encoding = get_fde_encoding (data->ret);
-      _Unwind_Ptr func;
-      read_encoded_value_with_base (encoding,
-				    base_from_cb_data (encoding, data),
-				    data->ret->pc_begin, &func);
-      data->func = (void *) func;
-    }
-  return 1;
-}
-
-# ifdef _LIBC
-# define dl_iterate_phdr __dl_iterate_phdr
-# endif
-
-fde *
-_Unwind_Find_FDE (void *pc, struct dwarf_eh_bases *bases)
-{
-  struct unw_eh_callback_data data;
-  fde *ret;
-
-  ret = _Unwind_Find_registered_FDE (pc, bases);
-  if (ret != NULL)
-    return ret;
-
-  data.pc = (_Unwind_Ptr) pc;
-  data.tbase = NULL;
-  data.dbase = NULL;
-  data.func = NULL;
-  data.ret = NULL;
-
-  if (dl_iterate_phdr (_Unwind_IteratePhdrCallback, &data) < 0)
-    return NULL;
-
-  if (data.ret)
-    {
-      bases->tbase = data.tbase;
-      bases->dbase = data.dbase;
-      bases->func = data.func;
-    }
-  return data.ret;
-}
-
-#endif