Branch data Line data Source code
1 : : /* Return signed constant represented by attribute. 2 : : Copyright (C) 2003, 2005, 2014, 2017 Red Hat, Inc. 3 : : This file is part of elfutils. 4 : : Written by Ulrich Drepper <drepper@redhat.com>, 2003. 5 : : 6 : : This file is free software; you can redistribute it and/or modify 7 : : it under the terms of either 8 : : 9 : : * the GNU Lesser General Public License as published by the Free 10 : : Software Foundation; either version 3 of the License, or (at 11 : : your option) any later version 12 : : 13 : : or 14 : : 15 : : * the GNU General Public License as published by the Free 16 : : Software Foundation; either version 2 of the License, or (at 17 : : your option) any later version 18 : : 19 : : or both in parallel, as here. 20 : : 21 : : elfutils is distributed in the hope that it will be useful, but 22 : : WITHOUT ANY WARRANTY; without even the implied warranty of 23 : : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 24 : : General Public License for more details. 25 : : 26 : : You should have received copies of the GNU General Public License and 27 : : the GNU Lesser General Public License along with this program. If 28 : : not, see <http://www.gnu.org/licenses/>. */ 29 : : 30 : : #ifdef HAVE_CONFIG_H 31 : : # include <config.h> 32 : : #endif 33 : : 34 : : #include <dwarf.h> 35 : : #include "libdwP.h" 36 : : 37 : : 38 : : int 39 : 343490 : dwarf_formsdata (Dwarf_Attribute *attr, Dwarf_Sword *return_sval) 40 : : { 41 [ - + ]: 343490 : if (attr == NULL) 42 : : return -1; 43 : : 44 : 343490 : const unsigned char *datap = attr->valp; 45 : 343490 : const unsigned char *endp = attr->cu->endp; 46 : : 47 [ + + - - : 343490 : switch (attr->form) + - + - ] 48 : : { 49 : 636 : case DW_FORM_data1: 50 [ - + ]: 636 : if (datap + 1 > endp) 51 : : { 52 : 0 : invalid: 53 : 0 : __libdw_seterrno (DWARF_E_INVALID_DWARF); 54 : 0 : return -1; 55 : : } 56 : 636 : *return_sval = (signed char) *attr->valp; 57 : 636 : break; 58 : : 59 : 2 : case DW_FORM_data2: 60 [ - + ]: 2 : if (datap + 2 > endp) 61 : 0 : goto invalid; 62 [ - + ]: 2 : *return_sval = read_2sbyte_unaligned (attr->cu->dbg, attr->valp); 63 : 2 : break; 64 : : 65 : 0 : case DW_FORM_data4: 66 [ # # ]: 0 : if (datap + 4 > endp) 67 : 0 : goto invalid; 68 [ # # ]: 0 : *return_sval = read_4sbyte_unaligned (attr->cu->dbg, attr->valp); 69 : 0 : break; 70 : : 71 : 0 : case DW_FORM_data8: 72 [ # # ]: 0 : if (datap + 8 > endp) 73 : 0 : goto invalid; 74 [ # # ]: 0 : *return_sval = read_8sbyte_unaligned (attr->cu->dbg, attr->valp); 75 : 0 : break; 76 : : 77 : 20 : case DW_FORM_sdata: 78 [ - + ]: 20 : if (datap + 1 > endp) 79 : 0 : goto invalid; 80 : 20 : get_sleb128 (*return_sval, datap, endp); 81 : 20 : break; 82 : : 83 : 0 : case DW_FORM_udata: 84 [ # # ]: 0 : if (datap + 1 > endp) 85 : 0 : goto invalid; 86 : 0 : get_uleb128 (*return_sval, datap, endp); 87 : 0 : break; 88 : : 89 : 342832 : case DW_FORM_implicit_const: 90 : : // The data comes from the abbrev, which has been bounds checked. 91 : 342832 : get_sleb128_unchecked (*return_sval, datap); 92 : 342832 : break; 93 : : 94 : 0 : default: 95 : 0 : __libdw_seterrno (DWARF_E_NO_CONSTANT); 96 : 0 : return -1; 97 : : } 98 : : 99 : : return 0; 100 : : } 101 : : INTDEF(dwarf_formsdata)