fd2ed24a17c3c57845ca2d195efb87ce53e3df6f
[tprouty/samba.git] / source / 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 }