mirror of
https://github.com/darlinghq/darling-gdb.git
synced 2025-01-26 03:27:18 +00:00
* config/i386/i386m3.mh (NAT_CLIBS): Add -lmachid and -lnetname.
* m3-nat.c, config/nm-m3.h: #if 0 REQUEST_QUIT stuff. * m3-nat.c: Pass argument to return_to_top_level. Declare m3_kill_inferior before use. (port_chain_insert): In "can't happen" case, abort rather than setting `mid' to large decimal constant (which gcc warns about). (get_thread_name): Use cast to convert const char * to char *. (add_mach_specific_commands): #if 0 "thread break" command. (m3_trace_him): Call push_target. (mach_really_wait): New argument pid; remove unused variable pid. (intercept_exec_calls): Call target_terminal_init and target_terminal_inferior once the child execs. * infrun.c (proceed): Pass argument to PREPARE_TO_PROCEED.
This commit is contained in:
Jean Marie Diaz
parent
203778cee1
commit
f4e0e098d2
@ -1,3 +1,20 @@
|
||||
Thu Aug 4 07:55:04 1994 Jim Kingdon (kingdon@lioth.cygnus.com)
|
||||
|
||||
* config/i386/i386m3.mh (NAT_CLIBS): Add -lmachid and -lnetname.
|
||||
* m3-nat.c, config/nm-m3.h: #if 0 REQUEST_QUIT stuff.
|
||||
* m3-nat.c: Pass argument to return_to_top_level.
|
||||
Declare m3_kill_inferior before use.
|
||||
(port_chain_insert): In "can't happen" case, abort rather than
|
||||
setting `mid' to large decimal constant (which gcc warns about).
|
||||
(get_thread_name): Use cast to convert const char * to char *.
|
||||
(add_mach_specific_commands): #if 0 "thread break" command.
|
||||
(m3_trace_him): Call push_target.
|
||||
(mach_really_wait): New argument pid; remove unused
|
||||
variable pid.
|
||||
(intercept_exec_calls): Call target_terminal_init and
|
||||
target_terminal_inferior once the child execs.
|
||||
* infrun.c (proceed): Pass argument to PREPARE_TO_PROCEED.
|
||||
|
||||
Wed Aug 3 12:05:13 1994 Stan Shebs (shebs@andros.cygnus.com)
|
||||
|
||||
* breakpoint.c (breakpoint_1): Improve pluralization in display
|
||||
@ -28,7 +45,7 @@ Mon Aug 1 18:48:47 1994 Stan Shebs (shebs@andros.cygnus.com)
|
||||
* defs.h: Change two-line declarations to one-line form.
|
||||
(NORETURN): Define as "volatile" only for older GCCs.
|
||||
(ATTR_NORETURN): Define for newer GCCs.
|
||||
* procfs.c (proc_init_filed): Add ATTR_NORETURN to declaration.
|
||||
* procfs.c (proc_init_failed): Add ATTR_NORETURN to declaration.
|
||||
|
||||
Mon Aug 1 16:43:24 1994 Jim Kingdon (kingdon@lioth.cygnus.com)
|
||||
|
||||
|
||||
@ -2,7 +2,7 @@
|
||||
|
||||
XDEPFILES= i387-tdep.o coredep.o
|
||||
NATDEPFILES= i386m3-nat.o m3-nat.o fork-child.o
|
||||
NAT_CLIBS= -lmach
|
||||
NAT_CLIBS= -lmachid -lnetname -lmach
|
||||
XM_FILE= xm-i386m3.h
|
||||
NAT_FILE= nm-m3.h
|
||||
|
||||
|
||||
@ -111,7 +111,10 @@ struct emul_stack_top {
|
||||
/* Do Mach 3 dependent operations when ^C or a STOP is requested */
|
||||
#define DO_QUIT() mach3_quit ()
|
||||
|
||||
#if 0
|
||||
/* This is bogus. It is NOT OK to quit out of target_wait. */
|
||||
/* If in mach_msg() and ^C is typed set immediate_quit */
|
||||
#define REQUEST_QUIT() mach3_request_quit ()
|
||||
#endif
|
||||
|
||||
#endif /* NM_M3_H */
|
||||
|
||||
45
gdb/m3-nat.c
45
gdb/m3-nat.c
@ -261,6 +261,7 @@ struct cleanup *cleanup_step = NULL_CLEANUP;
|
||||
|
||||
|
||||
extern struct target_ops m3_ops;
|
||||
static void m3_kill_inferior ();
|
||||
|
||||
#if 0
|
||||
#define MACH_TYPE_EXCEPTION_PORT -1
|
||||
@ -321,7 +322,7 @@ port_chain_insert (list, name, type)
|
||||
}
|
||||
}
|
||||
else
|
||||
mid = 3735928559; /* 0x? :-) */
|
||||
abort ();
|
||||
|
||||
new = (port_chain_t) obstack_alloc (port_chain_obstack,
|
||||
sizeof (struct port_chain));
|
||||
@ -617,6 +618,8 @@ void
|
||||
intercept_exec_calls (exec_counter)
|
||||
int exec_counter;
|
||||
{
|
||||
int terminal_initted = 0;
|
||||
|
||||
struct syscall_msg_t {
|
||||
mach_msg_header_t header;
|
||||
mach_msg_type_t type;
|
||||
@ -751,6 +754,23 @@ intercept_exec_calls (exec_counter)
|
||||
original_exec_reply = syscall_in.header.msgh_remote_port;
|
||||
syscall_in.header.msgh_remote_port = exec_reply_send;
|
||||
}
|
||||
|
||||
if (!terminal_initted)
|
||||
{
|
||||
/* Now that the child has exec'd we know it has already set its
|
||||
process group. On POSIX systems, tcsetpgrp will fail with
|
||||
EPERM if we try it before the child's setpgid. */
|
||||
|
||||
/* Set up the "saved terminal modes" of the inferior
|
||||
based on what modes we are starting it with. */
|
||||
target_terminal_init ();
|
||||
|
||||
/* Install inferior's terminal modes. */
|
||||
target_terminal_inferior ();
|
||||
|
||||
terminal_initted = 1;
|
||||
}
|
||||
|
||||
exec_counter--;
|
||||
}
|
||||
|
||||
@ -1127,6 +1147,8 @@ m3_trace_him (pid)
|
||||
{
|
||||
kern_return_t ret;
|
||||
|
||||
push_target (&m3_ops);
|
||||
|
||||
inferior_task = task_by_pid (pid);
|
||||
|
||||
if (! MACH_PORT_VALID (inferior_task))
|
||||
@ -1219,10 +1241,10 @@ int mach_really_waiting;
|
||||
Returns the inferior_pid for rest of gdb.
|
||||
Side effects: Set *OURSTATUS. */
|
||||
int
|
||||
mach_really_wait (ourstatus)
|
||||
mach_really_wait (pid, ourstatus)
|
||||
int pid;
|
||||
struct target_waitstatus *ourstatus;
|
||||
{
|
||||
int pid;
|
||||
kern_return_t ret;
|
||||
int w;
|
||||
|
||||
@ -1373,6 +1395,9 @@ mach3_quit ()
|
||||
return;
|
||||
}
|
||||
|
||||
#if 0
|
||||
/* bogus bogus bogus. It is NOT OK to quit out of target_wait. */
|
||||
|
||||
/* If ^C is typed when we are waiting for a message
|
||||
* and your Unix server is able to notice that we
|
||||
* should quit now.
|
||||
@ -1385,6 +1410,7 @@ mach3_request_quit ()
|
||||
if (mach_really_waiting)
|
||||
immediate_quit = 1;
|
||||
}
|
||||
#endif
|
||||
|
||||
/*
|
||||
* Gdb message server.
|
||||
@ -2112,7 +2138,7 @@ get_thread_name (one_cproc, id)
|
||||
sprintf(buf, "_t%d", id);
|
||||
}
|
||||
else
|
||||
return (one_cproc->cthread->name);
|
||||
return (char *)(one_cproc->cthread->name);
|
||||
else
|
||||
{
|
||||
if (id < 0)
|
||||
@ -2944,7 +2970,7 @@ suspend_all_threads (from_tty)
|
||||
{
|
||||
warning ("Could not suspend inferior threads.");
|
||||
m3_kill_inferior ();
|
||||
return_to_top_level ();
|
||||
return_to_top_level (RETURN_ERROR);
|
||||
}
|
||||
|
||||
for (index = 0; index < thread_count; index++)
|
||||
@ -3118,7 +3144,7 @@ thread_resume_command (args, from_tty)
|
||||
{
|
||||
if (current_thread)
|
||||
current_thread = saved_thread;
|
||||
return_to_top_level ();
|
||||
return_to_top_level (RETURN_ERROR);
|
||||
}
|
||||
|
||||
ret = thread_info (current_thread,
|
||||
@ -3662,8 +3688,6 @@ task_command (arg, from_tty)
|
||||
|
||||
add_mach_specific_commands ()
|
||||
{
|
||||
extern void condition_thread ();
|
||||
|
||||
/* Thread handling commands */
|
||||
|
||||
/* FIXME: Move our thread support into the generic thread.c stuff so we
|
||||
@ -3689,10 +3713,15 @@ add_mach_specific_commands ()
|
||||
add_cmd ("kill", class_run, thread_kill_command,
|
||||
"Kill the specified thread MID from inferior task.",
|
||||
&cmd_thread_list);
|
||||
#if 0
|
||||
/* The rest of this support (condition_thread) was not merged. It probably
|
||||
should not be merged in this form, but instead added to the generic GDB
|
||||
thread support. */
|
||||
add_cmd ("break", class_breakpoint, condition_thread,
|
||||
"Breakpoint N will only be effective for thread MID or @SLOT\n\
|
||||
If MID/@SLOT is omitted allow all threads to break at breakpoint",
|
||||
&cmd_thread_list);
|
||||
#endif
|
||||
/* Thread command shorthands (for backward compatibility) */
|
||||
add_alias_cmd ("ts", "mthread select", 0, 0, &cmdlist);
|
||||
add_alias_cmd ("tl", "mthread list", 0, 0, &cmdlist);
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user