[PATCH] Error during attempt to join key management session can leave semaphore pinned
[linux-2.6/sactl.git] / security / keys / process_keys.c
blobc089f78fb94ec170dbd042f08a4a61b9915c526e
1 /* process_keys.c: management of a process's keyrings
3 * Copyright (C) 2004-5 Red Hat, Inc. All Rights Reserved.
4 * Written by David Howells (dhowells@redhat.com)
6 * This program is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU General Public License
8 * as published by the Free Software Foundation; either version
9 * 2 of the License, or (at your option) any later version.
12 #include <linux/module.h>
13 #include <linux/init.h>
14 #include <linux/sched.h>
15 #include <linux/slab.h>
16 #include <linux/keyctl.h>
17 #include <linux/fs.h>
18 #include <linux/err.h>
19 #include <asm/uaccess.h>
20 #include "internal.h"
22 /* session keyring create vs join semaphore */
23 static DECLARE_MUTEX(key_session_sem);
25 /* the root user's tracking struct */
26 struct key_user root_key_user = {
27 .usage = ATOMIC_INIT(3),
28 .consq = LIST_HEAD_INIT(root_key_user.consq),
29 .lock = SPIN_LOCK_UNLOCKED,
30 .nkeys = ATOMIC_INIT(2),
31 .nikeys = ATOMIC_INIT(2),
32 .uid = 0,
35 /* the root user's UID keyring */
36 struct key root_user_keyring = {
37 .usage = ATOMIC_INIT(1),
38 .serial = 2,
39 .type = &key_type_keyring,
40 .user = &root_key_user,
41 .sem = __RWSEM_INITIALIZER(root_user_keyring.sem),
42 .perm = KEY_USR_ALL,
43 .flags = 1 << KEY_FLAG_INSTANTIATED,
44 .description = "_uid.0",
45 #ifdef KEY_DEBUGGING
46 .magic = KEY_DEBUG_MAGIC,
47 #endif
50 /* the root user's default session keyring */
51 struct key root_session_keyring = {
52 .usage = ATOMIC_INIT(1),
53 .serial = 1,
54 .type = &key_type_keyring,
55 .user = &root_key_user,
56 .sem = __RWSEM_INITIALIZER(root_session_keyring.sem),
57 .perm = KEY_USR_ALL,
58 .flags = 1 << KEY_FLAG_INSTANTIATED,
59 .description = "_uid_ses.0",
60 #ifdef KEY_DEBUGGING
61 .magic = KEY_DEBUG_MAGIC,
62 #endif
65 /*****************************************************************************/
67 * allocate the keyrings to be associated with a UID
69 int alloc_uid_keyring(struct user_struct *user)
71 struct key *uid_keyring, *session_keyring;
72 char buf[20];
73 int ret;
75 /* concoct a default session keyring */
76 sprintf(buf, "_uid_ses.%u", user->uid);
78 session_keyring = keyring_alloc(buf, user->uid, (gid_t) -1, 0, NULL);
79 if (IS_ERR(session_keyring)) {
80 ret = PTR_ERR(session_keyring);
81 goto error;
84 /* and a UID specific keyring, pointed to by the default session
85 * keyring */
86 sprintf(buf, "_uid.%u", user->uid);
88 uid_keyring = keyring_alloc(buf, user->uid, (gid_t) -1, 0,
89 session_keyring);
90 if (IS_ERR(uid_keyring)) {
91 key_put(session_keyring);
92 ret = PTR_ERR(uid_keyring);
93 goto error;
96 /* install the keyrings */
97 user->uid_keyring = uid_keyring;
98 user->session_keyring = session_keyring;
99 ret = 0;
101 error:
102 return ret;
104 } /* end alloc_uid_keyring() */
106 /*****************************************************************************/
108 * deal with the UID changing
110 void switch_uid_keyring(struct user_struct *new_user)
112 #if 0 /* do nothing for now */
113 struct key *old;
115 /* switch to the new user's session keyring if we were running under
116 * root's default session keyring */
117 if (new_user->uid != 0 &&
118 current->session_keyring == &root_session_keyring
120 atomic_inc(&new_user->session_keyring->usage);
122 task_lock(current);
123 old = current->session_keyring;
124 current->session_keyring = new_user->session_keyring;
125 task_unlock(current);
127 key_put(old);
129 #endif
131 } /* end switch_uid_keyring() */
133 /*****************************************************************************/
135 * install a fresh thread keyring, discarding the old one
137 int install_thread_keyring(struct task_struct *tsk)
139 struct key *keyring, *old;
140 char buf[20];
141 int ret;
143 sprintf(buf, "_tid.%u", tsk->pid);
145 keyring = keyring_alloc(buf, tsk->uid, tsk->gid, 1, NULL);
146 if (IS_ERR(keyring)) {
147 ret = PTR_ERR(keyring);
148 goto error;
151 task_lock(tsk);
152 old = tsk->thread_keyring;
153 tsk->thread_keyring = keyring;
154 task_unlock(tsk);
156 ret = 0;
158 key_put(old);
159 error:
160 return ret;
162 } /* end install_thread_keyring() */
164 /*****************************************************************************/
166 * make sure a process keyring is installed
168 int install_process_keyring(struct task_struct *tsk)
170 unsigned long flags;
171 struct key *keyring;
172 char buf[20];
173 int ret;
175 if (!tsk->signal->process_keyring) {
176 sprintf(buf, "_pid.%u", tsk->tgid);
178 keyring = keyring_alloc(buf, tsk->uid, tsk->gid, 1, NULL);
179 if (IS_ERR(keyring)) {
180 ret = PTR_ERR(keyring);
181 goto error;
184 /* attach keyring */
185 spin_lock_irqsave(&tsk->sighand->siglock, flags);
186 if (!tsk->signal->process_keyring) {
187 tsk->signal->process_keyring = keyring;
188 keyring = NULL;
190 spin_unlock_irqrestore(&tsk->sighand->siglock, flags);
192 key_put(keyring);
195 ret = 0;
196 error:
197 return ret;
199 } /* end install_process_keyring() */
201 /*****************************************************************************/
203 * install a session keyring, discarding the old one
204 * - if a keyring is not supplied, an empty one is invented
206 static int install_session_keyring(struct task_struct *tsk,
207 struct key *keyring)
209 unsigned long flags;
210 struct key *old;
211 char buf[20];
212 int ret;
214 /* create an empty session keyring */
215 if (!keyring) {
216 sprintf(buf, "_ses.%u", tsk->tgid);
218 keyring = keyring_alloc(buf, tsk->uid, tsk->gid, 1, NULL);
219 if (IS_ERR(keyring)) {
220 ret = PTR_ERR(keyring);
221 goto error;
224 else {
225 atomic_inc(&keyring->usage);
228 /* install the keyring */
229 spin_lock_irqsave(&tsk->sighand->siglock, flags);
230 old = rcu_dereference(tsk->signal->session_keyring);
231 rcu_assign_pointer(tsk->signal->session_keyring, keyring);
232 spin_unlock_irqrestore(&tsk->sighand->siglock, flags);
234 ret = 0;
236 /* we're using RCU on the pointer */
237 synchronize_rcu();
238 key_put(old);
239 error:
240 return ret;
242 } /* end install_session_keyring() */
244 /*****************************************************************************/
246 * copy the keys in a thread group for fork without CLONE_THREAD
248 int copy_thread_group_keys(struct task_struct *tsk)
250 key_check(current->thread_group->session_keyring);
251 key_check(current->thread_group->process_keyring);
253 /* no process keyring yet */
254 tsk->signal->process_keyring = NULL;
256 /* same session keyring */
257 rcu_read_lock();
258 tsk->signal->session_keyring =
259 key_get(rcu_dereference(current->signal->session_keyring));
260 rcu_read_unlock();
262 return 0;
264 } /* end copy_thread_group_keys() */
266 /*****************************************************************************/
268 * copy the keys for fork
270 int copy_keys(unsigned long clone_flags, struct task_struct *tsk)
272 key_check(tsk->thread_keyring);
274 /* no thread keyring yet */
275 tsk->thread_keyring = NULL;
276 return 0;
278 } /* end copy_keys() */
280 /*****************************************************************************/
282 * dispose of thread group keys upon thread group destruction
284 void exit_thread_group_keys(struct signal_struct *tg)
286 key_put(tg->session_keyring);
287 key_put(tg->process_keyring);
289 } /* end exit_thread_group_keys() */
291 /*****************************************************************************/
293 * dispose of keys upon thread exit
295 void exit_keys(struct task_struct *tsk)
297 key_put(tsk->thread_keyring);
299 } /* end exit_keys() */
301 /*****************************************************************************/
303 * deal with execve()
305 int exec_keys(struct task_struct *tsk)
307 unsigned long flags;
308 struct key *old;
310 /* newly exec'd tasks don't get a thread keyring */
311 task_lock(tsk);
312 old = tsk->thread_keyring;
313 tsk->thread_keyring = NULL;
314 task_unlock(tsk);
316 key_put(old);
318 /* discard the process keyring from a newly exec'd task */
319 spin_lock_irqsave(&tsk->sighand->siglock, flags);
320 old = tsk->signal->process_keyring;
321 tsk->signal->process_keyring = NULL;
322 spin_unlock_irqrestore(&tsk->sighand->siglock, flags);
324 key_put(old);
326 return 0;
328 } /* end exec_keys() */
330 /*****************************************************************************/
332 * deal with SUID programs
333 * - we might want to make this invent a new session keyring
335 int suid_keys(struct task_struct *tsk)
337 return 0;
339 } /* end suid_keys() */
341 /*****************************************************************************/
343 * the filesystem user ID changed
345 void key_fsuid_changed(struct task_struct *tsk)
347 /* update the ownership of the thread keyring */
348 if (tsk->thread_keyring) {
349 down_write(&tsk->thread_keyring->sem);
350 tsk->thread_keyring->uid = tsk->fsuid;
351 up_write(&tsk->thread_keyring->sem);
354 } /* end key_fsuid_changed() */
356 /*****************************************************************************/
358 * the filesystem group ID changed
360 void key_fsgid_changed(struct task_struct *tsk)
362 /* update the ownership of the thread keyring */
363 if (tsk->thread_keyring) {
364 down_write(&tsk->thread_keyring->sem);
365 tsk->thread_keyring->gid = tsk->fsgid;
366 up_write(&tsk->thread_keyring->sem);
369 } /* end key_fsgid_changed() */
371 /*****************************************************************************/
373 * search the process keyrings for the first matching key
374 * - we use the supplied match function to see if the description (or other
375 * feature of interest) matches
376 * - we return -EAGAIN if we didn't find any matching key
377 * - we return -ENOKEY if we found only negative matching keys
379 struct key *search_process_keyrings(struct key_type *type,
380 const void *description,
381 key_match_func_t match,
382 struct task_struct *context)
384 struct request_key_auth *rka;
385 struct key *key, *ret, *err, *instkey;
387 /* we want to return -EAGAIN or -ENOKEY if any of the keyrings were
388 * searchable, but we failed to find a key or we found a negative key;
389 * otherwise we want to return a sample error (probably -EACCES) if
390 * none of the keyrings were searchable
392 * in terms of priority: success > -ENOKEY > -EAGAIN > other error
394 key = NULL;
395 ret = NULL;
396 err = ERR_PTR(-EAGAIN);
398 /* search the thread keyring first */
399 if (context->thread_keyring) {
400 key = keyring_search_aux(context->thread_keyring,
401 context, type, description, match);
402 if (!IS_ERR(key))
403 goto found;
405 switch (PTR_ERR(key)) {
406 case -EAGAIN: /* no key */
407 if (ret)
408 break;
409 case -ENOKEY: /* negative key */
410 ret = key;
411 break;
412 default:
413 err = key;
414 break;
418 /* search the process keyring second */
419 if (context->signal->process_keyring) {
420 key = keyring_search_aux(context->signal->process_keyring,
421 context, type, description, match);
422 if (!IS_ERR(key))
423 goto found;
425 switch (PTR_ERR(key)) {
426 case -EAGAIN: /* no key */
427 if (ret)
428 break;
429 case -ENOKEY: /* negative key */
430 ret = key;
431 break;
432 default:
433 err = key;
434 break;
438 /* search the session keyring */
439 if (context->signal->session_keyring) {
440 rcu_read_lock();
441 key = keyring_search_aux(
442 rcu_dereference(context->signal->session_keyring),
443 context, type, description, match);
444 rcu_read_unlock();
446 if (!IS_ERR(key))
447 goto found;
449 switch (PTR_ERR(key)) {
450 case -EAGAIN: /* no key */
451 if (ret)
452 break;
453 case -ENOKEY: /* negative key */
454 ret = key;
455 break;
456 default:
457 err = key;
458 break;
461 /* if this process has a session keyring and that has an
462 * instantiation authorisation key in the bottom level, then we
463 * also search the keyrings of the process mentioned there */
464 if (context != current)
465 goto no_key;
467 rcu_read_lock();
468 instkey = __keyring_search_one(
469 rcu_dereference(context->signal->session_keyring),
470 &key_type_request_key_auth, NULL, 0);
471 rcu_read_unlock();
473 if (IS_ERR(instkey))
474 goto no_key;
476 rka = instkey->payload.data;
478 key = search_process_keyrings(type, description, match,
479 rka->context);
480 key_put(instkey);
482 if (!IS_ERR(key))
483 goto found;
485 switch (PTR_ERR(key)) {
486 case -EAGAIN: /* no key */
487 if (ret)
488 break;
489 case -ENOKEY: /* negative key */
490 ret = key;
491 break;
492 default:
493 err = key;
494 break;
497 /* or search the user-session keyring */
498 else {
499 key = keyring_search_aux(context->user->session_keyring,
500 context, type, description, match);
501 if (!IS_ERR(key))
502 goto found;
504 switch (PTR_ERR(key)) {
505 case -EAGAIN: /* no key */
506 if (ret)
507 break;
508 case -ENOKEY: /* negative key */
509 ret = key;
510 break;
511 default:
512 err = key;
513 break;
518 no_key:
519 /* no key - decide on the error we're going to go for */
520 key = ret ? ret : err;
522 found:
523 return key;
525 } /* end search_process_keyrings() */
527 /*****************************************************************************/
529 * lookup a key given a key ID from userspace with a given permissions mask
530 * - don't create special keyrings unless so requested
531 * - partially constructed keys aren't found unless requested
533 struct key *lookup_user_key(struct task_struct *context, key_serial_t id,
534 int create, int partial, key_perm_t perm)
536 struct key *key;
537 int ret;
539 if (!context)
540 context = current;
542 key = ERR_PTR(-ENOKEY);
544 switch (id) {
545 case KEY_SPEC_THREAD_KEYRING:
546 if (!context->thread_keyring) {
547 if (!create)
548 goto error;
550 ret = install_thread_keyring(context);
551 if (ret < 0) {
552 key = ERR_PTR(ret);
553 goto error;
557 key = context->thread_keyring;
558 atomic_inc(&key->usage);
559 break;
561 case KEY_SPEC_PROCESS_KEYRING:
562 if (!context->signal->process_keyring) {
563 if (!create)
564 goto error;
566 ret = install_process_keyring(context);
567 if (ret < 0) {
568 key = ERR_PTR(ret);
569 goto error;
573 key = context->signal->process_keyring;
574 atomic_inc(&key->usage);
575 break;
577 case KEY_SPEC_SESSION_KEYRING:
578 if (!context->signal->session_keyring) {
579 /* always install a session keyring upon access if one
580 * doesn't exist yet */
581 ret = install_session_keyring(
582 context, context->user->session_keyring);
583 if (ret < 0)
584 goto error;
587 rcu_read_lock();
588 key = rcu_dereference(context->signal->session_keyring);
589 atomic_inc(&key->usage);
590 rcu_read_unlock();
591 break;
593 case KEY_SPEC_USER_KEYRING:
594 key = context->user->uid_keyring;
595 atomic_inc(&key->usage);
596 break;
598 case KEY_SPEC_USER_SESSION_KEYRING:
599 key = context->user->session_keyring;
600 atomic_inc(&key->usage);
601 break;
603 case KEY_SPEC_GROUP_KEYRING:
604 /* group keyrings are not yet supported */
605 key = ERR_PTR(-EINVAL);
606 goto error;
608 default:
609 key = ERR_PTR(-EINVAL);
610 if (id < 1)
611 goto error;
613 key = key_lookup(id);
614 if (IS_ERR(key))
615 goto error;
616 break;
619 /* check the status */
620 if (perm) {
621 ret = key_validate(key);
622 if (ret < 0)
623 goto invalid_key;
626 ret = -EIO;
627 if (!partial && !test_bit(KEY_FLAG_INSTANTIATED, &key->flags))
628 goto invalid_key;
630 /* check the permissions */
631 ret = -EACCES;
633 if (!key_task_permission(key, context, perm))
634 goto invalid_key;
636 error:
637 return key;
639 invalid_key:
640 key_put(key);
641 key = ERR_PTR(ret);
642 goto error;
644 } /* end lookup_user_key() */
646 /*****************************************************************************/
648 * join the named keyring as the session keyring if possible, or attempt to
649 * create a new one of that name if not
650 * - if the name is NULL, an empty anonymous keyring is installed instead
651 * - named session keyring joining is done with a semaphore held
653 long join_session_keyring(const char *name)
655 struct task_struct *tsk = current;
656 struct key *keyring;
657 long ret;
659 /* if no name is provided, install an anonymous keyring */
660 if (!name) {
661 ret = install_session_keyring(tsk, NULL);
662 if (ret < 0)
663 goto error;
665 rcu_read_lock();
666 ret = rcu_dereference(tsk->signal->session_keyring)->serial;
667 rcu_read_unlock();
668 goto error;
671 /* allow the user to join or create a named keyring */
672 down(&key_session_sem);
674 /* look for an existing keyring of this name */
675 keyring = find_keyring_by_name(name, 0);
676 if (PTR_ERR(keyring) == -ENOKEY) {
677 /* not found - try and create a new one */
678 keyring = keyring_alloc(name, tsk->uid, tsk->gid, 0, NULL);
679 if (IS_ERR(keyring)) {
680 ret = PTR_ERR(keyring);
681 goto error2;
684 else if (IS_ERR(keyring)) {
685 ret = PTR_ERR(keyring);
686 goto error2;
689 /* we've got a keyring - now to install it */
690 ret = install_session_keyring(tsk, keyring);
691 if (ret < 0)
692 goto error2;
694 ret = keyring->serial;
695 key_put(keyring);
697 error2:
698 up(&key_session_sem);
699 error:
700 return ret;
702 } /* end join_session_keyring() */