1 /* $NetBSD: gelf_phdr.c,v 1.2 2014/03/09 16:58:04 christos Exp $ */
2
3 /*-
4 * Copyright (c) 2006,2008 Joseph Koshy
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30
31 #include <gelf.h>
32 #include <libelf.h>
33 #include <limits.h>
34
35 #include "_libelf.h"
36
37 __RCSID("$NetBSD: gelf_phdr.c,v 1.2 2014/03/09 16:58:04 christos Exp $");
38 ELFTC_VCSID("Id: gelf_phdr.c 2268 2011-12-03 17:05:11Z jkoshy ");
39
40 Elf32_Phdr *
elf32_getphdr(Elf * e)41 elf32_getphdr(Elf *e)
42 {
43 return (_libelf_getphdr(e, ELFCLASS32));
44 }
45
46 Elf64_Phdr *
elf64_getphdr(Elf * e)47 elf64_getphdr(Elf *e)
48 {
49 return (_libelf_getphdr(e, ELFCLASS64));
50 }
51
52 GElf_Phdr *
gelf_getphdr(Elf * e,int index,GElf_Phdr * d)53 gelf_getphdr(Elf *e, int index, GElf_Phdr *d)
54 {
55 int ec;
56 Elf32_Ehdr *eh32;
57 Elf64_Ehdr *eh64;
58 Elf32_Phdr *ep32;
59 Elf64_Phdr *ep64;
60
61 if (d == NULL || e == NULL ||
62 ((ec = e->e_class) != ELFCLASS32 && ec != ELFCLASS64) ||
63 (e->e_kind != ELF_K_ELF) || index < 0) {
64 LIBELF_SET_ERROR(ARGUMENT, 0);
65 return (NULL);
66 }
67
68 if (ec == ELFCLASS32) {
69 if ((eh32 = _libelf_ehdr(e, ELFCLASS32, 0)) == NULL ||
70 ((ep32 = _libelf_getphdr(e, ELFCLASS32)) == NULL))
71 return (NULL);
72
73 if (index >= eh32->e_phnum) {
74 LIBELF_SET_ERROR(ARGUMENT, 0);
75 return (NULL);
76 }
77
78 ep32 += index;
79
80 d->p_type = ep32->p_type;
81 d->p_offset = ep32->p_offset;
82 d->p_vaddr = (Elf64_Addr) ep32->p_vaddr;
83 d->p_paddr = (Elf64_Addr) ep32->p_paddr;
84 d->p_filesz = (Elf64_Xword) ep32->p_filesz;
85 d->p_memsz = (Elf64_Xword) ep32->p_memsz;
86 d->p_flags = ep32->p_flags;
87 d->p_align = (Elf64_Xword) ep32->p_align;
88
89 } else {
90 if ((eh64 = _libelf_ehdr(e, ELFCLASS64, 0)) == NULL ||
91 (ep64 = _libelf_getphdr(e, ELFCLASS64)) == NULL)
92 return (NULL);
93
94 if (index >= eh64->e_phnum) {
95 LIBELF_SET_ERROR(ARGUMENT, 0);
96 return (NULL);
97 }
98
99 ep64 += index;
100
101 *d = *ep64;
102 }
103
104 return (d);
105 }
106
107 Elf32_Phdr *
elf32_newphdr(Elf * e,size_t count)108 elf32_newphdr(Elf *e, size_t count)
109 {
110 return (_libelf_newphdr(e, ELFCLASS32, count));
111 }
112
113 Elf64_Phdr *
elf64_newphdr(Elf * e,size_t count)114 elf64_newphdr(Elf *e, size_t count)
115 {
116 return (_libelf_newphdr(e, ELFCLASS64, count));
117 }
118
119 void *
gelf_newphdr(Elf * e,size_t count)120 gelf_newphdr(Elf *e, size_t count)
121 {
122 if (e == NULL) {
123 LIBELF_SET_ERROR(ARGUMENT, 0);
124 return (NULL);
125 }
126 return (_libelf_newphdr(e, e->e_class, count));
127 }
128
129 int
gelf_update_phdr(Elf * e,int ndx,GElf_Phdr * s)130 gelf_update_phdr(Elf *e, int ndx, GElf_Phdr *s)
131 {
132 int ec, phnum;
133 void *ehdr;
134 Elf32_Phdr *ph32;
135 Elf64_Phdr *ph64;
136
137 if (s == NULL || e == NULL || e->e_kind != ELF_K_ELF ||
138 ((ec = e->e_class) != ELFCLASS32 && ec != ELFCLASS64)) {
139 LIBELF_SET_ERROR(ARGUMENT, 0);
140 return (0);
141 }
142
143 if (e->e_cmd == ELF_C_READ) {
144 LIBELF_SET_ERROR(MODE, 0);
145 return (0);
146 }
147
148 if ((ehdr = _libelf_ehdr(e, ec, 0)) == NULL)
149 return (0);
150
151 if (ec == ELFCLASS32)
152 phnum = ((Elf32_Ehdr *) ehdr)->e_phnum;
153 else
154 phnum = ((Elf64_Ehdr *) ehdr)->e_phnum;
155
156 if (ndx < 0 || ndx > phnum) {
157 LIBELF_SET_ERROR(ARGUMENT, 0);
158 return (0);
159 }
160
161 (void) elf_flagphdr(e, ELF_C_SET, ELF_F_DIRTY);
162
163 if (ec == ELFCLASS64) {
164 ph64 = e->e_u.e_elf.e_phdr.e_phdr64 + ndx;
165 *ph64 = *s;
166 return (1);
167 }
168
169 ph32 = e->e_u.e_elf.e_phdr.e_phdr32 + ndx;
170
171 ph32->p_type = s->p_type;
172 ph32->p_flags = s->p_flags;
173 LIBELF_COPY_U32(ph32, s, p_offset);
174 LIBELF_COPY_U32(ph32, s, p_vaddr);
175 LIBELF_COPY_U32(ph32, s, p_paddr);
176 LIBELF_COPY_U32(ph32, s, p_filesz);
177 LIBELF_COPY_U32(ph32, s, p_memsz);
178 LIBELF_COPY_U32(ph32, s, p_align);
179
180 return (1);
181 }
182