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 * $FreeBSD: src/sys/posix4/p1003_1b.c,v 1.5.2.2 2003/03/25 06:13:35 rwatson Exp $ 33 */ 34 35 /* p1003_1b: Real Time common code. 36 */ 37 38 #include <sys/param.h> 39 #include <sys/systm.h> 40 #include <sys/kernel.h> 41 #include <sys/sysent.h> 42 #include <sys/malloc.h> 43 #include <sys/posix4.h> 44 #include <sys/proc.h> 45 #include <sys/syslog.h> 46 #include <sys/module.h> 47 #include <sys/sysmsg.h> 48 #include <sys/sysctl.h> 49 #include <sys/unistd.h> 50 51 MALLOC_DEFINE(M_P31B, "p1003.1b", "Posix 1003.1B"); 52 53 /* 54 * p31b_proc: Return a proc struct corresponding to a pid to operate on. 55 * 56 * Enforce permission policy. 57 * 58 * The policy is the same as for sending signals except there 59 * is no notion of process groups. 60 * 61 * pid == 0 means my process. 62 * 63 * This is disabled until I've got a permission gate in again: 64 * only root can do this. 65 */ 66 67 #if 0 68 /* 69 * This is stolen from CANSIGNAL in kern_sig: 70 * 71 * Can process p, with pcred pc, do "write flavor" operations to process q? 72 */ 73 #define CAN_AFFECT(p, cr, q) \ 74 ((cr)->cr_uid == 0 || \ 75 (cr)->cr_ruid == (q)->p_ucred->cr_ruid || \ 76 (cr)->cr_uid == (q)->p_ucred->cr_ruid || \ 77 (cr)->cr_ruid == (q)->p_ucred->cr_uid || \ 78 (cr)->cr_uid == (q)->p_ucred->cr_uid) 79 #else 80 #define CAN_AFFECT(p, cr, q) ((cr)->cr_uid == 0) 81 #endif 82 83 #if !defined(_KPOSIX_PRIORITY_SCHEDULING) 84 85 int syscall_not_present(const char *s); 86 87 /* The system calls return ENOSYS if an entry is called that is 88 * not run-time supported. I am also logging since some programs 89 * start to use this when they shouldn't. That will be removed if annoying. 90 */ 91 int syscall_not_present(const char *s) 92 { 93 struct proc *p = curproc; 94 log(LOG_ERR, "cmd %s pid %d tried to use non-present %s\n", 95 p->p_comm, p->p_pid, s); 96 97 /* a " return nosys(p, uap); " here causes a core dump. 98 */ 99 100 return ENOSYS; 101 } 102 103 /* Not configured but loadable via a module: 104 */ 105 106 static int sched_attach(void) 107 { 108 return 0; 109 } 110 111 #define SYSCALL_NOT_PRESENT_GEN(SC) \ 112 int sys_##SC (struct sysmsg *sysmsg, const struct SC##_args *uap) \ 113 { \ 114 return syscall_not_present(#SC); \ 115 } 116 117 SYSCALL_NOT_PRESENT_GEN(sched_setparam) 118 SYSCALL_NOT_PRESENT_GEN(sched_getparam) 119 SYSCALL_NOT_PRESENT_GEN(sched_setscheduler) 120 SYSCALL_NOT_PRESENT_GEN(sched_getscheduler) 121 SYSCALL_NOT_PRESENT_GEN(sched_yield) 122 SYSCALL_NOT_PRESENT_GEN(sched_get_priority_max) 123 SYSCALL_NOT_PRESENT_GEN(sched_get_priority_min) 124 SYSCALL_NOT_PRESENT_GEN(sched_rr_get_interval) 125 126 #else 127 128 /* 129 * p31b_proc: Look up a proc from a PID. If proc is 0 it is 130 * my own proc. 131 * 132 * Returns a held process in *pp. 133 */ 134 static 135 int 136 p31b_proc(pid_t pid, struct proc **pp) 137 { 138 int ret = 0; 139 struct proc *p = curproc; 140 struct proc *other_proc; 141 142 if (pid == 0) { 143 other_proc = p; 144 if (other_proc) 145 PHOLD(other_proc); 146 } else { 147 other_proc = pfind(pid); 148 /* ref from pfind() */ 149 } 150 151 if (other_proc) { 152 /* Enforce permission policy. 153 */ 154 if (CAN_AFFECT(p, p->p_ucred, other_proc)) { 155 *pp = other_proc; 156 lwkt_gettoken(&other_proc->p_token); 157 } else { 158 *pp = NULL; 159 ret = EPERM; 160 PRELE(other_proc); 161 } 162 } else { 163 *pp = NULL; 164 ret = ESRCH; 165 } 166 return ret; 167 } 168 169 static 170 void 171 p31b_proc_done(struct proc *other_proc) 172 { 173 if (other_proc) { 174 lwkt_reltoken(&other_proc->p_token); 175 PRELE(other_proc); 176 } 177 } 178 179 /* Configured in kernel version: 180 */ 181 static struct ksched *ksched; 182 183 static int sched_attach(void) 184 { 185 int ret = ksched_attach(&ksched); 186 187 if (ret == 0) 188 p31b_setcfg(CTL_P1003_1B_PRIORITY_SCHEDULING, 1); 189 190 return ret; 191 } 192 193 int 194 sys_sched_setparam(struct sysmsg *sysmsg, 195 const struct sched_setparam_args *uap) 196 { 197 struct proc *p; 198 struct lwp *lp; 199 struct sched_param sched_param; 200 int e; 201 202 copyin(uap->param, &sched_param, sizeof(sched_param)); 203 204 if ((e = p31b_proc(uap->pid, &p)) == 0) { 205 lp = FIRST_LWP_IN_PROC(p); /* XXX lwp */ 206 if (lp) { 207 LWPHOLD(lp); 208 lwkt_gettoken(&lp->lwp_token); 209 e = ksched_setparam(&sysmsg->sysmsg_reg, ksched, lp, 210 (const struct sched_param *)&sched_param); 211 lwkt_reltoken(&lp->lwp_token); 212 LWPRELE(lp); 213 } else { 214 e = ESRCH; 215 } 216 p31b_proc_done(p); 217 } 218 return e; 219 } 220 221 int 222 sys_sched_getparam(struct sysmsg *sysmsg, 223 const struct sched_getparam_args *uap) 224 { 225 struct proc *targetp; 226 struct lwp *lp; 227 struct sched_param sched_param; 228 int e; 229 230 if ((e = p31b_proc(uap->pid, &targetp)) == 0) { 231 lp = FIRST_LWP_IN_PROC(targetp); /* XXX lwp */ 232 if (lp) { 233 LWPHOLD(lp); 234 lwkt_gettoken(&lp->lwp_token); 235 e = ksched_getparam(&sysmsg->sysmsg_reg, ksched, 236 lp, &sched_param); 237 lwkt_reltoken(&lp->lwp_token); 238 LWPRELE(lp); 239 } else { 240 e = ESRCH; 241 } 242 p31b_proc_done(targetp); 243 } 244 if (e == 0) 245 copyout(&sched_param, uap->param, sizeof(sched_param)); 246 return e; 247 } 248 249 int 250 sys_sched_setscheduler(struct sysmsg *sysmsg, 251 const struct sched_setscheduler_args *uap) 252 { 253 struct proc *p; 254 struct lwp *lp; 255 int e; 256 struct sched_param sched_param; 257 258 copyin(uap->param, &sched_param, sizeof(sched_param)); 259 260 if ((e = p31b_proc(uap->pid, &p)) == 0) { 261 lp = FIRST_LWP_IN_PROC(p); /* XXX lwp */ 262 if (lp) { 263 LWPHOLD(lp); 264 lwkt_gettoken(&lp->lwp_token); 265 e = ksched_setscheduler(&sysmsg->sysmsg_reg, ksched, 266 lp, uap->policy, 267 (const struct sched_param *)&sched_param); 268 lwkt_reltoken(&lp->lwp_token); 269 LWPRELE(lp); 270 } else { 271 e = ESRCH; 272 } 273 p31b_proc_done(p); 274 } 275 return e; 276 } 277 278 int 279 sys_sched_getscheduler(struct sysmsg *sysmsg, 280 const struct sched_getscheduler_args *uap) 281 { 282 struct proc *targetp; 283 struct lwp *lp; 284 int e; 285 286 if ((e = p31b_proc(uap->pid, &targetp)) == 0) { 287 lp = FIRST_LWP_IN_PROC(targetp); /* XXX lwp */ 288 if (lp) { 289 LWPHOLD(lp); 290 lwkt_gettoken(&lp->lwp_token); 291 e = ksched_getscheduler(&sysmsg->sysmsg_reg, ksched, lp); 292 lwkt_reltoken(&lp->lwp_token); 293 LWPRELE(lp); 294 } else { 295 e = ESRCH; 296 } 297 p31b_proc_done(targetp); 298 } 299 return e; 300 } 301 302 /* 303 * MPSAFE 304 */ 305 int 306 sys_sched_yield(struct sysmsg *sysmsg, 307 const struct sched_yield_args *uap) 308 { 309 return ksched_yield(&sysmsg->sysmsg_reg, ksched); 310 } 311 312 /* 313 * MPSAFE 314 */ 315 int 316 sys_sched_get_priority_max(struct sysmsg *sysmsg, 317 const struct sched_get_priority_max_args *uap) 318 { 319 return ksched_get_priority_max(&sysmsg->sysmsg_reg, ksched, uap->policy); 320 } 321 322 /* 323 * MPSAFE 324 */ 325 int 326 sys_sched_get_priority_min(struct sysmsg *sysmsg, 327 const struct sched_get_priority_min_args *uap) 328 { 329 return ksched_get_priority_min(&sysmsg->sysmsg_reg, ksched, uap->policy); 330 } 331 332 int 333 sys_sched_rr_get_interval(struct sysmsg *sysmsg, 334 const struct sched_rr_get_interval_args *uap) 335 { 336 int e; 337 struct proc *p; 338 struct lwp *lp; 339 struct timespec ts; 340 341 if ((e = p31b_proc(uap->pid, &p)) == 0) { 342 lp = FIRST_LWP_IN_PROC(p); /* XXX lwp */ 343 if (lp) { 344 LWPHOLD(lp); 345 lwkt_gettoken(&lp->lwp_token); 346 e = ksched_rr_get_interval(&sysmsg->sysmsg_reg, ksched, 347 lp, &ts); 348 if (e == 0) 349 e = copyout(&ts, uap->interval, sizeof(ts)); 350 lwkt_reltoken(&lp->lwp_token); 351 LWPRELE(lp); 352 } else { 353 e = ESRCH; 354 } 355 p31b_proc_done(p); 356 } 357 return e; 358 } 359 360 #endif 361 362 static void 363 p31binit(void *notused) 364 { 365 sched_attach(); 366 p31b_setcfg(CTL_P1003_1B_ASYNCHRONOUS_IO, -1); 367 p31b_setcfg(CTL_P1003_1B_FSYNC, _POSIX_FSYNC); 368 p31b_setcfg(CTL_P1003_1B_MAPPED_FILES, _POSIX_MAPPED_FILES); 369 p31b_setcfg(CTL_P1003_1B_MESSAGE_PASSING, _POSIX_MESSAGE_PASSING); 370 p31b_setcfg(CTL_P1003_1B_PAGESIZE, PAGE_SIZE); 371 p31b_setcfg(CTL_P1003_1B_SEMAPHORES, _POSIX_SEMAPHORES); 372 p31b_setcfg(CTL_P1003_1B_SEM_NSEMS_MAX, 256); 373 p31b_setcfg(CTL_P1003_1B_SHARED_MEMORY_OBJECTS, 374 _POSIX_SHARED_MEMORY_OBJECTS); 375 376 #if 0 /* XXX missing */ 377 p31b_setcfg(CTL_P1003_1B_ASYNCHRONOUS_IO, _POSIX_ASYNCHRONOUS_IO); 378 p31b_setcfg(CTL_P1003_1B_AIO_PRIO_DELTA_MAX, 0); 379 p31b_setcfg(CTL_P1003_1B_AIO_MAX, 0); 380 p31b_setcfg(CTL_P1003_1B_AIO_LISTIO_MAX, 0); 381 p31b_setcfg(CTL_P1003_1B_DELAYTIMER_MAX, 0); 382 p31b_setcfg(CTL_P1003_1B_MEMLOCK, 0); 383 p31b_setcfg(CTL_P1003_1B_MEMLOCK_RANGE, 0); 384 p31b_setcfg(CTL_P1003_1B_MEMORY_PROTECTION, 0); 385 p31b_setcfg(CTL_P1003_1B_PRIORITIZED_IO, _POSIX_PRIORITIZED_IO); 386 p31b_setcfg(CTL_P1003_1B_REALTIME_SIGNALS, _POSIX_REALTIME_SIGNALS); 387 p31b_setcfg(CTL_P1003_1B_RTSIG_MAX, SIGRTMAX - SIGRTMIN + 1); 388 p31b_setcfg(CTL_P1003_1B_SIGQUEUE_MAX, 0); 389 p31b_setcfg(CTL_P1003_1B_SYNCHRONIZED_IO, _POSIX_SYNCHRONIZED_IO); 390 p31b_setcfg(CTL_P1003_1B_TIMERS, _POSIX_TIMERS); 391 p31b_setcfg(CTL_P1003_1B_TIMER_MAX, 0); 392 #endif 393 } 394 395 SYSINIT(p31b, SI_SUB_P1003_1B, SI_ORDER_FIRST, p31binit, NULL); 396