xref: /minix3/external/bsd/elftoolchain/dist/libelf/gelf_move.c (revision 0a6a1f1d05b60e214de2f05a7310ddd1f0e590e7)
1*0a6a1f1dSLionel Sambuc /*	$NetBSD: gelf_move.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 <limits.h>
38*0a6a1f1dSLionel Sambuc 
39*0a6a1f1dSLionel Sambuc #include "_libelf.h"
40*0a6a1f1dSLionel Sambuc 
41*0a6a1f1dSLionel Sambuc __RCSID("$NetBSD: gelf_move.c,v 1.2 2014/03/09 16:58:04 christos Exp $");
42*0a6a1f1dSLionel Sambuc ELFTC_VCSID("Id: gelf_move.c 2272 2011-12-03 17:07:31Z jkoshy ");
43*0a6a1f1dSLionel Sambuc 
44*0a6a1f1dSLionel Sambuc GElf_Move *
gelf_getmove(Elf_Data * ed,int ndx,GElf_Move * dst)45*0a6a1f1dSLionel Sambuc gelf_getmove(Elf_Data *ed, int ndx, GElf_Move *dst)
46*0a6a1f1dSLionel Sambuc {
47*0a6a1f1dSLionel Sambuc 	int ec;
48*0a6a1f1dSLionel Sambuc 	Elf *e;
49*0a6a1f1dSLionel Sambuc 	size_t msz;
50*0a6a1f1dSLionel Sambuc 	Elf_Scn *scn;
51*0a6a1f1dSLionel Sambuc 	uint32_t sh_type;
52*0a6a1f1dSLionel Sambuc 	Elf32_Move *move32;
53*0a6a1f1dSLionel Sambuc 	Elf64_Move *move64;
54*0a6a1f1dSLionel Sambuc 	struct _Libelf_Data *d;
55*0a6a1f1dSLionel Sambuc 
56*0a6a1f1dSLionel Sambuc 	d = (struct _Libelf_Data *) ed;
57*0a6a1f1dSLionel Sambuc 
58*0a6a1f1dSLionel Sambuc 	if (d == NULL || ndx < 0 || dst == NULL ||
59*0a6a1f1dSLionel Sambuc 	    (scn = d->d_scn) == NULL ||
60*0a6a1f1dSLionel Sambuc 	    (e = scn->s_elf) == NULL) {
61*0a6a1f1dSLionel Sambuc 		LIBELF_SET_ERROR(ARGUMENT, 0);
62*0a6a1f1dSLionel Sambuc 		return (NULL);
63*0a6a1f1dSLionel Sambuc 	}
64*0a6a1f1dSLionel Sambuc 
65*0a6a1f1dSLionel Sambuc 	ec = e->e_class;
66*0a6a1f1dSLionel Sambuc 	assert(ec == ELFCLASS32 || ec == ELFCLASS64);
67*0a6a1f1dSLionel Sambuc 
68*0a6a1f1dSLionel Sambuc 	if (ec == ELFCLASS32)
69*0a6a1f1dSLionel Sambuc 		sh_type = scn->s_shdr.s_shdr32.sh_type;
70*0a6a1f1dSLionel Sambuc 	else
71*0a6a1f1dSLionel Sambuc 		sh_type = scn->s_shdr.s_shdr64.sh_type;
72*0a6a1f1dSLionel Sambuc 
73*0a6a1f1dSLionel Sambuc 	if (_libelf_xlate_shtype(sh_type) != ELF_T_MOVE) {
74*0a6a1f1dSLionel Sambuc 		LIBELF_SET_ERROR(ARGUMENT, 0);
75*0a6a1f1dSLionel Sambuc 		return (NULL);
76*0a6a1f1dSLionel Sambuc 	}
77*0a6a1f1dSLionel Sambuc 
78*0a6a1f1dSLionel Sambuc 	msz = _libelf_msize(ELF_T_MOVE, ec, e->e_version);
79*0a6a1f1dSLionel Sambuc 
80*0a6a1f1dSLionel Sambuc 	assert(msz > 0);
81*0a6a1f1dSLionel Sambuc 
82*0a6a1f1dSLionel Sambuc 	if (msz * ndx >= d->d_data.d_size) {
83*0a6a1f1dSLionel Sambuc 		LIBELF_SET_ERROR(ARGUMENT, 0);
84*0a6a1f1dSLionel Sambuc 		return (NULL);
85*0a6a1f1dSLionel Sambuc 	}
86*0a6a1f1dSLionel Sambuc 
87*0a6a1f1dSLionel Sambuc 	if (ec == ELFCLASS32) {
88*0a6a1f1dSLionel Sambuc 
89*0a6a1f1dSLionel Sambuc 		move32 = (Elf32_Move *) d->d_data.d_buf + ndx;
90*0a6a1f1dSLionel Sambuc 
91*0a6a1f1dSLionel Sambuc 		dst->m_value   = move32->m_value;
92*0a6a1f1dSLionel Sambuc 		dst->m_info    = (Elf64_Xword) move32->m_info;
93*0a6a1f1dSLionel Sambuc 		dst->m_poffset = (Elf64_Xword) move32->m_poffset;
94*0a6a1f1dSLionel Sambuc 		dst->m_repeat  = move32->m_repeat;
95*0a6a1f1dSLionel Sambuc 		dst->m_stride = move32->m_stride;
96*0a6a1f1dSLionel Sambuc 	} else {
97*0a6a1f1dSLionel Sambuc 
98*0a6a1f1dSLionel Sambuc 		move64 = (Elf64_Move *) d->d_data.d_buf + ndx;
99*0a6a1f1dSLionel Sambuc 
100*0a6a1f1dSLionel Sambuc 		*dst = *move64;
101*0a6a1f1dSLionel Sambuc 	}
102*0a6a1f1dSLionel Sambuc 
103*0a6a1f1dSLionel Sambuc 	return (dst);
104*0a6a1f1dSLionel Sambuc }
105*0a6a1f1dSLionel Sambuc 
106*0a6a1f1dSLionel Sambuc int
gelf_update_move(Elf_Data * ed,int ndx,GElf_Move * gm)107*0a6a1f1dSLionel Sambuc gelf_update_move(Elf_Data *ed, int ndx, GElf_Move *gm)
108*0a6a1f1dSLionel Sambuc {
109*0a6a1f1dSLionel Sambuc 	int ec;
110*0a6a1f1dSLionel Sambuc 	Elf *e;
111*0a6a1f1dSLionel Sambuc 	size_t msz;
112*0a6a1f1dSLionel Sambuc 	Elf_Scn *scn;
113*0a6a1f1dSLionel Sambuc 	uint32_t sh_type;
114*0a6a1f1dSLionel Sambuc 	Elf32_Move *move32;
115*0a6a1f1dSLionel Sambuc 	Elf64_Move *move64;
116*0a6a1f1dSLionel Sambuc 	struct _Libelf_Data *d;
117*0a6a1f1dSLionel Sambuc 
118*0a6a1f1dSLionel Sambuc 	d = (struct _Libelf_Data *) ed;
119*0a6a1f1dSLionel Sambuc 
120*0a6a1f1dSLionel Sambuc 	if (d == NULL || ndx < 0 || gm == NULL ||
121*0a6a1f1dSLionel Sambuc 	    (scn = d->d_scn) == NULL ||
122*0a6a1f1dSLionel Sambuc 	    (e = scn->s_elf) == NULL) {
123*0a6a1f1dSLionel Sambuc 		LIBELF_SET_ERROR(ARGUMENT, 0);
124*0a6a1f1dSLionel Sambuc 		return (0);
125*0a6a1f1dSLionel Sambuc 	}
126*0a6a1f1dSLionel Sambuc 
127*0a6a1f1dSLionel Sambuc 	ec = e->e_class;
128*0a6a1f1dSLionel Sambuc 	assert(ec == ELFCLASS32 || ec == ELFCLASS64);
129*0a6a1f1dSLionel Sambuc 
130*0a6a1f1dSLionel Sambuc 	if (ec == ELFCLASS32)
131*0a6a1f1dSLionel Sambuc 		sh_type = scn->s_shdr.s_shdr32.sh_type;
132*0a6a1f1dSLionel Sambuc 	else
133*0a6a1f1dSLionel Sambuc 		sh_type = scn->s_shdr.s_shdr64.sh_type;
134*0a6a1f1dSLionel Sambuc 
135*0a6a1f1dSLionel Sambuc 	if (_libelf_xlate_shtype(sh_type) != ELF_T_MOVE) {
136*0a6a1f1dSLionel Sambuc 		LIBELF_SET_ERROR(ARGUMENT, 0);
137*0a6a1f1dSLionel Sambuc 		return (0);
138*0a6a1f1dSLionel Sambuc 	}
139*0a6a1f1dSLionel Sambuc 
140*0a6a1f1dSLionel Sambuc 	msz = _libelf_msize(ELF_T_MOVE, ec, e->e_version);
141*0a6a1f1dSLionel Sambuc 	assert(msz > 0);
142*0a6a1f1dSLionel Sambuc 
143*0a6a1f1dSLionel Sambuc 	if (msz * ndx >= d->d_data.d_size) {
144*0a6a1f1dSLionel Sambuc 		LIBELF_SET_ERROR(ARGUMENT, 0);
145*0a6a1f1dSLionel Sambuc 		return (0);
146*0a6a1f1dSLionel Sambuc 	}
147*0a6a1f1dSLionel Sambuc 
148*0a6a1f1dSLionel Sambuc 	if (ec == ELFCLASS32) {
149*0a6a1f1dSLionel Sambuc 		move32 = (Elf32_Move *) d->d_data.d_buf + ndx;
150*0a6a1f1dSLionel Sambuc 
151*0a6a1f1dSLionel Sambuc 		move32->m_value  = gm->m_value;
152*0a6a1f1dSLionel Sambuc 		LIBELF_COPY_U32(move32, gm, m_info);
153*0a6a1f1dSLionel Sambuc 		LIBELF_COPY_U32(move32, gm, m_poffset);
154*0a6a1f1dSLionel Sambuc 		move32->m_repeat  = gm->m_repeat;
155*0a6a1f1dSLionel Sambuc 		move32->m_stride = gm->m_stride;
156*0a6a1f1dSLionel Sambuc 
157*0a6a1f1dSLionel Sambuc 	} else {
158*0a6a1f1dSLionel Sambuc 		move64 = (Elf64_Move *) d->d_data.d_buf + ndx;
159*0a6a1f1dSLionel Sambuc 
160*0a6a1f1dSLionel Sambuc 		*move64 = *gm;
161*0a6a1f1dSLionel Sambuc 	}
162*0a6a1f1dSLionel Sambuc 
163*0a6a1f1dSLionel Sambuc 	return (1);
164*0a6a1f1dSLionel Sambuc }
165