Wrap the unix token info in a unix_user_token in auth_serversupplied_info
[kai/samba.git] / source3 / smbd / sec_ctx.c
index 830e759d0939bf1d455586251b87f1850c21b47c..a618f06e6b2b00ff6b1b9ca82749f9a7367ec6a2 100644 (file)
@@ -1,12 +1,11 @@
 /* 
-   Unix SMB/Netbios implementation.
-   Version 1.9.
+   Unix SMB/CIFS implementation.
    uid/user handling
    Copyright (C) Tim Potter 2000
    
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
-   the Free Software Foundation; either version 2 of the License, or
+   the Free Software Foundation; either version 3 of the License, or
    (at your option) any later version.
    
    This program is distributed in the hope that it will be useful,
    GNU General Public License for more details.
    
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software
-   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #include "includes.h"
 
-extern int DEBUGLEVEL;
 extern struct current_user current_user;
 
 struct sec_ctx {
-       uid_t uid;
-       uid_t gid;
-       int ngroups;
-       gid_t *groups;
+       UNIX_USER_TOKEN ut;
        NT_USER_TOKEN *token;
 };
 
@@ -38,11 +32,28 @@ struct sec_ctx {
 static struct sec_ctx sec_ctx_stack[MAX_SEC_CTX_DEPTH + 1];
 static int sec_ctx_stack_ndx;
 
+/****************************************************************************
+ Are two UNIX tokens equal ?
+****************************************************************************/
+
+bool unix_token_equal(const UNIX_USER_TOKEN *t1, const UNIX_USER_TOKEN *t2)
+{
+       if (t1->uid != t2->uid || t1->gid != t2->gid ||
+                       t1->ngroups != t2->ngroups) {
+               return false;
+       }
+       if (memcmp(t1->groups, t2->groups,
+                       t1->ngroups*sizeof(gid_t)) != 0) {
+               return false;
+       }
+       return true;
+}
+
 /****************************************************************************
  Become the specified uid.
 ****************************************************************************/
 
-static BOOL become_uid(uid_t uid)
+static bool become_uid(uid_t uid)
 {
        /* Check for dodgy uid values */
 
@@ -60,10 +71,8 @@ static BOOL become_uid(uid_t uid)
        /* Set effective user id */
 
        set_effective_uid(uid);
-       current_user.uid = uid;
 
        DO_PROFILE_INC(uid_changes);
-
        return True;
 }
 
@@ -71,7 +80,7 @@ static BOOL become_uid(uid_t uid)
  Become the specified gid.
 ****************************************************************************/
 
-static BOOL become_gid(gid_t gid)
+static bool become_gid(gid_t gid)
 {
        /* Check for dodgy gid values */
 
@@ -89,8 +98,6 @@ static BOOL become_gid(gid_t gid)
        /* Set effective group id */
 
        set_effective_gid(gid);
-       current_user.gid = gid;
-       
        return True;
 }
 
@@ -98,7 +105,7 @@ static BOOL become_gid(gid_t gid)
  Become the specified uid and gid.
 ****************************************************************************/
 
-static BOOL become_id(uid_t uid, gid_t gid)
+static bool become_id(uid_t uid, gid_t gid)
 {
        return become_gid(gid) && become_uid(uid);
 }
@@ -138,173 +145,171 @@ static void gain_root(void)
  Get the list of current groups.
 ****************************************************************************/
 
-int get_current_groups(int *p_ngroups, gid_t **p_groups)
+static int get_current_groups(gid_t gid, size_t *p_ngroups, gid_t **p_groups)
 {
        int i;
        gid_t grp;
-       int ngroups = sys_getgroups(0,&grp);
-       gid_t *groups;
+       int ngroups;
+       gid_t *groups = NULL;
 
        (*p_ngroups) = 0;
        (*p_groups) = NULL;
 
-       if (ngroups <= 0)
-               return -1;
+       /* this looks a little strange, but is needed to cope with
+          systems that put the current egid in the group list
+          returned from getgroups() (tridge) */
+       save_re_gid();
+       set_effective_gid(gid);
+       setgid(gid);
+
+       ngroups = sys_getgroups(0,&grp);
+       if (ngroups <= 0) {
+               goto fail;
+       }
 
-       if((groups = (gid_t *)malloc(sizeof(gid_t)*ngroups)) == NULL) {
+       if((groups = SMB_MALLOC_ARRAY(gid_t, ngroups+1)) == NULL) {
                DEBUG(0,("setup_groups malloc fail !\n"));
-               return -1;
+               goto fail;
        }
 
        if ((ngroups = sys_getgroups(ngroups,groups)) == -1) {
-               SAFE_FREE(groups);
-               return -1;
+               goto fail;
        }
 
+       restore_re_gid();
+
        (*p_ngroups) = ngroups;
        (*p_groups) = groups;
 
-       DEBUG( 3, ( "get_current_groups: uid %u is in %u groups: ", (unsigned int)getuid() , ngroups ) );
+       DEBUG( 3, ( "get_current_groups: user is in %u groups: ", ngroups));
        for (i = 0; i < ngroups; i++ ) {
                DEBUG( 3, ( "%s%d", (i ? ", " : ""), (int)groups[i] ) );
        }
        DEBUG( 3, ( "\n" ) );
 
-    return ngroups;
-}
-
-/****************************************************************************
- Delete a SID token.
-****************************************************************************/
+       return ngroups;
 
-void delete_nt_token(NT_USER_TOKEN **pptoken)
-{
-    if (*pptoken) {
-               NT_USER_TOKEN *ptoken = *pptoken;
-        SAFE_FREE( ptoken->user_sids );
-        ZERO_STRUCTP(ptoken);
-    }
-    SAFE_FREE(*pptoken);
+fail:
+       SAFE_FREE(groups);
+       restore_re_gid();
+       return -1;
 }
 
 /****************************************************************************
- Duplicate a SID token.
+ Create a new security context on the stack.  It is the same as the old
+ one.  User changes are done using the set_sec_ctx() function.
 ****************************************************************************/
 
-NT_USER_TOKEN *dup_nt_token(NT_USER_TOKEN *ptoken)
+bool push_sec_ctx(void)
 {
-       NT_USER_TOKEN *token;
-
-       if (!ptoken)
-               return NULL;
-
-    if ((token = (NT_USER_TOKEN *)malloc( sizeof(NT_USER_TOKEN) ) ) == NULL)
-        return NULL;
+       struct sec_ctx *ctx_p;
 
-    ZERO_STRUCTP(token);
+       /* Check we don't overflow our stack */
 
-    if ((token->user_sids = (DOM_SID *)memdup( ptoken->user_sids, sizeof(DOM_SID) * ptoken->num_sids )) == NULL) {
-        SAFE_FREE(token);
-        return NULL;
-    }
+       if (sec_ctx_stack_ndx == MAX_SEC_CTX_DEPTH) {
+               DEBUG(0, ("Security context stack overflow!\n"));
+               smb_panic("Security context stack overflow!");
+       }
 
-    token->num_sids = ptoken->num_sids;
+       /* Store previous user context */
 
-       return token;
-}
+       sec_ctx_stack_ndx++;
 
-/****************************************************************************
- Initialize the groups a user belongs to.
-****************************************************************************/
+       ctx_p = &sec_ctx_stack[sec_ctx_stack_ndx];
 
-BOOL initialise_groups(char *user, uid_t uid, gid_t gid)
-{
-       struct sec_ctx *prev_ctx_p;
-       BOOL result = True;
+       ctx_p->ut.uid = geteuid();
+       ctx_p->ut.gid = getegid();
 
-       if (non_root_mode()) {
-               return True;
-       }
+       DEBUG(3, ("push_sec_ctx(%u, %u) : sec_ctx_stack_ndx = %d\n", 
+                 (unsigned int)ctx_p->ut.uid, (unsigned int)ctx_p->ut.gid, sec_ctx_stack_ndx ));
 
-       become_root();
+       ctx_p->token = dup_nt_token(NULL,
+                                   sec_ctx_stack[sec_ctx_stack_ndx-1].token);
 
-       /* Call initgroups() to get user groups */
+       ctx_p->ut.ngroups = sys_getgroups(0, NULL);
 
-       if (winbind_initgroups(user,gid) == -1) {
-               DEBUG(0,("Unable to initgroups. Error was %s\n", strerror(errno) ));
-               if (getuid() == 0) {
-                       if (gid < 0 || gid > 32767 || uid < 0 || uid > 32767) {
-                               DEBUG(0,("This is probably a problem with the account %s\n", user));
-                       }
+       if (ctx_p->ut.ngroups != 0) {
+               if (!(ctx_p->ut.groups = SMB_MALLOC_ARRAY(gid_t, ctx_p->ut.ngroups))) {
+                       DEBUG(0, ("Out of memory in push_sec_ctx()\n"));
+                       TALLOC_FREE(ctx_p->token);
+                       return False;
                }
-               result = False;
-               goto done;
-       }
-
-       /* Store groups in previous user's security context.  This will
-          always work as the become_root() call increments the stack
-          pointer. */
 
-       prev_ctx_p = &sec_ctx_stack[sec_ctx_stack_ndx - 1];
-
-       SAFE_FREE(prev_ctx_p->groups);
-       prev_ctx_p->ngroups = 0;
-
-       get_current_groups(&prev_ctx_p->ngroups, &prev_ctx_p->groups);
-
- done:
-       unbecome_root();
+               sys_getgroups(ctx_p->ut.ngroups, ctx_p->ut.groups);
+       } else {
+               ctx_p->ut.groups = NULL;
+       }
 
-       return result;
+       return True;
 }
 
 /****************************************************************************
- Create a new security context on the stack.  It is the same as the old
- one.  User changes are done using the set_sec_ctx() function.
+ Change UNIX security context. Calls panic if not successful so no return value.
 ****************************************************************************/
 
-BOOL push_sec_ctx(void)
-{
-       struct sec_ctx *ctx_p;
+#ifndef HAVE_DARWIN_INITGROUPS
 
-       /* Check we don't overflow our stack */
+/* Normal credential switch path. */
 
-       if (sec_ctx_stack_ndx == MAX_SEC_CTX_DEPTH) {
-               DEBUG(0, ("Security context stack overflow!\n"));
-               smb_panic("Security context stack overflow!\n");
+static void set_unix_security_ctx(uid_t uid, gid_t gid, int ngroups, gid_t *groups)
+{
+       /* Start context switch */
+       gain_root();
+#ifdef HAVE_SETGROUPS
+       if (sys_setgroups(gid, ngroups, groups) != 0 && !non_root_mode()) {
+               smb_panic("sys_setgroups failed");
        }
+#endif
+       become_id(uid, gid);
+       /* end context switch */
+}
 
-       /* Store previous user context */
-
-       sec_ctx_stack_ndx++;
-
-       ctx_p = &sec_ctx_stack[sec_ctx_stack_ndx];
+#else /* HAVE_DARWIN_INITGROUPS */
+
+/* The Darwin groups implementation is a little unusual. The list of
+* groups in the kernel credential is not exhaustive, but more like
+* a cache. The full group list is held in userspace and checked
+* dynamically.
+*
+* This is an optional mechanism, and setgroups(2) opts out
+* of it. That is, if you call setgroups, then the list of groups you
+* set are the only groups that are ever checked. This is not what we
+* want. We want to opt in to the dynamic resolution mechanism, so we
+* need to specify the uid of the user whose group list (cache) we are
+* setting.
+*
+* The Darwin rules are:
+*  1. Thou shalt setegid, initgroups and seteuid IN THAT ORDER
+*  2. Thou shalt not pass more that NGROUPS_MAX to initgroups
+*  3. Thou shalt leave the first entry in the groups list well alone
+*/
 
-       ctx_p->uid = geteuid();
-       ctx_p->gid = getegid();
+#include <sys/syscall.h>
 
-       DEBUG(3, ("push_sec_ctx(%u, %u) : sec_ctx_stack_ndx = %d\n", 
-                 (unsigned int)ctx_p->uid, (unsigned int)ctx_p->gid, sec_ctx_stack_ndx ));
+static void set_unix_security_ctx(uid_t uid, gid_t gid, int ngroups, gid_t *groups)
+{
+       int max = groups_max();
 
-       ctx_p->token = dup_nt_token(sec_ctx_stack[sec_ctx_stack_ndx-1].token);
+       /* Start context switch */
+       gain_root();
 
-       ctx_p->ngroups = sys_getgroups(0, NULL);
+       become_gid(gid);
 
-       if (ctx_p->ngroups != 0) {
-               if (!(ctx_p->groups = malloc(ctx_p->ngroups * sizeof(gid_t)))) {
-                       DEBUG(0, ("Out of memory in push_sec_ctx()\n"));
-                       delete_nt_token(&ctx_p->token);
-                       return False;
-               }
 
-               sys_getgroups(ctx_p->ngroups, ctx_p->groups);
-       } else {
-               ctx_p->groups = NULL;
+       if (syscall(SYS_initgroups, (ngroups > max) ? max : ngroups,
+                       groups, uid) == -1 && !non_root_mode()) {
+               DEBUG(0, ("WARNING: failed to set group list "
+                       "(%d groups) for UID %ld: %s\n",
+                       ngroups, uid, strerror(errno)));
+               smb_panic("sys_setgroups failed");
        }
 
-       return True;
+       become_uid(uid);
+       /* end context switch */
 }
 
+#endif /* HAVE_DARWIN_INITGROUPS */
+
 /****************************************************************************
  Set the current security context to a given user.
 ****************************************************************************/
@@ -318,46 +323,49 @@ void set_sec_ctx(uid_t uid, gid_t gid, int ngroups, gid_t *groups, NT_USER_TOKEN
        DEBUG(3, ("setting sec ctx (%u, %u) - sec_ctx_stack_ndx = %d\n", 
                (unsigned int)uid, (unsigned int)gid, sec_ctx_stack_ndx));
 
-       if (ngroups) {
-               int i;
+       debug_nt_user_token(DBGC_CLASS, 5, token);
+       debug_unix_user_token(DBGC_CLASS, 5, uid, gid, ngroups, groups);
 
-               DEBUG(3, ("%d user groups: \n", ngroups));
-               for (i = 0; i < ngroups; i++) {
-                       DEBUGADD(3, ("%u ", (unsigned int)groups[i]));
-               }
+       /* Change uid, gid and supplementary group list. */
+       set_unix_security_ctx(uid, gid, ngroups, groups);
 
-               DEBUG(3, ("\n"));
-       }
-       
+       ctx_p->ut.ngroups = ngroups;
 
-       gain_root();
-
-#ifdef HAVE_SETGROUPS
-       sys_setgroups(ngroups, groups);
-#endif
-
-       ctx_p->ngroups = ngroups;
-
-       SAFE_FREE(ctx_p->groups);
-       if (token && (token == ctx_p->token))
+       SAFE_FREE(ctx_p->ut.groups);
+       if (token && (token == ctx_p->token)) {
                smb_panic("DUPLICATE_TOKEN");
+       }
 
-       delete_nt_token(&ctx_p->token);
+       TALLOC_FREE(ctx_p->token);
        
-       ctx_p->groups = memdup(groups, sizeof(gid_t) * ngroups);
-       ctx_p->token = dup_nt_token(token);
+       if (ngroups) {
+               ctx_p->ut.groups = (gid_t *)memdup(groups,
+                                                  sizeof(gid_t) * ngroups);
+               if (!ctx_p->ut.groups) {
+                       smb_panic("memdup failed");
+               }
+       } else {
+               ctx_p->ut.groups = NULL;
+       }
 
-       become_id(uid, gid);
+       if (token) {
+               ctx_p->token = dup_nt_token(NULL, token);
+               if (!ctx_p->token) {
+                       smb_panic("dup_nt_token failed");
+               }
+       } else {
+               ctx_p->token = NULL;
+       }
 
-       ctx_p->uid = uid;
-       ctx_p->gid = gid;
+       ctx_p->ut.uid = uid;
+       ctx_p->ut.gid = gid;
 
        /* Update current_user stuff */
 
-       current_user.uid = uid;
-       current_user.gid = gid;
-       current_user.ngroups = ngroups;
-       current_user.groups = groups;
+       current_user.ut.uid = uid;
+       current_user.ut.gid = gid;
+       current_user.ut.ngroups = ngroups;
+       current_user.ut.groups = groups;
        current_user.nt_user_token = ctx_p->token;
 }
 
@@ -376,7 +384,7 @@ void set_root_sec_ctx(void)
  Pop a security context from the stack.
 ****************************************************************************/
 
-BOOL pop_sec_ctx(void)
+bool pop_sec_ctx(void)
 {
        struct sec_ctx *ctx_p;
        struct sec_ctx *prev_ctx_p;
@@ -385,41 +393,39 @@ BOOL pop_sec_ctx(void)
 
        if (sec_ctx_stack_ndx == 0) {
                DEBUG(0, ("Security context stack underflow!\n"));
-               smb_panic("Security context stack underflow!\n");
+               smb_panic("Security context stack underflow!");
        }
 
        ctx_p = &sec_ctx_stack[sec_ctx_stack_ndx];
 
        /* Clear previous user info */
 
-       ctx_p->uid = (uid_t)-1;
-       ctx_p->gid = (gid_t)-1;
+       ctx_p->ut.uid = (uid_t)-1;
+       ctx_p->ut.gid = (gid_t)-1;
 
-       SAFE_FREE(ctx_p->groups);
-       ctx_p->ngroups = 0;
+       SAFE_FREE(ctx_p->ut.groups);
+       ctx_p->ut.ngroups = 0;
 
-       delete_nt_token(&ctx_p->token);
+       TALLOC_FREE(ctx_p->token);
 
        /* Pop back previous user */
 
        sec_ctx_stack_ndx--;
 
-       gain_root();
-
        prev_ctx_p = &sec_ctx_stack[sec_ctx_stack_ndx];
 
-#ifdef HAVE_SETGROUPS
-       sys_setgroups(prev_ctx_p->ngroups, prev_ctx_p->groups);
-#endif
-
-       become_id(prev_ctx_p->uid, prev_ctx_p->gid);
+       /* Change uid, gid and supplementary group list. */
+       set_unix_security_ctx(prev_ctx_p->ut.uid,
+                       prev_ctx_p->ut.gid,
+                       prev_ctx_p->ut.ngroups,
+                       prev_ctx_p->ut.groups);
 
        /* Update current_user stuff */
 
-       current_user.uid = prev_ctx_p->uid;
-       current_user.gid = prev_ctx_p->gid;
-       current_user.ngroups = prev_ctx_p->ngroups;
-       current_user.groups = prev_ctx_p->groups;
+       current_user.ut.uid = prev_ctx_p->ut.uid;
+       current_user.ut.gid = prev_ctx_p->ut.gid;
+       current_user.ut.ngroups = prev_ctx_p->ut.ngroups;
+       current_user.ut.groups = prev_ctx_p->ut.groups;
        current_user.nt_user_token = prev_ctx_p->token;
 
        DEBUG(3, ("pop_sec_ctx (%u, %u) - sec_ctx_stack_ndx = %d\n", 
@@ -440,26 +446,26 @@ void init_sec_ctx(void)
        memset(sec_ctx_stack, 0, sizeof(struct sec_ctx) * MAX_SEC_CTX_DEPTH);
 
        for (i = 0; i < MAX_SEC_CTX_DEPTH; i++) {
-               sec_ctx_stack[i].uid = (uid_t)-1;
-               sec_ctx_stack[i].gid = (gid_t)-1;
+               sec_ctx_stack[i].ut.uid = (uid_t)-1;
+               sec_ctx_stack[i].ut.gid = (gid_t)-1;
        }
 
        /* Initialise first level of stack.  It is the current context */
        ctx_p = &sec_ctx_stack[0];
 
-       ctx_p->uid = geteuid();
-       ctx_p->gid = getegid();
+       ctx_p->ut.uid = geteuid();
+       ctx_p->ut.gid = getegid();
 
-       get_current_groups(&ctx_p->ngroups, &ctx_p->groups);
+       get_current_groups(ctx_p->ut.gid, &ctx_p->ut.ngroups, &ctx_p->ut.groups);
 
        ctx_p->token = NULL; /* Maps to guest user. */
 
        /* Initialise current_user global */
 
-       current_user.uid = ctx_p->uid;
-       current_user.gid = ctx_p->gid;
-       current_user.ngroups = ctx_p->ngroups;
-       current_user.groups = ctx_p->groups;
+       current_user.ut.uid = ctx_p->ut.uid;
+       current_user.ut.gid = ctx_p->ut.gid;
+       current_user.ut.ngroups = ctx_p->ut.ngroups;
+       current_user.ut.groups = ctx_p->ut.groups;
 
        /* The conn and vuid are usually taken care of by other modules.
           We initialise them here. */