Blame libdw/dwarf_tag.c

Packit Service 97d2fb
/* Return tag of given DIE.
Packit Service 97d2fb
   Copyright (C) 2003-2011, 2014 Red Hat, Inc.
Packit Service 97d2fb
   This file is part of elfutils.
Packit Service 97d2fb
   Written by Ulrich Drepper <drepper@redhat.com>, 2003.
Packit Service 97d2fb
Packit Service 97d2fb
   This file is free software; you can redistribute it and/or modify
Packit Service 97d2fb
   it under the terms of either
Packit Service 97d2fb
Packit Service 97d2fb
     * the GNU Lesser General Public License as published by the Free
Packit Service 97d2fb
       Software Foundation; either version 3 of the License, or (at
Packit Service 97d2fb
       your option) any later version
Packit Service 97d2fb
Packit Service 97d2fb
   or
Packit Service 97d2fb
Packit Service 97d2fb
     * the GNU General Public License as published by the Free
Packit Service 97d2fb
       Software Foundation; either version 2 of the License, or (at
Packit Service 97d2fb
       your option) any later version
Packit Service 97d2fb
Packit Service 97d2fb
   or both in parallel, as here.
Packit Service 97d2fb
Packit Service 97d2fb
   elfutils is distributed in the hope that it will be useful, but
Packit Service 97d2fb
   WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service 97d2fb
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit Service 97d2fb
   General Public License for more details.
Packit Service 97d2fb
Packit Service 97d2fb
   You should have received copies of the GNU General Public License and
Packit Service 97d2fb
   the GNU Lesser General Public License along with this program.  If
Packit Service 97d2fb
   not, see <http://www.gnu.org/licenses/>.  */
Packit Service 97d2fb
Packit Service 97d2fb
#ifdef HAVE_CONFIG_H
Packit Service 97d2fb
# include <config.h>
Packit Service 97d2fb
#endif
Packit Service 97d2fb
Packit Service 97d2fb
#include "libdwP.h"
Packit Service 97d2fb
Packit Service 97d2fb
Packit Service 97d2fb
Dwarf_Abbrev *
Packit Service 97d2fb
internal_function
Packit Service 97d2fb
__libdw_findabbrev (struct Dwarf_CU *cu, unsigned int code)
Packit Service 97d2fb
{
Packit Service 97d2fb
  Dwarf_Abbrev *abb;
Packit Service 97d2fb
Packit Service 97d2fb
  /* Abbreviation code can never have a value of 0.  */
Packit Service 97d2fb
  if (unlikely (code == 0))
Packit Service 97d2fb
    return DWARF_END_ABBREV;
Packit Service 97d2fb
Packit Service 97d2fb
  /* See whether the entry is already in the hash table.  */
Packit Service 97d2fb
  abb = Dwarf_Abbrev_Hash_find (&cu->abbrev_hash, code);
Packit Service 97d2fb
  if (abb == NULL)
Packit Service 97d2fb
    while (cu->last_abbrev_offset != (size_t) -1l)
Packit Service 97d2fb
      {
Packit Service 97d2fb
	size_t length;
Packit Service 97d2fb
Packit Service 97d2fb
	/* Find the next entry.  It gets automatically added to the
Packit Service 97d2fb
	   hash table.  */
Packit Service 97d2fb
	abb = __libdw_getabbrev (cu->dbg, cu, cu->last_abbrev_offset, &length,
Packit Service 97d2fb
				 NULL);
Packit Service 97d2fb
	if (abb == NULL || abb == DWARF_END_ABBREV)
Packit Service 97d2fb
	  {
Packit Service 97d2fb
	    /* Make sure we do not try to search for it again.  */
Packit Service 97d2fb
	    cu->last_abbrev_offset = (size_t) -1l;
Packit Service 97d2fb
	    return DWARF_END_ABBREV;
Packit Service 97d2fb
	  }
Packit Service 97d2fb
Packit Service 97d2fb
	cu->last_abbrev_offset += length;
Packit Service 97d2fb
Packit Service 97d2fb
	/* Is this the code we are looking for?  */
Packit Service 97d2fb
	if (abb->code == code)
Packit Service 97d2fb
	  break;
Packit Service 97d2fb
      }
Packit Service 97d2fb
Packit Service 97d2fb
  /* This is our second (or third, etc.) call to __libdw_findabbrev
Packit Service 97d2fb
     and the code is invalid.  */
Packit Service 97d2fb
  if (unlikely (abb == NULL))
Packit Service 97d2fb
    abb = DWARF_END_ABBREV;
Packit Service 97d2fb
Packit Service 97d2fb
  return abb;
Packit Service 97d2fb
}
Packit Service 97d2fb
Packit Service 97d2fb
Packit Service 97d2fb
int
Packit Service 97d2fb
dwarf_tag (Dwarf_Die *die)
Packit Service 97d2fb
{
Packit Service 97d2fb
  /* Find the abbreviation entry.  */
Packit Service 97d2fb
  Dwarf_Abbrev *abbrevp = __libdw_dieabbrev (die, NULL);
Packit Service 97d2fb
  if (unlikely (abbrevp == DWARF_END_ABBREV))
Packit Service 97d2fb
    {
Packit Service 97d2fb
      __libdw_seterrno (DWARF_E_INVALID_DWARF);
Packit Service 97d2fb
      return DW_TAG_invalid;
Packit Service 97d2fb
    }
Packit Service 97d2fb
Packit Service 97d2fb
  return abbrevp->tag;
Packit Service 97d2fb
}
Packit Service 97d2fb
INTDEF(dwarf_tag)