1/* Internal interfaces for libelf.
2   Copyright (C) 1998-2010 Red Hat, Inc.
3   This file is part of Red Hat elfutils.
4   Contributed by Ulrich Drepper <drepper@redhat.com>, 1998.
5
6   Red Hat elfutils is free software; you can redistribute it and/or modify
7   it under the terms of the GNU General Public License as published by the
8   Free Software Foundation; version 2 of the License.
9
10   Red Hat elfutils is distributed in the hope that it will be useful, but
11   WITHOUT ANY WARRANTY; without even the implied warranty of
12   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13   General Public License for more details.
14
15   You should have received a copy of the GNU General Public License along
16   with Red Hat elfutils; if not, write to the Free Software Foundation,
17   Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301 USA.
18
19   In addition, as a special exception, Red Hat, Inc. gives You the
20   additional right to link the code of Red Hat elfutils with code licensed
21   under any Open Source Initiative certified open source license
22   (http://www.opensource.org/licenses/index.php) which requires the
23   distribution of source code with any binary distribution and to
24   distribute linked combinations of the two.  Non-GPL Code permitted under
25   this exception must only link to the code of Red Hat elfutils through
26   those well defined interfaces identified in the file named EXCEPTION
27   found in the source code files (the "Approved Interfaces").  The files
28   of Non-GPL Code may instantiate templates or use macros or inline
29   functions from the Approved Interfaces without causing the resulting
30   work to be covered by the GNU General Public License.  Only Red Hat,
31   Inc. may make changes or additions to the list of Approved Interfaces.
32   Red Hat's grant of this exception is conditioned upon your not adding
33   any new exceptions.  If you wish to add a new Approved Interface or
34   exception, please contact Red Hat.  You must obey the GNU General Public
35   License in all respects for all of the Red Hat elfutils code and other
36   code used in conjunction with Red Hat elfutils except the Non-GPL Code
37   covered by this exception.  If you modify this file, you may extend this
38   exception to your version of the file, but you are not obligated to do
39   so.  If you do not wish to provide this exception without modification,
40   you must delete this exception statement from your version and license
41   this file solely under the GPL without exception.
42
43   Red Hat elfutils is an included package of the Open Invention Network.
44   An included package of the Open Invention Network is a package for which
45   Open Invention Network licensees cross-license their patents.  No patent
46   license is granted, either expressly or impliedly, by designation as an
47   included package.  Should you wish to participate in the Open Invention
48   Network licensing program, please visit www.openinventionnetwork.com
49   <http://www.openinventionnetwork.com>.  */
50
51#ifndef _LIBELFP_H
52#define _LIBELFP_H 1
53
54#ifdef HAVE_CONFIG_H
55# include <config.h>
56#endif
57
58#include <ar.h>
59#include <gelf.h>
60
61#include <errno.h>
62#include <stdint.h>
63#include <stdio.h>
64#include <string.h>
65
66/* gettext helper macros.  */
67#define _(Str) dgettext ("elfutils", Str)
68
69
70/* Helper Macros to write 32 bit and 64 bit functions.  */
71#define __elfw2_(Bits, Name) __elf##Bits##_##Name
72#define elfw2_(Bits, Name) elf##Bits##_##Name
73#define ElfW2_(Bits, Name) Elf##Bits##_##Name
74#define ELFW2_(Bits, Name) ELF##Bits##_##Name
75#define ELFW_(Name, Bits) Name##Bits
76#define __elfw2(Bits, Name) __elfw2_(Bits, Name)
77#define elfw2(Bits, Name) elfw2_(Bits, Name)
78#define ElfW2(Bits, Name) ElfW2_(Bits, Name)
79#define ELFW2(Bits, Name) ELFW2_(Bits, Name)
80#define ELFW(Name, Bits)  ELFW_(Name, Bits)
81
82
83/* Sizes of the external types, for 32 bits objects.  */
84#define ELF32_FSZ_ADDR   4
85#define ELF32_FSZ_OFF    4
86#define ELF32_FSZ_HALF   2
87#define ELF32_FSZ_WORD   4
88#define ELF32_FSZ_SWORD  4
89#define ELF32_FSZ_XWORD  8
90#define ELF32_FSZ_SXWORD 8
91
92/* Same for 64 bits objects.  */
93#define ELF64_FSZ_ADDR   8
94#define ELF64_FSZ_OFF    8
95#define ELF64_FSZ_HALF   2
96#define ELF64_FSZ_WORD   4
97#define ELF64_FSZ_SWORD  4
98#define ELF64_FSZ_XWORD  8
99#define ELF64_FSZ_SXWORD 8
100
101
102/* This is an extension of the ELF_F_* enumeration.  The values here are
103   not part of the library interface, they are only used internally.  */
104enum
105{
106  ELF_F_MMAPPED = 0x40,
107  ELF_F_MALLOCED = 0x80,
108  ELF_F_FILEDATA = 0x100
109};
110
111
112/* Get definition of all the external types.  */
113#include "exttypes.h"
114
115
116/* Error values.  */
117enum
118{
119  ELF_E_NOERROR = 0,
120  ELF_E_UNKNOWN_ERROR,
121  ELF_E_UNKNOWN_VERSION,
122  ELF_E_UNKNOWN_TYPE,
123  ELF_E_INVALID_HANDLE,
124  ELF_E_SOURCE_SIZE,
125  ELF_E_DEST_SIZE,
126  ELF_E_INVALID_ENCODING,
127  ELF_E_NOMEM,
128  ELF_E_INVALID_FILE,
129  ELF_E_INVALID_OP,
130  ELF_E_NO_VERSION,
131  ELF_E_INVALID_CMD,
132  ELF_E_RANGE,
133  ELF_E_ARCHIVE_FMAG,
134  ELF_E_INVALID_ARCHIVE,
135  ELF_E_NO_ARCHIVE,
136  ELF_E_NO_INDEX,
137  ELF_E_READ_ERROR,
138  ELF_E_WRITE_ERROR,
139  ELF_E_INVALID_CLASS,
140  ELF_E_INVALID_INDEX,
141  ELF_E_INVALID_OPERAND,
142  ELF_E_INVALID_SECTION,
143  ELF_E_INVALID_COMMAND,
144  ELF_E_WRONG_ORDER_EHDR,
145  ELF_E_FD_DISABLED,
146  ELF_E_FD_MISMATCH,
147  ELF_E_OFFSET_RANGE,
148  ELF_E_NOT_NUL_SECTION,
149  ELF_E_DATA_MISMATCH,
150  ELF_E_INVALID_SECTION_HEADER,
151  ELF_E_INVALID_DATA,
152  ELF_E_DATA_ENCODING,
153  ELF_E_SECTION_TOO_SMALL,
154  ELF_E_INVALID_ALIGN,
155  ELF_E_INVALID_SHENTSIZE,
156  ELF_E_UPDATE_RO,
157  ELF_E_NOFILE,
158  ELF_E_GROUP_NOT_REL,
159  ELF_E_INVALID_PHDR,
160  ELF_E_NO_PHDR,
161  ELF_E_INVALID_OFFSET,
162  /* Keep this as the last entry.  */
163  ELF_E_NUM
164};
165
166
167/* The visible `Elf_Data' type is not sufficent for some operations due
168   to a misdesigned interface.  Extend it for internal purposes.  */
169typedef struct
170{
171  Elf_Data d;
172  Elf_Scn *s;
173} Elf_Data_Scn;
174
175
176/* List of `Elf_Data' descriptors.  This is what makes up the section
177   contents.  */
178typedef struct Elf_Data_List
179{
180  /* `data' *must* be the first element in the struct.  */
181  Elf_Data_Scn data;
182  struct Elf_Data_List *next;
183  int flags;
184} Elf_Data_List;
185
186
187/* Descriptor for ELF section.  */
188struct Elf_Scn
189{
190  /* We have to distinguish several different situations:
191
192     1. the section is user created.  Therefore there is no file or memory
193        region to read the data from.  Here we have two different subcases:
194
195        a) data was not yet added (before the first `elf_newdata' call)
196
197        b) at least one data set is available
198
199     2. this is a section from a file/memory region.  We have to read the
200        current content in one data block if we have to.  But we don't
201        read the data until it is necessary.  So we have the subcases:
202
203        a) the section in the file has size zero (for whatever reason)
204
205        b) the data of the file is not (yet) read
206
207        c) the data is read and available.
208
209     In addition to this we have different data sets, the raw and the converted
210     data.  This distinction only exists for the data read from the file.
211     All user-added data set (all but the first when read from the file or
212     all of them for user-create sections) are the same in both formats.
213     We don't create the converted data before it is necessary.
214
215     The `data_read' element signals whether data is available in the
216     raw format.
217
218     If there is data from the file/memory region or if read one data
219     set is added the `rawdata_list_read' pointer in non-NULL and points
220     to the last filled data set.  `raw_datalist_rear' is therefore NULL
221     only if there is no data set at all.
222
223     This so far allows to distinguish all but two cases (given that the
224     `rawdata_list' and `data_list' entries are initialized to zero) is
225     between not yet loaded data from the file/memory region and a section
226     with zero size and type ELF_T_BYTE.   */
227  Elf_Data_List data_list;	/* List of data buffers.  */
228  Elf_Data_List *data_list_rear; /* Pointer to the rear of the data list. */
229
230  Elf_Data_Scn rawdata;		/* Uninterpreted data of the section.  */
231
232  int data_read;		/* Nonzero if the section was created by the
233				   user or if the data from the file/memory
234				   is read.  */
235  int shndx_index;		/* Index of the extended section index
236				   table for this symbol table (if this
237				   section is a symbol table).  */
238
239  size_t index;			/* Index of this section.  */
240  struct Elf *elf;		/* The underlying ELF file.  */
241
242  union
243  {
244    Elf32_Shdr *e32;		/* Pointer to 32bit section header.  */
245    Elf64_Shdr *e64;		/* Pointer to 64bit section header.  */
246  } shdr;
247
248  unsigned int shdr_flags;	/* Section header modified?  */
249  unsigned int flags;		/* Section changed in size?  */
250
251  char *rawdata_base;		/* The unmodified data of the section.  */
252  char *data_base;		/* The converted data of the section.  */
253
254  struct Elf_ScnList *list;	/* Pointer to the section list element the
255				   data is in.  */
256};
257
258
259/* List of section.  */
260typedef struct Elf_ScnList
261{
262  unsigned int cnt;		/* Number of elements of 'data' used.  */
263  unsigned int max;		/* Number of elements of 'data' allocated.  */
264  struct Elf_ScnList *next;	/* Next block of sections.  */
265  struct Elf_Scn data[0];	/* Section data.  */
266} Elf_ScnList;
267
268
269/* elf_getdata_rawchunk result.  */
270typedef struct Elf_Data_Chunk
271{
272  Elf_Data_Scn data;
273  union
274  {
275    Elf_Scn dummy_scn;
276    struct Elf_Data_Chunk *next;
277  };
278} Elf_Data_Chunk;
279
280
281/* The ELF descriptor.  */
282struct Elf
283{
284  /* Address to which the file was mapped.  NULL if not mapped.  */
285  void *map_address;
286
287  /* When created for an archive member this points to the descriptor
288     for the archive. */
289  Elf *parent;
290  Elf *next;             /* Used in list of archive descriptors.  */
291
292  /* What kind of file is underneath (ELF file, archive...).  */
293  Elf_Kind kind;
294
295  /* Command used to create this descriptor.  */
296  Elf_Cmd cmd;
297
298  /* The binary class.  */
299  unsigned int class;
300
301  /* The used file descriptor.  -1 if not available anymore.  */
302  int fildes;
303
304  /* Offset in the archive this file starts or zero.  */
305  off_t start_offset;
306
307  /* Size of the file in the archive or the entire file size, or ~0
308     for an (yet) unknown size.  */
309  size_t maximum_size;
310
311  /* Describes the way the memory was allocated and if the dirty bit is
312     signalled it means that the whole file has to be rewritten since
313     the layout changed.  */
314  int flags;
315
316  /* Reference counting for the descriptor.  */
317  int ref_count;
318
319  /* Lock to handle multithreaded programs.  */
320  rwlock_define (,lock);
321
322  union
323  {
324    struct
325    {
326      /* The next fields are only useful when testing for ==/!= NULL.  */
327      void *ehdr;
328      void *shdr;
329      void *phdr;
330
331      Elf_ScnList *scns_last;	/* Last element in the section list.
332				   If NULL the data has not yet been
333				   read from the file.  */
334      Elf_Data_Chunk *rawchunks; /* List of elf_getdata_rawchunk results.  */
335      unsigned int scnincr;	/* Number of sections allocate the last
336				   time.  */
337      int ehdr_flags;		/* Flags (dirty) for ELF header.  */
338      int phdr_flags;		/* Flags (dirty|malloc) for program header.  */
339      int shdr_malloced;	/* Nonzero if shdr array was allocated.  */
340      off64_t sizestr_offset;	/* Offset of the size string in the parent
341				   if this is an archive member.  */
342    } elf;
343
344    struct
345    {
346      Elf32_Ehdr *ehdr;		/* Pointer to the ELF header.  This is
347				   never malloced.  */
348      Elf32_Shdr *shdr;		/* Used when reading from a file.  */
349      Elf32_Phdr *phdr;		/* Pointer to the program header array.  */
350      Elf_ScnList *scns_last;	/* Last element in the section list.
351				   If NULL the data has not yet been
352				   read from the file.  */
353      Elf_Data_Chunk *rawchunks; /* List of elf_getdata_rawchunk results.  */
354      unsigned int scnincr;	/* Number of sections allocate the last
355				   time.  */
356      int ehdr_flags;		/* Flags (dirty) for ELF header.  */
357      int phdr_flags;		/* Flags (dirty|malloc) for program header.  */
358      int shdr_malloced;	/* Nonzero if shdr array was allocated.  */
359      off64_t sizestr_offset;	/* Offset of the size string in the parent
360				   if this is an archive member.  */
361      Elf32_Ehdr ehdr_mem;	/* Memory used for ELF header when not
362				   mmaped.  */
363      char __e32scnspad[sizeof (Elf64_Ehdr) - sizeof (Elf32_Ehdr)];
364
365      /* The section array.  */
366      Elf_ScnList scns;
367    } elf32;
368
369    struct
370    {
371      Elf64_Ehdr *ehdr;		/* Pointer to the ELF header.  This is
372				   never malloced.  */
373      Elf64_Shdr *shdr;		/* Used when reading from a file.  */
374      Elf64_Phdr *phdr;		/* Pointer to the program header array.  */
375      Elf_ScnList *scns_last;	/* Last element in the section list.
376				   If NULL the data has not yet been
377				   read from the file.  */
378      Elf_Data_Chunk *rawchunks; /* List of elf_getdata_rawchunk results.  */
379      unsigned int scnincr;	/* Number of sections allocate the last
380				   time.  */
381      int ehdr_flags;		/* Flags (dirty) for ELF header.  */
382      int phdr_flags;		/* Flags (dirty|malloc) for program header.  */
383      int shdr_malloced;	/* Nonzero if shdr array was allocated.  */
384      off64_t sizestr_offset;	/* Offset of the size string in the parent
385				   if this is an archive member.  */
386      Elf64_Ehdr ehdr_mem;	/* Memory used for ELF header when not
387				   mmaped.  */
388
389      /* The section array.  */
390      Elf_ScnList scns;
391    } elf64;
392
393    struct
394    {
395      Elf *children;		/* List of all descriptors for this archive. */
396      Elf_Arsym *ar_sym;	/* Symbol table returned by elf_getarsym.  */
397      size_t ar_sym_num;	/* Number of entries in `ar_sym'.  */
398      char *long_names;		/* If no index is available but long names
399				   are used this elements points to the data.*/
400      size_t long_names_len;	/* Length of the long name table.  */
401      off_t offset;		/* Offset in file we are currently at.
402				   elf_next() advances this to the next
403				   member of the archive.  */
404      Elf_Arhdr elf_ar_hdr;	/* Structure returned by 'elf_getarhdr'.  */
405      struct ar_hdr ar_hdr;	/* Header read from file.  */
406      char ar_name[16];		/* NUL terminated ar_name of elf_ar_hdr.  */
407      char raw_name[17];	/* This is a buffer for the NUL terminated
408				   named raw_name used in the elf_ar_hdr.  */
409    } ar;
410  } state;
411
412  /* There absolutely never must be anything following the union.  */
413};
414
415/* Type of the conversion functions.  These functions will convert the
416   byte order.  */
417typedef void (*xfct_t) (void *, const void *, size_t, int);
418
419/* The table with the function pointers.  */
420extern const xfct_t __elf_xfctstom[EV_NUM - 1][EV_NUM - 1][ELFCLASSNUM - 1][ELF_T_NUM] attribute_hidden;
421extern const xfct_t __elf_xfctstof[EV_NUM - 1][EV_NUM - 1][ELFCLASSNUM - 1][ELF_T_NUM] attribute_hidden;
422
423
424/* Array with sizes of the external types indexed by ELF version, binary
425   class, and type. */
426extern const size_t __libelf_type_sizes[EV_NUM - 1][ELFCLASSNUM - 1][ELF_T_NUM] attribute_hidden;
427/* We often have to access the size for a type in the current version.  */
428#if EV_NUM != 2
429# define elf_typesize(class,type,n) \
430  elfw2(class,fsize) (type, n, __libelf_version)
431#else
432# define elf_typesize(class,type,n) \
433  (__libelf_type_sizes[EV_CURRENT - 1][ELFW(ELFCLASS,class) - 1][type] * n)
434#endif
435
436/* Currently selected version of the ELF specification.  */
437extern unsigned int __libelf_version attribute_hidden;
438
439/* The byte value used for filling gaps.  */
440extern int __libelf_fill_byte attribute_hidden;
441
442/* Nonzero if the version was set.  */
443extern int __libelf_version_initialized attribute_hidden;
444
445/* Index for __libelf_type_sizes et al.  */
446#if EV_NUM == 2
447# define LIBELF_EV_IDX	0
448#else
449# define LIBELF_EV_IDX	(__libelf_version - 1)
450#endif
451
452#if !ALLOW_UNALIGNED
453/* Array with alignment requirements of the internal types indexed by ELF
454   version, binary class, and type. */
455extern const uint_fast8_t __libelf_type_aligns[EV_NUM - 1][ELFCLASSNUM - 1][ELF_T_NUM] attribute_hidden;
456# define __libelf_type_align(class, type)	\
457    (__libelf_type_aligns[LIBELF_EV_IDX][class - 1][type] ?: 1)
458#else
459# define __libelf_type_align(class, type)	1
460#endif
461
462/* The libelf API does not have such a function but it is still useful.
463   Get the memory size for the given type.
464
465   These functions cannot be marked internal since they are aliases
466   of the export elfXX_fsize functions.*/
467extern size_t __elf32_msize (Elf_Type __type, size_t __count,
468			     unsigned int __version);
469extern size_t __elf64_msize (Elf_Type __type, size_t __count,
470			     unsigned int __version);
471
472
473/* Create Elf descriptor from memory image.  */
474extern Elf *__libelf_read_mmaped_file (int fildes, void *map_address,
475				       off_t offset, size_t maxsize,
476				       Elf_Cmd cmd, Elf *parent)
477     internal_function;
478
479/* Set error value.  */
480extern void __libelf_seterrno (int value) internal_function;
481
482/* Get the next archive header.  */
483extern int __libelf_next_arhdr_wrlock (Elf *elf) internal_function;
484
485/* Read all of the file associated with the descriptor.  */
486extern char *__libelf_readall (Elf *elf) internal_function;
487
488/* Read the complete section table and convert the byte order if necessary.  */
489extern int __libelf_readsections (Elf *elf) internal_function;
490
491/* Store the information for the raw data in the `rawdata_list' element.  */
492extern int __libelf_set_rawdata (Elf_Scn *scn) internal_function;
493extern int __libelf_set_rawdata_wrlock (Elf_Scn *scn) internal_function;
494
495
496/* Helper functions for elf_update.  */
497extern off_t __elf32_updatenull_wrlock (Elf *elf, int *change_bop,
498					size_t shnum) internal_function;
499extern off_t __elf64_updatenull_wrlock (Elf *elf, int *change_bop,
500					size_t shnum) internal_function;
501
502extern int __elf32_updatemmap (Elf *elf, int change_bo, size_t shnum)
503     internal_function;
504extern int __elf64_updatemmap (Elf *elf, int change_bo, size_t shnum)
505     internal_function;
506extern int __elf32_updatefile (Elf *elf, int change_bo, size_t shnum)
507     internal_function;
508extern int __elf64_updatefile (Elf *elf, int change_bo, size_t shnum)
509     internal_function;
510
511
512/* Alias for exported functions to avoid PLT entries, and
513   rdlock/wrlock variants of these functions.  */
514extern int __elf_end_internal (Elf *__elf) attribute_hidden;
515extern Elf *__elf_begin_internal (int __fildes, Elf_Cmd __cmd, Elf *__ref)
516     attribute_hidden;
517extern Elf32_Ehdr *__elf32_getehdr_wrlock (Elf *__elf) internal_function;
518extern Elf64_Ehdr *__elf64_getehdr_wrlock (Elf *__elf) internal_function;
519extern Elf32_Ehdr *__elf32_newehdr_internal (Elf *__elf) attribute_hidden;
520extern Elf64_Ehdr *__elf64_newehdr_internal (Elf *__elf) attribute_hidden;
521extern Elf32_Phdr *__elf32_getphdr_internal (Elf *__elf) attribute_hidden;
522extern Elf64_Phdr *__elf64_getphdr_internal (Elf *__elf) attribute_hidden;
523extern Elf32_Phdr *__elf32_getphdr_wrlock (Elf *__elf) attribute_hidden;
524extern Elf64_Phdr *__elf64_getphdr_wrlock (Elf *__elf) attribute_hidden;
525extern Elf32_Phdr *__elf32_newphdr_internal (Elf *__elf, size_t __cnt)
526     attribute_hidden;
527extern Elf64_Phdr *__elf64_newphdr_internal (Elf *__elf, size_t __cnt)
528     attribute_hidden;
529extern Elf_Scn *__elf32_offscn_internal (Elf *__elf, Elf32_Off __offset)
530     attribute_hidden;
531extern Elf_Scn *__elf64_offscn_internal (Elf *__elf, Elf64_Off __offset)
532     attribute_hidden;
533extern int __elf_getphdrnum_rdlock (Elf *__elf, size_t *__dst)
534     internal_function;
535extern int __elf_getshdrnum_rdlock (Elf *__elf, size_t *__dst)
536     internal_function;
537extern int __elf_getshdrstrndx_internal (Elf *__elf, size_t *__dst)
538     attribute_hidden;
539extern Elf32_Shdr *__elf32_getshdr_rdlock (Elf_Scn *__scn) internal_function;
540extern Elf64_Shdr *__elf64_getshdr_rdlock (Elf_Scn *__scn) internal_function;
541extern Elf32_Shdr *__elf32_getshdr_wrlock (Elf_Scn *__scn) internal_function;
542extern Elf64_Shdr *__elf64_getshdr_wrlock (Elf_Scn *__scn) internal_function;
543extern Elf_Scn *__elf_getscn_internal (Elf *__elf, size_t __index)
544     attribute_hidden;
545extern Elf_Scn *__elf_nextscn_internal (Elf *__elf, Elf_Scn *__scn)
546     attribute_hidden;
547extern int __elf_scnshndx_internal (Elf_Scn *__scn) attribute_hidden;
548extern Elf_Data *__elf_getdata_internal (Elf_Scn *__scn, Elf_Data *__data)
549     attribute_hidden;
550extern Elf_Data *__elf_getdata_rdlock (Elf_Scn *__scn, Elf_Data *__data)
551     internal_function;
552extern Elf_Data *__elf_rawdata_internal (Elf_Scn *__scn, Elf_Data *__data)
553     attribute_hidden;
554extern char *__elf_strptr_internal (Elf *__elf, size_t __index,
555				    size_t __offset) attribute_hidden;
556extern Elf_Data *__elf32_xlatetom_internal (Elf_Data *__dest,
557					    const Elf_Data *__src,
558					    unsigned int __encode)
559     attribute_hidden;
560extern Elf_Data *__elf64_xlatetom_internal (Elf_Data *__dest,
561					    const Elf_Data *__src,
562					    unsigned int __encode)
563     attribute_hidden;
564extern Elf_Data *__elf32_xlatetof_internal (Elf_Data *__dest,
565					    const Elf_Data *__src,
566					    unsigned int __encode)
567     attribute_hidden;
568extern Elf_Data *__elf64_xlatetof_internal (Elf_Data *__dest,
569					    const Elf_Data *__src,
570					    unsigned int __encode)
571     attribute_hidden;
572extern unsigned int __elf_version_internal (unsigned int __version)
573     attribute_hidden;
574extern unsigned long int __elf_hash_internal (const char *__string)
575       __attribute__ ((__pure__, visibility ("hidden")));
576extern long int __elf32_checksum_internal (Elf *__elf) attribute_hidden;
577extern long int __elf64_checksum_internal (Elf *__elf) attribute_hidden;
578
579
580extern GElf_Ehdr *__gelf_getehdr_rdlock (Elf *__elf, GElf_Ehdr *__dest)
581     internal_function;
582extern size_t __gelf_fsize_internal (Elf *__elf, Elf_Type __type,
583				     size_t __count, unsigned int __version)
584     attribute_hidden;
585extern GElf_Shdr *__gelf_getshdr_internal (Elf_Scn *__scn, GElf_Shdr *__dst)
586     attribute_hidden;
587extern GElf_Sym *__gelf_getsym_internal (Elf_Data *__data, int __ndx,
588					 GElf_Sym *__dst) attribute_hidden;
589
590
591extern uint32_t __libelf_crc32 (uint32_t crc, unsigned char *buf, size_t len)
592     attribute_hidden;
593
594
595/* We often have to update a flag iff a value changed.  Make this
596   convenient.  */
597#define update_if_changed(var, exp, flag) \
598  do {									      \
599    __typeof__ (var) *_var = &(var);					      \
600    __typeof__ (exp) _exp = (exp);					      \
601    if (*_var != _exp)							      \
602      {									      \
603	*_var = _exp;							      \
604	(flag) |= ELF_F_DIRTY;						      \
605      }									      \
606  } while (0)
607
608/* Align offset to 4 bytes as needed for note name and descriptor data.  */
609#define NOTE_ALIGN(n)	(((n) + 3) & -4U)
610
611#endif  /* libelfP.h */
612