507d5caf0f7d64289d2cf221cb8bbf4833102c6d
[tprouty/samba.git] / source / nsswitch / winbindd_group.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    Winbind daemon for ntdom nss module
5
6    Copyright (C) Tim Potter 2000
7    Copyright (C) Jeremy Allison 2001.
8    
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 2 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program; if not, write to the Free Software
21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 */
23
24 #include "winbindd.h"
25
26 #undef DBGC_CLASS
27 #define DBGC_CLASS DBGC_WINBIND
28
29 /***************************************************************
30  Empty static struct for negative caching.
31 ****************************************************************/
32
33 /* Fill a grent structure from various other information */
34
35 static BOOL fill_grent(struct winbindd_gr *gr, const char *dom_name, 
36                        const char *gr_name, gid_t unix_gid)
37 {
38         fstring full_group_name;
39         /* Fill in uid/gid */
40         fill_domain_username(full_group_name, dom_name, gr_name);
41
42         gr->gr_gid = unix_gid;
43     
44         /* Group name and password */
45     
46         safe_strcpy(gr->gr_name, full_group_name, sizeof(gr->gr_name) - 1);
47         safe_strcpy(gr->gr_passwd, "x", sizeof(gr->gr_passwd) - 1);
48
49         return True;
50 }
51
52 /* Fill in the group membership field of a NT group given by group_rid */
53
54 static BOOL fill_grent_mem(struct winbindd_domain *domain,
55                            uint32 group_rid, 
56                            enum SID_NAME_USE group_name_type, 
57                            int *num_gr_mem, char **gr_mem, int *gr_mem_len)
58 {
59         uint32 *rid_mem = NULL, num_names = 0;
60         uint32 *name_types = NULL;
61         int buf_len, buf_ndx, i;
62         char **names = NULL, *buf;
63         BOOL result = False;
64         TALLOC_CTX *mem_ctx;
65         NTSTATUS status;
66
67         if (!(mem_ctx = talloc_init_named("fill_grent_mem(%s)", domain->name)))
68                 return False;
69
70         /* Initialise group membership information */
71         
72         DEBUG(10, ("group %s rid 0x%x\n", domain ? domain->name : "NULL", 
73                    group_rid));
74
75         *num_gr_mem = 0;
76         
77         if (group_name_type != SID_NAME_DOM_GRP) {
78                 DEBUG(1, ("rid %d in domain %s isn't a domain group\n", 
79                           group_rid, domain->name));
80                 goto done;
81         }
82
83         /* Lookup group members */
84         status = domain->methods->lookup_groupmem(domain, mem_ctx, group_rid, &num_names, 
85                                                   &rid_mem, &names, &name_types);
86         if (!NT_STATUS_IS_OK(status)) {
87                 DEBUG(1, ("could not lookup membership for group rid %d in domain %s (error: %s)\n", 
88                           group_rid, domain->name, nt_errstr(status)));
89
90                 goto done;
91         }
92
93         DEBUG(10, ("looked up %d names\n", num_names));
94
95         if (DEBUGLEVEL >= 10) {
96                 for (i = 0; i < num_names; i++)
97                         DEBUG(10, ("\t%20s %x %d\n", names[i], rid_mem[i],
98                                    name_types[i]));
99         }
100
101         /* Add members to list */
102
103         buf = NULL;
104         buf_len = buf_ndx = 0;
105
106  again:
107
108         for (i = 0; i < num_names; i++) {
109                 char *the_name;
110                 fstring name;
111                 int len;
112                         
113                 the_name = names[i];
114
115                 DEBUG(10, ("processing name %s\n", the_name));
116
117                 /* FIXME: need to cope with groups within groups.  These
118                    occur in Universal groups on a Windows 2000 native mode
119                    server. */
120
121                 if (name_types[i] != SID_NAME_USER) {
122                         DEBUG(3, ("name %s isn't a domain user\n", the_name));
123                         continue;
124                 }
125
126                 /* Don't bother with machine accounts */
127                 
128                 if (the_name[strlen(the_name) - 1] == '$') {
129                         DEBUG(10, ("%s is machine account\n", the_name));
130                         continue;
131                 }
132
133                 /* Append domain name */
134
135                 fill_domain_username(name, domain->name, the_name);
136
137                 len = strlen(name);
138                 
139                 /* Add to list or calculate buffer length */
140
141                 if (!buf) {
142                         buf_len += len + 1; /* List is comma separated */
143                         (*num_gr_mem)++;
144                         DEBUG(10, ("buf_len + %d = %d\n", len + 1, buf_len));
145                 } else {
146                         DEBUG(10, ("appending %s at ndx %d\n", name, len));
147                         safe_strcpy(&buf[buf_ndx], name, len);
148                         buf_ndx += len;
149                         buf[buf_ndx] = ',';
150                         buf_ndx++;
151                 }
152         }
153
154         /* Allocate buffer */
155
156         if (!buf && buf_len != 0) {
157                 if (!(buf = malloc(buf_len))) {
158                         DEBUG(1, ("out of memory\n"));
159                         result = False;
160                         goto done;
161                 }
162                 memset(buf, 0, buf_len);
163                 goto again;
164         }
165
166         if (buf && buf_ndx > 0) {
167                 buf[buf_ndx - 1] = '\0';
168         }
169
170         *gr_mem = buf;
171         *gr_mem_len = buf_len;
172
173         DEBUG(10, ("num_mem = %d, len = %d, mem = %s\n", *num_gr_mem, 
174                    buf_len, *num_gr_mem ? buf : "NULL")); 
175         result = True;
176
177 done:
178
179         talloc_destroy(mem_ctx);
180         
181         DEBUG(10, ("fill_grent_mem returning %d\n", result));
182
183         return result;
184 }
185
186 /* Return a group structure from a group name */
187
188 enum winbindd_result winbindd_getgrnam(struct winbindd_cli_state *state)
189 {
190         DOM_SID group_sid;
191         struct winbindd_domain *domain;
192         enum SID_NAME_USE name_type;
193         uint32 group_rid;
194         fstring name_domain, name_group;
195         char *tmp, *gr_mem;
196         gid_t gid;
197         int gr_mem_len;
198         
199         /* Ensure null termination */
200         state->request.data.groupname[sizeof(state->request.data.groupname)-1]='\0';
201
202         DEBUG(3, ("[%5d]: getgrnam %s\n", state->pid,
203                   state->request.data.groupname));
204
205         /* Parse domain and groupname */
206         
207         memset(name_group, 0, sizeof(fstring));
208
209         tmp = state->request.data.groupname;
210         if (!parse_domain_user(tmp, name_domain, name_group))
211                 return WINBINDD_ERROR;
212
213         /* Get info for the domain */
214
215         if ((domain = find_domain_from_name(name_domain)) == NULL) {
216                 DEBUG(0, ("could not get domain sid for domain %s\n",
217                           name_domain));
218                 return WINBINDD_ERROR;
219         }
220
221         /* Get rid and name type from name */
222         
223         if (!winbindd_lookup_sid_by_name(domain, name_group, &group_sid, 
224                                          &name_type)) {
225                 DEBUG(1, ("group %s in domain %s does not exist\n", 
226                           name_group, name_domain));
227                 return WINBINDD_ERROR;
228         }
229
230         if ((name_type != SID_NAME_ALIAS) && (name_type != SID_NAME_DOM_GRP)) {
231                 DEBUG(1, ("name '%s' is not a local or domain group: %d\n", 
232                           name_group, name_type));
233                 return WINBINDD_ERROR;
234         }
235
236         /* Fill in group structure */
237         if (!sid_peek_check_rid(&domain->sid, &group_sid, &group_rid))
238                 return WINBINDD_ERROR;
239
240         if (!winbindd_idmap_get_gid_from_sid(&group_sid, &gid)) {
241                 DEBUG(1, ("error converting unix gid to sid\n"));
242                 return WINBINDD_ERROR;
243         }
244
245         if (!fill_grent(&state->response.data.gr, name_domain,
246                         name_group, gid) ||
247             !fill_grent_mem(domain, group_rid, name_type,
248                             &state->response.data.gr.num_gr_mem,
249                             &gr_mem, &gr_mem_len)) {
250                 return WINBINDD_ERROR;
251         }
252
253         /* Group membership lives at start of extra data */
254
255         state->response.data.gr.gr_mem_ofs = 0;
256
257         state->response.length += gr_mem_len;
258         state->response.extra_data = gr_mem;
259
260         return WINBINDD_OK;
261 }
262
263 /* Return a group structure from a gid number */
264
265 enum winbindd_result winbindd_getgrgid(struct winbindd_cli_state *state)
266 {
267         struct winbindd_domain *domain;
268         DOM_SID group_sid;
269         enum SID_NAME_USE name_type;
270         fstring dom_name;
271         fstring group_name;
272         uint32 group_rid;
273         int gr_mem_len;
274         char *gr_mem;
275
276         DEBUG(3, ("[%5d]: getgrgid %d\n", state->pid, 
277                   state->request.data.gid));
278
279         /* Bug out if the gid isn't in the winbind range */
280
281         if ((state->request.data.gid < server_state.gid_low) ||
282             (state->request.data.gid > server_state.gid_high))
283                 return WINBINDD_ERROR;
284
285         /* Get rid from gid */
286
287         if (!winbindd_idmap_get_rid_from_gid(state->request.data.gid, 
288                                              &group_rid, &domain)) {
289                 DEBUG(1, ("could not convert gid %d to rid\n", 
290                           state->request.data.gid));
291                 return WINBINDD_ERROR;
292         }
293
294         /* Get sid from gid */
295
296         sid_copy(&group_sid, &domain->sid);
297         sid_append_rid(&group_sid, group_rid);
298
299         if (!winbindd_lookup_name_by_sid(&group_sid, dom_name, group_name, &name_type)) {
300                 DEBUG(1, ("could not lookup sid\n"));
301                 return WINBINDD_ERROR;
302         }
303
304         if (!((name_type == SID_NAME_ALIAS) || 
305               (name_type == SID_NAME_DOM_GRP))) {
306                 DEBUG(1, ("name '%s' is not a local or domain group: %d\n", 
307                           group_name, name_type));
308                 return WINBINDD_ERROR;
309         }
310
311         /* Fill in group structure */
312
313         if (!fill_grent(&state->response.data.gr, dom_name, group_name, 
314                         state->request.data.gid) ||
315             !fill_grent_mem(domain, group_rid, name_type,
316                             &state->response.data.gr.num_gr_mem,
317                             &gr_mem, &gr_mem_len))
318                 return WINBINDD_ERROR;
319
320         /* Group membership lives at start of extra data */
321
322         state->response.data.gr.gr_mem_ofs = 0;
323
324         state->response.length += gr_mem_len;
325         state->response.extra_data = gr_mem;
326
327         return WINBINDD_OK;
328 }
329
330 /*
331  * set/get/endgrent functions
332  */
333
334 /* "Rewind" file pointer for group database enumeration */
335
336 enum winbindd_result winbindd_setgrent(struct winbindd_cli_state *state)
337 {
338         struct winbindd_domain *domain;
339
340         DEBUG(3, ("[%5d]: setgrent\n", state->pid));
341
342         /* Check user has enabled this */
343
344         if (!lp_winbind_enum_groups())
345                 return WINBINDD_ERROR;
346
347         /* Free old static data if it exists */
348         
349         if (state->getgrent_state != NULL) {
350                 free_getent_state(state->getgrent_state);
351                 state->getgrent_state = NULL;
352         }
353         
354         /* Create sam pipes for each domain we know about */
355         
356         for (domain = domain_list(); domain != NULL; domain = domain->next) {
357                 struct getent_state *domain_state;
358                 
359                 /* Skip domains other than WINBINDD_DOMAIN environment 
360                    variable */
361                 
362                 if ((strcmp(state->request.domain, "") != 0) &&
363                     !check_domain_env(state->request.domain, domain->name))
364                         continue;
365                 
366                 /* Create a state record for this domain */
367                 
368                 if ((domain_state = (struct getent_state *)
369                      malloc(sizeof(struct getent_state))) == NULL) {
370                         DEBUG(1, ("winbindd_setgrent: malloc failed for domain_state!\n"));
371                         return WINBINDD_ERROR;
372                 }
373                 
374                 ZERO_STRUCTP(domain_state);
375                 
376                 fstrcpy(domain_state->domain_name, domain->name);
377
378                 /* Add to list of open domains */
379                 
380                 DLIST_ADD(state->getgrent_state, domain_state);
381         }
382         
383         return WINBINDD_OK;
384 }
385
386 /* Close file pointer to ntdom group database */
387
388 enum winbindd_result winbindd_endgrent(struct winbindd_cli_state *state)
389 {
390         DEBUG(3, ("[%5d]: endgrent\n", state->pid));
391
392         free_getent_state(state->getgrent_state);
393         state->getgrent_state = NULL;
394         
395         return WINBINDD_OK;
396 }
397
398 /* Get the list of domain groups and domain aliases for a domain.  We fill in
399    the sam_entries and num_sam_entries fields with domain group information.  
400    The dispinfo_ndx field is incremented to the index of the next group to 
401    fetch. Return True if some groups were returned, False otherwise. */
402
403 #define MAX_FETCH_SAM_ENTRIES 100
404
405 static BOOL get_sam_group_entries(struct getent_state *ent)
406 {
407         NTSTATUS status;
408         uint32 num_entries;
409         struct acct_info *name_list = NULL, *tmp_name_list = NULL;
410         TALLOC_CTX *mem_ctx;
411         BOOL result = False;
412         struct acct_info *sam_grp_entries = NULL;
413         struct winbindd_domain *domain;
414         
415         if (ent->got_sam_entries)
416                 return False;
417
418         if (!(mem_ctx = talloc_init_named("get_sam_group_entries(%s)",
419                                           ent->domain_name))) {
420                 DEBUG(1, ("get_sam_group_entries: could not create talloc context!\n")); 
421                 return False;
422         }
423                 
424         /* Free any existing group info */
425
426         SAFE_FREE(ent->sam_entries);
427         ent->num_sam_entries = 0;
428         ent->got_sam_entries = True;
429
430         /* Enumerate domain groups */
431
432         num_entries = 0;
433
434         if (!(domain = find_domain_from_name(ent->domain_name))) {
435                 DEBUG(3, ("no such domain %s in get_sam_group_entries\n", ent->domain_name));
436                 goto done;
437         }
438
439         /* always get the domain global groups */
440
441         status = domain->methods->enum_dom_groups(domain, mem_ctx, &num_entries, &sam_grp_entries);
442         
443         if (!NT_STATUS_IS_OK(status)) {
444                 DEBUG(3, ("get_sam_group_entries: could not enumerate domain groups! Error: %s", nt_errstr(status)));
445                 result = False;
446                 goto done;
447         }
448
449         /* Copy entries into return buffer */
450
451         if (num_entries) {
452                 if ( !(name_list = malloc(sizeof(struct acct_info) * num_entries)) ) {
453                         DEBUG(0,("get_sam_group_entries: Failed to malloc memory for %d domain groups!\n", 
454                                 num_entries));
455                         result = False;
456                         goto done;
457                 }
458                 memcpy( name_list, sam_grp_entries, num_entries * sizeof(struct acct_info) );
459         }
460         
461         ent->num_sam_entries = num_entries;
462         
463         /* get the domain local groups if we are a member of 
464            a native win2k domain */
465            
466         if ( domain->native_mode && domain->methods->enum_local_groups )
467         {
468                 DEBUG(4,("get_sam_group_entries: Native Mode 2k domain; enumerating local groups as well\n"));
469                 
470                 status = domain->methods->enum_local_groups(domain, mem_ctx, &num_entries, &sam_grp_entries);
471                 
472                 if ( !NT_STATUS_IS_OK(status) ) { 
473                         DEBUG(3,("get_sam_group_entries: Failed to enumerate domain local groups!\n"));
474                         num_entries = 0;
475                 }
476                 else
477                         DEBUG(4,("get_sam_group_entries: Returned %d local groups\n", num_entries));
478                 
479                 /* Copy entries into return buffer */
480
481                 if ( num_entries ) {
482                         if ( !(tmp_name_list = Realloc( name_list, sizeof(struct acct_info) * (ent->num_sam_entries+num_entries))) )
483                         {
484                                 DEBUG(0,("get_sam_group_entries: Failed to realloc more memory for %d local groups!\n", 
485                                         num_entries));
486                                 result = False;
487                                 SAFE_FREE( name_list );
488                                 goto done;
489                         }
490                         
491                         name_list = tmp_name_list;
492                                 
493                         memcpy( &name_list[ent->num_sam_entries], sam_grp_entries, 
494                                 num_entries * sizeof(struct acct_info) );
495                 }
496         
497                 ent->num_sam_entries += num_entries;
498         }
499         
500                 
501         /* Fill in remaining fields */
502
503         ent->sam_entries = name_list;
504         ent->sam_entry_index = 0;
505
506         result = (ent->num_sam_entries > 0);
507
508  done:
509         talloc_destroy(mem_ctx);
510
511         return result;
512 }
513
514 /* Fetch next group entry from ntdom database */
515
516 #define MAX_GETGRENT_GROUPS 500
517
518 enum winbindd_result winbindd_getgrent(struct winbindd_cli_state *state)
519 {
520         struct getent_state *ent;
521         struct winbindd_gr *group_list = NULL;
522         int num_groups, group_list_ndx = 0, i, gr_mem_list_len = 0;
523         char *new_extra_data, *gr_mem_list = NULL;
524
525         DEBUG(3, ("[%5d]: getgrent\n", state->pid));
526
527         /* Check user has enabled this */
528
529         if (!lp_winbind_enum_groups())
530                 return WINBINDD_ERROR;
531
532         num_groups = MIN(MAX_GETGRENT_GROUPS, state->request.data.num_entries);
533
534         if ((state->response.extra_data = 
535              malloc(num_groups * sizeof(struct winbindd_gr))) == NULL)
536                 return WINBINDD_ERROR;
537
538         state->response.data.num_entries = 0;
539
540         group_list = (struct winbindd_gr *)state->response.extra_data;
541
542         if (!(ent = state->getgrent_state))
543                 return WINBINDD_ERROR;
544
545         /* Start sending back groups */
546
547         for (i = 0; i < num_groups; i++) {
548                 struct acct_info *name_list = NULL;
549                 fstring domain_group_name;
550                 uint32 result;
551                 gid_t group_gid;
552                 int gr_mem_len;
553                 char *gr_mem, *new_gr_mem_list;
554                 
555                 /* Do we need to fetch another chunk of groups? */
556
557         tryagain:
558
559                 DEBUG(10, ("entry_index = %d, num_entries = %d\n",
560                            ent->sam_entry_index, ent->num_sam_entries));
561
562                 if (ent->num_sam_entries == ent->sam_entry_index) {
563
564                         while(ent && !get_sam_group_entries(ent)) {
565                                 struct getent_state *next_ent;
566
567                                 DEBUG(10, ("freeing state info for domain %s\n", ent->domain_name)); 
568
569                                 /* Free state information for this domain */
570
571                                 SAFE_FREE(ent->sam_entries);
572
573                                 next_ent = ent->next;
574                                 DLIST_REMOVE(state->getgrent_state, ent);
575                                 
576                                 SAFE_FREE(ent);
577                                 ent = next_ent;
578                         }
579
580                         /* No more domains */
581
582                         if (!ent) 
583                                 break;
584                 }
585                 
586                 name_list = ent->sam_entries;
587                 
588                 /* Lookup group info */
589                 
590                 if (!winbindd_idmap_get_gid_from_rid(
591                         ent->domain_name,
592                         name_list[ent->sam_entry_index].rid,
593                         &group_gid)) {
594                         
595                         DEBUG(1, ("could not look up gid for group %s\n", 
596                                   name_list[ent->sam_entry_index].acct_name));
597
598                         ent->sam_entry_index++;
599                         goto tryagain;
600                 }
601
602                 DEBUG(10, ("got gid %d for group %x\n", group_gid,
603                            name_list[ent->sam_entry_index].rid));
604                 
605                 /* Fill in group entry */
606
607                 fill_domain_username(domain_group_name, ent->domain_name, 
608                          name_list[ent->sam_entry_index].acct_name);
609
610                 result = fill_grent(&group_list[group_list_ndx], 
611                                     ent->domain_name,
612                                     name_list[ent->sam_entry_index].acct_name,
613                                     group_gid);
614
615                 /* Fill in group membership entry */
616
617                 if (result) {
618                         struct winbindd_domain *domain;
619
620                         if (!(domain = 
621                               find_domain_from_name(ent->domain_name))) {
622                                 DEBUG(3, ("No such domain %s in winbindd_getgrent\n", ent->domain_name));
623                                 result = False;
624                                 goto done;
625                         }
626
627                         group_list[group_list_ndx].num_gr_mem = 0;
628                         gr_mem = NULL;
629                         gr_mem_len = 0;
630                         
631                         /* Get group membership */                      
632                         if (state->request.cmd == WINBINDD_GETGRLST) {
633                                 result = True;
634                         } else {
635                                 result = fill_grent_mem(
636                                         domain,
637                                         name_list[ent->sam_entry_index].rid,
638                                         SID_NAME_DOM_GRP,
639                                         &group_list[group_list_ndx].num_gr_mem, 
640                                         &gr_mem, &gr_mem_len);
641                         }
642                 }
643
644                 if (result) {
645                         /* Append to group membership list */
646                         new_gr_mem_list = Realloc(
647                                 gr_mem_list,
648                                 gr_mem_list_len + gr_mem_len);
649
650                         if (!new_gr_mem_list && (group_list[group_list_ndx].num_gr_mem != 0)) {
651                                 DEBUG(0, ("out of memory\n"));
652                                 SAFE_FREE(gr_mem_list);
653                                 gr_mem_list_len = 0;
654                                 break;
655                         }
656
657                         DEBUG(10, ("list_len = %d, mem_len = %d\n",
658                                    gr_mem_list_len, gr_mem_len));
659
660                         gr_mem_list = new_gr_mem_list;
661
662                         memcpy(&gr_mem_list[gr_mem_list_len], gr_mem,
663                                gr_mem_len);
664
665                         SAFE_FREE(gr_mem);
666
667                         group_list[group_list_ndx].gr_mem_ofs = 
668                                 gr_mem_list_len;
669
670                         gr_mem_list_len += gr_mem_len;
671                 }
672
673                 ent->sam_entry_index++;
674                 
675                 /* Add group to return list */
676                 
677                 if (result) {
678
679                         DEBUG(10, ("adding group num_entries = %d\n",
680                                    state->response.data.num_entries));
681
682                         group_list_ndx++;
683                         state->response.data.num_entries++;
684                         
685                         state->response.length +=
686                                 sizeof(struct winbindd_gr);
687                         
688                 } else {
689                         DEBUG(0, ("could not lookup domain group %s\n", 
690                                   domain_group_name));
691                 }
692         }
693
694         /* Copy the list of group memberships to the end of the extra data */
695
696         if (group_list_ndx == 0)
697                 goto done;
698
699         new_extra_data = Realloc(
700                 state->response.extra_data,
701                 group_list_ndx * sizeof(struct winbindd_gr) + gr_mem_list_len);
702
703         if (!new_extra_data) {
704                 DEBUG(0, ("out of memory\n"));
705                 group_list_ndx = 0;
706                 SAFE_FREE(state->response.extra_data);
707                 SAFE_FREE(gr_mem_list);
708
709                 return WINBINDD_ERROR;
710         }
711
712         state->response.extra_data = new_extra_data;
713
714         memcpy(&((char *)state->response.extra_data)
715                [group_list_ndx * sizeof(struct winbindd_gr)], 
716                gr_mem_list, gr_mem_list_len);
717
718         SAFE_FREE(gr_mem_list);
719
720         state->response.length += gr_mem_list_len;
721
722         DEBUG(10, ("returning %d groups, length = %d\n",
723                    group_list_ndx, gr_mem_list_len));
724
725         /* Out of domains */
726
727  done:
728
729         return (group_list_ndx > 0) ? WINBINDD_OK : WINBINDD_ERROR;
730 }
731
732 /* List domain groups without mapping to unix ids */
733
734 enum winbindd_result winbindd_list_groups(struct winbindd_cli_state *state)
735 {
736         uint32 total_entries = 0;
737         struct winbindd_domain *domain;
738         char *extra_data = NULL;
739         char *ted = NULL;
740         int extra_data_len = 0, i;
741
742         DEBUG(3, ("[%5d]: list groups\n", state->pid));
743
744         /* Enumerate over trusted domains */
745
746         for (domain = domain_list(); domain; domain = domain->next) {
747                 struct getent_state groups;
748
749                 ZERO_STRUCT(groups);
750
751                 /* Skip domains other than WINBINDD_DOMAIN environment
752                    variable */ 
753                 if ((strcmp(state->request.domain, "") != 0) &&
754                     !check_domain_env(state->request.domain, domain->name))
755                         continue;
756
757                 /* Get list of sam groups */
758                 ZERO_STRUCT(groups);
759                 fstrcpy(groups.domain_name, domain->name);
760
761                 get_sam_group_entries(&groups);
762                         
763                 if (groups.num_sam_entries == 0) {
764                         /* this domain is empty or in an error state */
765                         continue;
766                 }
767
768                 /* keep track the of the total number of groups seen so 
769                    far over all domains */
770                 total_entries += groups.num_sam_entries;
771                 
772                 /* Allocate some memory for extra data.  Note that we limit
773                    account names to sizeof(fstring) = 128 characters.  */               
774                 ted = Realloc(extra_data, sizeof(fstring) * total_entries);
775  
776                 if (!ted) {
777                         DEBUG(0,("failed to enlarge buffer!\n"));
778                         SAFE_FREE(extra_data);
779                         return WINBINDD_ERROR;
780                 } else
781                         extra_data = ted;
782
783                 /* Pack group list into extra data fields */
784                 for (i = 0; i < groups.num_sam_entries; i++) {
785                         char *group_name = ((struct acct_info *)
786                                             groups.sam_entries)[i].acct_name; 
787                         fstring name;
788
789                         fill_domain_username(name, domain->name, group_name);
790                         /* Append to extra data */                      
791                         memcpy(&extra_data[extra_data_len], name, 
792                                strlen(name));
793                         extra_data_len += strlen(name);
794                         extra_data[extra_data_len++] = ',';
795                 }
796
797                 free(groups.sam_entries);
798         }
799
800         /* Assign extra_data fields in response structure */
801         if (extra_data) {
802                 extra_data[extra_data_len - 1] = '\0';
803                 state->response.extra_data = extra_data;
804                 state->response.length += extra_data_len;
805         }
806
807         /* No domains may have responded but that's still OK so don't
808            return an error. */
809
810         return WINBINDD_OK;
811 }
812
813 /* Get user supplementary groups.  This is much quicker than trying to
814    invert the groups database. */
815
816 enum winbindd_result winbindd_getgroups(struct winbindd_cli_state *state)
817 {
818         fstring name_domain, name_user;
819         DOM_SID user_sid;
820         enum SID_NAME_USE name_type;
821         uint32 user_rid, num_groups, num_gids;
822         NTSTATUS status;
823         uint32 *user_gids;
824         struct winbindd_domain *domain;
825         enum winbindd_result result = WINBINDD_ERROR;
826         gid_t *gid_list;
827         int i;
828         TALLOC_CTX *mem_ctx;
829         
830         /* Ensure null termination */
831         state->request.data.username[sizeof(state->request.data.username)-1]='\0';
832
833         DEBUG(3, ("[%5d]: getgroups %s\n", state->pid,
834                   state->request.data.username));
835
836         if (!(mem_ctx = talloc_init_named("winbindd_getgroups(%s)",
837                                           state->request.data.username)))
838                 return WINBINDD_ERROR;
839
840         /* Parse domain and username */
841
842         if (!parse_domain_user(state->request.data.username, name_domain, 
843                           name_user))
844                 goto done;
845
846         /* Get info for the domain */
847         
848         if ((domain = find_domain_from_name(name_domain)) == NULL) {
849                 DEBUG(0, ("could not find domain entry for domain %s\n", 
850                           name_domain));
851                 goto done;
852         }
853
854         /* Get rid and name type from name.  The following costs 1 packet */
855
856         if (!winbindd_lookup_sid_by_name(domain, name_user, &user_sid, 
857                                          &name_type)) {
858                 DEBUG(1, ("user '%s' does not exist\n", name_user));
859                 goto done;
860         }
861
862         if (name_type != SID_NAME_USER) {
863                 DEBUG(1, ("name '%s' is not a user name: %d\n", 
864                           name_user, name_type));
865                 goto done;
866         }
867
868         sid_split_rid(&user_sid, &user_rid);
869
870         status = domain->methods->lookup_usergroups(domain, mem_ctx, user_rid, &num_groups, &user_gids);
871         if (!NT_STATUS_IS_OK(status)) goto done;
872
873         /* Copy data back to client */
874
875         num_gids = 0;
876         gid_list = malloc(sizeof(gid_t) * num_groups);
877
878         if (state->response.extra_data)
879                 goto done;
880
881         for (i = 0; i < num_groups; i++) {
882                 if (!winbindd_idmap_get_gid_from_rid(domain->name, 
883                                                      user_gids[i], 
884                                                      &gid_list[num_gids])) {
885
886                         DEBUG(1, ("unable to convert group rid %d to gid\n", 
887                                   user_gids[i]));
888                         continue;
889                 }
890                         
891                 num_gids++;
892         }
893
894         state->response.data.num_entries = num_gids;
895         state->response.extra_data = gid_list;
896         state->response.length += num_gids * sizeof(gid_t);
897
898         result = WINBINDD_OK;
899
900  done:
901
902         talloc_destroy(mem_ctx);
903
904         return result;
905 }