r23779: Change from v2 or later to v3 or later.
[samba.git] / 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 3 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 /*
32   This is a *much* faster way of getting the list of groups for a user
33   without changing the current supplementary group list. The old
34   method used getgrent() which could take 20 minutes on a really big
35   network with hundeds of thousands of groups and users. The new method
36   takes a couple of seconds.
37
38   NOTE!! this function only works if it is called as root!
39   */
40
41 static int getgrouplist_internals(const char *user, gid_t gid, gid_t *groups,
42                                   int *grpcnt)
43 {
44         gid_t *gids_saved;
45         int ret, ngrp_saved, num_gids;
46
47         if (non_root_mode()) {
48                 *grpcnt = 0;
49                 return 0;
50         }
51
52         /* work out how many groups we need to save */
53         ngrp_saved = getgroups(0, NULL);
54         if (ngrp_saved == -1) {
55                 /* this shouldn't happen */
56                 return -1;
57         }
58
59         gids_saved = SMB_MALLOC_ARRAY(gid_t, ngrp_saved+1);
60         if (!gids_saved) {
61                 errno = ENOMEM;
62                 return -1;
63         }
64
65         ngrp_saved = getgroups(ngrp_saved, gids_saved);
66         if (ngrp_saved == -1) {
67                 SAFE_FREE(gids_saved);
68                 /* very strange! */
69                 return -1;
70         }
71
72         if (initgroups(user, gid) != 0) {
73                 DEBUG(0, ("getgrouplist_internals: initgroups() failed!\n"));
74                 SAFE_FREE(gids_saved);
75                 return -1;
76         }
77
78         /* this must be done to cope with systems that put the current egid in the
79            return from getgroups() */
80         save_re_gid();
81         set_effective_gid(gid);
82         setgid(gid);
83
84         num_gids = getgroups(0, NULL);
85         if (num_gids == -1) {
86                 SAFE_FREE(gids_saved);
87                 /* very strange! */
88                 return -1;
89         }
90
91         if (num_gids + 1 > *grpcnt) {
92                 *grpcnt = num_gids + 1;
93                 ret = -1;
94         } else {
95                 ret = getgroups(*grpcnt - 1, &groups[1]);
96                 if (ret < 0) {
97                         SAFE_FREE(gids_saved);
98                         /* very strange! */
99                         return -1;
100                 }
101                 groups[0] = gid;
102                 *grpcnt = ret + 1;
103         }
104
105         restore_re_gid();
106
107         if (sys_setgroups(gid, ngrp_saved, gids_saved) != 0) {
108                 /* yikes! */
109                 DEBUG(0,("ERROR: getgrouplist: failed to reset group list!\n"));
110                 smb_panic("getgrouplist: failed to reset group list!");
111         }
112
113         free(gids_saved);
114         return ret;
115 }
116 #endif
117
118 static int sys_getgrouplist(const char *user, gid_t gid, gid_t *groups, int *grpcnt)
119 {
120         int retval;
121         BOOL winbind_env;
122
123         DEBUG(10,("sys_getgrouplist: user [%s]\n", user));
124
125         /* This is only ever called for Unix users, remote memberships are
126          * always determined by the info3 coming back from auth3 or the
127          * PAC. */
128         winbind_env = winbind_env_set();
129         winbind_off();
130
131 #ifdef HAVE_GETGROUPLIST
132         retval = getgrouplist(user, gid, groups, grpcnt);
133 #else
134         become_root();
135         retval = getgrouplist_internals(user, gid, groups, grpcnt);
136         unbecome_root();
137 #endif
138
139         /* allow winbindd lookups, but only if they were not already disabled */
140         if (!winbind_env) {
141                 winbind_on();
142         }
143
144         return retval;
145 }
146
147 BOOL getgroups_unix_user(TALLOC_CTX *mem_ctx, const char *user,
148                          gid_t primary_gid,
149                          gid_t **ret_groups, size_t *p_ngroups)
150 {
151         size_t ngrp;
152         int max_grp;
153         gid_t *temp_groups;
154         gid_t *groups;
155         int i;
156
157         max_grp = MIN(32, groups_max());
158         temp_groups = SMB_MALLOC_ARRAY(gid_t, max_grp);
159         if (! temp_groups) {
160                 return False;
161         }
162
163         if (sys_getgrouplist(user, primary_gid, temp_groups, &max_grp) == -1) {
164                 temp_groups = SMB_REALLOC_ARRAY(temp_groups, gid_t, max_grp);
165                 if (!temp_groups) {
166                         return False;
167                 }
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         if (!add_gid_to_array_unique(mem_ctx, primary_gid, &groups, &ngrp)) {
183                 SAFE_FREE(temp_groups);
184                 return False;
185         }
186
187         for (i=0; i<max_grp; i++) {
188                 if (!add_gid_to_array_unique(mem_ctx, temp_groups[i],
189                                         &groups, &ngrp)) {
190                         SAFE_FREE(temp_groups);
191                         return False;
192                 }
193         }
194
195         *p_ngroups = ngrp;
196         *ret_groups = groups;
197         SAFE_FREE(temp_groups);
198         return True;
199 }