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

annotate libiberty/simple-object-elf.c @ 111:04ced10e8804

gcc 7

author	kono
date	Fri, 27 Oct 2017 22:46:09 +0900
parents	561a7518be6b
children	84e7813d76e9

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.
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	2 Copyright (C) 2010-2017 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>
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	25 #include <stddef.h>
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	26
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	27 #ifdef HAVE_STDLIB_H
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	28 #include <stdlib.h>
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	29 #endif
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_STDINT_H
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	32 #include <stdint.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_STRING_H
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	36 #include <string.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_INTTYPES_H
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	40 #include <inttypes.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 #include "simple-object-common.h"
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	44
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	45 /* ELF structures and constants. */
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 /* 32-bit ELF file header. */
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 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	50 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	51 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	52 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	53 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	54 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	55 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	56 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	57 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	58 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	59 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	60 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	61 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	62 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	63 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	64 } Elf32_External_Ehdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	65
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	66 /* 64-bit ELF file header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	67
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	68 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	69 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	70 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	71 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	72 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	73 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	74 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	75 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	76 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	77 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	78 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	79 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	80 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	81 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	82 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	83 } Elf64_External_Ehdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	84
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	85 /* 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	86
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	87 #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	88 #define ELFMAG0 0x7F /* Magic number byte 0 */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	89
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	90 #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	91 #define ELFMAG1 'E' /* Magic number byte 1 */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	92
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	93 #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	94 #define ELFMAG2 'L' /* Magic number byte 2 */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	95
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	96 #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	97 #define ELFMAG3 'F' /* Magic number byte 3 */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	98
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	99 #define EI_CLASS 4 /* File class */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	100 #define ELFCLASSNONE 0 /* Invalid class */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	101 #define ELFCLASS32 1 /* 32-bit objects */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	102 #define ELFCLASS64 2 /* 64-bit objects */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	103
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	104 #define EI_DATA 5 /* Data encoding */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	105 #define ELFDATANONE 0 /* Invalid data encoding */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	106 #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	107 #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	108
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	109 #define EI_VERSION 6 /* File version */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	110 #define EV_CURRENT 1 /* Current version */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	111
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	112 #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	113
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	114 /* Values for e_type field of Ehdr. */
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 ET_REL 1 /* Relocatable file */
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_machine 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 EM_SPARC 2 /* SUN SPARC */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	121 #define EM_SPARC32PLUS 18 /* Sun's "v8plus" */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	122
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	123 /* Special section index values. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	124
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	125 #define SHN_UNDEF 0 /* Undefined section */
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	126 #define SHN_LORESERVE 0xFF00 /* Begin range of reserved indices */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	127 #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	128 #define SHN_XINDEX 0xFFFF /* Section index is held elsewhere */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	129
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	130
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	131 /* 32-bit ELF program header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	132
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	133 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	134 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	135 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	136 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	137 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	138 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	139 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	140 unsigned char p_flags[4]; /* Segment flags */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	141 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	142 } Elf32_External_Phdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	143
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	144 /* 64-bit ELF program header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	145
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	146 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	147 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	148 unsigned char p_flags[4]; /* Segment flags */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	149 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	150 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	151 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	152 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	153 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	154 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	155 } Elf64_External_Phdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	156
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	157 /* 32-bit ELF section header */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	158
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	159 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	160 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	161 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	162 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	163 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	164 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	165 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	166 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	167 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	168 unsigned char sh_addralign[4]; /* Section alignment */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	169 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	170 } Elf32_External_Shdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	171
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	172 /* 64-bit ELF section header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	173
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	174 typedef struct {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	175 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	176 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	177 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	178 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	179 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	180 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	181 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	182 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	183 unsigned char sh_addralign[8]; /* Section alignment */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	184 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	185 } Elf64_External_Shdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	186
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	187 /* Values for sh_type field. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	188
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	189 #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	190 #define SHT_PROGBITS 1 /* Program data */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	191 #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	192 #define SHT_STRTAB 3 /* A string table */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	193 #define SHT_RELA 4 /* Relocation entries with addends */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	194 #define SHT_REL 9 /* Relocation entries, no addends */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	195 #define SHT_GROUP 17 /* Section contains a section group */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	196
04ced10e8804 gcc 7 kono parents: 68 diff changeset	197 /* Values for sh_flags field. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	198
04ced10e8804 gcc 7 kono parents: 68 diff changeset	199 #define SHF_EXECINSTR 0x00000004 /* Executable section. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	200 #define SHF_EXCLUDE 0x80000000 /* Link editor is to exclude this
04ced10e8804 gcc 7 kono parents: 68 diff changeset	201 section from executable and
04ced10e8804 gcc 7 kono parents: 68 diff changeset	202 shared library that it builds
04ced10e8804 gcc 7 kono parents: 68 diff changeset	203 when those objects are not to be
04ced10e8804 gcc 7 kono parents: 68 diff changeset	204 further relocated. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	205 /* Symbol table entry. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	206
04ced10e8804 gcc 7 kono parents: 68 diff changeset	207 typedef struct
04ced10e8804 gcc 7 kono parents: 68 diff changeset	208 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	209 unsigned char st_name[4]; /* Symbol name (string tbl index) */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	210 unsigned char st_value[4]; /* Symbol value */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	211 unsigned char st_size[4]; /* Symbol size */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	212 unsigned char st_info; /* Symbol type and binding */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	213 unsigned char st_other; /* Symbol visibility */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	214 unsigned char st_shndx[2]; /* Section index */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	215 } Elf32_External_Sym;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	216
04ced10e8804 gcc 7 kono parents: 68 diff changeset	217 typedef struct
04ced10e8804 gcc 7 kono parents: 68 diff changeset	218 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	219 unsigned char st_name[4]; /* Symbol name (string tbl index) */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	220 unsigned char st_info; /* Symbol type and binding */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	221 unsigned char st_other; /* Symbol visibility */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	222 unsigned char st_shndx[2]; /* Section index */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	223 unsigned char st_value[8]; /* Symbol value */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	224 unsigned char st_size[8]; /* Symbol size */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	225 } Elf64_External_Sym;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	226
04ced10e8804 gcc 7 kono parents: 68 diff changeset	227 #define ELF_ST_BIND(val) (((unsigned char) (val)) >> 4)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	228 #define ELF_ST_TYPE(val) ((val) & 0xf)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	229 #define ELF_ST_INFO(bind, type) (((bind) << 4) + ((type) & 0xf))
04ced10e8804 gcc 7 kono parents: 68 diff changeset	230
04ced10e8804 gcc 7 kono parents: 68 diff changeset	231 #define STT_NOTYPE 0 /* Symbol type is unspecified */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	232 #define STT_OBJECT 1 /* Symbol is a data object */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	233 #define STT_FUNC 2 /* Symbol is a code object */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	234 #define STT_TLS 6 /* Thread local data object */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	235 #define STT_GNU_IFUNC 10 /* Symbol is an indirect code object */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	236
04ced10e8804 gcc 7 kono parents: 68 diff changeset	237 #define STB_LOCAL 0 /* Local symbol */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	238 #define STB_GLOBAL 1 /* Global symbol */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	239 #define STB_WEAK 2 /* Weak global */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	240
04ced10e8804 gcc 7 kono parents: 68 diff changeset	241 #define STV_DEFAULT 0 /* Visibility is specified by binding type */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	242 #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	243
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	244 /* 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	245 endianness and size. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	246
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	247 struct elf_type_functions
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	248 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	249 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	250 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	251 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	252 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	253 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	254 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	255 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	256
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	257 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	258 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	259 simple_object_fetch_big_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	260 simple_object_fetch_big_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	261 simple_object_fetch_big_32_ulong,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	262 simple_object_set_big_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	263 simple_object_set_big_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	264 simple_object_set_big_32_ulong
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	267 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	268 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	269 simple_object_fetch_little_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	270 simple_object_fetch_little_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	271 simple_object_fetch_little_32_ulong,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	272 simple_object_set_little_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	273 simple_object_set_little_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	274 simple_object_set_little_32_ulong
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	277 #ifdef UNSIGNED_64BIT_TYPE
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	278
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	279 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	280 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	281 simple_object_fetch_big_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	282 simple_object_fetch_big_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	283 simple_object_fetch_big_64,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	284 simple_object_set_big_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	285 simple_object_set_big_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	286 simple_object_set_big_64
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	289 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	290 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	291 simple_object_fetch_little_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	292 simple_object_fetch_little_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	293 simple_object_fetch_little_64,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	294 simple_object_set_little_16,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	295 simple_object_set_little_32,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	296 simple_object_set_little_64
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	299 #endif
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	300
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	301 /* 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	302 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	303 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	304 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	305 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	306
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	307 #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	308 ((TYPEFUNCS)->fetch_ ## TYPE ((BUFFER) + offsetof (STRUCTTYPE, FIELD)))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	309
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	310 /* 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	311 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	312 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	313 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	314 Elf_Word, or Elf_Addr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	315
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	316 #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	317 FIELD, TYPE) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	318 ELF_FETCH_STRUCT_FIELD (TYPEFUNCS, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	319 Elf ## SIZE ## _External_ ## STRUCTTYPE, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	320 FIELD, BUFFER, TYPE)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	321
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	322 /* 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	323
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	324 #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	325 FIELD, TYPE) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	326 ((CLASS) == ELFCLASS32 \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	327 ? 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	328 TYPE) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	329 : 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	330 TYPE))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	331
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	332 /* 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	333 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	334 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	335 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	336 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	337 Elf_Addr. */
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 #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	340 (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	341
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	342 /* 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	343 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	344 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	345 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	346 Elf_Word, or Elf_Addr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	347
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	348 #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	349 TYPE, VAL) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	350 ELF_SET_STRUCT_FIELD (TYPEFUNCS, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	351 Elf ## SIZE ## _External_ ## STRUCTTYPE, \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	352 FIELD, BUFFER, TYPE, VAL)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	353
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	354 /* 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	355
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	356 #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	357 TYPE, VAL) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	358 ((CLASS) == ELFCLASS32 \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	359 ? 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	360 TYPE, VAL) \
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	361 : 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	362 TYPE, VAL))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	363
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	364 /* Private data for an simple_object_read. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	365
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	366 struct simple_object_elf_read
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	367 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	368 /* Type functions. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	369 const struct elf_type_functions* type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	370 /* Elf data. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	371 unsigned char ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	372 /* Elf class. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	373 unsigned char ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	374 /* ELF OS ABI. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	375 unsigned char ei_osabi;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	376 /* Elf machine number. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	377 unsigned short machine;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	378 /* Processor specific flags. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	379 unsigned int flags;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	380 /* File offset of section headers. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	381 ulong_type shoff;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	382 /* Number of sections. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	383 unsigned int shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	384 /* Index of string table section header. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	385 unsigned int shstrndx;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	386 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	387
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	388 /* Private data for an simple_object_attributes. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	389
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	390 struct simple_object_elf_attributes
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	391 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	392 /* Type functions. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	393 const struct elf_type_functions* type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	394 /* Elf data. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	395 unsigned char ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	396 /* Elf class. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	397 unsigned char ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	398 /* ELF OS ABI. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	399 unsigned char ei_osabi;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	400 /* Elf machine number. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	401 unsigned short machine;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	402 /* Processor specific flags. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	403 unsigned int flags;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	404 };
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	405
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	406 /* Private data for an simple_object_write. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	407
04ced10e8804 gcc 7 kono parents: 68 diff changeset	408 struct simple_object_elf_write
04ced10e8804 gcc 7 kono parents: 68 diff changeset	409 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	410 struct simple_object_elf_attributes attrs;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	411 unsigned char *shdrs;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	412 };
04ced10e8804 gcc 7 kono parents: 68 diff changeset	413
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	414 /* See if we have an ELF file. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	415
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	416 static void *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	417 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	418 int descriptor, off_t offset,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	419 const char *segment_name ATTRIBUTE_UNUSED,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	420 const char *errmsg, int err)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	421 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	422 unsigned char ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	423 unsigned char ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	424 const struct elf_type_functions *type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	425 unsigned char ehdr[sizeof (Elf64_External_Ehdr)];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	426 struct simple_object_elf_read *eor;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	427
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	428 if (header[EI_MAG0] != ELFMAG0
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	429 \|\| header[EI_MAG1] != ELFMAG1
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	430 \|\| header[EI_MAG2] != ELFMAG2
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	431 \|\| header[EI_MAG3] != ELFMAG3
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	432 \|\| header[EI_VERSION] != EV_CURRENT)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	433 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	434 *errmsg = NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	435 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	436 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	437 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	438
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	439 ei_data = header[EI_DATA];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	440 if (ei_data != ELFDATA2LSB && ei_data != ELFDATA2MSB)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	441 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	442 *errmsg = "unknown ELF endianness";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	443 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	444 return NULL;
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	447 ei_class = header[EI_CLASS];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	448 switch (ei_class)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	449 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	450 case ELFCLASS32:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	451 type_functions = (ei_data == ELFDATA2LSB
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	452 ? &elf_little_32_functions
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	453 : &elf_big_32_functions);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	454 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	455
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	456 case ELFCLASS64:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	457 #ifndef UNSIGNED_64BIT_TYPE
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	458 *errmsg = "64-bit ELF objects not supported";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	459 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	460 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	461 #else
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	462 type_functions = (ei_data == ELFDATA2LSB
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	463 ? &elf_little_64_functions
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	464 : &elf_big_64_functions);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	465 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	466 #endif
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	467
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	468 default:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	469 *errmsg = "unrecognized ELF size";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	470 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	471 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	472 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	473
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	474 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	475 errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	476 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	477
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	478 eor = XNEW (struct simple_object_elf_read);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	479 eor->type_functions = type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	480 eor->ei_data = ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	481 eor->ei_class = ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	482 eor->ei_osabi = header[EI_OSABI];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	483 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	484 e_machine, Elf_Half);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	485 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	486 e_flags, Elf_Word);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	487 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	488 e_shoff, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	489 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	490 e_shnum, Elf_Half);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	491 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	492 e_shstrndx, Elf_Half);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	493
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	494 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	495 && eor->shoff != 0)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	496 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	497 unsigned char shdr[sizeof (Elf64_External_Shdr)];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	498
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	499 /* Object file has more than 0xffff sections. */
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 (!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	502 (ei_class == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	503 ? sizeof (Elf32_External_Shdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	504 : sizeof (Elf64_External_Shdr)),
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	505 errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	506 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	507 XDELETE (eor);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	508 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	509 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	510
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	511 if (eor->shnum == 0)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	512 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	513 shdr, sh_size, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	514
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	515 if (eor->shstrndx == SHN_XINDEX)
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 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	518 shdr, sh_link, Elf_Word);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	519
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	520 /* 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	521 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	522 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	523 0x100. There is more information at
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	524 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	525 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	526 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	527 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	528 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	529 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	530 0x100 to get the real section index. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	531 if (eor->shstrndx >= eor->shnum
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	532 && eor->shstrndx >= SHN_LORESERVE + 0x100)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	533 eor->shstrndx -= 0x100;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	534 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	535 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	536
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	537 if (eor->shstrndx >= eor->shnum)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	538 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	539 *errmsg = "invalid ELF shstrndx >= shnum";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	540 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	541 XDELETE (eor);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	542 return NULL;
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	545 return (void *) eor;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	546 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	547
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	548 /* Find all sections in an ELF file. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	549
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	550 static const char *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	551 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	552 int (pfn) (void , const char *,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	553 off_t offset, off_t length),
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	554 void *data,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	555 int *err)
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 struct simple_object_elf_read *eor =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	558 (struct simple_object_elf_read *) sobj->data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	559 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	560 unsigned char ei_class = eor->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	561 size_t shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	562 unsigned int shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	563 unsigned char *shdrs;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	564 const char *errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	565 unsigned char *shstrhdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	566 size_t name_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	567 off_t shstroff;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	568 unsigned char *names;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	569 unsigned int i;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	570
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	571 shdr_size = (ei_class == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	572 ? sizeof (Elf32_External_Shdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	573 : sizeof (Elf64_External_Shdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	574
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	575 /* 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	576 useful section. */
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 shnum = eor->shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	579 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	580
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	581 if (!simple_object_internal_read (sobj->descriptor,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	582 sobj->offset + eor->shoff + shdr_size,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	583 shdrs,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	584 shdr_size * (shnum - 1),
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	585 &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	586 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	587 XDELETEVEC (shdrs);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	588 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	589 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	590
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	591 /* Read the section names. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	592
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	593 shstrhdr = shdrs + (eor->shstrndx - 1) * shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	594 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	595 shstrhdr, sh_size, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	596 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	597 shstrhdr, sh_offset, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	598 names = XNEWVEC (unsigned char, name_size);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	599 if (!simple_object_internal_read (sobj->descriptor,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	600 sobj->offset + shstroff,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	601 names, name_size, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	602 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	603 XDELETEVEC (names);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	604 XDELETEVEC (shdrs);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	605 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	606 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	607
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	608 for (i = 1; i < shnum; ++i)
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 unsigned char *shdr;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	611 unsigned int sh_name;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	612 const char *name;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	613 off_t offset;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	614 off_t length;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	615
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	616 shdr = shdrs + (i - 1) * shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	617 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	618 shdr, sh_name, Elf_Word);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	619 if (sh_name >= name_size)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	620 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	621 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	622 XDELETEVEC (names);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	623 XDELETEVEC (shdrs);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	624 return "ELF section name out of range";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	625 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	626
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	627 name = (const char *) names + sh_name;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	628 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	629 shdr, sh_offset, Elf_Addr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	630 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	631 shdr, sh_size, Elf_Addr);
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 if (!(*pfn) (data, name, offset, length))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	634 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	635 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	636
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	637 XDELETEVEC (names);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	638 XDELETEVEC (shdrs);
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 return NULL;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	641 }
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 /* 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	644
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	645 static void *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	646 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	647 const char **errmsg ATTRIBUTE_UNUSED,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	648 int *err ATTRIBUTE_UNUSED)
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 struct simple_object_elf_read *eor =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	651 (struct simple_object_elf_read *) sobj->data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	652 struct simple_object_elf_attributes *ret;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	653
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	654 ret = XNEW (struct simple_object_elf_attributes);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	655 ret->type_functions = eor->type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	656 ret->ei_data = eor->ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	657 ret->ei_class = eor->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	658 ret->ei_osabi = eor->ei_osabi;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	659 ret->machine = eor->machine;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	660 ret->flags = eor->flags;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	661 return ret;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	662 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	663
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	664 /* 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	665
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	666 static void
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	667 simple_object_elf_release_read (void *data)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	668 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	669 XDELETE (data);
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	672 /* Compare two attributes structures. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	673
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	674 static const char *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	675 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	676 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	677 struct simple_object_elf_attributes *to =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	678 (struct simple_object_elf_attributes *) todata;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	679 struct simple_object_elf_attributes *from =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	680 (struct simple_object_elf_attributes *) fromdata;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	681
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	682 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	683 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	684 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	685 return "ELF object format mismatch";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	686 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	687
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	688 if (to->machine != from->machine)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	689 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	690 int ok;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	691
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	692 /* 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	693 output of EM_SPARC32PLUS. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	694 ok = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	695 switch (to->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 case EM_SPARC:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	698 if (from->machine == EM_SPARC32PLUS)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	699 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	700 to->machine = from->machine;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	701 ok = 1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	702 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	703 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	704
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	705 case EM_SPARC32PLUS:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	706 if (from->machine == EM_SPARC)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	707 ok = 1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	708 break;
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 default:
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	711 break;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	712 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	713
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	714 if (!ok)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	715 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	716 *err = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	717 return "ELF machine number mismatch";
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	718 }
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 return NULL;
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	724 /* 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	725
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	726 static void
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	727 simple_object_elf_release_attributes (void *data)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	728 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	729 XDELETE (data);
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	732 /* Prepare to write out a file. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	733
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	734 static void *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	735 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	736 const char **errmsg ATTRIBUTE_UNUSED,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	737 int *err ATTRIBUTE_UNUSED)
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 struct simple_object_elf_attributes *attrs =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	740 (struct simple_object_elf_attributes *) attributes_data;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	741 struct simple_object_elf_write *ret;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	742
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	743 /* 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	744 copy because the user may delete them. */
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	745 ret = XNEW (struct simple_object_elf_write);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	746 ret->attrs = *attrs;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	747 ret->shdrs = NULL;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	748 return ret;
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	751 /* Write out an ELF ehdr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	752
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	753 static int
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	754 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	755 const char *errmsg, int err)
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 struct simple_object_elf_attributes *attrs =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	758 (struct simple_object_elf_attributes *) sobj->data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	759 const struct elf_type_functions* fns;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	760 unsigned char cl;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	761 size_t ehdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	762 unsigned char buf[sizeof (Elf64_External_Ehdr)];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	763 simple_object_write_section *section;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	764 unsigned int shnum;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	765 unsigned int shstrndx;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	766
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	767 fns = attrs->type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	768 cl = attrs->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	769
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	770 shnum = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	771 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	772 ++shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	773 if (shnum > 0)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	774 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	775 /* 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	776 .shstrtab. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	777 shnum += 2;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	778 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	779
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	780 ehdr_size = (cl == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	781 ? sizeof (Elf32_External_Ehdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	782 : sizeof (Elf64_External_Ehdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	783 memset (buf, 0, sizeof (Elf64_External_Ehdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	784
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	785 buf[EI_MAG0] = ELFMAG0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	786 buf[EI_MAG1] = ELFMAG1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	787 buf[EI_MAG2] = ELFMAG2;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	788 buf[EI_MAG3] = ELFMAG3;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	789 buf[EI_CLASS] = cl;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	790 buf[EI_DATA] = attrs->ei_data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	791 buf[EI_VERSION] = EV_CURRENT;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	792 buf[EI_OSABI] = attrs->ei_osabi;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	793
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	794 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	795 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	796 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	797 /* e_entry left as zero. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	798 /* e_phoff left as zero. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	799 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	800 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	801 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	802 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	803 (cl == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	804 ? sizeof (Elf32_External_Phdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	805 : sizeof (Elf64_External_Phdr)));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	806 /* e_phnum left as zero. */
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_shentsize, Elf_Half,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	808 (cl == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	809 ? sizeof (Elf32_External_Shdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	810 : sizeof (Elf64_External_Shdr)));
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	811 ELF_SET_FIELD (fns, cl, Ehdr, buf, e_shnum, Elf_Half,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	812 shnum >= SHN_LORESERVE ? 0 : shnum);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	813 if (shnum == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	814 shstrndx = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	815 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	816 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	817 shstrndx = shnum - 1;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	818 if (shstrndx >= SHN_LORESERVE)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	819 shstrndx = SHN_XINDEX;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	820 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	821 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	822
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	823 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	824 errmsg, err);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	825 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	826
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	827 /* Write out an ELF shdr. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	828
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	829 static int
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	830 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	831 off_t offset, unsigned int sh_name,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	832 unsigned int sh_type, unsigned int sh_flags,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	833 off_t sh_addr,
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	834 unsigned int sh_offset, unsigned int sh_size,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	835 unsigned int sh_link, unsigned int sh_info,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	836 size_t sh_addralign,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	837 size_t sh_entsize,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	838 const char *errmsg, int err)
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	839 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	840 struct simple_object_elf_attributes *attrs =
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	841 (struct simple_object_elf_attributes *) sobj->data;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	842 const struct elf_type_functions* fns;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	843 unsigned char cl;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	844 size_t shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	845 unsigned char buf[sizeof (Elf64_External_Shdr)];
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 fns = attrs->type_functions;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	848 cl = attrs->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	849
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	850 shdr_size = (cl == ELFCLASS32
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	851 ? sizeof (Elf32_External_Shdr)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	852 : sizeof (Elf64_External_Shdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	853 memset (buf, 0, sizeof (Elf64_External_Shdr));
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	854
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	855 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	856 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	857 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_flags, Elf_Addr, sh_flags);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	858 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	859 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	860 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_size, Elf_Addr, sh_size);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	861 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_link, Elf_Word, sh_link);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	862 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	863 ELF_SET_FIELD (fns, cl, Shdr, buf, sh_addralign, Elf_Addr, sh_addralign);
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	864 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	865
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	866 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	867 errmsg, err);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	868 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	869
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	870 /* Write out a complete ELF file.
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	871 Ehdr
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	872 initial dummy Shdr
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	873 user-created Shdrs
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	874 .shstrtab Shdr
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	875 user-created section data
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	876 .shstrtab data */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	877
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	878 static const char *
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	879 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	880 int *err)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	881 {
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	882 struct simple_object_elf_write *eow =
04ced10e8804 gcc 7 kono parents: 68 diff changeset	883 (struct simple_object_elf_write *) sobj->data;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	884 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	885 unsigned char cl;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	886 size_t ehdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	887 size_t shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	888 const char *errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	889 simple_object_write_section *section;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	890 unsigned int shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	891 size_t shdr_offset;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	892 size_t sh_offset;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	893 unsigned int first_sh_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	894 unsigned int first_sh_link;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	895 size_t sh_name;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	896 unsigned char zero;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	897 unsigned secnum;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	898
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	899 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	900 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	901
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	902 cl = attrs->ei_class;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	903 if (cl == ELFCLASS32)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	904 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	905 ehdr_size = sizeof (Elf32_External_Ehdr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	906 shdr_size = sizeof (Elf32_External_Shdr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	907 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	908 else
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	909 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	910 ehdr_size = sizeof (Elf64_External_Ehdr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	911 shdr_size = sizeof (Elf64_External_Shdr);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	912 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	913
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	914 shnum = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	915 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	916 ++shnum;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	917 if (shnum == 0)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	918 return NULL;
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 /* Add initial dummy Shdr and .shstrtab. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	921 shnum += 2;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	922
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	923 shdr_offset = ehdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	924 sh_offset = shdr_offset + shnum * shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	925
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	926 if (shnum < SHN_LORESERVE)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	927 first_sh_size = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	928 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	929 first_sh_size = shnum;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	930 if (shnum - 1 < SHN_LORESERVE)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	931 first_sh_link = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	932 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	933 first_sh_link = shnum - 1;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	934 if (!simple_object_elf_write_shdr (sobj, descriptor, shdr_offset,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	935 0, 0, 0, 0, 0, first_sh_size, first_sh_link,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	936 0, 0, 0, &errmsg, err))
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	937 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	938
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	939 shdr_offset += shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	940
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	941 sh_name = 1;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	942 secnum = 0;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	943 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	944 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	945 size_t mask;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	946 size_t new_sh_offset;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	947 size_t sh_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	948 struct simple_object_write_section_buffer *buffer;
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	949 unsigned int sh_type = SHT_PROGBITS;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	950 unsigned int sh_flags = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	951 off_t sh_addr = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	952 unsigned int sh_link = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	953 unsigned int sh_info = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	954 size_t sh_addralign = 1U << section->align;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	955 size_t sh_entsize = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	956 if (eow->shdrs)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	957 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	958 sh_type = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	959 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	960 sh_type, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	961 sh_flags = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	962 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	963 sh_flags, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	964 sh_addr = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	965 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	966 sh_addr, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	967 sh_link = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	968 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	969 sh_link, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	970 sh_info = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	971 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	972 sh_info, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	973 sh_addralign = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	974 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	975 sh_addralign, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	976 sh_entsize = ELF_FETCH_FIELD (attrs->type_functions, attrs->ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	977 eow->shdrs + secnum * shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	978 sh_entsize, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	979 secnum++;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	980 }
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	981
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	982 mask = sh_addralign - 1;
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	983 new_sh_offset = sh_offset + mask;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	984 new_sh_offset &= ~ mask;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	985 while (new_sh_offset > sh_offset)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	986 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	987 unsigned char zeroes[16];
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	988 size_t write;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	989
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	990 memset (zeroes, 0, sizeof zeroes);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	991 write = new_sh_offset - sh_offset;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	992 if (write > sizeof zeroes)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	993 write = sizeof zeroes;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	994 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	995 write, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	996 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	997 sh_offset += write;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	998 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	999
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1000 sh_size = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1001 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	1002 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1003 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	1004 ((const unsigned char *)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1005 buffer->buffer),
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1006 buffer->size, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1007 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1008 sh_size += buffer->size;
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1011 if (!simple_object_elf_write_shdr (sobj, descriptor, shdr_offset,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1012 sh_name, sh_type, sh_flags,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1013 sh_addr, sh_offset,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1014 sh_size, sh_link, sh_info,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1015 sh_addralign, sh_entsize,
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1016 &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1017 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1018
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1019 shdr_offset += shdr_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1020 sh_name += strlen (section->name) + 1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1021 sh_offset += sh_size;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1022 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1023
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1024 if (!simple_object_elf_write_shdr (sobj, descriptor, shdr_offset,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1025 sh_name, SHT_STRTAB, 0, 0, sh_offset,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1026 sh_name + strlen (".shstrtab") + 1, 0, 0,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1027 1, 0, &errmsg, err))
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1028 return errmsg;
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 /* .shstrtab has a leading zero byte. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1031 zero = 0;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1032 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	1033 &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1034 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1035 ++sh_offset;
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 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	1038 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1039 size_t len;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1040
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1041 len = strlen (section->name) + 1;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1042 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	1043 (const unsigned char *) section->name,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1044 len, &errmsg, err))
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1045 return errmsg;
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1046 sh_offset += 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
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 *) ".shstrtab",
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1051 strlen (".shstrtab") + 1, &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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1054 return NULL;
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
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1057 /* 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	1058
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1059 static void
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1060 simple_object_elf_release_write (void *data)
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1061 {
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1062 struct simple_object_elf_write eow = (struct simple_object_elf_write ) data;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1063 if (eow->shdrs)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1064 XDELETE (eow->shdrs);
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1065 XDELETE (data);
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1066 }
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1067
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1068 /* Copy all sections in an ELF file. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1069
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1070 static const char *
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1071 simple_object_elf_copy_lto_debug_sections (simple_object_read *sobj,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1072 simple_object_write *dobj,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1073 int (pfn) (const char *),
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1074 int *err)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1075 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1076 struct simple_object_elf_read *eor =
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1077 (struct simple_object_elf_read *) sobj->data;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1078 const struct elf_type_functions *type_functions = eor->type_functions;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1079 struct simple_object_elf_write *eow =
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1080 (struct simple_object_elf_write *) dobj->data;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1081 unsigned char ei_class = eor->ei_class;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1082 size_t shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1083 unsigned int shnum;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1084 unsigned char *shdrs;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1085 const char *errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1086 unsigned char *shstrhdr;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1087 size_t name_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1088 off_t shstroff;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1089 unsigned char *names;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1090 unsigned int i;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1091 int changed;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1092 int *pfnret;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1093 const char **pfnname;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1094
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1095 shdr_size = (ei_class == ELFCLASS32
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1096 ? sizeof (Elf32_External_Shdr)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1097 : sizeof (Elf64_External_Shdr));
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1098
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1099 /* Read the section headers. We skip section 0, which is not a
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1100 useful section. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1101
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1102 shnum = eor->shnum;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1103 shdrs = XNEWVEC (unsigned char, shdr_size * (shnum - 1));
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1104
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1105 if (!simple_object_internal_read (sobj->descriptor,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1106 sobj->offset + eor->shoff + shdr_size,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1107 shdrs,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1108 shdr_size * (shnum - 1),
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1109 &errmsg, err))
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1110 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1111 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1112 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1113 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1114
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1115 /* Read the section names. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1116
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1117 shstrhdr = shdrs + (eor->shstrndx - 1) * shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1118 name_size = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1119 shstrhdr, sh_size, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1120 shstroff = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1121 shstrhdr, sh_offset, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1122 names = XNEWVEC (unsigned char, name_size);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1123 if (!simple_object_internal_read (sobj->descriptor,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1124 sobj->offset + shstroff,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1125 names, name_size, &errmsg, err))
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1126 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1127 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1128 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1129 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1130 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1131
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1132 eow->shdrs = XNEWVEC (unsigned char, shdr_size * (shnum - 1));
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1133 pfnret = XNEWVEC (int, shnum);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1134 pfnname = XNEWVEC (const char *, shnum);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1135
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1136 /* First perform the callbacks to know which sections to preserve and
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1137 what name to use for those. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1138 for (i = 1; i < shnum; ++i)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1139 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1140 unsigned char *shdr;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1141 unsigned int sh_name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1142 const char *name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1143 int ret;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1144
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1145 shdr = shdrs + (i - 1) * shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1146 sh_name = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1147 shdr, sh_name, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1148 if (sh_name >= name_size)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1149 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1150 *err = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1151 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1152 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1153 return "ELF section name out of range";
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1154 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1155
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1156 name = (const char *) names + sh_name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1157
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1158 ret = (*pfn) (&name);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1159 pfnret[i - 1] = ret == 1 ? 0 : -1;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1160 pfnname[i - 1] = name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1161 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1162
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1163 /* Mark sections as preserved that are required by to be preserved
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1164 sections. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1165 do
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1166 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1167 changed = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1168 for (i = 1; i < shnum; ++i)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1169 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1170 unsigned char *shdr;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1171 unsigned int sh_type, sh_info, sh_link;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1172 off_t offset;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1173 off_t length;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1174
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1175 shdr = shdrs + (i - 1) * shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1176 sh_type = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1177 shdr, sh_type, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1178 sh_info = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1179 shdr, sh_info, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1180 sh_link = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1181 shdr, sh_link, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1182 if (sh_type == SHT_GROUP)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1183 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1184 /* Mark groups containing copied sections. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1185 unsigned entsize = ELF_FETCH_FIELD (type_functions, ei_class,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1186 Shdr, shdr, sh_entsize,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1187 Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1188 unsigned char ent, buf;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1189 int keep = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1190 offset = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1191 shdr, sh_offset, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1192 length = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1193 shdr, sh_size, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1194 buf = XNEWVEC (unsigned char, length);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1195 if (!simple_object_internal_read (sobj->descriptor,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1196 sobj->offset + offset, buf,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1197 (size_t) length, &errmsg, err))
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1198 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1199 XDELETEVEC (buf);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1200 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1201 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1202 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1203 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1204 for (ent = buf + entsize; ent < buf + length; ent += entsize)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1205 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1206 unsigned sec = type_functions->fetch_Elf_Word (ent);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1207 if (pfnret[sec - 1] == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1208 keep = 1;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1209 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1210 if (keep)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1211 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1212 changed \|= (pfnret[sh_link - 1] == -1
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1213 \|\| pfnret[i - 1] == -1);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1214 pfnret[sh_link - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1215 pfnret[i - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1216 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1217 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1218 if (sh_type == SHT_RELA
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1219 \|\| sh_type == SHT_REL)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1220 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1221 /* Mark relocation sections and symtab of copied sections. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1222 if (pfnret[sh_info - 1] == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1223 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1224 changed \|= (pfnret[sh_link - 1] == -1
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1225 \|\| pfnret[i - 1] == -1);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1226 pfnret[sh_link - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1227 pfnret[i - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1228 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1229 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1230 if (sh_type == SHT_SYMTAB)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1231 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1232 /* Mark strings sections of copied symtabs. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1233 if (pfnret[i - 1] == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1234 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1235 changed \|= pfnret[sh_link - 1] == -1;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1236 pfnret[sh_link - 1] = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1237 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1238 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1239 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1240 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1241 while (changed);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1242
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1243 /* Then perform the actual copying. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1244 for (i = 1; i < shnum; ++i)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1245 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1246 unsigned char *shdr;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1247 unsigned int sh_name, sh_type;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1248 const char *name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1249 off_t offset;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1250 off_t length;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1251 int ret;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1252 simple_object_write_section *dest;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1253 off_t flags;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1254 unsigned char *buf;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1255
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1256 shdr = shdrs + (i - 1) * shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1257 sh_name = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1258 shdr, sh_name, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1259 if (sh_name >= name_size)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1260 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1261 *err = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1262 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1263 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1264 return "ELF section name out of range";
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1265 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1266
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1267 name = (const char *) names + sh_name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1268 offset = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1269 shdr, sh_offset, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1270 length = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1271 shdr, sh_size, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1272 sh_type = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1273 shdr, sh_type, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1274
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1275 ret = pfnret[i - 1];
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1276 name = ret == 0 ? pfnname[i - 1] : "";
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1277
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1278 dest = simple_object_write_create_section (dobj, name, 0, &errmsg, err);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1279 if (dest == NULL)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1280 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1281 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1282 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1283 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1284 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1285
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1286 /* Record the SHDR of the source. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1287 memcpy (eow->shdrs + (i - 1) * shdr_size, shdr, shdr_size);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1288 shdr = eow->shdrs + (i - 1) * shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1289
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1290 /* Copy the data.
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1291 ??? This is quite wasteful and ideally would be delayed until
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1292 write_to_file (). Thus it questions the interfacing
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1293 which eventually should contain destination creation plus
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1294 writing. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1295 /* Keep empty sections for sections we should discard. This avoids
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1296 the need to rewrite section indices in symtab and relocation
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1297 sections. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1298 if (ret == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1299 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1300 buf = XNEWVEC (unsigned char, length);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1301 if (!simple_object_internal_read (sobj->descriptor,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1302 sobj->offset + offset, buf,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1303 (size_t) length, &errmsg, err))
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1304 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1305 XDELETEVEC (buf);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1306 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1307 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1308 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1309 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1310
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1311 /* If we are processing .symtab purge __gnu_lto_v1 and
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1312 __gnu_lto_slim symbols from it. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1313 if (sh_type == SHT_SYMTAB)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1314 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1315 unsigned entsize = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1316 shdr, sh_entsize, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1317 unsigned strtab = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1318 shdr, sh_link, Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1319 unsigned char strshdr = shdrs + (strtab - 1) shdr_size;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1320 off_t stroff = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1321 strshdr, sh_offset, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1322 size_t strsz = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1323 strshdr, sh_size, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1324 char *strings = XNEWVEC (char, strsz);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1325 unsigned char *ent;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1326 simple_object_internal_read (sobj->descriptor,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1327 sobj->offset + stroff,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1328 (unsigned char *)strings,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1329 strsz, &errmsg, err);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1330 for (ent = buf; ent < buf + length; ent += entsize)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1331 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1332 unsigned st_shndx = ELF_FETCH_FIELD (type_functions, ei_class,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1333 Sym, ent,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1334 st_shndx, Elf_Half);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1335 unsigned char *st_info;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1336 unsigned char *st_other;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1337 int discard = 0;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1338 if (ei_class == ELFCLASS32)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1339 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1340 st_info = &((Elf32_External_Sym *)ent)->st_info;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1341 st_other = &((Elf32_External_Sym *)ent)->st_other;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1342 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1343 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1344 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1345 st_info = &((Elf64_External_Sym *)ent)->st_info;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1346 st_other = &((Elf64_External_Sym *)ent)->st_other;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1347 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1348 /* Eliminate all COMMONs - this includes __gnu_lto_v1
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1349 and __gnu_lto_slim which otherwise cause endless
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1350 LTO plugin invocation. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1351 if (st_shndx == SHN_COMMON)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1352 discard = 1;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1353 /* We also need to remove symbols refering to sections
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1354 we'll eventually remove as with fat LTO objects
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1355 we otherwise get duplicate symbols at final link
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1356 (with GNU ld, gold is fine and ignores symbols in
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1357 sections marked as EXCLUDE). ld/20513 */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1358 else if (st_shndx != SHN_UNDEF
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1359 && st_shndx < shnum
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1360 && pfnret[st_shndx - 1] == -1)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1361 discard = 1;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1362
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1363 if (discard)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1364 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1365 /* Make discarded symbols undefined and unnamed
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1366 in case it is local. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1367 int bind = ELF_ST_BIND (*st_info);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1368 int other = STV_DEFAULT;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1369 size_t st_name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1370
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1371 if (bind == STB_LOCAL)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1372 ELF_SET_FIELD (type_functions, ei_class, Sym,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1373 ent, st_name, Elf_Word, 0);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1374 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1375 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1376 bind = STB_WEAK;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1377 st_name = ELF_FETCH_FIELD (type_functions, ei_class,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1378 Sym, ent, st_name,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1379 Elf_Word);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1380 if (st_name < strsz)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1381 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1382 char *p = strings + st_name;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1383 if (p[0] == '_'
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1384 && p[1] == '_'
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1385 && strncmp (p + (p[2] == '_'),
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1386 "__gnu_lto_", 10) == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1387 other = STV_HIDDEN;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1388 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1389 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1390 *st_other = other;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1391 *st_info = ELF_ST_INFO (bind, STT_NOTYPE);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1392 ELF_SET_FIELD (type_functions, ei_class, Sym,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1393 ent, st_value, Elf_Addr, 0);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1394 ELF_SET_FIELD (type_functions, ei_class, Sym,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1395 ent, st_size, Elf_Word, 0);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1396 ELF_SET_FIELD (type_functions, ei_class, Sym,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1397 ent, st_shndx, Elf_Half, SHN_UNDEF);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1398 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1399 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1400 XDELETEVEC (strings);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1401 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1402
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1403 errmsg = simple_object_write_add_data (dobj, dest,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1404 buf, length, 1, err);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1405 XDELETEVEC (buf);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1406 if (errmsg)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1407 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1408 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1409 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1410 return errmsg;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1411 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1412 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1413 else
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1414 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1415 /* For deleted sections mark the section header table entry as
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1416 unused. That allows the link editor to remove it in a partial
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1417 link. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1418 ELF_SET_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1419 shdr, sh_type, Elf_Word, SHT_NULL);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1420 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1421
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1422 flags = ELF_FETCH_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1423 shdr, sh_flags, Elf_Addr);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1424 if (ret == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1425 {
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1426 /* The debugobj doesn't contain any code, thus no trampolines.
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1427 Even when the original object needs trampolines, debugobj
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1428 doesn't. */
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1429 if (strcmp (name, ".note.GNU-stack") == 0)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1430 flags &= ~SHF_EXECINSTR;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1431 flags &= ~SHF_EXCLUDE;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1432 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1433 else if (ret == -1)
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1434 flags = SHF_EXCLUDE;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1435 ELF_SET_FIELD (type_functions, ei_class, Shdr,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1436 shdr, sh_flags, Elf_Addr, flags);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1437 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1438
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1439 XDELETEVEC (names);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1440 XDELETEVEC (shdrs);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1441 XDELETEVEC (pfnret);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1442 XDELETEVEC (pfnname);
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1443
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1444 return NULL;
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1445 }
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1446
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1447
68 561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1448 /* The ELF functions. */
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1449
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1450 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	1451 {
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1452 simple_object_elf_match,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1453 simple_object_elf_find_sections,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1454 simple_object_elf_fetch_attributes,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1455 simple_object_elf_release_read,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1456 simple_object_elf_attributes_merge,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1457 simple_object_elf_release_attributes,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1458 simple_object_elf_start_write,
561a7518be6b update gcc-4.6 Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1459 simple_object_elf_write_to_file,
111 04ced10e8804 gcc 7 kono parents: 68 diff changeset	1460 simple_object_elf_release_write,
04ced10e8804 gcc 7 kono parents: 68 diff changeset	1461 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	1462 };

Mercurial > hg > CbC > CbC_gcc

annotate libiberty/simple-object-elf.c @ 111:04ced10e8804