aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.9/gcc/gcov-tool.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc-4.9/gcc/gcov-tool.c')
-rw-r--r--gcc-4.9/gcc/gcov-tool.c832
1 files changed, 832 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/gcov-tool.c b/gcc-4.9/gcc/gcov-tool.c
new file mode 100644
index 000000000..f15e6f33f
--- /dev/null
+++ b/gcc-4.9/gcc/gcov-tool.c
@@ -0,0 +1,832 @@
+/* Gcc offline profile processing tool support. */
+/* Copyright (C) 2014 Free Software Foundation, Inc.
+ Contributed by Rong Xu <xur@google.com>.
+
+This file is part of GCC.
+
+GCC 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, or (at your option) any later
+version.
+
+GCC 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.
+
+Under Section 7 of GPL version 3, you are granted additional
+permissions described in the GCC Runtime Library Exception, version
+3.1, as published by the Free Software Foundation.
+
+You should have received a copy of the GNU General Public License and
+a copy of the GCC Runtime Library Exception along with this program;
+see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
+<http://www.gnu.org/licenses/>. */
+
+#include "config.h"
+#include "system.h"
+#include "coretypes.h"
+#include "tm.h"
+#include "intl.h"
+#include "hashtab.h"
+#include "diagnostic.h"
+#include "version.h"
+#include "gcov-io.h"
+#include <stdlib.h>
+#include <stdio.h>
+#include <sys/stat.h>
+#include <unistd.h>
+#if !defined(_WIN32)
+#include <ftw.h>
+#endif
+#include <getopt.h>
+#include "params.h"
+#include <string.h>
+
+extern int gcov_profile_merge (struct gcov_info*, struct gcov_info*, int, int);
+extern int gcov_profile_normalize (struct gcov_info*, gcov_type);
+extern int gcov_profile_scale (struct gcov_info*, float, int, int);
+extern struct gcov_info* gcov_read_profile_dir (const char*, int);
+extern void gcov_exit (void);
+extern void set_gcov_list (struct gcov_info *);
+extern void gcov_set_verbose (void);
+extern void set_use_existing_grouping (void);
+extern void set_use_modu_list (void);
+extern void lipo_set_substitute_string (const char *);
+
+#if !defined(_WIN32)
+/* The following defines are needed by dyn-ipa.c.
+ They will also be emitted by the compiler with -fprofile-generate,
+ which means this file cannot be compiled with -fprofile-generate
+ -- otherwise we get duplicated defintions.
+ Make the defines weak to link with other objects/libraries
+ that potentially compiled with -fprofile-generate. */
+
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_grouping_algorithm;
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_merge_modu_edges;
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_weak_inclusion;
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_max_mem;
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_comdat_algorithm;
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_random_group_size;
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_cutoff;
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_random_seed;
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_dump_cgraph;
+__attribute__ ((weak)) gcov_unsigned_t __gcov_lipo_propagate_scale;
+#else
+gcov_unsigned_t __gcov_lipo_grouping_algorithm;
+gcov_unsigned_t __gcov_lipo_merge_modu_edges;
+gcov_unsigned_t __gcov_lipo_weak_inclusion;
+gcov_unsigned_t __gcov_lipo_max_mem;
+gcov_unsigned_t __gcov_lipo_comdat_algorithm;
+gcov_unsigned_t __gcov_lipo_random_group_size;
+gcov_unsigned_t __gcov_lipo_cutoff;
+gcov_unsigned_t __gcov_lipo_random_seed;
+gcov_unsigned_t __gcov_lipo_dump_cgraph;
+gcov_unsigned_t __gcov_lipo_propagate_scale;
+#endif
+
+/* Set to verbose output mode. */
+static bool verbose;
+
+/* Remove file NAME if it has a gcda suffix. */
+
+#if !defined(_WIN32)
+static int
+unlink_gcda_file (const char *name,
+ const struct stat *status ATTRIBUTE_UNUSED,
+ int type ATTRIBUTE_UNUSED,
+ struct FTW *ftwbuf ATTRIBUTE_UNUSED)
+{
+ int ret = 0;
+ int len = strlen (name);
+ int len1 = strlen (GCOV_DATA_SUFFIX);
+
+ if (len > len1 && !strncmp (len -len1 + name, GCOV_DATA_SUFFIX, len1))
+ ret = remove (name);
+
+ if (ret)
+ fatal_error ("error in removing %s\n", name);
+
+ return ret;
+}
+#endif
+
+/* Remove the gcda files in PATH recursively. */
+
+static int
+unlink_profile_dir (const char *path)
+{
+#if !defined(_WIN32)
+ return nftw(path, unlink_gcda_file, 64, FTW_DEPTH | FTW_PHYS);
+#else
+ return 0;
+#endif
+}
+
+
+/* Output GCOV_INFO lists PROFILE to directory OUT. Note that
+ we will remove all the gcda files in OUT. */
+
+static void
+gcov_output_files (const char *out, struct gcov_info *profile)
+{
+ char *pwd;
+ int ret;
+
+ /* Try to make directory if it doesn't already exist. */
+ if (access (out, F_OK) == -1)
+ {
+ if (mkdir (out, S_IRWXU | S_IRWXG | S_IRWXO) == -1 && errno != EEXIST)
+ fatal_error ("Cannot make directory %s", out);
+ } else
+ unlink_profile_dir (out);
+
+ /* Output new profile. */
+ pwd = getcwd (NULL, 0);
+
+ if (pwd == NULL)
+ fatal_error ("Cannot get current directory name");
+
+ ret = chdir (out);
+ if (ret)
+ fatal_error ("Cannot change directory to %s", out);
+
+ set_gcov_list (profile);
+ gcov_exit ();
+
+ ret = chdir (pwd);
+ if (ret)
+ fatal_error ("Cannot change directory to %s", pwd);
+
+ free (pwd);
+}
+
+/* Merging profile D1 and D2 with weight as W1 and W2, respectively.
+ The result profile is written to directory OUT.
+ Return 0 on success. */
+
+static int
+profile_merge (const char *d1, const char *d2, const char *out, int w1, int w2)
+{
+ struct gcov_info *d1_profile;
+ struct gcov_info *d2_profile;
+ int ret;
+
+ d1_profile = gcov_read_profile_dir (d1, 0);
+ if (!d1_profile)
+ return 1;
+
+ if (d2)
+ {
+ d2_profile = gcov_read_profile_dir (d2, 0);
+ if (!d2_profile)
+ return 1;
+
+ /* The actual merge: we overwrite to d1_profile. */
+ ret = gcov_profile_merge (d1_profile, d2_profile, w1, w2);
+
+ if (ret)
+ return ret;
+ }
+
+ gcov_output_files (out, d1_profile);
+
+ return 0;
+}
+
+/* Usage message for profile merge. */
+
+static void
+print_merge_usage_message (int error_p)
+{
+ FILE *file = error_p ? stderr : stdout;
+
+ fnotice (file, " merge [options] <dir1> <dir2> Merge coverage file contents\n");
+ fnotice (file, " -v, --verbose Verbose mode\n");
+ fnotice (file, " -o, --output <dir> Output directory\n");
+ fnotice (file, " -w, --weight <w1,w2> Set weights (float point values)\n");
+}
+
+static const struct option merge_options[] =
+{
+ { "verbose", no_argument, NULL, 'v' },
+ { "output", required_argument, NULL, 'o' },
+ { "weight", required_argument, NULL, 'w' },
+ { 0, 0, 0, 0 }
+};
+
+/* Print merge usage and exit. */
+
+static void
+merge_usage (void)
+{
+ fnotice (stderr, "Merge subcomand usage:");
+ print_merge_usage_message (true);
+ exit (FATAL_EXIT_CODE);
+}
+
+/* Driver for profile merge sub-command. */
+
+static int
+do_merge (int argc, char **argv)
+{
+ int opt;
+ int ret;
+ const char *output_dir = 0;
+ int w1 = 1, w2 = 1;
+
+ optind = 0;
+ while ((opt = getopt_long (argc, argv, "vo:w:", merge_options, NULL)) != -1)
+ {
+ switch (opt)
+ {
+ case 'v':
+ verbose = true;
+ gcov_set_verbose ();
+ break;
+ case 'o':
+ output_dir = optarg;
+ break;
+ case 'w':
+ sscanf (optarg, "%d,%d", &w1, &w2);
+ if (w1 < 0 || w2 < 0)
+ fatal_error ("weights need to be non-negative\n");
+ break;
+ default:
+ merge_usage ();
+ }
+ }
+
+ if (output_dir == NULL)
+ output_dir = "merged_profile";
+
+ if (argc - optind == 2)
+ ret = profile_merge (argv[optind], argv[optind+1], output_dir, w1, w2);
+ else
+ merge_usage ();
+
+ return ret;
+}
+
+/* If N_VAL is no-zero, normalize the profile by setting the largest counter
+ counter value to N_VAL and scale others counters proportionally.
+ Otherwise, multiply the all counters by SCALE. */
+
+static int
+profile_rewrite (const char *d1, const char *out, long long n_val,
+ float scale, int n, int d)
+{
+ struct gcov_info * d1_profile;
+
+ d1_profile = gcov_read_profile_dir (d1, 0);
+ if (!d1_profile)
+ return 1;
+
+ if (n_val)
+ gcov_profile_normalize (d1_profile, (gcov_type) n_val);
+ else
+ gcov_profile_scale (d1_profile, scale, n, d);
+
+ gcov_output_files (out, d1_profile);
+ return 0;
+}
+
+/* This is the hashtab entry to store a name and mod_id pair. */
+typedef struct {
+ const char *name;
+ unsigned id;
+} mod_name_id;
+
+/* Hash and comparison functions for strings. */
+
+static unsigned
+mod_name_id_htab_hash (const void *s_p)
+{
+ const char *s = ((const mod_name_id *) s_p)->name;
+ return (*htab_hash_string) (s);
+}
+
+static int
+mod_name_id_hash_eq (const void *s1_p, const void *s2_p)
+{
+ return strcmp (((const mod_name_id *) s1_p)->name,
+ ((const mod_name_id *) s2_p)->name) == 0;
+}
+
+static htab_t mod_name_id_hash_table;
+
+/* Look up an entry in the hash table. STRING is the module name.
+ CREATE controls to insert to htab or not.
+ If (*ID_P != 0), we write (*ID_P) to htab.
+ If (*ID_P == 0), we write module_id to (*ID_P).
+ return 1 if an entry is found and otherwise 0. */
+
+static int
+module_name_hash_lookup (const char *string, unsigned *id_p, int create)
+{
+ void **e;
+ mod_name_id t;
+
+ t.name = string;
+ e = htab_find_slot (mod_name_id_hash_table, &t,
+ create ? INSERT : NO_INSERT);
+ if (e == NULL)
+ return 0;
+ if (*e == NULL)
+ {
+ *e = XNEW (mod_name_id *);
+ (*(mod_name_id **)e)->name = xstrdup (string);
+ }
+ if (id_p)
+ {
+ if (*id_p != 0)
+ (*(mod_name_id **)e)->id = *id_p;
+ else
+ *id_p = (*(mod_name_id **)e)->id;
+ }
+ return 1;
+}
+
+#if !defined(_WIN32)
+#define STRCASESTR strcasestr
+#else
+#define STRCASESTR strstr
+#endif
+
+/* Return 1 if NAME is of a source type that LIPO targets.
+ Return 0 otherwise. */
+
+static int
+is_lipo_source_type (char *name)
+{
+ char *p;
+
+ if (STRCASESTR (name, ".c") ||
+ STRCASESTR (name, ".cc") ||
+ STRCASESTR (name, ".cpp") ||
+ STRCASESTR (name, ".c++"))
+ return 1;
+
+ /* Replace ".proto" with ".pb.cc". Since the two strings have the same
+ length, we simplfy do a strcpy. */
+ if ((p = STRCASESTR (name, ".proto")) != NULL)
+ {
+ strcpy (p, ".pb.cc");
+ return 1;
+ }
+
+ return 0;
+}
+
+/* Convert/process the names from dependence query to a
+ stardard format. Return NULL if this is not a lipo
+ target source. */
+
+static char *
+lipo_process_name_string (char *name)
+{
+ char *p;
+
+ if (name == NULL)
+ return NULL;
+ if (strlen (name) == 0)
+ return NULL;
+
+ if (!is_lipo_source_type (name))
+ return NULL;
+
+ /* Overwrite ':' with '/'. */
+ if ((p = strchr (name, ':')) != NULL)
+ *p = '/';
+
+ /* Remove "//". */
+ if (name[0] == '/' && name[1] =='/')
+ name += 2;
+
+ return name;
+}
+
+/* Store the list of source modules in INPUT_FILE to internal hashtab. */
+
+static int
+lipo_process_modu_list (const char *input_file)
+{
+ FILE *fd;
+ const int max_line_size = (1 << 12);
+ char line[max_line_size];
+ char *name;
+
+ set_use_modu_list ();
+
+ if ((fd = fopen (input_file, "r")) == NULL)
+ {
+ fnotice (stderr, "Cannot open %s\n", input_file);
+ return -1;
+ }
+
+ /* Read all the modules */
+ while (fgets (line, max_line_size, fd) != NULL)
+ {
+ name = strtok (line, " \t\n");
+ name = lipo_process_name_string (name);
+ if (name)
+ module_name_hash_lookup (name, 0, 1);
+ }
+
+ return 0;
+}
+
+#define GENFILE_PREFIX "/genfiles/"
+
+/* Return 1 if module NAME is available to be used in the target
+ profile. CREATE controls to insert to htab or not.
+ If (*ID_P != 0), we write (*ID_P) to htab.
+ If (*ID_P == 0), we write module_id to (*ID_P).
+ return 1 if an entry is found and otherwise 0. */
+
+int
+is_module_available (const char *name, unsigned *id_p, int create)
+{
+ char *buf, *p;
+ int ret;
+
+ if (mod_name_id_hash_table == NULL)
+ return 1;
+
+ buf = xstrdup (name);
+ /* Remove genfile string. */
+ if ((p = strstr (buf, GENFILE_PREFIX)) != NULL)
+ p += strlen (GENFILE_PREFIX);
+ else
+ p = buf;
+
+ ret = module_name_hash_lookup (p, id_p, create);
+ free (buf);
+ return ret;
+}
+
+/* Return module_ident for module NAME.
+ return 0 if the module NAME is not available. */
+
+int
+get_module_id_from_name (const char *name)
+{
+ unsigned mod_id = 0;
+ if (is_module_available (name, &mod_id, 0) == 1)
+ return mod_id;
+ return 0;
+}
+
+/* Usage function for profile rewrite. */
+
+static void
+print_rewrite_usage_message (int error_p)
+{
+ FILE *file = error_p ? stderr : stdout;
+
+ fnotice (file, " rewrite [options] <dir> Rewrite coverage file contents\n");
+ fnotice (file, " -v, --verbose Verbose mode\n");
+ fnotice (file, " -o, --output <dir> Output directory\n");
+ fnotice (file, " -l, --modu_list <file> Only use the modules in this file\n");
+ fnotice (file, " -r, --path_substr_replace <str> Replace string in path\n");
+ fnotice (file, " -s, --scale <float or simple-frac> Scale the profile counters\n");
+ fnotice (file, " -u, --use_imports_file <file> Use the grouping in import files.\n");
+ fnotice (file, " -n, --normalize <long long> Normalize the profile\n");
+}
+
+static const struct option rewrite_options[] =
+{
+ { "verbose", no_argument, NULL, 'v' },
+ { "output", required_argument, NULL, 'o' },
+ { "modu_list", required_argument, NULL, 'l' },
+ { "string", required_argument, NULL, 'r' },
+ { "scale", required_argument, NULL, 's' },
+ { "use_imports_file", no_argument, NULL, 'u' },
+ { "normalize", required_argument, NULL, 'n' },
+ { 0, 0, 0, 0 }
+};
+
+/* Print profile rewrite usage and exit. */
+
+static void
+rewrite_usage (void)
+{
+ fnotice (stderr, "Rewrite subcommand usage:");
+ print_rewrite_usage_message (true);
+ exit (FATAL_EXIT_CODE);
+}
+
+/* Driver for profile rewrite sub-command. */
+
+static int
+do_rewrite (int argc, char **argv)
+{
+ int opt;
+ int ret;
+ const char *output_dir = 0;
+ long long normalize_val = 0;
+ float scale = 0.0;
+ int numerator = 1;
+ int denominator = 1;
+ int do_scaling = 0;
+
+ mod_name_id_hash_table = htab_create (500, mod_name_id_htab_hash,
+ mod_name_id_hash_eq, NULL);
+
+ optind = 0;
+ while ((opt = getopt_long (argc, argv, "vo:l:r:s:un:", rewrite_options,
+ NULL)) != -1)
+ {
+ switch (opt)
+ {
+ case 'v':
+ verbose = true;
+ gcov_set_verbose ();
+ break;
+ case 'o':
+ output_dir = optarg;
+ break;
+ case 'l':
+ lipo_process_modu_list (optarg);
+ break;
+ case 'r':
+ lipo_set_substitute_string (optarg);
+ break;
+ case 'u':
+ set_use_existing_grouping ();
+ break;
+ case 'n':
+ if (!do_scaling)
+ normalize_val = atoll (optarg);
+ else
+ fnotice (stderr, "scaling cannot co-exist with normalization,"
+ " skipping\n");
+ break;
+ case 's':
+ ret = 0;
+ do_scaling = 1;
+ if (strstr (optarg, "/"))
+ {
+ ret = sscanf (optarg, "%d/%d", &numerator, &denominator);
+ if (ret == 2)
+ {
+ if (numerator < 0 || denominator <= 0)
+ {
+ fnotice (stderr, "incorrect format in scaling, using 1/1\n");
+ denominator = 1;
+ numerator = 1;
+ }
+ }
+ }
+ if (ret != 2)
+ {
+ ret = sscanf (optarg, "%f", &scale);
+ if (ret != 1)
+ fnotice (stderr, "incorrect format in scaling, using 1/1\n");
+ else
+ denominator = 0;
+ }
+
+ if (scale < 0.0)
+ fatal_error ("scale needs to be non-negative\n");
+
+ if (normalize_val != 0)
+ {
+ fnotice (stderr, "normalization cannot co-exist with scaling\n");
+ normalize_val = 0;
+ }
+ break;
+ default:
+ rewrite_usage ();
+ }
+ }
+
+ if (output_dir == NULL)
+ output_dir = "rewrite_profile";
+
+ if (argc - optind == 1)
+ {
+ if (denominator > 0)
+ ret = profile_rewrite (argv[optind], output_dir, 0, 0.0, numerator, denominator);
+ else
+ ret = profile_rewrite (argv[optind], output_dir, normalize_val, scale, 0, 0);
+ }
+ else
+ rewrite_usage ();
+
+ return ret;
+}
+
+/* Print a usage message and exit. If ERROR_P is nonzero, this is an error,
+ otherwise the output of --help. */
+
+static void
+print_usage (int error_p)
+{
+ FILE *file = error_p ? stderr : stdout;
+ int status = error_p ? FATAL_EXIT_CODE : SUCCESS_EXIT_CODE;
+
+ fnotice (file, "Usage: %s [OPTION]... SUB_COMMAND [OPTION]...\n\n", progname);
+ fnotice (file, "Offline tool to handle gcda counts\n\n");
+ fnotice (file, " -h, --help Print this help, then exit\n");
+ fnotice (file, " -v, --version Print version number, then exit\n");
+ fnotice (file, " -A, --lipo_algorithm <0|1> Choose LIPO module grouping algorithm\n");
+ fnotice (file, " -E, --lipo_merge_edge Merge module edges in LIPO module grouping\n");
+ fnotice (file, " -W, --lipo_weak_inclusion Don't force strict inclusion in grouping\n");
+ fnotice (file, " -C, --lipo_cutoff <0..100> Set LIPO module grouping cutoff\n");
+ fnotice (file, " -M, --lipo_max_memory <int> Set the max memory in LIPO module grouping\n");
+ fnotice (file, " -F, --lipo_comdat_algorithm <0|1|2|3> Set the COMDAT fixup algorithm\n");
+ fnotice (file, " -R, --lipo_random_group_size <int> Set LIPO random grouping size\n");
+ fnotice (file, " -S, --lipo_random_group_seed <int> Set LIPO random grouping seed\n");
+ fnotice (file, " -D, --lipo_dump_cgraph Dump dynamic call graph\n");
+ fnotice (file, " -P, --lipo_propagate_scale Set LIPO propagate scale to true\n");
+ fnotice (file, "\n");
+ print_merge_usage_message (error_p);
+ print_rewrite_usage_message (error_p);
+ fnotice (file, "\nFor bug reporting instructions, please see:\n%s.\n",
+ bug_report_url);
+ exit (status);
+}
+
+/* Print version information and exit. */
+
+static void
+print_version (void)
+{
+ fnotice (stdout, "%s %s%s\n", progname, pkgversion_string, version_string);
+ fnotice (stdout, "Copyright %s 2014 Free Software Foundation, Inc.\n",
+ _("(C)"));
+ fnotice (stdout,
+ _("This is free software; see the source for copying conditions.\n"
+ "There is NO warranty; not even for MERCHANTABILITY or \n"
+ "FITNESS FOR A PARTICULAR PURPOSE.\n\n"));
+ exit (SUCCESS_EXIT_CODE);
+}
+
+static const struct option options[] =
+{
+ { "help", no_argument, NULL, 'h' },
+ { "version", no_argument, NULL, 'v' },
+ { "lipo_algorithm", required_argument, NULL, 'A' },
+ { "lipo_merge_edge", no_argument, NULL, 'E' },
+ { "lipo_weak_inclusion", no_argument, NULL, 'W' },
+ { "lipo_cutoff", required_argument, NULL, 'C' },
+ { "lipo_max_memory", required_argument, NULL, 'M' },
+ { "lipo_comdat_algorithm", required_argument, NULL, 'F' },
+ { "lipo_random_group_size", required_argument, NULL, 'R' },
+ { "lipo_random_group_seed", required_argument, NULL, 'S' },
+ { "lipo_dump_cgraph", no_argument, NULL, 'D' },
+ { "lipo_propagate_scale", no_argument, NULL, 'P' },
+ { 0, 0, 0, 0 }
+};
+
+/* Process args, return index to first non-arg. */
+
+static int
+process_args (int argc, char **argv)
+{
+ int opt;
+ int ret;
+
+ while ((opt = getopt_long (argc, argv, "+hvA:EWC:M:R:S:DP", options, NULL)) != -1)
+ {
+ switch (opt)
+ {
+ case 'h':
+ print_usage (false);
+ /* Print_usage will exit. */
+ case 'v':
+ print_version ();
+ /* Print_version will exit. */
+ case 'E':
+ __gcov_lipo_merge_modu_edges = 1;
+ break;
+ case 'W':
+ __gcov_lipo_weak_inclusion = 1;
+ break;
+ case 'D':
+ __gcov_lipo_dump_cgraph = 1;
+ break;
+ case 'P':
+ __gcov_lipo_propagate_scale = 1;
+ break;
+ case 'A':
+ sscanf (optarg, "%d", &ret);
+ if (ret != 0 && ret != 1)
+ {
+ fnotice (stderr, "LIPO grouping algorithm can only be 0 or 1\n");
+ exit (-1);
+ }
+ __gcov_lipo_grouping_algorithm = ret;
+ break;
+ case 'R':
+ sscanf (optarg, "%d", &ret);
+ if (ret < 1)
+ {
+ fnotice (stderr, "LIPO random group size needs to be positive\n");
+ exit (-1);
+ }
+ __gcov_lipo_random_group_size = ret;
+ break;
+ case 'S':
+ sscanf (optarg, "%d", &ret);
+ __gcov_lipo_random_seed = ret;;
+ break;
+ case 'M':
+ sscanf (optarg, "%d", &ret);
+ if (ret < 0)
+ {
+ fnotice (stderr, "LIPO max-memory size needs to be positive\n");
+ exit (-1);
+ }
+ __gcov_lipo_max_mem = ret;
+ break;
+ case 'F':
+ sscanf (optarg, "%d", &ret);
+ if (ret < 0)
+ {
+ fnotice (stderr,
+ "LIPO COMDAT fixup algorithm needs to be positive\n");
+ exit (-1);
+ }
+ __gcov_lipo_comdat_algorithm = ret;
+ break;
+ case 'C':
+ sscanf (optarg, "%d", &ret);
+ if (ret < 0 || ret > 100)
+ {
+ fnotice (stderr, "LIPO cutoff value range is [0, 100]\n");
+ exit (-1);
+ }
+ __gcov_lipo_cutoff = ret;;
+ break;
+ default:
+ print_usage (true);
+ /* Print_usage will exit. */
+ }
+ }
+
+ return optind;
+}
+
+/* Get the default param value from params.def. */
+
+#define GET_DEFAULT_PARAM_VALUE(p) compiler_params[p].default_value
+static void
+set_lipo_default_params (void)
+{
+ __gcov_lipo_grouping_algorithm = GET_DEFAULT_PARAM_VALUE (PARAM_LIPO_GROUPING_ALGORITHM);
+ __gcov_lipo_merge_modu_edges = GET_DEFAULT_PARAM_VALUE (PARAM_LIPO_MERGE_MODU_EDGES);
+ __gcov_lipo_weak_inclusion = GET_DEFAULT_PARAM_VALUE (PARAM_LIPO_WEAK_INCLUSION);
+ __gcov_lipo_max_mem = GET_DEFAULT_PARAM_VALUE (PARAM_MAX_LIPO_MEMORY);
+ __gcov_lipo_comdat_algorithm = 0 /* GET_DEFAULT_PARAM_VALUE (PARAM_LIPO_COMDAT_ALGORITHM)*/;
+ __gcov_lipo_random_group_size = GET_DEFAULT_PARAM_VALUE (PARAM_LIPO_RANDOM_GROUP_SIZE);
+ __gcov_lipo_cutoff = GET_DEFAULT_PARAM_VALUE (PARAM_LIPO_CUTOFF);
+ __gcov_lipo_random_seed = GET_DEFAULT_PARAM_VALUE (PARAM_LIPO_RANDOM_SEED);
+ __gcov_lipo_dump_cgraph = GET_DEFAULT_PARAM_VALUE (PARAM_LIPO_DUMP_CGRAPH);
+ __gcov_lipo_propagate_scale = GET_DEFAULT_PARAM_VALUE (PARAM_LIPO_PROPAGATE_SCALE);
+}
+
+/* Main function for gcov-tool. */
+
+int
+main (int argc, char **argv)
+{
+ const char *p;
+ const char *sub_command;
+
+ p = argv[0] + strlen (argv[0]);
+ while (p != argv[0] && !IS_DIR_SEPARATOR (p[-1]))
+ --p;
+ progname = p;
+
+ xmalloc_set_program_name (progname);
+
+ /* Unlock the stdio streams. */
+ unlock_std_streams ();
+
+ gcc_init_libintl ();
+
+ diagnostic_initialize (global_dc, 0);
+
+ /* Handle response files. */
+ expandargv (&argc, &argv);
+
+ /* Register the language-independent parameters. */
+ global_init_params ();
+ finish_params ();
+ set_lipo_default_params ();
+
+ process_args (argc, argv);
+ if (optind >= argc)
+ print_usage (true);
+
+ sub_command = argv[optind];
+
+ if (!strcmp (sub_command, "merge"))
+ return do_merge (argc - optind, argv + optind);
+ else if (!strcmp (sub_command, "rewrite"))
+ return do_rewrite (argc - optind, argv + optind);
+
+ print_usage (true);
+}