Branch data Line data Source code
1 : : /* Update REL relocation information at given index.
2 : : Copyright (C) 2000, 2001, 2002 Red Hat, Inc.
3 : : This file is part of elfutils.
4 : : Written by Ulrich Drepper <drepper@redhat.com>, 2000.
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 <gelf.h>
35 : : #include <stdlib.h>
36 : :
37 : : #include "libelfP.h"
38 : :
39 : :
40 : : int
41 : 7015 : gelf_update_rel (Elf_Data *dst, int ndx, GElf_Rel *src)
42 : : {
43 : 7015 : Elf_Data_Scn *data_scn = (Elf_Data_Scn *) dst;
44 : : Elf_Scn *scn;
45 : 7015 : int result = 0;
46 : :
47 [ + - ]: 7015 : if (dst == NULL)
48 : : return 0;
49 : :
50 [ - + ]: 7015 : if (unlikely (ndx < 0))
51 : : {
52 : 0 : __libelf_seterrno (ELF_E_INVALID_INDEX);
53 : 0 : return 0;
54 : : }
55 : :
56 [ - + ]: 7015 : if (unlikely (data_scn->d.d_type != ELF_T_REL))
57 : : {
58 : : /* The type of the data better should match. */
59 : 0 : __libelf_seterrno (ELF_E_DATA_MISMATCH);
60 : 0 : return 0;
61 : : }
62 : :
63 : 7015 : scn = data_scn->s;
64 : : rwlock_wrlock (scn->elf->lock);
65 : :
66 [ + - ]: 7015 : if (scn->elf->class == ELFCLASS32)
67 : : {
68 : : Elf32_Rel *rel;
69 : :
70 : : /* There is the possibility that the values in the input are
71 : : too large. */
72 [ + - ]: 7015 : if (unlikely (src->r_offset > 0xffffffffull)
73 [ + - ]: 7015 : || unlikely (GELF_R_SYM (src->r_info) > 0xffffff)
74 [ - + ]: 7015 : || unlikely (GELF_R_TYPE (src->r_info) > 0xff))
75 : : {
76 : 0 : __libelf_seterrno (ELF_E_INVALID_DATA);
77 : 0 : goto out;
78 : : }
79 : :
80 : : /* Check whether we have to resize the data buffer. */
81 [ - + ]: 7015 : if (unlikely ((ndx + 1) * sizeof (Elf32_Rel) > data_scn->d.d_size))
82 : : {
83 : 0 : __libelf_seterrno (ELF_E_INVALID_INDEX);
84 : 0 : goto out;
85 : : }
86 : :
87 : 7015 : rel = &((Elf32_Rel *) data_scn->d.d_buf)[ndx];
88 : :
89 : 7015 : rel->r_offset = src->r_offset;
90 : 7015 : rel->r_info = ELF32_R_INFO (GELF_R_SYM (src->r_info),
91 : : GELF_R_TYPE (src->r_info));
92 : : }
93 : : else
94 : : {
95 : : /* Check whether we have to resize the data buffer. */
96 [ # # ]: 0 : if (unlikely ((ndx + 1) * sizeof (Elf64_Rel) > data_scn->d.d_size))
97 : : {
98 : 0 : __libelf_seterrno (ELF_E_INVALID_INDEX);
99 : 0 : goto out;
100 : : }
101 : :
102 : 0 : ((Elf64_Rel *) data_scn->d.d_buf)[ndx] = *src;
103 : : }
104 : :
105 : 7015 : result = 1;
106 : :
107 : : /* Mark the section as modified. */
108 : 7015 : scn->flags |= ELF_F_DIRTY;
109 : :
110 : : out:
111 : : rwlock_unlock (scn->elf->lock);
112 : :
113 : 7015 : return result;
114 : : }
|