* win32-nat.c (_initialize_check_for_gdb_ini): New function.

[thirdparty/binutils-gdb.git] / gdb / windows-nat.c

diff --git a/gdb/windows-nat.c b/gdb/windows-nat.c
index ab5f3f32878dfafd92890e55ab75d83efce49df9..48ac8931a7a927d6c8770eca233d6eca4a85e7bd 100644 (file)
--- a/gdb/windows-nat.c
+++ b/gdb/windows-nat.c
@@ -32,6 +32,7 @@
 #include "command.h"
 #include "completer.h"
 #include "regcache.h"
+#include "top.h"
 #include <signal.h>
 #include <sys/types.h>
 #include <fcntl.h>
@@ -1753,3 +1754,31 @@ _initialize_core_win32 (void)
 {
   add_core_fns (&win32_elf_core_fns);
 }
+
+void
+_initialize_check_for_gdb_ini (void)
+{
+  char *homedir;
+  if (inhibit_gdbinit)
+    return;
+
+  homedir = getenv ("HOME");
+  if (homedir)
+    {
+      char *p;
+      char *oldini = (char *) alloca (strlen (homedir) +
+                                     sizeof ("/gdb.ini"));
+      strcpy (oldini, homedir);
+      p = strchr (oldini, '\0');
+      if (p > oldini && p[-1] != '/')
+       *p++ = '/';
+      strcpy (p, "gdb.ini");
+      if (access (oldini, 0) == 0)
+       {
+         int len = strlen (oldini);
+         char *newini = alloca (len + 1);
+         sprintf (newini, "%.*s.gdbinit", len - (sizeof ("gdb.ini") - 1), oldini);
+         warning ("obsolete '%s' found. Rename to '%s'.", oldini, newini);
+       }
+    }
+}