125b3c049e70834cf33790a28643ab058b507b35cBen Cheng/* Create descriptor from ELF descriptor for processing file. 225b3c049e70834cf33790a28643ab058b507b35cBen Cheng Copyright (C) 2002-2011 Red Hat, Inc. 325b3c049e70834cf33790a28643ab058b507b35cBen Cheng This file is part of Red Hat elfutils. 425b3c049e70834cf33790a28643ab058b507b35cBen Cheng Written by Ulrich Drepper <drepper@redhat.com>, 2002. 525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 625b3c049e70834cf33790a28643ab058b507b35cBen Cheng Red Hat elfutils is free software; you can redistribute it and/or modify 725b3c049e70834cf33790a28643ab058b507b35cBen Cheng it under the terms of the GNU General Public License as published by the 825b3c049e70834cf33790a28643ab058b507b35cBen Cheng Free Software Foundation; version 2 of the License. 925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 1025b3c049e70834cf33790a28643ab058b507b35cBen Cheng Red Hat elfutils is distributed in the hope that it will be useful, but 1125b3c049e70834cf33790a28643ab058b507b35cBen Cheng WITHOUT ANY WARRANTY; without even the implied warranty of 1225b3c049e70834cf33790a28643ab058b507b35cBen Cheng MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 1325b3c049e70834cf33790a28643ab058b507b35cBen Cheng General Public License for more details. 1425b3c049e70834cf33790a28643ab058b507b35cBen Cheng 1525b3c049e70834cf33790a28643ab058b507b35cBen Cheng You should have received a copy of the GNU General Public License along 1625b3c049e70834cf33790a28643ab058b507b35cBen Cheng with Red Hat elfutils; if not, write to the Free Software Foundation, 1725b3c049e70834cf33790a28643ab058b507b35cBen Cheng Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301 USA. 1825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 1925b3c049e70834cf33790a28643ab058b507b35cBen Cheng In addition, as a special exception, Red Hat, Inc. gives You the 2025b3c049e70834cf33790a28643ab058b507b35cBen Cheng additional right to link the code of Red Hat elfutils with code licensed 2125b3c049e70834cf33790a28643ab058b507b35cBen Cheng under any Open Source Initiative certified open source license 2225b3c049e70834cf33790a28643ab058b507b35cBen Cheng (http://www.opensource.org/licenses/index.php) which requires the 2325b3c049e70834cf33790a28643ab058b507b35cBen Cheng distribution of source code with any binary distribution and to 2425b3c049e70834cf33790a28643ab058b507b35cBen Cheng distribute linked combinations of the two. Non-GPL Code permitted under 2525b3c049e70834cf33790a28643ab058b507b35cBen Cheng this exception must only link to the code of Red Hat elfutils through 2625b3c049e70834cf33790a28643ab058b507b35cBen Cheng those well defined interfaces identified in the file named EXCEPTION 2725b3c049e70834cf33790a28643ab058b507b35cBen Cheng found in the source code files (the "Approved Interfaces"). The files 2825b3c049e70834cf33790a28643ab058b507b35cBen Cheng of Non-GPL Code may instantiate templates or use macros or inline 2925b3c049e70834cf33790a28643ab058b507b35cBen Cheng functions from the Approved Interfaces without causing the resulting 3025b3c049e70834cf33790a28643ab058b507b35cBen Cheng work to be covered by the GNU General Public License. Only Red Hat, 3125b3c049e70834cf33790a28643ab058b507b35cBen Cheng Inc. may make changes or additions to the list of Approved Interfaces. 3225b3c049e70834cf33790a28643ab058b507b35cBen Cheng Red Hat's grant of this exception is conditioned upon your not adding 3325b3c049e70834cf33790a28643ab058b507b35cBen Cheng any new exceptions. If you wish to add a new Approved Interface or 3425b3c049e70834cf33790a28643ab058b507b35cBen Cheng exception, please contact Red Hat. You must obey the GNU General Public 3525b3c049e70834cf33790a28643ab058b507b35cBen Cheng License in all respects for all of the Red Hat elfutils code and other 3625b3c049e70834cf33790a28643ab058b507b35cBen Cheng code used in conjunction with Red Hat elfutils except the Non-GPL Code 3725b3c049e70834cf33790a28643ab058b507b35cBen Cheng covered by this exception. If you modify this file, you may extend this 3825b3c049e70834cf33790a28643ab058b507b35cBen Cheng exception to your version of the file, but you are not obligated to do 3925b3c049e70834cf33790a28643ab058b507b35cBen Cheng so. If you do not wish to provide this exception without modification, 4025b3c049e70834cf33790a28643ab058b507b35cBen Cheng you must delete this exception statement from your version and license 4125b3c049e70834cf33790a28643ab058b507b35cBen Cheng this file solely under the GPL without exception. 4225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 4325b3c049e70834cf33790a28643ab058b507b35cBen Cheng Red Hat elfutils is an included package of the Open Invention Network. 4425b3c049e70834cf33790a28643ab058b507b35cBen Cheng An included package of the Open Invention Network is a package for which 4525b3c049e70834cf33790a28643ab058b507b35cBen Cheng Open Invention Network licensees cross-license their patents. No patent 4625b3c049e70834cf33790a28643ab058b507b35cBen Cheng license is granted, either expressly or impliedly, by designation as an 4725b3c049e70834cf33790a28643ab058b507b35cBen Cheng included package. Should you wish to participate in the Open Invention 4825b3c049e70834cf33790a28643ab058b507b35cBen Cheng Network licensing program, please visit www.openinventionnetwork.com 4925b3c049e70834cf33790a28643ab058b507b35cBen Cheng <http://www.openinventionnetwork.com>. */ 5025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 5125b3c049e70834cf33790a28643ab058b507b35cBen Cheng#ifdef HAVE_CONFIG_H 5225b3c049e70834cf33790a28643ab058b507b35cBen Cheng# include <config.h> 5325b3c049e70834cf33790a28643ab058b507b35cBen Cheng#endif 5425b3c049e70834cf33790a28643ab058b507b35cBen Cheng 5525b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <stdbool.h> 5625b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <stddef.h> 5725b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <stdlib.h> 5825b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <string.h> 5925b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <unistd.h> 6025b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include <sys/stat.h> 6125b3c049e70834cf33790a28643ab058b507b35cBen Cheng 6225b3c049e70834cf33790a28643ab058b507b35cBen Cheng#include "libdwP.h" 6325b3c049e70834cf33790a28643ab058b507b35cBen Cheng 6425b3c049e70834cf33790a28643ab058b507b35cBen Cheng#if USE_ZLIB 6525b3c049e70834cf33790a28643ab058b507b35cBen Cheng# include <endian.h> 6625b3c049e70834cf33790a28643ab058b507b35cBen Cheng# define crc32 loser_crc32 6725b3c049e70834cf33790a28643ab058b507b35cBen Cheng# include <zlib.h> 6825b3c049e70834cf33790a28643ab058b507b35cBen Cheng# undef crc32 6925b3c049e70834cf33790a28643ab058b507b35cBen Cheng#endif 7025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 7125b3c049e70834cf33790a28643ab058b507b35cBen Cheng 7225b3c049e70834cf33790a28643ab058b507b35cBen Cheng/* Section names. */ 7325b3c049e70834cf33790a28643ab058b507b35cBen Chengstatic const char dwarf_scnnames[IDX_last][17] = 7425b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 7525b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_info] = ".debug_info", 7625b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_types] = ".debug_types", 7725b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_abbrev] = ".debug_abbrev", 7825b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_aranges] = ".debug_aranges", 7925b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_line] = ".debug_line", 8025b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_frame] = ".debug_frame", 8125b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_loc] = ".debug_loc", 8225b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_pubnames] = ".debug_pubnames", 8325b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_str] = ".debug_str", 8425b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_macinfo] = ".debug_macinfo", 8525b3c049e70834cf33790a28643ab058b507b35cBen Cheng [IDX_debug_ranges] = ".debug_ranges" 8625b3c049e70834cf33790a28643ab058b507b35cBen Cheng}; 8725b3c049e70834cf33790a28643ab058b507b35cBen Cheng#define ndwarf_scnnames (sizeof (dwarf_scnnames) / sizeof (dwarf_scnnames[0])) 8825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 8925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 9025b3c049e70834cf33790a28643ab058b507b35cBen Chengstatic Dwarf * 9125b3c049e70834cf33790a28643ab058b507b35cBen Chengcheck_section (Dwarf *result, GElf_Ehdr *ehdr, Elf_Scn *scn, bool inscngrp) 9225b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 9325b3c049e70834cf33790a28643ab058b507b35cBen Cheng GElf_Shdr shdr_mem; 9425b3c049e70834cf33790a28643ab058b507b35cBen Cheng GElf_Shdr *shdr; 9525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 9625b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Get the section header data. */ 9725b3c049e70834cf33790a28643ab058b507b35cBen Cheng shdr = gelf_getshdr (scn, &shdr_mem); 9825b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (shdr == NULL) 9925b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* This should never happen. If it does something is 10025b3c049e70834cf33790a28643ab058b507b35cBen Cheng wrong in the libelf library. */ 10125b3c049e70834cf33790a28643ab058b507b35cBen Cheng abort (); 10225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 10325b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Ignore any SHT_NOBITS sections. Debugging sections should not 10425b3c049e70834cf33790a28643ab058b507b35cBen Cheng have been stripped, but in case of a corrupt file we won't try 10525b3c049e70834cf33790a28643ab058b507b35cBen Cheng to look at the missing data. */ 10625b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (unlikely (shdr->sh_type == SHT_NOBITS)) 10725b3c049e70834cf33790a28643ab058b507b35cBen Cheng return result; 10825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 10925b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Make sure the section is part of a section group only iff we 11025b3c049e70834cf33790a28643ab058b507b35cBen Cheng really need it. If we are looking for the global (= non-section 11125b3c049e70834cf33790a28643ab058b507b35cBen Cheng group debug info) we have to ignore all the info in section 11225b3c049e70834cf33790a28643ab058b507b35cBen Cheng groups. If we are looking into a section group we cannot look at 11325b3c049e70834cf33790a28643ab058b507b35cBen Cheng a section which isn't part of the section group. */ 11425b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (! inscngrp && (shdr->sh_flags & SHF_GROUP) != 0) 11525b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Ignore the section. */ 11625b3c049e70834cf33790a28643ab058b507b35cBen Cheng return result; 11725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 11825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 11925b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* We recognize the DWARF section by their names. This is not very 12025b3c049e70834cf33790a28643ab058b507b35cBen Cheng safe and stable but the best we can do. */ 12125b3c049e70834cf33790a28643ab058b507b35cBen Cheng const char *scnname = elf_strptr (result->elf, ehdr->e_shstrndx, 12225b3c049e70834cf33790a28643ab058b507b35cBen Cheng shdr->sh_name); 12325b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (scnname == NULL) 12425b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 12525b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* The section name must be valid. Otherwise is the ELF file 12625b3c049e70834cf33790a28643ab058b507b35cBen Cheng invalid. */ 12725b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_free_zdata (result); 12825b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_INVALID_ELF); 12925b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (result); 13025b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 13125b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 13225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 13325b3c049e70834cf33790a28643ab058b507b35cBen Cheng 13425b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Recognize the various sections. Most names start with .debug_. */ 13525b3c049e70834cf33790a28643ab058b507b35cBen Cheng size_t cnt; 13625b3c049e70834cf33790a28643ab058b507b35cBen Cheng for (cnt = 0; cnt < ndwarf_scnnames; ++cnt) 13725b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (strcmp (scnname, dwarf_scnnames[cnt]) == 0) 13825b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 13925b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Found it. Remember where the data is. */ 14025b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (unlikely (result->sectiondata[cnt] != NULL)) 14125b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* A section appears twice. That's bad. We ignore the section. */ 14225b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 14325b3c049e70834cf33790a28643ab058b507b35cBen Cheng 14425b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Get the section data. */ 14525b3c049e70834cf33790a28643ab058b507b35cBen Cheng Elf_Data *data = elf_getdata (scn, NULL); 14625b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (data != NULL && data->d_size != 0) 14725b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Yep, there is actually data available. */ 14825b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->sectiondata[cnt] = data; 14925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 15025b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 15125b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 15225b3c049e70834cf33790a28643ab058b507b35cBen Cheng#if USE_ZLIB 15325b3c049e70834cf33790a28643ab058b507b35cBen Cheng else if (scnname[0] == '.' && scnname[1] == 'z' 15425b3c049e70834cf33790a28643ab058b507b35cBen Cheng && strcmp (&scnname[2], &dwarf_scnnames[cnt][1]) == 0) 15525b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 15625b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* A compressed section. */ 15725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 15825b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (unlikely (result->sectiondata[cnt] != NULL)) 15925b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* A section appears twice. That's bad. We ignore the section. */ 16025b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 16125b3c049e70834cf33790a28643ab058b507b35cBen Cheng 16225b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Get the section data. */ 16325b3c049e70834cf33790a28643ab058b507b35cBen Cheng Elf_Data *data = elf_getdata (scn, NULL); 16425b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (data != NULL && data->d_size != 0) 16525b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 16625b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* There is a 12-byte header of "ZLIB" followed by 16725b3c049e70834cf33790a28643ab058b507b35cBen Cheng an 8-byte big-endian size. */ 16825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 16925b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (unlikely (data->d_size < 4 + 8) 17025b3c049e70834cf33790a28643ab058b507b35cBen Cheng || unlikely (memcmp (data->d_buf, "ZLIB", 4) != 0)) 17125b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 17225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 17325b3c049e70834cf33790a28643ab058b507b35cBen Cheng uint64_t size; 17425b3c049e70834cf33790a28643ab058b507b35cBen Cheng memcpy (&size, data->d_buf + 4, sizeof size); 17525b3c049e70834cf33790a28643ab058b507b35cBen Cheng size = be64toh (size); 17625b3c049e70834cf33790a28643ab058b507b35cBen Cheng 17725b3c049e70834cf33790a28643ab058b507b35cBen Cheng Elf_Data *zdata = malloc (sizeof (Elf_Data) + size); 17825b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (unlikely (zdata == NULL)) 17925b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 18025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 18125b3c049e70834cf33790a28643ab058b507b35cBen Cheng zdata->d_buf = &zdata[1]; 18225b3c049e70834cf33790a28643ab058b507b35cBen Cheng zdata->d_type = ELF_T_BYTE; 18325b3c049e70834cf33790a28643ab058b507b35cBen Cheng zdata->d_version = EV_CURRENT; 18425b3c049e70834cf33790a28643ab058b507b35cBen Cheng zdata->d_size = size; 18525b3c049e70834cf33790a28643ab058b507b35cBen Cheng zdata->d_off = 0; 18625b3c049e70834cf33790a28643ab058b507b35cBen Cheng zdata->d_align = 1; 18725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 18825b3c049e70834cf33790a28643ab058b507b35cBen Cheng z_stream z = 18925b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 19025b3c049e70834cf33790a28643ab058b507b35cBen Cheng .next_in = data->d_buf + 4 + 8, 19125b3c049e70834cf33790a28643ab058b507b35cBen Cheng .avail_in = data->d_size - 4 - 8, 19225b3c049e70834cf33790a28643ab058b507b35cBen Cheng .next_out = zdata->d_buf, 19325b3c049e70834cf33790a28643ab058b507b35cBen Cheng .avail_out = zdata->d_size 19425b3c049e70834cf33790a28643ab058b507b35cBen Cheng }; 19525b3c049e70834cf33790a28643ab058b507b35cBen Cheng int zrc = inflateInit (&z); 19625b3c049e70834cf33790a28643ab058b507b35cBen Cheng while (z.avail_in > 0 && likely (zrc == Z_OK)) 19725b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 19825b3c049e70834cf33790a28643ab058b507b35cBen Cheng z.next_out = zdata->d_buf + (zdata->d_size - z.avail_out); 19925b3c049e70834cf33790a28643ab058b507b35cBen Cheng zrc = inflate (&z, Z_FINISH); 20025b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (unlikely (zrc != Z_STREAM_END)) 20125b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 20225b3c049e70834cf33790a28643ab058b507b35cBen Cheng zrc = Z_DATA_ERROR; 20325b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 20425b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 20525b3c049e70834cf33790a28643ab058b507b35cBen Cheng zrc = inflateReset (&z); 20625b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 20725b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (likely (zrc == Z_OK)) 20825b3c049e70834cf33790a28643ab058b507b35cBen Cheng zrc = inflateEnd (&z); 20925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 21025b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (unlikely (zrc != Z_OK) || unlikely (z.avail_out != 0)) 21125b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (zdata); 21225b3c049e70834cf33790a28643ab058b507b35cBen Cheng else 21325b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 21425b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->sectiondata[cnt] = zdata; 21525b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->sectiondata_gzip_mask |= 1U << cnt; 21625b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 21725b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 21825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 21925b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 22025b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 22125b3c049e70834cf33790a28643ab058b507b35cBen Cheng#endif 22225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 22325b3c049e70834cf33790a28643ab058b507b35cBen Cheng return result; 22425b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 22525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 22625b3c049e70834cf33790a28643ab058b507b35cBen Cheng 22725b3c049e70834cf33790a28643ab058b507b35cBen Cheng/* Check whether all the necessary DWARF information is available. */ 22825b3c049e70834cf33790a28643ab058b507b35cBen Chengstatic Dwarf * 22925b3c049e70834cf33790a28643ab058b507b35cBen Chengvalid_p (Dwarf *result) 23025b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 23125b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* We looked at all the sections. Now determine whether all the 23225b3c049e70834cf33790a28643ab058b507b35cBen Cheng sections with debugging information we need are there. 23325b3c049e70834cf33790a28643ab058b507b35cBen Cheng 23425b3c049e70834cf33790a28643ab058b507b35cBen Cheng XXX Which sections are absolutely necessary? Add tests if 23525b3c049e70834cf33790a28643ab058b507b35cBen Cheng necessary. For now we require only .debug_info. Hopefully this 23625b3c049e70834cf33790a28643ab058b507b35cBen Cheng is correct. */ 23725b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (likely (result != NULL) 23825b3c049e70834cf33790a28643ab058b507b35cBen Cheng && unlikely (result->sectiondata[IDX_debug_info] == NULL)) 23925b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 24025b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_free_zdata (result); 24125b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_NO_DWARF); 24225b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (result); 24325b3c049e70834cf33790a28643ab058b507b35cBen Cheng result = NULL; 24425b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 24525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 24625b3c049e70834cf33790a28643ab058b507b35cBen Cheng return result; 24725b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 24825b3c049e70834cf33790a28643ab058b507b35cBen Cheng 24925b3c049e70834cf33790a28643ab058b507b35cBen Cheng 25025b3c049e70834cf33790a28643ab058b507b35cBen Chengstatic Dwarf * 25125b3c049e70834cf33790a28643ab058b507b35cBen Chengglobal_read (Dwarf *result, Elf *elf, GElf_Ehdr *ehdr) 25225b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 25325b3c049e70834cf33790a28643ab058b507b35cBen Cheng Elf_Scn *scn = NULL; 25425b3c049e70834cf33790a28643ab058b507b35cBen Cheng 25525b3c049e70834cf33790a28643ab058b507b35cBen Cheng while (result != NULL && (scn = elf_nextscn (elf, scn)) != NULL) 25625b3c049e70834cf33790a28643ab058b507b35cBen Cheng result = check_section (result, ehdr, scn, false); 25725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 25825b3c049e70834cf33790a28643ab058b507b35cBen Cheng return valid_p (result); 25925b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 26025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 26125b3c049e70834cf33790a28643ab058b507b35cBen Cheng 26225b3c049e70834cf33790a28643ab058b507b35cBen Chengstatic Dwarf * 26325b3c049e70834cf33790a28643ab058b507b35cBen Chengscngrp_read (Dwarf *result, Elf *elf, GElf_Ehdr *ehdr, Elf_Scn *scngrp) 26425b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 26525b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* SCNGRP is the section descriptor for a section group which might 26625b3c049e70834cf33790a28643ab058b507b35cBen Cheng contain debug sections. */ 26725b3c049e70834cf33790a28643ab058b507b35cBen Cheng Elf_Data *data = elf_getdata (scngrp, NULL); 26825b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (data == NULL) 26925b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 27025b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* We cannot read the section content. Fail! */ 27125b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_free_zdata (result); 27225b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (result); 27325b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 27425b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 27525b3c049e70834cf33790a28643ab058b507b35cBen Cheng 27625b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* The content of the section is a number of 32-bit words which 27725b3c049e70834cf33790a28643ab058b507b35cBen Cheng represent section indices. The first word is a flag word. */ 27825b3c049e70834cf33790a28643ab058b507b35cBen Cheng Elf32_Word *scnidx = (Elf32_Word *) data->d_buf; 27925b3c049e70834cf33790a28643ab058b507b35cBen Cheng size_t cnt; 28025b3c049e70834cf33790a28643ab058b507b35cBen Cheng for (cnt = 1; cnt * sizeof (Elf32_Word) <= data->d_size; ++cnt) 28125b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 28225b3c049e70834cf33790a28643ab058b507b35cBen Cheng Elf_Scn *scn = elf_getscn (elf, scnidx[cnt]); 28325b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (scn == NULL) 28425b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 28525b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* A section group refers to a non-existing section. Should 28625b3c049e70834cf33790a28643ab058b507b35cBen Cheng never happen. */ 28725b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_free_zdata (result); 28825b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_INVALID_ELF); 28925b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (result); 29025b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 29125b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 29225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 29325b3c049e70834cf33790a28643ab058b507b35cBen Cheng result = check_section (result, ehdr, scn, true); 29425b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (result == NULL) 29525b3c049e70834cf33790a28643ab058b507b35cBen Cheng break; 29625b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 29725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 29825b3c049e70834cf33790a28643ab058b507b35cBen Cheng return valid_p (result); 29925b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 30025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 30125b3c049e70834cf33790a28643ab058b507b35cBen Cheng 30225b3c049e70834cf33790a28643ab058b507b35cBen ChengDwarf * 30325b3c049e70834cf33790a28643ab058b507b35cBen Chengdwarf_begin_elf (elf, cmd, scngrp) 30425b3c049e70834cf33790a28643ab058b507b35cBen Cheng Elf *elf; 30525b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf_Cmd cmd; 30625b3c049e70834cf33790a28643ab058b507b35cBen Cheng Elf_Scn *scngrp; 30725b3c049e70834cf33790a28643ab058b507b35cBen Cheng{ 30825b3c049e70834cf33790a28643ab058b507b35cBen Cheng GElf_Ehdr *ehdr; 30925b3c049e70834cf33790a28643ab058b507b35cBen Cheng GElf_Ehdr ehdr_mem; 31025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 31125b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Get the ELF header of the file. We need various pieces of 31225b3c049e70834cf33790a28643ab058b507b35cBen Cheng information from it. */ 31325b3c049e70834cf33790a28643ab058b507b35cBen Cheng ehdr = gelf_getehdr (elf, &ehdr_mem); 31425b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (ehdr == NULL) 31525b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 31625b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (elf_kind (elf) != ELF_K_ELF) 31725b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_NOELF); 31825b3c049e70834cf33790a28643ab058b507b35cBen Cheng else 31925b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_GETEHDR_ERROR); 32025b3c049e70834cf33790a28643ab058b507b35cBen Cheng 32125b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 32225b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 32325b3c049e70834cf33790a28643ab058b507b35cBen Cheng 32425b3c049e70834cf33790a28643ab058b507b35cBen Cheng 32525b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Default memory allocation size. */ 32625b3c049e70834cf33790a28643ab058b507b35cBen Cheng size_t mem_default_size = sysconf (_SC_PAGESIZE) - 4 * sizeof (void *); 32725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 32825b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Allocate the data structure. */ 32925b3c049e70834cf33790a28643ab058b507b35cBen Cheng Dwarf *result = (Dwarf *) calloc (1, sizeof (Dwarf) + mem_default_size); 33025b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (unlikely (result == NULL) 33125b3c049e70834cf33790a28643ab058b507b35cBen Cheng || unlikely (Dwarf_Sig8_Hash_init (&result->sig8_hash, 11) < 0)) 33225b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 33325b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (result); 33425b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_NOMEM); 33525b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 33625b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 33725b3c049e70834cf33790a28643ab058b507b35cBen Cheng 33825b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Fill in some values. */ 33925b3c049e70834cf33790a28643ab058b507b35cBen Cheng if ((BYTE_ORDER == LITTLE_ENDIAN && ehdr->e_ident[EI_DATA] == ELFDATA2MSB) 34025b3c049e70834cf33790a28643ab058b507b35cBen Cheng || (BYTE_ORDER == BIG_ENDIAN && ehdr->e_ident[EI_DATA] == ELFDATA2LSB)) 34125b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->other_byte_order = true; 34225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 34325b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->elf = elf; 34425b3c049e70834cf33790a28643ab058b507b35cBen Cheng 34525b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* Initialize the memory handling. */ 34625b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->mem_default_size = mem_default_size; 34725b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->oom_handler = __libdw_oom; 34825b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->mem_tail = (struct libdw_memblock *) (result + 1); 34925b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->mem_tail->size = (result->mem_default_size 35025b3c049e70834cf33790a28643ab058b507b35cBen Cheng - offsetof (struct libdw_memblock, mem)); 35125b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->mem_tail->remaining = result->mem_tail->size; 35225b3c049e70834cf33790a28643ab058b507b35cBen Cheng result->mem_tail->prev = NULL; 35325b3c049e70834cf33790a28643ab058b507b35cBen Cheng 35425b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (cmd == DWARF_C_READ || cmd == DWARF_C_RDWR) 35525b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 35625b3c049e70834cf33790a28643ab058b507b35cBen Cheng /* If the caller provides a section group we get the DWARF 35725b3c049e70834cf33790a28643ab058b507b35cBen Cheng sections only from this setion group. Otherwise we search 35825b3c049e70834cf33790a28643ab058b507b35cBen Cheng for the first section with the required name. Further 35925b3c049e70834cf33790a28643ab058b507b35cBen Cheng sections with the name are ignored. The DWARF specification 36025b3c049e70834cf33790a28643ab058b507b35cBen Cheng does not really say this is allowed. */ 36125b3c049e70834cf33790a28643ab058b507b35cBen Cheng if (scngrp == NULL) 36225b3c049e70834cf33790a28643ab058b507b35cBen Cheng return global_read (result, elf, ehdr); 36325b3c049e70834cf33790a28643ab058b507b35cBen Cheng else 36425b3c049e70834cf33790a28643ab058b507b35cBen Cheng return scngrp_read (result, elf, ehdr, scngrp); 36525b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 36625b3c049e70834cf33790a28643ab058b507b35cBen Cheng else if (cmd == DWARF_C_WRITE) 36725b3c049e70834cf33790a28643ab058b507b35cBen Cheng { 36825b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_UNIMPL); 36925b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (result); 37025b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 37125b3c049e70834cf33790a28643ab058b507b35cBen Cheng } 37225b3c049e70834cf33790a28643ab058b507b35cBen Cheng 37325b3c049e70834cf33790a28643ab058b507b35cBen Cheng __libdw_seterrno (DWARF_E_INVALID_CMD); 37425b3c049e70834cf33790a28643ab058b507b35cBen Cheng free (result); 37525b3c049e70834cf33790a28643ab058b507b35cBen Cheng return NULL; 37625b3c049e70834cf33790a28643ab058b507b35cBen Cheng} 37725b3c049e70834cf33790a28643ab058b507b35cBen ChengINTDEF(dwarf_begin_elf) 378