Update Sparc ULPs.
[platform/upstream/glibc.git] / nptl_db / td_thr_clear_event.c
1 /* Disable specific event for thread.
2    Copyright (C) 1999-2013 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4    Contributed by Ulrich Drepper <drepper@redhat.com>, 1999.
5
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.
10
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.
15
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/>.  */
19
20 #include <stddef.h>
21
22 #include "thread_dbP.h"
23
24
25 td_err_e
26 td_thr_clear_event (th, event)
27      const td_thrhandle_t *th;
28      td_thr_events_t *event;
29 {
30   td_err_e err;
31   psaddr_t eventmask;
32   void *copy;
33
34   LOG ("td_thr_clear_event");
35
36   /* Fetch the old event mask from the inferior and modify it in place.  */
37   err = DB_GET_FIELD_ADDRESS (eventmask, th->th_ta_p,
38                               th->th_unique, pthread, eventbuf_eventmask, 0);
39   if (err == TD_OK)
40     err = DB_GET_STRUCT (copy, th->th_ta_p, eventmask, td_thr_events_t);
41   if (err == TD_OK)
42     {
43       uint32_t idx;
44       for (idx = 0; idx < TD_EVENTSIZE; ++idx)
45         {
46           psaddr_t word;
47           uint32_t mask;
48           err = DB_GET_FIELD_LOCAL (word, th->th_ta_p, copy,
49                                     td_thr_events_t, event_bits, idx);
50           if (err != TD_OK)
51             break;
52           mask = (uintptr_t) word;
53           mask &= ~event->event_bits[idx];
54           word = (psaddr_t) (uintptr_t) mask;
55           err = DB_PUT_FIELD_LOCAL (th->th_ta_p, copy,
56                                     td_thr_events_t, event_bits, idx, word);
57           if (err != TD_OK)
58             break;
59         }
60       if (err == TD_NOAPLIC)
61         {
62           err = TD_OK;
63           while (idx < TD_EVENTSIZE)
64             if (event->event_bits[idx++] != 0)
65               {
66                 err = TD_NOEVENT;
67                 break;
68               }
69         }
70       if (err == TD_OK)
71         /* Now write it back to the inferior.  */
72         err = DB_PUT_STRUCT (th->th_ta_p, eventmask, td_thr_events_t, copy);
73     }
74
75   return err;
76 }