1 /* Get thread information.
2 Copyright (C) 1999-2021 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@redhat.com>, 1999.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <https://www.gnu.org/licenses/>. */
23 #include "thread_dbP.h"
27 td_thr_get_info (const td_thrhandle_t
*th
, td_thrinfo_t
*infop
)
31 psaddr_t tls
, schedpolicy
, schedprio
, cancelhandling
, tid
, report_events
;
33 LOG ("td_thr_get_info");
35 if (th
->th_unique
== 0)
37 /* Special case for the main thread before initialization. */
41 schedpolicy
= SCHED_OTHER
;
45 /* Ignore errors to obtain the __nptl_initial_report_events
46 value because GDB no longer uses the events interface, and
47 other libthread_db consumers hopefully can handle different
48 libpthread/lds.o load orders. */
50 (void) DB_GET_VALUE (report_events
, th
->th_ta_p
,
51 __nptl_initial_report_events
, 0);
56 /* Copy the whole descriptor in once so we can access the several
57 fields locally. Excess copying in one go is much better than
58 multiple ps_pdread calls. */
59 err
= DB_GET_STRUCT (copy
, th
->th_ta_p
, th
->th_unique
, pthread
);
63 err
= DB_GET_FIELD_ADDRESS (tls
, th
->th_ta_p
, th
->th_unique
,
64 pthread
, specific
, 0);
68 err
= DB_GET_FIELD_LOCAL (schedpolicy
, th
->th_ta_p
, copy
, pthread
,
72 err
= DB_GET_FIELD_LOCAL (schedprio
, th
->th_ta_p
, copy
, pthread
,
73 schedparam_sched_priority
, 0);
76 err
= DB_GET_FIELD_LOCAL (tid
, th
->th_ta_p
, copy
, pthread
, tid
, 0);
79 err
= DB_GET_FIELD_LOCAL (cancelhandling
, th
->th_ta_p
, copy
, pthread
,
83 err
= DB_GET_FIELD_LOCAL (report_events
, th
->th_ta_p
, copy
, pthread
,
89 /* Fill in information. Clear first to provide reproducable
90 results for the fields we do not fill in. */
91 memset (infop
, '\0', sizeof (td_thrinfo_t
));
93 infop
->ti_tid
= (thread_t
) th
->th_unique
;
94 infop
->ti_tls
= (char *) tls
;
95 infop
->ti_pri
= ((uintptr_t) schedpolicy
== SCHED_OTHER
96 ? 0 : (uintptr_t) schedprio
);
97 infop
->ti_type
= TD_THR_USER
;
99 if ((((int) (uintptr_t) cancelhandling
) & EXITING_BITMASK
) == 0)
100 /* XXX For now there is no way to get more information. */
101 infop
->ti_state
= TD_THR_ACTIVE
;
102 else if ((((int) (uintptr_t) cancelhandling
) & TERMINATED_BITMASK
) == 0)
103 infop
->ti_state
= TD_THR_ZOMBIE
;
105 infop
->ti_state
= TD_THR_UNKNOWN
;
107 /* Initialization which are the same in both cases. */
108 infop
->ti_ta_p
= th
->th_ta_p
;
109 infop
->ti_lid
= tid
== 0 ? ps_getpid (th
->th_ta_p
->ph
) : (uintptr_t) tid
;
110 infop
->ti_traceme
= report_events
!= 0;
113 err
= DB_GET_FIELD_LOCAL (infop
->ti_startfunc
, th
->th_ta_p
, copy
, pthread
,
115 if (copy
!= NULL
&& err
== TD_OK
)
118 for (idx
= 0; idx
< TD_EVENTSIZE
; ++idx
)
121 err
= DB_GET_FIELD_LOCAL (word
, th
->th_ta_p
, copy
, pthread
,
122 eventbuf_eventmask_event_bits
, idx
);
125 infop
->ti_events
.event_bits
[idx
] = (uintptr_t) word
;
127 if (err
== TD_NOAPLIC
)
128 memset (&infop
->ti_events
.event_bits
[idx
], 0,
129 (TD_EVENTSIZE
- idx
) * sizeof infop
->ti_events
.event_bits
[0]);