xref: /minix3/external/bsd/elftoolchain/dist/libelf/gelf_shdr.c (revision 0a6a1f1d05b60e214de2f05a7310ddd1f0e590e7)
1*0a6a1f1dSLionel Sambuc /*	$NetBSD: gelf_shdr.c,v 1.2 2014/03/09 16:58:04 christos Exp $	*/
2*0a6a1f1dSLionel Sambuc 
3*0a6a1f1dSLionel Sambuc /*-
4*0a6a1f1dSLionel Sambuc  * Copyright (c) 2006,2008 Joseph Koshy
5*0a6a1f1dSLionel Sambuc  * All rights reserved.
6*0a6a1f1dSLionel Sambuc  *
7*0a6a1f1dSLionel Sambuc  * Redistribution and use in source and binary forms, with or without
8*0a6a1f1dSLionel Sambuc  * modification, are permitted provided that the following conditions
9*0a6a1f1dSLionel Sambuc  * are met:
10*0a6a1f1dSLionel Sambuc  * 1. Redistributions of source code must retain the above copyright
11*0a6a1f1dSLionel Sambuc  *    notice, this list of conditions and the following disclaimer.
12*0a6a1f1dSLionel Sambuc  * 2. Redistributions in binary form must reproduce the above copyright
13*0a6a1f1dSLionel Sambuc  *    notice, this list of conditions and the following disclaimer in the
14*0a6a1f1dSLionel Sambuc  *    documentation and/or other materials provided with the distribution.
15*0a6a1f1dSLionel Sambuc  *
16*0a6a1f1dSLionel Sambuc  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17*0a6a1f1dSLionel Sambuc  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18*0a6a1f1dSLionel Sambuc  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19*0a6a1f1dSLionel Sambuc  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20*0a6a1f1dSLionel Sambuc  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21*0a6a1f1dSLionel Sambuc  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22*0a6a1f1dSLionel Sambuc  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23*0a6a1f1dSLionel Sambuc  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24*0a6a1f1dSLionel Sambuc  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25*0a6a1f1dSLionel Sambuc  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26*0a6a1f1dSLionel Sambuc  * SUCH DAMAGE.
27*0a6a1f1dSLionel Sambuc  */
28*0a6a1f1dSLionel Sambuc 
29*0a6a1f1dSLionel Sambuc #if HAVE_NBTOOL_CONFIG_H
30*0a6a1f1dSLionel Sambuc # include "nbtool_config.h"
31*0a6a1f1dSLionel Sambuc #endif
32*0a6a1f1dSLionel Sambuc 
33*0a6a1f1dSLionel Sambuc #include <sys/cdefs.h>
34*0a6a1f1dSLionel Sambuc 
35*0a6a1f1dSLionel Sambuc #include <assert.h>
36*0a6a1f1dSLionel Sambuc #include <gelf.h>
37*0a6a1f1dSLionel Sambuc #include <libelf.h>
38*0a6a1f1dSLionel Sambuc #include <limits.h>
39*0a6a1f1dSLionel Sambuc 
40*0a6a1f1dSLionel Sambuc #include "_libelf.h"
41*0a6a1f1dSLionel Sambuc 
42*0a6a1f1dSLionel Sambuc __RCSID("$NetBSD: gelf_shdr.c,v 1.2 2014/03/09 16:58:04 christos Exp $");
43*0a6a1f1dSLionel Sambuc ELFTC_VCSID("Id: gelf_shdr.c 2268 2011-12-03 17:05:11Z jkoshy ");
44*0a6a1f1dSLionel Sambuc 
45*0a6a1f1dSLionel Sambuc Elf32_Shdr *
elf32_getshdr(Elf_Scn * s)46*0a6a1f1dSLionel Sambuc elf32_getshdr(Elf_Scn *s)
47*0a6a1f1dSLionel Sambuc {
48*0a6a1f1dSLionel Sambuc 	return (_libelf_getshdr(s, ELFCLASS32));
49*0a6a1f1dSLionel Sambuc }
50*0a6a1f1dSLionel Sambuc 
51*0a6a1f1dSLionel Sambuc Elf64_Shdr *
elf64_getshdr(Elf_Scn * s)52*0a6a1f1dSLionel Sambuc elf64_getshdr(Elf_Scn *s)
53*0a6a1f1dSLionel Sambuc {
54*0a6a1f1dSLionel Sambuc 	return (_libelf_getshdr(s, ELFCLASS64));
55*0a6a1f1dSLionel Sambuc }
56*0a6a1f1dSLionel Sambuc 
57*0a6a1f1dSLionel Sambuc GElf_Shdr *
gelf_getshdr(Elf_Scn * s,GElf_Shdr * d)58*0a6a1f1dSLionel Sambuc gelf_getshdr(Elf_Scn *s, GElf_Shdr *d)
59*0a6a1f1dSLionel Sambuc {
60*0a6a1f1dSLionel Sambuc 	int ec;
61*0a6a1f1dSLionel Sambuc 	void *sh;
62*0a6a1f1dSLionel Sambuc 	Elf32_Shdr *sh32;
63*0a6a1f1dSLionel Sambuc 	Elf64_Shdr *sh64;
64*0a6a1f1dSLionel Sambuc 
65*0a6a1f1dSLionel Sambuc 	if (d == NULL) {
66*0a6a1f1dSLionel Sambuc 		LIBELF_SET_ERROR(ARGUMENT, 0);
67*0a6a1f1dSLionel Sambuc 		return (NULL);
68*0a6a1f1dSLionel Sambuc 	}
69*0a6a1f1dSLionel Sambuc 
70*0a6a1f1dSLionel Sambuc 	if ((sh = _libelf_getshdr(s, ELFCLASSNONE)) == NULL)
71*0a6a1f1dSLionel Sambuc 		return (NULL);
72*0a6a1f1dSLionel Sambuc 
73*0a6a1f1dSLionel Sambuc 	ec = s->s_elf->e_class;
74*0a6a1f1dSLionel Sambuc 	assert(ec == ELFCLASS32 || ec == ELFCLASS64);
75*0a6a1f1dSLionel Sambuc 
76*0a6a1f1dSLionel Sambuc 	if (ec == ELFCLASS32) {
77*0a6a1f1dSLionel Sambuc 		sh32 = (Elf32_Shdr *) sh;
78*0a6a1f1dSLionel Sambuc 
79*0a6a1f1dSLionel Sambuc 		d->sh_name      = sh32->sh_name;
80*0a6a1f1dSLionel Sambuc 		d->sh_type      = sh32->sh_type;
81*0a6a1f1dSLionel Sambuc 		d->sh_flags     = (Elf64_Xword) sh32->sh_flags;
82*0a6a1f1dSLionel Sambuc 		d->sh_addr      = (Elf64_Addr) sh32->sh_addr;
83*0a6a1f1dSLionel Sambuc 		d->sh_offset    = (Elf64_Off) sh32->sh_offset;
84*0a6a1f1dSLionel Sambuc 		d->sh_size      = (Elf64_Xword) sh32->sh_size;
85*0a6a1f1dSLionel Sambuc 		d->sh_link      = sh32->sh_link;
86*0a6a1f1dSLionel Sambuc 		d->sh_info      = sh32->sh_info;
87*0a6a1f1dSLionel Sambuc 		d->sh_addralign = (Elf64_Xword) sh32->sh_addralign;
88*0a6a1f1dSLionel Sambuc 		d->sh_entsize   = (Elf64_Xword) sh32->sh_entsize;
89*0a6a1f1dSLionel Sambuc 	} else {
90*0a6a1f1dSLionel Sambuc 		sh64 = (Elf64_Shdr *) sh;
91*0a6a1f1dSLionel Sambuc 		*d = *sh64;
92*0a6a1f1dSLionel Sambuc 	}
93*0a6a1f1dSLionel Sambuc 
94*0a6a1f1dSLionel Sambuc 	return (d);
95*0a6a1f1dSLionel Sambuc }
96*0a6a1f1dSLionel Sambuc 
97*0a6a1f1dSLionel Sambuc int
gelf_update_shdr(Elf_Scn * scn,GElf_Shdr * s)98*0a6a1f1dSLionel Sambuc gelf_update_shdr(Elf_Scn *scn, GElf_Shdr *s)
99*0a6a1f1dSLionel Sambuc {
100*0a6a1f1dSLionel Sambuc 	int ec;
101*0a6a1f1dSLionel Sambuc 	Elf *e;
102*0a6a1f1dSLionel Sambuc 	Elf32_Shdr *sh32;
103*0a6a1f1dSLionel Sambuc 
104*0a6a1f1dSLionel Sambuc 
105*0a6a1f1dSLionel Sambuc 	if (s == NULL || scn == NULL || (e = scn->s_elf) == NULL ||
106*0a6a1f1dSLionel Sambuc 	    e->e_kind != ELF_K_ELF ||
107*0a6a1f1dSLionel Sambuc 	    ((ec = e->e_class) != ELFCLASS32 && ec != ELFCLASS64)) {
108*0a6a1f1dSLionel Sambuc 		LIBELF_SET_ERROR(ARGUMENT, 0);
109*0a6a1f1dSLionel Sambuc 		return (0);
110*0a6a1f1dSLionel Sambuc 	}
111*0a6a1f1dSLionel Sambuc 
112*0a6a1f1dSLionel Sambuc 	if (e->e_cmd == ELF_C_READ) {
113*0a6a1f1dSLionel Sambuc 		LIBELF_SET_ERROR(MODE, 0);
114*0a6a1f1dSLionel Sambuc 		return (0);
115*0a6a1f1dSLionel Sambuc 	}
116*0a6a1f1dSLionel Sambuc 
117*0a6a1f1dSLionel Sambuc 	(void) elf_flagscn(scn, ELF_C_SET, ELF_F_DIRTY);
118*0a6a1f1dSLionel Sambuc 
119*0a6a1f1dSLionel Sambuc 	if (ec == ELFCLASS64) {
120*0a6a1f1dSLionel Sambuc 		scn->s_shdr.s_shdr64 = *s;
121*0a6a1f1dSLionel Sambuc 		return (1);
122*0a6a1f1dSLionel Sambuc 	}
123*0a6a1f1dSLionel Sambuc 
124*0a6a1f1dSLionel Sambuc 	sh32 = &scn->s_shdr.s_shdr32;
125*0a6a1f1dSLionel Sambuc 
126*0a6a1f1dSLionel Sambuc 	sh32->sh_name	 =  s->sh_name;
127*0a6a1f1dSLionel Sambuc 	sh32->sh_type	 =  s->sh_type;
128*0a6a1f1dSLionel Sambuc 	LIBELF_COPY_U32(sh32, s, sh_flags);
129*0a6a1f1dSLionel Sambuc 	LIBELF_COPY_U32(sh32, s, sh_addr);
130*0a6a1f1dSLionel Sambuc 	LIBELF_COPY_U32(sh32, s, sh_offset);
131*0a6a1f1dSLionel Sambuc 	LIBELF_COPY_U32(sh32, s, sh_size);
132*0a6a1f1dSLionel Sambuc 	sh32->sh_link	 =  s->sh_link;
133*0a6a1f1dSLionel Sambuc 	sh32->sh_info	 =  s->sh_info;
134*0a6a1f1dSLionel Sambuc 	LIBELF_COPY_U32(sh32, s, sh_addralign);
135*0a6a1f1dSLionel Sambuc 	LIBELF_COPY_U32(sh32, s, sh_entsize);
136*0a6a1f1dSLionel Sambuc 
137*0a6a1f1dSLionel Sambuc 	return (1);
138*0a6a1f1dSLionel Sambuc }
139