1/*	$NetBSD: freebsd_sched.c,v 1.23 2021/09/07 11:43:03 riastradh 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 *
20 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
21 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
22 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
23 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
24 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30 * POSSIBILITY OF SUCH DAMAGE.
31 */
32
33/*
34 * FreeBSD compatibility module. Try to deal with scheduler related syscalls.
35 */
36
37#include <sys/cdefs.h>
38__KERNEL_RCSID(0, "$NetBSD: freebsd_sched.c,v 1.23 2021/09/07 11:43:03 riastradh Exp $");
39
40#include <sys/param.h>
41#include <sys/mount.h>
42#include <sys/proc.h>
43#include <sys/systm.h>
44#include <sys/syscallargs.h>
45#include <sys/kauth.h>
46
47#include <sys/cpu.h>
48
49#include <compat/freebsd/freebsd_syscallargs.h>
50#include <compat/freebsd/freebsd_sched.h>
51
52int
53freebsd_sys_yield(struct lwp *l, const void *v, register_t *retval)
54{
55
56	yield();
57	return 0;
58}
59
60/*
61 * XXX: Needs adjustment to do a proper conversion.
62 */
63static int
64sched_freebsd2native(int freebsd_policy,
65    const struct freebsd_sched_param *freebsd_params, int *native_policy,
66    struct sched_param *native_params)
67{
68	int p;
69
70	switch (freebsd_policy) {
71	case FREEBSD_SCHED_OTHER:
72		p = SCHED_OTHER;
73		break;
74
75	case FREEBSD_SCHED_FIFO:
76		p = SCHED_FIFO;
77		break;
78
79	case FREEBSD_SCHED_RR:
80		p = SCHED_RR;
81		break;
82
83	default:
84		return EINVAL;
85	}
86
87	if (native_policy != NULL)
88		*native_policy = p;
89
90	if (freebsd_params != NULL && native_params != NULL) {
91		/* XXX: Needs adjustment to do a proper conversion. */
92		native_params->sched_priority = freebsd_params->sched_priority;
93	}
94	return 0;
95}
96
97static int
98sched_native2freebsd(int native_policy, const struct sched_param *native_params,
99    int *freebsd_policy, struct freebsd_sched_param *freebsd_params)
100{
101	int p;
102
103	switch (native_policy) {
104	case SCHED_OTHER:
105		p = FREEBSD_SCHED_OTHER;
106		break;
107
108	case SCHED_FIFO:
109		p = FREEBSD_SCHED_FIFO;
110		break;
111
112	case SCHED_RR:
113		p = FREEBSD_SCHED_RR;
114		break;
115
116	default:
117		return EINVAL;
118	}
119
120	if (freebsd_policy != NULL)
121		*freebsd_policy = p;
122
123	if (native_params != NULL && freebsd_params != NULL) {
124		/* XXX: Needs adjustment to do a proper conversion. */
125		memset(freebsd_params, 0, sizeof(*freebsd_params));
126		freebsd_params->sched_priority = native_params->sched_priority;
127	}
128
129	return 0;
130}
131
132int
133freebsd_sys_sched_setparam(struct lwp *l, const struct freebsd_sys_sched_setparam_args *uap, register_t *retval)
134{
135	/* {
136		syscallarg(pid_t) pid;
137		syscallarg(const struct freebsd_sched_param *) sp;
138	} */
139	int error, policy;
140	struct freebsd_sched_param lp;
141	struct sched_param sp;
142
143	if (SCARG(uap, pid) < 0 || SCARG(uap, sp) == NULL) {
144		error = EINVAL;
145		goto out;
146	}
147
148	error = copyin(SCARG(uap, sp), &lp, sizeof(lp));
149	if (error)
150		goto out;
151
152	/* We need the current policy in FreeBSD terms. */
153	error = do_sched_getparam(SCARG(uap, pid), 0, &policy, NULL);
154	if (error)
155		goto out;
156	error = sched_native2freebsd(policy, NULL, &policy, NULL);
157	if (error)
158		goto out;
159
160	error = sched_freebsd2native(policy, &lp, &policy, &sp);
161	if (error)
162		goto out;
163
164	error = do_sched_setparam(SCARG(uap, pid), 0, policy, &sp);
165	if (error)
166		goto out;
167
168 out:
169	return error;
170}
171
172int
173freebsd_sys_sched_getparam(struct lwp *l, const struct freebsd_sys_sched_getparam_args *uap, register_t *retval)
174{
175	/* {
176		syscallarg(pid_t) pid;
177		syscallarg(struct freebsd_sched_param *) sp;
178	} */
179	struct freebsd_sched_param lp;
180	struct sched_param sp;
181	int error;
182
183	if (SCARG(uap, pid) < 0 || SCARG(uap, sp) == NULL) {
184		error = EINVAL;
185		goto out;
186	}
187
188	error = do_sched_getparam(SCARG(uap, pid), 0, NULL, &sp);
189	if (error)
190		goto out;
191
192	error = sched_native2freebsd(0, &sp, NULL, &lp);
193	if (error)
194		goto out;
195
196	error = copyout(&lp, SCARG(uap, sp), sizeof(lp));
197	if (error)
198		goto out;
199
200 out:
201	return error;
202}
203
204int
205freebsd_sys_sched_setscheduler(struct lwp *l, const struct freebsd_sys_sched_setscheduler_args *uap, register_t *retval)
206{
207	/* {
208		syscallarg(pid_t) pid;
209		syscallarg(int) policy;
210		syscallarg(cont struct freebsd_sched_scheduler *) sp;
211	} */
212	int error, policy;
213	struct freebsd_sched_param lp;
214	struct sched_param sp;
215
216	if (SCARG(uap, pid) < 0 || SCARG(uap, sp) == NULL) {
217 		error = EINVAL;
218		goto out;
219	}
220
221	error = copyin(SCARG(uap, sp), &lp, sizeof(lp));
222	if (error)
223		goto out;
224
225	error = sched_freebsd2native(SCARG(uap, policy), &lp, &policy, &sp);
226	if (error)
227		goto out;
228
229	error = do_sched_setparam(SCARG(uap, pid), 0, policy, &sp);
230	if (error)
231		goto out;
232
233 out:
234	return error;
235}
236
237int
238freebsd_sys_sched_getscheduler(struct lwp *l, const struct freebsd_sys_sched_getscheduler_args *uap, register_t *retval)
239{
240	/* {
241		syscallarg(pid_t) pid;
242	} */
243	int error, policy;
244
245	*retval = -1;
246
247	error = do_sched_getparam(SCARG(uap, pid), 0, &policy, NULL);
248	if (error)
249		goto out;
250
251	error = sched_native2freebsd(policy, NULL, &policy, NULL);
252	if (error)
253		goto out;
254
255	*retval = policy;
256
257 out:
258	return error;
259}
260
261int
262freebsd_sys_sched_yield(struct lwp *l, const void *v, register_t *retval)
263{
264
265	yield();
266	return 0;
267}
268
269int
270freebsd_sys_sched_get_priority_max(struct lwp *l, const struct freebsd_sys_sched_get_priority_max_args *uap, register_t *retval)
271{
272	/* {
273		syscallarg(int) policy;
274	} */
275
276	/*
277	 * We can't emulate anything put the default scheduling policy.
278	 */
279	if (SCARG(uap, policy) != FREEBSD_SCHED_OTHER) {
280		*retval = -1;
281		return EINVAL;
282	}
283
284	*retval = 0;
285	return 0;
286}
287
288int
289freebsd_sys_sched_get_priority_min(struct lwp *l, const struct freebsd_sys_sched_get_priority_min_args *uap, register_t *retval)
290{
291	/* {
292		syscallarg(int) policy;
293	} */
294
295	/*
296	 * We can't emulate anything put the default scheduling policy.
297	 */
298	if (SCARG(uap, policy) != FREEBSD_SCHED_OTHER) {
299		*retval = -1;
300		return EINVAL;
301	}
302
303	*retval = 0;
304	return 0;
305}
306