s4-gensec: zero the gssapi_state
[samba.git] / source3 / winbindd / wb_group_members.c
1 /*
2    Unix SMB/CIFS implementation.
3    async lookupgroupmembers
4    Copyright (C) Volker Lendecke 2009
5
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 3 of the License, or
9    (at your option) any later version.
10
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15
16    You should have received a copy of the GNU General Public License
17    along with this program.  If not, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include "includes.h"
21 #include "winbindd.h"
22 #include "librpc/gen_ndr/cli_wbint.h"
23 #include "../librpc/gen_ndr/ndr_security.h"
24 #include "../libcli/security/security.h"
25
26 /*
27  * We have 3 sets of routines here:
28  *
29  * wb_lookupgroupmem is the low-level one-group routine
30  *
31  * wb_groups_members walks a list of groups
32  *
33  * wb_group_members finally is the high-level routine expanding groups
34  * recursively
35  */
36
37 /*
38  * TODO: fill_grent_mem_domusers must be re-added
39  */
40
41 /*
42  * Look up members of a single group. Essentially a wrapper around the
43  * lookup_groupmem winbindd_methods routine.
44  */
45
46 struct wb_lookupgroupmem_state {
47         struct dom_sid sid;
48         struct wbint_Principals members;
49 };
50
51 static void wb_lookupgroupmem_done(struct tevent_req *subreq);
52
53 static struct tevent_req *wb_lookupgroupmem_send(TALLOC_CTX *mem_ctx,
54                                                  struct tevent_context *ev,
55                                                  const struct dom_sid *group_sid,
56                                                  enum lsa_SidType type)
57 {
58         struct tevent_req *req, *subreq;
59         struct wb_lookupgroupmem_state *state;
60         struct winbindd_domain *domain;
61
62         req = tevent_req_create(mem_ctx, &state,
63                                 struct wb_lookupgroupmem_state);
64         if (req == NULL) {
65                 return NULL;
66         }
67         sid_copy(&state->sid, group_sid);
68
69         domain = find_domain_from_sid_noinit(group_sid);
70         if (domain == NULL) {
71                 tevent_req_nterror(req, NT_STATUS_NO_SUCH_GROUP);
72                 return tevent_req_post(req, ev);
73         }
74
75         subreq = dcerpc_wbint_LookupGroupMembers_send(
76                 state, ev, domain->child.binding_handle, &state->sid, type,
77                 &state->members);
78         if (tevent_req_nomem(subreq, req)) {
79                 return tevent_req_post(req, ev);
80         }
81         tevent_req_set_callback(subreq, wb_lookupgroupmem_done, req);
82         return req;
83 }
84
85 static void wb_lookupgroupmem_done(struct tevent_req *subreq)
86 {
87         struct tevent_req *req = tevent_req_callback_data(
88                 subreq, struct tevent_req);
89         struct wb_lookupgroupmem_state *state = tevent_req_data(
90                 req, struct wb_lookupgroupmem_state);
91         NTSTATUS status, result;
92
93         status = dcerpc_wbint_LookupGroupMembers_recv(subreq, state, &result);
94         TALLOC_FREE(subreq);
95         if (any_nt_status_not_ok(status, result, &status)) {
96                 tevent_req_nterror(req, status);
97                 return;
98         }
99         tevent_req_done(req);
100 }
101
102 static NTSTATUS wb_lookupgroupmem_recv(struct tevent_req *req,
103                                            TALLOC_CTX *mem_ctx,
104                                            int *num_members,
105                                            struct wbint_Principal **members)
106 {
107         struct wb_lookupgroupmem_state *state = tevent_req_data(
108                 req, struct wb_lookupgroupmem_state);
109         NTSTATUS status;
110
111         if (tevent_req_is_nterror(req, &status)) {
112                 return status;
113         }
114
115         *num_members = state->members.num_principals;
116         *members = talloc_move(mem_ctx, &state->members.principals);
117         return NT_STATUS_OK;
118 }
119
120 /*
121  * Same as wb_lookupgroupmem for a list of groups
122  */
123
124 struct wb_groups_members_state {
125         struct tevent_context *ev;
126         struct wbint_Principal *groups;
127         int num_groups;
128         int next_group;
129         struct wbint_Principal *all_members;
130 };
131
132 static NTSTATUS wb_groups_members_next_subreq(
133         struct wb_groups_members_state *state,
134         TALLOC_CTX *mem_ctx, struct tevent_req **psubreq);
135 static void wb_groups_members_done(struct tevent_req *subreq);
136
137 static struct tevent_req *wb_groups_members_send(TALLOC_CTX *mem_ctx,
138                                                  struct tevent_context *ev,
139                                                  int num_groups,
140                                                  struct wbint_Principal *groups)
141 {
142         struct tevent_req *req, *subreq;
143         struct wb_groups_members_state *state;
144         NTSTATUS status;
145
146         req = tevent_req_create(mem_ctx, &state,
147                                 struct wb_groups_members_state);
148         if (req == NULL) {
149                 return NULL;
150         }
151         state->ev = ev;
152         state->groups = groups;
153         state->num_groups = num_groups;
154         state->next_group = 0;
155         state->all_members = NULL;
156
157         status = wb_groups_members_next_subreq(state, state, &subreq);
158         if (!NT_STATUS_IS_OK(status)) {
159                 tevent_req_nterror(req, status);
160                 return tevent_req_post(req, ev);
161         }
162         if (subreq == NULL) {
163                 tevent_req_done(req);
164                 return tevent_req_post(req, ev);
165         }
166         tevent_req_set_callback(subreq, wb_groups_members_done, req);
167         return req;
168 }
169
170 static NTSTATUS wb_groups_members_next_subreq(
171         struct wb_groups_members_state *state,
172         TALLOC_CTX *mem_ctx, struct tevent_req **psubreq)
173 {
174         struct tevent_req *subreq;
175         struct wbint_Principal *g;
176
177         if (state->next_group >= state->num_groups) {
178                 *psubreq = NULL;
179                 return NT_STATUS_OK;
180         }
181
182         g = &state->groups[state->next_group];
183         state->next_group += 1;
184
185         subreq = wb_lookupgroupmem_send(mem_ctx, state->ev, &g->sid, g->type);
186         if (subreq == NULL) {
187                 return NT_STATUS_NO_MEMORY;
188         }
189         *psubreq = subreq;
190         return NT_STATUS_OK;
191 }
192
193 static void wb_groups_members_done(struct tevent_req *subreq)
194 {
195         struct tevent_req *req = tevent_req_callback_data(
196                 subreq, struct tevent_req);
197         struct wb_groups_members_state *state = tevent_req_data(
198                 req, struct wb_groups_members_state);
199         int i, num_all_members;
200         int num_members = 0;
201         struct wbint_Principal *members = NULL;
202         NTSTATUS status;
203
204         status = wb_lookupgroupmem_recv(subreq, state, &num_members,
205                                             &members);
206         TALLOC_FREE(subreq);
207
208         /*
209          * In this error handling here we might have to be a bit more generous
210          * and just continue if an error occured.
211          */
212
213         if (!NT_STATUS_IS_OK(status)) {
214                 tevent_req_nterror(req, status);
215                 return;
216         }
217
218         num_all_members = talloc_array_length(state->all_members);
219
220         state->all_members = talloc_realloc(
221                 state, state->all_members, struct wbint_Principal,
222                 num_all_members + num_members);
223         if ((num_all_members + num_members != 0)
224             && tevent_req_nomem(state->all_members, req)) {
225                 return;
226         }
227         for (i=0; i<num_members; i++) {
228                 struct wbint_Principal *src, *dst;
229                 src = &members[i];
230                 dst = &state->all_members[num_all_members + i];
231                 sid_copy(&dst->sid, &src->sid);
232                 dst->name = talloc_move(state->all_members, &src->name);
233                 dst->type = src->type;
234         }
235         TALLOC_FREE(members);
236
237         status = wb_groups_members_next_subreq(state, state, &subreq);
238         if (!NT_STATUS_IS_OK(status)) {
239                 tevent_req_nterror(req, status);
240                 return;
241         }
242         if (subreq == NULL) {
243                 tevent_req_done(req);
244                 return;
245         }
246         tevent_req_set_callback(subreq, wb_groups_members_done, req);
247 }
248
249 static NTSTATUS wb_groups_members_recv(struct tevent_req *req,
250                                        TALLOC_CTX *mem_ctx,
251                                        int *num_members,
252                                        struct wbint_Principal **members)
253 {
254         struct wb_groups_members_state *state = tevent_req_data(
255                 req, struct wb_groups_members_state);
256         NTSTATUS status;
257
258         if (tevent_req_is_nterror(req, &status)) {
259                 return status;
260         }
261         *num_members = talloc_array_length(state->all_members);
262         *members = talloc_move(mem_ctx, &state->all_members);
263         return NT_STATUS_OK;
264 }
265
266
267 /*
268  * This is the routine expanding a list of groups up to a certain level. We
269  * collect the users in a talloc_dict: We have to add them without duplicates,
270  * and talloc_dict is an indexed (here indexed by SID) data structure.
271  */
272
273 struct wb_group_members_state {
274         struct tevent_context *ev;
275         int depth;
276         struct talloc_dict *users;
277         struct wbint_Principal *groups;
278 };
279
280 static NTSTATUS wb_group_members_next_subreq(
281         struct wb_group_members_state *state,
282         TALLOC_CTX *mem_ctx, struct tevent_req **psubreq);
283 static void wb_group_members_done(struct tevent_req *subreq);
284
285 struct tevent_req *wb_group_members_send(TALLOC_CTX *mem_ctx,
286                                          struct tevent_context *ev,
287                                          const struct dom_sid *sid,
288                                          enum lsa_SidType type,
289                                          int max_depth)
290 {
291         struct tevent_req *req, *subreq;
292         struct wb_group_members_state *state;
293         NTSTATUS status;
294
295         req = tevent_req_create(mem_ctx, &state,
296                                 struct wb_group_members_state);
297         if (req == NULL) {
298                 return NULL;
299         }
300         state->ev = ev;
301         state->depth = max_depth;
302         state->users = talloc_dict_init(state);
303         if (tevent_req_nomem(state->users, req)) {
304                 return tevent_req_post(req, ev);
305         }
306
307         state->groups = talloc(state, struct wbint_Principal);
308         if (tevent_req_nomem(state->groups, req)) {
309                 return tevent_req_post(req, ev);
310         }
311         state->groups->name = NULL;
312         sid_copy(&state->groups->sid, sid);
313         state->groups->type = type;
314
315         status = wb_group_members_next_subreq(state, state, &subreq);
316         if (!NT_STATUS_IS_OK(status)) {
317                 tevent_req_nterror(req, status);
318                 return tevent_req_post(req, ev);
319         }
320         if (subreq == NULL) {
321                 tevent_req_done(req);
322                 return tevent_req_post(req, ev);
323         }
324         tevent_req_set_callback(subreq, wb_group_members_done, req);
325         return req;
326 }
327
328 static NTSTATUS wb_group_members_next_subreq(
329         struct wb_group_members_state *state,
330         TALLOC_CTX *mem_ctx, struct tevent_req **psubreq)
331 {
332         struct tevent_req *subreq;
333
334         if ((talloc_array_length(state->groups) == 0)
335             || (state->depth <= 0)) {
336                 *psubreq = NULL;
337                 return NT_STATUS_OK;
338         }
339         state->depth -= 1;
340
341         subreq = wb_groups_members_send(
342                 mem_ctx, state->ev, talloc_array_length(state->groups),
343                 state->groups);
344         if (subreq == NULL) {
345                 return NT_STATUS_NO_MEMORY;
346         }
347         *psubreq = subreq;
348         return NT_STATUS_OK;
349 }
350
351 static void wb_group_members_done(struct tevent_req *subreq)
352 {
353         struct tevent_req *req = tevent_req_callback_data(
354                 subreq, struct tevent_req);
355         struct wb_group_members_state *state = tevent_req_data(
356                 req, struct wb_group_members_state);
357         int i, num_groups, new_users, new_groups;
358         int num_members = 0;
359         struct wbint_Principal *members = NULL;
360         NTSTATUS status;
361
362         status = wb_groups_members_recv(subreq, state, &num_members, &members);
363         TALLOC_FREE(subreq);
364         if (!NT_STATUS_IS_OK(status)) {
365                 tevent_req_nterror(req, status);
366                 return;
367         }
368
369         new_users = new_groups = 0;
370         for (i=0; i<num_members; i++) {
371                 switch (members[i].type) {
372                 case SID_NAME_DOM_GRP:
373                 case SID_NAME_ALIAS:
374                 case SID_NAME_WKN_GRP:
375                         new_groups += 1;
376                         break;
377                 default:
378                         /* Ignore everything else */
379                         break;
380                 }
381         }
382
383         num_groups = 0;
384         TALLOC_FREE(state->groups);
385         state->groups = talloc_array(state, struct wbint_Principal,
386                                      new_groups);
387
388         /*
389          * Collect the users into state->users and the groups into
390          * state->groups for the next iteration.
391          */
392
393         for (i=0; i<num_members; i++) {
394                 switch (members[i].type) {
395                 case SID_NAME_USER:
396                 case SID_NAME_COMPUTER: {
397                         /*
398                          * Add a copy of members[i] to state->users
399                          */
400                         struct wbint_Principal *m;
401                         struct dom_sid *sid;
402                         DATA_BLOB key;
403
404                         m = talloc(talloc_tos(), struct wbint_Principal);
405                         if (tevent_req_nomem(m, req)) {
406                                 return;
407                         }
408                         sid_copy(&m->sid, &members[i].sid);
409                         m->name = talloc_move(m, &members[i].name);
410                         m->type = members[i].type;
411
412                         sid = &members[i].sid;
413                         key = data_blob_const(
414                                 sid, ndr_size_dom_sid(sid, 0));
415
416                         if (!talloc_dict_set(state->users, key, &m)) {
417                                 tevent_req_nterror(req, NT_STATUS_NO_MEMORY);
418                                 return;
419                         }
420                         break;
421                 }
422                 case SID_NAME_DOM_GRP:
423                 case SID_NAME_ALIAS:
424                 case SID_NAME_WKN_GRP: {
425                         struct wbint_Principal *g;
426                         /*
427                          * Save members[i] for the next round
428                          */
429                         g = &state->groups[num_groups];
430                         sid_copy(&g->sid, &members[i].sid);
431                         g->name = talloc_move(state->groups, &members[i].name);
432                         g->type = members[i].type;
433                         num_groups += 1;
434                         break;
435                 }
436                 default:
437                         /* Ignore everything else */
438                         break;
439                 }
440         }
441
442         status = wb_group_members_next_subreq(state, state, &subreq);
443         if (!NT_STATUS_IS_OK(status)) {
444                 tevent_req_nterror(req, status);
445                 return;
446         }
447         if (subreq == NULL) {
448                 tevent_req_done(req);
449                 return;
450         }
451         tevent_req_set_callback(subreq, wb_group_members_done, req);
452 }
453
454 NTSTATUS wb_group_members_recv(struct tevent_req *req, TALLOC_CTX *mem_ctx,
455                                struct talloc_dict **members)
456 {
457         struct wb_group_members_state *state = tevent_req_data(
458                 req, struct wb_group_members_state);
459         NTSTATUS status;
460
461         if (tevent_req_is_nterror(req, &status)) {
462                 return status;
463         }
464         *members = talloc_move(mem_ctx, &state->users);
465         return NT_STATUS_OK;
466 }