Home | History | Annotate | Line # | Download | only in common
linux_sched.c revision 1.11
      1 /*	$NetBSD: linux_sched.c,v 1.11 2002/12/22 00:00:22 gmcgarry Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1999 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
      9  * NASA Ames Research Center; by Matthias Scheler.
     10  *
     11  * Redistribution and use in source and binary forms, with or without
     12  * modification, are permitted provided that the following conditions
     13  * are met:
     14  * 1. Redistributions of source code must retain the above copyright
     15  *    notice, this list of conditions and the following disclaimer.
     16  * 2. Redistributions in binary form must reproduce the above copyright
     17  *    notice, this list of conditions and the following disclaimer in the
     18  *    documentation and/or other materials provided with the distribution.
     19  * 3. All advertising materials mentioning features or use of this software
     20  *    must display the following acknowledgement:
     21  *	This product includes software developed by the NetBSD
     22  *	Foundation, Inc. and its contributors.
     23  * 4. Neither the name of The NetBSD Foundation nor the names of its
     24  *    contributors may be used to endorse or promote products derived
     25  *    from this software without specific prior written permission.
     26  *
     27  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     28  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     29  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     30  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     31  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     32  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     33  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     34  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     35  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     36  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     37  * POSSIBILITY OF SUCH DAMAGE.
     38  */
     39 
     40 /*
     41  * Linux compatibility module. Try to deal with scheduler related syscalls.
     42  */
     43 
     44 #include <sys/cdefs.h>
     45 __KERNEL_RCSID(0, "$NetBSD: linux_sched.c,v 1.11 2002/12/22 00:00:22 gmcgarry Exp $");
     46 
     47 #include <sys/param.h>
     48 #include <sys/mount.h>
     49 #include <sys/proc.h>
     50 #include <sys/systm.h>
     51 #include <sys/syscallargs.h>
     52 
     53 #include <machine/cpu.h>
     54 
     55 #include <compat/linux/common/linux_types.h>
     56 #include <compat/linux/common/linux_signal.h>
     57 
     58 #include <compat/linux/linux_syscallargs.h>
     59 
     60 #include <compat/linux/common/linux_sched.h>
     61 
     62 int
     63 linux_sys_clone(p, v, retval)
     64 	struct proc *p;
     65 	void *v;
     66 	register_t *retval;
     67 {
     68 	struct linux_sys_clone_args /* {
     69 		syscallarg(int) flags;
     70 		syscallarg(void *) stack;
     71 	} */ *uap = v;
     72 	int flags, sig;
     73 
     74 	/*
     75 	 * We don't support the Linux CLONE_PID or CLONE_PTRACE flags.
     76 	 */
     77 	if (SCARG(uap, flags) & (LINUX_CLONE_PID|LINUX_CLONE_PTRACE))
     78 		return (EINVAL);
     79 
     80 	flags = 0;
     81 
     82 	if (SCARG(uap, flags) & LINUX_CLONE_VM)
     83 		flags |= FORK_SHAREVM;
     84 	if (SCARG(uap, flags) & LINUX_CLONE_FS)
     85 		flags |= FORK_SHARECWD;
     86 	if (SCARG(uap, flags) & LINUX_CLONE_FILES)
     87 		flags |= FORK_SHAREFILES;
     88 	if (SCARG(uap, flags) & LINUX_CLONE_SIGHAND)
     89 		flags |= FORK_SHARESIGS;
     90 	if (SCARG(uap, flags) & LINUX_CLONE_VFORK)
     91 		flags |= FORK_PPWAIT;
     92 
     93 	sig = SCARG(uap, flags) & LINUX_CLONE_CSIGNAL;
     94 	if (sig < 0 || sig >= LINUX__NSIG)
     95 		return (EINVAL);
     96 	sig = linux_to_native_signo[sig];
     97 
     98 	/*
     99 	 * Note that Linux does not provide a portable way of specifying
    100 	 * the stack area; the caller must know if the stack grows up
    101 	 * or down.  So, we pass a stack size of 0, so that the code
    102 	 * that makes this adjustment is a noop.
    103 	 */
    104 	return (fork1(p, flags, sig, SCARG(uap, stack), 0,
    105 	    NULL, NULL, retval, NULL));
    106 }
    107 
    108 int
    109 linux_sys_sched_setparam(cp, v, retval)
    110 	struct proc *cp;
    111 	void *v;
    112 	register_t *retval;
    113 {
    114 	struct linux_sys_sched_setparam_args /* {
    115 		syscallarg(linux_pid_t) pid;
    116 		syscallarg(const struct linux_sched_param *) sp;
    117 	} */ *uap = v;
    118 	int error;
    119 	struct linux_sched_param lp;
    120 	struct proc *p;
    121 
    122 /*
    123  * We only check for valid parameters and return afterwards.
    124  */
    125 
    126 	if (SCARG(uap, pid) < 0 || SCARG(uap, sp) == NULL)
    127 		return EINVAL;
    128 
    129 	error = copyin(SCARG(uap, sp), &lp, sizeof(lp));
    130 	if (error)
    131 		return error;
    132 
    133 	if (SCARG(uap, pid) != 0) {
    134 		struct pcred *pc = cp->p_cred;
    135 
    136 		if ((p = pfind(SCARG(uap, pid))) == NULL)
    137 			return ESRCH;
    138 		if (!(cp == p ||
    139 		      pc->pc_ucred->cr_uid == 0 ||
    140 		      pc->p_ruid == p->p_cred->p_ruid ||
    141 		      pc->pc_ucred->cr_uid == p->p_cred->p_ruid ||
    142 		      pc->p_ruid == p->p_ucred->cr_uid ||
    143 		      pc->pc_ucred->cr_uid == p->p_ucred->cr_uid))
    144 			return EPERM;
    145 	}
    146 
    147 	return 0;
    148 }
    149 
    150 int
    151 linux_sys_sched_getparam(cp, v, retval)
    152 	struct proc *cp;
    153 	void *v;
    154 	register_t *retval;
    155 {
    156 	struct linux_sys_sched_getparam_args /* {
    157 		syscallarg(linux_pid_t) pid;
    158 		syscallarg(struct linux_sched_param *) sp;
    159 	} */ *uap = v;
    160 	struct proc *p;
    161 	struct linux_sched_param lp;
    162 
    163 /*
    164  * We only check for valid parameters and return a dummy priority afterwards.
    165  */
    166 	if (SCARG(uap, pid) < 0 || SCARG(uap, sp) == NULL)
    167 		return EINVAL;
    168 
    169 	if (SCARG(uap, pid) != 0) {
    170 		struct pcred *pc = cp->p_cred;
    171 
    172 		if ((p = pfind(SCARG(uap, pid))) == NULL)
    173 			return ESRCH;
    174 		if (!(cp == p ||
    175 		      pc->pc_ucred->cr_uid == 0 ||
    176 		      pc->p_ruid == p->p_cred->p_ruid ||
    177 		      pc->pc_ucred->cr_uid == p->p_cred->p_ruid ||
    178 		      pc->p_ruid == p->p_ucred->cr_uid ||
    179 		      pc->pc_ucred->cr_uid == p->p_ucred->cr_uid))
    180 			return EPERM;
    181 	}
    182 
    183 	lp.sched_priority = 0;
    184 	return copyout(&lp, SCARG(uap, sp), sizeof(lp));
    185 }
    186 
    187 int
    188 linux_sys_sched_setscheduler(cp, v, retval)
    189 	struct proc *cp;
    190 	void *v;
    191 	register_t *retval;
    192 {
    193 	struct linux_sys_sched_setscheduler_args /* {
    194 		syscallarg(linux_pid_t) pid;
    195 		syscallarg(int) policy;
    196 		syscallarg(cont struct linux_sched_scheduler *) sp;
    197 	} */ *uap = v;
    198 	int error;
    199 	struct linux_sched_param lp;
    200 	struct proc *p;
    201 
    202 /*
    203  * We only check for valid parameters and return afterwards.
    204  */
    205 
    206 	if (SCARG(uap, pid) < 0 || SCARG(uap, sp) == NULL)
    207 		return EINVAL;
    208 
    209 	error = copyin(SCARG(uap, sp), &lp, sizeof(lp));
    210 	if (error)
    211 		return error;
    212 
    213 	if (SCARG(uap, pid) != 0) {
    214 		struct pcred *pc = cp->p_cred;
    215 
    216 		if ((p = pfind(SCARG(uap, pid))) == NULL)
    217 			return ESRCH;
    218 		if (!(cp == p ||
    219 		      pc->pc_ucred->cr_uid == 0 ||
    220 		      pc->p_ruid == p->p_cred->p_ruid ||
    221 		      pc->pc_ucred->cr_uid == p->p_cred->p_ruid ||
    222 		      pc->p_ruid == p->p_ucred->cr_uid ||
    223 		      pc->pc_ucred->cr_uid == p->p_ucred->cr_uid))
    224 			return EPERM;
    225 	}
    226 
    227 /*
    228  * We can't emulate anything put the default scheduling policy.
    229  */
    230 	if (SCARG(uap, policy) != LINUX_SCHED_OTHER || lp.sched_priority != 0)
    231 		return EINVAL;
    232 
    233 	return 0;
    234 }
    235 
    236 int
    237 linux_sys_sched_getscheduler(cp, v, retval)
    238 	struct proc *cp;
    239 	void *v;
    240 	register_t *retval;
    241 {
    242 	struct linux_sys_sched_getscheduler_args /* {
    243 		syscallarg(linux_pid_t) pid;
    244 	} */ *uap = v;
    245 	struct proc *p;
    246 
    247 	*retval = -1;
    248 /*
    249  * We only check for valid parameters and return afterwards.
    250  */
    251 
    252 	if (SCARG(uap, pid) != 0) {
    253 		struct pcred *pc = cp->p_cred;
    254 
    255 		if ((p = pfind(SCARG(uap, pid))) == NULL)
    256 			return ESRCH;
    257 		if (!(cp == p ||
    258 		      pc->pc_ucred->cr_uid == 0 ||
    259 		      pc->p_ruid == p->p_cred->p_ruid ||
    260 		      pc->pc_ucred->cr_uid == p->p_cred->p_ruid ||
    261 		      pc->p_ruid == p->p_ucred->cr_uid ||
    262 		      pc->pc_ucred->cr_uid == p->p_ucred->cr_uid))
    263 			return EPERM;
    264 	}
    265 
    266 /*
    267  * We can't emulate anything put the default scheduling policy.
    268  */
    269 	*retval = LINUX_SCHED_OTHER;
    270 	return 0;
    271 }
    272 
    273 int
    274 linux_sys_sched_yield(cp, v, retval)
    275 	struct proc *cp;
    276 	void *v;
    277 	register_t *retval;
    278 {
    279 
    280 	yield();
    281 	return 0;
    282 }
    283 
    284 int
    285 linux_sys_sched_get_priority_max(cp, v, retval)
    286 	struct proc *cp;
    287 	void *v;
    288 	register_t *retval;
    289 {
    290 	struct linux_sys_sched_get_priority_max_args /* {
    291 		syscallarg(int) policy;
    292 	} */ *uap = v;
    293 
    294 /*
    295  * We can't emulate anything put the default scheduling policy.
    296  */
    297 	if (SCARG(uap, policy) != LINUX_SCHED_OTHER) {
    298 		*retval = -1;
    299 		return EINVAL;
    300 	}
    301 
    302 	*retval = 0;
    303 	return 0;
    304 }
    305 
    306 int
    307 linux_sys_sched_get_priority_min(cp, v, retval)
    308 	struct proc *cp;
    309 	void *v;
    310 	register_t *retval;
    311 {
    312 	struct linux_sys_sched_get_priority_min_args /* {
    313 		syscallarg(int) policy;
    314 	} */ *uap = v;
    315 
    316 /*
    317  * We can't emulate anything put the default scheduling policy.
    318  */
    319 	if (SCARG(uap, policy) != LINUX_SCHED_OTHER) {
    320 		*retval = -1;
    321 		return EINVAL;
    322 	}
    323 
    324 	*retval = 0;
    325 	return 0;
    326 }
    327