s3-secrets: only include secrets.h when needed.
[samba.git] / source3 / auth / token_util.c
index cd67c2a213d1d25c061bac6fae7c24416da3d9c2..7634e76f1c98148ce163ca28c059662a6ef3b2cc 100644 (file)
 /* functions moved from auth/auth_util.c to minimize linker deps */
 
 #include "includes.h"
+#include "secrets.h"
 
 /****************************************************************************
  Check for a SID in an NT_USER_TOKEN
 ****************************************************************************/
 
-bool nt_token_check_sid ( const DOM_SID *sid, const NT_USER_TOKEN *token )
+bool nt_token_check_sid ( const struct dom_sid *sid, const NT_USER_TOKEN *token )
 {
        int i;
 
@@ -47,7 +48,7 @@ bool nt_token_check_sid ( const DOM_SID *sid, const NT_USER_TOKEN *token )
 
 bool nt_token_check_domain_rid( NT_USER_TOKEN *token, uint32 rid )
 {
-       DOM_SID domain_sid;
+       struct dom_sid domain_sid;
 
        /* if we are a domain member, the get the domain SID, else for
           a DC or standalone server, use our own SID */
@@ -77,23 +78,26 @@ bool nt_token_check_domain_rid( NT_USER_TOKEN *token, uint32 rid )
 
 NT_USER_TOKEN *get_root_nt_token( void )
 {
-       struct nt_user_token *token = NULL;
-       DOM_SID u_sid, g_sid;
+       struct nt_user_token *token, *for_cache;
+       struct dom_sid u_sid, g_sid;
        struct passwd *pw;
        void *cache_data;
 
        cache_data = memcache_lookup_talloc(
                NULL, SINGLETON_CACHE_TALLOC,
-               data_blob_string_const("root_nt_token"));
+               data_blob_string_const_null("root_nt_token"));
 
        if (cache_data != NULL) {
                return talloc_get_type_abort(
                        cache_data, struct nt_user_token);
        }
 
-       if ( !(pw = sys_getpwnam( "root" )) ) {
-               DEBUG(0,("get_root_nt_token: getpwnam(\"root\") failed!\n"));
-               return NULL;
+       if ( !(pw = sys_getpwuid(0)) ) {
+               if ( !(pw = sys_getpwnam("root")) ) {
+                       DEBUG(0,("get_root_nt_token: both sys_getpwuid(0) "
+                               "and sys_getpwnam(\"root\") failed!\n"));
+                       return NULL;
+               }
        }
 
        /* get the user and primary group SIDs; although the
@@ -102,14 +106,16 @@ NT_USER_TOKEN *get_root_nt_token( void )
        uid_to_sid(&u_sid, pw->pw_uid);
        gid_to_sid(&g_sid, pw->pw_gid);
 
-       token = create_local_nt_token(NULL, &u_sid, False,
+       token = create_local_nt_token(talloc_autofree_context(), &u_sid, False,
                                      1, &global_sid_Builtin_Administrators);
 
        token->privileges = se_disk_operators;
 
+       for_cache = token;
+
        memcache_add_talloc(
                NULL, SINGLETON_CACHE_TALLOC,
-               data_blob_string_const("root_nt_token"), token);
+               data_blob_string_const_null("root_nt_token"), &for_cache);
 
        return token;
 }
@@ -119,7 +125,7 @@ NT_USER_TOKEN *get_root_nt_token( void )
  * Add alias SIDs from memberships within the partially created token SID list
  */
 
-NTSTATUS add_aliases(const DOM_SID *domain_sid,
+NTSTATUS add_aliases(const struct dom_sid *domain_sid,
                     struct nt_user_token *token)
 {
        uint32 *aliases;
@@ -146,7 +152,7 @@ NTSTATUS add_aliases(const DOM_SID *domain_sid,
        }
 
        for (i=0; i<num_aliases; i++) {
-               DOM_SID alias_sid;
+               struct dom_sid alias_sid;
                sid_compose(&alias_sid, domain_sid, aliases[i]);
                status = add_sid_to_array_unique(token, &alias_sid,
                                                 &token->user_sids,
@@ -165,9 +171,10 @@ done:
 /*******************************************************************
 *******************************************************************/
 
-static NTSTATUS add_builtin_administrators( struct nt_user_token *token )
+static NTSTATUS add_builtin_administrators(struct nt_user_token *token,
+                                          const struct dom_sid *dom_sid)
 {
-       DOM_SID domadm;
+       struct dom_sid domadm;
        NTSTATUS status;
 
        /* nothing to do if we aren't in a domain */
@@ -181,10 +188,9 @@ static NTSTATUS add_builtin_administrators( struct nt_user_token *token )
        if ( IS_DC ) {
                sid_copy( &domadm, get_global_sam_sid() );
        } else {
-               if ( !secrets_fetch_domain_sid( lp_workgroup(), &domadm ) )
-                       return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
+               sid_copy(&domadm, dom_sid);
        }
-       sid_append_rid( &domadm, DOMAIN_GROUP_RID_ADMINS );
+       sid_append_rid( &domadm, DOMAIN_RID_ADMINS );
 
        /* Add Administrators if the user beloongs to Domain Admins */
 
@@ -200,15 +206,74 @@ static NTSTATUS add_builtin_administrators( struct nt_user_token *token )
        return NT_STATUS_OK;
 }
 
+/**
+ * Create the requested BUILTIN if it doesn't already exist.  This requires
+ * winbindd to be running.
+ *
+ * @param[in] rid BUILTIN rid to create
+ * @return Normal NTSTATUS return.
+ */
+static NTSTATUS create_builtin(uint32 rid)
+{
+       NTSTATUS status = NT_STATUS_OK;
+       struct dom_sid sid;
+       gid_t gid;
+
+       if (!sid_compose(&sid, &global_sid_Builtin, rid)) {
+               return NT_STATUS_NO_SUCH_ALIAS;
+       }
+
+       if (!sid_to_gid(&sid, &gid)) {
+               if (!lp_winbind_nested_groups() || !winbind_ping()) {
+                       return NT_STATUS_PROTOCOL_UNREACHABLE;
+               }
+               status = pdb_create_builtin_alias(rid);
+       }
+       return status;
+}
+
+/**
+ * Add sid as a member of builtin_sid.
+ *
+ * @param[in] builtin_sid      An existing builtin group.
+ * @param[in] dom_sid          sid to add as a member of builtin_sid.
+ * @return Normal NTSTATUS return
+ */
+static NTSTATUS add_sid_to_builtin(const struct dom_sid *builtin_sid,
+                                  const struct dom_sid *dom_sid)
+{
+       NTSTATUS status = NT_STATUS_OK;
+
+       if (!dom_sid || !builtin_sid) {
+               return NT_STATUS_INVALID_PARAMETER;
+       }
+
+       status = pdb_add_aliasmem(builtin_sid, dom_sid);
+
+       if (NT_STATUS_EQUAL(status, NT_STATUS_MEMBER_IN_ALIAS)) {
+               DEBUG(5, ("add_sid_to_builtin %s is already a member of %s\n",
+                         sid_string_dbg(dom_sid),
+                         sid_string_dbg(builtin_sid)));
+               return NT_STATUS_OK;
+       }
+
+       if (!NT_STATUS_IS_OK(status)) {
+               DEBUG(4, ("add_sid_to_builtin %s could not be added to %s: "
+                         "%s\n", sid_string_dbg(dom_sid),
+                         sid_string_dbg(builtin_sid), nt_errstr(status)));
+       }
+       return status;
+}
+
 /*******************************************************************
 *******************************************************************/
 
-static NTSTATUS create_builtin_users( void )
+NTSTATUS create_builtin_users(const struct dom_sid *dom_sid)
 {
        NTSTATUS status;
-       DOM_SID dom_users;
+       struct dom_sid dom_users;
 
-       status = pdb_create_builtin_alias( BUILTIN_ALIAS_RID_USERS );
+       status = create_builtin(BUILTIN_RID_USERS);
        if ( !NT_STATUS_IS_OK(status) ) {
                DEBUG(5,("create_builtin_users: Failed to create Users\n"));
                return status;
@@ -216,33 +281,28 @@ static NTSTATUS create_builtin_users( void )
 
        /* add domain users */
        if ((IS_DC || (lp_server_role() == ROLE_DOMAIN_MEMBER))
-               && secrets_fetch_domain_sid(lp_workgroup(), &dom_users))
+               && sid_compose(&dom_users, dom_sid, DOMAIN_RID_USERS))
        {
-               sid_append_rid(&dom_users, DOMAIN_GROUP_RID_USERS );
-               status = pdb_add_aliasmem( &global_sid_Builtin_Users, &dom_users);
-               if ( !NT_STATUS_IS_OK(status) ) {
-                       DEBUG(4,("create_builtin_administrators: Failed to add Domain Users to"
-                               " Users\n"));
-                       return status;
-               }
+               status = add_sid_to_builtin(&global_sid_Builtin_Users,
+                                           &dom_users);
        }
 
-       return NT_STATUS_OK;
+       return status;
 }
 
 /*******************************************************************
 *******************************************************************/
 
-static NTSTATUS create_builtin_administrators( void )
+NTSTATUS create_builtin_administrators(const struct dom_sid *dom_sid)
 {
        NTSTATUS status;
-       DOM_SID dom_admins, root_sid;
+       struct dom_sid dom_admins, root_sid;
        fstring root_name;
        enum lsa_SidType type;
        TALLOC_CTX *ctx;
        bool ret;
 
-       status = pdb_create_builtin_alias( BUILTIN_ALIAS_RID_ADMINS );
+       status = create_builtin(BUILTIN_RID_ADMINISTRATORS);
        if ( !NT_STATUS_IS_OK(status) ) {
                DEBUG(5,("create_builtin_administrators: Failed to create Administrators\n"));
                return status;
@@ -250,13 +310,11 @@ static NTSTATUS create_builtin_administrators( void )
 
        /* add domain admins */
        if ((IS_DC || (lp_server_role() == ROLE_DOMAIN_MEMBER))
-               && secrets_fetch_domain_sid(lp_workgroup(), &dom_admins))
+               && sid_compose(&dom_admins, dom_sid, DOMAIN_RID_ADMINS))
        {
-               sid_append_rid(&dom_admins, DOMAIN_GROUP_RID_ADMINS);
-               status = pdb_add_aliasmem( &global_sid_Builtin_Administrators, &dom_admins );
-               if ( !NT_STATUS_IS_OK(status) ) {
-                       DEBUG(4,("create_builtin_administrators: Failed to add Domain Admins"
-                               " Administrators\n"));
+               status = add_sid_to_builtin(&global_sid_Builtin_Administrators,
+                                           &dom_admins);
+               if (!NT_STATUS_IS_OK(status)) {
                        return status;
                }
        }
@@ -271,32 +329,141 @@ static NTSTATUS create_builtin_administrators( void )
        TALLOC_FREE( ctx );
 
        if ( ret ) {
-               status = pdb_add_aliasmem( &global_sid_Builtin_Administrators, &root_sid );
-               if ( !NT_STATUS_IS_OK(status) ) {
-                       DEBUG(4,("create_builtin_administrators: Failed to add root"
-                               " Administrators\n"));
+               status = add_sid_to_builtin(&global_sid_Builtin_Administrators,
+                                           &root_sid);
+       }
+
+       return status;
+}
+
+static NTSTATUS finalize_local_nt_token(struct nt_user_token *result,
+                                       bool is_guest);
+
+NTSTATUS create_local_nt_token_from_info3(TALLOC_CTX *mem_ctx,
+                                         bool is_guest,
+                                         struct netr_SamInfo3 *info3,
+                                         struct extra_auth_info *extra,
+                                         struct nt_user_token **ntok)
+{
+       struct nt_user_token *usrtok = NULL;
+       NTSTATUS status;
+       int i;
+
+       DEBUG(10, ("Create local NT token for %s\n",
+                  info3->base.account_name.string));
+
+       usrtok = talloc_zero(mem_ctx, struct nt_user_token);
+       if (!usrtok) {
+               DEBUG(0, ("talloc failed\n"));
+               return NT_STATUS_NO_MEMORY;
+       }
+
+       /* Add the user and primary group sid FIRST */
+       /* check if the user rid is the special "Domain Guests" rid.
+        * If so pick the first sid for the extra sids instead as it
+        * is a local fake account */
+       usrtok->user_sids = talloc_array(usrtok, struct dom_sid, 2);
+       if (!usrtok->user_sids) {
+               TALLOC_FREE(usrtok);
+               return NT_STATUS_NO_MEMORY;
+       }
+       usrtok->num_sids = 2;
+
+       /* USER SID */
+       if (info3->base.rid == (uint32_t)(-1)) {
+               /* this is a signal the user was fake and generated,
+                * the actual SID we want to use is stored in the extra
+                * sids */
+               if (is_null_sid(&extra->user_sid)) {
+                       /* we couldn't find the user sid, bail out */
+                       DEBUG(3, ("Invalid user SID\n"));
+                       TALLOC_FREE(usrtok);
+                       return NT_STATUS_UNSUCCESSFUL;
+               }
+               sid_copy(&usrtok->user_sids[0], &extra->user_sid);
+       } else {
+               sid_copy(&usrtok->user_sids[0], info3->base.domain_sid);
+               sid_append_rid(&usrtok->user_sids[0], info3->base.rid);
+       }
+
+       /* GROUP SID */
+       if (info3->base.primary_gid == (uint32_t)(-1)) {
+               /* this is a signal the user was fake and generated,
+                * the actual SID we want to use is stored in the extra
+                * sids */
+               if (is_null_sid(&extra->pgid_sid)) {
+                       /* we couldn't find the user sid, bail out */
+                       DEBUG(3, ("Invalid group SID\n"));
+                       TALLOC_FREE(usrtok);
+                       return NT_STATUS_UNSUCCESSFUL;
+               }
+               sid_copy(&usrtok->user_sids[1], &extra->pgid_sid);
+       } else {
+               sid_copy(&usrtok->user_sids[1], info3->base.domain_sid);
+               sid_append_rid(&usrtok->user_sids[1],
+                               info3->base.primary_gid);
+       }
+
+       /* Now the SIDs we got from authentication. These are the ones from
+        * the info3 struct or from the pdb_enum_group_memberships, depending
+        * on who authenticated the user.
+        * Note that we start the for loop at "1" here, we already added the
+        * first group sid as primary above. */
+
+       for (i = 0; i < info3->base.groups.count; i++) {
+               struct dom_sid tmp_sid;
+
+               sid_copy(&tmp_sid, info3->base.domain_sid);
+               sid_append_rid(&tmp_sid, info3->base.groups.rids[i].rid);
+
+               status = add_sid_to_array_unique(usrtok, &tmp_sid,
+                                                &usrtok->user_sids,
+                                                &usrtok->num_sids);
+               if (!NT_STATUS_IS_OK(status)) {
+                       DEBUG(3, ("Failed to add SID to nt token\n"));
+                       TALLOC_FREE(usrtok);
                        return status;
                }
        }
 
+       /* now also add extra sids if they are not the special user/group
+        * sids */
+       for (i = 0; i < info3->sidcount; i++) {
+               status = add_sid_to_array_unique(usrtok,
+                                                info3->sids[i].sid,
+                                                &usrtok->user_sids,
+                                                &usrtok->num_sids);
+               if (!NT_STATUS_IS_OK(status)) {
+                       DEBUG(3, ("Failed to add SID to nt token\n"));
+                       TALLOC_FREE(usrtok);
+                       return status;
+               }
+       }
+
+       status = finalize_local_nt_token(usrtok, is_guest);
+       if (!NT_STATUS_IS_OK(status)) {
+               DEBUG(3, ("Failed to finalize nt token\n"));
+               TALLOC_FREE(usrtok);
+               return status;
+       }
+
+       *ntok = usrtok;
        return NT_STATUS_OK;
 }
 
-
 /*******************************************************************
  Create a NT token for the user, expanding local aliases
 *******************************************************************/
 
 struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
-                                           const DOM_SID *user_sid,
+                                           const struct dom_sid *user_sid,
                                            bool is_guest,
                                            int num_groupsids,
-                                           const DOM_SID *groupsids)
+                                           const struct dom_sid *groupsids)
 {
        struct nt_user_token *result = NULL;
        int i;
        NTSTATUS status;
-       gid_t gid;
 
        DEBUG(10, ("Create local NT token for %s\n",
                   sid_string_dbg(user_sid)));
@@ -311,6 +478,7 @@ struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
        status = add_sid_to_array(result, user_sid,
                                  &result->user_sids, &result->num_sids);
        if (!NT_STATUS_IS_OK(status)) {
+               TALLOC_FREE(result);
                return NULL;
        }
 
@@ -320,21 +488,54 @@ struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
                                          &result->user_sids,
                                          &result->num_sids);
                if (!NT_STATUS_IS_OK(status)) {
+                       TALLOC_FREE(result);
                        return NULL;
                }
        }
 
+       /* Now the SIDs we got from authentication. These are the ones from
+        * the info3 struct or from the pdb_enum_group_memberships, depending
+        * on who authenticated the user.
+        * Note that we start the for loop at "1" here, we already added the
+        * first group sid as primary above. */
+
+       for (i=1; i<num_groupsids; i++) {
+               status = add_sid_to_array_unique(result, &groupsids[i],
+                                                &result->user_sids,
+                                                &result->num_sids);
+               if (!NT_STATUS_IS_OK(status)) {
+                       TALLOC_FREE(result);
+                       return NULL;
+               }
+       }
+
+       status = finalize_local_nt_token(result, is_guest);
+       if (!NT_STATUS_IS_OK(status)) {
+               TALLOC_FREE(result);
+               return NULL;
+       }
+
+       return result;
+}
+
+static NTSTATUS finalize_local_nt_token(struct nt_user_token *result,
+                                       bool is_guest)
+{
+       struct dom_sid dom_sid;
+       gid_t gid;
+       NTSTATUS status;
+
        /* Add in BUILTIN sids */
 
        status = add_sid_to_array(result, &global_sid_World,
                                  &result->user_sids, &result->num_sids);
        if (!NT_STATUS_IS_OK(status)) {
-               return NULL;
+               return status;
        }
        status = add_sid_to_array(result, &global_sid_Network,
                                  &result->user_sids, &result->num_sids);
        if (!NT_STATUS_IS_OK(status)) {
-               return NULL;
+               return status;
        }
 
        if (is_guest) {
@@ -342,7 +543,7 @@ struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
                                          &result->user_sids,
                                          &result->num_sids);
                if (!NT_STATUS_IS_OK(status)) {
-                       return NULL;
+                       return status;
                }
        } else {
                status = add_sid_to_array(result,
@@ -350,22 +551,7 @@ struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
                                          &result->user_sids,
                                          &result->num_sids);
                if (!NT_STATUS_IS_OK(status)) {
-                       return NULL;
-               }
-       }
-
-       /* Now the SIDs we got from authentication. These are the ones from
-        * the info3 struct or from the pdb_enum_group_memberships, depending
-        * on who authenticated the user.
-        * Note that we start the for loop at "1" here, we already added the
-        * first group sid as primary above. */
-
-       for (i=1; i<num_groupsids; i++) {
-               status = add_sid_to_array_unique(result, &groupsids[i],
-                                                &result->user_sids,
-                                                &result->num_sids);
-               if (!NT_STATUS_IS_OK(status)) {
-                       return NULL;
+                       return status;
                }
        }
 
@@ -373,27 +559,30 @@ struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
           be resolved then assume that the add_aliasmem( S-1-5-32 )
           handled it. */
 
-       if ( !sid_to_gid( &global_sid_Builtin_Administrators, &gid ) ) {
-               /* We can only create a mapping if winbind is running
-                  and the nested group functionality has been enabled */
+       if (!sid_to_gid(&global_sid_Builtin_Administrators, &gid)) {
 
-               if ( lp_winbind_nested_groups() && winbind_ping() ) {
-                       become_root();
-                       status = create_builtin_administrators( );
-                       if ( !NT_STATUS_IS_OK(status) ) {
-                               DEBUG(2,("WARNING: Failed to create BUILTIN\\Administrators "
-                                        "group!  Can Winbind allocate gids?\n"));
-                               /* don't fail, just log the message */
-                       }
-                       unbecome_root();
+               become_root();
+               if (!secrets_fetch_domain_sid(lp_workgroup(), &dom_sid)) {
+                       status = NT_STATUS_OK;
+                       DEBUG(3, ("Failed to fetch domain sid for %s\n",
+                                 lp_workgroup()));
+               } else {
+                       status = create_builtin_administrators(&dom_sid);
                }
-               else {
-                       status = add_builtin_administrators( result );
+               unbecome_root();
+
+               if (NT_STATUS_EQUAL(status, NT_STATUS_PROTOCOL_UNREACHABLE)) {
+                       /* Add BUILTIN\Administrators directly to token. */
+                       status = add_builtin_administrators(result, &dom_sid);
                        if ( !NT_STATUS_IS_OK(status) ) {
-                               /* just log a complaint but do not fail */
-                               DEBUG(3,("create_local_nt_token: failed to check for local Administrators"
-                                       " membership (%s)\n", nt_errstr(status)));
+                               DEBUG(3, ("Failed to check for local "
+                                         "Administrators membership (%s)\n",
+                                         nt_errstr(status)));
                        }
+               } else if (!NT_STATUS_IS_OK(status)) {
+                       DEBUG(2, ("WARNING: Failed to create "
+                                 "BUILTIN\\Administrators group!  Can "
+                                 "Winbind allocate gids?\n"));
                }
        }
 
@@ -401,19 +590,23 @@ struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
           be resolved then assume that the add_aliasmem( S-1-5-32 )
           handled it. */
 
-       if ( !sid_to_gid( &global_sid_Builtin_Users, &gid ) ) {
-               /* We can only create a mapping if winbind is running
-                  and the nested group functionality has been enabled */
+       if (!sid_to_gid(&global_sid_Builtin_Users, &gid)) {
 
-               if ( lp_winbind_nested_groups() && winbind_ping() ) {
-                       become_root();
-                       status = create_builtin_users( );
-                       if ( !NT_STATUS_IS_OK(status) ) {
-                               DEBUG(2,("WARNING: Failed to create BUILTIN\\Users group! "
-                                        "Can Winbind allocate gids?\n"));
-                               /* don't fail, just log the message */
-                       }
-                       unbecome_root();
+               become_root();
+               if (!secrets_fetch_domain_sid(lp_workgroup(), &dom_sid)) {
+                       status = NT_STATUS_OK;
+                       DEBUG(3, ("Failed to fetch domain sid for %s\n",
+                                 lp_workgroup()));
+               } else {
+                       status = create_builtin_users(&dom_sid);
+               }
+               unbecome_root();
+
+               if (!NT_STATUS_EQUAL(status, NT_STATUS_PROTOCOL_UNREACHABLE) &&
+                   !NT_STATUS_IS_OK(status))
+               {
+                       DEBUG(2, ("WARNING: Failed to create BUILTIN\\Users group! "
+                                 "Can Winbind allocate gids?\n"));
                }
        }
 
@@ -429,8 +622,7 @@ struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
 
                if (!NT_STATUS_IS_OK(status)) {
                        unbecome_root();
-                       TALLOC_FREE(result);
-                       return NULL;
+                       return status;
                }
 
                /* Finally the builtin ones */
@@ -439,17 +631,18 @@ struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
 
                if (!NT_STATUS_IS_OK(status)) {
                        unbecome_root();
-                       TALLOC_FREE(result);
-                       return NULL;
+                       return status;
                }
 
                unbecome_root();
        }
 
+       /* Add privileges based on current user sids */
 
        get_privileges_for_sids(&result->privileges, result->user_sids,
                                result->num_sids);
-       return result;
+
+       return NT_STATUS_OK;
 }
 
 /****************************************************************************
@@ -497,4 +690,316 @@ void debug_unix_user_token(int dbg_class, int dbg_lev, uid_t uid, gid_t gid,
                        (long int)groups[i]));
 }
 
+/*
+ * Create an artificial NT token given just a username. (Initially intended
+ * for force user)
+ *
+ * We go through lookup_name() to avoid problems we had with 'winbind use
+ * default domain'.
+ *
+ * We have 3 cases:
+ *
+ * unmapped unix users: Go directly to nss to find the user's group.
+ *
+ * A passdb user: The list of groups is provided by pdb_enum_group_memberships.
+ *
+ * If the user is provided by winbind, the primary gid is set to "domain
+ * users" of the user's domain. For an explanation why this is necessary, see
+ * the thread starting at
+ * http://lists.samba.org/archive/samba-technical/2006-January/044803.html.
+ */
+
+NTSTATUS create_token_from_username(TALLOC_CTX *mem_ctx, const char *username,
+                                   bool is_guest,
+                                   uid_t *uid, gid_t *gid,
+                                   char **found_username,
+                                   struct nt_user_token **token)
+{
+       NTSTATUS result = NT_STATUS_NO_SUCH_USER;
+       TALLOC_CTX *tmp_ctx = talloc_stackframe();
+       struct dom_sid user_sid;
+       enum lsa_SidType type;
+       gid_t *gids;
+       struct dom_sid *group_sids;
+       struct dom_sid unix_group_sid;
+       size_t num_group_sids;
+       size_t num_gids;
+       size_t i;
+
+       if (!lookup_name_smbconf(tmp_ctx, username, LOOKUP_NAME_ALL,
+                        NULL, NULL, &user_sid, &type)) {
+               DEBUG(1, ("lookup_name_smbconf for %s failed\n", username));
+               goto done;
+       }
+
+       if (type != SID_NAME_USER) {
+               DEBUG(1, ("%s is a %s, not a user\n", username,
+                         sid_type_lookup(type)));
+               goto done;
+       }
+
+       if (sid_check_is_in_our_domain(&user_sid)) {
+               bool ret;
+
+               /* This is a passdb user, so ask passdb */
+
+               struct samu *sam_acct = NULL;
+
+               if ( !(sam_acct = samu_new( tmp_ctx )) ) {
+                       result = NT_STATUS_NO_MEMORY;
+                       goto done;
+               }
+
+               become_root();
+               ret = pdb_getsampwsid(sam_acct, &user_sid);
+               unbecome_root();
+
+               if (!ret) {
+                       DEBUG(1, ("pdb_getsampwsid(%s) for user %s failed\n",
+                                 sid_string_dbg(&user_sid), username));
+                       DEBUGADD(1, ("Fall back to unix user %s\n", username));
+                       goto unix_user;
+               }
+
+               result = pdb_enum_group_memberships(tmp_ctx, sam_acct,
+                                                   &group_sids, &gids,
+                                                   &num_group_sids);
+               if (!NT_STATUS_IS_OK(result)) {
+                       DEBUG(1, ("enum_group_memberships failed for %s (%s): "
+                                 "%s\n", username, sid_string_dbg(&user_sid),
+                                 nt_errstr(result)));
+                       DEBUGADD(1, ("Fall back to unix user %s\n", username));
+                       goto unix_user;
+               }
+
+               /* see the smb_panic() in pdb_default_enum_group_memberships */
+               SMB_ASSERT(num_group_sids > 0);
+
+               *gid = gids[0];
+
+               /* Ensure we're returning the found_username on the right context. */
+               *found_username = talloc_strdup(mem_ctx,
+                                               pdb_get_username(sam_acct));
+
+               /*
+                * If the SID from lookup_name() was the guest sid, passdb knows
+                * about the mapping of guest sid to lp_guestaccount()
+                * username and will return the unix_pw info for a guest
+                * user. Use it if it's there, else lookup the *uid details
+                * using getpwnam_alloc(). See bug #6291 for details. JRA.
+                */
+
+               /* We must always assign the *uid. */
+               if (sam_acct->unix_pw == NULL) {
+                       struct passwd *pwd = getpwnam_alloc(sam_acct, *found_username );
+                       if (!pwd) {
+                               DEBUG(10, ("getpwnam_alloc failed for %s\n",
+                                       *found_username));
+                               result = NT_STATUS_NO_SUCH_USER;
+                               goto done;
+                       }
+                       result = samu_set_unix(sam_acct, pwd );
+                       if (!NT_STATUS_IS_OK(result)) {
+                               DEBUG(10, ("samu_set_unix failed for %s\n",
+                                       *found_username));
+                               result = NT_STATUS_NO_SUCH_USER;
+                               goto done;
+                       }
+               }
+               *uid = sam_acct->unix_pw->pw_uid;
+
+       } else  if (sid_check_is_in_unix_users(&user_sid)) {
+
+               /* This is a unix user not in passdb. We need to ask nss
+                * directly, without consulting passdb */
+
+               struct passwd *pass;
+
+               /*
+                * This goto target is used as a fallback for the passdb
+                * case. The concrete bug report is when passdb gave us an
+                * unmapped gid.
+                */
+
+       unix_user:
+
+               if (!sid_to_uid(&user_sid, uid)) {
+                       DEBUG(1, ("unix_user case, sid_to_uid for %s (%s) failed\n",
+                                 username, sid_string_dbg(&user_sid)));
+                       result = NT_STATUS_NO_SUCH_USER;
+                       goto done;
+               }
+
+               uid_to_unix_users_sid(*uid, &user_sid);
+
+               pass = getpwuid_alloc(tmp_ctx, *uid);
+               if (pass == NULL) {
+                       DEBUG(1, ("getpwuid(%u) for user %s failed\n",
+                                 (unsigned int)*uid, username));
+                       goto done;
+               }
+
+               if (!getgroups_unix_user(tmp_ctx, username, pass->pw_gid,
+                                        &gids, &num_group_sids)) {
+                       DEBUG(1, ("getgroups_unix_user for user %s failed\n",
+                                 username));
+                       goto done;
+               }
+
+               if (num_group_sids) {
+                       group_sids = TALLOC_ARRAY(tmp_ctx, struct dom_sid, num_group_sids);
+                       if (group_sids == NULL) {
+                               DEBUG(1, ("TALLOC_ARRAY failed\n"));
+                               result = NT_STATUS_NO_MEMORY;
+                               goto done;
+                       }
+               } else {
+                       group_sids = NULL;
+               }
+
+               for (i=0; i<num_group_sids; i++) {
+                       gid_to_sid(&group_sids[i], gids[i]);
+               }
+
+               /* In getgroups_unix_user we always set the primary gid */
+               SMB_ASSERT(num_group_sids > 0);
+
+               *gid = gids[0];
+
+               /* Ensure we're returning the found_username on the right context. */
+               *found_username = talloc_strdup(mem_ctx, pass->pw_name);
+       } else {
+
+               /* This user is from winbind, force the primary gid to the
+                * user's "domain users" group. Under certain circumstances
+                * (user comes from NT4), this might be a loss of
+                * information. But we can not rely on winbind getting the
+                * correct info. AD might prohibit winbind looking up that
+                * information. */
+
+               uint32 dummy;
+
+               /* We must always assign the *uid. */
+               if (!sid_to_uid(&user_sid, uid)) {
+                       DEBUG(1, ("winbindd case, sid_to_uid for %s (%s) failed\n",
+                                 username, sid_string_dbg(&user_sid)));
+                       result = NT_STATUS_NO_SUCH_USER;
+                       goto done;
+               }
+
+               num_group_sids = 1;
+               group_sids = TALLOC_ARRAY(tmp_ctx, struct dom_sid, num_group_sids);
+               if (group_sids == NULL) {
+                       DEBUG(1, ("TALLOC_ARRAY failed\n"));
+                       result = NT_STATUS_NO_MEMORY;
+                       goto done;
+               }
+
+               sid_copy(&group_sids[0], &user_sid);
+               sid_split_rid(&group_sids[0], &dummy);
+               sid_append_rid(&group_sids[0], DOMAIN_RID_USERS);
+
+               if (!sid_to_gid(&group_sids[0], gid)) {
+                       DEBUG(1, ("sid_to_gid(%s) failed\n",
+                                 sid_string_dbg(&group_sids[0])));
+                       goto done;
+               }
+
+               gids = gid;
+
+               /* Ensure we're returning the found_username on the right context. */
+               *found_username = talloc_strdup(mem_ctx, username);
+       }
+
+       /* Add the "Unix Group" SID for each gid to catch mapped groups
+          and their Unix equivalent.  This is to solve the backwards
+          compatibility problem of 'valid users = +ntadmin' where
+          ntadmin has been paired with "Domain Admins" in the group
+          mapping table.  Otherwise smb.conf would need to be changed
+          to 'valid user = "Domain Admins"'.  --jerry */
+
+       num_gids = num_group_sids;
+       for ( i=0; i<num_gids; i++ ) {
+               gid_t high, low;
+
+               /* don't pickup anything managed by Winbind */
+
+               if ( lp_idmap_gid(&low, &high) && (gids[i] >= low) && (gids[i] <= high) )
+                       continue;
+
+               gid_to_unix_groups_sid(gids[i], &unix_group_sid);
+
+               result = add_sid_to_array_unique(tmp_ctx, &unix_group_sid,
+                                                &group_sids, &num_group_sids);
+               if (!NT_STATUS_IS_OK(result)) {
+                       goto done;
+               }
+       }
+
+       /* Ensure we're creating the nt_token on the right context. */
+       *token = create_local_nt_token(mem_ctx, &user_sid,
+                                      is_guest, num_group_sids, group_sids);
+
+       if ((*token == NULL) || (*found_username == NULL)) {
+               result = NT_STATUS_NO_MEMORY;
+               goto done;
+       }
+
+       result = NT_STATUS_OK;
+ done:
+       TALLOC_FREE(tmp_ctx);
+       return result;
+}
+
+/***************************************************************************
+ Build upon create_token_from_username:
+
+ Expensive helper function to figure out whether a user given its name is
+ member of a particular group.
+***************************************************************************/
+
+bool user_in_group_sid(const char *username, const struct dom_sid *group_sid)
+{
+       NTSTATUS status;
+       uid_t uid;
+       gid_t gid;
+       char *found_username;
+       struct nt_user_token *token;
+       bool result;
+       TALLOC_CTX *mem_ctx = talloc_stackframe();
+
+       status = create_token_from_username(mem_ctx, username, False,
+                                           &uid, &gid, &found_username,
+                                           &token);
+
+       if (!NT_STATUS_IS_OK(status)) {
+               DEBUG(10, ("could not create token for %s\n", username));
+               TALLOC_FREE(mem_ctx);
+               return False;
+       }
+
+       result = nt_token_check_sid(group_sid, token);
+
+       TALLOC_FREE(mem_ctx);
+       return result;
+}
+
+bool user_in_group(const char *username, const char *groupname)
+{
+       TALLOC_CTX *mem_ctx = talloc_stackframe();
+       struct dom_sid group_sid;
+       bool ret;
+
+       ret = lookup_name(mem_ctx, groupname, LOOKUP_NAME_ALL,
+                         NULL, NULL, &group_sid, NULL);
+       TALLOC_FREE(mem_ctx);
+
+       if (!ret) {
+               DEBUG(10, ("lookup_name for (%s) failed.\n", groupname));
+               return False;
+       }
+
+       return user_in_group_sid(username, &group_sid);
+}
+
 /* END */