1  /* Globally disable events.
       2     Copyright (C) 1999-2023 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 <stdint.h>
      20  #include "thread_dbP.h"
      21  
      22  
      23  td_err_e
      24  td_ta_clear_event (const td_thragent_t *ta_arg, td_thr_events_t *event)
      25  {
      26    td_thragent_t *const ta = (td_thragent_t *) ta_arg;
      27    td_err_e err;
      28    psaddr_t eventmask = 0;
      29    void *copy = NULL;
      30  
      31    LOG ("td_ta_clear_event");
      32  
      33    /* Test whether the TA parameter is ok.  */
      34    if (! ta_ok (ta))
      35      return TD_BADTA;
      36  
      37    /* Fetch the old event mask from the inferior and modify it in place.  */
      38    err = DB_GET_SYMBOL (eventmask, ta, __nptl_threads_events);
      39    if (err == TD_OK)
      40      err = DB_GET_STRUCT (copy, ta, 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, ta, 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 (ta, 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 (ta, eventmask, td_thr_events_t, copy);
      73      }
      74  
      75    return err;
      76  }