Branch data Line data Source code
1 : : /* Get symbol version information at the given index.
2 : : Copyright (C) 1999, 2000, 2001, 2002 Red Hat, Inc.
3 : : This file is part of elfutils.
4 : : Written by Ulrich Drepper <drepper@redhat.com>, 1999.
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 <assert.h>
35 : : #include <gelf.h>
36 : : #include <string.h>
37 : :
38 : : #include "libelfP.h"
39 : :
40 : :
41 : : GElf_Versym *
42 : 6579 : gelf_getversym (data, ndx, dst)
43 : : Elf_Data *data;
44 : : int ndx;
45 : : GElf_Versym *dst;
46 : : {
47 : 6579 : Elf_Data_Scn *data_scn = (Elf_Data_Scn *) data;
48 : : Elf_Scn *scn;
49 : : GElf_Versym *result;
50 : :
51 [ + - ]: 6579 : if (data == NULL)
52 : : return NULL;
53 : :
54 [ - + ]: 6579 : if (unlikely (data->d_type != ELF_T_HALF))
55 : : {
56 : 0 : __libelf_seterrno (ELF_E_INVALID_HANDLE);
57 : 0 : return NULL;
58 : : }
59 : :
60 : : /* This is the one place where we have to take advantage of the fact
61 : : that an `Elf_Data' pointer is also a pointer to `Elf_Data_Scn'.
62 : : The interface is broken so that it requires this hack. */
63 : 6579 : scn = data_scn->s;
64 : :
65 : : /* It's easy to handle this type. It has the same size for 32 and
66 : : 64 bit objects. */
67 : : assert (sizeof (GElf_Versym) == sizeof (Elf32_Versym));
68 : : assert (sizeof (GElf_Versym) == sizeof (Elf64_Versym));
69 : :
70 : : rwlock_rdlock (scn->elf->lock);
71 : :
72 : : /* The data is already in the correct form. Just make sure the
73 : : index is OK. */
74 [ - + ]: 6579 : if (unlikely ((ndx + 1) * sizeof (GElf_Versym) > data->d_size))
75 : : {
76 : 0 : __libelf_seterrno (ELF_E_INVALID_INDEX);
77 : 0 : result = NULL;
78 : : }
79 : : else
80 : : {
81 : 6579 : *dst = ((GElf_Versym *) data->d_buf)[ndx];
82 : :
83 : 6579 : result = dst;
84 : : }
85 : :
86 : : rwlock_unlock (scn->elf->lock);
87 : :
88 : 6579 : return result;
89 : : }
|