source3/lib/system_smbd.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    system call wrapper interface.
   4    Copyright (C) Andrew Tridgell 2002
   5    Copyright (C) Andrew Barteltt 2002
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 2 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, write to the Free Software
  19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20 */
  21
  22 /*
  23    This file may assume linkage with smbd - for things like become_root()
  24    etc.
  25 */
  26
  27 #include "includes.h"
  28
  29 #ifndef HAVE_GETGROUPLIST
  30 /*
  31   This is a *much* faster way of getting the list of groups for a user
  32   without changing the current supplemenrary group list. The old
  33   method used getgrent() which could take 20 minutes on a really big
  34   network with hundeds of thousands of groups and users. The new method
  35   takes a couple of seconds.
  36
  37   NOTE!! this function only works if it is called as root!
  38   */
  39 static int getgrouplist_internals(const char *user, gid_t gid, gid_t *groups, int *grpcnt)
  40 {
  41         gid_t *gids_saved;
  42         int ret, ngrp_saved, num_gids;
  43
  44         if (non_root_mode()) {
  45                 *grpcnt = 0;
  46                 return 0;
  47         }
  48
  49         /* work out how many groups we need to save */
  50         ngrp_saved = getgroups(0, NULL);
  51         if (ngrp_saved == -1) {
  52                 /* this shouldn't happen */
  53                 return -1;
  54         }
  55
  56         gids_saved = (gid_t *)malloc(sizeof(gid_t) * (ngrp_saved+1));
  57         if (!gids_saved) {
  58                 errno = ENOMEM;
  59                 return -1;
  60         }
  61
  62         ngrp_saved = getgroups(ngrp_saved, gids_saved);
  63         if (ngrp_saved == -1) {
  64                 SAFE_FREE(gids_saved);
  65                 /* very strange! */
  66                 return -1;
  67         }
  68
  69         if (initgroups(user, gid) != 0) {
  70                 DEBUG(0, ("getgrouplist_internals: initgroups() failed!\n"));
  71                 SAFE_FREE(gids_saved);
  72                 return -1;
  73         }
  74
  75         /* this must be done to cope with systems that put the current egid in the
  76            return from getgroups() */
  77         save_re_gid();
  78         set_effective_gid(gid);
  79         setgid(gid);
  80
  81         num_gids = getgroups(0, NULL);
  82         if (num_gids + 1 > *grpcnt) {
  83                 *grpcnt = num_gids + 1;
  84                 ret = -1;
  85         } else {
  86                 ret = getgroups(*grpcnt - 1, &groups[1]);
  87                 if (ret >= 0) {
  88                         groups[0] = gid;
  89                         *grpcnt = ret + 1;
  90                 }
  91
  92                 /* remove any duplicates gids in the list */
  93
  94                 remove_duplicate_gids( grpcnt, groups );
  95         }
  96
  97         restore_re_gid();
  98
  99         if (sys_setgroups(ngrp_saved, gids_saved) != 0) {
 100                 /* yikes! */
 101                 DEBUG(0,("ERROR: getgrouplist: failed to reset group list!\n"));
 102                 smb_panic("getgrouplist: failed to reset group list!\n");
 103                 free(gids_saved);
 104                 return -1;
 105         }
 106
 107         free(gids_saved);
 108         return ret;
 109 }
 110 #endif
 111
 112 static int sys_getgrouplist(const char *user, gid_t gid, gid_t *groups, int *grpcnt)
 113 {
 114         char *p;
 115         int retval;
 116
 117         DEBUG(10,("sys_getgrouplist: user [%s]\n", user));
 118
 119         /* see if we should disable winbindd lookups for local users */
 120         if ( (p = strchr(user, *lp_winbind_separator())) == NULL ) {
 121                 if ( !winbind_off() )
 122                         DEBUG(0,("sys_getgroup_list: Insufficient environment space for %s\n",
 123                                 WINBINDD_DONT_ENV));
 124                 else
 125                         DEBUG(10,("sys_getgrouplist(): disabled winbindd for group lookup [user == %s]\n",
 126                                 user));
 127         }
 128
 129 #ifdef HAVE_GETGROUPLIST
 130         retval = getgrouplist(user, gid, groups, grpcnt);
 131 #else
 132         become_root();
 133         retval = getgrouplist_internals(user, gid, groups, grpcnt);
 134         unbecome_root();
 135 #endif
 136
 137         /* allow winbindd lookups */
 138         winbind_on();
 139
 140         return retval;
 141 }
 142
 143 BOOL getgroups_user(const char *user, gid_t primary_gid,
 144                     gid_t **ret_groups, int *ngroups)
 145 {
 146         int ngrp, max_grp;
 147         gid_t *temp_groups;
 148         gid_t *groups;
 149         int i;
 150
 151         max_grp = groups_max();
 152         temp_groups = (gid_t *)malloc(sizeof(gid_t) * max_grp);
 153         if (! temp_groups) {
 154                 return False;
 155         }
 156
 157         if (sys_getgrouplist(user, primary_gid, temp_groups, &max_grp) == -1) {
 158
 159                 gid_t *groups_tmp;
 160
 161                 groups_tmp = Realloc(temp_groups, sizeof(gid_t) * max_grp);
 162
 163                 if (!groups_tmp) {
 164                         SAFE_FREE(temp_groups);
 165                         return False;
 166                 }
 167                 temp_groups = groups_tmp;
 168
 169                 if (sys_getgrouplist(user, primary_gid,
 170                                      temp_groups, &max_grp) == -1) {
 171                         DEBUG(0, ("get_user_groups: failed to get the unix "
 172                                   "group list\n"));
 173                         SAFE_FREE(temp_groups);
 174                         return False;
 175                 }
 176         }
 177
 178         ngrp = 0;
 179         groups = NULL;
 180
 181         /* Add in primary group first */
 182         add_gid_to_array_unique(primary_gid, &groups, &ngrp);
 183
 184         for (i=0; i<max_grp; i++)
 185                 add_gid_to_array_unique(temp_groups[i], &groups, &ngrp);
 186
 187         *ngroups = ngrp;
 188         *ret_groups = groups;
 189         SAFE_FREE(temp_groups);
 190         return True;
 191 }
 192
 193 NTSTATUS pdb_default_enum_group_memberships(struct pdb_methods *methods,
 194                                             const char *username,
 195                                             gid_t primary_gid,
 196                                             DOM_SID **sids,
 197                                             gid_t **gids,
 198                                             int *num_groups)
 199 {
 200         int i;
 201
 202         if (!getgroups_user(username, primary_gid, gids, num_groups)) {
 203                 return NT_STATUS_NO_SUCH_USER;
 204         }
 205
 206         if (*num_groups == 0) {
 207                 smb_panic("primary group missing");
 208         }
 209
 210         *sids = malloc(sizeof(**sids) * *num_groups);
 211
 212         if (*sids == NULL) {
 213                 SAFE_FREE(gids);
 214                 return NT_STATUS_NO_MEMORY;
 215         }
 216
 217         for (i=0; i<*num_groups; i++) {
 218                 if (!NT_STATUS_IS_OK(gid_to_sid(&(*sids)[i], (*gids)[i]))) {
 219                         DEBUG(1, ("get_user_groups: failed to convert "
 220                                   "gid %ld to a sid!\n",
 221                                   (long int)(*gids)[i+1]));
 222                         SAFE_FREE(*sids);
 223                         SAFE_FREE(*gids);
 224                         return NT_STATUS_NO_SUCH_USER;
 225                 }
 226         }
 227
 228         return NT_STATUS_OK;
 229 }