1 /* 2 * Copyright (c) 2004 David Xu <davidxu@freebsd.org> 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 */ 26 27 #include <sys/cdefs.h> 28 __FBSDID("$FreeBSD$"); 29 30 #include <proc_service.h> 31 #include <stddef.h> 32 #include <thread_db.h> 33 #include <unistd.h> 34 35 #include "thread_db_int.h" 36 37 struct td_thragent 38 { 39 TD_THRAGENT_FIELDS; 40 }; 41 42 static TAILQ_HEAD(, td_thragent) proclist = TAILQ_HEAD_INITIALIZER(proclist); 43 44 extern struct ta_ops libpthread_db_ops; 45 extern struct ta_ops libthr_db_ops; 46 47 static struct ta_ops *ops[] = { 48 &libpthread_db_ops, 49 &libthr_db_ops, 50 }; 51 52 td_err_e 53 td_init(void) 54 { 55 td_err_e ret, tmp; 56 size_t i; 57 58 ret = 0; 59 for (i = 0; i < sizeof(ops)/sizeof(ops[0]); i++) { 60 if (ops[i]->to_init != NULL) { 61 tmp = ops[i]->to_init(); 62 if (tmp != TD_OK) 63 ret = tmp; 64 } 65 } 66 return (ret); 67 } 68 69 td_err_e 70 td_ta_clear_event(const td_thragent_t *ta, td_thr_events_t *events) 71 { 72 return (ta->ta_ops->to_ta_clear_event(ta, events)); 73 } 74 75 td_err_e 76 td_ta_delete(td_thragent_t *ta) 77 { 78 TAILQ_REMOVE(&proclist, ta, ta_next); 79 return (ta->ta_ops->to_ta_delete(ta)); 80 } 81 82 td_err_e 83 td_ta_event_addr(const td_thragent_t *ta, td_event_e event, td_notify_t *ptr) 84 { 85 return (ta->ta_ops->to_ta_event_addr(ta, event, ptr)); 86 } 87 88 td_err_e 89 td_ta_event_getmsg(const td_thragent_t *ta, td_event_msg_t *msg) 90 { 91 return (ta->ta_ops->to_ta_event_getmsg(ta, msg)); 92 } 93 94 td_err_e 95 td_ta_map_id2thr(const td_thragent_t *ta, thread_t id, td_thrhandle_t *th) 96 { 97 return (ta->ta_ops->to_ta_map_id2thr(ta, id, th)); 98 } 99 100 td_err_e 101 td_ta_map_lwp2thr(const td_thragent_t *ta, lwpid_t lwpid, td_thrhandle_t *th) 102 { 103 return (ta->ta_ops->to_ta_map_lwp2thr(ta, lwpid, th)); 104 } 105 106 td_err_e 107 td_ta_new(struct ps_prochandle *ph, td_thragent_t **pta) 108 { 109 size_t i; 110 111 for (i = 0; i < sizeof(ops)/sizeof(ops[0]); ++i) { 112 if (ops[i]->to_ta_new(ph, pta) == TD_OK) { 113 TAILQ_INSERT_HEAD(&proclist, *pta, ta_next); 114 (*pta)->ta_ops = ops[i]; 115 return (TD_OK); 116 } 117 } 118 return (TD_NOLIBTHREAD); 119 } 120 121 td_err_e 122 td_ta_set_event(const td_thragent_t *ta, td_thr_events_t *events) 123 { 124 return (ta->ta_ops->to_ta_set_event(ta, events)); 125 } 126 127 td_err_e 128 td_ta_thr_iter(const td_thragent_t *ta, td_thr_iter_f *callback, 129 void *cbdata_p, td_thr_state_e state, int ti_pri, sigset_t *ti_sigmask_p, 130 unsigned int ti_user_flags) 131 { 132 return (ta->ta_ops->to_ta_thr_iter(ta, callback, cbdata_p, state, 133 ti_pri, ti_sigmask_p, ti_user_flags)); 134 } 135 136 td_err_e 137 td_ta_tsd_iter(const td_thragent_t *ta, td_key_iter_f *callback, 138 void *cbdata_p) 139 { 140 return (ta->ta_ops->to_ta_tsd_iter(ta, callback, cbdata_p)); 141 } 142 143 td_err_e 144 td_thr_clear_event(const td_thrhandle_t *th, td_thr_events_t *events) 145 { 146 const td_thragent_t *ta = th->th_ta; 147 return (ta->ta_ops->to_thr_clear_event(th, events)); 148 } 149 150 td_err_e 151 td_thr_dbresume(const td_thrhandle_t *th) 152 { 153 const td_thragent_t *ta = th->th_ta; 154 return (ta->ta_ops->to_thr_dbresume(th)); 155 } 156 157 td_err_e 158 td_thr_dbsuspend(const td_thrhandle_t *th) 159 { 160 const td_thragent_t *ta = th->th_ta; 161 return (ta->ta_ops->to_thr_dbsuspend(th)); 162 } 163 164 td_err_e 165 td_thr_event_enable(const td_thrhandle_t *th, int en) 166 { 167 const td_thragent_t *ta = th->th_ta; 168 return (ta->ta_ops->to_thr_event_enable(th, en)); 169 } 170 171 td_err_e 172 td_thr_event_getmsg(const td_thrhandle_t *th, td_event_msg_t *msg) 173 { 174 const td_thragent_t *ta = th->th_ta; 175 return (ta->ta_ops->to_thr_event_getmsg(th, msg)); 176 } 177 178 td_err_e 179 td_thr_get_info(const td_thrhandle_t *th, td_thrinfo_t *info) 180 { 181 const td_thragent_t *ta = th->th_ta; 182 return (ta->ta_ops->to_thr_get_info(th, info)); 183 } 184 185 #ifdef __i386__ 186 td_err_e 187 td_thr_getxmmregs(const td_thrhandle_t *th, char *fxsave) 188 { 189 const td_thragent_t *ta = th->th_ta; 190 return (ta->ta_ops->to_thr_getxmmregs(th, fxsave)); 191 } 192 #endif 193 194 195 td_err_e 196 td_thr_getfpregs(const td_thrhandle_t *th, prfpregset_t *fpregset) 197 { 198 const td_thragent_t *ta = th->th_ta; 199 return (ta->ta_ops->to_thr_getfpregs(th, fpregset)); 200 } 201 202 td_err_e 203 td_thr_getgregs(const td_thrhandle_t *th, prgregset_t gregs) 204 { 205 const td_thragent_t *ta = th->th_ta; 206 return (ta->ta_ops->to_thr_getgregs(th, gregs)); 207 } 208 209 td_err_e 210 td_thr_set_event(const td_thrhandle_t *th, td_thr_events_t *events) 211 { 212 const td_thragent_t *ta = th->th_ta; 213 return (ta->ta_ops->to_thr_set_event(th, events)); 214 } 215 216 #ifdef __i386__ 217 td_err_e 218 td_thr_setxmmregs(const td_thrhandle_t *th, const char *fxsave) 219 { 220 const td_thragent_t *ta = th->th_ta; 221 return (ta->ta_ops->to_thr_setxmmregs(th, fxsave)); 222 } 223 #endif 224 225 td_err_e 226 td_thr_setfpregs(const td_thrhandle_t *th, const prfpregset_t *fpregs) 227 { 228 const td_thragent_t *ta = th->th_ta; 229 return (ta->ta_ops->to_thr_setfpregs(th, fpregs)); 230 } 231 232 td_err_e 233 td_thr_setgregs(const td_thrhandle_t *th, const prgregset_t gregs) 234 { 235 const td_thragent_t *ta = th->th_ta; 236 return (ta->ta_ops->to_thr_setgregs(th, gregs)); 237 } 238 239 td_err_e 240 td_thr_validate(const td_thrhandle_t *th) 241 { 242 const td_thragent_t *ta = th->th_ta; 243 return (ta->ta_ops->to_thr_validate(th)); 244 } 245 246 td_err_e 247 td_thr_tls_get_addr(const td_thrhandle_t *th, void *linkmap, size_t offset, 248 void **address) 249 { 250 const td_thragent_t *ta = th->th_ta; 251 return (ta->ta_ops->to_thr_tls_get_addr(th, linkmap, offset, address)); 252 } 253 254 /* FreeBSD specific extensions. */ 255 256 td_err_e 257 td_thr_sstep(const td_thrhandle_t *th, int step) 258 { 259 const td_thragent_t *ta = th->th_ta; 260 return (ta->ta_ops->to_thr_sstep(th, step)); 261 } 262