CbC/CbC_gcc: libiberty/simple-object-elf.c annotate

annotate libiberty/simple-object-elf.c @ 131:84e7813d76e9

gcc-8.2

author	mir3636
date	Thu, 25 Oct 2018 07:37:49 +0900
parents	04ced10e8804
children	1830386684a0

rev	line source
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1 /* simple-object-elf.c -- routines to manipulate ELF object files.
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	2 Copyright (C) 2010-2018 Free Software Foundation, Inc.
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	3 Written by Ian Lance Taylor, Google.
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	4
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	5 This program is free software; you can redistribute it and/or modify it
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	6 under the terms of the GNU General Public License as published by the
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	7 Free Software Foundation; either version 2, or (at your option) any
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	8 later version.
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	9
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	10 This program is distributed in the hope that it will be useful,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	11 but WITHOUT ANY WARRANTY; without even the implied warranty of
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	13 GNU General Public License for more details.
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	14
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	15 You should have received a copy of the GNU General Public License
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	16 along with this program; if not, write to the Free Software
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	17 Foundation, 51 Franklin Street - Fifth Floor,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	18 Boston, MA 02110-1301, USA. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	19
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	20 #include "config.h"
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	21 #include "libiberty.h"
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	22 #include "simple-object.h"
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	23
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	24 #include <errno.h>
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	25 /* mingw.org's MinGW doesn't have ENOTSUP. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	26 #ifndef ENOTSUP
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	27 # define ENOTSUP ENOSYS
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	28 #endif
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	29 #include <stddef.h>
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	30
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	31 #ifdef HAVE_STDLIB_H
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	32 #include <stdlib.h>
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	33 #endif
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	34
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	35 #ifdef HAVE_STDINT_H
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	36 #include <stdint.h>
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	37 #endif
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	38
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	39 #ifdef HAVE_STRING_H
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	40 #include <string.h>
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	41 #endif
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	42
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	43 #ifdef HAVE_INTTYPES_H
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	44 #include <inttypes.h>
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	45 #endif
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	46
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	47 #include "simple-object-common.h"
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	48
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	49 /* ELF structures and constants. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	50
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	51 /* 32-bit ELF file header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	52
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	53 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	54 unsigned char e_ident[16]; /* ELF "magic number" */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	55 unsigned char e_type[2]; /* Identifies object file type */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	56 unsigned char e_machine[2]; /* Specifies required architecture */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	57 unsigned char e_version[4]; /* Identifies object file version */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	58 unsigned char e_entry[4]; /* Entry point virtual address */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	59 unsigned char e_phoff[4]; /* Program header table file offset */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	60 unsigned char e_shoff[4]; /* Section header table file offset */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	61 unsigned char e_flags[4]; /* Processor-specific flags */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	62 unsigned char e_ehsize[2]; /* ELF header size in bytes */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	63 unsigned char e_phentsize[2]; /* Program header table entry size */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	64 unsigned char e_phnum[2]; /* Program header table entry count */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	65 unsigned char e_shentsize[2]; /* Section header table entry size */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	66 unsigned char e_shnum[2]; /* Section header table entry count */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	67 unsigned char e_shstrndx[2]; /* Section header string table index */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	68 } Elf32_External_Ehdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	69
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	70 /* 64-bit ELF file header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	71
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	72 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	73 unsigned char e_ident[16]; /* ELF "magic number" */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	74 unsigned char e_type[2]; /* Identifies object file type */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	75 unsigned char e_machine[2]; /* Specifies required architecture */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	76 unsigned char e_version[4]; /* Identifies object file version */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	77 unsigned char e_entry[8]; /* Entry point virtual address */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	78 unsigned char e_phoff[8]; /* Program header table file offset */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	79 unsigned char e_shoff[8]; /* Section header table file offset */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	80 unsigned char e_flags[4]; /* Processor-specific flags */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	81 unsigned char e_ehsize[2]; /* ELF header size in bytes */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	82 unsigned char e_phentsize[2]; /* Program header table entry size */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	83 unsigned char e_phnum[2]; /* Program header table entry count */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	84 unsigned char e_shentsize[2]; /* Section header table entry size */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	85 unsigned char e_shnum[2]; /* Section header table entry count */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	86 unsigned char e_shstrndx[2]; /* Section header string table index */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	87 } Elf64_External_Ehdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	88
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	89 /* Indexes and values in e_ident field of Ehdr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	90
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	91 #define EI_MAG0 0 /* File identification byte 0 index */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	92 #define ELFMAG0 0x7F /* Magic number byte 0 */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	93
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	94 #define EI_MAG1 1 /* File identification byte 1 index */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	95 #define ELFMAG1 'E' /* Magic number byte 1 */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	96
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	97 #define EI_MAG2 2 /* File identification byte 2 index */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	98 #define ELFMAG2 'L' /* Magic number byte 2 */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	99
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	100 #define EI_MAG3 3 /* File identification byte 3 index */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	101 #define ELFMAG3 'F' /* Magic number byte 3 */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	102
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	103 #define EI_CLASS 4 /* File class */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	104 #define ELFCLASSNONE 0 /* Invalid class */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	105 #define ELFCLASS32 1 /* 32-bit objects */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	106 #define ELFCLASS64 2 /* 64-bit objects */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	107
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	108 #define EI_DATA 5 /* Data encoding */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	109 #define ELFDATANONE 0 /* Invalid data encoding */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	110 #define ELFDATA2LSB 1 /* 2's complement, little endian */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	111 #define ELFDATA2MSB 2 /* 2's complement, big endian */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	112
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	113 #define EI_VERSION 6 /* File version */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	114 #define EV_CURRENT 1 /* Current version */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	115
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	116 #define EI_OSABI 7 /* Operating System/ABI indication */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	117
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	118 /* Values for e_type field of Ehdr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	119
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	120 #define ET_REL 1 /* Relocatable file */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	121
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	122 /* Values for e_machine field of Ehdr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	123
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	124 #define EM_SPARC 2 /* SUN SPARC */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	125 #define EM_SPARC32PLUS 18 /* Sun's "v8plus" */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	126
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	127 /* Special section index values. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	128
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	129 #define SHN_UNDEF 0 /* Undefined section */
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	130 #define SHN_LORESERVE 0xFF00 /* Begin range of reserved indices */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	131 #define SHN_COMMON 0xFFF2 /* Associated symbol is in common */
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	132 #define SHN_XINDEX 0xFFFF /* Section index is held elsewhere */
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	133 #define SHN_HIRESERVE 0xffff /* End of reserved indices */
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	134
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	135
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	136 /* 32-bit ELF program header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	137
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	138 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	139 unsigned char p_type[4]; /* Identifies program segment type */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	140 unsigned char p_offset[4]; /* Segment file offset */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	141 unsigned char p_vaddr[4]; /* Segment virtual address */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	142 unsigned char p_paddr[4]; /* Segment physical address */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	143 unsigned char p_filesz[4]; /* Segment size in file */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	144 unsigned char p_memsz[4]; /* Segment size in memory */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	145 unsigned char p_flags[4]; /* Segment flags */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	146 unsigned char p_align[4]; /* Segment alignment, file & memory */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	147 } Elf32_External_Phdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	148
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	149 /* 64-bit ELF program header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	150
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	151 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	152 unsigned char p_type[4]; /* Identifies program segment type */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	153 unsigned char p_flags[4]; /* Segment flags */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	154 unsigned char p_offset[8]; /* Segment file offset */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	155 unsigned char p_vaddr[8]; /* Segment virtual address */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	156 unsigned char p_paddr[8]; /* Segment physical address */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	157 unsigned char p_filesz[8]; /* Segment size in file */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	158 unsigned char p_memsz[8]; /* Segment size in memory */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	159 unsigned char p_align[8]; /* Segment alignment, file & memory */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	160 } Elf64_External_Phdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	161
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	162 /* 32-bit ELF section header */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	163
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	164 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	165 unsigned char sh_name[4]; /* Section name, index in string tbl */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	166 unsigned char sh_type[4]; /* Type of section */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	167 unsigned char sh_flags[4]; /* Miscellaneous section attributes */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	168 unsigned char sh_addr[4]; /* Section virtual addr at execution */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	169 unsigned char sh_offset[4]; /* Section file offset */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	170 unsigned char sh_size[4]; /* Size of section in bytes */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	171 unsigned char sh_link[4]; /* Index of another section */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	172 unsigned char sh_info[4]; /* Additional section information */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	173 unsigned char sh_addralign[4]; /* Section alignment */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	174 unsigned char sh_entsize[4]; /* Entry size if section holds table */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	175 } Elf32_External_Shdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	176
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	177 /* 64-bit ELF section header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	178
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	179 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	180 unsigned char sh_name[4]; /* Section name, index in string tbl */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	181 unsigned char sh_type[4]; /* Type of section */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	182 unsigned char sh_flags[8]; /* Miscellaneous section attributes */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	183 unsigned char sh_addr[8]; /* Section virtual addr at execution */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	184 unsigned char sh_offset[8]; /* Section file offset */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	185 unsigned char sh_size[8]; /* Size of section in bytes */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	186 unsigned char sh_link[4]; /* Index of another section */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	187 unsigned char sh_info[4]; /* Additional section information */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	188 unsigned char sh_addralign[8]; /* Section alignment */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	189 unsigned char sh_entsize[8]; /* Entry size if section holds table */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	190 } Elf64_External_Shdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	191
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	192 /* Values for sh_type field. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	193
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	194 #define SHT_NULL 0 /* Section header table entry unused */
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	195 #define SHT_PROGBITS 1 /* Program data */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	196 #define SHT_SYMTAB 2 /* Link editing symbol table */
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	197 #define SHT_STRTAB 3 /* A string table */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	198 #define SHT_RELA 4 /* Relocation entries with addends */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	199 #define SHT_REL 9 /* Relocation entries, no addends */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	200 #define SHT_GROUP 17 /* Section contains a section group */
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	201 #define SHT_SYMTAB_SHNDX 18 /* Extended section indeces */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	202
04ced10e8804 gcc 7 kono parents: 68 diff changeset	203 /* Values for sh_flags field. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	204
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	205 #define SHF_INFO_LINK 0x00000040 /* `sh_info' contains SHT index */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	206 #define SHF_EXECINSTR 0x00000004 /* Executable section. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	207 #define SHF_EXCLUDE 0x80000000 /* Link editor is to exclude this
04ced10e8804 gcc 7 kono parents: 68 diff changeset	208 section from executable and
04ced10e8804 gcc 7 kono parents: 68 diff changeset	209 shared library that it builds
04ced10e8804 gcc 7 kono parents: 68 diff changeset	210 when those objects are not to be
04ced10e8804 gcc 7 kono parents: 68 diff changeset	211 further relocated. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	212 /* Symbol table entry. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	213
04ced10e8804 gcc 7 kono parents: 68 diff changeset	214 typedef struct
04ced10e8804 gcc 7 kono parents: 68 diff changeset	215 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	216 unsigned char st_name[4]; /* Symbol name (string tbl index) */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	217 unsigned char st_value[4]; /* Symbol value */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	218 unsigned char st_size[4]; /* Symbol size */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	219 unsigned char st_info; /* Symbol type and binding */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	220 unsigned char st_other; /* Symbol visibility */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	221 unsigned char st_shndx[2]; /* Section index */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	222 } Elf32_External_Sym;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	223
04ced10e8804 gcc 7 kono parents: 68 diff changeset	224 typedef struct
04ced10e8804 gcc 7 kono parents: 68 diff changeset	225 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	226 unsigned char st_name[4]; /* Symbol name (string tbl index) */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	227 unsigned char st_info; /* Symbol type and binding */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	228 unsigned char st_other; /* Symbol visibility */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	229 unsigned char st_shndx[2]; /* Section index */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	230 unsigned char st_value[8]; /* Symbol value */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	231 unsigned char st_size[8]; /* Symbol size */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	232 } Elf64_External_Sym;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	233
04ced10e8804 gcc 7 kono parents: 68 diff changeset	234 #define ELF_ST_BIND(val) (((unsigned char) (val)) >> 4)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	235 #define ELF_ST_TYPE(val) ((val) & 0xf)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	236 #define ELF_ST_INFO(bind, type) (((bind) << 4) + ((type) & 0xf))
04ced10e8804 gcc 7 kono parents: 68 diff changeset	237
04ced10e8804 gcc 7 kono parents: 68 diff changeset	238 #define STT_NOTYPE 0 /* Symbol type is unspecified */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	239 #define STT_OBJECT 1 /* Symbol is a data object */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	240 #define STT_FUNC 2 /* Symbol is a code object */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	241 #define STT_TLS 6 /* Thread local data object */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	242 #define STT_GNU_IFUNC 10 /* Symbol is an indirect code object */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	243
04ced10e8804 gcc 7 kono parents: 68 diff changeset	244 #define STB_LOCAL 0 /* Local symbol */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	245 #define STB_GLOBAL 1 /* Global symbol */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	246 #define STB_WEAK 2 /* Weak global */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	247
04ced10e8804 gcc 7 kono parents: 68 diff changeset	248 #define STV_DEFAULT 0 /* Visibility is specified by binding type */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	249 #define STV_HIDDEN 2 /* Can only be seen inside currect component */
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	250
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	251 /* Functions to fetch and store different ELF types, depending on the
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	252 endianness and size. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	253
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	254 struct elf_type_functions
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	255 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	256 unsigned short (fetch_Elf_Half) (const unsigned char );
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	257 unsigned int (fetch_Elf_Word) (const unsigned char );
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	258 ulong_type (fetch_Elf_Addr) (const unsigned char );
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	259 void (set_Elf_Half) (unsigned char , unsigned short);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	260 void (set_Elf_Word) (unsigned char , unsigned int);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	261 void (set_Elf_Addr) (unsigned char , ulong_type);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	262 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	263
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	264 static const struct elf_type_functions elf_big_32_functions =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	265 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	266 simple_object_fetch_big_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	267 simple_object_fetch_big_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	268 simple_object_fetch_big_32_ulong,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	269 simple_object_set_big_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	270 simple_object_set_big_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	271 simple_object_set_big_32_ulong
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	272 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	273
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	274 static const struct elf_type_functions elf_little_32_functions =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	275 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	276 simple_object_fetch_little_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	277 simple_object_fetch_little_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	278 simple_object_fetch_little_32_ulong,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	279 simple_object_set_little_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	280 simple_object_set_little_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	281 simple_object_set_little_32_ulong
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	282 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	283
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	284 #ifdef UNSIGNED_64BIT_TYPE
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	285
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	286 static const struct elf_type_functions elf_big_64_functions =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	287 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	288 simple_object_fetch_big_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	289 simple_object_fetch_big_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	290 simple_object_fetch_big_64,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	291 simple_object_set_big_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	292 simple_object_set_big_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	293 simple_object_set_big_64
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	294 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	295
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	296 static const struct elf_type_functions elf_little_64_functions =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	297 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	298 simple_object_fetch_little_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	299 simple_object_fetch_little_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	300 simple_object_fetch_little_64,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	301 simple_object_set_little_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	302 simple_object_set_little_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	303 simple_object_set_little_64
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	304 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	305
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	306 #endif
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	307
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	308 /* Hideous macro to fetch the value of a field from an external ELF
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	309 struct of some sort. TYPEFUNCS is the set of type functions.
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	310 BUFFER points to the external data. STRUCTTYPE is the appropriate
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	311 struct type. FIELD is a field within the struct. TYPE is the type
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	312 of the field in the struct: Elf_Half, Elf_Word, or Elf_Addr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	313
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	314 #define ELF_FETCH_STRUCT_FIELD(TYPEFUNCS, STRUCTTYPE, FIELD, BUFFER, TYPE) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	315 ((TYPEFUNCS)->fetch_ ## TYPE ((BUFFER) + offsetof (STRUCTTYPE, FIELD)))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	316
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	317 /* Even more hideous macro to fetch the value of FIELD from BUFFER.
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	318 SIZE is 32 or 64. STRUCTTYPE is the name of the struct from
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	319 elf/external.h: Ehdr, Shdr, etc. FIELD is the name of a field in
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	320 the struct. TYPE is the type of the field in the struct: Elf_Half,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	321 Elf_Word, or Elf_Addr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	322
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	323 #define ELF_FETCH_SIZED_FIELD(TYPEFUNCS, SIZE, STRUCTTYPE, BUFFER, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	324 FIELD, TYPE) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	325 ELF_FETCH_STRUCT_FIELD (TYPEFUNCS, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	326 Elf ## SIZE ## _External_ ## STRUCTTYPE, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	327 FIELD, BUFFER, TYPE)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	328
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	329 /* Like ELF_FETCH_SIZED_FIELD but taking an ELFCLASS value. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	330
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	331 #define ELF_FETCH_FIELD(TYPEFUNCS, CLASS, STRUCTTYPE, BUFFER, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	332 FIELD, TYPE) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	333 ((CLASS) == ELFCLASS32 \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	334 ? ELF_FETCH_SIZED_FIELD (TYPEFUNCS, 32, STRUCTTYPE, BUFFER, FIELD, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	335 TYPE) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	336 : ELF_FETCH_SIZED_FIELD (TYPEFUNCS, 64, STRUCTTYPE, BUFFER, FIELD, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	337 TYPE))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	338
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	339 /* Hideous macro to set the value of a field in an external ELF
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	340 structure to VAL. TYPEFUNCS is the set of type functions. BUFFER
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	341 points to the external data. STRUCTTYPE is the appropriate
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	342 structure type. FIELD is a field within the struct. TYPE is the
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	343 type of the field in the struct: Elf_Half, Elf_Word, or
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	344 Elf_Addr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	345
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	346 #define ELF_SET_STRUCT_FIELD(TYPEFUNCS, STRUCTTYPE, FIELD, BUFFER, TYPE, VAL) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	347 (TYPEFUNCS)->set_ ## TYPE ((BUFFER) + offsetof (STRUCTTYPE, FIELD), (VAL))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	348
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	349 /* Even more hideous macro to set the value of FIELD in BUFFER to VAL.
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	350 SIZE is 32 or 64. STRUCTTYPE is the name of the struct from
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	351 elf/external.h: Ehdr, Shdr, etc. FIELD is the name of a field in
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	352 the struct. TYPE is the type of the field in the struct: Elf_Half,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	353 Elf_Word, or Elf_Addr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	354
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	355 #define ELF_SET_SIZED_FIELD(TYPEFUNCS, SIZE, STRUCTTYPE, BUFFER, FIELD, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	356 TYPE, VAL) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	357 ELF_SET_STRUCT_FIELD (TYPEFUNCS, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	358 Elf ## SIZE ## _External_ ## STRUCTTYPE, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	359 FIELD, BUFFER, TYPE, VAL)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	360
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	361 /* Like ELF_SET_SIZED_FIELD but taking an ELFCLASS value. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	362
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	363 #define ELF_SET_FIELD(TYPEFUNCS, CLASS, STRUCTTYPE, BUFFER, FIELD, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	364 TYPE, VAL) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	365 ((CLASS) == ELFCLASS32 \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	366 ? ELF_SET_SIZED_FIELD (TYPEFUNCS, 32, STRUCTTYPE, BUFFER, FIELD, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	367 TYPE, VAL) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	368 : ELF_SET_SIZED_FIELD (TYPEFUNCS, 64, STRUCTTYPE, BUFFER, FIELD, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	369 TYPE, VAL))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	370
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	371 /* Private data for an simple_object_read. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	372
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	373 struct simple_object_elf_read
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	374 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	375 /* Type functions. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	376 const struct elf_type_functions* type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	377 /* Elf data. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	378 unsigned char ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	379 /* Elf class. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	380 unsigned char ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	381 /* ELF OS ABI. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	382 unsigned char ei_osabi;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	383 /* Elf machine number. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	384 unsigned short machine;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	385 /* Processor specific flags. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	386 unsigned int flags;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	387 /* File offset of section headers. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	388 ulong_type shoff;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	389 /* Number of sections. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	390 unsigned int shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	391 /* Index of string table section header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	392 unsigned int shstrndx;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	393 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	394
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	395 /* Private data for an simple_object_attributes. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	396
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	397 struct simple_object_elf_attributes
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	398 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	399 /* Type functions. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	400 const struct elf_type_functions* type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	401 /* Elf data. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	402 unsigned char ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	403 /* Elf class. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	404 unsigned char ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	405 /* ELF OS ABI. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	406 unsigned char ei_osabi;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	407 /* Elf machine number. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	408 unsigned short machine;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	409 /* Processor specific flags. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	410 unsigned int flags;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	411 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	412
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	413 /* Private data for an simple_object_write. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	414
04ced10e8804 gcc 7 kono parents: 68 diff changeset	415 struct simple_object_elf_write
04ced10e8804 gcc 7 kono parents: 68 diff changeset	416 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	417 struct simple_object_elf_attributes attrs;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	418 unsigned char *shdrs;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	419 };
04ced10e8804 gcc 7 kono parents: 68 diff changeset	420
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	421 /* See if we have an ELF file. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	422
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	423 static void *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	424 simple_object_elf_match (unsigned char header[SIMPLE_OBJECT_MATCH_HEADER_LEN],
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	425 int descriptor, off_t offset,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	426 const char *segment_name ATTRIBUTE_UNUSED,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	427 const char *errmsg, int err)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	428 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	429 unsigned char ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	430 unsigned char ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	431 const struct elf_type_functions *type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	432 unsigned char ehdr[sizeof (Elf64_External_Ehdr)];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	433 struct simple_object_elf_read *eor;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	434
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	435 if (header[EI_MAG0] != ELFMAG0
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	436 \|\| header[EI_MAG1] != ELFMAG1
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	437 \|\| header[EI_MAG2] != ELFMAG2
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	438 \|\| header[EI_MAG3] != ELFMAG3
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	439 \|\| header[EI_VERSION] != EV_CURRENT)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	440 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	441 *errmsg = NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	442 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	443 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	444 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	445
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	446 ei_data = header[EI_DATA];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	447 if (ei_data != ELFDATA2LSB && ei_data != ELFDATA2MSB)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	448 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	449 *errmsg = "unknown ELF endianness";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	450 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	451 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	452 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	453
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	454 ei_class = header[EI_CLASS];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	455 switch (ei_class)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	456 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	457 case ELFCLASS32:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	458 type_functions = (ei_data == ELFDATA2LSB
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	459 ? &elf_little_32_functions
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	460 : &elf_big_32_functions);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	461 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	462
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	463 case ELFCLASS64:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	464 #ifndef UNSIGNED_64BIT_TYPE
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	465 *errmsg = "64-bit ELF objects not supported";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	466 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	467 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	468 #else
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	469 type_functions = (ei_data == ELFDATA2LSB
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	470 ? &elf_little_64_functions
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	471 : &elf_big_64_functions);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	472 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	473 #endif
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	474
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	475 default:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	476 *errmsg = "unrecognized ELF size";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	477 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	478 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	479 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	480
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	481 if (!simple_object_internal_read (descriptor, offset, ehdr, sizeof ehdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	482 errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	483 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	484
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	485 eor = XNEW (struct simple_object_elf_read);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	486 eor->type_functions = type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	487 eor->ei_data = ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	488 eor->ei_class = ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	489 eor->ei_osabi = header[EI_OSABI];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	490 eor->machine = ELF_FETCH_FIELD (type_functions, ei_class, Ehdr, ehdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	491 e_machine, Elf_Half);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	492 eor->flags = ELF_FETCH_FIELD (type_functions, ei_class, Ehdr, ehdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	493 e_flags, Elf_Word);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	494 eor->shoff = ELF_FETCH_FIELD (type_functions, ei_class, Ehdr, ehdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	495 e_shoff, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	496 eor->shnum = ELF_FETCH_FIELD (type_functions, ei_class, Ehdr, ehdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	497 e_shnum, Elf_Half);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	498 eor->shstrndx = ELF_FETCH_FIELD (type_functions, ei_class, Ehdr, ehdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	499 e_shstrndx, Elf_Half);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	500
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	501 if ((eor->shnum == 0 \|\| eor->shstrndx == SHN_XINDEX)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	502 && eor->shoff != 0)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	503 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	504 unsigned char shdr[sizeof (Elf64_External_Shdr)];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	505
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	506 /* Object file has more than 0xffff sections. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	507
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	508 if (!simple_object_internal_read (descriptor, offset + eor->shoff, shdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	509 (ei_class == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	510 ? sizeof (Elf32_External_Shdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	511 : sizeof (Elf64_External_Shdr)),
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	512 errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	513 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	514 XDELETE (eor);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	515 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	516 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	517
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	518 if (eor->shnum == 0)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	519 eor->shnum = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	520 shdr, sh_size, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	521
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	522 if (eor->shstrndx == SHN_XINDEX)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	523 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	524 eor->shstrndx = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	525 shdr, sh_link, Elf_Word);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	526
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	527 /* Versions of the GNU binutils between 2.12 and 2.18 did
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	528 not handle objects with more than SHN_LORESERVE sections
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	529 correctly. All large section indexes were offset by
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	530 0x100. There is more information at
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	531 http://sourceware.org/bugzilla/show_bug.cgi?id-5900 .
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	532 Fortunately these object files are easy to detect, as the
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	533 GNU binutils always put the section header string table
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	534 near the end of the list of sections. Thus if the
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	535 section header string table index is larger than the
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	536 number of sections, then we know we have to subtract
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	537 0x100 to get the real section index. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	538 if (eor->shstrndx >= eor->shnum
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	539 && eor->shstrndx >= SHN_LORESERVE + 0x100)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	540 eor->shstrndx -= 0x100;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	541 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	542 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	543
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	544 if (eor->shstrndx >= eor->shnum)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	545 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	546 *errmsg = "invalid ELF shstrndx >= shnum";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	547 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	548 XDELETE (eor);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	549 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	550 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	551
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	552 return (void *) eor;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	553 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	554
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	555 /* Find all sections in an ELF file. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	556
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	557 static const char *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	558 simple_object_elf_find_sections (simple_object_read *sobj,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	559 int (pfn) (void , const char *,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	560 off_t offset, off_t length),
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	561 void *data,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	562 int *err)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	563 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	564 struct simple_object_elf_read *eor =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	565 (struct simple_object_elf_read *) sobj->data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	566 const struct elf_type_functions *type_functions = eor->type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	567 unsigned char ei_class = eor->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	568 size_t shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	569 unsigned int shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	570 unsigned char *shdrs;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	571 const char *errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	572 unsigned char *shstrhdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	573 size_t name_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	574 off_t shstroff;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	575 unsigned char *names;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	576 unsigned int i;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	577
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	578 shdr_size = (ei_class == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	579 ? sizeof (Elf32_External_Shdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	580 : sizeof (Elf64_External_Shdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	581
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	582 /* Read the section headers. We skip section 0, which is not a
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	583 useful section. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	584
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	585 shnum = eor->shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	586 shdrs = XNEWVEC (unsigned char, shdr_size * (shnum - 1));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	587
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	588 if (!simple_object_internal_read (sobj->descriptor,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	589 sobj->offset + eor->shoff + shdr_size,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	590 shdrs,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	591 shdr_size * (shnum - 1),
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	592 &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	593 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	594 XDELETEVEC (shdrs);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	595 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	596 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	597
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	598 /* Read the section names. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	599
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	600 shstrhdr = shdrs + (eor->shstrndx - 1) * shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	601 name_size = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	602 shstrhdr, sh_size, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	603 shstroff = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	604 shstrhdr, sh_offset, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	605 names = XNEWVEC (unsigned char, name_size);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	606 if (!simple_object_internal_read (sobj->descriptor,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	607 sobj->offset + shstroff,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	608 names, name_size, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	609 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	610 XDELETEVEC (names);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	611 XDELETEVEC (shdrs);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	612 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	613 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	614
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	615 for (i = 1; i < shnum; ++i)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	616 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	617 unsigned char *shdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	618 unsigned int sh_name;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	619 const char *name;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	620 off_t offset;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	621 off_t length;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	622
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	623 shdr = shdrs + (i - 1) * shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	624 sh_name = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	625 shdr, sh_name, Elf_Word);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	626 if (sh_name >= name_size)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	627 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	628 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	629 XDELETEVEC (names);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	630 XDELETEVEC (shdrs);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	631 return "ELF section name out of range";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	632 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	633
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	634 name = (const char *) names + sh_name;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	635 offset = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	636 shdr, sh_offset, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	637 length = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	638 shdr, sh_size, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	639
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	640 if (!(*pfn) (data, name, offset, length))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	641 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	642 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	643
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	644 XDELETEVEC (names);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	645 XDELETEVEC (shdrs);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	646
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	647 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	648 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	649
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	650 /* Fetch the attributes for an simple_object_read. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	651
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	652 static void *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	653 simple_object_elf_fetch_attributes (simple_object_read *sobj,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	654 const char **errmsg ATTRIBUTE_UNUSED,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	655 int *err ATTRIBUTE_UNUSED)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	656 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	657 struct simple_object_elf_read *eor =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	658 (struct simple_object_elf_read *) sobj->data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	659 struct simple_object_elf_attributes *ret;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	660
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	661 ret = XNEW (struct simple_object_elf_attributes);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	662 ret->type_functions = eor->type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	663 ret->ei_data = eor->ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	664 ret->ei_class = eor->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	665 ret->ei_osabi = eor->ei_osabi;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	666 ret->machine = eor->machine;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	667 ret->flags = eor->flags;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	668 return ret;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	669 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	670
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	671 /* Release the privata data for an simple_object_read. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	672
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	673 static void
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	674 simple_object_elf_release_read (void *data)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	675 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	676 XDELETE (data);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	677 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	678
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	679 /* Compare two attributes structures. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	680
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	681 static const char *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	682 simple_object_elf_attributes_merge (void todata, void fromdata, int *err)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	683 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	684 struct simple_object_elf_attributes *to =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	685 (struct simple_object_elf_attributes *) todata;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	686 struct simple_object_elf_attributes *from =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	687 (struct simple_object_elf_attributes *) fromdata;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	688
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	689 if (to->ei_data != from->ei_data \|\| to->ei_class != from->ei_class)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	690 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	691 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	692 return "ELF object format mismatch";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	693 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	694
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	695 if (to->machine != from->machine)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	696 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	697 int ok;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	698
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	699 /* EM_SPARC and EM_SPARC32PLUS are compatible and force an
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	700 output of EM_SPARC32PLUS. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	701 ok = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	702 switch (to->machine)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	703 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	704 case EM_SPARC:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	705 if (from->machine == EM_SPARC32PLUS)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	706 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	707 to->machine = from->machine;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	708 ok = 1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	709 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	710 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	711
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	712 case EM_SPARC32PLUS:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	713 if (from->machine == EM_SPARC)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	714 ok = 1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	715 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	716
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	717 default:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	718 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	719 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	720
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	721 if (!ok)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	722 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	723 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	724 return "ELF machine number mismatch";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	725 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	726 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	727
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	728 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	729 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	730
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	731 /* Release the private data for an attributes structure. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	732
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	733 static void
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	734 simple_object_elf_release_attributes (void *data)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	735 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	736 XDELETE (data);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	737 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	738
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	739 /* Prepare to write out a file. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	740
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	741 static void *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	742 simple_object_elf_start_write (void *attributes_data,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	743 const char **errmsg ATTRIBUTE_UNUSED,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	744 int *err ATTRIBUTE_UNUSED)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	745 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	746 struct simple_object_elf_attributes *attrs =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	747 (struct simple_object_elf_attributes *) attributes_data;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	748 struct simple_object_elf_write *ret;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	749
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	750 /* We're just going to record the attributes, but we need to make a
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	751 copy because the user may delete them. */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	752 ret = XNEW (struct simple_object_elf_write);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	753 ret->attrs = *attrs;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	754 ret->shdrs = NULL;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	755 return ret;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	756 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	757
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	758 /* Write out an ELF ehdr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	759
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	760 static int
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	761 simple_object_elf_write_ehdr (simple_object_write *sobj, int descriptor,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	762 const char *errmsg, int err)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	763 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	764 struct simple_object_elf_attributes *attrs =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	765 (struct simple_object_elf_attributes *) sobj->data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	766 const struct elf_type_functions* fns;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	767 unsigned char cl;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	768 size_t ehdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	769 unsigned char buf[sizeof (Elf64_External_Ehdr)];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	770 simple_object_write_section *section;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	771 unsigned int shnum;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	772 unsigned int shstrndx;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	773
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	774 fns = attrs->type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	775 cl = attrs->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	776
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	777 shnum = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	778 for (section = sobj->sections; section != NULL; section = section->next)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	779 ++shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	780 if (shnum > 0)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	781 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	782 /* Add a section header for the dummy section and one for
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	783 .shstrtab. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	784 shnum += 2;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	785 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	786
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	787 ehdr_size = (cl == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	788 ? sizeof (Elf32_External_Ehdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	789 : sizeof (Elf64_External_Ehdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	790 memset (buf, 0, sizeof (Elf64_External_Ehdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	791
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	792 buf[EI_MAG0] = ELFMAG0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	793 buf[EI_MAG1] = ELFMAG1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	794 buf[EI_MAG2] = ELFMAG2;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	795 buf[EI_MAG3] = ELFMAG3;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	796 buf[EI_CLASS] = cl;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	797 buf[EI_DATA] = attrs->ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	798 buf[EI_VERSION] = EV_CURRENT;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	799 buf[EI_OSABI] = attrs->ei_osabi;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	800
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	801 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_type, Elf_Half, ET_REL);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	802 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_machine, Elf_Half, attrs->machine);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	803 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_version, Elf_Word, EV_CURRENT);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	804 /* e_entry left as zero. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	805 /* e_phoff left as zero. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	806 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_shoff, Elf_Addr, ehdr_size);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	807 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_flags, Elf_Word, attrs->flags);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	808 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_ehsize, Elf_Half, ehdr_size);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	809 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_phentsize, Elf_Half,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	810 (cl == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	811 ? sizeof (Elf32_External_Phdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	812 : sizeof (Elf64_External_Phdr)));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	813 /* e_phnum left as zero. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	814 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_shentsize, Elf_Half,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	815 (cl == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	816 ? sizeof (Elf32_External_Shdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	817 : sizeof (Elf64_External_Shdr)));
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	818 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_shnum, Elf_Half,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	819 shnum >= SHN_LORESERVE ? 0 : shnum);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	820 if (shnum == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	821 shstrndx = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	822 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	823 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	824 shstrndx = shnum - 1;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	825 if (shstrndx >= SHN_LORESERVE)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	826 shstrndx = SHN_XINDEX;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	827 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	828 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_shstrndx, Elf_Half, shstrndx);
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	829
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	830 return simple_object_internal_write (descriptor, 0, buf, ehdr_size,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	831 errmsg, err);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	832 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	833
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	834 /* Write out an ELF shdr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	835
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	836 static int
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	837 simple_object_elf_write_shdr (simple_object_write *sobj, int descriptor,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	838 off_t offset, unsigned int sh_name,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	839 unsigned int sh_type, unsigned int sh_flags,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	840 off_t sh_addr,
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	841 unsigned int sh_offset, unsigned int sh_size,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	842 unsigned int sh_link, unsigned int sh_info,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	843 size_t sh_addralign,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	844 size_t sh_entsize,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	845 const char *errmsg, int err)
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	846 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	847 struct simple_object_elf_attributes *attrs =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	848 (struct simple_object_elf_attributes *) sobj->data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	849 const struct elf_type_functions* fns;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	850 unsigned char cl;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	851 size_t shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	852 unsigned char buf[sizeof (Elf64_External_Shdr)];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	853
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	854 fns = attrs->type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	855 cl = attrs->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	856
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	857 shdr_size = (cl == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	858 ? sizeof (Elf32_External_Shdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	859 : sizeof (Elf64_External_Shdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	860 memset (buf, 0, sizeof (Elf64_External_Shdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	861
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	862 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_name, Elf_Word, sh_name);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	863 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_type, Elf_Word, sh_type);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	864 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_flags, Elf_Addr, sh_flags);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	865 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_addr, Elf_Addr, sh_addr);
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	866 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_offset, Elf_Addr, sh_offset);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	867 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_size, Elf_Addr, sh_size);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	868 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_link, Elf_Word, sh_link);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	869 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_info, Elf_Word, sh_info);
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	870 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_addralign, Elf_Addr, sh_addralign);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	871 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_entsize, Elf_Addr, sh_entsize);
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	872
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	873 return simple_object_internal_write (descriptor, offset, buf, shdr_size,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	874 errmsg, err);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	875 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	876
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	877 /* Write out a complete ELF file.
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	878 Ehdr
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	879 initial dummy Shdr
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	880 user-created Shdrs
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	881 .shstrtab Shdr
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	882 user-created section data
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	883 .shstrtab data */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	884
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	885 static const char *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	886 simple_object_elf_write_to_file (simple_object_write *sobj, int descriptor,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	887 int *err)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	888 {
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	889 struct simple_object_elf_write *eow =
04ced10e8804 gcc 7 kono parents: 68 diff changeset	890 (struct simple_object_elf_write *) sobj->data;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	891 struct simple_object_elf_attributes *attrs = &eow->attrs;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	892 unsigned char cl;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	893 size_t ehdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	894 size_t shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	895 const char *errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	896 simple_object_write_section *section;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	897 unsigned int shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	898 size_t shdr_offset;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	899 size_t sh_offset;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	900 unsigned int first_sh_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	901 unsigned int first_sh_link;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	902 size_t sh_name;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	903 unsigned char zero;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	904 unsigned secnum;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	905
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	906 if (!simple_object_elf_write_ehdr (sobj, descriptor, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	907 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	908
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	909 cl = attrs->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	910 if (cl == ELFCLASS32)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	911 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	912 ehdr_size = sizeof (Elf32_External_Ehdr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	913 shdr_size = sizeof (Elf32_External_Shdr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	914 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	915 else
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	916 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	917 ehdr_size = sizeof (Elf64_External_Ehdr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	918 shdr_size = sizeof (Elf64_External_Shdr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	919 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	920
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	921 shnum = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	922 for (section = sobj->sections; section != NULL; section = section->next)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	923 ++shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	924 if (shnum == 0)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	925 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	926
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	927 /* Add initial dummy Shdr and .shstrtab. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	928 shnum += 2;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	929
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	930 shdr_offset = ehdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	931 sh_offset = shdr_offset + shnum * shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	932
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	933 if (shnum < SHN_LORESERVE)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	934 first_sh_size = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	935 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	936 first_sh_size = shnum;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	937 if (shnum - 1 < SHN_LORESERVE)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	938 first_sh_link = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	939 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	940 first_sh_link = shnum - 1;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	941 if (!simple_object_elf_write_shdr (sobj, descriptor, shdr_offset,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	942 0, 0, 0, 0, 0, first_sh_size, first_sh_link,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	943 0, 0, 0, &errmsg, err))
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	944 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	945
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	946 shdr_offset += shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	947
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	948 sh_name = 1;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	949 secnum = 0;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	950 for (section = sobj->sections; section != NULL; section = section->next)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	951 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	952 size_t mask;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	953 size_t new_sh_offset;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	954 size_t sh_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	955 struct simple_object_write_section_buffer *buffer;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	956 unsigned int sh_type = SHT_PROGBITS;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	957 unsigned int sh_flags = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	958 off_t sh_addr = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	959 unsigned int sh_link = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	960 unsigned int sh_info = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	961 size_t sh_addralign = 1U << section->align;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	962 size_t sh_entsize = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	963 if (eow->shdrs)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	964 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	965 sh_type = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	966 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	967 sh_type, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	968 sh_flags = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	969 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	970 sh_flags, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	971 sh_addr = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	972 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	973 sh_addr, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	974 sh_link = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	975 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	976 sh_link, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	977 sh_info = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	978 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	979 sh_info, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	980 sh_addralign = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	981 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	982 sh_addralign, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	983 sh_entsize = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	984 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	985 sh_entsize, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	986 secnum++;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	987 }
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	988
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	989 mask = sh_addralign - 1;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	990 new_sh_offset = sh_offset + mask;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	991 new_sh_offset &= ~ mask;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	992 while (new_sh_offset > sh_offset)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	993 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	994 unsigned char zeroes[16];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	995 size_t write;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	996
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	997 memset (zeroes, 0, sizeof zeroes);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	998 write = new_sh_offset - sh_offset;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	999 if (write > sizeof zeroes)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1000 write = sizeof zeroes;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1001 if (!simple_object_internal_write (descriptor, sh_offset, zeroes,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1002 write, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1003 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1004 sh_offset += write;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1005 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1006
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1007 sh_size = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1008 for (buffer = section->buffers; buffer != NULL; buffer = buffer->next)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1009 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1010 if (!simple_object_internal_write (descriptor, sh_offset + sh_size,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1011 ((const unsigned char *)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1012 buffer->buffer),
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1013 buffer->size, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1014 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1015 sh_size += buffer->size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1016 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1017
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1018 if (!simple_object_elf_write_shdr (sobj, descriptor, shdr_offset,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1019 sh_name, sh_type, sh_flags,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1020 sh_addr, sh_offset,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1021 sh_size, sh_link, sh_info,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1022 sh_addralign, sh_entsize,
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1023 &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1024 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1025
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1026 shdr_offset += shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1027 sh_name += strlen (section->name) + 1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1028 sh_offset += sh_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1029 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1030
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1031 if (!simple_object_elf_write_shdr (sobj, descriptor, shdr_offset,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1032 sh_name, SHT_STRTAB, 0, 0, sh_offset,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1033 sh_name + strlen (".shstrtab") + 1, 0, 0,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1034 1, 0, &errmsg, err))
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1035 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1036
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1037 /* .shstrtab has a leading zero byte. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1038 zero = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1039 if (!simple_object_internal_write (descriptor, sh_offset, &zero, 1,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1040 &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1041 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1042 ++sh_offset;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1043
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1044 for (section = sobj->sections; section != NULL; section = section->next)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1045 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1046 size_t len;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1047
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1048 len = strlen (section->name) + 1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1049 if (!simple_object_internal_write (descriptor, sh_offset,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1050 (const unsigned char *) section->name,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1051 len, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1052 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1053 sh_offset += len;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1054 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1055
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1056 if (!simple_object_internal_write (descriptor, sh_offset,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1057 (const unsigned char *) ".shstrtab",
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1058 strlen (".shstrtab") + 1, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1059 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1060
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1061 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1062 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1063
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1064 /* Release the private data for an simple_object_write structure. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1065
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1066 static void
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1067 simple_object_elf_release_write (void *data)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1068 {
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1069 struct simple_object_elf_write eow = (struct simple_object_elf_write ) data;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1070 if (eow->shdrs)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1071 XDELETE (eow->shdrs);
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1072 XDELETE (data);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1073 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1074
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1075 /* Copy all sections in an ELF file. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1076
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1077 static const char *
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1078 simple_object_elf_copy_lto_debug_sections (simple_object_read *sobj,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1079 simple_object_write *dobj,
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1080 char (pfn) (const char *),
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1081 int *err)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1082 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1083 struct simple_object_elf_read *eor =
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1084 (struct simple_object_elf_read *) sobj->data;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1085 const struct elf_type_functions *type_functions = eor->type_functions;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1086 struct simple_object_elf_write *eow =
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1087 (struct simple_object_elf_write *) dobj->data;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1088 unsigned char ei_class = eor->ei_class;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1089 size_t shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1090 unsigned int shnum;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1091 unsigned char *shdrs;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1092 const char *errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1093 unsigned char *shstrhdr;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1094 size_t name_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1095 off_t shstroff;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1096 unsigned char *names;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1097 unsigned int i;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1098 int changed;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1099 int *pfnret;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1100 const char **pfnname;
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1101 unsigned new_i;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1102 unsigned *sh_map;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1103 unsigned first_shndx = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1104 unsigned int *symtab_indices_shndx;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1105
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1106 shdr_size = (ei_class == ELFCLASS32
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1107 ? sizeof (Elf32_External_Shdr)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1108 : sizeof (Elf64_External_Shdr));
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1109
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1110 /* Read the section headers. We skip section 0, which is not a
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1111 useful section. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1112
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1113 shnum = eor->shnum;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1114 shdrs = XNEWVEC (unsigned char, shdr_size * (shnum - 1));
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1115
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1116 if (!simple_object_internal_read (sobj->descriptor,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1117 sobj->offset + eor->shoff + shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1118 shdrs,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1119 shdr_size * (shnum - 1),
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1120 &errmsg, err))
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1121 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1122 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1123 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1124 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1125
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1126 /* Read the section names. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1127
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1128 shstrhdr = shdrs + (eor->shstrndx - 1) * shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1129 name_size = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1130 shstrhdr, sh_size, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1131 shstroff = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1132 shstrhdr, sh_offset, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1133 names = XNEWVEC (unsigned char, name_size);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1134 if (!simple_object_internal_read (sobj->descriptor,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1135 sobj->offset + shstroff,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1136 names, name_size, &errmsg, err))
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1137 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1138 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1139 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1140 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1141 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1142
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1143 pfnret = XNEWVEC (int, shnum);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1144 pfnname = XNEWVEC (const char *, shnum);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1145
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1146 /* Map of symtab to index section. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1147 symtab_indices_shndx = XCNEWVEC (unsigned int, shnum - 1);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1148
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1149 /* First perform the callbacks to know which sections to preserve and
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1150 what name to use for those. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1151 for (i = 1; i < shnum; ++i)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1152 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1153 unsigned char *shdr;
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1154 unsigned int sh_name, sh_type;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1155 const char *name;
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1156 char *ret;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1157
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1158 shdr = shdrs + (i - 1) * shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1159 sh_name = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1160 shdr, sh_name, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1161 if (sh_name >= name_size)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1162 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1163 *err = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1164 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1165 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1166 return "ELF section name out of range";
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1167 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1168
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1169 name = (const char *) names + sh_name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1170
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1171 ret = (*pfn) (name);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1172 pfnret[i - 1] = ret == NULL ? -1 : 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1173 pfnname[i - 1] = ret == NULL ? name : ret;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1174 if (first_shndx == 0
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1175 && pfnret[i - 1] == 0)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1176 first_shndx = i;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1177
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1178 /* Remember the indexes of existing SHT_SYMTAB_SHNDX sections. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1179 sh_type = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1180 shdr, sh_type, Elf_Word);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1181 if (sh_type == SHT_SYMTAB_SHNDX)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1182 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1183 unsigned int sh_link;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1184 sh_link = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1185 shdr, sh_link, Elf_Word);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1186 symtab_indices_shndx[sh_link - 1] = i;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1187 /* Always discard the extended index sections, after
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1188 copying it will not be needed. This way we don't need to
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1189 update it and deal with the ordering constraints of
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1190 processing the existing symtab and changing the index. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1191 pfnret[i - 1] = -1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1192 }
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1193 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1194
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1195 /* Mark sections as preserved that are required by to be preserved
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1196 sections. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1197 do
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1198 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1199 changed = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1200 for (i = 1; i < shnum; ++i)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1201 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1202 unsigned char *shdr;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1203 unsigned int sh_type, sh_info, sh_link;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1204 off_t offset;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1205 off_t length;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1206
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1207 shdr = shdrs + (i - 1) * shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1208 sh_type = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1209 shdr, sh_type, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1210 sh_info = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1211 shdr, sh_info, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1212 sh_link = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1213 shdr, sh_link, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1214 if (sh_type == SHT_GROUP)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1215 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1216 /* Mark groups containing copied sections. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1217 unsigned entsize = ELF_FETCH_FIELD (type_functions, ei_class,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1218 Shdr, shdr, sh_entsize,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1219 Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1220 unsigned char ent, buf;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1221 int keep = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1222 offset = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1223 shdr, sh_offset, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1224 length = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1225 shdr, sh_size, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1226 buf = XNEWVEC (unsigned char, length);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1227 if (!simple_object_internal_read (sobj->descriptor,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1228 sobj->offset + offset, buf,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1229 (size_t) length, &errmsg, err))
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1230 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1231 XDELETEVEC (buf);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1232 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1233 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1234 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1235 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1236 for (ent = buf + entsize; ent < buf + length; ent += entsize)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1237 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1238 unsigned sec = type_functions->fetch_Elf_Word (ent);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1239 if (pfnret[sec - 1] == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1240 keep = 1;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1241 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1242 if (keep)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1243 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1244 changed \|= (pfnret[sh_link - 1] == -1
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1245 \|\| pfnret[i - 1] == -1);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1246 pfnret[sh_link - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1247 pfnret[i - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1248 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1249 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1250 if (sh_type == SHT_RELA
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1251 \|\| sh_type == SHT_REL)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1252 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1253 /* Mark relocation sections and symtab of copied sections. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1254 if (pfnret[sh_info - 1] == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1255 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1256 changed \|= (pfnret[sh_link - 1] == -1
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1257 \|\| pfnret[i - 1] == -1);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1258 pfnret[sh_link - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1259 pfnret[i - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1260 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1261 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1262 if (sh_type == SHT_SYMTAB)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1263 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1264 /* Mark strings sections of copied symtabs. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1265 if (pfnret[i - 1] == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1266 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1267 changed \|= pfnret[sh_link - 1] == -1;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1268 pfnret[sh_link - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1269 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1270 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1271 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1272 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1273 while (changed);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1274
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1275 /* Compute a mapping of old -> new section numbers. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1276 sh_map = XNEWVEC (unsigned, shnum);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1277 sh_map[0] = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1278 new_i = 1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1279 for (i = 1; i < shnum; ++i)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1280 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1281 if (pfnret[i - 1] == -1)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1282 sh_map[i] = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1283 else
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1284 sh_map[i] = new_i++;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1285 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1286 if (new_i - 1 >= SHN_LORESERVE)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1287 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1288 *err = ENOTSUP;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1289 return "Too many copied sections";
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1290 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1291 eow->shdrs = XNEWVEC (unsigned char, shdr_size * (new_i - 1));
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1292
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1293 /* Then perform the actual copying. */
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1294 new_i = 0;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1295 for (i = 1; i < shnum; ++i)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1296 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1297 unsigned char *shdr;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1298 unsigned int sh_name, sh_type;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1299 const char *name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1300 off_t offset;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1301 off_t length;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1302 simple_object_write_section *dest;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1303 off_t flags;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1304 unsigned char *buf;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1305
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1306 if (pfnret[i - 1])
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1307 continue;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1308
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1309 new_i++;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1310 shdr = shdrs + (i - 1) * shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1311 sh_name = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1312 shdr, sh_name, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1313 if (sh_name >= name_size)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1314 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1315 *err = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1316 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1317 XDELETEVEC (shdrs);
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1318 XDELETEVEC (symtab_indices_shndx);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1319 return "ELF section name out of range";
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1320 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1321
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1322 name = pfnname[i - 1];
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1323 offset = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1324 shdr, sh_offset, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1325 length = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1326 shdr, sh_size, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1327 sh_type = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1328 shdr, sh_type, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1329
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1330 dest = simple_object_write_create_section (dobj, pfnname[i - 1],
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1331 0, &errmsg, err);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1332 if (dest == NULL)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1333 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1334 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1335 XDELETEVEC (shdrs);
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1336 XDELETEVEC (symtab_indices_shndx);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1337 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1338 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1339
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1340 /* Record the SHDR of the source. */
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1341 memcpy (eow->shdrs + (new_i - 1) * shdr_size, shdr, shdr_size);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1342 shdr = eow->shdrs + (new_i - 1) * shdr_size;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1343
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1344 /* Copy the data.
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1345 ??? This is quite wasteful and ideally would be delayed until
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1346 write_to_file (). Thus it questions the interfacing
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1347 which eventually should contain destination creation plus
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1348 writing. */
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1349 buf = XNEWVEC (unsigned char, length);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1350 if (!simple_object_internal_read (sobj->descriptor,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1351 sobj->offset + offset, buf,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1352 (size_t) length, &errmsg, err))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1353 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1354 XDELETEVEC (buf);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1355 XDELETEVEC (names);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1356 XDELETEVEC (shdrs);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1357 XDELETEVEC (symtab_indices_shndx);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1358 return errmsg;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1359 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1360
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1361 /* If we are processing .symtab purge __gnu_lto_v1 and
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1362 __gnu_lto_slim symbols from it and any symbols in discarded
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1363 sections. */
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1364 if (sh_type == SHT_SYMTAB)
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1365 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1366 unsigned entsize = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1367 shdr, sh_entsize, Elf_Addr);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1368 unsigned strtab = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1369 shdr, sh_link, Elf_Word);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1370 unsigned char strshdr = shdrs + (strtab - 1) shdr_size;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1371 off_t stroff = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1372 strshdr, sh_offset, Elf_Addr);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1373 size_t strsz = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1374 strshdr, sh_size, Elf_Addr);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1375 char *strings = XNEWVEC (char, strsz);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1376 char *gnu_lto = strings;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1377 unsigned char *ent;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1378 unsigned *shndx_table = NULL;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1379 simple_object_internal_read (sobj->descriptor,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1380 sobj->offset + stroff,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1381 (unsigned char *)strings,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1382 strsz, &errmsg, err);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1383 /* Find gnu_lto_ in strings. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1384 while ((gnu_lto = (char *) memchr (gnu_lto, 'g',
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1385 strings + strsz - gnu_lto)))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1386 if (strncmp (gnu_lto, "gnu_lto_v1",
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1387 strings + strsz - gnu_lto) == 0)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1388 break;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1389 else
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1390 gnu_lto++;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1391 /* Read the section index table if present. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1392 if (symtab_indices_shndx[i - 1] != 0)
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1393 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1394 unsigned char sidxhdr = shdrs + (strtab - 1) shdr_size;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1395 off_t sidxoff = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1396 sidxhdr, sh_offset, Elf_Addr);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1397 size_t sidxsz = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1398 sidxhdr, sh_size, Elf_Addr);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1399 shndx_table = (unsigned *)XNEWVEC (char, sidxsz);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1400 simple_object_internal_read (sobj->descriptor,
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1401 sobj->offset + sidxoff,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1402 (unsigned char *)shndx_table,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1403 sidxsz, &errmsg, err);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1404 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1405 for (ent = buf; ent < buf + length; ent += entsize)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1406 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1407 unsigned st_shndx = ELF_FETCH_FIELD (type_functions, ei_class,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1408 Sym, ent,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1409 st_shndx, Elf_Half);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1410 unsigned raw_st_shndx = st_shndx;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1411 unsigned char *st_info;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1412 unsigned char *st_other;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1413 int discard = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1414 if (ei_class == ELFCLASS32)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1415 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1416 st_info = &((Elf32_External_Sym *)ent)->st_info;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1417 st_other = &((Elf32_External_Sym *)ent)->st_other;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1418 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1419 else
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1420 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1421 st_info = &((Elf64_External_Sym *)ent)->st_info;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1422 st_other = &((Elf64_External_Sym *)ent)->st_other;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1423 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1424 if (st_shndx == SHN_XINDEX)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1425 st_shndx = type_functions->fetch_Elf_Word
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1426 ((unsigned char *)(shndx_table + (ent - buf) / entsize));
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1427 /* Eliminate all COMMONs - this includes __gnu_lto_v1
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1428 and __gnu_lto_slim which otherwise cause endless
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1429 LTO plugin invocation. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1430 if (st_shndx == SHN_COMMON)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1431 discard = 1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1432 /* We also need to remove symbols refering to sections
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1433 we'll eventually remove as with fat LTO objects
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1434 we otherwise get duplicate symbols at final link
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1435 (with GNU ld, gold is fine and ignores symbols in
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1436 sections marked as EXCLUDE). ld/20513 */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1437 else if (st_shndx != SHN_UNDEF
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1438 && st_shndx < shnum
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1439 && pfnret[st_shndx - 1] == -1)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1440 discard = 1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1441
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1442 if (discard)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1443 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1444 /* Make discarded symbols undefined and unnamed
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1445 in case it is local. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1446 int bind = ELF_ST_BIND (*st_info);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1447 int other = STV_DEFAULT;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1448 if (bind == STB_LOCAL)
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1449 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1450 /* Make discarded local symbols unnamed and
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1451 defined in the first prevailing section. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1452 ELF_SET_FIELD (type_functions, ei_class, Sym,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1453 ent, st_name, Elf_Word, 0);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1454 ELF_SET_FIELD (type_functions, ei_class, Sym,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1455 ent, st_shndx, Elf_Half,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1456 sh_map[first_shndx]);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1457 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1458 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1459 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1460 /* Make discarded global symbols hidden weak
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1461 undefined and sharing the gnu_lto_ name. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1462 bind = STB_WEAK;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1463 other = STV_HIDDEN;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1464 if (gnu_lto)
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1465 ELF_SET_FIELD (type_functions, ei_class, Sym,
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1466 ent, st_name, Elf_Word,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1467 gnu_lto - strings);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1468 ELF_SET_FIELD (type_functions, ei_class, Sym,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1469 ent, st_shndx, Elf_Half, SHN_UNDEF);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1470 }
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1471 *st_other = other;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1472 *st_info = ELF_ST_INFO (bind, STT_NOTYPE);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1473 ELF_SET_FIELD (type_functions, ei_class, Sym,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1474 ent, st_value, Elf_Addr, 0);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1475 ELF_SET_FIELD (type_functions, ei_class, Sym,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1476 ent, st_size, Elf_Word, 0);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1477 }
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1478 else if (raw_st_shndx < SHN_LORESERVE
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1479 \|\| raw_st_shndx == SHN_XINDEX)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1480 /* Remap the section reference. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1481 ELF_SET_FIELD (type_functions, ei_class, Sym,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1482 ent, st_shndx, Elf_Half, sh_map[st_shndx]);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1483 }
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1484 XDELETEVEC (strings);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1485 XDELETEVEC (shndx_table);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1486 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1487 else if (sh_type == SHT_GROUP)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1488 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1489 /* Remap section indices in groups and remove removed members. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1490 unsigned char ent, dst;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1491 for (dst = ent = buf + 4; ent < buf + length; ent += 4)
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1492 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1493 unsigned shndx = type_functions->fetch_Elf_Word (ent);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1494 if (pfnret[shndx - 1] == -1)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1495 ;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1496 else
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1497 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1498 type_functions->set_Elf_Word (dst, sh_map[shndx]);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1499 dst += 4;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1500 }
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1501 }
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1502 /* Adjust the length. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1503 length = dst - buf;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1504 }
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1505
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1506 errmsg = simple_object_write_add_data (dobj, dest,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1507 buf, length, 1, err);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1508 XDELETEVEC (buf);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1509 if (errmsg)
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1510 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1511 XDELETEVEC (names);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1512 XDELETEVEC (shdrs);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1513 XDELETEVEC (symtab_indices_shndx);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1514 return errmsg;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1515 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1516
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1517 flags = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1518 shdr, sh_flags, Elf_Addr);
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1519 /* Remap the section references. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1520 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1521 unsigned int sh_info, sh_link;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1522 if (flags & SHF_INFO_LINK \|\| sh_type == SHT_REL \|\| sh_type == SHT_RELA)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1523 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1524 sh_info = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1525 shdr, sh_info, Elf_Word);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1526 if (sh_info < SHN_LORESERVE
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1527 \|\| sh_info > SHN_HIRESERVE)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1528 sh_info = sh_map[sh_info];
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1529 ELF_SET_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1530 shdr, sh_info, Elf_Word, sh_info);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1531 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1532 sh_link = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1533 shdr, sh_link, Elf_Word);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1534 if (sh_link < SHN_LORESERVE
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1535 \|\| sh_link > SHN_HIRESERVE)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1536 sh_link = sh_map[sh_link];
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1537 ELF_SET_FIELD (type_functions, ei_class, Shdr,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1538 shdr, sh_link, Elf_Word, sh_link);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1539 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1540 /* The debugobj doesn't contain any code, thus no trampolines.
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1541 Even when the original object needs trampolines, debugobj
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1542 doesn't. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1543 if (strcmp (name, ".note.GNU-stack") == 0)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1544 flags &= ~SHF_EXECINSTR;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1545 /* Clear SHF_EXCLUDE on to be preserved sections. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1546 flags &= ~SHF_EXCLUDE;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1547 ELF_SET_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1548 shdr, sh_flags, Elf_Addr, flags);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1549 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1550
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1551 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1552 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1553 XDELETEVEC (pfnret);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1554 XDELETEVEC (pfnname);
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1555 XDELETEVEC (symtab_indices_shndx);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1556 XDELETEVEC (sh_map);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1557
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1558 return NULL;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1559 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1560
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1561
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1562 /* The ELF functions. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1563
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1564 const struct simple_object_functions simple_object_elf_functions =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1565 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1566 simple_object_elf_match,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1567 simple_object_elf_find_sections,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1568 simple_object_elf_fetch_attributes,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1569 simple_object_elf_release_read,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1570 simple_object_elf_attributes_merge,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1571 simple_object_elf_release_attributes,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1572 simple_object_elf_start_write,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1573 simple_object_elf_write_to_file,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1574 simple_object_elf_release_write,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1575 simple_object_elf_copy_lto_debug_sections
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1576 };

Mercurial > hg > CbC > CbC_gcc

annotate libiberty/simple-object-elf.c @ 131:84e7813d76e9