kern_auth.c revision 1.1.2.15 1 /* $NetBSD: kern_auth.c,v 1.1.2.15 2006/03/11 03:21:16 elad Exp $ */
2
3 /*-
4 * Copyright (c) 2005, 2006 Elad Efrat <elad (at) NetBSD.org>
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by Elad Efrat.
18 * 4. The name of the author may not be used to endorse or promote products
19 * derived from this software without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 */
32
33 /*
34 * Todo:
35 * - Garbage collection to pool_put() unused scopes/listeners.
36 */
37
38 #include <sys/types.h>
39 #include <sys/param.h>
40 #include <sys/queue.h>
41 #include <sys/time.h>
42 #include <sys/proc.h>
43 #include <sys/ucred.h>
44 #include <sys/pool.h>
45 #include <sys/kauth.h>
46 #include <sys/acct.h>
47
48 /*
49 * Credentials.
50 */
51 struct kauth_cred {
52 struct simplelock cr_lock; /* lock */
53 uint32_t cr_refcnt; /* reference count */
54 uid_t cr_uid; /* user id */
55 uid_t cr_euid; /* effective user id */
56 uid_t cr_svuid; /* saved effective user id */
57 gid_t cr_gid; /* group id */
58 gid_t cr_egid; /* effective group id */
59 gid_t cr_svgid; /* saved effective group id */
60 uint16_t cr_ngroups; /* number of groups */
61 gid_t cr_groups[NGROUPS]; /* group memberships */
62 };
63
64 /*
65 * Listener.
66 */
67 struct kauth_listener {
68 kauth_scope_callback_t func; /* callback */
69 kauth_scope_t scope; /* scope backpointer */
70 uint32_t refcnt; /* reference count */
71 SIMPLEQ_ENTRY(kauth_listener) listener_next; /* listener list */
72 };
73
74 /*
75 * Scope.
76 */
77 struct kauth_scope {
78 const char *id; /* scope name */
79 void *cookie; /* user cookie */
80 uint32_t nlisteners; /* # of listeners */
81 SIMPLEQ_HEAD(, kauth_listener) listenq; /* listener list */
82 SIMPLEQ_ENTRY(kauth_scope) next_scope; /* scope list */
83 };
84
85 POOL_INIT(kauth_scope_pool, sizeof(struct kauth_scope), 0, 0, 0,
86 "kauth_scopepl", &pool_allocator_nointr);
87 POOL_INIT(kauth_listener_pool, sizeof(struct kauth_listener), 0, 0, 0,
88 "kauth_listenerpl", &pool_allocator_nointr);
89 POOL_INIT(kauth_cred_pool, sizeof(struct kauth_cred), 0, 0, 0,
90 "kauth_credpl", &pool_allocator_nointr);
91
92 /* List of scopes and its lock. */
93 SIMPLEQ_HEAD(, kauth_scope) scope_list;
94 struct simplelock scopes_lock;
95
96 /* Built-in scopes: generic, process. */
97 static kauth_scope_t kauth_builtin_scope_generic;
98 static kauth_scope_t kauth_builtin_scope_process;
99
100 /* Allocate new, empty kauth credentials. */
101 kauth_cred_t
102 kauth_cred_alloc(void) {
103 kauth_cred_t cred;
104
105 cred = pool_get(&kauth_cred_pool, PR_WAITOK);
106 memset(cred, 0, sizeof(*cred));
107 simple_lock_init(&cred->cr_lock);
108 cred->cr_refcnt = 1;
109
110 return (cred);
111 }
112
113 /* Increment reference count to cred. */
114 void
115 kauth_cred_hold(kauth_cred_t cred)
116 {
117 KASSERT(cred != NULL);
118
119 simple_lock(&cred->cr_lock);
120 cred->cr_refcnt++;
121 simple_unlock(&cred->cr_lock);
122 }
123
124 void
125 kauth_cred_destroy(kauth_cred_t cred)
126 {
127 KASSERT(cred != NULL);
128
129 pool_put(&kauth_cred_pool, cred);
130 }
131
132 /* Decrease reference count to cred. If reached zero, free it. */
133 void
134 kauth_cred_free(kauth_cred_t cred) {
135 KASSERT(cred != NULL);
136
137 simple_lock(&cred->cr_lock);
138 cred->cr_refcnt--;
139 simple_unlock(&cred->cr_lock);
140
141 if (cred->cr_refcnt == 0)
142 kauth_cred_destroy(cred);
143 }
144
145 void
146 kauth_cred_clone(kauth_cred_t from, kauth_cred_t to)
147 {
148 KASSERT(from != NULL);
149 KASSERT(to != NULL);
150
151 to->cr_uid = from->cr_uid;
152 to->cr_euid = from->cr_euid;
153 to->cr_svuid = from->cr_svuid;
154 to->cr_gid = from->cr_gid;
155 to->cr_egid = from->cr_egid;
156 to->cr_svgid = from->cr_svgid;
157 to->cr_ngroups = from->cr_ngroups;
158 memcpy(to->cr_groups, from->cr_groups,
159 sizeof(to->cr_groups));
160 }
161
162 /*
163 * Duplicate cred and return a new kauth_cred_t.
164 */
165 kauth_cred_t
166 kauth_cred_dup(kauth_cred_t cred)
167 {
168 kauth_cred_t new_cred;
169
170 KASSERT(cred != NULL);
171
172 new_cred = kauth_cred_alloc();
173
174 kauth_cred_clone(cred, new_cred);
175
176 return (new_cred);
177 }
178
179 /*
180 * Similar to crcopy(), only on a kauth_cred_t.
181 * XXX: Is this even needed? [kauth_cred_copy]
182 */
183 kauth_cred_t
184 kauth_cred_copy(kauth_cred_t cred)
185 {
186 kauth_cred_t new_cred;
187
188 KASSERT(cred != NULL);
189
190 /* If the provided credentials already have one reference, use them. */
191 if (cred->cr_refcnt == 1)
192 return (cred);
193
194 new_cred = kauth_cred_alloc();
195
196 kauth_cred_clone(cred, new_cred);
197
198 kauth_cred_free(cred);
199
200 return (new_cred);
201 }
202
203 uid_t
204 kauth_cred_getuid(kauth_cred_t cred)
205 {
206 KASSERT(cred != NULL);
207
208 return (cred->cr_uid);
209 }
210
211 uid_t
212 kauth_cred_geteuid(kauth_cred_t cred)
213 {
214 KASSERT(cred != NULL);
215
216 return (cred->cr_euid);
217 }
218
219 uid_t
220 kauth_cred_getsvuid(kauth_cred_t cred)
221 {
222 KASSERT(cred != NULL);
223
224 return (cred->cr_svuid);
225 }
226
227 gid_t
228 kauth_cred_getgid(kauth_cred_t cred)
229 {
230 KASSERT(cred != NULL);
231
232 return (cred->cr_gid);
233 }
234
235 gid_t
236 kauth_cred_getegid(kauth_cred_t cred)
237 {
238 KASSERT(cred != NULL);
239
240 return (cred->cr_egid);
241 }
242
243 gid_t
244 kauth_cred_getsvgid(kauth_cred_t cred)
245 {
246 KASSERT(cred != NULL);
247
248 return (cred->cr_svgid);
249 }
250
251 void
252 kauth_cred_setuid(kauth_cred_t cred, uid_t uid)
253 {
254 KASSERT(cred != NULL);
255 KASSERT(uid >= 0 && uid <= UID_MAX);
256
257 cred->cr_uid = uid;
258 }
259
260 void
261 kauth_cred_seteuid(kauth_cred_t cred, uid_t uid)
262 {
263 KASSERT(cred != NULL);
264 KASSERT(uid >= 0 && uid <= UID_MAX);
265
266 cred->cr_euid = uid;
267 }
268
269 void
270 kauth_cred_setsvuid(kauth_cred_t cred, uid_t uid)
271 {
272 KASSERT(cred != NULL);
273 KASSERT(uid >= 0 && uid <= UID_MAX);
274
275 cred->cr_svuid = uid;
276 }
277
278 void
279 kauth_cred_setgid(kauth_cred_t cred, gid_t gid)
280 {
281 KASSERT(cred != NULL);
282 KASSERT(gid >= 0 && gid <= GID_MAX);
283
284 cred->cr_gid = gid;
285 }
286
287 void
288 kauth_cred_setegid(kauth_cred_t cred, gid_t gid)
289 {
290 KASSERT(cred != NULL);
291 KASSERT(gid >= 0 && gid <= GID_MAX);
292
293 cred->cr_egid = gid;
294 }
295
296 void
297 kauth_cred_setsvgid(kauth_cred_t cred, gid_t gid)
298 {
299 KASSERT(cred != NULL);
300 KASSERT(gid >= 0 && gid <= GID_MAX);
301
302 cred->cr_svgid = gid;
303 }
304
305 /* Checks if gid is a member of the groups in cred. */
306 int
307 kauth_cred_groupmember(kauth_cred_t cred, gid_t gid)
308 {
309 int i;
310
311 KASSERT(cred != NULL);
312 KASSERT(gid >= 0 && gid <= GID_MAX);
313
314 for (i = 0; i < cred->cr_ngroups; i++) {
315 if (cred->cr_groups[i] == gid)
316 return (1);
317 }
318
319 return (0);
320 }
321
322 uint16_t
323 kauth_cred_ngroups(kauth_cred_t cred)
324 {
325 KASSERT(cred != NULL);
326
327 return (cred->cr_ngroups);
328 }
329
330 /*
331 * Return the group at index idx from the groups in cred.
332 */
333 gid_t
334 kauth_cred_group(kauth_cred_t cred, uint16_t idx)
335 {
336 KASSERT(cred != NULL);
337 KASSERT(idx < cred->cr_ngroups);
338
339 return (cred->cr_groups[idx]);
340 }
341
342 /* Sort len groups in grbuf. */
343 static void
344 kauth_cred_sortgroups(gid_t *grbuf, size_t len)
345 {
346 int i, j;
347 gid_t v;
348
349 KASSERT(grbuf != NULL);
350
351 /* Insertion sort. */
352 for (i = 1; i < len; i++) {
353 v = grbuf[i];
354 /* find correct slot for value v, moving others up */
355 for (j = i; --j >= 0 && v < grbuf[j];)
356 grbuf[j + 1] = grbuf[j];
357 grbuf[j + 1] = v;
358 }
359 }
360
361 /* Add group gid to groups in cred. Maintain order. */
362 int
363 kauth_cred_addgroup(kauth_cred_t cred, gid_t gid)
364 {
365 KASSERT(cred != NULL);
366 KASSERT(gid >= 0 && gid <= GID_MAX);
367
368 simple_lock(&cred->cr_lock);
369
370 if (cred->cr_ngroups >=
371 (sizeof(cred->cr_groups) / sizeof(cred->cr_groups[0]))) {
372 simple_unlock(&cred->cr_lock);
373 return (E2BIG);
374 }
375
376 if (kauth_cred_groupmember(cred, gid)) {
377 simple_unlock(&cred->cr_lock);
378 return (0);
379 }
380
381 cred->cr_groups[cred->cr_ngroups++] = gid;
382
383 kauth_cred_sortgroups(cred->cr_groups, cred->cr_ngroups);
384
385 simple_unlock(&cred->cr_lock);
386
387 return (0);
388 }
389
390 /* Delete group gid from groups in cred. Maintain order. */
391 int
392 kauth_cred_delgroup(kauth_cred_t cred, gid_t gid)
393 {
394 KASSERT(cred != NULL);
395 KASSERT(gid >= 0 && gid <= GID_MAX);
396
397 simple_lock(&cred->cr_lock);
398
399 if (!kauth_cred_groupmember(cred, gid)) {
400 simple_unlock(&cred->cr_lock);
401 return (0);
402 }
403
404 if (cred->cr_ngroups == 1)
405 cred->cr_groups[0] = (gid_t)-1; /* XXX */
406 else {
407 int i;
408
409 for (i = 0; i < cred->cr_ngroups; i++)
410 if (cred->cr_groups[i] == gid) {
411 cred->cr_groups[i] = cred->cr_groups[cred->cr_ngroups - 1];
412 cred->cr_groups[cred->cr_ngroups - 1] = (gid_t)-1; /* XXX */
413 }
414 }
415
416 cred->cr_ngroups--;
417
418 kauth_cred_sortgroups(cred->cr_groups, cred->cr_ngroups);
419
420 simple_unlock(&cred->cr_lock);
421
422 return (0);
423 }
424
425 /*
426 * Match uids in two credentials. Checks if cred1 can access stuff owned by
427 * cred2.
428 * XXX: root bypasses this!
429 */
430 int
431 kauth_cred_uidmatch(kauth_cred_t cred1, kauth_cred_t cred2)
432 {
433 KASSERT(cred1 != NULL);
434 KASSERT(cred2 != NULL);
435
436 /* Are we root? */
437 if (cred1->cr_euid == 0)
438 return (1);
439
440 if (cred1->cr_uid == cred2->cr_uid ||
441 cred1->cr_euid == cred2->cr_uid ||
442 cred1->cr_uid == cred2->cr_euid ||
443 cred1->cr_euid == cred2->cr_euid)
444 return (1);
445
446 return (0);
447 }
448
449 uint32_t
450 kauth_cred_getrefcnt(kauth_cred_t cred)
451 {
452 KASSERT(cred != NULL);
453
454 return (cred->cr_refcnt);
455 }
456
457 /* XXX: memcmp() wrapper needed for NFSW_SAMECRED() in nfs/nfs.h */
458 int
459 kauth_cred_memcmp(kauth_cred_t cred1, kauth_cred_t cred2)
460 {
461 KASSERT(cred1 != NULL);
462 KASSERT(cred2 != NULL);
463
464 return (memcmp(cred1, cred2, sizeof(*cred1)));
465 }
466
467 /*
468 * Convert userland credentials (struct uucred) to kauth_cred_t.
469 * XXX: For NFS code.
470 */
471 void
472 kauth_cred_convert(kauth_cred_t cred, const struct uucred *uuc)
473 {
474 int i;
475
476 KASSERT(cred != NULL);
477 KASSERT(uuc != NULL);
478
479 cred->cr_refcnt = 1;
480 cred->cr_euid = uuc->cr_uid;
481 cred->cr_egid = uuc->cr_gid;
482 cred->cr_ngroups = min(uuc->cr_ngroups, NGROUPS);
483 for (i = 0; i < cred->cr_ngroups; i++)
484 kauth_cred_addgroup(cred, uuc->cr_groups[i]);
485 }
486
487 /*
488 * Compare kauth_cred_t and uucred credentials.
489 * XXX: Modelled after crcmp() for NFS.
490 */
491 int
492 kauth_cred_compare(kauth_cred_t cred, const struct uucred *uuc)
493 {
494 KASSERT(cred != NULL);
495 KASSERT(uuc != NULL);
496
497 if (cred->cr_euid == uuc->cr_uid &&
498 cred->cr_egid == uuc->cr_gid &&
499 cred->cr_ngroups == uuc->cr_ngroups &&
500 !memcmp(cred->cr_groups, uuc->cr_groups,
501 cred->cr_ngroups * sizeof(cred->cr_groups[0])))
502 return (1);
503
504 return (0);
505 }
506
507 /*
508 * Make a struct ucred out of a kauth_cred_t.
509 * XXX: For sysctl.
510 */
511 void
512 kauth_cred_toucred(kauth_cred_t cred, struct ucred *uc)
513 {
514 KASSERT(cred != NULL);
515 KASSERT(uc != NULL);
516
517 uc->cr_uid = cred->cr_euid;
518 uc->cr_gid = cred->cr_egid;
519 uc->cr_ngroups = min(cred->cr_ngroups,
520 sizeof(uc->cr_groups) / sizeof(uc->cr_groups[0]));
521 memcpy(uc->cr_groups, cred->cr_groups,
522 uc->cr_ngroups * sizeof(uc->cr_groups[0]));
523 }
524
525 /*
526 * Make a struct pcred out of a kauth_cred_t.
527 * XXX: For sysctl.
528 */
529 void
530 kauth_cred_topcred(kauth_cred_t cred, struct pcred *pc)
531 {
532 KASSERT(cred != NULL);
533 KASSERT(pc != NULL);
534
535 pc->pc_ucred = (struct ucred *)cred; /* XXX this is just wrong */
536 pc->p_ruid = cred->cr_uid;
537 pc->p_svuid = cred->cr_svuid;
538 pc->p_rgid = cred->cr_gid;
539 pc->p_svgid = cred->cr_svgid;
540 pc->p_refcnt = cred->cr_refcnt;
541 }
542
543 /*
544 * Return kauth_cred_t for the current process.
545 */
546 kauth_cred_t
547 kauth_cred_get(void)
548 {
549 return (curproc->p_cred);
550 }
551
552 /*
553 * Returns a scope matching the provided id.
554 * Requires the scope list lock to be held by the caller.
555 */
556 static kauth_scope_t
557 kauth_ifindscope(const char *id) {
558 kauth_scope_t scope;
559
560 /* XXX: assert lock on scope list? */
561
562 scope = NULL;
563 SIMPLEQ_FOREACH(scope, &scope_list, next_scope) {
564 if (strcmp(scope->id, id) == 0)
565 break;
566 }
567
568 return (scope);
569 }
570
571 /*
572 * Register a new scope.
573 *
574 * id - identifier for the scope
575 * callback - the scope's default listener
576 * cookie - cookie to be passed to the listener(s)
577 */
578 kauth_scope_t
579 kauth_register_scope(const char *id, kauth_scope_callback_t callback,
580 void *cookie)
581 {
582 kauth_scope_t scope;
583 kauth_listener_t listener;
584
585 /* Sanitize input */
586 if (id == NULL || callback == NULL)
587 return (NULL);
588
589 /* Allocate space for a new scope and listener. */
590 scope = pool_get(&kauth_scope_pool, PR_WAITOK);
591 listener = pool_get(&kauth_listener_pool, PR_WAITOK);
592
593 /* Acquire scope list lock. */
594 simple_lock(&scopes_lock);
595
596 /* Check we don't already have a scope with the same id */
597 if (kauth_ifindscope(id) != NULL) {
598 simple_unlock(&scopes_lock);
599
600 pool_put(&kauth_scope_pool, scope);
601 pool_put(&kauth_listener_pool, listener);
602
603 return (NULL);
604 }
605
606 /* Initialize new scope with parameters */
607 scope->id = id;
608 scope->cookie = cookie;
609 scope->nlisteners = 1;
610
611 /* Add default listener */
612 listener->func = callback;
613 listener->scope = scope;
614 listener->refcnt = 0;
615 SIMPLEQ_INIT(&scope->listenq);
616 SIMPLEQ_INSERT_HEAD(&scope->listenq, listener, listener_next);
617
618 /* Insert scope to scopes list */
619 if (SIMPLEQ_EMPTY(&scope_list))
620 SIMPLEQ_INSERT_HEAD(&scope_list, scope, next_scope);
621 else
622 SIMPLEQ_INSERT_TAIL(&scope_list, scope, next_scope);
623
624 simple_unlock(&scopes_lock);
625
626 return (scope);
627 }
628
629 /*
630 * Initialize the kernel authorization subsystem.
631 *
632 * Initialize the scopes list lock.
633 * Register built-in scopes: generic, process.
634 */
635 void
636 kauth_init(void)
637 {
638 simple_lock_init(&scopes_lock);
639
640 /* Register generic scope. */
641 kauth_builtin_scope_generic = kauth_register_scope(KAUTH_SCOPE_GENERIC,
642 kauth_authorize_cb_generic, NULL);
643
644 /* Register process scope. */
645 kauth_builtin_scope_process = kauth_register_scope(KAUTH_SCOPE_PROCESS,
646 kauth_authorize_cb_process, NULL);
647 }
648
649 /*
650 * Deregister a scope.
651 * Requires scope list lock to be held by the caller.
652 *
653 * scope - the scope to deregister
654 */
655 void
656 kauth_deregister_scope(kauth_scope_t scope)
657 {
658 if (scope != NULL) {
659 /* Remove scope from list */
660 SIMPLEQ_REMOVE(&scope_list, scope, kauth_scope, next_scope);
661 }
662 }
663
664 /*
665 * Register a listener.
666 *
667 * id - scope identifier.
668 * callback - the callback routine for the listener.
669 * cookie - cookie to pass unmoidfied to the callback.
670 */
671 kauth_listener_t
672 kauth_listen_scope(const char *id, kauth_scope_callback_t callback,
673 void *cookie)
674 {
675 kauth_scope_t scope;
676 kauth_listener_t listener;
677
678 /* Find scope struct */
679 simple_lock(&scopes_lock);
680 scope = kauth_ifindscope(id);
681 simple_unlock(&scopes_lock);
682 if (scope == NULL)
683 return (NULL);
684
685 /* Allocate listener */
686 listener = pool_get(&kauth_listener_pool, PR_WAITOK);
687
688 /* Initialize listener with parameters */
689 listener->func = callback;
690 listener->refcnt = 0;
691
692 /* Add listener to scope */
693 SIMPLEQ_INSERT_TAIL(&scope->listenq, listener, listener_next);
694
695 /* Raise number of listeners on scope. */
696 scope->nlisteners++;
697 listener->scope = scope;
698
699 return (listener);
700 }
701
702 /*
703 * Deregister a listener.
704 *
705 * listener - listener reference as returned from kauth_listen_scope().
706 */
707 void
708 kauth_unlisten_scope(kauth_listener_t listener)
709 {
710 if (listener != NULL) {
711 SIMPLEQ_REMOVE(&listener->scope->listenq, listener, kauth_listener,
712 listener_next);
713 listener->scope->nlisteners--;
714 }
715 }
716
717 /*
718 * Authorize a request.
719 *
720 * scope - the scope of the request as defined by KAUTH_SCOPE_* or as
721 * returned from kauth_register_scope().
722 * credential - credentials of the user ("actor") making the request.
723 * action - request identifier.
724 * arg[0-3] - passed unmodified to listener(s).
725 */
726 int
727 kauth_authorize_action(kauth_scope_t scope, kauth_cred_t cred,
728 kauth_action_t action, void *arg0, void *arg1,
729 void *arg2, void *arg3)
730 {
731 kauth_listener_t listener;
732 int error, allow, fail;
733
734 /* Sanitize input */
735 if (scope == NULL || cred == NULL)
736 return (EFAULT);
737 if (!action)
738 return (EINVAL);
739
740 /*
741 * Each scope is associated with at least one listener. We need to
742 * traverse that list of listeners, as long as they return either
743 * KAUTH_REQUEST_DEFER or KAUTH_REQUEST_ALLOW.
744 */
745 fail = 0;
746 allow = 0;
747 SIMPLEQ_FOREACH(listener, &scope->listenq, listener_next) {
748 error = listener->func(cred, action, scope->cookie, arg0,
749 arg1, arg2, arg3);
750
751 if (error == KAUTH_RESULT_ALLOW)
752 allow = 1;
753 else if (error == KAUTH_RESULT_DENY)
754 fail = 1;
755 }
756
757 return ((allow && !fail) ? 0 : EPERM);
758 };
759
760 /*
761 * Generic scope default callback.
762 */
763 int
764 kauth_authorize_cb_generic(kauth_cred_t cred, kauth_action_t action,
765 void *cookie, void *arg0, void *arg1, void *arg2,
766 void *arg3)
767 {
768 int error;
769
770 error = KAUTH_RESULT_DEFER;
771
772 switch (action) {
773 case KAUTH_GENERIC_ISSUSER:
774 /* Check if credential belongs to superuser. */
775 if (cred->cr_euid == 0) {
776 u_short *acflag = (u_short *)arg0;
777
778 if (acflag != NULL)
779 *acflag |= ASU;
780
781 error = KAUTH_RESULT_ALLOW;
782 } else
783 error = KAUTH_RESULT_DENY;
784 break;
785 }
786
787 return (error);
788 }
789
790 /*
791 * Generic scope authorization wrapper.
792 */
793 int
794 kauth_authorize_generic(kauth_cred_t cred, kauth_action_t action, void *arg0)
795 {
796 return (kauth_authorize_action(kauth_builtin_scope_generic, cred,
797 action, arg0, NULL, NULL, NULL));
798 }
799
800 /*
801 * Process scope default callback.
802 */
803 int
804 kauth_authorize_cb_process(kauth_cred_t cred, kauth_action_t action,
805 void *cookie, void *arg0, void *arg1, void *arg2,
806 void *arg3)
807 {
808 struct proc *p;
809 kauth_cred_t cred2;
810 int error;
811
812 error = KAUTH_RESULT_DEFER;
813
814 p = arg0;
815 cred2 = arg1;
816
817 switch (action) {
818 case KAUTH_PROCESS_CANSIGNAL: {
819 struct proc *to;
820 int signum;
821
822 to = arg2;
823 signum = (int)(unsigned long)arg3;
824
825 if (kauth_cred_uidmatch(cred, cred2) ||
826 (signum == SIGCONT && (p->p_session == to->p_session)))
827 error = KAUTH_RESULT_ALLOW;
828 else
829 error = KAUTH_RESULT_DEFER;
830
831 break;
832 }
833
834 case KAUTH_PROCESS_CANPTRACE:
835 if (kauth_cred_uidmatch(cred, cred2))
836 error = KAUTH_RESULT_ALLOW;
837 else
838 error = KAUTH_RESULT_DENY;
839 break;
840
841 case KAUTH_PROCESS_CANSEE:
842 if (kauth_cred_uidmatch(cred, cred2))
843 error = KAUTH_RESULT_ALLOW;
844 else
845 error = KAUTH_RESULT_DENY;
846 /* arg2 - type of information [XXX NOTIMPL] */
847 break;
848 }
849
850 return (error);
851 }
852
853 /*
854 * Process scope authorization wrapper.
855 */
856 int
857 kauth_authorize_process(kauth_cred_t cred, kauth_action_t action,
858 struct proc *p, void *arg1, void *arg2, void *arg3)
859 {
860 return (kauth_authorize_action(kauth_builtin_scope_process, cred,
861 action, p, arg1, arg2, arg3));
862 }
863