Comment on slow compilation of math/test-tgmath2.c
[glibc.git] / nptl_db / td_ta_new.c
blob1c0d942c191e1b5f61af51001d28aa38c022fbd3
1 /* Attach to target process.
2 Copyright (C) 1999,2001,2002,2003 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 <http://www.gnu.org/licenses/>. */
20 #include <stddef.h>
21 #include <stdlib.h>
22 #include <string.h>
23 #include <version.h>
25 #include "thread_dbP.h"
28 /* Datatype for the list of known thread agents. Normally there will
29 be exactly one so we don't spend much though on making it fast. */
30 LIST_HEAD (__td_agent_list);
33 td_err_e
34 td_ta_new (struct ps_prochandle *ps, td_thragent_t **ta)
36 psaddr_t versaddr;
37 char versbuf[sizeof (VERSION)];
39 LOG ("td_ta_new");
41 /* Check whether the versions match. */
42 if (td_lookup (ps, SYM_nptl_version, &versaddr) != PS_OK)
43 return TD_NOLIBTHREAD;
44 if (ps_pdread (ps, versaddr, versbuf, sizeof (versbuf)) != PS_OK)
45 return TD_ERR;
47 if (memcmp (versbuf, VERSION, sizeof VERSION) != 0)
48 /* Not the right version. */
49 return TD_VERSION;
51 /* Fill in the appropriate information. */
52 *ta = (td_thragent_t *) calloc (1, sizeof (td_thragent_t));
53 if (*ta == NULL)
54 return TD_MALLOC;
56 /* Store the proc handle which we will pass to the callback functions
57 back into the debugger. */
58 (*ta)->ph = ps;
60 /* Now add the new agent descriptor to the list. */
61 list_add (&(*ta)->list, &__td_agent_list);
63 return TD_OK;