1 /* Low level interface for debugging UnixWare user-mode threads for
4 Copyright 1999, 2000 Free Software Foundation, Inc.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA. */
24 /* Like many systems, UnixWare implements two classes of threads:
25 kernel-mode threads, which are scheduled by the kernel; and
26 user-mode threads, which are scheduled by a library. UnixWare
27 calls these two classes lightweight processes (LWPs) and threads,
30 This module deals with user-mode threads. It calls procfs_ops
31 functions to deal with LWPs and processes and core_ops functions to
34 As of this writing, the user-mode thread debugging interface is not
35 documented beyond the comments in <thread.h>. The following
36 description has been gleaned from experience and from information
39 libthread.so, against which all UnixWare user-mode thread programs
40 link, provides a global thread_debug structure named _thr_debug.
43 (1) thr_map is a pointer to a pointer to an element of a
44 thread_map ring. A thread_map contains a single thread's id
45 number, state, LWP pointer, recent register state, and other
48 (2) thr_brk is a pointer to a stub function that libthread.so
49 calls when it changes a thread's state, e.g. by creating it,
50 switching it to an LWP, or causing it to exit.
52 (3) thr_debug_on controls whether libthread.so calls thr_brk().
54 Debuggers are able to track thread activity by setting a private
55 breakpoint on thr_brk() and setting thr_debug_on to 1.
57 thr_brk() receives two arguments:
59 (1) a pointer to a thread_map describing the thread being
62 (2) an enum thread_change specifying one of the following
66 thread_create thread has just been created
67 thread_exit thread has just exited
68 switch_begin thread will be switched to an LWP
69 switch_complete thread has been switched to an LWP
70 cancel_complete thread wasn't switched to an LWP
71 thread_suspend thread has been thr_suspend()ed
72 thread_suspend_pending thread will be thr_suspend()ed
73 thread_continue thread has been thr_continue()d
75 The thread_map argument to thr_brk() is NULL under the following
78 - The main thread is being acted upon. The main thread always
79 has id 1, so its thread_map is easy to find by scanning through
82 - A "switch_complete" change is occurring, which means that the
83 thread specified in the most recent "switch_begin" change has
86 - A "cancel_complete" change is occurring, which means that the
87 thread specified in the most recent "switch_begin" change has
88 not moved to an LWP after all.
90 - A spurious "switch_begin" change is occurring after a
93 Between switch_begin and switch_complete or cancel_complete, the
94 affected thread's LWP pointer is not reliable. It is possible that
95 other parts of the thread's thread_map are also unreliable during
100 #include "gdbthread.h"
102 #include "inferior.h"
106 * <thread.h> includes <sys/priocntl.h>, which requires boolean_t from
107 * <sys/types.h>, which doesn't typedef boolean_t with gcc.
109 #define boolean_t int
113 #include <synch.h> /* for UnixWare 2.x */
117 * Whether to emit debugging output.
122 * Default debugging output file, overridden by envvar UWTHR_DEBUG.
124 #define DEBUG_FILE "/dev/tty"
127 * #if DEBUG, write string S to the debugging output channel.
130 # define DBG(fmt_and_args)
131 # define DBG2(fmt_and_args)
133 # define DBG(fmt_and_args) dbg fmt_and_args
134 # define DBG2(fmt_and_args)
138 * Back end to CALL_BASE() and TRY_BASE(): evaluate CALL, then convert
139 * inferior_pid to a composite thread/process id.
141 #define CALL_BASE_1(call) \
143 DBG2(("CALL_BASE(" #call ")")); \
145 do_cleanups (infpid_cleanup); \
149 * If inferior_pid can be converted to a composite lwp/process id, do so,
150 * evaluate base_ops function CALL, and then convert inferior_pid back to a
151 * composite thread/process id.
153 * Otherwise, issue an error message and return nonlocally.
155 #define CALL_BASE(call) \
157 if (!lwp_infpid ()) \
158 error ("uw-thread: "__FUNCTION__": no lwp"); \
159 CALL_BASE_1 (call); \
163 * Like CALL_BASE(), but instead of returning nonlocally on error, set
164 * *CALLED to whether the inferior_pid conversion was successful.
166 #define TRY_BASE(call, called) \
168 if ((*(called) = lwp_infpid ())) \
169 CALL_BASE_1 (call); \
173 * Information passed by thread_iter() to its callback parameter.
176 struct thread_map map
;
182 * Private thread data for the thread_info struct.
184 struct private_thread_info
{
185 int stable
; /* 0 if libthread.so is modifying thread map */
186 int thrid
; /* thread id assigned by libthread.so */
187 int lwpid
; /* thread's lwp if .stable, 0 means no lwp */
188 CORE_ADDR mapp
; /* address of thread's map structure */
192 /* procfs.c's target-specific operations. */
193 extern struct target_ops procfs_ops
;
195 /* Flag to prevent procfs.c from starting inferior processes. */
196 extern int procfs_suppress_run
;
198 /* This module's target-specific operations. */
199 static struct target_ops uw_thread_ops
;
201 /* Copy of the target over which uw_thread_ops is pushed. This is
202 more convenient than a pointer to procfs_ops or core_ops, because
203 they lack current_target's default callbacks. */
204 static struct target_ops base_ops
;
206 /* Saved pointer to previous owner of target_new_objfile_hook. */
207 static void (*target_new_objfile_chain
)(struct objfile
*);
209 /* Whether we are debugging a user-space thread program. This isn't
210 set until after libthread.so is loaded by the program being
213 Except for module one-time intialization and where otherwise
214 documented, no functions in this module get called when
215 !uw_thread_active. */
216 static int uw_thread_active
;
218 /* For efficiency, cache the addresses of libthread.so's _thr_debug
219 structure, its thr_brk stub function, and the main thread's map. */
220 static CORE_ADDR thr_debug_addr
;
221 static CORE_ADDR thr_brk_addr
;
222 static CORE_ADDR thr_map_main
;
224 /* Remember the thread most recently marked as switching. Necessary because
225 libthread.so passes null map when calling stub with tc_*_complete. */
226 static struct thread_info
*switchto_thread
;
228 /* Cleanup chain for safely restoring inferior_pid after CALL_BASE. */
229 static struct cleanup
*infpid_cleanup
;
234 * Helper function for DBG() macro: if printf-style FMT is non-null, format it
235 * with args and display the result on the debugging output channel.
240 static int fd
= -1, len
;
250 path
= getenv ("UWTHR_DEBUG");
253 if ((fd
= open (path
, O_WRONLY
| O_CREAT
| O_TRUNC
, 0664)) < 0)
254 error ("can't open %s\n", path
);
257 va_start (args
, fmt
);
258 vsprintf (buf
, fmt
, args
);
263 (void)write (fd
, buf
, len
+ 1);
268 * Return a string representing composite PID's components.
273 static char *buf
, buf1
[80], buf2
[80];
274 if (!buf
|| buf
== buf2
)
280 sprintf (buf
, "%d", pid
);
282 sprintf (buf
, "%s %d/%d", ISTID (pid
) ? "thr" : "lwp",
283 TIDGET (pid
), PIDGET (pid
));
289 * Return a string representing thread state CHANGE.
292 dbgchange (enum thread_change change
)
295 case tc_invalid
: return "invalid";
296 case tc_thread_create
: return "thread_create";
297 case tc_thread_exit
: return "thread_exit";
298 case tc_switch_begin
: return "switch_begin";
299 case tc_switch_complete
: return "switch_complete";
300 case tc_cancel_complete
: return "cancel_complete";
301 case tc_thread_suspend
: return "thread_suspend";
302 case tc_thread_suspend_pending
: return "thread_suspend_pending";
303 case tc_thread_continue
: return "thread_continue";
304 default: return "unknown";
309 * Return a string representing thread STATE.
315 case TS_ONPROC
: return "running";
316 case TS_SLEEP
: return "sleeping";
317 case TS_RUNNABLE
: return "runnable";
318 case TS_ZOMBIE
: return "zombie";
319 case TS_SUSPENDED
: return "suspended";
321 case TS_FORK
: return "forking";
323 default: return "confused";
331 * Read the contents of _thr_debug into *DEBUGP. Return success.
334 read_thr_debug (struct thread_debug
*debugp
)
336 return base_ops
.to_xfer_memory (thr_debug_addr
, (char *)debugp
,
337 sizeof (*debugp
), 0, &base_ops
);
341 * Read into MAP the contents of the thread map at inferior process address
342 * MAPP. Return success.
345 read_map (CORE_ADDR mapp
, struct thread_map
*map
)
347 return base_ops
.to_xfer_memory ((CORE_ADDR
)THR_MAP (mapp
), (char *)map
,
348 sizeof (*map
), 0, &base_ops
);
352 * Read into LWP the contents of the lwp decriptor at inferior process address
353 * LWPP. Return success.
356 read_lwp (CORE_ADDR lwpp
, __lwp_desc_t
*lwp
)
358 return base_ops
.to_xfer_memory (lwpp
, (char *)lwp
,
359 sizeof (*lwp
), 0, &base_ops
);
363 * Iterate through all user threads, applying FUNC(<map>, <lwp>, DATA) until
364 * (a) FUNC returns nonzero,
365 * (b) FUNC has been applied to all threads, or
366 * (c) an error occurs,
367 * where <map> is the thread's struct thread_map and <lwp> if non-null is the
368 * thread's current __lwp_desc_t.
370 * If a call to FUNC returns nonzero, return that value; otherwise, return 0.
373 thread_iter (int (*func
)(iter_t
*, void *), void *data
)
375 struct thread_debug debug
;
376 CORE_ADDR first
, mapp
;
380 if (!read_thr_debug (&debug
))
382 if (!base_ops
.to_xfer_memory ((CORE_ADDR
)debug
.thr_map
, (char *)&mapp
,
383 sizeof (mapp
), 0, &base_ops
))
390 if (!read_map (mapp
, &iter
.map
))
393 if (iter
.map
.thr_lwpp
)
394 if (!read_lwp ((CORE_ADDR
)iter
.map
.thr_lwpp
, &iter
.lwp
))
398 if ((ret
= func (&iter
, data
)))
401 mapp
= (CORE_ADDR
)iter
.map
.thr_next
;
408 * Deactivate user-mode thread support.
411 deactivate_uw_thread (void)
413 uw_thread_active
= 0;
414 unpush_target (&uw_thread_ops
);
418 * Return the composite lwp/process id corresponding to composite
419 * id PID. If PID is a thread with no lwp, return 0.
424 struct thread_info
*info
;
429 else if (!(info
= find_thread_pid (pid
)))
431 else if (!info
->private->lwpid
)
434 lid
= MKLID (pid
, info
->private->lwpid
);
436 DBG2((" thr_to_lwp(%s) = %s", dbgpid (pid
), dbgpid (lid
)));
441 * find_thread_lwp() callback: return whether TP describes a thread
442 * associated with lwp id DATA.
445 find_thread_lwp_callback (struct thread_info
*tp
, void *data
)
447 int lwpid
= (int)data
;
449 if (!ISTID (tp
->pid
))
451 if (!tp
->private->stable
)
453 if (lwpid
!= tp
->private->lwpid
)
461 * If a thread is associated with lwp id LWPID, return the corresponding
462 * member of the global thread list; otherwise, return null.
464 static struct thread_info
*
465 find_thread_lwp (int lwpid
)
467 return iterate_over_threads (find_thread_lwp_callback
, (void *)lwpid
);
471 * Return the composite thread/process id corresponding to composite
472 * id PID. If PID is an lwp with no thread, return PID.
477 struct thread_info
*info
;
478 int tid
= pid
, lwpid
;
482 if (!(lwpid
= LIDGET (pid
)))
484 if (!(info
= find_thread_lwp (lwpid
)))
486 tid
= MKTID (pid
, info
->private->thrid
);
489 DBG2((ISTID (tid
) ? NULL
: "lwp_to_thr: no thr for %s", dbgpid (pid
)));
494 * do_cleanups() callback: convert inferior_pid to a composite
495 * thread/process id after having made a procfs call.
498 thr_infpid (void *unused
)
500 int pid
= lwp_to_thr (inferior_pid
);
501 DBG2((" inferior_pid from procfs: %s => %s",
502 dbgpid (inferior_pid
), dbgpid (pid
)));
507 * If possible, convert inferior_pid to a composite lwp/process id in
508 * preparation for making a procfs call. Return success.
513 int pid
= thr_to_lwp (inferior_pid
);
514 DBG2((" inferior_pid to procfs: %s => %s",
515 dbgpid (inferior_pid
), dbgpid (pid
)));
521 infpid_cleanup
= make_cleanup (thr_infpid
, NULL
);
526 * Add to the global thread list a new user-mode thread with system id THRID,
527 * lwp id LWPID, map address MAPP, and composite thread/process PID.
530 add_thread_uw (int thrid
, int lwpid
, CORE_ADDR mapp
, int pid
)
532 struct thread_info
*newthread
;
534 if ((newthread
= add_thread (pid
)) == NULL
)
535 error ("failed to create new thread structure");
537 newthread
->private = xmalloc (sizeof (struct private_thread_info
));
538 newthread
->private->stable
= 1;
539 newthread
->private->thrid
= thrid
;
540 newthread
->private->lwpid
= lwpid
;
541 newthread
->private->mapp
= mapp
;
543 if (target_has_execution
)
544 printf_unfiltered ("[New %s]\n", target_pid_to_str (pid
));
548 * notice_threads() and find_main() callback: if the thread list doesn't
549 * already contain the thread described by ITER, add it if it's the main
550 * thread or if !DATA.
553 notice_thread (iter_t
*iter
, void *data
)
555 int thrid
= iter
->map
.thr_tid
;
556 int lwpid
= !iter
->map
.thr_lwpp
? 0 : iter
->lwp
.lwp_id
;
557 int pid
= MKTID (inferior_pid
, thrid
);
559 if (!find_thread_pid (pid
) && (!data
|| thrid
== 1))
560 add_thread_uw (thrid
, lwpid
, iter
->mapp
, pid
);
566 * Add to the thread list any threads it doesn't already contain.
569 notice_threads (void)
571 thread_iter (notice_thread
, NULL
);
575 * Return the address of the main thread's map. On error, return 0.
582 struct thread_info
*info
;
583 thread_iter (notice_thread
, (void *)1);
584 if ((info
= find_thread_pid (MKTID (inferior_pid
, 1))))
585 thr_map_main
= info
->private->mapp
;
591 * Attach to process specified by ARGS, then initialize for debugging it
592 * and wait for the trace-trap that results from attaching.
594 * This function only gets called with uw_thread_active == 0.
597 uw_thread_attach (char *args
, int from_tty
)
599 procfs_ops
.to_attach (args
, from_tty
);
600 if (uw_thread_active
)
605 * Detach from the process attached to by uw_thread_attach().
608 uw_thread_detach (char *args
, int from_tty
)
610 deactivate_uw_thread ();
611 base_ops
.to_detach (args
, from_tty
);
615 * Tell the inferior process to continue running thread PID if >= 0
616 * and all threads otherwise.
619 uw_thread_resume (int pid
, int step
, enum target_signal signo
)
621 if (pid
> 0 && !(pid
= thr_to_lwp (pid
)))
624 CALL_BASE (base_ops
.to_resume (pid
, step
, signo
));
628 * If the trap we just received from lwp PID was due to a breakpoint
629 * on the libthread.so debugging stub, update this module's state
633 libthread_stub (int pid
)
635 CORE_ADDR sp
, mapp
, mapp_main
;
636 enum thread_change change
;
637 struct thread_map map
;
640 struct thread_info
*info
;
642 /* Check for stub breakpoint. */
643 if (read_pc_pid (pid
) - DECR_PC_AFTER_BREAK
!= thr_brk_addr
)
646 /* Retrieve stub args. */
647 sp
= read_register_pid (SP_REGNUM
, pid
);
648 if (!base_ops
.to_xfer_memory (sp
+ SP_ARG0
, (char *)&mapp
,
649 sizeof (mapp
), 0, &base_ops
))
651 if (!base_ops
.to_xfer_memory (sp
+ SP_ARG0
+ sizeof (mapp
), (char *)&change
,
652 sizeof (change
), 0, &base_ops
))
655 /* create_inferior() may not have finished yet, so notice the main
656 thread to ensure that it's displayed first by add_thread(). */
657 mapp_main
= find_main ();
659 /* Notice thread creation, deletion, or stability change. */
661 case tc_switch_begin
:
662 if (!mapp
) /* usually means main thread */
666 case tc_thread_create
:
670 if (!read_map (mapp
, &map
))
672 tid
= MKTID (pid
, map
.thr_tid
);
675 case tc_thread_create
: /* new thread */
678 else if (!read_lwp ((CORE_ADDR
)map
.thr_lwpp
, &lwp
))
682 add_thread_uw (map
.thr_tid
, lwpid
, mapp
, tid
);
685 case tc_thread_exit
: /* thread has exited */
686 printf_unfiltered ("[Exited %s]\n", target_pid_to_str (tid
));
688 if (tid
== inferior_pid
)
692 case tc_switch_begin
: /* lwp is switching threads */
695 if (!(switchto_thread
= find_thread_pid (tid
)))
697 switchto_thread
->private->stable
= 0;
705 case tc_switch_complete
: /* lwp has switched threads */
706 case tc_cancel_complete
: /* lwp didn't switch threads */
707 if (!switchto_thread
)
710 if (change
== tc_switch_complete
)
713 * If switchto_thread is the main thread, then (a) the corresponding
714 * tc_switch_begin probably received a null map argument and therefore
715 * (b) it may have been a spurious switch following a tc_thread_exit.
717 * Therefore, explicitly query the thread's lwp before caching it in
718 * its thread list entry.
720 if (!read_map (switchto_thread
->private->mapp
, &map
))
724 if (!read_lwp ((CORE_ADDR
)map
.thr_lwpp
, &lwp
))
726 if ((info
= find_thread_lwp (lwp
.lwp_id
)))
727 info
->private->lwpid
= 0;
728 switchto_thread
->private->lwpid
= lwp
.lwp_id
;
732 switchto_thread
->private->stable
= 1;
733 switchto_thread
= NULL
;
737 case tc_thread_suspend
:
738 case tc_thread_suspend_pending
:
739 case tc_thread_continue
:
741 DBG(("unexpected condition in libthread_stub()"));
745 DBG2(("libthread_stub(%s): %s %s %s", dbgpid (pid
), dbgpid (tid
),
746 dbgchange (change
), tid
? dbgstate (map
.thr_state
) : ""));
750 * Wait for thread/lwp/process ID if >= 0 or for any thread otherwise.
753 uw_thread_wait (int pid
, struct target_waitstatus
*status
)
756 pid
= thr_to_lwp (pid
);
757 CALL_BASE (pid
= base_ops
.to_wait (pid
> 0 ? pid
: -1, status
));
759 if (status
->kind
== TARGET_WAITKIND_STOPPED
&&
760 status
->value
.sig
== TARGET_SIGNAL_TRAP
)
761 libthread_stub (pid
);
763 return lwp_to_thr (pid
);
767 * Tell gdb about the registers in the thread/lwp/process specified by
771 uw_thread_fetch_registers (int regno
)
774 struct thread_info
*info
;
775 struct thread_map map
;
777 TRY_BASE (base_ops
.to_fetch_registers (regno
), &called
);
781 if (!(info
= find_thread_pid (inferior_pid
)))
783 if (!read_map (info
->private->mapp
, &map
))
786 supply_gregset (&map
.thr_ucontext
.uc_mcontext
.gregs
);
787 supply_fpregset (&map
.thr_ucontext
.uc_mcontext
.fpregs
);
791 * Store gdb's current view of the register set into the thread/lwp/process
792 * specified by inferior_pid.
795 uw_thread_store_registers (int regno
)
797 CALL_BASE (base_ops
.to_store_registers (regno
));
801 * Prepare to modify the registers array.
804 uw_thread_prepare_to_store (void)
806 CALL_BASE (base_ops
.to_prepare_to_store ());
810 * Fork an inferior process and start debugging it.
812 * This function only gets called with uw_thread_active == 0.
815 uw_thread_create_inferior (char *exec_file
, char *allargs
, char **env
)
817 if (uw_thread_active
)
818 deactivate_uw_thread ();
820 procfs_ops
.to_create_inferior (exec_file
, allargs
, env
);
821 if (uw_thread_active
)
829 * Kill and forget about the inferior process.
832 uw_thread_kill (void)
838 * Clean up after the inferior exits.
841 uw_thread_mourn_inferior (void)
843 remove_thread_event_breakpoints ();
844 deactivate_uw_thread ();
845 base_ops
.to_mourn_inferior ();
849 * Return whether this module can attach to and run processes.
851 * This function only gets called with uw_thread_active == 0.
854 uw_thread_can_run (void)
856 return procfs_suppress_run
;
860 * Return whether thread PID is still valid.
863 uw_thread_alive (int pid
)
866 return base_ops
.to_thread_alive (pid
);
868 /* If it's in the thread list, it's valid, because otherwise
869 libthread_stub() would have deleted it. */
870 return in_thread_list (pid
);
874 * Add to the thread list any threads and lwps it doesn't already contain.
877 uw_thread_find_new_threads (void)
879 CALL_BASE (if (base_ops
.to_find_new_threads
)
880 base_ops
.to_find_new_threads ());
885 * Return a string for pretty-printing PID in "info threads" output.
886 * This may be called by either procfs.c or by generic gdb.
889 uw_thread_pid_to_str (int pid
)
891 #define FMT "Thread %d"
892 static char buf
[sizeof (FMT
) + 3 * sizeof (pid
)];
895 /* core_ops says "process foo", so call procfs_ops explicitly. */
896 return procfs_ops
.to_pid_to_str (pid
);
898 sprintf (buf
, FMT
, TIDGET (pid
));
904 * Return a string displaying INFO state information in "info threads"
908 uw_extra_thread_info (struct thread_info
*info
)
911 struct thread_map map
;
916 if (!ISTID (info
->pid
))
919 if (!info
->private->stable
)
922 if (!read_map (info
->private->mapp
, &map
))
925 if (!map
.thr_lwpp
|| !read_lwp ((CORE_ADDR
)map
.thr_lwpp
, &lwp
))
930 switch (map
.thr_state
) {
931 case TS_ONPROC
: name
= "running"; break;
932 case TS_SLEEP
: name
= "sleeping"; break;
933 case TS_RUNNABLE
: name
= "runnable"; break;
934 case TS_ZOMBIE
: name
= "zombie"; break;
935 case TS_SUSPENDED
: name
= "suspended"; break;
937 case TS_FORK
: name
= "forking"; break;
939 default: name
= "confused"; break;
945 sprintf (buf
, "%s, LWP %d", name
, lwpid
);
950 * Check whether libthread.so has just been loaded, and if so, try to
951 * initialize user-space thread debugging support.
953 * libthread.so loading happens while (a) an inferior process is being
954 * started by procfs and (b) a core image is being loaded.
956 * This function often gets called with uw_thread_active == 0.
959 libthread_init (void)
961 struct minimal_symbol
*ms
;
962 struct thread_debug debug
;
964 struct breakpoint
*b
;
967 /* Don't initialize twice. */
968 if (uw_thread_active
)
971 /* Check whether libthread.so has been loaded. */
972 if (!(ms
= lookup_minimal_symbol ("_thr_debug", NULL
, NULL
)))
975 /* Cache _thr_debug's address. */
976 if (!(thr_debug_addr
= SYMBOL_VALUE_ADDRESS (ms
)))
979 /* Initialize base_ops.to_xfer_memory(). */
980 base_ops
= current_target
;
982 /* Load _thr_debug's current contents. */
983 if (!read_thr_debug (&debug
))
986 /* User code (e.g. my test programs) may dereference _thr_debug,
987 making it availble to GDB before shared libs are loaded. */
991 /* libthread.so has been loaded, and the current_target should now
992 reflect core_ops or procfs_ops. */
993 push_target (&uw_thread_ops
); /* must precede notice_threads() */
994 uw_thread_active
= 1;
996 if (!target_has_execution
)
998 /* Locate threads in core file. */
1003 /* Set a breakpoint on the stub function provided by libthread.so. */
1004 thr_brk_addr
= (CORE_ADDR
)debug
.thr_brk
;
1005 if (!(b
= create_thread_event_breakpoint (thr_brk_addr
)))
1008 /* Activate the stub function. */
1009 onp
= (CORE_ADDR
)&((struct thread_debug
*)thr_debug_addr
)->thr_debug_on
;
1010 if (!base_ops
.to_xfer_memory ((CORE_ADDR
)onp
, (char *)&one
,
1011 sizeof (one
), 1, &base_ops
))
1013 delete_breakpoint (b
);
1017 /* Prepare for finding the main thread, which doesn't yet exist. */
1024 warning ("uw-thread: unable to initialize user-mode thread debugging\n");
1025 deactivate_uw_thread ();
1029 * target_new_objfile_hook callback.
1031 * If OBJFILE is non-null, check whether libthread.so was just loaded,
1032 * and if so, prepare for user-mode thread debugging.
1034 * If OBJFILE is null, libthread.so has gone away, so stop debugging
1035 * user-mode threads.
1037 * This function often gets called with uw_thread_active == 0.
1040 uw_thread_new_objfile (struct objfile
*objfile
)
1045 else if (uw_thread_active
)
1046 deactivate_uw_thread ();
1048 if (target_new_objfile_chain
)
1049 target_new_objfile_chain (objfile
);
1053 * Initialize uw_thread_ops.
1056 init_uw_thread_ops (void)
1058 uw_thread_ops
.to_shortname
= "unixware-threads";
1059 uw_thread_ops
.to_longname
= "UnixWare threads and pthread.";
1060 uw_thread_ops
.to_doc
= "UnixWare threads and pthread support.";
1061 uw_thread_ops
.to_attach
= uw_thread_attach
;
1062 uw_thread_ops
.to_detach
= uw_thread_detach
;
1063 uw_thread_ops
.to_resume
= uw_thread_resume
;
1064 uw_thread_ops
.to_wait
= uw_thread_wait
;
1065 uw_thread_ops
.to_fetch_registers
= uw_thread_fetch_registers
;
1066 uw_thread_ops
.to_store_registers
= uw_thread_store_registers
;
1067 uw_thread_ops
.to_prepare_to_store
= uw_thread_prepare_to_store
;
1068 uw_thread_ops
.to_create_inferior
= uw_thread_create_inferior
;
1069 uw_thread_ops
.to_kill
= uw_thread_kill
;
1070 uw_thread_ops
.to_mourn_inferior
= uw_thread_mourn_inferior
;
1071 uw_thread_ops
.to_can_run
= uw_thread_can_run
;
1072 uw_thread_ops
.to_thread_alive
= uw_thread_alive
;
1073 uw_thread_ops
.to_find_new_threads
= uw_thread_find_new_threads
;
1074 uw_thread_ops
.to_pid_to_str
= uw_thread_pid_to_str
;
1075 uw_thread_ops
.to_extra_thread_info
= uw_extra_thread_info
;
1076 uw_thread_ops
.to_stratum
= thread_stratum
;
1077 uw_thread_ops
.to_magic
= OPS_MAGIC
;
1081 * Module startup initialization function, automagically called by
1085 _initialize_uw_thread (void)
1087 init_uw_thread_ops ();
1088 add_target (&uw_thread_ops
);
1090 procfs_suppress_run
= 1;
1092 /* Notice when libthread.so gets loaded. */
1093 target_new_objfile_chain
= target_new_objfile_hook
;
1094 target_new_objfile_hook
= uw_thread_new_objfile
;