2010-01-06 16:52:15 +00:00
|
|
|
|
/* elfedit.c -- Update the ELF header of an ELF format file
|
2016-01-01 11:25:12 +00:00
|
|
|
|
Copyright (C) 2010-2016 Free Software Foundation, Inc.
|
2010-01-06 16:52:15 +00:00
|
|
|
|
|
|
|
|
|
This file is part of GNU Binutils.
|
|
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
|
along with this program; if not, write to the Free Software
|
|
|
|
|
Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
|
|
|
|
|
02110-1301, USA. */
|
|
|
|
|
|
|
|
|
|
#include "sysdep.h"
|
|
|
|
|
#include <assert.h>
|
|
|
|
|
|
|
|
|
|
#if __GNUC__ >= 2
|
|
|
|
|
/* Define BFD64 here, even if our default architecture is 32 bit ELF
|
|
|
|
|
as this will allow us to read in and parse 64bit and 32bit ELF files.
|
|
|
|
|
Only do this if we believe that the compiler can support a 64 bit
|
|
|
|
|
data type. For now we only rely on GCC being able to do this. */
|
|
|
|
|
#define BFD64
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#include "bfd.h"
|
2010-11-21 21:27:15 +00:00
|
|
|
|
#include "elfcomm.h"
|
2010-01-06 16:52:15 +00:00
|
|
|
|
#include "bucomm.h"
|
|
|
|
|
|
|
|
|
|
#include "elf/common.h"
|
|
|
|
|
#include "elf/external.h"
|
|
|
|
|
#include "elf/internal.h"
|
|
|
|
|
|
|
|
|
|
#include "getopt.h"
|
|
|
|
|
#include "libiberty.h"
|
|
|
|
|
#include "safe-ctype.h"
|
|
|
|
|
#include "filenames.h"
|
|
|
|
|
|
|
|
|
|
char * program_name = "elfedit";
|
|
|
|
|
static long archive_file_offset;
|
|
|
|
|
static unsigned long archive_file_size;
|
|
|
|
|
static Elf_Internal_Ehdr elf_header;
|
|
|
|
|
static Elf32_External_Ehdr ehdr32;
|
|
|
|
|
static Elf64_External_Ehdr ehdr64;
|
|
|
|
|
static int input_elf_machine = -1;
|
|
|
|
|
static int output_elf_machine = -1;
|
2010-01-08 18:50:39 +00:00
|
|
|
|
static int input_elf_type = -1;
|
|
|
|
|
static int output_elf_type = -1;
|
2010-08-23 16:25:53 +00:00
|
|
|
|
static int input_elf_osabi = -1;
|
|
|
|
|
static int output_elf_osabi = -1;
|
2015-05-11 16:57:20 +00:00
|
|
|
|
enum elfclass
|
|
|
|
|
{
|
|
|
|
|
ELF_CLASS_UNKNOWN = -1,
|
|
|
|
|
ELF_CLASS_NONE = ELFCLASSNONE,
|
|
|
|
|
ELF_CLASS_32 = ELFCLASS32,
|
|
|
|
|
ELF_CLASS_64 = ELFCLASS64,
|
|
|
|
|
ELF_CLASS_BOTH
|
|
|
|
|
};
|
|
|
|
|
static enum elfclass input_elf_class = ELF_CLASS_UNKNOWN;
|
|
|
|
|
static enum elfclass output_elf_class = ELF_CLASS_BOTH;
|
|
|
|
|
|
|
|
|
|
/* Return ELF class for a machine type, MACH. */
|
|
|
|
|
|
|
|
|
|
static enum elfclass
|
|
|
|
|
elf_class (int mach)
|
|
|
|
|
{
|
|
|
|
|
switch (mach)
|
|
|
|
|
{
|
|
|
|
|
case EM_386:
|
|
|
|
|
case EM_IAMCU:
|
|
|
|
|
return ELF_CLASS_32;
|
|
|
|
|
case EM_L1OM:
|
|
|
|
|
case EM_K1OM:
|
|
|
|
|
return ELF_CLASS_64;
|
|
|
|
|
case EM_X86_64:
|
|
|
|
|
case EM_NONE:
|
|
|
|
|
return ELF_CLASS_BOTH;
|
|
|
|
|
default:
|
2015-05-13 10:57:46 +00:00
|
|
|
|
return ELF_CLASS_BOTH;
|
2015-05-11 16:57:20 +00:00
|
|
|
|
}
|
|
|
|
|
}
|
2010-01-06 16:52:15 +00:00
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
update_elf_header (const char *file_name, FILE *file)
|
|
|
|
|
{
|
2010-08-23 16:25:53 +00:00
|
|
|
|
int class, machine, type, status, osabi;
|
2010-01-06 16:52:15 +00:00
|
|
|
|
|
|
|
|
|
if (elf_header.e_ident[EI_MAG0] != ELFMAG0
|
|
|
|
|
|| elf_header.e_ident[EI_MAG1] != ELFMAG1
|
|
|
|
|
|| elf_header.e_ident[EI_MAG2] != ELFMAG2
|
|
|
|
|
|| elf_header.e_ident[EI_MAG3] != ELFMAG3)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error
|
2010-01-06 16:52:15 +00:00
|
|
|
|
(_("%s: Not an ELF file - wrong magic bytes at the start\n"),
|
|
|
|
|
file_name);
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (elf_header.e_ident[EI_VERSION] != EV_CURRENT)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error
|
2010-01-06 16:52:15 +00:00
|
|
|
|
(_("%s: Unsupported EI_VERSION: %d is not %d\n"),
|
|
|
|
|
file_name, elf_header.e_ident[EI_VERSION],
|
|
|
|
|
EV_CURRENT);
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2010-01-08 15:58:08 +00:00
|
|
|
|
/* Return if e_machine is the same as output_elf_machine. */
|
|
|
|
|
if (output_elf_machine == elf_header.e_machine)
|
|
|
|
|
return 1;
|
|
|
|
|
|
|
|
|
|
class = elf_header.e_ident[EI_CLASS];
|
2015-05-11 16:57:20 +00:00
|
|
|
|
machine = elf_header.e_machine;
|
2010-01-08 15:58:08 +00:00
|
|
|
|
|
2010-01-06 16:52:15 +00:00
|
|
|
|
/* Skip if class doesn't match. */
|
2015-05-11 16:57:20 +00:00
|
|
|
|
if (input_elf_class == ELF_CLASS_UNKNOWN)
|
|
|
|
|
input_elf_class = elf_class (machine);
|
|
|
|
|
|
|
|
|
|
if (input_elf_class != ELF_CLASS_BOTH
|
|
|
|
|
&& (int) input_elf_class != class)
|
2010-01-06 16:52:15 +00:00
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error
|
2015-05-11 16:57:20 +00:00
|
|
|
|
(_("%s: Unmatched input EI_CLASS: %d is not %d\n"),
|
2010-01-08 15:58:08 +00:00
|
|
|
|
file_name, class, input_elf_class);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2015-05-11 16:57:20 +00:00
|
|
|
|
if (output_elf_class != ELF_CLASS_BOTH
|
|
|
|
|
&& (int) output_elf_class != class)
|
|
|
|
|
{
|
|
|
|
|
error
|
|
|
|
|
(_("%s: Unmatched output EI_CLASS: %d is not %d\n"),
|
|
|
|
|
file_name, class, output_elf_class);
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
2010-01-06 16:52:15 +00:00
|
|
|
|
|
|
|
|
|
/* Skip if e_machine doesn't match. */
|
2010-01-08 15:58:08 +00:00
|
|
|
|
if (input_elf_machine != -1 && machine != input_elf_machine)
|
2010-01-06 16:52:15 +00:00
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error
|
2010-01-06 16:52:15 +00:00
|
|
|
|
(_("%s: Unmatched e_machine: %d is not %d\n"),
|
2010-01-08 15:58:08 +00:00
|
|
|
|
file_name, machine, input_elf_machine);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2010-01-08 18:50:39 +00:00
|
|
|
|
type = elf_header.e_type;
|
|
|
|
|
|
|
|
|
|
/* Skip if e_type doesn't match. */
|
|
|
|
|
if (input_elf_type != -1 && type != input_elf_type)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error
|
2010-01-08 18:50:39 +00:00
|
|
|
|
(_("%s: Unmatched e_type: %d is not %d\n"),
|
|
|
|
|
file_name, type, input_elf_type);
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
2010-08-23 16:25:53 +00:00
|
|
|
|
osabi = elf_header.e_ident[EI_OSABI];
|
|
|
|
|
|
|
|
|
|
/* Skip if OSABI doesn't match. */
|
|
|
|
|
if (input_elf_osabi != -1 && osabi != input_elf_osabi)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error
|
2010-08-23 16:25:53 +00:00
|
|
|
|
(_("%s: Unmatched EI_OSABI: %d is not %d\n"),
|
|
|
|
|
file_name, osabi, input_elf_osabi);
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Update e_machine, e_type and EI_OSABI. */
|
2010-01-08 15:58:08 +00:00
|
|
|
|
switch (class)
|
2010-01-06 16:52:15 +00:00
|
|
|
|
{
|
|
|
|
|
default:
|
|
|
|
|
/* We should never get here. */
|
|
|
|
|
abort ();
|
|
|
|
|
break;
|
|
|
|
|
case ELFCLASS32:
|
2010-01-08 18:50:39 +00:00
|
|
|
|
if (output_elf_machine != -1)
|
|
|
|
|
BYTE_PUT (ehdr32.e_machine, output_elf_machine);
|
|
|
|
|
if (output_elf_type != -1)
|
|
|
|
|
BYTE_PUT (ehdr32.e_type, output_elf_type);
|
2010-08-23 16:25:53 +00:00
|
|
|
|
if (output_elf_osabi != -1)
|
|
|
|
|
ehdr32.e_ident[EI_OSABI] = output_elf_osabi;
|
2010-01-06 16:52:15 +00:00
|
|
|
|
status = fwrite (&ehdr32, sizeof (ehdr32), 1, file) == 1;
|
|
|
|
|
break;
|
|
|
|
|
case ELFCLASS64:
|
2010-01-08 18:50:39 +00:00
|
|
|
|
if (output_elf_machine != -1)
|
|
|
|
|
BYTE_PUT (ehdr64.e_machine, output_elf_machine);
|
|
|
|
|
if (output_elf_type != -1)
|
|
|
|
|
BYTE_PUT (ehdr64.e_type, output_elf_type);
|
2010-08-23 16:25:53 +00:00
|
|
|
|
if (output_elf_osabi != -1)
|
|
|
|
|
ehdr64.e_ident[EI_OSABI] = output_elf_osabi;
|
2010-01-06 16:52:15 +00:00
|
|
|
|
status = fwrite (&ehdr64, sizeof (ehdr64), 1, file) == 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (status != 1)
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: Failed to update ELF header: %s\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
file_name, strerror (errno));
|
|
|
|
|
|
|
|
|
|
return status;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
get_file_header (FILE * file)
|
|
|
|
|
{
|
|
|
|
|
/* Read in the identity array. */
|
|
|
|
|
if (fread (elf_header.e_ident, EI_NIDENT, 1, file) != 1)
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
/* Determine how to read the rest of the header. */
|
|
|
|
|
switch (elf_header.e_ident[EI_DATA])
|
|
|
|
|
{
|
|
|
|
|
default: /* fall through */
|
|
|
|
|
case ELFDATANONE: /* fall through */
|
|
|
|
|
case ELFDATA2LSB:
|
|
|
|
|
byte_get = byte_get_little_endian;
|
|
|
|
|
byte_put = byte_put_little_endian;
|
|
|
|
|
break;
|
|
|
|
|
case ELFDATA2MSB:
|
|
|
|
|
byte_get = byte_get_big_endian;
|
|
|
|
|
byte_put = byte_put_big_endian;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Read in the rest of the header. For now we only support 32 bit
|
|
|
|
|
and 64 bit ELF files. */
|
|
|
|
|
switch (elf_header.e_ident[EI_CLASS])
|
|
|
|
|
{
|
|
|
|
|
default:
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("Unsupported EI_CLASS: %d\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
elf_header.e_ident[EI_CLASS]);
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
case ELFCLASS32:
|
|
|
|
|
if (fread (ehdr32.e_type, sizeof (ehdr32) - EI_NIDENT,
|
|
|
|
|
1, file) != 1)
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
elf_header.e_type = BYTE_GET (ehdr32.e_type);
|
|
|
|
|
elf_header.e_machine = BYTE_GET (ehdr32.e_machine);
|
|
|
|
|
elf_header.e_version = BYTE_GET (ehdr32.e_version);
|
|
|
|
|
elf_header.e_entry = BYTE_GET (ehdr32.e_entry);
|
|
|
|
|
elf_header.e_phoff = BYTE_GET (ehdr32.e_phoff);
|
|
|
|
|
elf_header.e_shoff = BYTE_GET (ehdr32.e_shoff);
|
|
|
|
|
elf_header.e_flags = BYTE_GET (ehdr32.e_flags);
|
|
|
|
|
elf_header.e_ehsize = BYTE_GET (ehdr32.e_ehsize);
|
|
|
|
|
elf_header.e_phentsize = BYTE_GET (ehdr32.e_phentsize);
|
|
|
|
|
elf_header.e_phnum = BYTE_GET (ehdr32.e_phnum);
|
|
|
|
|
elf_header.e_shentsize = BYTE_GET (ehdr32.e_shentsize);
|
|
|
|
|
elf_header.e_shnum = BYTE_GET (ehdr32.e_shnum);
|
|
|
|
|
elf_header.e_shstrndx = BYTE_GET (ehdr32.e_shstrndx);
|
|
|
|
|
|
|
|
|
|
memcpy (&ehdr32, &elf_header, EI_NIDENT);
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case ELFCLASS64:
|
|
|
|
|
/* If we have been compiled with sizeof (bfd_vma) == 4, then
|
|
|
|
|
we will not be able to cope with the 64bit data found in
|
|
|
|
|
64 ELF files. Detect this now and abort before we start
|
|
|
|
|
overwriting things. */
|
|
|
|
|
if (sizeof (bfd_vma) < 8)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("This executable has been built without support for a\n\
|
2010-01-06 16:52:15 +00:00
|
|
|
|
64 bit data type and so it cannot process 64 bit ELF files.\n"));
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (fread (ehdr64.e_type, sizeof (ehdr64) - EI_NIDENT,
|
|
|
|
|
1, file) != 1)
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
elf_header.e_type = BYTE_GET (ehdr64.e_type);
|
|
|
|
|
elf_header.e_machine = BYTE_GET (ehdr64.e_machine);
|
|
|
|
|
elf_header.e_version = BYTE_GET (ehdr64.e_version);
|
|
|
|
|
elf_header.e_entry = BYTE_GET (ehdr64.e_entry);
|
|
|
|
|
elf_header.e_phoff = BYTE_GET (ehdr64.e_phoff);
|
|
|
|
|
elf_header.e_shoff = BYTE_GET (ehdr64.e_shoff);
|
|
|
|
|
elf_header.e_flags = BYTE_GET (ehdr64.e_flags);
|
|
|
|
|
elf_header.e_ehsize = BYTE_GET (ehdr64.e_ehsize);
|
|
|
|
|
elf_header.e_phentsize = BYTE_GET (ehdr64.e_phentsize);
|
|
|
|
|
elf_header.e_phnum = BYTE_GET (ehdr64.e_phnum);
|
|
|
|
|
elf_header.e_shentsize = BYTE_GET (ehdr64.e_shentsize);
|
|
|
|
|
elf_header.e_shnum = BYTE_GET (ehdr64.e_shnum);
|
|
|
|
|
elf_header.e_shstrndx = BYTE_GET (ehdr64.e_shstrndx);
|
|
|
|
|
|
|
|
|
|
memcpy (&ehdr64, &elf_header, EI_NIDENT);
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Process one ELF object file according to the command line options.
|
|
|
|
|
This file may actually be stored in an archive. The file is
|
|
|
|
|
positioned at the start of the ELF object. */
|
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
process_object (const char *file_name, FILE *file)
|
|
|
|
|
{
|
|
|
|
|
/* Rememeber where we are. */
|
|
|
|
|
long offset = ftell (file);
|
|
|
|
|
|
|
|
|
|
if (! get_file_header (file))
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: Failed to read ELF header\n"), file_name);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Go to the position of the ELF header. */
|
|
|
|
|
if (fseek (file, offset, SEEK_SET) != 0)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: Failed to seek to ELF header\n"), file_name);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (! update_elf_header (file_name, file))
|
|
|
|
|
return 1;
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Process an ELF archive.
|
|
|
|
|
On entry the file is positioned just after the ARMAG string. */
|
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
process_archive (const char * file_name, FILE * file,
|
|
|
|
|
bfd_boolean is_thin_archive)
|
|
|
|
|
{
|
|
|
|
|
struct archive_info arch;
|
|
|
|
|
struct archive_info nested_arch;
|
|
|
|
|
size_t got;
|
|
|
|
|
int ret;
|
|
|
|
|
|
|
|
|
|
/* The ARCH structure is used to hold information about this archive. */
|
|
|
|
|
arch.file_name = NULL;
|
|
|
|
|
arch.file = NULL;
|
|
|
|
|
arch.index_array = NULL;
|
|
|
|
|
arch.sym_table = NULL;
|
|
|
|
|
arch.longnames = NULL;
|
|
|
|
|
|
|
|
|
|
/* The NESTED_ARCH structure is used as a single-item cache of information
|
|
|
|
|
about a nested archive (when members of a thin archive reside within
|
|
|
|
|
another regular archive file). */
|
|
|
|
|
nested_arch.file_name = NULL;
|
|
|
|
|
nested_arch.file = NULL;
|
|
|
|
|
nested_arch.index_array = NULL;
|
|
|
|
|
nested_arch.sym_table = NULL;
|
|
|
|
|
nested_arch.longnames = NULL;
|
|
|
|
|
|
2010-11-21 21:27:15 +00:00
|
|
|
|
if (setup_archive (&arch, file_name, file, is_thin_archive, FALSE) != 0)
|
2010-01-06 16:52:15 +00:00
|
|
|
|
{
|
|
|
|
|
ret = 1;
|
|
|
|
|
goto out;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ret = 0;
|
|
|
|
|
|
|
|
|
|
while (1)
|
|
|
|
|
{
|
|
|
|
|
char * name;
|
|
|
|
|
size_t namelen;
|
|
|
|
|
char * qualified_name;
|
|
|
|
|
|
|
|
|
|
/* Read the next archive header. */
|
|
|
|
|
if (fseek (file, arch.next_arhdr_offset, SEEK_SET) != 0)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: failed to seek to next archive header\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
file_name);
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
got = fread (&arch.arhdr, 1, sizeof arch.arhdr, file);
|
|
|
|
|
if (got != sizeof arch.arhdr)
|
|
|
|
|
{
|
|
|
|
|
if (got == 0)
|
|
|
|
|
break;
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: failed to read archive header\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
file_name);
|
|
|
|
|
ret = 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
if (memcmp (arch.arhdr.ar_fmag, ARFMAG, 2) != 0)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: did not find a valid archive header\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
arch.file_name);
|
|
|
|
|
ret = 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
arch.next_arhdr_offset += sizeof arch.arhdr;
|
|
|
|
|
|
|
|
|
|
archive_file_size = strtoul (arch.arhdr.ar_size, NULL, 10);
|
|
|
|
|
if (archive_file_size & 01)
|
|
|
|
|
++archive_file_size;
|
|
|
|
|
|
|
|
|
|
name = get_archive_member_name (&arch, &nested_arch);
|
|
|
|
|
if (name == NULL)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: bad archive file name\n"), file_name);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
ret = 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
namelen = strlen (name);
|
|
|
|
|
|
|
|
|
|
qualified_name = make_qualified_name (&arch, &nested_arch, name);
|
|
|
|
|
if (qualified_name == NULL)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: bad archive file name\n"), file_name);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
ret = 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (is_thin_archive && arch.nested_member_origin == 0)
|
|
|
|
|
{
|
|
|
|
|
/* This is a proxy for an external member of a thin archive. */
|
|
|
|
|
FILE *member_file;
|
|
|
|
|
char *member_file_name = adjust_relative_path (file_name,
|
|
|
|
|
name, namelen);
|
|
|
|
|
if (member_file_name == NULL)
|
|
|
|
|
{
|
|
|
|
|
ret = 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
member_file = fopen (member_file_name, "r+b");
|
|
|
|
|
if (member_file == NULL)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("Input file '%s' is not readable\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
member_file_name);
|
|
|
|
|
free (member_file_name);
|
|
|
|
|
ret = 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
archive_file_offset = arch.nested_member_origin;
|
|
|
|
|
|
|
|
|
|
ret |= process_object (qualified_name, member_file);
|
|
|
|
|
|
|
|
|
|
fclose (member_file);
|
|
|
|
|
free (member_file_name);
|
|
|
|
|
}
|
|
|
|
|
else if (is_thin_archive)
|
|
|
|
|
{
|
|
|
|
|
/* This is a proxy for a member of a nested archive. */
|
|
|
|
|
archive_file_offset = arch.nested_member_origin + sizeof arch.arhdr;
|
|
|
|
|
|
|
|
|
|
/* The nested archive file will have been opened and setup by
|
|
|
|
|
get_archive_member_name. */
|
|
|
|
|
if (fseek (nested_arch.file, archive_file_offset,
|
|
|
|
|
SEEK_SET) != 0)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: failed to seek to archive member\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
nested_arch.file_name);
|
|
|
|
|
ret = 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ret |= process_object (qualified_name, nested_arch.file);
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
archive_file_offset = arch.next_arhdr_offset;
|
|
|
|
|
arch.next_arhdr_offset += archive_file_size;
|
|
|
|
|
|
|
|
|
|
ret |= process_object (qualified_name, file);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
free (qualified_name);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
out:
|
|
|
|
|
if (nested_arch.file != NULL)
|
|
|
|
|
fclose (nested_arch.file);
|
|
|
|
|
release_archive (&nested_arch);
|
|
|
|
|
release_archive (&arch);
|
|
|
|
|
|
|
|
|
|
return ret;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
check_file (const char *file_name, struct stat *statbuf_p)
|
|
|
|
|
{
|
|
|
|
|
struct stat statbuf;
|
|
|
|
|
|
|
|
|
|
if (statbuf_p == NULL)
|
|
|
|
|
statbuf_p = &statbuf;
|
|
|
|
|
|
|
|
|
|
if (stat (file_name, statbuf_p) < 0)
|
|
|
|
|
{
|
|
|
|
|
if (errno == ENOENT)
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("'%s': No such file\n"), file_name);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
else
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("Could not locate '%s'. System error message: %s\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
file_name, strerror (errno));
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (! S_ISREG (statbuf_p->st_mode))
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("'%s' is not an ordinary file\n"), file_name);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
process_file (const char *file_name)
|
|
|
|
|
{
|
|
|
|
|
FILE * file;
|
|
|
|
|
char armag[SARMAG];
|
|
|
|
|
int ret;
|
|
|
|
|
|
|
|
|
|
if (check_file (file_name, NULL))
|
|
|
|
|
return 1;
|
|
|
|
|
|
|
|
|
|
file = fopen (file_name, "r+b");
|
|
|
|
|
if (file == NULL)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("Input file '%s' is not readable\n"), file_name);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (fread (armag, SARMAG, 1, file) != 1)
|
|
|
|
|
{
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("%s: Failed to read file's magic number\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
file_name);
|
|
|
|
|
fclose (file);
|
|
|
|
|
return 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (memcmp (armag, ARMAG, SARMAG) == 0)
|
|
|
|
|
ret = process_archive (file_name, file, FALSE);
|
|
|
|
|
else if (memcmp (armag, ARMAGT, SARMAG) == 0)
|
|
|
|
|
ret = process_archive (file_name, file, TRUE);
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
rewind (file);
|
|
|
|
|
archive_file_size = archive_file_offset = 0;
|
|
|
|
|
ret = process_object (file_name, file);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
fclose (file);
|
|
|
|
|
|
|
|
|
|
return ret;
|
|
|
|
|
}
|
|
|
|
|
|
2010-08-23 16:25:53 +00:00
|
|
|
|
static const struct
|
|
|
|
|
{
|
|
|
|
|
int osabi;
|
|
|
|
|
const char *name;
|
|
|
|
|
}
|
|
|
|
|
osabis[] =
|
|
|
|
|
{
|
|
|
|
|
{ ELFOSABI_NONE, "none" },
|
|
|
|
|
{ ELFOSABI_HPUX, "HPUX" },
|
|
|
|
|
{ ELFOSABI_NETBSD, "NetBSD" },
|
2011-07-03 13:37:09 +00:00
|
|
|
|
{ ELFOSABI_GNU, "GNU" },
|
|
|
|
|
{ ELFOSABI_GNU, "Linux" },
|
2010-08-23 16:25:53 +00:00
|
|
|
|
{ ELFOSABI_SOLARIS, "Solaris" },
|
|
|
|
|
{ ELFOSABI_AIX, "AIX" },
|
|
|
|
|
{ ELFOSABI_IRIX, "Irix" },
|
|
|
|
|
{ ELFOSABI_FREEBSD, "FreeBSD" },
|
|
|
|
|
{ ELFOSABI_TRU64, "TRU64" },
|
|
|
|
|
{ ELFOSABI_MODESTO, "Modesto" },
|
|
|
|
|
{ ELFOSABI_OPENBSD, "OpenBSD" },
|
|
|
|
|
{ ELFOSABI_OPENVMS, "OpenVMS" },
|
|
|
|
|
{ ELFOSABI_NSK, "NSK" },
|
|
|
|
|
{ ELFOSABI_AROS, "AROS" },
|
|
|
|
|
{ ELFOSABI_FENIXOS, "FenixOS" }
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
/* Return ELFOSABI_XXX for an OSABI string, OSABI. */
|
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
elf_osabi (const char *osabi)
|
|
|
|
|
{
|
|
|
|
|
unsigned int i;
|
|
|
|
|
|
|
|
|
|
for (i = 0; i < ARRAY_SIZE (osabis); i++)
|
|
|
|
|
if (strcasecmp (osabi, osabis[i].name) == 0)
|
|
|
|
|
return osabis[i].osabi;
|
|
|
|
|
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("Unknown OSABI: %s\n"), osabi);
|
2010-08-23 16:25:53 +00:00
|
|
|
|
|
|
|
|
|
return -1;
|
|
|
|
|
}
|
|
|
|
|
|
2010-01-06 16:52:15 +00:00
|
|
|
|
/* Return EM_XXX for a machine string, MACH. */
|
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
elf_machine (const char *mach)
|
|
|
|
|
{
|
2015-05-11 16:57:20 +00:00
|
|
|
|
if (strcasecmp (mach, "i386") == 0)
|
|
|
|
|
return EM_386;
|
|
|
|
|
if (strcasecmp (mach, "iamcu") == 0)
|
|
|
|
|
return EM_IAMCU;
|
2010-01-06 16:52:15 +00:00
|
|
|
|
if (strcasecmp (mach, "l1om") == 0)
|
|
|
|
|
return EM_L1OM;
|
2011-07-22 20:22:38 +00:00
|
|
|
|
if (strcasecmp (mach, "k1om") == 0)
|
|
|
|
|
return EM_K1OM;
|
2010-01-06 16:52:15 +00:00
|
|
|
|
if (strcasecmp (mach, "x86_64") == 0)
|
|
|
|
|
return EM_X86_64;
|
|
|
|
|
if (strcasecmp (mach, "x86-64") == 0)
|
|
|
|
|
return EM_X86_64;
|
|
|
|
|
if (strcasecmp (mach, "none") == 0)
|
|
|
|
|
return EM_NONE;
|
|
|
|
|
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("Unknown machine type: %s\n"), mach);
|
2010-01-06 16:52:15 +00:00
|
|
|
|
|
|
|
|
|
return -1;
|
|
|
|
|
}
|
|
|
|
|
|
2010-01-08 18:50:39 +00:00
|
|
|
|
/* Return ET_XXX for a type string, TYPE. */
|
|
|
|
|
|
|
|
|
|
static int
|
|
|
|
|
elf_type (const char *type)
|
|
|
|
|
{
|
|
|
|
|
if (strcasecmp (type, "rel") == 0)
|
|
|
|
|
return ET_REL;
|
|
|
|
|
if (strcasecmp (type, "exec") == 0)
|
|
|
|
|
return ET_EXEC;
|
|
|
|
|
if (strcasecmp (type, "dyn") == 0)
|
|
|
|
|
return ET_DYN;
|
|
|
|
|
if (strcasecmp (type, "none") == 0)
|
|
|
|
|
return ET_NONE;
|
|
|
|
|
|
2010-11-21 21:27:15 +00:00
|
|
|
|
error (_("Unknown type: %s\n"), type);
|
2010-01-08 18:50:39 +00:00
|
|
|
|
|
|
|
|
|
return -1;
|
|
|
|
|
}
|
|
|
|
|
|
2010-01-06 16:52:15 +00:00
|
|
|
|
enum command_line_switch
|
|
|
|
|
{
|
|
|
|
|
OPTION_INPUT_MACH = 150,
|
2010-01-08 18:50:39 +00:00
|
|
|
|
OPTION_OUTPUT_MACH,
|
|
|
|
|
OPTION_INPUT_TYPE,
|
2010-08-23 16:25:53 +00:00
|
|
|
|
OPTION_OUTPUT_TYPE,
|
|
|
|
|
OPTION_INPUT_OSABI,
|
|
|
|
|
OPTION_OUTPUT_OSABI
|
2010-01-06 16:52:15 +00:00
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
static struct option options[] =
|
|
|
|
|
{
|
|
|
|
|
{"input-mach", required_argument, 0, OPTION_INPUT_MACH},
|
|
|
|
|
{"output-mach", required_argument, 0, OPTION_OUTPUT_MACH},
|
2010-01-08 18:50:39 +00:00
|
|
|
|
{"input-type", required_argument, 0, OPTION_INPUT_TYPE},
|
|
|
|
|
{"output-type", required_argument, 0, OPTION_OUTPUT_TYPE},
|
2010-08-23 16:25:53 +00:00
|
|
|
|
{"input-osabi", required_argument, 0, OPTION_INPUT_OSABI},
|
|
|
|
|
{"output-osabi", required_argument, 0, OPTION_OUTPUT_OSABI},
|
2010-01-06 16:52:15 +00:00
|
|
|
|
{"version", no_argument, 0, 'v'},
|
|
|
|
|
{"help", no_argument, 0, 'h'},
|
|
|
|
|
{0, no_argument, 0, 0}
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
usage (FILE *stream, int exit_status)
|
|
|
|
|
{
|
2010-08-23 16:25:53 +00:00
|
|
|
|
fprintf (stream, _("Usage: %s <option(s)> elffile(s)\n"),
|
2010-01-06 16:52:15 +00:00
|
|
|
|
program_name);
|
|
|
|
|
fprintf (stream, _(" Update the ELF header of ELF files\n"));
|
|
|
|
|
fprintf (stream, _(" The options are:\n"));
|
|
|
|
|
fprintf (stream, _("\
|
|
|
|
|
--input-mach <machine> Set input machine type to <machine>\n\
|
|
|
|
|
--output-mach <machine> Set output machine type to <machine>\n\
|
2010-01-08 18:50:39 +00:00
|
|
|
|
--input-type <type> Set input file type to <type>\n\
|
|
|
|
|
--output-type <type> Set output file type to <type>\n\
|
2010-08-23 16:25:53 +00:00
|
|
|
|
--input-osabi <osabi> Set input OSABI to <osabi>\n\
|
|
|
|
|
--output-osabi <osabi> Set output OSABI to <osabi>\n\
|
2010-01-06 16:52:15 +00:00
|
|
|
|
-h --help Display this information\n\
|
|
|
|
|
-v --version Display the version number of %s\n\
|
|
|
|
|
"),
|
|
|
|
|
program_name);
|
|
|
|
|
if (REPORT_BUGS_TO[0] && exit_status == 0)
|
|
|
|
|
fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
|
|
|
|
|
exit (exit_status);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
int
|
|
|
|
|
main (int argc, char ** argv)
|
|
|
|
|
{
|
|
|
|
|
int c, status;
|
|
|
|
|
|
|
|
|
|
#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
|
|
|
|
|
setlocale (LC_MESSAGES, "");
|
|
|
|
|
#endif
|
|
|
|
|
#if defined (HAVE_SETLOCALE)
|
|
|
|
|
setlocale (LC_CTYPE, "");
|
|
|
|
|
#endif
|
|
|
|
|
bindtextdomain (PACKAGE, LOCALEDIR);
|
|
|
|
|
textdomain (PACKAGE);
|
|
|
|
|
|
|
|
|
|
expandargv (&argc, &argv);
|
|
|
|
|
|
|
|
|
|
while ((c = getopt_long (argc, argv, "hv",
|
|
|
|
|
options, (int *) 0)) != EOF)
|
|
|
|
|
{
|
|
|
|
|
switch (c)
|
|
|
|
|
{
|
|
|
|
|
case OPTION_INPUT_MACH:
|
|
|
|
|
input_elf_machine = elf_machine (optarg);
|
|
|
|
|
if (input_elf_machine < 0)
|
|
|
|
|
return 1;
|
|
|
|
|
input_elf_class = elf_class (input_elf_machine);
|
2015-05-11 16:57:20 +00:00
|
|
|
|
if (input_elf_class == ELF_CLASS_UNKNOWN)
|
2010-01-06 16:52:15 +00:00
|
|
|
|
return 1;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case OPTION_OUTPUT_MACH:
|
|
|
|
|
output_elf_machine = elf_machine (optarg);
|
|
|
|
|
if (output_elf_machine < 0)
|
|
|
|
|
return 1;
|
2015-05-11 16:57:20 +00:00
|
|
|
|
output_elf_class = elf_class (output_elf_machine);
|
|
|
|
|
if (output_elf_class == ELF_CLASS_UNKNOWN)
|
|
|
|
|
return 1;
|
2010-01-06 16:52:15 +00:00
|
|
|
|
break;
|
|
|
|
|
|
2010-01-08 18:50:39 +00:00
|
|
|
|
case OPTION_INPUT_TYPE:
|
|
|
|
|
input_elf_type = elf_type (optarg);
|
|
|
|
|
if (input_elf_type < 0)
|
|
|
|
|
return 1;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case OPTION_OUTPUT_TYPE:
|
|
|
|
|
output_elf_type = elf_type (optarg);
|
|
|
|
|
if (output_elf_type < 0)
|
|
|
|
|
return 1;
|
|
|
|
|
break;
|
|
|
|
|
|
2010-08-23 16:25:53 +00:00
|
|
|
|
case OPTION_INPUT_OSABI:
|
|
|
|
|
input_elf_osabi = elf_osabi (optarg);
|
|
|
|
|
if (input_elf_osabi < 0)
|
|
|
|
|
return 1;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case OPTION_OUTPUT_OSABI:
|
|
|
|
|
output_elf_osabi = elf_osabi (optarg);
|
|
|
|
|
if (output_elf_osabi < 0)
|
|
|
|
|
return 1;
|
|
|
|
|
break;
|
|
|
|
|
|
2010-01-06 16:52:15 +00:00
|
|
|
|
case 'h':
|
|
|
|
|
usage (stdout, 0);
|
|
|
|
|
|
|
|
|
|
case 'v':
|
|
|
|
|
print_version (program_name);
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
default:
|
|
|
|
|
usage (stderr, 1);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2010-01-08 18:50:39 +00:00
|
|
|
|
if (optind == argc
|
|
|
|
|
|| (output_elf_machine == -1
|
2010-08-23 16:25:53 +00:00
|
|
|
|
&& output_elf_type == -1
|
|
|
|
|
&& output_elf_osabi == -1))
|
2010-01-06 16:52:15 +00:00
|
|
|
|
usage (stderr, 1);
|
|
|
|
|
|
|
|
|
|
status = 0;
|
|
|
|
|
while (optind < argc)
|
|
|
|
|
status |= process_file (argv[optind++]);
|
|
|
|
|
|
|
|
|
|
return status;
|
|
|
|
|
}
|