p1003_1b.c revision 160322
1/*- 2 * Copyright (c) 1996, 1997, 1998 3 * HD Associates, Inc. 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. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by HD Associates, Inc 16 * 4. Neither the name of the author nor the names of any co-contributors 17 * may be used to endorse or promote products derived from this software 18 * without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY HD ASSOCIATES AND CONTRIBUTORS ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL HD ASSOCIATES OR CONTRIBUTORS BE LIABLE 24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 */ 32 33/* p1003_1b: Real Time common code. 34 */ 35 36#include <sys/cdefs.h> 37__FBSDID("$FreeBSD: head/sys/kern/p1003_1b.c 160322 2006-07-13 06:41:26Z davidxu $"); 38 39#include "opt_posix.h" 40 41#include <sys/param.h> 42#include <sys/systm.h> 43#include <sys/kernel.h> 44#include <sys/lock.h> 45#include <sys/module.h> 46#include <sys/mutex.h> 47#include <sys/proc.h> 48#include <sys/syscallsubr.h> 49#include <sys/sysctl.h> 50#include <sys/sysent.h> 51#include <sys/syslog.h> 52#include <sys/sysproto.h> 53 54#include <posix4/posix4.h> 55 56MALLOC_DEFINE(M_P31B, "p1003.1b", "Posix 1003.1B"); 57 58/* The system calls return ENOSYS if an entry is called that is 59 * not run-time supported. I am also logging since some programs 60 * start to use this when they shouldn't. That will be removed if annoying. 61 */ 62int 63syscall_not_present(struct thread *td, const char *s, struct nosys_args *uap) 64{ 65 log(LOG_ERR, "cmd %s pid %d tried to use non-present %s\n", 66 td->td_proc->p_comm, td->td_proc->p_pid, s); 67 68 /* a " return nosys(p, uap); " here causes a core dump. 69 */ 70 71 return ENOSYS; 72} 73 74#if !defined(_KPOSIX_PRIORITY_SCHEDULING) 75 76/* Not configured but loadable via a module: 77 */ 78 79static int 80sched_attach(void) 81{ 82 return 0; 83} 84 85SYSCALL_NOT_PRESENT_GEN(sched_setparam) 86SYSCALL_NOT_PRESENT_GEN(sched_getparam) 87SYSCALL_NOT_PRESENT_GEN(sched_setscheduler) 88SYSCALL_NOT_PRESENT_GEN(sched_getscheduler) 89SYSCALL_NOT_PRESENT_GEN(sched_yield) 90SYSCALL_NOT_PRESENT_GEN(sched_get_priority_max) 91SYSCALL_NOT_PRESENT_GEN(sched_get_priority_min) 92SYSCALL_NOT_PRESENT_GEN(sched_rr_get_interval) 93#else 94 95/* Configured in kernel version: 96 */ 97static struct ksched *ksched; 98 99static int 100sched_attach(void) 101{ 102 int ret = ksched_attach(&ksched); 103 104 if (ret == 0) 105 p31b_setcfg(CTL_P1003_1B_PRIORITY_SCHEDULING, 1); 106 107 return ret; 108} 109 110/* 111 * MPSAFE 112 */ 113int 114sched_setparam(struct thread *td, struct sched_setparam_args *uap) 115{ 116 struct thread *targettd; 117 struct proc *targetp; 118 int e; 119 struct sched_param sched_param; 120 121 e = copyin(uap->param, &sched_param, sizeof(sched_param)); 122 if (e) 123 return (e); 124 125 if (uap->pid == 0) { 126 targetp = td->td_proc; 127 targettd = td; 128 PROC_LOCK(targetp); 129 } else { 130 targetp = pfind(uap->pid); 131 if (targetp == NULL) 132 return (ESRCH); 133 targettd = FIRST_THREAD_IN_PROC(targetp); 134 } 135 136 e = p_cansched(td, targetp); 137 if (e == 0) { 138 e = ksched_setparam(ksched, targettd, 139 (const struct sched_param *)&sched_param); 140 } 141 PROC_UNLOCK(targetp); 142 return (e); 143} 144 145/* 146 * MPSAFE 147 */ 148int 149sched_getparam(struct thread *td, struct sched_getparam_args *uap) 150{ 151 int e; 152 struct sched_param sched_param; 153 struct thread *targettd; 154 struct proc *targetp; 155 156 if (uap->pid == 0) { 157 targetp = td->td_proc; 158 targettd = td; 159 PROC_LOCK(targetp); 160 } else { 161 targetp = pfind(uap->pid); 162 if (targetp == NULL) { 163 return (ESRCH); 164 } 165 targettd = FIRST_THREAD_IN_PROC(targetp); /* XXXKSE */ 166 } 167 168 e = p_cansee(td, targetp); 169 if (e == 0) { 170 e = ksched_getparam(ksched, targettd, &sched_param); 171 } 172 PROC_UNLOCK(targetp); 173 if (e == 0) 174 e = copyout(&sched_param, uap->param, sizeof(sched_param)); 175 return (e); 176} 177 178/* 179 * MPSAFE 180 */ 181int 182sched_setscheduler(struct thread *td, struct sched_setscheduler_args *uap) 183{ 184 int e; 185 struct sched_param sched_param; 186 struct thread *targettd; 187 struct proc *targetp; 188 189 /* Don't allow non root user to set a scheduler policy */ 190 if (suser(td) != 0) 191 return (EPERM); 192 193 e = copyin(uap->param, &sched_param, sizeof(sched_param)); 194 if (e) 195 return (e); 196 197 if (uap->pid == 0) { 198 targetp = td->td_proc; 199 targettd = td; 200 PROC_LOCK(targetp); 201 } else { 202 targetp = pfind(uap->pid); 203 if (targetp == NULL) 204 return (ESRCH); 205 targettd = FIRST_THREAD_IN_PROC(targetp); 206 } 207 208 e = p_cansched(td, targetp); 209 if (e == 0) { 210 e = ksched_setscheduler(ksched, targettd, 211 uap->policy, (const struct sched_param *)&sched_param); 212 } 213 PROC_UNLOCK(targetp); 214 return (e); 215} 216 217/* 218 * MPSAFE 219 */ 220int 221sched_getscheduler(struct thread *td, struct sched_getscheduler_args *uap) 222{ 223 int e, policy; 224 struct thread *targettd; 225 struct proc *targetp; 226 227 if (uap->pid == 0) { 228 targetp = td->td_proc; 229 targettd = td; 230 PROC_LOCK(targetp); 231 } else { 232 targetp = pfind(uap->pid); 233 if (targetp == NULL) { 234 e = ESRCH; 235 goto done2; 236 } 237 targettd = FIRST_THREAD_IN_PROC(targetp); /* XXXKSE */ 238 } 239 240 e = p_cansee(td, targetp); 241 if (e == 0) { 242 e = ksched_getscheduler(ksched, targettd, &policy); 243 td->td_retval[0] = policy; 244 } 245 PROC_UNLOCK(targetp); 246 247done2: 248 return (e); 249} 250 251/* 252 * MPSAFE 253 */ 254int 255sched_yield(struct thread *td, struct sched_yield_args *uap) 256{ 257 258 return (ksched_yield(ksched)); 259} 260 261/* 262 * MPSAFE 263 */ 264int 265sched_get_priority_max(struct thread *td, 266 struct sched_get_priority_max_args *uap) 267{ 268 int error, prio; 269 270 error = ksched_get_priority_max(ksched, uap->policy, &prio); 271 td->td_retval[0] = prio; 272 return (error); 273} 274 275/* 276 * MPSAFE 277 */ 278int 279sched_get_priority_min(struct thread *td, 280 struct sched_get_priority_min_args *uap) 281{ 282 int error, prio; 283 284 error = ksched_get_priority_min(ksched, uap->policy, &prio); 285 td->td_retval[0] = prio; 286 return (error); 287} 288 289/* 290 * MPSAFE 291 */ 292int 293sched_rr_get_interval(struct thread *td, 294 struct sched_rr_get_interval_args *uap) 295{ 296 struct timespec timespec; 297 int error; 298 299 error = kern_sched_rr_get_interval(td, uap->pid, ×pec); 300 if (error == 0) 301 error = copyout(×pec, uap->interval, sizeof(timespec)); 302 return (error); 303} 304 305int 306kern_sched_rr_get_interval(struct thread *td, pid_t pid, 307 struct timespec *ts) 308{ 309 int e; 310 struct thread *targettd; 311 struct proc *targetp; 312 313 if (pid == 0) { 314 targettd = td; 315 targetp = td->td_proc; 316 PROC_LOCK(targetp); 317 } else { 318 targetp = td->td_proc; 319 PROC_LOCK(targetp); 320 targettd = thread_find(targetp, pid); 321 if (targettd == NULL) { 322 PROC_UNLOCK(targetp); 323 return (ESRCH); 324 } 325 } 326 327 e = p_cansee(td, targetp); 328 if (e == 0) 329 e = ksched_rr_get_interval(ksched, targettd, ts); 330 PROC_UNLOCK(targetp); 331 return (e); 332} 333 334#endif 335 336static void 337p31binit(void *notused) 338{ 339 (void) sched_attach(); 340 p31b_setcfg(CTL_P1003_1B_PAGESIZE, PAGE_SIZE); 341} 342 343SYSINIT(p31b, SI_SUB_P1003_1B, SI_ORDER_FIRST, p31binit, NULL); 344