aix.h (TARGET_IEEEQUAD_DEFAULT): Set long double default to IBM.
[official-gcc.git] / libiberty / simple-object-common.h
blob733bdd0e7b6341dcdc666fd9b7b9b37ab6bfe39e
1 /* simple-object-common.h -- common structs for object file manipulation.
2 Copyright (C) 2010-2017 Free Software Foundation, Inc.
4 This file is part of the libiberty library.
5 Libiberty is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public
7 License as published by the Free Software Foundation; either
8 version 2 of the License, or (at your option) any later version.
10 Libiberty is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Library General Public License for more details.
15 You should have received a copy of the GNU Library General Public
16 License along with libiberty; see the file COPYING.LIB. If not,
17 write to the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
18 Boston, MA 02110-1301, USA. */
20 /* Forward reference. */
21 struct simple_object_functions;
23 /* An object file opened for reading. */
25 struct simple_object_read_struct
27 /* The file descriptor. */
28 int descriptor;
29 /* The offset within the file. */
30 off_t offset;
31 /* The functions which do the actual work. */
32 const struct simple_object_functions *functions;
33 /* Private data for the object file format. */
34 void *data;
37 /* Object file attributes. */
39 struct simple_object_attributes_struct
41 /* The functions which do the actual work. */
42 const struct simple_object_functions *functions;
43 /* Private data for the object file format. */
44 void *data;
47 /* An object file being created. */
49 struct simple_object_write_struct
51 /* The functions which do the actual work. */
52 const struct simple_object_functions *functions;
53 /* The segment_name argument from the user. */
54 char *segment_name;
55 /* The start of the list of sections. */
56 simple_object_write_section *sections;
57 /* The last entry in the list of sections. */
58 simple_object_write_section *last_section;
59 /* Private data for the object file format. */
60 void *data;
63 /* A section in an object file being created. */
65 struct simple_object_write_section_struct
67 /* Next in the list of sections attached to an
68 simple_object_write. */
69 simple_object_write_section *next;
70 /* The name of this section. */
71 char *name;
72 /* The required alignment. */
73 unsigned int align;
74 /* The first data attached to this section. */
75 struct simple_object_write_section_buffer *buffers;
76 /* The last data attached to this section. */
77 struct simple_object_write_section_buffer *last_buffer;
80 /* Data attached to a section. */
82 struct simple_object_write_section_buffer
84 /* The next data for this section. */
85 struct simple_object_write_section_buffer *next;
86 /* The size of the buffer. */
87 size_t size;
88 /* The actual bytes. */
89 const void *buffer;
90 /* A buffer to free, or NULL. */
91 void *free_buffer;
94 /* The number of bytes we read from the start of the file to pass to
95 the match function. */
96 #define SIMPLE_OBJECT_MATCH_HEADER_LEN (16)
98 /* Format-specific object file functions. */
100 struct simple_object_functions
102 /* If this file matches these functions, return a new value for the
103 private data for an simple_object_read. HEADER is the first 16
104 bytes of the file. DESCRIPTOR, OFFSET, SEGMENT_NAME, ERRMSG, and
105 ERR are as for simple_object_open_read. If this file does not
106 match, this function should return NULL with *ERRMSG set to
107 NULL. */
108 void *(*match) (unsigned char header[SIMPLE_OBJECT_MATCH_HEADER_LEN],
109 int descriptor, off_t offset, const char *segment_name,
110 const char **errmsg, int *err);
112 /* Implement simple_object_find_sections. */
113 const char *(*find_sections) (simple_object_read *,
114 int (*pfn) (void *, const char *,
115 off_t offset, off_t length),
116 void *data,
117 int *err);
119 /* Return the private data for the attributes for SOBJ. */
120 void *(*fetch_attributes) (simple_object_read *sobj, const char **errmsg,
121 int *err);
123 /* Release the private data for an simple_object_read. */
124 void (*release_read) (void *);
126 /* Merge the private data for the attributes of two files. If they
127 could be linked together, return NULL. Otherwise return an error
128 message. */
129 const char *(*attributes_merge) (void *, void *, int *err);
131 /* Release the private data for an simple_object_attributes. */
132 void (*release_attributes) (void *);
134 /* Start creating an object file. */
135 void *(*start_write) (void *attributes_data, const char **errmsg,
136 int *err);
138 /* Write the complete object file. */
139 const char *(*write_to_file) (simple_object_write *sobj, int descriptor,
140 int *err);
142 /* Release the private data for an simple_object_write. */
143 void (*release_write) (void *);
145 /* Copy LTO debug sections. */
146 const char *(*copy_lto_debug_sections) (simple_object_read *sobj,
147 simple_object_write *dobj,
148 int (*pfn) (const char **),
149 int *err);
152 /* The known object file formats. */
154 extern const struct simple_object_functions simple_object_coff_functions;
155 extern const struct simple_object_functions simple_object_elf_functions;
156 extern const struct simple_object_functions simple_object_mach_o_functions;
157 extern const struct simple_object_functions simple_object_xcoff_functions;
159 /* Read SIZE bytes from DESCRIPTOR at file offset OFFSET into BUFFER.
160 Return non-zero on success. On failure return 0 and set *ERRMSG
161 and *ERR. */
163 extern int
164 simple_object_internal_read (int descriptor, off_t offset,
165 unsigned char *buffer, size_t size,
166 const char **errmsg, int *err);
168 /* Write SIZE bytes from BUFFER to DESCRIPTOR at file offset OFFSET.
169 Return non-zero on success. On failure return 0 and set *ERRMSG
170 and *ERR. */
172 extern int
173 simple_object_internal_write (int descriptor, off_t offset,
174 const unsigned char *buffer, size_t size,
175 const char **errmsg, int *err);
177 /* Define ulong_type as an unsigned 64-bit type if available.
178 Otherwise just make it unsigned long. */
180 #ifdef UNSIGNED_64BIT_TYPE
181 __extension__ typedef UNSIGNED_64BIT_TYPE ulong_type;
182 #else
183 typedef unsigned long ulong_type;
184 #endif
186 /* Fetch a big-endian 16-bit value. */
188 static inline unsigned short
189 simple_object_fetch_big_16 (const unsigned char *buf)
191 return ((unsigned short) buf[0] << 8) | (unsigned short) buf[1];
194 /* Fetch a little-endian 16-bit value. */
196 static inline unsigned short
197 simple_object_fetch_little_16 (const unsigned char *buf)
199 return ((unsigned short) buf[1] << 8) | (unsigned short) buf[0];
202 /* Fetch a big-endian 32-bit value. */
204 static inline unsigned int
205 simple_object_fetch_big_32 (const unsigned char *buf)
207 return (((unsigned int) buf[0] << 24)
208 | ((unsigned int) buf[1] << 16)
209 | ((unsigned int) buf[2] << 8)
210 | (unsigned int) buf[3]);
213 /* Fetch a little-endian 32-bit value. */
215 static inline unsigned int
216 simple_object_fetch_little_32 (const unsigned char *buf)
218 return (((unsigned int) buf[3] << 24)
219 | ((unsigned int) buf[2] << 16)
220 | ((unsigned int) buf[1] << 8)
221 | (unsigned int) buf[0]);
224 /* Fetch a big-endian 32-bit value as a ulong_type. */
226 static inline ulong_type
227 simple_object_fetch_big_32_ulong (const unsigned char *buf)
229 return (ulong_type) simple_object_fetch_big_32 (buf);
232 /* Fetch a little-endian 32-bit value as a ulong_type. */
234 static inline ulong_type
235 simple_object_fetch_little_32_ulong (const unsigned char *buf)
237 return (ulong_type) simple_object_fetch_little_32 (buf);
240 #ifdef UNSIGNED_64BIT_TYPE
242 /* Fetch a big-endian 64-bit value. */
244 static inline ulong_type
245 simple_object_fetch_big_64 (const unsigned char *buf)
247 return (((ulong_type) buf[0] << 56)
248 | ((ulong_type) buf[1] << 48)
249 | ((ulong_type) buf[2] << 40)
250 | ((ulong_type) buf[3] << 32)
251 | ((ulong_type) buf[4] << 24)
252 | ((ulong_type) buf[5] << 16)
253 | ((ulong_type) buf[6] << 8)
254 | (ulong_type) buf[7]);
257 /* Fetch a little-endian 64-bit value. */
259 static inline ulong_type
260 simple_object_fetch_little_64 (const unsigned char *buf)
262 return (((ulong_type) buf[7] << 56)
263 | ((ulong_type) buf[6] << 48)
264 | ((ulong_type) buf[5] << 40)
265 | ((ulong_type) buf[4] << 32)
266 | ((ulong_type) buf[3] << 24)
267 | ((ulong_type) buf[2] << 16)
268 | ((ulong_type) buf[1] << 8)
269 | (ulong_type) buf[0]);
272 #endif
274 /* Store a big-endian 16-bit value. */
276 static inline void
277 simple_object_set_big_16 (unsigned char *buf, unsigned short val)
279 buf[0] = (val >> 8) & 0xff;
280 buf[1] = val & 0xff;
283 /* Store a little-endian 16-bit value. */
285 static inline void
286 simple_object_set_little_16 (unsigned char *buf, unsigned short val)
288 buf[1] = (val >> 8) & 0xff;
289 buf[0] = val & 0xff;
292 /* Store a big-endian 32-bit value. */
294 static inline void
295 simple_object_set_big_32 (unsigned char *buf, unsigned int val)
297 buf[0] = (val >> 24) & 0xff;
298 buf[1] = (val >> 16) & 0xff;
299 buf[2] = (val >> 8) & 0xff;
300 buf[3] = val & 0xff;
303 /* Store a little-endian 32-bit value. */
305 static inline void
306 simple_object_set_little_32 (unsigned char *buf, unsigned int val)
308 buf[3] = (val >> 24) & 0xff;
309 buf[2] = (val >> 16) & 0xff;
310 buf[1] = (val >> 8) & 0xff;
311 buf[0] = val & 0xff;
314 /* Store a big-endian 32-bit value coming in as a ulong_type. */
316 static inline void
317 simple_object_set_big_32_ulong (unsigned char *buf, ulong_type val)
319 simple_object_set_big_32 (buf, val);
322 /* Store a little-endian 32-bit value coming in as a ulong_type. */
324 static inline void
325 simple_object_set_little_32_ulong (unsigned char *buf, ulong_type val)
327 simple_object_set_little_32 (buf, val);
330 #ifdef UNSIGNED_64BIT_TYPE
332 /* Store a big-endian 64-bit value. */
334 static inline void
335 simple_object_set_big_64 (unsigned char *buf, ulong_type val)
337 buf[0] = (val >> 56) & 0xff;
338 buf[1] = (val >> 48) & 0xff;
339 buf[2] = (val >> 40) & 0xff;
340 buf[3] = (val >> 32) & 0xff;
341 buf[4] = (val >> 24) & 0xff;
342 buf[5] = (val >> 16) & 0xff;
343 buf[6] = (val >> 8) & 0xff;
344 buf[7] = val & 0xff;
347 /* Store a little-endian 64-bit value. */
349 static inline void
350 simple_object_set_little_64 (unsigned char *buf, ulong_type val)
352 buf[7] = (val >> 56) & 0xff;
353 buf[6] = (val >> 48) & 0xff;
354 buf[5] = (val >> 40) & 0xff;
355 buf[4] = (val >> 32) & 0xff;
356 buf[3] = (val >> 24) & 0xff;
357 buf[2] = (val >> 16) & 0xff;
358 buf[1] = (val >> 8) & 0xff;
359 buf[0] = val & 0xff;
362 #endif