tests/krb5: Add more encryption type constants
[Samba.git] / source3 / smbd / sec_ctx.c
blob56fdf1fe4761bffef06cc74e5cef53ddcd10fbe5
1 /*
2 Unix SMB/CIFS implementation.
3 uid/user handling
4 Copyright (C) Tim Potter 2000
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>.
20 #include "includes.h"
21 #include "system/passwd.h"
22 #include "smbd/smbd.h"
23 #include "smbd/globals.h"
24 #include "libcli/security/security_token.h"
25 #include "auth.h"
26 #include "smbprofile.h"
27 #include "../lib/util/setid.h"
29 extern struct current_user current_user;
31 /****************************************************************************
32 Are two UNIX tokens equal ?
33 ****************************************************************************/
35 bool unix_token_equal(const struct security_unix_token *t1, const struct security_unix_token *t2)
37 if (t1->uid != t2->uid || t1->gid != t2->gid ||
38 t1->ngroups != t2->ngroups) {
39 return false;
41 if (memcmp(t1->groups, t2->groups,
42 t1->ngroups*sizeof(gid_t)) != 0) {
43 return false;
45 return true;
48 /****************************************************************************
49 Become the specified uid.
50 ****************************************************************************/
52 static bool become_uid(uid_t uid)
54 /* Check for dodgy uid values */
56 if (uid == (uid_t)-1 ||
57 ((sizeof(uid_t) == 2) && (uid == (uid_t)65535))) {
58 if (!become_uid_done) {
59 DEBUG(1,("WARNING: using uid %d is a security risk\n",
60 (int)uid));
61 become_uid_done = true;
65 /* Set effective user id */
67 set_effective_uid(uid);
69 return True;
72 /****************************************************************************
73 Become the specified gid.
74 ****************************************************************************/
76 static bool become_gid(gid_t gid)
78 /* Check for dodgy gid values */
80 if (gid == (gid_t)-1 || ((sizeof(gid_t) == 2) &&
81 (gid == (gid_t)65535))) {
82 if (!become_gid_done) {
83 DEBUG(1,("WARNING: using gid %d is a security risk\n",
84 (int)gid));
85 become_gid_done = true;
89 /* Set effective group id */
91 set_effective_gid(gid);
92 return True;
95 /****************************************************************************
96 Drop back to root privileges in order to change to another user.
97 ****************************************************************************/
99 static void gain_root(void)
101 if (non_root_mode()) {
102 return;
105 if (geteuid() != 0) {
106 set_effective_uid(0);
108 if (geteuid() != 0) {
109 DEBUG(0,
110 ("Warning: You appear to have a trapdoor "
111 "uid system\n"));
115 if (getegid() != 0) {
116 set_effective_gid(0);
118 if (getegid() != 0) {
119 DEBUG(0,
120 ("Warning: You appear to have a trapdoor "
121 "gid system\n"));
126 /****************************************************************************
127 Get the list of current groups.
128 ****************************************************************************/
130 static int get_current_groups(gid_t gid, uint32_t *p_ngroups, gid_t **p_groups)
132 int i;
133 int ngroups;
134 gid_t *groups = NULL;
136 (*p_ngroups) = 0;
137 (*p_groups) = NULL;
139 /* this looks a little strange, but is needed to cope with
140 systems that put the current egid in the group list
141 returned from getgroups() (tridge) */
142 save_re_gid();
143 set_effective_gid(gid);
144 samba_setgid(gid);
146 ngroups = sys_getgroups(0, NULL);
147 if (ngroups <= 0) {
148 goto fail;
151 if((groups = SMB_MALLOC_ARRAY(gid_t, ngroups+1)) == NULL) {
152 DEBUG(0,("setup_groups malloc fail !\n"));
153 goto fail;
156 if ((ngroups = sys_getgroups(ngroups,groups)) == -1) {
157 goto fail;
160 restore_re_gid();
162 (*p_ngroups) = ngroups;
163 (*p_groups) = groups;
165 DEBUG( 4, ( "get_current_groups: user is in %u groups: ", ngroups));
166 for (i = 0; i < ngroups; i++ ) {
167 DEBUG( 4, ( "%s%d", (i ? ", " : ""), (int)groups[i] ) );
169 DEBUG( 4, ( "\n" ) );
171 return ngroups;
173 fail:
174 SAFE_FREE(groups);
175 restore_re_gid();
176 return -1;
179 /****************************************************************************
180 Create a new security context on the stack. It is the same as the old
181 one. User changes are done using the set_sec_ctx() function.
182 ****************************************************************************/
184 bool push_sec_ctx(void)
186 struct sec_ctx *ctx_p;
188 START_PROFILE(push_sec_ctx);
190 /* Check we don't overflow our stack */
192 if (sec_ctx_stack_ndx == MAX_SEC_CTX_DEPTH) {
193 DEBUG(0, ("Security context stack overflow!\n"));
194 smb_panic("Security context stack overflow!");
197 /* Store previous user context */
199 sec_ctx_stack_ndx++;
201 ctx_p = &sec_ctx_stack[sec_ctx_stack_ndx];
203 ctx_p->ut.uid = geteuid();
204 ctx_p->ut.gid = getegid();
206 DEBUG(4, ("push_sec_ctx(%u, %u) : sec_ctx_stack_ndx = %d\n",
207 (unsigned int)ctx_p->ut.uid, (unsigned int)ctx_p->ut.gid, sec_ctx_stack_ndx ));
209 ctx_p->token = dup_nt_token(NULL,
210 sec_ctx_stack[sec_ctx_stack_ndx-1].token);
212 ctx_p->ut.ngroups = sys_getgroups(0, NULL);
214 if (ctx_p->ut.ngroups != 0) {
215 if (!(ctx_p->ut.groups = SMB_MALLOC_ARRAY(gid_t, ctx_p->ut.ngroups))) {
216 DEBUG(0, ("Out of memory in push_sec_ctx()\n"));
217 TALLOC_FREE(ctx_p->token);
218 return False;
221 sys_getgroups(ctx_p->ut.ngroups, ctx_p->ut.groups);
222 } else {
223 ctx_p->ut.groups = NULL;
226 END_PROFILE(push_sec_ctx);
228 return True;
231 #ifndef HAVE_DARWIN_INITGROUPS
232 /****************************************************************************
233 Become the specified uid and gid.
234 ****************************************************************************/
236 static bool become_id(uid_t uid, gid_t gid)
238 return become_gid(gid) && become_uid(uid);
241 /****************************************************************************
242 Change UNIX security context. Calls panic if not successful so no return value.
243 ****************************************************************************/
244 /* Normal credential switch path. */
246 static void set_unix_security_ctx(uid_t uid, gid_t gid, int ngroups, gid_t *groups)
248 /* Start context switch */
249 gain_root();
250 #ifdef HAVE_SETGROUPS
251 if (sys_setgroups(gid, ngroups, groups) != 0 && !non_root_mode()) {
252 smb_panic("sys_setgroups failed");
254 #endif
255 become_id(uid, gid);
256 /* end context switch */
259 #else /* HAVE_DARWIN_INITGROUPS */
261 /* The Darwin groups implementation is a little unusual. The list of
262 * groups in the kernel credential is not exhaustive, but more like
263 * a cache. The full group list is held in userspace and checked
264 * dynamically.
266 * This is an optional mechanism, and setgroups(2) opts out
267 * of it. That is, if you call setgroups, then the list of groups you
268 * set are the only groups that are ever checked. This is not what we
269 * want. We want to opt in to the dynamic resolution mechanism, so we
270 * need to specify the uid of the user whose group list (cache) we are
271 * setting.
273 * The Darwin rules are:
274 * 1. Thou shalt setegid, initgroups and seteuid IN THAT ORDER
275 * 2. Thou shalt not pass more that NGROUPS_MAX to initgroups
276 * 3. Thou shalt leave the first entry in the groups list well alone
279 #include <sys/syscall.h>
281 static void set_unix_security_ctx(uid_t uid, gid_t gid, int ngroups, gid_t *groups)
283 int max = NGROUPS_MAX;
285 /* Start context switch */
286 gain_root();
288 become_gid(gid);
291 if (syscall(SYS_initgroups, (ngroups > max) ? max : ngroups,
292 groups, uid) == -1 && !non_root_mode()) {
293 DEBUG(0, ("WARNING: failed to set group list "
294 "(%d groups) for UID %d: %s\n",
295 ngroups, uid, strerror(errno)));
296 smb_panic("sys_setgroups failed");
299 become_uid(uid);
300 /* end context switch */
303 #endif /* HAVE_DARWIN_INITGROUPS */
305 /****************************************************************************
306 Set the current security context to a given user.
307 ****************************************************************************/
309 static void set_sec_ctx_internal(uid_t uid, gid_t gid,
310 int ngroups, gid_t *groups,
311 const struct security_token *token)
313 struct sec_ctx *ctx_p = &sec_ctx_stack[sec_ctx_stack_ndx];
315 /* Set the security context */
317 DEBUG(4, ("setting sec ctx (%u, %u) - sec_ctx_stack_ndx = %d\n",
318 (unsigned int)uid, (unsigned int)gid, sec_ctx_stack_ndx));
320 security_token_debug(DBGC_CLASS, 5, token);
321 debug_unix_user_token(DBGC_CLASS, 5, uid, gid, ngroups, groups);
323 /* Change uid, gid and supplementary group list. */
324 set_unix_security_ctx(uid, gid, ngroups, groups);
326 ctx_p->ut.ngroups = ngroups;
328 SAFE_FREE(ctx_p->ut.groups);
329 if (token && (token == ctx_p->token)) {
330 smb_panic("DUPLICATE_TOKEN");
333 TALLOC_FREE(ctx_p->token);
335 if (ngroups) {
336 ctx_p->ut.groups = (gid_t *)smb_xmemdup(groups,
337 sizeof(gid_t) * ngroups);
338 } else {
339 ctx_p->ut.groups = NULL;
342 if (token) {
343 ctx_p->token = dup_nt_token(NULL, token);
344 if (!ctx_p->token) {
345 smb_panic("dup_nt_token failed");
347 } else {
348 ctx_p->token = NULL;
351 ctx_p->ut.uid = uid;
352 ctx_p->ut.gid = gid;
354 /* Update current_user stuff */
356 current_user.ut.uid = uid;
357 current_user.ut.gid = gid;
358 current_user.ut.ngroups = ngroups;
359 current_user.ut.groups = groups;
360 current_user.nt_user_token = ctx_p->token;
363 * Delete any ChDir cache. We can't assume
364 * the new uid has access to current working
365 * directory.
366 * BUG: https://bugzilla.samba.org/show_bug.cgi?id=14682
368 SAFE_FREE(LastDir);
371 void set_sec_ctx(uid_t uid, gid_t gid, int ngroups, gid_t *groups, const struct security_token *token)
373 START_PROFILE(set_sec_ctx);
374 set_sec_ctx_internal(uid, gid, ngroups, groups, token);
375 END_PROFILE(set_sec_ctx);
378 /****************************************************************************
379 Become root context.
380 ****************************************************************************/
382 void set_root_sec_ctx(void)
384 /* May need to worry about supplementary groups at some stage */
386 START_PROFILE(set_root_sec_ctx);
387 set_sec_ctx_internal(0, 0, 0, NULL, NULL);
388 END_PROFILE(set_root_sec_ctx);
391 /****************************************************************************
392 Pop a security context from the stack.
393 ****************************************************************************/
395 bool pop_sec_ctx(void)
397 struct sec_ctx *ctx_p;
398 struct sec_ctx *prev_ctx_p;
400 START_PROFILE(pop_sec_ctx);
402 /* Check for stack underflow */
404 if (sec_ctx_stack_ndx == 0) {
405 DEBUG(0, ("Security context stack underflow!\n"));
406 smb_panic("Security context stack underflow!");
409 ctx_p = &sec_ctx_stack[sec_ctx_stack_ndx];
411 /* Clear previous user info */
413 ctx_p->ut.uid = (uid_t)-1;
414 ctx_p->ut.gid = (gid_t)-1;
416 SAFE_FREE(ctx_p->ut.groups);
417 ctx_p->ut.ngroups = 0;
419 TALLOC_FREE(ctx_p->token);
421 /* Pop back previous user */
423 sec_ctx_stack_ndx--;
425 prev_ctx_p = &sec_ctx_stack[sec_ctx_stack_ndx];
427 /* Change uid, gid and supplementary group list. */
428 set_unix_security_ctx(prev_ctx_p->ut.uid,
429 prev_ctx_p->ut.gid,
430 prev_ctx_p->ut.ngroups,
431 prev_ctx_p->ut.groups);
433 /* Update current_user stuff */
435 current_user.ut.uid = prev_ctx_p->ut.uid;
436 current_user.ut.gid = prev_ctx_p->ut.gid;
437 current_user.ut.ngroups = prev_ctx_p->ut.ngroups;
438 current_user.ut.groups = prev_ctx_p->ut.groups;
439 current_user.nt_user_token = prev_ctx_p->token;
441 END_PROFILE(pop_sec_ctx);
443 DEBUG(4, ("pop_sec_ctx (%u, %u) - sec_ctx_stack_ndx = %d\n",
444 (unsigned int)geteuid(), (unsigned int)getegid(), sec_ctx_stack_ndx));
446 return True;
449 /* Initialise the security context system */
451 void init_sec_ctx(void)
453 int i;
454 struct sec_ctx *ctx_p;
456 /* Initialise security context stack */
458 memset(sec_ctx_stack, 0, sizeof(struct sec_ctx) * MAX_SEC_CTX_DEPTH);
460 for (i = 0; i < MAX_SEC_CTX_DEPTH; i++) {
461 sec_ctx_stack[i].ut.uid = (uid_t)-1;
462 sec_ctx_stack[i].ut.gid = (gid_t)-1;
465 /* Initialise first level of stack. It is the current context */
466 ctx_p = &sec_ctx_stack[0];
468 ctx_p->ut.uid = geteuid();
469 ctx_p->ut.gid = getegid();
471 get_current_groups(ctx_p->ut.gid, &ctx_p->ut.ngroups, &ctx_p->ut.groups);
473 ctx_p->token = NULL; /* Maps to guest user. */
475 /* Initialise current_user global */
477 current_user.ut.uid = ctx_p->ut.uid;
478 current_user.ut.gid = ctx_p->ut.gid;
479 current_user.ut.ngroups = ctx_p->ut.ngroups;
480 current_user.ut.groups = ctx_p->ut.groups;
482 /* The conn and vuid are usually taken care of by other modules.
483 We initialise them here. */
485 current_user.conn = NULL;
486 current_user.vuid = UID_FIELD_INVALID;
487 current_user.nt_user_token = NULL;
490 /*************************************************************
491 Called when we're inside a become_root() temporary escalation
492 of privileges and the nt_user_token is NULL. Return the last
493 active token on the context stack. We know there is at least
494 one valid non-NULL token on the stack so panic if we underflow.
495 *************************************************************/
497 const struct security_token *sec_ctx_active_token(void)
499 int stack_index = sec_ctx_stack_ndx;
500 struct sec_ctx *ctx_p = &sec_ctx_stack[stack_index];
502 while (ctx_p->token == NULL) {
503 stack_index--;
504 if (stack_index < 0) {
505 DEBUG(0, ("Security context active token "
506 "stack underflow!\n"));
507 smb_panic("Security context active token "
508 "stack underflow!");
510 ctx_p = &sec_ctx_stack[stack_index];
512 return ctx_p->token;