15821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* Return child of current DIE. 25821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Copyright (C) 2003-2011 Red Hat, Inc. 35821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) This file is part of Red Hat elfutils. 45821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Written by Ulrich Drepper <drepper@redhat.com>, 2003. 55821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 65821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Red Hat elfutils is free software; you can redistribute it and/or modify 75821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) it under the terms of the GNU General Public License as published by the 85821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Free Software Foundation; version 2 of the License. 95821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Red Hat elfutils is distributed in the hope that it will be useful, but 115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) WITHOUT ANY WARRANTY; without even the implied warranty of 125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) General Public License for more details. 145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) You should have received a copy of the GNU General Public License along 165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) with Red Hat elfutils; if not, write to the Free Software Foundation, 175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301 USA. 185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) In addition, as a special exception, Red Hat, Inc. gives You the 205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) additional right to link the code of Red Hat elfutils with code licensed 215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) under any Open Source Initiative certified open source license 225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) (http://www.opensource.org/licenses/index.php) which requires the 235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) distribution of source code with any binary distribution and to 245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) distribute linked combinations of the two. Non-GPL Code permitted under 255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) this exception must only link to the code of Red Hat elfutils through 265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) those well defined interfaces identified in the file named EXCEPTION 275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) found in the source code files (the "Approved Interfaces"). The files 285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) of Non-GPL Code may instantiate templates or use macros or inline 295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) functions from the Approved Interfaces without causing the resulting 305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) work to be covered by the GNU General Public License. Only Red Hat, 315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Inc. may make changes or additions to the list of Approved Interfaces. 325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Red Hat's grant of this exception is conditioned upon your not adding 335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) any new exceptions. If you wish to add a new Approved Interface or 345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) exception, please contact Red Hat. You must obey the GNU General Public 355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) License in all respects for all of the Red Hat elfutils code and other 365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) code used in conjunction with Red Hat elfutils except the Non-GPL Code 375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) covered by this exception. If you modify this file, you may extend this 385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) exception to your version of the file, but you are not obligated to do 395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) so. If you do not wish to provide this exception without modification, 405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) you must delete this exception statement from your version and license 415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) this file solely under the GPL without exception. 425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Red Hat elfutils is an included package of the Open Invention Network. 445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) An included package of the Open Invention Network is a package for which 455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Open Invention Network licensees cross-license their patents. No patent 465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) license is granted, either expressly or impliedly, by designation as an 475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) included package. Should you wish to participate in the Open Invention 485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Network licensing program, please visit www.openinventionnetwork.com 495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) <http://www.openinventionnetwork.com>. */ 505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef HAVE_CONFIG_H 525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)# include <config.h> 535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include "libdwP.h" 565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include <string.h> 575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* Some arbitrary value not conflicting with any existing code. */ 595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define INVALID 0xffffe444 605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)unsigned char * 635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)internal_function 645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)__libdw_find_attr (Dwarf_Die *die, unsigned int search_name, 655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) unsigned int *codep, unsigned int *formp) 665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles){ 675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Dwarf *dbg = die->cu->dbg; 685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const unsigned char *readp = (unsigned char *) die->addr; 695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* First we have to get the abbreviation code so that we can decode 715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) the data in the DIE. */ 725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) unsigned int abbrev_code; 735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) get_uleb128 (abbrev_code, readp); 745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Find the abbreviation entry. */ 765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Dwarf_Abbrev *abbrevp = die->abbrev; 775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (abbrevp == NULL) 785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) abbrevp = __libdw_findabbrev (die->cu, abbrev_code); 805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) die->abbrev = abbrevp ?: DWARF_END_ABBREV; 815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (unlikely (die->abbrev == DWARF_END_ABBREV)) 835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) invalid_dwarf: 855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) __libdw_seterrno (DWARF_E_INVALID_DWARF); 865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return NULL; 875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Search the name attribute. */ 905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) unsigned char *const endp 915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) = ((unsigned char *) dbg->sectiondata[IDX_debug_abbrev]->d_buf 925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) + dbg->sectiondata[IDX_debug_abbrev]->d_size); 935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const unsigned char *attrp = die->abbrev->attrp; 955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while (1) 965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Are we still in bounds? This test needs to be refined. */ 985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (unlikely (attrp + 1 >= endp)) 995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) goto invalid_dwarf; 1005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Get attribute name and form. 1025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) XXX We don't check whether this reads beyond the end of the 1045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) section. */ 1055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) unsigned int attr_name; 1065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) get_uleb128 (attr_name, attrp); 1075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) unsigned int attr_form; 1085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) get_uleb128 (attr_form, attrp); 1095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* We can stop if we found the attribute with value zero. */ 1115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (attr_name == 0 && attr_form == 0) 1125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 1135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Is this the name attribute? */ 1155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (attr_name == search_name && search_name != INVALID) 1165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 1175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (codep != NULL) 1185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *codep = attr_name; 1195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (formp != NULL) 1205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *formp = attr_form; 1215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return (unsigned char *) readp; 1235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Skip over the rest of this attribute (if there is any). */ 1265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (attr_form != 0) 1275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 1285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) size_t len = __libdw_form_val_len (dbg, die->cu, attr_form, readp); 1295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (unlikely (len == (size_t) -1l)) 1315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 1325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) readp = NULL; 1335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 1345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) // XXX We need better boundary checks. 1375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) readp += len; 1385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) // XXX Do we need other values? 1425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (codep != NULL) 1435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *codep = INVALID; 1445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (formp != NULL) 1455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *formp = INVALID; 1465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return (unsigned char *) readp; 1485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 1495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int 1525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)dwarf_child (die, result) 1535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Dwarf_Die *die; 1545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Dwarf_Die *result; 1555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles){ 1565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Ignore previous errors. */ 1575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (die == NULL) 1585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return -1; 1595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Skip past the last attribute. */ 1615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) void *addr = NULL; 1625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If we already know there are no children do not search. */ 1645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (die->abbrev != DWARF_END_ABBREV 1655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) && (die->abbrev == NULL || die->abbrev->has_children)) 1665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) addr = __libdw_find_attr (die, INVALID, NULL, NULL); 1675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (unlikely (die->abbrev == (Dwarf_Abbrev *) -1l)) 1685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return -1; 1695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Make sure the DIE really has children. */ 1715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (! die->abbrev->has_children) 1725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* There cannot be any children. */ 1735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 1; 1745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (addr == NULL) 1765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return -1; 1775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* RESULT can be the same as DIE. So preserve what we need. */ 1795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) struct Dwarf_CU *cu = die->cu; 1805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Elf_Data *cu_sec = cu_data (cu); 1815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* It's kosher (just suboptimal) to have a null entry first thing (7.5.3). 1835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) So if this starts with ULEB128 of 0 (even with silly encoding of 0), 1845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) it is a kosher null entry and we do not really have any children. */ 1855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const unsigned char *code = addr; 1865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const unsigned char *endp = (cu_sec->d_buf + cu_sec->d_size); 1875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while (1) 1885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 1895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (unlikely (code >= endp)) /* Truncated section. */ 1905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 1; 1915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (unlikely (*code == 0x80)) 1925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ++code; 1935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) else 1945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 1955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if (unlikely (*code == '\0')) 1975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 1; 1985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Clear the entire DIE structure. This signals we have not yet 2005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) determined any of the information. */ 2015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memset (result, '\0', sizeof (Dwarf_Die)); 2025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 2035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* We have the address. */ 2045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) result->addr = addr; 2055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 2065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Same CU as the parent. */ 2075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) result->cu = cu; 2085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 2095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 0; 2105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 2115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)INTDEF(dwarf_child) 2125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)