Initial checkin of GCC 4.9.0 from trunk (r208799).

Change-Id: I48a3c08bb98542aa215912a75f03c0890e497dba

1 files changed, 180 insertions, 0 deletions

diff --git a/gcc-4.9/gcc/lto-opts.c b/gcc-4.9/gcc/lto-opts.c
new file mode 100644
index 000000000..06796d62a
--- /dev/null
+++ b/gcc-4.9/gcc/lto-opts.c
@@ -0,0 +1,180 @@
+/* LTO IL options.
+
+   Copyright (C) 2009-2014 Free Software Foundation, Inc.
+   Contributed by Simon Baldwin <simonb@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.
+
+You should have received a copy of the GNU General Public License
+along with GCC; see the file COPYING3.  If not see
+<http://www.gnu.org/licenses/>.  */
+
+#include "config.h"
+#include "system.h"
+#include "coretypes.h"
+#include "tree.h"
+#include "basic-block.h"
+#include "tree-ssa-alias.h"
+#include "internal-fn.h"
+#include "gimple-expr.h"
+#include "is-a.h"
+#include "gimple.h"
+#include "hashtab.h"
+#include "bitmap.h"
+#include "flags.h"
+#include "opts.h"
+#include "options.h"
+#include "common/common-target.h"
+#include "diagnostic.h"
+#include "lto-streamer.h"
+#include "toplev.h"
+
+/* Append the option piece OPT to the COLLECT_GCC_OPTIONS string
+   set up by OB, appropriately quoted and separated by spaces
+   (if !*FIRST_P).  */
+
+static void
+append_to_collect_gcc_options (struct obstack *ob,
+			       bool *first_p, const char *opt)
+{
+  const char *p, *q = opt;
+  if (!*first_p)
+    obstack_grow (ob, " ", 1);
+  obstack_grow (ob, "'", 1);
+  while ((p = strchr (q, '\'')))
+    {
+      obstack_grow (ob, q, p - q);
+      obstack_grow (ob, "'\\''", 4);
+      q = ++p;
+    }
+  obstack_grow (ob, q, strlen (q));
+  obstack_grow (ob, "'", 1);
+  *first_p = false;
+}
+
+/* Write currently held options to an LTO IL section.  */
+
+void
+lto_write_options (void)
+{
+  struct lto_output_stream stream;
+  char *section_name;
+  struct obstack temporary_obstack;
+  unsigned int i, j;
+  char *args;
+  bool first_p = true;
+
+  section_name = lto_get_section_name (LTO_section_opts, NULL, NULL);
+  lto_begin_section (section_name, false);
+  memset (&stream, 0, sizeof (stream));
+
+  obstack_init (&temporary_obstack);
+
+  /* Output options that affect GIMPLE IL semantics and are implicitly
+     enabled by the frontend.
+     This for now includes an explicit set of options that we also handle
+     explicitly in lto-wrapper.c.  In the end the effects on GIMPLE IL
+     semantics should be explicitely encoded in the IL or saved per
+     function rather than per compilation unit.  */
+  /* -fexceptions causes the EH machinery to be initialized, enabling
+     generation of unwind data so that explicit throw() calls work.  */
+  if (!global_options_set.x_flag_exceptions
+      && global_options.x_flag_exceptions)
+    append_to_collect_gcc_options (&temporary_obstack, &first_p,
+				   "-fexceptions");
+  /* -fnon-call-exceptions changes the generation of exception
+      regions.  It is enabled implicitly by the Go frontend.  */
+  if (!global_options_set.x_flag_non_call_exceptions
+      && global_options.x_flag_non_call_exceptions)
+    append_to_collect_gcc_options (&temporary_obstack, &first_p,
+				   "-fnon-call-exceptions");
+  /* The default -ffp-contract changes depending on the language
+     standard.  Pass thru conservative standard settings.  */
+  if (!global_options_set.x_flag_fp_contract_mode)
+    switch (global_options.x_flag_fp_contract_mode)
+      {
+      case FP_CONTRACT_OFF:
+	append_to_collect_gcc_options (&temporary_obstack, &first_p,
+				       "-ffp-contract=off");
+	break;
+      case FP_CONTRACT_ON:
+	append_to_collect_gcc_options (&temporary_obstack, &first_p,
+				       "-ffp-contract=on");
+	break;
+      case FP_CONTRACT_FAST:
+	/* Nothing.  That merges conservatively and is the default for LTO.  */
+	break;
+      default:
+	gcc_unreachable ();
+      }
+  /* We need to merge -f[no-]strict-overflow, -f[no-]wrapv and -f[no-]trapv
+     conservatively, so stream out their defaults.  */
+  if (!global_options_set.x_flag_wrapv
+      && global_options.x_flag_wrapv)
+    append_to_collect_gcc_options (&temporary_obstack, &first_p, "-fwrapv");
+  if (!global_options_set.x_flag_trapv
+      && !global_options.x_flag_trapv)
+    append_to_collect_gcc_options (&temporary_obstack, &first_p, "-fno-trapv");
+  if (!global_options_set.x_flag_strict_overflow
+      && !global_options.x_flag_strict_overflow)
+    append_to_collect_gcc_options (&temporary_obstack, &first_p,
+			       "-fno-strict-overflow");
+
+  /* Output explicitly passed options.  */
+  for (i = 1; i < save_decoded_options_count; ++i)
+    {
+      struct cl_decoded_option *option = &save_decoded_options[i];
+
+      /* Skip explicitly some common options that we do not need.  */
+      switch (option->opt_index)
+      {
+	case OPT_dumpbase:
+	case OPT_SPECIAL_unknown:
+	case OPT_SPECIAL_ignore:
+	case OPT_SPECIAL_program_name:
+	case OPT_SPECIAL_input_file:
+	  continue;
+
+	default:
+	  break;
+      }
+
+      /* Skip frontend and driver specific options here.  */
+      if (!(cl_options[option->opt_index].flags & (CL_COMMON|CL_TARGET|CL_LTO)))
+	continue;
+
+      /* Drop options created from the gcc driver that will be rejected
+	 when passed on to the driver again.  */
+      if (cl_options[option->opt_index].cl_reject_driver)
+	continue;
+
+      /* Also drop all options that are handled by the driver as well,
+         which includes things like -o and -v or -fhelp for example.
+	 We do not need those.  Also drop all diagnostic options.  */
+      if (cl_options[option->opt_index].flags & (CL_DRIVER|CL_WARNING))
+	continue;
+
+      for (j = 0; j < option->canonical_option_num_elements; ++j)
+	append_to_collect_gcc_options (&temporary_obstack, &first_p,
+				       option->canonical_option[j]);
+    }
+  obstack_grow (&temporary_obstack, "\0", 1);
+  args = XOBFINISH (&temporary_obstack, char *);
+  lto_output_data_stream (&stream, args, strlen (args) + 1);
+
+  lto_write_stream (&stream);
+  lto_end_section ();
+
+  obstack_free (&temporary_obstack, NULL);
+  free (section_name);
+}