From 78b459a7e7d0930a3ac1c4ca2fe4706559675cdc Mon Sep 17 00:00:00 2001
From: Stu Grossman <grossman@cygnus>
Date: Thu, 3 Nov 1994 22:40:14 +0000
Subject: [PATCH] 	* corelow.c, exec.c, inftarg.c, m3-nat.c, op50-rom.c,
 procfs.c, 	remote-adapt.c, remote-e7000.c, remote-eb.c, remote-es.c, 
 remote-hms.c, remote-mips.c, remote-mm.c, remote-mon.c, 
 remote-nindy.c, remote-os9k.c, remote-pa.c, remote-sim.c, 	remote-st.c,
 remote-udi.c, remote-vx.c, remote-z8k.c, remote.c, 	w89k-rom.c, target.c,
 target.h:  Add support for target_stop(). 	* gdbtk.c (gdb_stop):  Switch
 to target_stop(). 	* ChangeLog:  Fix comment to make shebs happy...

---
 gdb/ChangeLog      | 13 +++++++++--
 gdb/corelow.c      | 56 ++++++++++++++++++++++++++++++++--------------
 gdb/m3-nat.c       |  7 ++++++
 gdb/op50-rom.c     |  1 +
 gdb/procfs.c       | 15 +++++++++++++
 gdb/remote-adapt.c |  1 +
 gdb/remote-eb.c    |  1 +
 gdb/remote-es.c    |  4 +++-
 gdb/remote-hms.c   |  1 +
 gdb/remote-mips.c  |  1 +
 gdb/remote-mm.c    |  1 +
 gdb/remote-mon.c   |  3 +++
 gdb/remote-nindy.c |  1 +
 gdb/remote-os9k.c  |  1 +
 gdb/remote-pa.c    |  1 +
 gdb/remote-sim.c   |  1 +
 gdb/remote-st.c    |  1 +
 17 files changed, 89 insertions(+), 20 deletions(-)

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 539c53a6ff5..041d9b1a228 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,13 @@
+Thu Nov  3 14:25:24 1994  Stu Grossman  (grossman@cygnus.com)
+
+	* corelow.c, exec.c, inftarg.c, m3-nat.c, op50-rom.c, procfs.c,
+	remote-adapt.c, remote-e7000.c, remote-eb.c, remote-es.c,
+	remote-hms.c, remote-mips.c, remote-mm.c, remote-mon.c,
+	remote-nindy.c, remote-os9k.c, remote-pa.c, remote-sim.c,
+	remote-st.c, remote-udi.c, remote-vx.c, remote-z8k.c, remote.c,
+	w89k-rom.c, target.c, target.h:  Add support for target_stop().
+	* gdbtk.c (gdb_stop):  Switch to target_stop().
+
 Thu Nov  3 01:23:45 1994  Peter Schauer  (pes@regent.e-technik.tu-muenchen.de)
 
 	* osfsolib.c (solib_map_sections, first_link_map_member,
@@ -26,8 +36,7 @@ Tue Nov  1 16:41:12 1994  Stu Grossman  (grossman@cygnus.com)
 	* gdbtk.c:  Get rid of lots of unnecessary #includes.
 	* (gdbtk_init):  Use ConnectionNumber macro instead of referencing
 	Display structure directly.
-	* gdbtk.tcl:  Change exit button to quit button (makes shebs
-	happy).
+	* gdbtk.tcl:  Change exit button to quit button.
 
 Tue Nov  1 13:00:46 1994  Peter Schauer  (pes@regent.e-technik.tu-muenchen.de)
 
diff --git a/gdb/corelow.c b/gdb/corelow.c
index 235b043ced2..90196b93ae4 100644
--- a/gdb/corelow.c
+++ b/gdb/corelow.c
@@ -327,23 +327,45 @@ ignore (addr, contents)
 }
 
 struct target_ops core_ops = {
-	"core", "Local core dump file",
-	"Use a core file as a target.  Specify the filename of the core file.",
-	core_open, core_close,
-	find_default_attach, core_detach, 0, 0, /* resume, wait */
-	get_core_registers, 
-	0, 0, /* store_regs, prepare_to_store */
-	xfer_memory, core_files_info,
-	ignore, ignore, /* core_insert_breakpoint, core_remove_breakpoint, */
-	0, 0, 0, 0, 0, /* terminal stuff */
-	0, 0, 0, /* kill, load, lookup sym */
-	find_default_create_inferior, 0, /* mourn_inferior */
-	0, /* can_run */
-	0, /* notice_signals */
-	core_stratum, 0, /* next */
-	0, 1, 1, 1, 0,	/* all mem, mem, stack, regs, exec */
-	0, 0,			/* section pointers */
-	OPS_MAGIC,		/* Always the last thing */
+  "core",			/* to_shortname */
+  "Local core dump file",	/* to_longname */
+  "Use a core file as a target.  Specify the filename of the core file.", /* to_doc */
+  core_open,			/* to_open */
+  core_close,			/* to_close */
+  find_default_attach,		/* to_attach */
+  core_detach,			/* to_detach */
+  0,				/* to_resume */
+  0,				/* to_wait */
+  get_core_registers,		/* to_fetch_registers */
+  0,				/* to_store_registers */
+  0,				/* to_prepare_to_store */
+  xfer_memory,			/* to_xfer_memory */
+  core_files_info,		/* to_files_info */
+  ignore,			/* to_insert_breakpoint */
+  ignore,			/* to_remove_breakpoint */
+  0,				/* to_terminal_init */
+  0,				/* to_terminal_inferior */
+  0,				/* to_terminal_ours_for_output */
+  0,				/* to_terminal_ours */
+  0,				/* to_terminal_info */
+  0,				/* to_kill */
+  0,				/* to_load */
+  0,				/* to_lookup_symbol */
+  find_default_create_inferior,	/* to_create_inferior */
+  0,				/* to_mourn_inferior */
+  0,				/* to_can_run */
+  0,				/* to_notice_signals */
+  0,				/* to_stop */
+  core_stratum,			/* to_stratum */
+  0,				/* to_next */
+  0,				/* to_has_all_memory */
+  1,				/* to_has_memory */
+  1,				/* to_has_stack */
+  1,				/* to_has_registers */
+  0,				/* to_has_execution */
+  0,				/* to_sections */
+  0,				/* to_sections_end */
+  OPS_MAGIC,			/* to_magic */
 };
 
 void
diff --git a/gdb/m3-nat.c b/gdb/m3-nat.c
index 179c981efa2..64cc059fff7 100644
--- a/gdb/m3-nat.c
+++ b/gdb/m3-nat.c
@@ -4521,6 +4521,12 @@ char	*p;
 }
 #endif  DUMP_SYSCALL
 
+static void
+m3_stop ()
+{
+  error ("to_stop target function not implemented");
+}
+
 struct target_ops m3_ops = {
   "mach",			/* to_shortname */
   "Mach child process",	/* to_longname */
@@ -4551,6 +4557,7 @@ struct target_ops m3_ops = {
   m3_mourn_inferior,	/* to_mourn_inferior */
   m3_can_run,		/* to_can_run */
   0,				/* to_notice_signals */
+  m3_stop,			/* to_stop */
   process_stratum,		/* to_stratum */
   0,				/* to_next */
   1,				/* to_has_all_memory */
diff --git a/gdb/op50-rom.c b/gdb/op50-rom.c
index dd02089830d..b7e2df16720 100644
--- a/gdb/op50-rom.c
+++ b/gdb/op50-rom.c
@@ -73,6 +73,7 @@ Specify the serial device it is connected to (e.g. /dev/ttya).",
   monitor_mourn_inferior,
   0,				/* can_run */
   0, 				/* notice_signals */
+  0,				/* to_stop */
   process_stratum,
   0,				/* next */
   1,
diff --git a/gdb/procfs.c b/gdb/procfs.c
index e6e3f9c6b13..0f75191bb71 100644
--- a/gdb/procfs.c
+++ b/gdb/procfs.c
@@ -3656,6 +3656,20 @@ procfs_stopped_by_watchpoint(pid)
 }
 #endif
 
+/* Send a SIGINT to the process group.  This acts just like the user typed a
+   ^C on the controlling terminal.
+
+   XXX - This may not be correct for all systems.  Some may want to use
+   killpg() instead of kill (-pgrp). */
+
+void
+child_stop ()
+{
+  extern pid_t inferior_process_group;
+
+  kill (-inferior_process_group, SIGINT);
+}
+
 
 struct target_ops procfs_ops = {
   "procfs",			/* to_shortname */
@@ -3686,6 +3700,7 @@ struct target_ops procfs_ops = {
   procfs_mourn_inferior,	/* to_mourn_inferior */
   procfs_can_run,		/* to_can_run */
   procfs_notice_signals,	/* to_notice_signals */
+  child_stop,			/* to_stop */
   process_stratum,		/* to_stratum */
   0,				/* to_next */
   1,				/* to_has_all_memory */
diff --git a/gdb/remote-adapt.c b/gdb/remote-adapt.c
index 1221315354c..62562c7d2b4 100644
--- a/gdb/remote-adapt.c
+++ b/gdb/remote-adapt.c
@@ -1343,6 +1343,7 @@ struct target_ops adapt_ops = {
 	adapt_mourn, 		/* mourn_inferior FIXME */
 	0, /* can_run */
 	0, /* notice_signals */
+	0,			/* to_stop */
 	process_stratum, 0, /* next */
 	1, 1, 1, 1, 1,	/* all mem, mem, stack, regs, exec */
 	0,0,		/* Section pointers */
diff --git a/gdb/remote-eb.c b/gdb/remote-eb.c
index 5cf0c7535c4..0d9b37745ed 100644
--- a/gdb/remote-eb.c
+++ b/gdb/remote-eb.c
@@ -995,6 +995,7 @@ executable as it exists on the remote computer.  For example,\n\
 	eb_mourn_inferior,
   	0,	/* can_run */
   	0, /* notice_signals */
+	0,			/* to_stop */
 	process_stratum, 0, /* next */
 	1, 1, 1, 1, 1,	/* all mem, mem, stack, regs, exec */
 	0, 0,			/* Section pointers */
diff --git a/gdb/remote-es.c b/gdb/remote-es.c
index 8d7ac35ebed..162e853eae8 100644
--- a/gdb/remote-es.c
+++ b/gdb/remote-es.c
@@ -2074,7 +2074,8 @@ Specify the serial device it is connected to (e.g. /dev/ttya).",
   es1800_create_inferior,	/* to_create_inferior */
   NULL,				/* to_mourn_inferior */
   0,				/* to_can_run */
-  0,				/* notice_signals */
+  0,				/* to_notice_signals */
+  ignore,			/* to_stop */
   core_stratum,			/* to_stratum */
   0,				/* to_next */
   0,				/* to_has_all_memory */
@@ -2122,6 +2123,7 @@ Specify the serial device it is connected to (e.g. /dev/ttya).",
   es1800_mourn_inferior,	/* to_mourn_inferior */
   0,				/* to_can_run */
   0,				/* notice_signals */
+  0,				/* to_stop */
   process_stratum,		/* to_stratum */
   0,				/* to_next */
   1,				/* to_has_all_memory */
diff --git a/gdb/remote-hms.c b/gdb/remote-hms.c
index 3b90553b5d6..bc114c4ef39 100644
--- a/gdb/remote-hms.c
+++ b/gdb/remote-hms.c
@@ -1521,6 +1521,7 @@ by a serial line.",
   hms_mourn,			/* mourn_inferior FIXME */
   0,				/* can_run */
   0,				/* notice_signals */
+  0,				/* to_stop */
   process_stratum, 0,		/* next */
   1, 1, 1, 1, 1,		/* all mem, mem, stack, regs, exec */
   0, 0,				/* Section pointers */
diff --git a/gdb/remote-mips.c b/gdb/remote-mips.c
index 0a31d779dd6..0123dbd3d71 100644
--- a/gdb/remote-mips.c
+++ b/gdb/remote-mips.c
@@ -1525,6 +1525,7 @@ HOST:PORT to access a board over a network",  /* to_doc */
   mips_mourn_inferior,		/* to_mourn_inferior */
   NULL,				/* to_can_run */
   NULL,				/* to_notice_signals */
+  0,				/* to_stop */
   process_stratum,		/* to_stratum */
   NULL,				/* to_next */
   1,				/* to_has_all_memory */
diff --git a/gdb/remote-mm.c b/gdb/remote-mm.c
index 423ba64353c..9b798a8366a 100644
--- a/gdb/remote-mm.c
+++ b/gdb/remote-mm.c
@@ -1605,6 +1605,7 @@ struct target_ops mm_ops = {
         mm_mourn,            /* mourn_inferior FIXME */
 	0,			/* can_run */
 	0, /* notice_signals */
+	0,			/* to_stop */
         process_stratum, 0, /* next */
         1, 1, 1, 1, 1,  /* all mem, mem, stack, regs, exec */
 	0,0,		/* sections, sections_end */
diff --git a/gdb/remote-mon.c b/gdb/remote-mon.c
index a120ab82974..b7dabcabdad 100644
--- a/gdb/remote-mon.c
+++ b/gdb/remote-mon.c
@@ -1032,6 +1032,7 @@ Specify the serial device it is connected to (e.g. /dev/ttya).",
   monitor_mourn_inferior,
   0,				/* can_run */
   0, 				/* notice_signals */
+  0,				/* to_stop */
   process_stratum,
   0,				/* next */
   1,
@@ -1074,6 +1075,7 @@ Specify the serial device it is connected to (e.g. /dev/ttya).",
   monitor_mourn_inferior,
   0,				/* can_run */
   0, 				/* notice_signals */
+  0,				/* to_stop */
   process_stratum,
   0,				/* next */
   1,
@@ -1116,6 +1118,7 @@ Specify the serial device it is connected to (e.g. /dev/ttya).",
   monitor_mourn_inferior,
   0,				/* can_run */
   0, 				/* notice_signals */
+  0,				/* to_stop */
   process_stratum,
   0,				/* next */
   1,
diff --git a/gdb/remote-nindy.c b/gdb/remote-nindy.c
index a85caf07725..0c2c98cc4ef 100644
--- a/gdb/remote-nindy.c
+++ b/gdb/remote-nindy.c
@@ -747,6 +747,7 @@ specified when you started GDB.",
 	nindy_mourn_inferior,
 	0,		/* can_run */
 	0, /* notice_signals */
+	0,			/* to_stop */
 	process_stratum, 0, /* next */
 	1, 1, 1, 1, 1,	/* all mem, mem, stack, regs, exec */
 	0, 0,			/* Section pointers */
diff --git a/gdb/remote-os9k.c b/gdb/remote-os9k.c
index a3f67745aa5..f1aaaf88fb0 100644
--- a/gdb/remote-os9k.c
+++ b/gdb/remote-os9k.c
@@ -1158,6 +1158,7 @@ Specify the serial device it is connected to (e.g. /dev/ttya).",
   rombug_mourn_inferior,
   0,				/* can_run */
   0, 				/* notice_signals */
+  0,				/* to_stop */
   process_stratum,
   0,				/* next */
   1,
diff --git a/gdb/remote-pa.c b/gdb/remote-pa.c
index 91988f8913b..6d5f0796e80 100644
--- a/gdb/remote-pa.c
+++ b/gdb/remote-pa.c
@@ -1520,6 +1520,7 @@ Specify the serial device it is connected to (e.g. /dev/ttya) or telnet port.",
   remote_mourn,			/* to_mourn_inferior */
   0,				/* to_can_run */
   0,				/* to_notice_signals */
+  0,				/* to_stop */
   process_stratum,		/* to_stratum */
   NULL,				/* to_next */
   1,				/* to_has_all_memory */
diff --git a/gdb/remote-sim.c b/gdb/remote-sim.c
index 8b3c4d3b745..48de0812fbd 100644
--- a/gdb/remote-sim.c
+++ b/gdb/remote-sim.c
@@ -419,6 +419,7 @@ struct target_ops gdbsim_ops =
   gdbsim_mourn_inferior,	/* mourn_inferior */
   0,				/* can_run */
   0,				/* notice_signals */
+  0,				/* to_stop */
   process_stratum, 0,		/* next */
   1, 1, 1, 1, 1,		/* all mem, mem, stack, regs, exec */
   0, 0,				/* Section pointers */
diff --git a/gdb/remote-st.c b/gdb/remote-st.c
index 402a4ab1e59..8bec2f5dc0a 100644
--- a/gdb/remote-st.c
+++ b/gdb/remote-st.c
@@ -809,6 +809,7 @@ the speed to connect at in bits per second.",
   st2000_mourn_inferior,
   0,				/* can_run */
   0, 				/* notice_signals */
+  0,				/* to_stop */
   process_stratum,
   0,				/* next */
   1,
-- 
2.30.2