1 /* Enable specific event for thread.
2 Copyright (C) 1999-2022 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
18
19 #include <stddef.h>
20 #include <stdint.h>
21
22 #include "thread_dbP.h"
23
24
25 td_err_e
td_thr_set_event(const td_thrhandle_t * th,td_thr_events_t * event)26 td_thr_set_event (const td_thrhandle_t *th, td_thr_events_t *event)
27 {
28 td_err_e err;
29 psaddr_t eventmask;
30 void *copy;
31
32 LOG ("td_thr_set_event");
33
34 /* Fetch the old event mask from the inferior and modify it in place. */
35 err = DB_GET_FIELD_ADDRESS (eventmask, th->th_ta_p,
36 th->th_unique, pthread, eventbuf_eventmask, 0);
37 if (err == TD_OK)
38 err = DB_GET_STRUCT (copy, th->th_ta_p, eventmask, td_thr_events_t);
39 if (err == TD_OK)
40 {
41 uint32_t idx;
42 for (idx = 0; idx < TD_EVENTSIZE; ++idx)
43 {
44 psaddr_t word;
45 uint32_t mask;
46 err = DB_GET_FIELD_LOCAL (word, th->th_ta_p, copy,
47 td_thr_events_t, event_bits, idx);
48 if (err != TD_OK)
49 break;
50 mask = (uintptr_t) word;
51 mask |= event->event_bits[idx];
52 word = (psaddr_t) (uintptr_t) mask;
53 err = DB_PUT_FIELD_LOCAL (th->th_ta_p, copy,
54 td_thr_events_t, event_bits, idx, word);
55 if (err != TD_OK)
56 break;
57 }
58 if (err == TD_NOAPLIC)
59 {
60 err = TD_OK;
61 while (idx < TD_EVENTSIZE)
62 if (event->event_bits[idx++] != 0)
63 {
64 err = TD_NOEVENT;
65 break;
66 }
67 }
68 if (err == TD_OK)
69 /* Now write it back to the inferior. */
70 err = DB_PUT_STRUCT (th->th_ta_p, eventmask, td_thr_events_t, copy);
71 }
72
73 return err;
74 }
75