1  /* Enable specific event for thread.
       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 <stddef.h>
      20  #include <stdint.h>
      21  
      22  #include "thread_dbP.h"
      23  
      24  
      25  td_err_e
      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  }