lib/libkse/thread/thr_sigsuspend.c

   1 /*
   2  * Copyright (c) 1995 John Birrell <jb@cimlogic.com.au>.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. Neither the name of the author nor the names of any co-contributors
  14  *    may be used to endorse or promote products derived from this software
  15  *    without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY JOHN BIRRELL AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  *
  29  * $FreeBSD$
  30  */
  31
  32 #include <sys/types.h>
  33 #include <sys/signalvar.h>
  34 #include <errno.h>
  35 #include <pthread.h>
  36 #include <signal.h>
  37 #include <string.h>
  38
  39 #include "thr_private.h"
  40
  41 LT10_COMPAT_PRIVATE(__sigsuspend);
  42 LT10_COMPAT_PRIVATE(_sigsuspend);
  43 LT10_COMPAT_DEFAULT(sigsuspend);
  44
  45 __weak_reference(__sigsuspend, sigsuspend);
  46
  47 int
  48 _sigsuspend(const sigset_t *set)
  49 {
  50         struct pthread  *curthread = _get_curthread();
  51         sigset_t        oldmask, newmask, tempset;
  52         int             ret = -1;
  53
  54         if (curthread->attr.flags & PTHREAD_SCOPE_SYSTEM)
  55                 return (__sys_sigsuspend(set));
  56
  57         /* Check if a new signal set was provided by the caller: */
  58         if (set != NULL) {
  59                 newmask = *set;
  60                 SIG_CANTMASK(newmask);
  61                 THR_LOCK_SWITCH(curthread);
  62
  63                 /* Save current sigmask: */
  64                 oldmask = curthread->sigmask;
  65                 curthread->oldsigmask = &oldmask;
  66
  67                 /* Change the caller's mask: */
  68                 curthread->sigmask = newmask;
  69                 tempset = curthread->sigpend;
  70                 SIGSETNAND(tempset, newmask);
  71                 if (SIGISEMPTY(tempset)) {
  72                         THR_SET_STATE(curthread, PS_SIGSUSPEND);
  73                         /* Wait for a signal: */
  74                         _thr_sched_switch_unlocked(curthread);
  75                 } else {
  76                         curthread->check_pending = 1;
  77                         THR_UNLOCK_SWITCH(curthread);
  78                         /* check pending signal I can handle: */
  79                         _thr_sig_check_pending(curthread);
  80                 }
  81                 if ((curthread->cancelflags & THR_CANCELLING) != 0)
  82                         curthread->oldsigmask = NULL;
  83                 else {
  84                         THR_ASSERT(curthread->oldsigmask == NULL,
  85                                   "oldsigmask is not cleared");
  86                 }
  87
  88                 /* Always return an interrupted error: */
  89                 errno = EINTR;
  90         } else {
  91                 /* Return an invalid argument error: */
  92                 errno = EINVAL;
  93         }
  94
  95         /* Return the completion status: */
  96         return (ret);
  97 }
  98
  99 int
 100 __sigsuspend(const sigset_t * set)
 101 {
 102         struct pthread *curthread = _get_curthread();
 103         int             ret;
 104
 105         _thr_cancel_enter(curthread);
 106         ret = _sigsuspend(set);
 107         _thr_cancel_leave(curthread, 1);
 108
 109         return (ret);
 110 }