1: /* Globally enable events.
    2:    Copyright (C) 1999,2001,2002,2003,2004 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, write to the Free
   18:    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
   19:    02111-1307 USA.  */
   20: 
   21: #include "thread_dbP.h"
   22: 
   23: 
   24: td_err_e
   25: td_ta_set_event (ta_arg, event)
   26:      const td_thragent_t *ta_arg;
   27:      td_thr_events_t *event;
   28: {
   29:   td_thragent_t *const ta = (td_thragent_t *) ta_arg;
   30:   td_err_e err;
   31:   psaddr_t eventmask = 0;
   32:   void *copy = NULL;
   33: 
   34:   LOG ("td_ta_set_event");
   35: 
   36:   /* Test whether the TA parameter is ok.  */
   37:   if (! ta_ok (ta))
   38:     return TD_BADTA;
   39: 
   40:   /* Fetch the old event mask from the inferior and modify it in place.  */
   41:   err = DB_GET_SYMBOL (eventmask, ta, __nptl_threads_events);
   42:   if (err == TD_OK)
   43:     err = DB_GET_STRUCT (copy, ta, eventmask, td_thr_events_t);
   44:   if (err == TD_OK)
   45:     {
   46:       uint32_t idx;
   47:       for (idx = 0; idx < TD_EVENTSIZE; ++idx)
   48:         {
   49:           psaddr_t word;
   50:           uint32_t mask;
   51:           err = DB_GET_FIELD_LOCAL (word, ta, copy,
   52:                                     td_thr_events_t, event_bits, idx);
   53:           if (err != TD_OK)
   54:             break;
   55:           mask = (uintptr_t) word;
   56:           mask |= event->event_bits[idx];
   57:           word = (psaddr_t) (uintptr_t) mask;
   58:           err = DB_PUT_FIELD_LOCAL (ta, copy,
   59:                                     td_thr_events_t, event_bits, idx, word);
   60:           if (err != TD_OK)
   61:             break;
   62:         }
   63:       if (err == TD_NOAPLIC)
   64:         {
   65:           err = TD_OK;
   66:           while (idx < TD_EVENTSIZE)
   67:             if (event->event_bits[idx++] != 0)
   68:               {
   69:                 err = TD_NOEVENT;
   70:                 break;
   71:               }
   72:         }
   73:       if (err == TD_OK)
   74:         /* Now write it back to the inferior.  */
   75:         err = DB_PUT_STRUCT (ta, eventmask, td_thr_events_t, copy);
   76:     }
   77: 
   78:   return err;
   79: }