trying to get HEAD building again. If you want the code
[gd/samba-autobuild/.git] / source3 / lib / username.c
index f56f7efce2efc0ade7ac071bb3a8e29a8c7075b7..98b8f33aae30990e5b245febdec17903150b310d 100644 (file)
@@ -1,8 +1,8 @@
 /* 
-   Unix SMB/Netbios implementation.
-   Version 1.9.
+   Unix SMB/CIFS implementation.
    Username handling
    Copyright (C) Andrew Tridgell 1992-1998
+   Copyright (C) Jeremy Allison 1997-2001.
    
    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
 */
 
 #include "includes.h"
-extern int DEBUGLEVEL;
 
 /* internal functions */
-static struct passwd *uname_string_combinations(char *s, struct passwd * (*fn) (char *), int N);
-static struct passwd *uname_string_combinations2(char *s, int offset, struct passwd * (*fn) (char *), int N);
+static struct passwd *uname_string_combinations(char *s, struct passwd * (*fn) (const char *), int N);
+static struct passwd *uname_string_combinations2(char *s, int offset, struct passwd * (*fn) (const char *), int N);
+
+/*****************************************************************
+ Check if a user or group name is local (this is a *local* name for
+ *local* people, there's nothing for you here...).
+*****************************************************************/
+
+static BOOL name_is_local(const char *name)
+{
+       return !(strchr_m(name, *lp_winbind_separator()));
+}
+
+/*****************************************************************
+ Splits passed user or group name to domain and user/group name parts
+ Returns True if name was splitted and False otherwise.
+*****************************************************************/
+
+BOOL split_domain_and_name(const char *name, char *domain, char* username)
+{
+       char *p = strchr(name,*lp_winbind_separator());
+       
+       
+       /* Parse a string of the form DOMAIN/user into a domain and a user */
+       DEBUG(10,("split_domain_and_name: checking whether name |%s| local or not\n", name));
+       
+       if (p) {
+               fstrcpy(username, p+1);
+               fstrcpy(domain, name);
+               domain[PTR_DIFF(p, name)] = 0;
+       } else if (lp_winbind_use_default_domain()) {
+               fstrcpy(username, name);
+               fstrcpy(domain, lp_workgroup());
+       } else {
+               return False;
+       }
+
+       DEBUG(10,("split_domain_and_name: all is fine, domain is |%s| and name is |%s|\n", domain, username));
+       return True;
+}
 
 /****************************************************************************
-get a users home directory.
+ Get a users home directory.
 ****************************************************************************/
-char *get_home_dir(char *user)
+
+char *get_user_home_dir(const char *user)
 {
-  static struct passwd *pass;
+       static struct passwd *pass;
 
-  pass = Get_Pwnam(user, False);
+       /* Ensure the user exists. */
 
-  if (!pass) return(NULL);
-  return(pass->pw_dir);      
-}
+       pass = Get_Pwnam(user);
 
+       if (!pass)
+               return(NULL);
+       /* Return home directory from struct passwd. */
+
+       return(pass->pw_dir);      
+}
 
 /*******************************************************************
-map a username from a dos name to a unix name by looking in the username
-map. Note that this modifies the name in place.
-This is the main function that should be called *once* on
-any incoming or new username - in order to canonicalize the name.
-This is being done to de-couple the case conversions from the user mapping
-function. Previously, the map_username was being called
-every time Get_Pwnam was called.
-Returns True if username was changed, false otherwise.
+ Map a username from a dos name to a unix name by looking in the username
+ map. Note that this modifies the name in place.
+ This is the main function that should be called *once* on
+ any incoming or new username - in order to canonicalize the name.
+ This is being done to de-couple the case conversions from the user mapping
+ function. Previously, the map_username was being called
+ every time Get_Pwnam was called.
+ Returns True if username was changed, false otherwise.
 ********************************************************************/
+
 BOOL map_username(char *user)
 {
-  static BOOL initialised=False;
-  static fstring last_from,last_to;
-  FILE *f;
-  char *mapfile = lp_username_map();
-  char *s;
-  pstring buf;
-  BOOL mapped_user = False;
-
-  if (!*user)
-    return False;
-
-  if (!*mapfile)
-    return False;
-
-  if (!initialised) {
-    *last_from = *last_to = 0;
-    initialised = True;
-  }
-
-  if (strequal(user,last_to))
-    return False;
-
-  if (strequal(user,last_from)) {
-    DEBUG(3,("Mapped user %s to %s\n",user,last_to));
-    fstrcpy(user,last_to);
-    return True;
-  }
+       static BOOL initialised=False;
+       static fstring last_from,last_to;
+       XFILE *f;
+       char *mapfile = lp_username_map();
+       char *s;
+       pstring buf;
+       BOOL mapped_user = False;
+
+       if (!*user)
+               return False;
+
+       if (!*mapfile)
+               return False;
+
+       if (!initialised) {
+               *last_from = *last_to = 0;
+               initialised = True;
+       }
+
+       if (strequal(user,last_to))
+               return False;
+
+       if (strequal(user,last_from)) {
+               DEBUG(3,("Mapped user %s to %s\n",user,last_to));
+               fstrcpy(user,last_to);
+               return True;
+       }
   
-  f = fopen(mapfile,"r");
-  if (!f) {
-    DEBUG(0,("can't open username map %s\n",mapfile));
-    return False;
-  }
-
-  DEBUG(4,("Scanning username map %s\n",mapfile));
-
-  while((s=fgets_slash(buf,sizeof(buf),f))!=NULL) {
-    char *unixname = s;
-    char *dosname = strchr(unixname,'=');
-    BOOL return_if_mapped = False;
-
-    if (!dosname)
-      continue;
-
-    *dosname++ = 0;
-
-    while (isspace(*unixname))
-      unixname++;
-    if ('!' == *unixname) {
-      return_if_mapped = True;
-      unixname++;
-      while (*unixname && isspace(*unixname))
-        unixname++;
-    }
-    
-    if (!*unixname || strchr("#;",*unixname))
-      continue;
-
-    {
-      int l = strlen(unixname);
-      while (l && isspace(unixname[l-1])) {
-        unixname[l-1] = 0;
-        l--;
-      }
-    }
-
-    if (strchr(dosname,'*') || user_in_list(user,dosname)) {
-      DEBUG(3,("Mapped user %s to %s\n",user,unixname));
-      mapped_user = True;
-      fstrcpy(last_from,user);
-      sscanf(unixname,"%s",user);
-      fstrcpy(last_to,user);
-      if(return_if_mapped) { 
-        fclose(f);
-        return True;
-      }
-    }
-  }
-
-  fclose(f);
-
-  /*
-   * Setup the last_from and last_to as an optimization so 
-   * that we don't scan the file again for the same user.
-   */
-  fstrcpy(last_from,user);
-  fstrcpy(last_to,user);
-
-  return mapped_user;
-}
+       f = x_fopen(mapfile,O_RDONLY, 0);
+       if (!f) {
+               DEBUG(0,("can't open username map %s. Error %s\n",mapfile, strerror(errno) ));
+               return False;
+       }
 
-/****************************************************************************
-Get_Pwnam wrapper
-****************************************************************************/
-static struct passwd *_Get_Pwnam(char *s)
-{
-  struct passwd *ret;
-
-  ret = getpwnam(s);
-  if (ret)
-    {
-#ifdef HAVE_GETPWANAM
-      struct passwd_adjunct *pwret;
-      pwret = getpwanam(s);
-      if (pwret)
-       {
-         free(ret->pw_passwd);
-         ret->pw_passwd = pwret->pwa_passwd;
+       DEBUG(4,("Scanning username map %s\n",mapfile));
+
+       while((s=fgets_slash(buf,sizeof(buf),f))!=NULL) {
+               char *unixname = s;
+               char *dosname = strchr_m(unixname,'=');
+               char **dosuserlist;
+               BOOL return_if_mapped = False;
+
+               if (!dosname)
+                       continue;
+
+               *dosname++ = 0;
+
+               while (isspace((int)*unixname))
+                       unixname++;
+
+               if ('!' == *unixname) {
+                       return_if_mapped = True;
+                       unixname++;
+                       while (*unixname && isspace((int)*unixname))
+                               unixname++;
+               }
+    
+               if (!*unixname || strchr_m("#;",*unixname))
+                       continue;
+
+               {
+                       int l = strlen(unixname);
+                       while (l && isspace((int)unixname[l-1])) {
+                               unixname[l-1] = 0;
+                               l--;
+                       }
+               }
+
+               dosuserlist = str_list_make(dosname, NULL);
+               if (!dosuserlist) {
+                       DEBUG(0,("Unable to build user list\n"));
+                       return False;
+               }
+
+               if (strchr_m(dosname,'*') || user_in_list(user, (const char **)dosuserlist, NULL, 0)) {
+                       DEBUG(3,("Mapped user %s to %s\n",user,unixname));
+                       mapped_user = True;
+                       fstrcpy(last_from,user);
+                       sscanf(unixname,"%s",user);
+                       fstrcpy(last_to,user);
+                       if(return_if_mapped) {
+                               str_list_free (&dosuserlist);
+                               x_fclose(f);
+                               return True;
+                       }
+               }
+    
+               str_list_free (&dosuserlist);
        }
-#endif
 
-    }
+       x_fclose(f);
 
-  return(ret);
-}
+       /*
+        * Setup the last_from and last_to as an optimization so 
+        * that we don't scan the file again for the same user.
+        */
+       fstrcpy(last_from,user);
+       fstrcpy(last_to,user);
 
+       return mapped_user;
+}
 
 /****************************************************************************
-a wrapper for getpwnam() that tries with all lower and all upper case 
-if the initial name fails. Also tried with first letter capitalised
-Note that this can change user!
+ * A wrapper for sys_getpwnam().  The following variations are tried:
+ *   - as transmitted
+ *   - in all lower case if this differs from transmitted
+ *   - in all upper case if this differs from transmitted
+ *   - using lp_usernamelevel() for permutations.
 ****************************************************************************/
-struct passwd *Get_Pwnam(char *user,BOOL allow_change)
+
+static struct passwd *Get_Pwnam_ret = NULL;
+
+static struct passwd *Get_Pwnam_internals(const char *user, char *user2)
 {
-  fstring user2;
-  int last_char;
-  int usernamelevel = lp_usernamelevel();
+       struct passwd *ret = NULL;
+
+       if (!user2 || !(*user2))
+               return(NULL);
+
+       if (!user || !(*user))
+               return(NULL);
+
+       /* Try in all lower case first as this is the most 
+          common case on UNIX systems */
+       strlower_m(user2);
+       DEBUG(5,("Trying _Get_Pwnam(), username as lowercase is %s\n",user2));
+       ret = getpwnam_alloc(user2);
+       if(ret)
+               goto done;
+
+       /* Try as given, if username wasn't originally lowercase */
+       if(strcmp(user, user2) != 0) {
+               DEBUG(5,("Trying _Get_Pwnam(), username as given is %s\n", user));
+               ret = getpwnam_alloc(user);
+               if(ret)
+                       goto done;
+       }
 
-  struct passwd *ret;  
+       /* Try as uppercase, if username wasn't originally uppercase */
+       strupper_m(user2);
+       if(strcmp(user, user2) != 0) {
+               DEBUG(5,("Trying _Get_Pwnam(), username as uppercase is %s\n", user2));
+               ret = getpwnam_alloc(user2);
+               if(ret)
+                       goto done;
+       }
 
-  if (!user || !(*user))
-    return(NULL);
+       /* Try all combinations up to usernamelevel */
+       strlower_m(user2);
+       DEBUG(5,("Checking combinations of %d uppercase letters in %s\n", lp_usernamelevel(), user2));
+       ret = uname_string_combinations(user2, getpwnam_alloc, lp_usernamelevel());
 
-  StrnCpy(user2,user,sizeof(user2)-1);
+done:
+       DEBUG(5,("Get_Pwnam_internals %s find user [%s]!\n",ret ? "did":"didn't", user));
 
-  if (!allow_change) {
-    user = &user2[0];
-  }
+       /* This call used to just return the 'passwd' static buffer.
+          This could then have accidental reuse implications, so 
+          we now malloc a copy, and free it in the next use.
 
-  ret = _Get_Pwnam(user);
-  if (ret) return(ret);
+          This should cause the (ab)user to segfault if it 
+          uses an old struct. 
+          
+          This is better than useing the wrong data in security
+          critical operations.
 
-  strlower(user);
-  ret = _Get_Pwnam(user);
-  if (ret)  return(ret);
+          The real fix is to make the callers free the returned 
+          malloc'ed data.
+       */
+
+       if (Get_Pwnam_ret) {
+               passwd_free(&Get_Pwnam_ret);
+       }
+       
+       Get_Pwnam_ret = ret;
 
-  strupper(user);
-  ret = _Get_Pwnam(user);
-  if (ret) return(ret);
+       return ret;
+}
 
-  /* try with first letter capitalised */
-  if (strlen(user) > 1)
-    strlower(user+1);  
-  ret = _Get_Pwnam(user);
-  if (ret) return(ret);
+/****************************************************************************
+ Get_Pwnam wrapper without modification.
+  NOTE: This with NOT modify 'user'! 
+****************************************************************************/
 
-  /* try with last letter capitalised */
-  strlower(user);
-  last_char = strlen(user)-1;
-  user[last_char] = toupper(user[last_char]);
-  ret = _Get_Pwnam(user);
-  if (ret) return(ret);
+struct passwd *Get_Pwnam(const char *user)
+{
+       fstring user2;
+       struct passwd *ret;
 
-  /* try all combinations up to usernamelevel */
-  strlower(user);
-  ret = uname_string_combinations(user, _Get_Pwnam, usernamelevel);
-  if (ret) return(ret);
+       fstrcpy(user2, user);
 
-  if (allow_change)
-    fstrcpy(user,user2);
+       DEBUG(5,("Finding user %s\n", user));
 
-  return(NULL);
+       ret = Get_Pwnam_internals(user, user2);
+       
+       return ret;  
 }
 
 /****************************************************************************
-check if a user is in a netgroup user list
+ Check if a user is in a netgroup user list.
 ****************************************************************************/
-static BOOL user_in_netgroup_list(char *user,char *ngname)
+
+static BOOL user_in_netgroup_list(const char *user, const char *ngname)
 {
 #ifdef HAVE_NETGROUP
-  static char *mydomain = NULL;
-  if (mydomain == NULL)
-    yp_get_default_domain(&mydomain);
-
-  if(mydomain == NULL)
-  {
-    DEBUG(5,("Unable to get default yp domain\n"));
-  }
-  else
-  {
-    DEBUG(5,("looking for user %s of domain %s in netgroup %s\n",
-          user, mydomain, ngname));
-    DEBUG(5,("innetgr is %s\n",
-          innetgr(ngname, NULL, user, mydomain)
-          ? "TRUE" : "FALSE"));
-
-    if (innetgr(ngname, NULL, user, mydomain))
-      return (True);
-  }
+       static char *mydomain = NULL;
+       if (mydomain == NULL)
+               yp_get_default_domain(&mydomain);
+
+       if(mydomain == NULL) {
+               DEBUG(5,("Unable to get default yp domain\n"));
+               return False;
+       }
+
+       DEBUG(5,("looking for user %s of domain %s in netgroup %s\n",
+               user, mydomain, ngname));
+       DEBUG(5,("innetgr is %s\n", innetgr(ngname, NULL, user, mydomain)
+               ? "TRUE" : "FALSE"));
+
+       if (innetgr(ngname, NULL, user, mydomain))
+               return (True);
 #endif /* HAVE_NETGROUP */
-  return False;
+       return False;
 }
 
 /****************************************************************************
-check if a user is in a UNIX user list
+ Check if a user is in a winbind group.
 ****************************************************************************/
-static BOOL user_in_group_list(char *user,char *gname)
+  
+static BOOL user_in_winbind_group_list(const char *user, const char *gname, BOOL *winbind_answered)
 {
-#ifdef HAVE_GETGRNAM 
-  struct group *gptr;
-  char **member;  
-  struct passwd *pass = Get_Pwnam(user,False);
-
-  if (pass)
-  { 
-    gptr = getgrgid(pass->pw_gid);
-    if (gptr && strequal(gptr->gr_name,gname))
-      return(True); 
-  } 
-
-  gptr = (struct group *)getgrnam(gname);
-
-  if (gptr)
-  {
-    member = gptr->gr_mem;
-    while (member && *member)
-    {
-      if (strequal(*member,user))
-        return(True);
-      member++;
-    }
-  }
-#endif /* HAVE_GETGRNAM */
-  return False;
-}            
+       int i;
+       gid_t gid, gid_low, gid_high;
+       BOOL ret = False;
+       static gid_t *groups = NULL;
+       static int num_groups = 0;
+       static fstring last_user = "";
+       *winbind_answered = False;
+       if ((gid = nametogid(gname)) == (gid_t)-1) {
+               DEBUG(0,("user_in_winbind_group_list: nametogid for group %s failed.\n",
+                       gname ));
+               goto err;
+       }
+
+       if (!lp_idmap_gid(&gid_low, &gid_high)) {
+               DEBUG(4, ("winbind gid range not configured, therefore %s cannot be a winbind group\n", gname));
+               goto err;
+       }
 
+       if (gid < gid_low || gid > gid_high) {
+               DEBUG(4, ("group %s is not a winbind group\n", gname));
+               goto err;
+       }
+       /* try to user the last user we looked up */
+       /* otherwise fall back to lookups */
+       
+       if ( !strequal( last_user, user ) || !groups )
+       {
+               /* clear any cached information */
+               
+               SAFE_FREE(groups);
+               fstrcpy( last_user, "" );
+
+               /*
+                * Get the gid's that this user belongs to.
+                */
+               if ((num_groups = winbind_getgroups(user, &groups)) == -1)
+                       return False;
+                       
+               if ( num_groups == -1 )
+                       return False;
+               if ( num_groups == 0 ) {
+                       *winbind_answered = True;
+                       return False;
+               }
+               
+               /* save the last username */
+               
+               fstrcpy( last_user, user );
+               
+       }
+       else 
+               DEBUG(10,("user_in_winbind_group_list: using cached user groups for [%s]\n", user));
+       if ( DEBUGLEVEL >= 10 ) {
+               DEBUG(10,("user_in_winbind_group_list: using groups -- "));
+               for ( i=0; i<num_groups; i++ )
+                       DEBUGADD(10,("%d ", groups[i]));
+               DEBUGADD(10,("\n"));    
+       }
+       /*
+        * Now we have the gid list for this user - convert the gname
+        * to a gid_t via either winbind or the local UNIX lookup and do the comparison.
+        */
+       for (i = 0; i < num_groups; i++) {
+               if (gid == groups[i]) {
+                       ret = True;
+                       break;
+               }
+       }
+       *winbind_answered = True;
+       SAFE_FREE(groups);
+       return ret;
+   err:
+       *winbind_answered = False;
+       SAFE_FREE(groups);
+       return False;
+}            
 /****************************************************************************
-check if a user is in a user list - can check combinations of UNIX
-and netgroup lists.
+ Check if a user is in a UNIX group.
 ****************************************************************************/
-BOOL user_in_list(char *user,char *list)
+
+BOOL user_in_unix_group_list(const char *user,const char *gname)
 {
-  pstring tok;
-  char *p=list;
-
-  while (next_token(&p,tok,LIST_SEP, sizeof(tok)))
-  {
-    /*
-     * Check raw username.
-     */
-    if (strequal(user,tok))
-      return(True);
-
-    /*
-     * Now check to see if any combination
-     * of UNIX and netgroups has been specified.
-     */
-
-    if(*tok == '@')
-    {
-      /*
-       * Old behaviour. Check netgroup list
-       * followed by UNIX list.
-       */
-      if(user_in_netgroup_list(user,&tok[1]))
-        return True;
-      if(user_in_group_list(user,&tok[1]))
-        return True;
-    }
-    else if (*tok == '+')
-    {
-      if(tok[1] == '&')
-      {
-        /*
-         * Search UNIX list followed by netgroup.
-         */
-        if(user_in_group_list(user,&tok[2]))
-          return True;
-        if(user_in_netgroup_list(user,&tok[2]))
-          return True;
-      }
-      else
-      {
-        /*
-         * Just search UNIX list.
-         */
-        if(user_in_group_list(user,&tok[1]))
-          return True;
-      }
-    }
-    else if (*tok == '&')
-    {
-      if(tok[1] == '&')
-      {
-        /*
-         * Search netgroup list followed by UNIX list.
-         */
-        if(user_in_netgroup_list(user,&tok[2]))
-          return True;
-        if(user_in_group_list(user,&tok[2]))
-          return True;
-      }
-      else
-      {
-        /*
-         * Just search netgroup list.
-         */
-        if(user_in_netgroup_list(user,&tok[1]))
-          return True;
-      }
-    }
-  }
-  return(False);
-}
+       struct passwd *pass = Get_Pwnam(user);
+       struct sys_userlist *user_list;
+       struct sys_userlist *member;
+
+       DEBUG(10,("user_in_unix_group_list: checking user %s in group %s\n", user, gname));
+
+       /*
+        * We need to check the users primary group as this
+        * group is implicit and often not listed in the group database.
+        */
+       if (pass) {
+               if (strequal(gname,gidtoname(pass->pw_gid))) {
+                       DEBUG(10,("user_in_unix_group_list: group %s is primary group.\n", gname ));
+                       return True;
+               }
+       }
+       user_list = get_users_in_group(gname);
+       if (user_list == NULL) {
+               DEBUG(10,("user_in_unix_group_list: no such group %s\n", gname ));
+               return False;
+       }
+
+       for (member = user_list; member; member = member->next) {
+               DEBUG(10,("user_in_unix_group_list: checking user %s against member %s\n",
+                       user, member->unix_name ));
+               if (strequal(member->unix_name,user)) {
+                       free_userlist(user_list);
+                       return(True);
+               }
+       }
+
+       free_userlist(user_list);
+       return False;
+}            
 
-/* The functions below have been taken from password.c and slightly modified */
 /****************************************************************************
-apply a function to upper/lower case combinations
-of a string and return true if one of them returns true.
-try all combinations with N uppercase letters.
-offset is the first char to try and change (start with 0)
-it assumes the string starts lowercased
+ Check if a user is in a group list. Ask winbind first, then use UNIX.
 ****************************************************************************/
-static struct passwd *uname_string_combinations2(char *s,int offset,struct passwd *(*fn)(char *),int N)
+
+BOOL user_in_group_list(const char *user, const char *gname, gid_t *groups, size_t n_groups)
 {
-  int len = strlen(s);
-  int i;
-  struct passwd *ret;
+       BOOL winbind_answered = False;
+       BOOL ret;
+       gid_t gid;
+       unsigned i;
+
+       gid = nametogid(gname);
+       if (gid == (gid_t)-1) 
+               return False;
+
+       if (groups && n_groups > 0) {
+               for (i=0; i < n_groups; i++) {
+                       if (groups[i] == gid) {
+                               return True;
+                       }
+               }
+               return False;
+       }
+
+       /* fallback if we don't yet have the group list */
 
-#ifdef PASSWORD_LENGTH
-  len = MIN(len,PASSWORD_LENGTH);
-#endif
+       ret = user_in_winbind_group_list(user, gname, &winbind_answered);
+       if (!winbind_answered)
+               ret = user_in_unix_group_list(user, gname);
 
-  if (N <= 0 || offset >= len)
-    return(fn(s));
+       if (ret)
+               DEBUG(10,("user_in_group_list: user |%s| is in group |%s|\n", user, gname));
+       return ret;
+}
 
+/****************************************************************************
+ Check if a user is in a user list - can check combinations of UNIX
+ and netgroup lists.
+****************************************************************************/
+
+BOOL user_in_list(const char *user,const char **list, gid_t *groups, size_t n_groups)
+{
+       if (!list || !*list)
+               return False;
+
+       DEBUG(10,("user_in_list: checking user %s in list\n", user));
+
+       while (*list) {
+
+               DEBUG(10,("user_in_list: checking user |%s| against |%s|\n", user, *list));
+
+               /*
+                * Check raw username.
+                */
+               if (strequal(user, *list))
+                       return(True);
+
+               /*
+                * Now check to see if any combination
+                * of UNIX and netgroups has been specified.
+                */
+
+               if(**list == '@') {
+                       /*
+                        * Old behaviour. Check netgroup list
+                        * followed by UNIX list.
+                        */
+                       if(user_in_netgroup_list(user, *list +1))
+                               return True;
+                       if(user_in_group_list(user, *list +1, groups, n_groups))
+                               return True;
+               } else if (**list == '+') {
+
+                       if((*(*list +1)) == '&') {
+                               /*
+                                * Search UNIX list followed by netgroup.
+                                */
+                               if(user_in_group_list(user, *list +2, groups, n_groups))
+                                       return True;
+                               if(user_in_netgroup_list(user, *list +2))
+                                       return True;
+
+                       } else {
+
+                               /*
+                                * Just search UNIX list.
+                                */
+
+                               if(user_in_group_list(user, *list +1, groups, n_groups))
+                                       return True;
+                       }
+
+               } else if (**list == '&') {
+
+                       if(*(*list +1) == '+') {
+                               /*
+                                * Search netgroup list followed by UNIX list.
+                                */
+                               if(user_in_netgroup_list(user, *list +2))
+                                       return True;
+                               if(user_in_group_list(user, *list +2, groups, n_groups))
+                                       return True;
+                       } else {
+                               /*
+                                * Just search netgroup list.
+                                */
+                               if(user_in_netgroup_list(user, *list +1))
+                                       return True;
+                       }
+               } else if (!name_is_local(*list)) {
+                       /*
+                        * If user name did not match and token is not
+                        * a unix group and the token has a winbind separator in the
+                        * name then see if it is a Windows group.
+                        */
+
+                       DOM_SID g_sid;
+                       enum SID_NAME_USE name_type;
+                       BOOL winbind_answered = False;
+                       BOOL ret;
+                       fstring groupname, domain;
+                       
+                       /* Parse a string of the form DOMAIN/user into a domain and a user */
+
+                       char *p = strchr(*list,*lp_winbind_separator());
+                       
+                       DEBUG(10,("user_in_list: checking if user |%s| is in winbind group |%s|\n", user, *list));
+
+                       if (p) {
+                               fstrcpy(groupname, p+1);
+                               fstrcpy(domain, *list);
+                               domain[PTR_DIFF(p, *list)] = 0;
+
+                               /* Check to see if name is a Windows group;  Win2k native mode DCs
+                                  will return domain local groups; while NT4 or mixed mode 2k DCs
+                                  will not */
+                       
+                               if ( winbind_lookup_name(NULL, *list, &g_sid, &name_type) 
+                                       && ( name_type==SID_NAME_DOM_GRP || 
+                                          (strequal(lp_workgroup(), domain) && name_type==SID_NAME_ALIAS) ) )
+                               {
+                                       
+                                       /* Check if user name is in the Windows group */
+                                       ret = user_in_winbind_group_list(user, *list, &winbind_answered);
+                                       
+                                       if (winbind_answered && ret == True) {
+                                               DEBUG(10,("user_in_list: user |%s| is in winbind group |%s|\n", user, *list));
+                                               return ret;
+                                       }
+                               }
+                       }
+               }
+    
+               list++;
+       }
+       return(False);
+}
 
-  for (i=offset;i<(len-(N-1));i++)
+/* The functions below have been taken from password.c and slightly modified */
+/****************************************************************************
+ Apply a function to upper/lower case combinations
+ of a string and return true if one of them returns true.
+ Try all combinations with N uppercase letters.
+ offset is the first char to try and change (start with 0)
+ it assumes the string starts lowercased
+****************************************************************************/
 
-    {
-      char c = s[i];
-      if (!islower(c)) continue;
-      s[i] = toupper(c);
-      ret = uname_string_combinations2(s,i+1,fn,N-1);
-      if(ret) return(ret);
-      s[i] = c;
-    }
-  return(NULL);
+static struct passwd *uname_string_combinations2(char *s,int offset,struct passwd *(*fn)(const char *),int N)
+{
+       ssize_t len = (ssize_t)strlen(s);
+       int i;
+       struct passwd *ret;
+
+       if (N <= 0 || offset >= len)
+               return(fn(s));
+
+       for (i=offset;i<(len-(N-1));i++) {
+               char c = s[i];
+               if (!islower((int)c))
+                       continue;
+               s[i] = toupper(c);
+               ret = uname_string_combinations2(s,i+1,fn,N-1);
+               if(ret)
+                       return(ret);
+               s[i] = c;
+       }
+       return(NULL);
 }
 
 /****************************************************************************
-apply a function to upper/lower case combinations
-of a string and return true if one of them returns true.
-try all combinations with up to N uppercase letters.
-offset is the first char to try and change (start with 0)
-it assumes the string starts lowercased
+ Apply a function to upper/lower case combinations
+ of a string and return true if one of them returns true.
+ Try all combinations with up to N uppercase letters.
+ offset is the first char to try and change (start with 0)
+ it assumes the string starts lowercased
 ****************************************************************************/
-static struct passwd * uname_string_combinations(char *s,struct passwd * (*fn)(char *),int N)
+
+static struct passwd * uname_string_combinations(char *s,struct passwd * (*fn)(const char *),int N)
 {
-  int n;
-  struct passwd *ret;
-
-  for (n=1;n<=N;n++)
-  {
-    ret = uname_string_combinations2(s,0,fn,n);
-    if(ret) return(ret);
-  }
-  return(NULL);
+       int n;
+       struct passwd *ret;
+
+       for (n=1;n<=N;n++) {
+               ret = uname_string_combinations2(s,0,fn,n);
+               if(ret)
+                       return(ret);
+       }  
+       return(NULL);
 }
+