From 78b459a7e7d0930a3ac1c4ca2fe4706559675cdc Mon Sep 17 00:00:00 2001 From: Stu Grossman Date: Thu, 3 Nov 1994 22:40:14 +0000 Subject: * 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 539c53a..041d9b1 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 235b043..90196b9 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 179c981..64cc059 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 dd02089..b7e2df1 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 e6e3f9c..0f75191 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 1221315..62562c7 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 5cf0c75..0d9b377 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 8d7ac35..162e853 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 3b90553..bc114c4 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 0a31d77..0123dbd 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 423ba64..9b798a8 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 a120ab8..b7dabca 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 a85caf0..0c2c98c 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 a3f6774..f1aaaf8 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 91988f8..6d5f079 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 8b3c4d3..48de081 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 402a4ab..8bec2f5 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, -- cgit v1.1