// options.c -- handle command line options for gold // Copyright 2006, 2007, 2008 Free Software Foundation, Inc. // Written by Ian Lance Taylor . // This file is part of gold. // 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 "gold.h" #include #include #include #include #include #include "filenames.h" #include "libiberty.h" #include "demangle.h" #include "../bfd/bfdver.h" #include "debug.h" #include "script.h" #include "target-select.h" #include "options.h" namespace gold { General_options Position_dependent_options::default_options_; namespace options { // This global variable is set up as General_options is constructed. static std::vector registered_options; // These are set up at the same time -- the variables that accept one // dash, two, or require -z. A single variable may be in more than // one of thes data structures. typedef Unordered_map Option_map; static Option_map* long_options = NULL; static One_option* short_options[128]; void One_option::register_option() { registered_options.push_back(this); // We can't make long_options a static Option_map because we can't // guarantee that will be initialized before register_option() is // first called. if (long_options == NULL) long_options = new Option_map; // TWO_DASHES means that two dashes are preferred, but one is ok too. if (!this->longname.empty()) (*long_options)[this->longname] = this; const int shortname_as_int = static_cast(this->shortname); gold_assert(shortname_as_int >= 0 && shortname_as_int < 128); if (this->shortname != '\0') short_options[shortname_as_int] = this; } void One_option::print() const { bool comma = false; printf(" "); int len = 2; if (this->shortname != '\0') { len += printf("-%c", this->shortname); if (this->helparg) { // -z takes long-names only. gold_assert(this->dashes != DASH_Z); len += printf(" %s", gettext(this->helparg)); } comma = true; } if (!this->longname.empty() && !(this->longname[0] == this->shortname && this->longname[1] == '\0')) { if (comma) len += printf(", "); switch (this->dashes) { case options::ONE_DASH: case options::EXACTLY_ONE_DASH: len += printf("-"); break; case options::TWO_DASHES: case options::EXACTLY_TWO_DASHES: len += printf("--"); break; case options::DASH_Z: len += printf("-z "); break; default: gold_unreachable(); } len += printf("%s", this->longname.c_str()); if (this->helparg) { // For most options, we print "--frob FOO". But for -z // we print "-z frob=FOO". len += printf("%c%s", this->dashes == options::DASH_Z ? '=' : ' ', gettext(this->helparg)); } } if (len >= 30) { printf("\n"); len = 0; } for (; len < 30; ++len) std::putchar(' '); // TODO: if we're boolean, add " (default)" when appropriate. printf("%s\n", gettext(this->helpstring)); } void help() { printf(_("Usage: %s [options] file...\nOptions:\n"), gold::program_name); std::vector::const_iterator it; for (it = registered_options.begin(); it != registered_options.end(); ++it) (*it)->print(); // config.guess and libtool.m4 look in ld --help output for the // string "supported targets". printf(_("%s: supported targets:"), gold::program_name); std::vector supported_names; gold::supported_target_names(&supported_names); for (std::vector::const_iterator p = supported_names.begin(); p != supported_names.end(); ++p) printf(" %s", *p); printf("\n"); // REPORT_BUGS_TO is defined in bfd/bfdver.h. const char* report = REPORT_BUGS_TO; if (*report != '\0') printf(_("Report bugs to %s\n"), report); } // For bool, arg will be NULL (boolean options take no argument); // we always just set to true. void parse_bool(const char*, const char*, bool* retval) { *retval = true; } void parse_uint(const char* option_name, const char* arg, int* retval) { char* endptr; *retval = strtol(arg, &endptr, 0); if (*endptr != '\0' || retval < 0) gold_fatal(_("%s: invalid option value (expected an integer): %s"), option_name, arg); } void parse_uint64(const char* option_name, const char* arg, uint64_t *retval) { char* endptr; *retval = strtoull(arg, &endptr, 0); if (*endptr != '\0') gold_fatal(_("%s: invalid option value (expected an integer): %s"), option_name, arg); } void parse_double(const char* option_name, const char* arg, double* retval) { char* endptr; *retval = strtod(arg, &endptr); if (*endptr != '\0') gold_fatal(_("%s: invalid option value " "(expected a floating point number): %s"), option_name, arg); } void parse_string(const char* option_name, const char* arg, const char** retval) { if (*arg == '\0') gold_fatal(_("%s: must take a non-empty argument"), option_name); *retval = arg; } void parse_optional_string(const char*, const char* arg, const char** retval) { *retval = arg; } void parse_dirlist(const char*, const char* arg, Dir_list* retval) { retval->push_back(Search_directory(arg, false)); } void parse_choices(const char* option_name, const char* arg, const char** retval, const char* choices[], int num_choices) { for (int i = 0; i < num_choices; i++) if (strcmp(choices[i], arg) == 0) { *retval = arg; return; } // If we get here, the user did not enter a valid choice, so we die. std::string choices_list; for (int i = 0; i < num_choices; i++) { choices_list += choices[i]; if (i != num_choices - 1) choices_list += ", "; } gold_fatal(_("%s: must take one of the following arguments: %s"), option_name, choices_list.c_str()); } } // End namespace options. // Define the handler for "special" options (set via DEFINE_special). void General_options::parse_help(const char*, const char*, Command_line*) { options::help(); ::exit(EXIT_SUCCESS); } void General_options::parse_version(const char* opt, const char*, Command_line*) { gold::print_version(opt[0] == '-' && opt[1] == 'v'); ::exit(EXIT_SUCCESS); } void General_options::parse_Bstatic(const char*, const char*, Command_line*) { this->set_Bdynamic(false); } void General_options::parse_defsym(const char*, const char* arg, Command_line* cmdline) { cmdline->script_options().define_symbol(arg); } void General_options::parse_library(const char*, const char* arg, Command_line* cmdline) { Input_file_argument file(arg, true, "", false, *this); cmdline->inputs().add_file(file); } void General_options::parse_R(const char* option, const char* arg, Command_line* cmdline) { struct stat s; if (::stat(arg, &s) != 0 || S_ISDIR(s.st_mode)) this->add_to_rpath(arg); else this->parse_just_symbols(option, arg, cmdline); } void General_options::parse_just_symbols(const char*, const char* arg, Command_line* cmdline) { Input_file_argument file(arg, false, "", true, *this); cmdline->inputs().add_file(file); } void General_options::parse_static(const char*, const char*, Command_line*) { this->set_static(true); } void General_options::parse_script(const char*, const char* arg, Command_line* cmdline) { if (!read_commandline_script(arg, cmdline)) gold::gold_fatal(_("unable to parse script file %s"), arg); } void General_options::parse_version_script(const char*, const char* arg, Command_line* cmdline) { if (!read_version_script(arg, cmdline)) gold::gold_fatal(_("unable to parse version script file %s"), arg); } void General_options::parse_start_group(const char*, const char*, Command_line* cmdline) { cmdline->inputs().start_group(); } void General_options::parse_end_group(const char*, const char*, Command_line* cmdline) { cmdline->inputs().end_group(); } } // End namespace gold. namespace { void usage() { fprintf(stderr, _("%s: use the --help option for usage information\n"), gold::program_name); ::exit(EXIT_FAILURE); } void usage(const char* msg, const char *opt) { fprintf(stderr, _("%s: %s: %s\n"), gold::program_name, opt, msg); usage(); } // Recognize input and output target names. The GNU linker accepts // these with --format and --oformat. This code is intended to be // minimally compatible. In practice for an ELF target this would be // the same target as the input files; that name always start with // "elf". Non-ELF targets would be "srec", "symbolsrec", "tekhex", // "binary", "ihex". gold::General_options::Object_format string_to_object_format(const char* arg) { if (strncmp(arg, "elf", 3) == 0) return gold::General_options::OBJECT_FORMAT_ELF; else if (strcmp(arg, "binary") == 0) return gold::General_options::OBJECT_FORMAT_BINARY; else { gold::gold_error(_("format '%s' not supported; treating as elf " "(supported formats: elf, binary)"), arg); return gold::General_options::OBJECT_FORMAT_ELF; } } // If the default sysroot is relocatable, try relocating it based on // the prefix FROM. char* get_relative_sysroot(const char* from) { char* path = make_relative_prefix(gold::program_name, from, TARGET_SYSTEM_ROOT); if (path != NULL) { struct stat s; if (::stat(path, &s) == 0 && S_ISDIR(s.st_mode)) return path; free(path); } return NULL; } // Return the default sysroot. This is set by the --with-sysroot // option to configure. Note we do not free the return value of // get_relative_sysroot, which is a small memory leak, but is // necessary since we store this pointer directly in General_options. const char* get_default_sysroot() { const char* sysroot = TARGET_SYSTEM_ROOT; if (*sysroot == '\0') return NULL; if (TARGET_SYSTEM_ROOT_RELOCATABLE) { char* path = get_relative_sysroot(BINDIR); if (path == NULL) path = get_relative_sysroot(TOOLBINDIR); if (path != NULL) return path; } return sysroot; } // Parse a long option. Such options have the form // <-|-->