xref: /freebsd/contrib/elftoolchain/libelf/elf_flag.c (revision fed1ca4b719c56c930f2259d80663cd34be812bb)
1 /*-
2  * Copyright (c) 2006,2008-2009,2011 Joseph Koshy
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  */
26 
27 #include <libelf.h>
28 
29 #include "_libelf.h"
30 
31 ELFTC_VCSID("$Id: elf_flag.c 3174 2015-03-27 17:13:41Z emaste $");
32 
33 unsigned int
34 elf_flagarhdr(Elf_Arhdr *a, Elf_Cmd c, unsigned int flags)
35 {
36 	unsigned int r;
37 
38 	if (a == NULL)
39 		return (0);
40 
41 	if ((c != ELF_C_SET && c != ELF_C_CLR) ||
42 	    (flags & ~ELF_F_DIRTY) != 0) {
43 		LIBELF_SET_ERROR(ARGUMENT, 0);
44 		return (0);
45 	}
46 
47 	if (c == ELF_C_SET)
48 		r = a->ar_flags |= flags;
49 	else
50 		r = a->ar_flags &= ~flags;
51 
52 	return (r & LIBELF_F_API_MASK);
53 }
54 
55 unsigned int
56 elf_flagdata(Elf_Data *d, Elf_Cmd c, unsigned int flags)
57 {
58 	unsigned int r;
59 	struct _Libelf_Data *ld;
60 
61 	if (d == NULL)
62 		return (0);
63 
64 	if ((c != ELF_C_SET && c != ELF_C_CLR) ||
65 	    (flags & ~ELF_F_DIRTY) != 0) {
66 		LIBELF_SET_ERROR(ARGUMENT, 0);
67 		return (0);
68 	}
69 
70 	ld = (struct _Libelf_Data *) d;
71 
72 	if (c == ELF_C_SET)
73 		r = ld->d_flags |= flags;
74 	else
75 		r = ld->d_flags &= ~flags;
76 
77 	return (r & LIBELF_F_API_MASK);
78 }
79 
80 unsigned int
81 elf_flagehdr(Elf *e, Elf_Cmd c, unsigned int flags)
82 {
83 	int ec;
84 	void *ehdr;
85 
86 	if (e == NULL)
87 		return (0);
88 
89 	if ((c != ELF_C_SET && c != ELF_C_CLR) ||
90 	    (e->e_kind != ELF_K_ELF) || (flags & ~ELF_F_DIRTY) != 0 ||
91 	    ((ec = e->e_class) != ELFCLASS32 && ec != ELFCLASS64)) {
92 		LIBELF_SET_ERROR(ARGUMENT, 0);
93 		return (0);
94 	}
95 
96 	if (ec == ELFCLASS32)
97 		ehdr = e->e_u.e_elf.e_ehdr.e_ehdr32;
98 	else
99 		ehdr = e->e_u.e_elf.e_ehdr.e_ehdr64;
100 
101 	if (ehdr == NULL) {
102 		LIBELF_SET_ERROR(SEQUENCE, 0);
103 		return (0);
104 	}
105 
106 	return (elf_flagelf(e, c, flags));
107 }
108 
109 unsigned int
110 elf_flagelf(Elf *e, Elf_Cmd c, unsigned int flags)
111 {
112 	unsigned int r;
113 
114 	if (e == NULL)
115 		return (0);
116 
117 	if ((c != ELF_C_SET && c != ELF_C_CLR) ||
118 	    (e->e_kind != ELF_K_ELF) ||
119 	    (flags & ~(ELF_F_ARCHIVE | ELF_F_ARCHIVE_SYSV |
120 	    ELF_F_DIRTY | ELF_F_LAYOUT)) != 0) {
121 		LIBELF_SET_ERROR(ARGUMENT, 0);
122 		return (0);
123 	}
124 
125 	if ((flags & ELF_F_ARCHIVE_SYSV) && (flags & ELF_F_ARCHIVE) == 0) {
126 		LIBELF_SET_ERROR(ARGUMENT, 0);
127 		return (0);
128 	}
129 
130 	if ((flags & ELF_F_ARCHIVE) && e->e_cmd != ELF_C_WRITE) {
131 		LIBELF_SET_ERROR(MODE, 0);
132 		return (0);
133 	}
134 
135 	if (c == ELF_C_SET)
136 		r = e->e_flags |= flags;
137 	else
138 		r = e->e_flags &= ~flags;
139 	return (r & LIBELF_F_API_MASK);
140 }
141 
142 unsigned int
143 elf_flagphdr(Elf *e, Elf_Cmd c, unsigned int flags)
144 {
145 	int ec;
146 	void *phdr;
147 
148 	if (e == NULL)
149 		return (0);
150 
151 	if ((c != ELF_C_SET && c != ELF_C_CLR) ||
152 	    (e->e_kind != ELF_K_ELF) || (flags & ~ELF_F_DIRTY) != 0 ||
153 	    ((ec = e->e_class) != ELFCLASS32 && ec != ELFCLASS64)) {
154 		LIBELF_SET_ERROR(ARGUMENT, 0);
155 		return (0);
156 	}
157 
158 	if (ec == ELFCLASS32)
159 		phdr = e->e_u.e_elf.e_phdr.e_phdr32;
160 	else
161 		phdr = e->e_u.e_elf.e_phdr.e_phdr64;
162 
163 	if (phdr == NULL) {
164 		LIBELF_SET_ERROR(SEQUENCE, 0);
165 		return (0);
166 	}
167 
168 	return (elf_flagelf(e, c, flags));
169 }
170 
171 unsigned int
172 elf_flagscn(Elf_Scn *s, Elf_Cmd c, unsigned int flags)
173 {
174 	unsigned int r;
175 
176 	if (s == NULL)
177 		return (0);
178 
179 	if ((c != ELF_C_SET && c != ELF_C_CLR) ||
180 	    (flags & ~ELF_F_DIRTY) != 0) {
181 		LIBELF_SET_ERROR(ARGUMENT, 0);
182 		return (0);
183 	}
184 
185 	if (c == ELF_C_SET)
186 		r = s->s_flags |= flags;
187 	else
188 		r = s->s_flags &= ~flags;
189 	return (r & LIBELF_F_API_MASK);
190 }
191 
192 unsigned int
193 elf_flagshdr(Elf_Scn *s, Elf_Cmd c, unsigned int flags)
194 {
195 	return (elf_flagscn(s, c, flags));
196 }
197