From d30acaa715bbe0d2e628831b1eabca166114652e Mon Sep 17 00:00:00 2001 From: Joel Brobecker Date: Sun, 15 Mar 2009 19:38:42 +0000 Subject: [PATCH] Modernize the aix-thread later by getting rid of the base_target global. This brings back to life the AIX port which was otherwise crashing all the time. * aix-thread.c (base_target): Delete. (pd_enable): Do not set base_target. (aix_thread_attach): Use find_target_beneath instead of base_target. (aix_thread_detach, aix_thread_resume, aix_thread_wait) (aix_thread_fetch_registers, aix_thread_store_registers), (aix_thread_xfer_partial, aix_thread_mourn_inferior) (aix_thread_thread_alive, aix_thread_pid_to_str): Likewise. (aix_thread_kill): Delete. Does not seem necessary. (init_aix_thread_ops): Do not set aix_thread_ops.to_kill. --- gdb/ChangeLog | 16 ++++++++++++++ gdb/aix-thread.c | 57 ++++++++++++++++++++++-------------------------- 2 files changed, 42 insertions(+), 31 deletions(-) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index e5d892c69f4..6d00bf38e62 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,19 @@ +2009-03-15 Joel Brobecker + + Modernize the aix-thread later by getting rid of the base_target + global. This brings back to life the AIX port which was otherwise + crashing all the time. + + * aix-thread.c (base_target): Delete. + (pd_enable): Do not set base_target. + (aix_thread_attach): Use find_target_beneath instead of base_target. + (aix_thread_detach, aix_thread_resume, aix_thread_wait) + (aix_thread_fetch_registers, aix_thread_store_registers), + (aix_thread_xfer_partial, aix_thread_mourn_inferior) + (aix_thread_thread_alive, aix_thread_pid_to_str): Likewise. + (aix_thread_kill): Delete. Does not seem necessary. + (init_aix_thread_ops): Do not set aix_thread_ops.to_kill. + 2009-03-15 Jan Kratochvil * stack.c (return_command ): New variables retval_expr diff --git a/gdb/aix-thread.c b/gdb/aix-thread.c index f453d0ed5ff..b06b5f3f7f2 100644 --- a/gdb/aix-thread.c +++ b/gdb/aix-thread.c @@ -105,12 +105,6 @@ struct pd_thread { static struct target_ops aix_thread_ops; -/* Copy of the target over which ops is pushed. This is more - convenient than a pointer to deprecated_child_ops or core_ops, - because they lack current_target's default callbacks. */ - -static struct target_ops base_target; - /* Address of the function that libpthread will call when libpthdebug is ready to be initialized. */ @@ -897,7 +891,6 @@ pd_enable (void) return; /* Prepare for thread debugging. */ - base_target = current_target; push_target (&aix_thread_ops); pd_able = 1; @@ -941,7 +934,9 @@ new_objfile (struct objfile *objfile) static void aix_thread_attach (struct target_ops *ops, char *args, int from_tty) { - base_target.to_attach (&base_target, args, from_tty); + struct target_ops *beneath = find_target_beneath (ops); + + beneath->to_attach (beneath, args, from_tty); pd_activate (1); } @@ -950,8 +945,10 @@ aix_thread_attach (struct target_ops *ops, char *args, int from_tty) static void aix_thread_detach (struct target_ops *ops, char *args, int from_tty) { + struct target_ops *beneath = find_target_beneath (ops); + pd_disable (); - base_target.to_detach (&base_target, args, from_tty); + beneath->to_detach (beneath, args, from_tty); } /* Tell the inferior process to continue running thread PID if != -1 @@ -967,8 +964,10 @@ aix_thread_resume (struct target_ops *ops, if (!PD_TID (ptid)) { struct cleanup *cleanup = save_inferior_ptid (); + struct target_ops *beneath = find_target_beneath (ops); + inferior_ptid = pid_to_ptid (PIDGET (inferior_ptid)); - base_target.to_resume (ops, ptid, step, sig); + beneath->to_resume (beneath, ptid, step, sig); do_cleanups (cleanup); } else @@ -1002,11 +1001,12 @@ aix_thread_wait (struct target_ops *ops, ptid_t ptid, struct target_waitstatus *status) { struct cleanup *cleanup = save_inferior_ptid (); + struct target_ops *beneath = find_target_beneath (ops); pid_to_prc (&ptid); inferior_ptid = pid_to_ptid (PIDGET (inferior_ptid)); - ptid = base_target.to_wait (&base_target, ptid, status); + ptid = beneath->to_wait (beneath, ptid, status); do_cleanups (cleanup); if (PIDGET (ptid) == -1) @@ -1282,9 +1282,10 @@ aix_thread_fetch_registers (struct target_ops *ops, { struct thread_info *thread; pthdb_tid_t tid; + struct target_ops *beneath = find_target_beneath (ops); if (!PD_TID (inferior_ptid)) - base_target.to_fetch_registers (ops, regcache, regno); + beneath->to_fetch_registers (beneath, regcache, regno); else { thread = find_thread_pid (inferior_ptid); @@ -1622,9 +1623,10 @@ aix_thread_store_registers (struct target_ops *ops, { struct thread_info *thread; pthdb_tid_t tid; + struct target_ops *beneath = find_target_beneath (ops); if (!PD_TID (inferior_ptid)) - base_target.to_store_registers (ops, regcache, regno); + beneath->to_store_registers (beneath, regcache, regno); else { thread = find_thread_pid (inferior_ptid); @@ -1648,34 +1650,25 @@ aix_thread_xfer_partial (struct target_ops *ops, enum target_object object, { struct cleanup *old_chain = save_inferior_ptid (); LONGEST xfer; + struct target_ops *beneath = find_target_beneath (ops); inferior_ptid = pid_to_ptid (PIDGET (inferior_ptid)); - xfer = base_target.to_xfer_partial (ops, object, annex, - readbuf, writebuf, offset, len); + xfer = beneath->to_xfer_partial (beneath, object, annex, + readbuf, writebuf, offset, len); do_cleanups (old_chain); return xfer; } -/* Kill and forget about the inferior process. */ - -static void -aix_thread_kill (void) -{ - struct cleanup *cleanup = save_inferior_ptid (); - - inferior_ptid = pid_to_ptid (PIDGET (inferior_ptid)); - base_target.to_kill (); - do_cleanups (cleanup); -} - /* Clean up after the inferior exits. */ static void aix_thread_mourn_inferior (struct target_ops *ops) { + struct target_ops *beneath = find_target_beneath (ops); + pd_deactivate (); - base_target.to_mourn_inferior (&base_target); + beneath->to_mourn_inferior (beneath); } /* Return whether thread PID is still valid. */ @@ -1683,8 +1676,10 @@ aix_thread_mourn_inferior (struct target_ops *ops) static int aix_thread_thread_alive (struct target_ops *ops, ptid_t ptid) { + struct target_ops *beneath = find_target_beneath (¤t_target); + if (!PD_TID (ptid)) - return base_target.to_thread_alive (ops, ptid); + return beneath->to_thread_alive (beneath, ptid); /* We update the thread list every time the child stops, so all valid threads should be in the thread list. */ @@ -1698,9 +1693,10 @@ static char * aix_thread_pid_to_str (struct target_ops *ops, ptid_t ptid) { static char *ret = NULL; + struct target_ops *beneath = find_target_beneath (¤t_target); if (!PD_TID (ptid)) - return base_target.to_pid_to_str (&base_target, ptid); + return beneath->to_pid_to_str (beneath, ptid); /* Free previous return value; a new one will be allocated by xstrprintf(). */ @@ -1795,7 +1791,6 @@ init_aix_thread_ops (void) aix_thread_ops.to_xfer_partial = aix_thread_xfer_partial; /* No need for aix_thread_ops.to_create_inferior, because we activate thread debugging when the inferior reaches pd_brk_addr. */ - aix_thread_ops.to_kill = aix_thread_kill; aix_thread_ops.to_mourn_inferior = aix_thread_mourn_inferior; aix_thread_ops.to_thread_alive = aix_thread_thread_alive; aix_thread_ops.to_pid_to_str = aix_thread_pid_to_str; -- 2.30.2