1 /* 2 * 3 * Portions of this code was derived from the file kern_fork.c and as such 4 * is subject to the copyrights below. 5 * 6 * Copyright (c) 1982, 1986, 1989, 1991, 1993 7 * The Regents of the University of California. All rights reserved. 8 * (c) UNIX System Laboratories, Inc. 9 * All or some portions of this file are derived from material licensed 10 * to the University of California by American Telephone and Telegraph 11 * Co. or Unix System Laboratories, Inc. and are reproduced herein with 12 * the permission of UNIX System Laboratories, Inc. 13 * 14 * Redistribution and use in source and binary forms, with or without 15 * modification, are permitted provided that the following conditions 16 * are met: 17 * 1. Redistributions of source code must retain the above copyright 18 * notice, this list of conditions and the following disclaimer. 19 * 2. Redistributions in binary form must reproduce the above copyright 20 * notice, this list of conditions and the following disclaimer in the 21 * documentation and/or other materials provided with the distribution. 22 * 3. All advertising materials mentioning features or use of this software 23 * must display the following acknowledgement: 24 * This product includes software developed by the University of 25 * California, Berkeley and its contributors. 26 * 4. Neither the name of the University nor the names of its contributors 27 * may be used to endorse or promote products derived from this software 28 * without specific prior written permission. 29 * 30 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 31 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 32 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 33 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 34 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 35 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 36 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 37 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 38 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 39 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 40 * SUCH DAMAGE. 41 * 42 * Copyright (c) 1996 Douglas Santry 43 * 44 * This code is subject to the beer copyright. If I chance to meet you in a 45 * bar and this code helped you in some way, you owe me a beer. Only 46 * in Germany will I accept domestic beer. This code may or may not work 47 * and I certainly make no claims as to its fitness for *any* purpose. 48 * 49 * $FreeBSD: src/sys/kern/kern_threads.c,v 1.15 1999/08/28 00:46:15 peter Exp $ 50 * $DragonFly: src/sys/kern/kern_threads.c,v 1.2 2003/06/17 04:28:41 dillon Exp $ 51 */ 52 53 #include <sys/param.h> 54 #include <sys/systm.h> 55 #include <sys/kernel.h> 56 #include <sys/proc.h> 57 #include <sys/resourcevar.h> 58 #include <sys/sysproto.h> 59 60 /* 61 * Low level support for sleep/wakeup paradigm 62 * If a timeout is specified: 63 * returns 0 if wakeup 64 * returns EAGAIN if timed out 65 * returns EINVAL if error 66 * 67 * If a timeout is not specified: 68 * 69 * returns time waiting in ticks. 70 */ 71 int 72 thr_sleep(struct proc *p, struct thr_sleep_args *uap) { 73 int sleepstart; 74 struct timespec ts; 75 struct timeval atv; 76 int error, timo; 77 78 timo = 0; 79 if (uap->timeout != 0) { 80 /* 81 * Get timespec struct 82 */ 83 if ((error = copyin(uap->timeout, &ts, sizeof(ts))) != 0) { 84 p->p_wakeup = 0; 85 return error; 86 } 87 if (ts.tv_nsec < 0 || ts.tv_nsec >= 1000000000) { 88 p->p_wakeup = 0; 89 return (EINVAL); 90 } 91 TIMESPEC_TO_TIMEVAL(&atv, &ts); 92 if (itimerfix(&atv)) { 93 p->p_wakeup = 0; 94 return (EINVAL); 95 } 96 timo = tvtohz(&atv); 97 } 98 99 p->p_retval[0] = 0; 100 if (p->p_wakeup == 0) { 101 sleepstart = ticks; 102 p->p_flag |= P_SINTR; 103 error = tsleep(p, PRIBIO, "thrslp", timo); 104 p->p_flag &= ~P_SINTR; 105 if (error == EWOULDBLOCK) { 106 p->p_wakeup = 0; 107 p->p_retval[0] = EAGAIN; 108 return 0; 109 } 110 if (uap->timeout == 0) 111 p->p_retval[0] = ticks - sleepstart; 112 } 113 p->p_wakeup = 0; 114 return (0); 115 } 116 117 int 118 thr_wakeup(struct proc *p, struct thr_wakeup_args *uap) { 119 struct proc *pSlave = p->p_leader; 120 121 while(pSlave && (pSlave->p_pid != uap->pid)) 122 pSlave = pSlave->p_peers; 123 124 if(pSlave == 0) { 125 p->p_retval[0] = ESRCH; 126 return(0); 127 } 128 129 pSlave->p_wakeup++; 130 if((pSlave->p_stat == SSLEEP) && (pSlave->p_wchan == pSlave)) { 131 wakeup(pSlave); 132 return(0); 133 } 134 135 p->p_retval[0] = EAGAIN; 136 return 0; 137 } 138 139 /* 140 * General purpose yield system call 141 */ 142 int 143 yield(struct proc *p, struct yield_args *uap) { 144 int s; 145 146 p->p_retval[0] = 0; 147 148 s = splhigh(); 149 p->p_priority = MAXPRI; 150 setrunqueue(p); 151 p->p_stats->p_ru.ru_nvcsw++; 152 mi_switch(); 153 splx(s); 154 155 return(0); 156 } 157 158