+2014-09-11  Pedro Alves  <palves@redhat.com>
+
+       PR gdb/17347
+       * main.c: Include "infrun.h".
+       (catch_command_errors, catch_command_errors_const): Wait for the
+       foreground command to complete.
+       * top.c (maybe_wait_sync_command_done): New function, factored out
+       from ...
+       (maybe_wait_sync_command_done): ... here.
+       * top.h (maybe_wait_sync_command_done): New declaration.
+
 2014-09-11  Tom Tromey  <tromey@redhat.com>
            Gary Benson  <gbenson@redhat.com>
 
 
 #include "filestuff.h"
 #include <signal.h>
 #include "event-top.h"
+#include "infrun.h"
 
 /* The selected interpreter.  This will be used as a set command
    variable, so it should always be malloc'ed - since
 
   TRY_CATCH (e, mask)
     {
+      int was_sync = sync_execution;
+
       command (arg, from_tty);
+
+      maybe_wait_sync_command_done (was_sync);
     }
   return handle_command_errors (e);
 }
 
   TRY_CATCH (e, mask)
     {
+      int was_sync = sync_execution;
+
       command (arg, from_tty);
+
+      maybe_wait_sync_command_done (was_sync);
     }
   return handle_command_errors (e);
 }
 
+2014-09-11  Pedro Alves  <palves@redhat.com>
+
+       PR gdb/17347
+       * lib/gdb.exp (gdb_spawn_with_cmdline_opts): New procedure.
+       * gdb.base/attach.exp (test_command_line_attach_run): New
+       procedure.
+       (top level): Call it.
+
 2014-09-11  Pedro Alves  <palves@redhat.com>
 
        * lib/gdb.exp (spawn_wait_for_attach): New procedure.
 
     remote_exec build "kill -9 ${testpid}"
 }
 
+# Test ' gdb --pid PID -ex "run" '.  GDB used to have a bug where
+# "run" would run before the attach finished - PR17347.
+
+proc test_command_line_attach_run {} {
+    global gdb_prompt
+    global binfile
+
+    if ![isnative] then {
+       unsupported "commandline attach run test"
+       return 0
+    }
+
+    with_test_prefix "cmdline attach run" {
+       set testpid [spawn_wait_for_attach $binfile]
+
+       set test "run to prompt"
+       gdb_exit
+
+       set res [gdb_spawn_with_cmdline_opts \
+                    "-iex \"set height 0\" -iex \"set width 0\" --pid=$testpid -ex \"start\""]
+       if { $res != 0} {
+           fail $test
+           return $res
+       }
+       gdb_test_multiple "" $test {
+           -re {Attaching to.*Start it from the beginning\? \(y or n\) } {
+               pass $test
+           }
+       }
+
+       send_gdb "y\n"
+
+       set test "run to main"
+       gdb_test_multiple "" $test {
+           -re "Temporary breakpoint .* main .*$gdb_prompt $" {
+               pass $test
+           }
+       }
+
+       # Get rid of the process
+       remote_exec build "kill -9 ${testpid}"
+    }
+}
 
 # Start with a fresh gdb
 
 
 do_command_attach_tests
 
+test_command_line_attach_run
+
 return 0
 
     default_gdb_spawn
 }
 
+# Spawn GDB with CMDLINE_FLAGS appended to the GDBFLAGS global.
+
+proc gdb_spawn_with_cmdline_opts { cmdline_flags } {
+    global GDBFLAGS
+
+    set saved_gdbflags $GDBFLAGS
+
+    append GDBFLAGS $cmdline_flags
+
+    set res [gdb_spawn]
+
+    set GDBFLAGS $saved_gdbflags
+
+    return $res
+}
+
 # Start gdb running, wait for prompt, and disable the pagers.
 
 # Overridable function -- you can override this function in your
 
     }
 }
 
+/* See top.h.  */
+
+void
+maybe_wait_sync_command_done (int was_sync)
+{
+  /* If the interpreter is in sync mode (we're running a user
+     command's list, running command hooks or similars), and we
+     just ran a synchronous command that started the target, wait
+     for that command to end.  */
+  if (!interpreter_async && !was_sync && sync_execution)
+    {
+      while (gdb_do_one_event () >= 0)
+       if (!sync_execution)
+         break;
+    }
+}
+
 /* Execute the line P as a command, in the current user context.
    Pass FROM_TTY as second argument to the defining function.  */
 
       else
        cmd_func (c, arg, from_tty);
 
-      /* If the interpreter is in sync mode (we're running a user
-        command's list, running command hooks or similars), and we
-        just ran a synchronous command that started the target, wait
-        for that command to end.  */
-      if (!interpreter_async && !was_sync && sync_execution)
-       {
-         while (gdb_do_one_event () >= 0)
-           if (!sync_execution)
-             break;
-       }
+      maybe_wait_sync_command_done (was_sync);
 
       /* If this command has been post-hooked, run the hook last.  */
       execute_cmd_post_hook (c);
 
 extern void quit_cover (void);
 extern void execute_command (char *, int);
 
+/* If the interpreter is in sync mode (we're running a user command's
+   list, running command hooks or similars), and we just ran a
+   synchronous command that started the target, wait for that command
+   to end.  WAS_SYNC indicates whether sync_execution was set before
+   the command was run.  */
+
+extern void maybe_wait_sync_command_done (int was_sync);
+
 extern void check_frame_language_change (void);
 
 /* Prepare for execution of a command.