[GCC 4.8] Initial check-in of GCC 4.8.0

Change-Id: I0719d8a6d0f69b367a6ab6f10eb75622dbf12771

1 files changed, 70 insertions, 0 deletions

diff --git a/gcc-4.8/libgo/runtime/go-setenv.c b/gcc-4.8/libgo/runtime/go-setenv.c
new file mode 100644
index 000000000..6c7378c9e
--- /dev/null
+++ b/gcc-4.8/libgo/runtime/go-setenv.c
@@ -0,0 +1,70 @@
+/* go-setenv.c -- set the C environment from Go.
+
+   Copyright 2011 The Go Authors. All rights reserved.
+   Use of this source code is governed by a BSD-style
+   license that can be found in the LICENSE file.  */
+
+#include "config.h"
+
+#include <stddef.h>
+#include <stdlib.h>
+
+#include "go-alloc.h"
+#include "runtime.h"
+
+/* Set the C environment from Go.  This is called by syscall.Setenv.  */
+
+void setenv_c (String, String) __asm__ (GOSYM_PREFIX "syscall.setenv_c");
+
+void
+setenv_c (String k, String v)
+{
+  const byte *ks;
+  unsigned char *kn;
+  const byte *vs;
+  unsigned char *vn;
+
+  ks = k.str;
+  if (ks == NULL)
+    ks = (const byte *) "";
+  kn = NULL;
+
+  vs = v.str;
+  if (vs == NULL)
+    vs = (const byte *) "";
+  vn = NULL;
+
+#ifdef HAVE_SETENV
+
+  if (ks != NULL && ks[k.len] != 0)
+    {
+      kn = __go_alloc (k.len + 1);
+      __builtin_memcpy (kn, ks, k.len);
+      ks = kn;
+    }
+
+  if (vs != NULL && vs[v.len] != 0)
+    {
+      vn = __go_alloc (v.len + 1);
+      __builtin_memcpy (vn, vs, v.len);
+      vs = vn;
+    }
+
+  setenv ((const char *) ks, (const char *) vs, 1);
+
+#else /* !defined(HAVE_SETENV) */
+
+  kn = __go_alloc (k.len + v.len + 2);
+  __builtin_memcpy (kn, ks, k.len);
+  kn[k.len] = '=';
+  __builtin_memcpy (kn + k.len + 1, vs, v.len);
+  kn[k.len + v.len + 1] = '\0';
+  putenv ((char *) kn);
+
+#endif /* !defined(HAVE_SETENV) */
+
+  if (kn != NULL)
+    __go_free (kn);
+  if (vn != NULL)
+    __go_free (vn);
+}