125b3c049e70834cf33790a28643ab058b507b35cBen Cheng/* CIE reading. 225b3c049e70834cf33790a28643ab058b507b35cBen Cheng Copyright (C) 2009-2010 Red Hat, Inc. 303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes This file is part of elfutils. 425b3c049e70834cf33790a28643ab058b507b35cBen Cheng 503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes This file is free software; you can redistribute it and/or modify 603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes it under the terms of either 725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes * the GNU Lesser General Public License as published by the Free 903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes Software Foundation; either version 3 of the License, or (at 1003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes your option) any later version 1103333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 1203333823c75a1c1887e923828113a1b0fd12020cElliott Hughes or 1303333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 1403333823c75a1c1887e923828113a1b0fd12020cElliott Hughes * the GNU General Public License as published by the Free 1503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes Software Foundation; either version 2 of the License, or (at 1603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes your option) any later version 1703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 1803333823c75a1c1887e923828113a1b0fd12020cElliott Hughes or both in parallel, as here. 1903333823c75a1c1887e923828113a1b0fd12020cElliott Hughes 2003333823c75a1c1887e923828113a1b0fd12020cElliott Hughes elfutils is distributed in the hope that it will be useful, but 2125b3c049e70834cf33790a28643ab058b507b35cBen Cheng WITHOUT ANY WARRANTY; without even the implied warranty of 2225b3c049e70834cf33790a28643ab058b507b35cBen Cheng MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 2325b3c049e70834cf33790a28643ab058b507b35cBen Cheng General Public License for more details. 2425b3c049e70834cf33790a28643ab058b507b35cBen Cheng 2503333823c75a1c1887e923828113a1b0fd12020cElliott Hughes You should have received copies of the GNU General Public License and 2603333823c75a1c1887e923828113a1b0fd12020cElliott Hughes the GNU Lesser General Public License along with this program. If 2703333823c75a1c1887e923828113a1b0fd12020cElliott Hughes not, see <http://www.gnu.org/licenses/>. */ 2825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 2925b3c049e70834cf33790a28643ab058b507b35cBen Cheng#ifdef HAVE_CONFIG_H 3025b3c049e70834cf33790a28643ab058b507b35cBen Cheng# include <config.h> 3125b3c049e70834cf33790a28643ab058b507b35cBen Cheng#endif 3225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 3325b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include "cfi.h" 3425b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include "encoded-value.h" 3525b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <assert.h> 3625b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <search.h> 3725b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <stdlib.h> 3825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 3925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 4025b3c049e70834cf33790a28643ab058b507b35cBen Chengstatic int 4125b3c049e70834cf33790a28643ab058b507b35cBen Chengcompare_cie (const void *a, const void *b) 4225b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 4325b3c049e70834cf33790a28643ab058b507b35cBen Cheng const struct dwarf_cie *cie1 = a; 4425b3c049e70834cf33790a28643ab058b507b35cBen Cheng const struct dwarf_cie *cie2 = b; 4525b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cie1->offset < cie2->offset) 4625b3c049e70834cf33790a28643ab058b507b35cBen Cheng return -1; 4725b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cie1->offset > cie2->offset) 4825b3c049e70834cf33790a28643ab058b507b35cBen Cheng return 1; 4925b3c049e70834cf33790a28643ab058b507b35cBen Cheng return 0; 5025b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 5125b3c049e70834cf33790a28643ab058b507b35cBen Cheng 5225b3c049e70834cf33790a28643ab058b507b35cBen Cheng/* There is no CIE at OFFSET in the tree. Add it. */ 5325b3c049e70834cf33790a28643ab058b507b35cBen Chengstatic struct dwarf_cie * 5425b3c049e70834cf33790a28643ab058b507b35cBen Chengintern_new_cie (Dwarf_CFI *cache, Dwarf_Off offset, const Dwarf_CIE *info) 5525b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 5625b3c049e70834cf33790a28643ab058b507b35cBen Cheng struct dwarf_cie *cie = malloc (sizeof (struct dwarf_cie)); 5725b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cie == NULL) 5825b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 5925b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_NOMEM); 6025b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 6125b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 6225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 6325b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->offset = offset; 6425b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->code_alignment_factor = info->code_alignment_factor; 6525b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->data_alignment_factor = info->data_alignment_factor; 6625b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->return_address_register = info->return_address_register; 6725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 6825b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->fde_augmentation_data_size = 0; 6925b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->sized_augmentation_data = false; 7025b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->signal_frame = false; 7125b3c049e70834cf33790a28643ab058b507b35cBen Cheng 7225b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->fde_encoding = DW_EH_PE_absptr; 7325b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->lsda_encoding = DW_EH_PE_omit; 7425b3c049e70834cf33790a28643ab058b507b35cBen Cheng 7525b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Grok the augmentation string and its data. */ 7625b3c049e70834cf33790a28643ab058b507b35cBen Cheng const uint8_t *data = info->augmentation_data; 7725b3c049e70834cf33790a28643ab058b507b35cBen Cheng for (const char *ap = info->augmentation; *ap != '\0'; ++ap) 7825b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 7925b3c049e70834cf33790a28643ab058b507b35cBen Cheng uint8_t encoding; 8025b3c049e70834cf33790a28643ab058b507b35cBen Cheng switch (*ap) 8125b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 8225b3c049e70834cf33790a28643ab058b507b35cBen Cheng case 'z': 8325b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->sized_augmentation_data = true; 8425b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 8525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 8625b3c049e70834cf33790a28643ab058b507b35cBen Cheng case 'S': 8725b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->signal_frame = true; 8825b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 8925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 9025b3c049e70834cf33790a28643ab058b507b35cBen Cheng case 'L': /* LSDA pointer encoding byte. */ 9125b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->lsda_encoding = *data++; 9225b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (!cie->sized_augmentation_data) 9325b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->fde_augmentation_data_size 9425b3c049e70834cf33790a28643ab058b507b35cBen Cheng += encoded_value_size (&cache->data->d, cache->e_ident, 9525b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->lsda_encoding, NULL); 9625b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 9725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 9825b3c049e70834cf33790a28643ab058b507b35cBen Cheng case 'R': /* FDE address encoding byte. */ 9925b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->fde_encoding = *data++; 10025b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 10125b3c049e70834cf33790a28643ab058b507b35cBen Cheng 10225b3c049e70834cf33790a28643ab058b507b35cBen Cheng case 'P': /* Skip personality routine. */ 10325b3c049e70834cf33790a28643ab058b507b35cBen Cheng encoding = *data++; 10425b3c049e70834cf33790a28643ab058b507b35cBen Cheng data += encoded_value_size (&cache->data->d, cache->e_ident, 10525b3c049e70834cf33790a28643ab058b507b35cBen Cheng encoding, data); 10625b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 10725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 10825b3c049e70834cf33790a28643ab058b507b35cBen Cheng default: 10925b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Unknown augmentation string. If we have 'z' we can ignore it, 11025b3c049e70834cf33790a28643ab058b507b35cBen Cheng otherwise we must bail out. */ 11125b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cie->sized_augmentation_data) 11225b3c049e70834cf33790a28643ab058b507b35cBen Cheng continue; 11325b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 11425b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* We only get here when we need to bail out. */ 11525b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 11625b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 11725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 11825b3c049e70834cf33790a28643ab058b507b35cBen Cheng if ((cie->fde_encoding & 0x0f) == DW_EH_PE_absptr) 11925b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 12025b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Canonicalize encoding to a specific size. */ 12125b3c049e70834cf33790a28643ab058b507b35cBen Cheng assert (DW_EH_PE_absptr == 0); 12225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 12325b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* XXX should get from dwarf_next_cfi with v4 header. */ 12425b3c049e70834cf33790a28643ab058b507b35cBen Cheng uint_fast8_t address_size 12525b3c049e70834cf33790a28643ab058b507b35cBen Cheng = cache->e_ident[EI_CLASS] == ELFCLASS32 ? 4 : 8; 12625b3c049e70834cf33790a28643ab058b507b35cBen Cheng switch (address_size) 12725b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 12825b3c049e70834cf33790a28643ab058b507b35cBen Cheng case 8: 12925b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->fde_encoding |= DW_EH_PE_udata8; 13025b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 13125b3c049e70834cf33790a28643ab058b507b35cBen Cheng case 4: 13225b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->fde_encoding |= DW_EH_PE_udata4; 13325b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 13425b3c049e70834cf33790a28643ab058b507b35cBen Cheng default: 13525b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (cie); 13625b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_INVALID_DWARF); 13725b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 13825b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 13925b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 14025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 14125b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Save the initial instructions to be played out into initial state. */ 14225b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->initial_instructions = info->initial_instructions; 14325b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->initial_instructions_end = info->initial_instructions_end; 14425b3c049e70834cf33790a28643ab058b507b35cBen Cheng cie->initial_state = NULL; 14525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 14625b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Add the new entry to the search tree. */ 14725b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (tsearch (cie, &cache->cie_tree, &compare_cie) == NULL) 14825b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 14925b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (cie); 15025b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_NOMEM); 15125b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 15225b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 15325b3c049e70834cf33790a28643ab058b507b35cBen Cheng 15425b3c049e70834cf33790a28643ab058b507b35cBen Cheng return cie; 15525b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 15625b3c049e70834cf33790a28643ab058b507b35cBen Cheng 15725b3c049e70834cf33790a28643ab058b507b35cBen Cheng/* Look up a CIE_pointer for random access. */ 15825b3c049e70834cf33790a28643ab058b507b35cBen Chengstruct dwarf_cie * 15925b3c049e70834cf33790a28643ab058b507b35cBen Chenginternal_function 16025b3c049e70834cf33790a28643ab058b507b35cBen Cheng__libdw_find_cie (Dwarf_CFI *cache, Dwarf_Off offset) 16125b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 16225b3c049e70834cf33790a28643ab058b507b35cBen Cheng const struct dwarf_cie cie_key = { .offset = offset }; 16325b3c049e70834cf33790a28643ab058b507b35cBen Cheng struct dwarf_cie **found = tfind (&cie_key, &cache->cie_tree, &compare_cie); 16425b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (found != NULL) 16525b3c049e70834cf33790a28643ab058b507b35cBen Cheng return *found; 16625b3c049e70834cf33790a28643ab058b507b35cBen Cheng 16725b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* We have not read this CIE yet. Go find it. */ 16825b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Off next_offset = offset; 16925b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_CFI_Entry entry; 17025b3c049e70834cf33790a28643ab058b507b35cBen Cheng int result = INTUSE(dwarf_next_cfi) (cache->e_ident, 17125b3c049e70834cf33790a28643ab058b507b35cBen Cheng &cache->data->d, CFI_IS_EH (cache), 17225b3c049e70834cf33790a28643ab058b507b35cBen Cheng offset, &next_offset, &entry); 17325b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (result != 0 || entry.cie.CIE_id != DW_CIE_ID_64) 17425b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 17525b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_INVALID_DWARF); 17625b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 17725b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 17825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 17925b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* If this happened to be what we would have read next, notice it. */ 18025b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cache->next_offset == offset) 18125b3c049e70834cf33790a28643ab058b507b35cBen Cheng cache->next_offset = next_offset; 18225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 18325b3c049e70834cf33790a28643ab058b507b35cBen Cheng return intern_new_cie (cache, offset, &entry.cie); 18425b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 18525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 18625b3c049e70834cf33790a28643ab058b507b35cBen Cheng/* Enter a CIE encountered while reading through for FDEs. */ 18725b3c049e70834cf33790a28643ab058b507b35cBen Chengvoid 18825b3c049e70834cf33790a28643ab058b507b35cBen Chenginternal_function 18925b3c049e70834cf33790a28643ab058b507b35cBen Cheng__libdw_intern_cie (Dwarf_CFI *cache, Dwarf_Off offset, const Dwarf_CIE *info) 19025b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 19125b3c049e70834cf33790a28643ab058b507b35cBen Cheng const struct dwarf_cie cie_key = { .offset = offset }; 19225b3c049e70834cf33790a28643ab058b507b35cBen Cheng struct dwarf_cie **found = tfind (&cie_key, &cache->cie_tree, &compare_cie); 19325b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (found == NULL) 19425b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* We have not read this CIE yet. Enter it. */ 19525b3c049e70834cf33790a28643ab058b507b35cBen Cheng (void) intern_new_cie (cache, offset, info); 19625b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 197