s3:lib/util_sock: use sys_recv() instead of sys_read() on sockets
[ira/wip.git] / nsswitch / wbinfo.c
1 /*
2    Unix SMB/CIFS implementation.
3
4    Winbind status program.
5
6    Copyright (C) Tim Potter      2000-2003
7    Copyright (C) Andrew Bartlett 2002
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 3 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, see <http://www.gnu.org/licenses/>.
21 */
22
23 #include "includes.h"
24 #include "winbind_client.h"
25 #include "libwbclient/wbclient.h"
26
27 #undef DBGC_CLASS
28 #define DBGC_CLASS DBGC_WINBIND
29
30 static struct wbcInterfaceDetails *init_interface_details(void)
31 {
32         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
33         static struct wbcInterfaceDetails *details;
34
35         if (details) {
36                 return details;
37         }
38
39         wbc_status = wbcInterfaceDetails(&details);
40         if (!WBC_ERROR_IS_OK(wbc_status)) {
41                 d_fprintf(stderr, "could not obtain winbind interface details!\n");
42         }
43
44         return details;
45 }
46
47 static char winbind_separator_int(bool strict)
48 {
49         struct wbcInterfaceDetails *details;
50         static bool got_sep;
51         static char sep;
52
53         if (got_sep)
54                 return sep;
55
56         details = init_interface_details();
57
58         if (!details) {
59                 d_fprintf(stderr, "could not obtain winbind separator!\n");
60                 if (strict) {
61                         return 0;
62                 }
63                 /* HACK: (this module should not call lp_ funtions) */
64                 return *lp_winbind_separator();
65         }
66
67         sep = details->winbind_separator;
68         got_sep = true;
69
70         if (!sep) {
71                 d_fprintf(stderr, "winbind separator was NULL!\n");
72                 if (strict) {
73                         return 0;
74                 }
75                 /* HACK: (this module should not call lp_ funtions) */
76                 sep = *lp_winbind_separator();
77         }
78
79         return sep;
80 }
81
82 static char winbind_separator(void)
83 {
84         return winbind_separator_int(false);
85 }
86
87 static const char *get_winbind_domain(void)
88 {
89         static struct wbcInterfaceDetails *details;
90
91         details = init_interface_details();
92
93         if (!details) {
94                 d_fprintf(stderr, "could not obtain winbind domain name!\n");
95
96                 /* HACK: (this module should not call lp_ functions) */
97                 return lp_workgroup();
98         }
99
100         return details->netbios_domain;
101 }
102
103 /* Copy of parse_domain_user from winbindd_util.c.  Parse a string of the
104    form DOMAIN/user into a domain and a user */
105
106 static bool parse_wbinfo_domain_user(const char *domuser, fstring domain,
107                                      fstring user)
108 {
109
110         char *p = strchr(domuser,winbind_separator());
111
112         if (!p) {
113                 /* Maybe it was a UPN? */
114                 if ((p = strchr(domuser, '@')) != NULL) {
115                         fstrcpy(domain, "");
116                         fstrcpy(user, domuser);
117                         return true;
118                 }
119
120                 fstrcpy(user, domuser);
121                 fstrcpy(domain, get_winbind_domain());
122                 return true;
123         }
124
125         fstrcpy(user, p+1);
126         fstrcpy(domain, domuser);
127         domain[PTR_DIFF(p, domuser)] = 0;
128         strupper_m(domain);
129
130         return true;
131 }
132
133 /* Parse string of "uid,sid" or "gid,sid" into separate int and string values.
134  * Return true if input was valid, false otherwise. */
135 static bool parse_mapping_arg(char *arg, int *id, char **sid)
136 {
137         char *tmp, *endptr;
138
139         if (!arg || !*arg)
140                 return false;
141
142         tmp = strtok(arg, ",");
143         *sid = strtok(NULL, ",");
144
145         if (!tmp || !*tmp || !*sid || !**sid)
146                 return false;
147
148         /* Because atoi() can return 0 on invalid input, which would be a valid
149          * UID/GID we must use strtoul() and do error checking */
150         *id = strtoul(tmp, &endptr, 10);
151
152         if (endptr[0] != '\0')
153                 return false;
154
155         return true;
156 }
157
158 /* pull pwent info for a given user */
159
160 static bool wbinfo_get_userinfo(char *user)
161 {
162         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
163         struct passwd *pwd = NULL;
164
165         wbc_status = wbcGetpwnam(user, &pwd);
166         if (!WBC_ERROR_IS_OK(wbc_status)) {
167                 return false;
168         }
169
170         d_printf("%s:%s:%d:%d:%s:%s:%s\n",
171                  pwd->pw_name,
172                  pwd->pw_passwd,
173                  pwd->pw_uid,
174                  pwd->pw_gid,
175                  pwd->pw_gecos,
176                  pwd->pw_dir,
177                  pwd->pw_shell);
178
179         return true;
180 }
181
182 /* pull pwent info for a given uid */
183 static bool wbinfo_get_uidinfo(int uid)
184 {
185         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
186         struct passwd *pwd = NULL;
187
188         wbc_status = wbcGetpwuid(uid, &pwd);
189         if (!WBC_ERROR_IS_OK(wbc_status)) {
190                 return false;
191         }
192
193         d_printf("%s:%s:%d:%d:%s:%s:%s\n",
194                  pwd->pw_name,
195                  pwd->pw_passwd,
196                  pwd->pw_uid,
197                  pwd->pw_gid,
198                  pwd->pw_gecos,
199                  pwd->pw_dir,
200                  pwd->pw_shell);
201
202         return true;
203 }
204
205 static bool wbinfo_get_user_sidinfo(const char *sid_str)
206 {
207         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
208         struct passwd *pwd = NULL;
209         struct wbcDomainSid sid;
210
211         wbc_status = wbcStringToSid(sid_str, &sid);
212         wbc_status = wbcGetpwsid(&sid, &pwd);
213         if (!WBC_ERROR_IS_OK(wbc_status)) {
214                 return false;
215         }
216
217         d_printf("%s:%s:%d:%d:%s:%s:%s\n",
218                  pwd->pw_name,
219                  pwd->pw_passwd,
220                  pwd->pw_uid,
221                  pwd->pw_gid,
222                  pwd->pw_gecos,
223                  pwd->pw_dir,
224                  pwd->pw_shell);
225
226         return true;
227 }
228
229
230 /* pull grent for a given group */
231 static bool wbinfo_get_groupinfo(const char *group)
232 {
233         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
234         struct group *grp;
235
236         wbc_status = wbcGetgrnam(group, &grp);
237         if (!WBC_ERROR_IS_OK(wbc_status)) {
238                 return false;
239         }
240
241         d_printf("%s:%s:%d\n",
242                  grp->gr_name,
243                  grp->gr_passwd,
244                  grp->gr_gid);
245
246         wbcFreeMemory(grp);
247
248         return true;
249 }
250
251 /* pull grent for a given gid */
252 static bool wbinfo_get_gidinfo(int gid)
253 {
254         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
255         struct group *grp;
256
257         wbc_status = wbcGetgrgid(gid, &grp);
258         if (!WBC_ERROR_IS_OK(wbc_status)) {
259                 return false;
260         }
261
262         d_printf("%s:%s:%d\n",
263                  grp->gr_name,
264                  grp->gr_passwd,
265                  grp->gr_gid);
266
267         wbcFreeMemory(grp);
268
269         return true;
270 }
271
272 /* List groups a user is a member of */
273
274 static bool wbinfo_get_usergroups(const char *user)
275 {
276         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
277         uint32_t num_groups;
278         uint32_t i;
279         gid_t *groups = NULL;
280
281         /* Send request */
282
283         wbc_status = wbcGetGroups(user, &num_groups, &groups);
284         if (!WBC_ERROR_IS_OK(wbc_status)) {
285                 return false;
286         }
287
288         for (i = 0; i < num_groups; i++) {
289                 d_printf("%d\n", (int)groups[i]);
290         }
291
292         wbcFreeMemory(groups);
293
294         return true;
295 }
296
297
298 /* List group SIDs a user SID is a member of */
299 static bool wbinfo_get_usersids(const char *user_sid_str)
300 {
301         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
302         uint32_t num_sids;
303         uint32_t i;
304         struct wbcDomainSid user_sid, *sids = NULL;
305
306         /* Send request */
307
308         wbc_status = wbcStringToSid(user_sid_str, &user_sid);
309         if (!WBC_ERROR_IS_OK(wbc_status)) {
310                 return false;
311         }
312
313         wbc_status = wbcLookupUserSids(&user_sid, false, &num_sids, &sids);
314         if (!WBC_ERROR_IS_OK(wbc_status)) {
315                 return false;
316         }
317
318         for (i = 0; i < num_sids; i++) {
319                 char *str = NULL;
320                 wbc_status = wbcSidToString(&sids[i], &str);
321                 if (!WBC_ERROR_IS_OK(wbc_status)) {
322                         wbcFreeMemory(sids);
323                         return false;
324                 }
325                 d_printf("%s\n", str);
326                 wbcFreeMemory(str);
327         }
328
329         wbcFreeMemory(sids);
330
331         return true;
332 }
333
334 static bool wbinfo_get_userdomgroups(const char *user_sid_str)
335 {
336         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
337         uint32_t num_sids;
338         uint32_t i;
339         struct wbcDomainSid user_sid, *sids = NULL;
340
341         /* Send request */
342
343         wbc_status = wbcStringToSid(user_sid_str, &user_sid);
344         if (!WBC_ERROR_IS_OK(wbc_status)) {
345                 return false;
346         }
347
348         wbc_status = wbcLookupUserSids(&user_sid, true, &num_sids, &sids);
349         if (!WBC_ERROR_IS_OK(wbc_status)) {
350                 return false;
351         }
352
353         for (i = 0; i < num_sids; i++) {
354                 char *str = NULL;
355                 wbc_status = wbcSidToString(&sids[i], &str);
356                 if (!WBC_ERROR_IS_OK(wbc_status)) {
357                         wbcFreeMemory(sids);
358                         return false;
359                 }
360                 d_printf("%s\n", str);
361                 wbcFreeMemory(str);
362         }
363
364         wbcFreeMemory(sids);
365
366         return true;
367 }
368
369 static bool wbinfo_get_sidaliases(const char *domain,
370                                   const char *user_sid_str)
371 {
372         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
373         struct wbcDomainInfo *dinfo = NULL;
374         uint32_t i;
375         struct wbcDomainSid user_sid;
376         uint32_t *alias_rids = NULL;
377         uint32_t num_alias_rids;
378         char *domain_sid_str = NULL;
379
380         /* Send request */
381         if ((domain == NULL) || (strequal(domain, ".")) ||
382            (domain[0] == '\0')) {
383                 domain = get_winbind_domain();
384         }
385
386         /* Send request */
387
388         wbc_status = wbcDomainInfo(domain, &dinfo);
389         if (!WBC_ERROR_IS_OK(wbc_status)) {
390                 d_printf("wbcDomainInfo(%s) failed: %s\n", domain,
391                          wbcErrorString(wbc_status));
392                 goto done;
393         }
394         wbc_status = wbcStringToSid(user_sid_str, &user_sid);
395         if (!WBC_ERROR_IS_OK(wbc_status)) {
396                 goto done;
397         }
398
399         wbc_status = wbcGetSidAliases(&dinfo->sid, &user_sid, 1,
400             &alias_rids, &num_alias_rids);
401         if (!WBC_ERROR_IS_OK(wbc_status)) {
402                 goto done;
403         }
404
405         wbc_status = wbcSidToString(&dinfo->sid, &domain_sid_str);
406         if (!WBC_ERROR_IS_OK(wbc_status)) {
407                 goto done;
408         }
409
410         for (i = 0; i < num_alias_rids; i++) {
411                 d_printf("%s-%d\n", domain_sid_str, alias_rids[i]);
412         }
413
414         wbcFreeMemory(alias_rids);
415
416 done:
417         if (domain_sid_str) {
418                 wbcFreeMemory(domain_sid_str);
419         }
420         if (dinfo) {
421                 wbcFreeMemory(dinfo);
422         }
423         return (WBC_ERR_SUCCESS == wbc_status);
424 }
425
426
427 /* Convert NetBIOS name to IP */
428
429 static bool wbinfo_wins_byname(const char *name)
430 {
431         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
432         char *ip = NULL;
433
434         wbc_status = wbcResolveWinsByName(name, &ip);
435         if (!WBC_ERROR_IS_OK(wbc_status)) {
436                 return false;
437         }
438
439         /* Display response */
440
441         d_printf("%s\n", ip);
442
443         wbcFreeMemory(ip);
444
445         return true;
446 }
447
448 /* Convert IP to NetBIOS name */
449
450 static bool wbinfo_wins_byip(const char *ip)
451 {
452         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
453         char *name = NULL;
454
455         wbc_status = wbcResolveWinsByIP(ip, &name);
456         if (!WBC_ERROR_IS_OK(wbc_status)) {
457                 return false;
458         }
459
460         /* Display response */
461
462         d_printf("%s\n", name);
463
464         wbcFreeMemory(name);
465
466         return true;
467 }
468
469 /* List all/trusted domains */
470
471 static bool wbinfo_list_domains(bool list_all_domains, bool verbose)
472 {
473         struct wbcDomainInfo *domain_list = NULL;
474         size_t num_domains;
475         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
476         bool print_all = !list_all_domains && verbose;
477         int i;
478
479         wbc_status = wbcListTrusts(&domain_list, &num_domains);
480         if (!WBC_ERROR_IS_OK(wbc_status)) {
481                 return false;
482         }
483
484         if (print_all) {
485                 d_printf("%-16s%-24s%-12s%-12s%-5s%-5s\n",
486                          "Domain Name", "DNS Domain", "Trust Type",
487                          "Transitive", "In", "Out");
488         }
489
490         for (i=0; i<num_domains; i++) {
491                 if (print_all) {
492                         d_printf("%-16s", domain_list[i].short_name);
493                 } else {
494                         d_printf("%s", domain_list[i].short_name);
495                         d_printf("\n");
496                         continue;
497                 }
498
499                 d_printf("%-24s", domain_list[i].dns_name);
500
501                 switch(domain_list[i].trust_type) {
502                 case WBC_DOMINFO_TRUSTTYPE_NONE:
503                         d_printf("None        ");
504                         break;
505                 case WBC_DOMINFO_TRUSTTYPE_FOREST:
506                         d_printf("Forest      ");
507                         break;
508                 case WBC_DOMINFO_TRUSTTYPE_EXTERNAL:
509                         d_printf("External    ");
510                         break;
511                 case WBC_DOMINFO_TRUSTTYPE_IN_FOREST:
512                         d_printf("In-Forest   ");
513                         break;
514                 }
515
516                 if (domain_list[i].trust_flags & WBC_DOMINFO_TRUST_TRANSITIVE) {
517                         d_printf("Yes         ");
518                 } else {
519                         d_printf("No          ");
520                 }
521
522                 if (domain_list[i].trust_flags & WBC_DOMINFO_TRUST_INCOMING) {
523                         d_printf("Yes  ");
524                 } else {
525                         d_printf("No   ");
526                 }
527
528                 if (domain_list[i].trust_flags & WBC_DOMINFO_TRUST_OUTGOING) {
529                         d_printf("Yes  ");
530                 } else {
531                         d_printf("No   ");
532                 }
533
534                 d_printf("\n");
535         }
536
537         return true;
538 }
539
540 /* List own domain */
541
542 static bool wbinfo_list_own_domain(void)
543 {
544         d_printf("%s\n", get_winbind_domain());
545
546         return true;
547 }
548
549 /* show sequence numbers */
550 static bool wbinfo_show_sequence(const char *domain)
551 {
552         d_printf("This command has been deprecated.  Please use the --online-status option instead.\n");
553         return false;
554 }
555
556 /* show sequence numbers */
557 static bool wbinfo_show_onlinestatus(const char *domain)
558 {
559         struct wbcDomainInfo *domain_list = NULL;
560         size_t num_domains;
561         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
562         int i;
563
564         wbc_status = wbcListTrusts(&domain_list, &num_domains);
565         if (!WBC_ERROR_IS_OK(wbc_status)) {
566                 return false;
567         }
568
569         for (i=0; i<num_domains; i++) {
570                 bool is_offline;
571
572                 if (domain) {
573                         if (!strequal(domain_list[i].short_name, domain)) {
574                                 continue;
575                         }
576                 }
577
578                 is_offline = (domain_list[i].domain_flags & WBC_DOMINFO_DOMAIN_OFFLINE);
579
580                 d_printf("%s : %s\n",
581                          domain_list[i].short_name,
582                          is_offline ? "offline" : "online" );
583         }
584
585         return true;
586 }
587
588
589 /* Show domain info */
590
591 static bool wbinfo_domain_info(const char *domain)
592 {
593         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
594         struct wbcDomainInfo *dinfo = NULL;
595         char *sid_str = NULL;
596
597         if ((domain == NULL) || (strequal(domain, ".")) || (domain[0] == '\0')) {
598                 domain = get_winbind_domain();
599         }
600
601         /* Send request */
602
603         wbc_status = wbcDomainInfo(domain, &dinfo);
604         if (!WBC_ERROR_IS_OK(wbc_status)) {
605                 return false;
606         }
607
608         wbc_status = wbcSidToString(&dinfo->sid, &sid_str);
609         if (!WBC_ERROR_IS_OK(wbc_status)) {
610                 wbcFreeMemory(dinfo);
611                 return false;
612         }
613
614         /* Display response */
615
616         d_printf("Name              : %s\n", dinfo->short_name);
617         d_printf("Alt_Name          : %s\n", dinfo->dns_name);
618
619         d_printf("SID               : %s\n", sid_str);
620
621         d_printf("Active Directory  : %s\n",
622                  (dinfo->domain_flags & WBC_DOMINFO_DOMAIN_AD) ? "Yes" : "No");
623         d_printf("Native            : %s\n",
624                  (dinfo->domain_flags & WBC_DOMINFO_DOMAIN_NATIVE) ? "Yes" : "No");
625
626         d_printf("Primary           : %s\n",
627                  (dinfo->domain_flags & WBC_DOMINFO_DOMAIN_PRIMARY) ? "Yes" : "No");
628
629         wbcFreeMemory(sid_str);
630         wbcFreeMemory(dinfo);
631
632         return true;
633 }
634
635 /* Get a foreign DC's name */
636 static bool wbinfo_getdcname(const char *domain_name)
637 {
638         struct winbindd_request request;
639         struct winbindd_response response;
640
641         ZERO_STRUCT(request);
642         ZERO_STRUCT(response);
643
644         fstrcpy(request.domain_name, domain_name);
645
646         /* Send request */
647
648         if (winbindd_request_response(WINBINDD_GETDCNAME, &request, &response) !=
649             NSS_STATUS_SUCCESS) {
650                 d_fprintf(stderr, "Could not get dc name for %s\n", domain_name);
651                 return false;
652         }
653
654         /* Display response */
655
656         d_printf("%s\n", response.data.dc_name);
657
658         return true;
659 }
660
661 /* Find a DC */
662 static bool wbinfo_dsgetdcname(const char *domain_name, uint32_t flags)
663 {
664         struct winbindd_request request;
665         struct winbindd_response response;
666
667         ZERO_STRUCT(request);
668         ZERO_STRUCT(response);
669
670         fstrcpy(request.data.dsgetdcname.domain_name, domain_name);
671         request.data.dsgetdcname.flags = flags;
672
673         request.flags |= DS_DIRECTORY_SERVICE_REQUIRED;
674
675         /* Send request */
676
677         if (winbindd_request_response(WINBINDD_DSGETDCNAME, &request, &response) !=
678             NSS_STATUS_SUCCESS) {
679                 d_fprintf(stderr, "Could not find dc for %s\n", domain_name);
680                 return false;
681         }
682
683         /* Display response */
684
685         d_printf("%s\n", response.data.dsgetdcname.dc_unc);
686         d_printf("%s\n", response.data.dsgetdcname.dc_address);
687         d_printf("%d\n", response.data.dsgetdcname.dc_address_type);
688         d_printf("%s\n", response.data.dsgetdcname.domain_guid);
689         d_printf("%s\n", response.data.dsgetdcname.domain_name);
690         d_printf("%s\n", response.data.dsgetdcname.forest_name);
691         d_printf("0x%08x\n", response.data.dsgetdcname.dc_flags);
692         d_printf("%s\n", response.data.dsgetdcname.dc_site_name);
693         d_printf("%s\n", response.data.dsgetdcname.client_site_name);
694
695         return true;
696 }
697
698 /* Check trust account password */
699
700 static bool wbinfo_check_secret(void)
701 {
702         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
703         struct wbcAuthErrorInfo *error = NULL;
704
705         wbc_status = wbcCheckTrustCredentials(NULL, &error);
706
707         d_printf("checking the trust secret via RPC calls %s\n",
708                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
709
710         if (wbc_status == WBC_ERR_AUTH_ERROR) {
711                 d_fprintf(stderr, "error code was %s (0x%x)\n",
712                           error->nt_string, error->nt_status);
713                 wbcFreeMemory(error);
714         }
715         if (!WBC_ERROR_IS_OK(wbc_status)) {
716                 return false;
717         }
718
719         return true;
720 }
721
722 /* Convert uid to sid */
723
724 static bool wbinfo_uid_to_sid(uid_t uid)
725 {
726         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
727         struct wbcDomainSid sid;
728         char *sid_str = NULL;
729
730         /* Send request */
731
732         wbc_status = wbcUidToSid(uid, &sid);
733         if (!WBC_ERROR_IS_OK(wbc_status)) {
734                 return false;
735         }
736
737         wbc_status = wbcSidToString(&sid, &sid_str);
738         if (!WBC_ERROR_IS_OK(wbc_status)) {
739                 return false;
740         }
741
742         /* Display response */
743
744         d_printf("%s\n", sid_str);
745
746         wbcFreeMemory(sid_str);
747
748         return true;
749 }
750
751 /* Convert gid to sid */
752
753 static bool wbinfo_gid_to_sid(gid_t gid)
754 {
755         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
756         struct wbcDomainSid sid;
757         char *sid_str = NULL;
758
759         /* Send request */
760
761         wbc_status = wbcGidToSid(gid, &sid);
762         if (!WBC_ERROR_IS_OK(wbc_status)) {
763                 return false;
764         }
765
766         wbc_status = wbcSidToString(&sid, &sid_str);
767         if (!WBC_ERROR_IS_OK(wbc_status)) {
768                 return false;
769         }
770
771         /* Display response */
772
773         d_printf("%s\n", sid_str);
774
775         wbcFreeMemory(sid_str);
776
777         return true;
778 }
779
780 /* Convert sid to uid */
781
782 static bool wbinfo_sid_to_uid(const char *sid_str)
783 {
784         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
785         struct wbcDomainSid sid;
786         uid_t uid;
787
788         /* Send request */
789
790         wbc_status = wbcStringToSid(sid_str, &sid);
791         if (!WBC_ERROR_IS_OK(wbc_status)) {
792                 return false;
793         }
794
795         wbc_status = wbcSidToUid(&sid, &uid);
796         if (!WBC_ERROR_IS_OK(wbc_status)) {
797                 return false;
798         }
799
800         /* Display response */
801
802         d_printf("%d\n", (int)uid);
803
804         return true;
805 }
806
807 static bool wbinfo_sid_to_gid(const char *sid_str)
808 {
809         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
810         struct wbcDomainSid sid;
811         gid_t gid;
812
813         /* Send request */
814
815         wbc_status = wbcStringToSid(sid_str, &sid);
816         if (!WBC_ERROR_IS_OK(wbc_status)) {
817                 return false;
818         }
819
820         wbc_status = wbcSidToGid(&sid, &gid);
821         if (!WBC_ERROR_IS_OK(wbc_status)) {
822                 return false;
823         }
824
825         /* Display response */
826
827         d_printf("%d\n", (int)gid);
828
829         return true;
830 }
831
832 static bool wbinfo_allocate_uid(void)
833 {
834         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
835         uid_t uid;
836
837         /* Send request */
838
839         wbc_status = wbcAllocateUid(&uid);
840         if (!WBC_ERROR_IS_OK(wbc_status)) {
841                 return false;
842         }
843
844         /* Display response */
845
846         d_printf("New uid: %d\n", uid);
847
848         return true;
849 }
850
851 static bool wbinfo_allocate_gid(void)
852 {
853         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
854         gid_t gid;
855
856         /* Send request */
857
858         wbc_status = wbcAllocateGid(&gid);
859         if (!WBC_ERROR_IS_OK(wbc_status)) {
860                 return false;
861         }
862
863         /* Display response */
864
865         d_printf("New gid: %d\n", gid);
866
867         return true;
868 }
869
870 static bool wbinfo_set_uid_mapping(uid_t uid, const char *sid_str)
871 {
872         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
873         struct wbcDomainSid sid;
874
875         /* Send request */
876
877         wbc_status = wbcStringToSid(sid_str, &sid);
878         if (!WBC_ERROR_IS_OK(wbc_status)) {
879                 return false;
880         }
881
882         wbc_status = wbcSetUidMapping(uid, &sid);
883         if (!WBC_ERROR_IS_OK(wbc_status)) {
884                 return false;
885         }
886
887         /* Display response */
888
889         d_printf("uid %d now mapped to sid %s\n", uid, sid_str);
890
891         return true;
892 }
893
894 static bool wbinfo_set_gid_mapping(gid_t gid, const char *sid_str)
895 {
896         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
897         struct wbcDomainSid sid;
898
899         /* Send request */
900
901         wbc_status = wbcStringToSid(sid_str, &sid);
902         if (!WBC_ERROR_IS_OK(wbc_status)) {
903                 return false;
904         }
905
906         wbc_status = wbcSetGidMapping(gid, &sid);
907         if (!WBC_ERROR_IS_OK(wbc_status)) {
908                 return false;
909         }
910
911         /* Display response */
912
913         d_printf("gid %d now mapped to sid %s\n", gid, sid_str);
914
915         return true;
916 }
917
918 static bool wbinfo_remove_uid_mapping(uid_t uid, const char *sid_str)
919 {
920         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
921         struct wbcDomainSid sid;
922
923         /* Send request */
924
925         wbc_status = wbcStringToSid(sid_str, &sid);
926         if (!WBC_ERROR_IS_OK(wbc_status)) {
927                 return false;
928         }
929
930         wbc_status = wbcRemoveUidMapping(uid, &sid);
931         if (!WBC_ERROR_IS_OK(wbc_status)) {
932                 return false;
933         }
934
935         /* Display response */
936
937         d_printf("Removed uid %d to sid %s mapping\n", uid, sid_str);
938
939         return true;
940 }
941
942 static bool wbinfo_remove_gid_mapping(gid_t gid, const char *sid_str)
943 {
944         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
945         struct wbcDomainSid sid;
946
947         /* Send request */
948
949         wbc_status = wbcStringToSid(sid_str, &sid);
950         if (!WBC_ERROR_IS_OK(wbc_status)) {
951                 return false;
952         }
953
954         wbc_status = wbcRemoveGidMapping(gid, &sid);
955         if (!WBC_ERROR_IS_OK(wbc_status)) {
956                 return false;
957         }
958
959         /* Display response */
960
961         d_printf("Removed gid %d to sid %s mapping\n", gid, sid_str);
962
963         return true;
964 }
965
966 /* Convert sid to string */
967
968 static bool wbinfo_lookupsid(const char *sid_str)
969 {
970         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
971         struct wbcDomainSid sid;
972         char *domain;
973         char *name;
974         enum wbcSidType type;
975
976         /* Send off request */
977
978         wbc_status = wbcStringToSid(sid_str, &sid);
979         if (!WBC_ERROR_IS_OK(wbc_status)) {
980                 return false;
981         }
982
983         wbc_status = wbcLookupSid(&sid, &domain, &name, &type);
984         if (!WBC_ERROR_IS_OK(wbc_status)) {
985                 return false;
986         }
987
988         /* Display response */
989
990         d_printf("%s%c%s %d\n",
991                  domain, winbind_separator(), name, type);
992
993         return true;
994 }
995
996 /* Convert sid to fullname */
997
998 static bool wbinfo_lookupsid_fullname(const char *sid_str)
999 {
1000         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1001         struct wbcDomainSid sid;
1002         char *domain;
1003         char *name;
1004         enum wbcSidType type;
1005
1006         /* Send off request */
1007
1008         wbc_status = wbcStringToSid(sid_str, &sid);
1009         if (!WBC_ERROR_IS_OK(wbc_status)) {
1010                 return false;
1011         }
1012
1013         wbc_status = wbcGetDisplayName(&sid, &domain, &name, &type);
1014         if (!WBC_ERROR_IS_OK(wbc_status)) {
1015                 return false;
1016         }
1017
1018         /* Display response */
1019
1020         d_printf("%s%c%s %d\n",
1021                  domain, winbind_separator(), name, type);
1022
1023         return true;
1024 }
1025
1026 /* Lookup a list of RIDs */
1027
1028 static bool wbinfo_lookuprids(const char *domain, const char *arg)
1029 {
1030         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1031         struct wbcDomainInfo *dinfo = NULL;
1032         char *domain_name = NULL;
1033         const char **names = NULL;
1034         enum wbcSidType *types = NULL;
1035         size_t i;
1036         int num_rids;
1037         uint32 *rids = NULL;
1038         const char *p;
1039         char *ridstr;
1040         TALLOC_CTX *mem_ctx = NULL;
1041         bool ret = false;
1042
1043         if ((domain == NULL) || (strequal(domain, ".")) || (domain[0] == '\0')) {
1044                 domain = get_winbind_domain();
1045         }
1046
1047         /* Send request */
1048
1049         wbc_status = wbcDomainInfo(domain, &dinfo);
1050         if (!WBC_ERROR_IS_OK(wbc_status)) {
1051                 d_printf("wbcDomainInfo(%s) failed: %s\n", domain,
1052                          wbcErrorString(wbc_status));
1053                 goto done;
1054         }
1055
1056         mem_ctx = talloc_new(NULL);
1057         if (mem_ctx == NULL) {
1058                 d_printf("talloc_new failed\n");
1059                 goto done;
1060         }
1061
1062         num_rids = 0;
1063         rids = NULL;
1064         p = arg;
1065
1066         while (next_token_talloc(mem_ctx, &p, &ridstr, " ,\n")) {
1067                 uint32 rid = strtoul(ridstr, NULL, 10);
1068                 ADD_TO_ARRAY(mem_ctx, uint32, rid, &rids, &num_rids);
1069         }
1070
1071         if (rids == NULL) {
1072                 d_printf("no rids\n");
1073                 goto done;
1074         }
1075
1076         wbc_status = wbcLookupRids(&dinfo->sid, num_rids, rids,
1077                                    (const char **)&domain_name, &names, &types);
1078         if (!WBC_ERROR_IS_OK(wbc_status)) {
1079                 d_printf("winbind_lookup_rids failed: %s\n",
1080                          wbcErrorString(wbc_status));
1081                 goto done;
1082         }
1083
1084         d_printf("Domain: %s\n", domain_name);
1085
1086         for (i=0; i<num_rids; i++) {
1087                 d_printf("%8d: %s (%s)\n", rids[i], names[i],
1088                          sid_type_lookup(types[i]));
1089         }
1090
1091         ret = true;
1092 done:
1093         if (dinfo) {
1094                 wbcFreeMemory(dinfo);
1095         }
1096         if (domain_name) {
1097                 wbcFreeMemory(domain_name);
1098         }
1099         if (names) {
1100                 wbcFreeMemory(names);
1101         }
1102         if (types) {
1103                 wbcFreeMemory(types);
1104         }
1105         TALLOC_FREE(mem_ctx);
1106         return ret;
1107 }
1108
1109 /* Convert string to sid */
1110
1111 static bool wbinfo_lookupname(const char *full_name)
1112 {
1113         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1114         struct wbcDomainSid sid;
1115         char *sid_str;
1116         enum wbcSidType type;
1117         fstring domain_name;
1118         fstring account_name;
1119
1120         /* Send off request */
1121
1122         parse_wbinfo_domain_user(full_name, domain_name,
1123                                  account_name);
1124
1125         wbc_status = wbcLookupName(domain_name, account_name,
1126                                    &sid, &type);
1127         if (!WBC_ERROR_IS_OK(wbc_status)) {
1128                 return false;
1129         }
1130
1131         wbc_status = wbcSidToString(&sid, &sid_str);
1132         if (!WBC_ERROR_IS_OK(wbc_status)) {
1133                 return false;
1134         }
1135
1136         /* Display response */
1137
1138         d_printf("%s %s (%d)\n", sid_str, sid_type_lookup(type), type);
1139
1140         wbcFreeMemory(sid_str);
1141
1142         return true;
1143 }
1144
1145 static char *wbinfo_prompt_pass(const char *prefix,
1146                                 const char *username)
1147 {
1148         char *prompt;
1149         const char *ret = NULL;
1150
1151         prompt = talloc_asprintf(talloc_tos(), "Enter %s's ", username);
1152         if (!prompt) {
1153                 return NULL;
1154         }
1155         if (prefix) {
1156                 prompt = talloc_asprintf_append(prompt, "%s ", prefix);
1157                 if (!prompt) {
1158                         return NULL;
1159                 }
1160         }
1161         prompt = talloc_asprintf_append(prompt, "password: ");
1162         if (!prompt) {
1163                 return NULL;
1164         }
1165
1166         ret = getpass(prompt);
1167         TALLOC_FREE(prompt);
1168
1169         return SMB_STRDUP(ret);
1170 }
1171
1172 /* Authenticate a user with a plaintext password */
1173
1174 static bool wbinfo_auth_krb5(char *username, const char *cctype, uint32 flags)
1175 {
1176         struct winbindd_request request;
1177         struct winbindd_response response;
1178         NSS_STATUS result;
1179         char *p;
1180         char *password;
1181
1182         /* Send off request */
1183
1184         ZERO_STRUCT(request);
1185         ZERO_STRUCT(response);
1186
1187         p = strchr(username, '%');
1188
1189         if (p) {
1190                 *p = 0;
1191                 fstrcpy(request.data.auth.user, username);
1192                 fstrcpy(request.data.auth.pass, p + 1);
1193                 *p = '%';
1194         } else {
1195                 fstrcpy(request.data.auth.user, username);
1196                 password = wbinfo_prompt_pass(NULL, username);
1197                 fstrcpy(request.data.auth.pass, password);
1198                 SAFE_FREE(password);
1199         }
1200
1201         request.flags = flags;
1202
1203         fstrcpy(request.data.auth.krb5_cc_type, cctype);
1204
1205         request.data.auth.uid = geteuid();
1206
1207         result = winbindd_request_response(WINBINDD_PAM_AUTH, &request, &response);
1208
1209         /* Display response */
1210
1211         d_printf("plaintext kerberos password authentication for [%s] %s (requesting cctype: %s)\n",
1212                 username, (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed", cctype);
1213
1214         if (response.data.auth.nt_status)
1215                 d_fprintf(stderr, "error code was %s (0x%x)\nerror messsage was: %s\n",
1216                          response.data.auth.nt_status_string,
1217                          response.data.auth.nt_status,
1218                          response.data.auth.error_string);
1219
1220         if (result == NSS_STATUS_SUCCESS) {
1221
1222                 if (request.flags & WBFLAG_PAM_INFO3_TEXT) {
1223                         if (response.data.auth.info3.user_flgs & NETLOGON_CACHED_ACCOUNT) {
1224                                 d_printf("user_flgs: NETLOGON_CACHED_ACCOUNT\n");
1225                         }
1226                 }
1227
1228                 if (response.data.auth.krb5ccname[0] != '\0') {
1229                         d_printf("credentials were put in: %s\n", response.data.auth.krb5ccname);
1230                 } else {
1231                         d_printf("no credentials cached\n");
1232                 }
1233         }
1234
1235         return result == NSS_STATUS_SUCCESS;
1236 }
1237
1238 /* Authenticate a user with a plaintext password */
1239
1240 static bool wbinfo_auth(char *username)
1241 {
1242         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1243         char *s = NULL;
1244         char *p = NULL;
1245         char *password = NULL;
1246         char *name = NULL;
1247
1248         if ((s = SMB_STRDUP(username)) == NULL) {
1249                 return false;
1250         }
1251
1252         if ((p = strchr(s, '%')) != NULL) {
1253                 *p = 0;
1254                 p++;
1255                 password = SMB_STRDUP(p);
1256         } else {
1257                 password = wbinfo_prompt_pass(NULL, username);
1258         }
1259
1260         name = s;
1261
1262         wbc_status = wbcAuthenticateUser(name, password);
1263
1264         d_printf("plaintext password authentication %s\n",
1265                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1266
1267 #if 0
1268         if (response.data.auth.nt_status)
1269                 d_fprintf(stderr, "error code was %s (0x%x)\nerror messsage was: %s\n",
1270                          response.data.auth.nt_status_string,
1271                          response.data.auth.nt_status,
1272                          response.data.auth.error_string);
1273 #endif
1274
1275         SAFE_FREE(s);
1276         SAFE_FREE(password);
1277
1278         return WBC_ERROR_IS_OK(wbc_status);
1279 }
1280
1281 /* Authenticate a user with a challenge/response */
1282
1283 static bool wbinfo_auth_crap(char *username)
1284 {
1285         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1286         struct wbcAuthUserParams params;
1287         struct wbcAuthUserInfo *info = NULL;
1288         struct wbcAuthErrorInfo *err = NULL;
1289         DATA_BLOB lm = data_blob_null;
1290         DATA_BLOB nt = data_blob_null;
1291         fstring name_user;
1292         fstring name_domain;
1293         char *pass;
1294         char *p;
1295
1296         p = strchr(username, '%');
1297
1298         if (p) {
1299                 *p = 0;
1300                 pass = SMB_STRDUP(p + 1);
1301         } else {
1302                 pass = wbinfo_prompt_pass(NULL, username);
1303         }
1304
1305         parse_wbinfo_domain_user(username, name_domain, name_user);
1306
1307         params.account_name     = name_user;
1308         params.domain_name      = name_domain;
1309         params.workstation_name = NULL;
1310
1311         params.flags            = 0;
1312         params.parameter_control= WBC_MSV1_0_ALLOW_WORKSTATION_TRUST_ACCOUNT |
1313                                   WBC_MSV1_0_ALLOW_SERVER_TRUST_ACCOUNT;
1314
1315         params.level            = WBC_AUTH_USER_LEVEL_RESPONSE;
1316
1317         generate_random_buffer(params.password.response.challenge, 8);
1318
1319         if (lp_client_ntlmv2_auth()) {
1320                 DATA_BLOB server_chal;
1321                 DATA_BLOB names_blob;
1322
1323                 server_chal = data_blob(params.password.response.challenge, 8);
1324
1325                 /* Pretend this is a login to 'us', for blob purposes */
1326                 names_blob = NTLMv2_generate_names_blob(global_myname(), lp_workgroup());
1327
1328                 if (!SMBNTLMv2encrypt(name_user, name_domain, pass, &server_chal,
1329                                       &names_blob,
1330                                       &lm, &nt, NULL)) {
1331                         data_blob_free(&names_blob);
1332                         data_blob_free(&server_chal);
1333                         SAFE_FREE(pass);
1334                         return false;
1335                 }
1336                 data_blob_free(&names_blob);
1337                 data_blob_free(&server_chal);
1338
1339         } else {
1340                 if (lp_client_lanman_auth()) {
1341                         bool ok;
1342                         lm = data_blob(NULL, 24);
1343                         ok = SMBencrypt(pass, params.password.response.challenge,
1344                                         lm.data);
1345                         if (!ok) {
1346                                 data_blob_free(&lm);
1347                         }
1348                 }
1349                 nt = data_blob(NULL, 24);
1350                 SMBNTencrypt(pass, params.password.response.challenge,
1351                              nt.data);
1352         }
1353
1354         params.password.response.nt_length      = nt.length;
1355         params.password.response.nt_data        = nt.data;
1356         params.password.response.lm_length      = lm.length;
1357         params.password.response.lm_data        = lm.data;
1358
1359         wbc_status = wbcAuthenticateUserEx(&params, &info, &err);
1360
1361         /* Display response */
1362
1363         d_printf("challenge/response password authentication %s\n",
1364                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1365
1366         if (wbc_status == WBC_ERR_AUTH_ERROR) {
1367                 d_fprintf(stderr, "error code was %s (0x%x)\nerror messsage was: %s\n",
1368                          err->nt_string,
1369                          err->nt_status,
1370                          err->display_string);
1371                 wbcFreeMemory(err);
1372         } else if (WBC_ERROR_IS_OK(wbc_status)) {
1373                 wbcFreeMemory(info);
1374         }
1375
1376         data_blob_free(&nt);
1377         data_blob_free(&lm);
1378         SAFE_FREE(pass);
1379
1380         return WBC_ERROR_IS_OK(wbc_status);
1381 }
1382
1383 /* Authenticate a user with a plaintext password and set a token */
1384
1385 static bool wbinfo_klog(char *username)
1386 {
1387         struct winbindd_request request;
1388         struct winbindd_response response;
1389         NSS_STATUS result;
1390         char *p;
1391
1392         /* Send off request */
1393
1394         ZERO_STRUCT(request);
1395         ZERO_STRUCT(response);
1396
1397         p = strchr(username, '%');
1398
1399         if (p) {
1400                 *p = 0;
1401                 fstrcpy(request.data.auth.user, username);
1402                 fstrcpy(request.data.auth.pass, p + 1);
1403                 *p = '%';
1404         } else {
1405                 fstrcpy(request.data.auth.user, username);
1406                 fstrcpy(request.data.auth.pass, getpass("Password: "));
1407         }
1408
1409         request.flags |= WBFLAG_PAM_AFS_TOKEN;
1410
1411         result = winbindd_request_response(WINBINDD_PAM_AUTH, &request, &response);
1412
1413         /* Display response */
1414
1415         d_printf("plaintext password authentication %s\n",
1416                  (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed");
1417
1418         if (response.data.auth.nt_status)
1419                 d_fprintf(stderr, "error code was %s (0x%x)\nerror messsage was: %s\n",
1420                          response.data.auth.nt_status_string,
1421                          response.data.auth.nt_status,
1422                          response.data.auth.error_string);
1423
1424         if (result != NSS_STATUS_SUCCESS)
1425                 return false;
1426
1427         if (response.extra_data.data == NULL) {
1428                 d_fprintf(stderr, "Did not get token data\n");
1429                 return false;
1430         }
1431
1432         if (!afs_settoken_str((char *)response.extra_data.data)) {
1433                 d_fprintf(stderr, "Could not set token\n");
1434                 return false;
1435         }
1436
1437         d_printf("Successfully created AFS token\n");
1438         return true;
1439 }
1440
1441 /* Print domain users */
1442
1443 static bool print_domain_users(const char *domain)
1444 {
1445         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1446         uint32_t i;
1447         uint32_t num_users = 0;
1448         const char **users = NULL;
1449
1450         /* Send request to winbind daemon */
1451
1452         /* '.' is the special sign for our own domain */
1453         if (domain && strcmp(domain, ".") == 0) {
1454                 domain = get_winbind_domain();
1455         }
1456
1457         wbc_status = wbcListUsers(domain, &num_users, &users);
1458         if (!WBC_ERROR_IS_OK(wbc_status)) {
1459                 return false;
1460         }
1461
1462         for (i=0; i < num_users; i++) {
1463                 d_printf("%s\n", users[i]);
1464         }
1465
1466         wbcFreeMemory(users);
1467
1468         return true;
1469 }
1470
1471 /* Print domain groups */
1472
1473 static bool print_domain_groups(const char *domain)
1474 {
1475         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1476         uint32_t i;
1477         uint32_t num_groups = 0;
1478         const char **groups = NULL;
1479
1480         /* Send request to winbind daemon */
1481
1482         /* '.' is the special sign for our own domain */
1483         if (domain && strcmp(domain, ".") == 0) {
1484                 domain = get_winbind_domain();
1485         }
1486
1487         wbc_status = wbcListGroups(domain, &num_groups, &groups);
1488         if (!WBC_ERROR_IS_OK(wbc_status)) {
1489                 return false;
1490         }
1491
1492         for (i=0; i < num_groups; i++) {
1493                 d_printf("%s\n", groups[i]);
1494         }
1495
1496         wbcFreeMemory(groups);
1497
1498         return true;
1499 }
1500
1501 /* Set the authorised user for winbindd access in secrets.tdb */
1502
1503 static bool wbinfo_set_auth_user(char *username)
1504 {
1505         const char *password;
1506         char *p;
1507         fstring user, domain;
1508
1509         /* Separate into user and password */
1510
1511         parse_wbinfo_domain_user(username, domain, user);
1512
1513         p = strchr(user, '%');
1514
1515         if (p != NULL) {
1516                 *p = 0;
1517                 password = p+1;
1518         } else {
1519                 char *thepass = getpass("Password: ");
1520                 if (thepass) {
1521                         password = thepass;
1522                 } else
1523                         password = "";
1524         }
1525
1526         /* Store or remove DOMAIN\username%password in secrets.tdb */
1527
1528         secrets_init();
1529
1530         if (user[0]) {
1531
1532                 if (!secrets_store(SECRETS_AUTH_USER, user,
1533                                    strlen(user) + 1)) {
1534                         d_fprintf(stderr, "error storing username\n");
1535                         return false;
1536                 }
1537
1538                 /* We always have a domain name added by the
1539                    parse_wbinfo_domain_user() function. */
1540
1541                 if (!secrets_store(SECRETS_AUTH_DOMAIN, domain,
1542                                    strlen(domain) + 1)) {
1543                         d_fprintf(stderr, "error storing domain name\n");
1544                         return false;
1545                 }
1546
1547         } else {
1548                 secrets_delete(SECRETS_AUTH_USER);
1549                 secrets_delete(SECRETS_AUTH_DOMAIN);
1550         }
1551
1552         if (password[0]) {
1553
1554                 if (!secrets_store(SECRETS_AUTH_PASSWORD, password,
1555                                    strlen(password) + 1)) {
1556                         d_fprintf(stderr, "error storing password\n");
1557                         return false;
1558                 }
1559
1560         } else
1561                 secrets_delete(SECRETS_AUTH_PASSWORD);
1562
1563         return true;
1564 }
1565
1566 static void wbinfo_get_auth_user(void)
1567 {
1568         char *user, *domain, *password;
1569
1570         /* Lift data from secrets file */
1571
1572         secrets_fetch_ipc_userpass(&user, &domain, &password);
1573
1574         if ((!user || !*user) && (!domain || !*domain ) && (!password || !*password)){
1575
1576                 SAFE_FREE(user);
1577                 SAFE_FREE(domain);
1578                 SAFE_FREE(password);
1579                 d_printf("No authorised user configured\n");
1580                 return;
1581         }
1582
1583         /* Pretty print authorised user info */
1584
1585         d_printf("%s%s%s%s%s\n", domain ? domain : "", domain ? lp_winbind_separator(): "",
1586                  user, password ? "%" : "", password ? password : "");
1587
1588         SAFE_FREE(user);
1589         SAFE_FREE(domain);
1590         SAFE_FREE(password);
1591 }
1592
1593 static bool wbinfo_ping(void)
1594 {
1595         wbcErr wbc_status;
1596
1597         wbc_status = wbcPing();
1598
1599         /* Display response */
1600
1601         d_printf("Ping to winbindd %s\n",
1602                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1603
1604         return WBC_ERROR_IS_OK(wbc_status);
1605 }
1606
1607 static bool wbinfo_change_user_password(const char *username)
1608 {
1609         wbcErr wbc_status;
1610         char *old_password = NULL;
1611         char *new_password = NULL;
1612
1613         old_password = wbinfo_prompt_pass("old", username);
1614         new_password = wbinfo_prompt_pass("new", username);
1615
1616         wbc_status = wbcChangeUserPassword(username, old_password, new_password);
1617
1618         /* Display response */
1619
1620         d_printf("Password change for user %s %s\n", username,
1621                 WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1622
1623         SAFE_FREE(old_password);
1624         SAFE_FREE(new_password);
1625
1626         return WBC_ERROR_IS_OK(wbc_status);
1627 }
1628
1629 /* Main program */
1630
1631 enum {
1632         OPT_SET_AUTH_USER = 1000,
1633         OPT_GET_AUTH_USER,
1634         OPT_DOMAIN_NAME,
1635         OPT_SEQUENCE,
1636         OPT_GETDCNAME,
1637         OPT_DSGETDCNAME,
1638         OPT_USERDOMGROUPS,
1639         OPT_SIDALIASES,
1640         OPT_USERSIDS,
1641         OPT_ALLOCATE_UID,
1642         OPT_ALLOCATE_GID,
1643         OPT_SET_UID_MAPPING,
1644         OPT_SET_GID_MAPPING,
1645         OPT_REMOVE_UID_MAPPING,
1646         OPT_REMOVE_GID_MAPPING,
1647         OPT_SEPARATOR,
1648         OPT_LIST_ALL_DOMAINS,
1649         OPT_LIST_OWN_DOMAIN,
1650         OPT_UID_INFO,
1651         OPT_USER_SIDINFO,
1652         OPT_GROUP_INFO,
1653         OPT_GID_INFO,
1654         OPT_VERBOSE,
1655         OPT_ONLINESTATUS,
1656         OPT_CHANGE_USER_PASSWORD,
1657         OPT_SID_TO_FULLNAME
1658 };
1659
1660 int main(int argc, char **argv, char **envp)
1661 {
1662         int opt;
1663         TALLOC_CTX *frame = talloc_stackframe();
1664         poptContext pc;
1665         static char *string_arg;
1666         char *string_subarg = NULL;
1667         static char *opt_domain_name;
1668         static int int_arg;
1669         int int_subarg = -1;
1670         int result = 1;
1671         bool verbose = false;
1672
1673         struct poptOption long_options[] = {
1674                 POPT_AUTOHELP
1675
1676                 /* longName, shortName, argInfo, argPtr, value, descrip,
1677                    argDesc */
1678
1679                 { "domain-users", 'u', POPT_ARG_NONE, 0, 'u', "Lists all domain users", "domain"},
1680                 { "domain-groups", 'g', POPT_ARG_NONE, 0, 'g', "Lists all domain groups", "domain" },
1681                 { "WINS-by-name", 'N', POPT_ARG_STRING, &string_arg, 'N', "Converts NetBIOS name to IP", "NETBIOS-NAME" },
1682                 { "WINS-by-ip", 'I', POPT_ARG_STRING, &string_arg, 'I', "Converts IP address to NetBIOS name", "IP" },
1683                 { "name-to-sid", 'n', POPT_ARG_STRING, &string_arg, 'n', "Converts name to sid", "NAME" },
1684                 { "sid-to-name", 's', POPT_ARG_STRING, &string_arg, 's', "Converts sid to name", "SID" },
1685                 { "sid-to-fullname", 0, POPT_ARG_STRING, &string_arg,
1686                   OPT_SID_TO_FULLNAME, "Converts sid to fullname", "SID" },
1687                 { "lookup-rids", 'R', POPT_ARG_STRING, &string_arg, 'R', "Converts RIDs to names", "RIDs" },
1688                 { "uid-to-sid", 'U', POPT_ARG_INT, &int_arg, 'U', "Converts uid to sid" , "UID" },
1689                 { "gid-to-sid", 'G', POPT_ARG_INT, &int_arg, 'G', "Converts gid to sid", "GID" },
1690                 { "sid-to-uid", 'S', POPT_ARG_STRING, &string_arg, 'S', "Converts sid to uid", "SID" },
1691                 { "sid-to-gid", 'Y', POPT_ARG_STRING, &string_arg, 'Y', "Converts sid to gid", "SID" },
1692                 { "allocate-uid", 0, POPT_ARG_NONE, 0, OPT_ALLOCATE_UID,
1693                   "Get a new UID out of idmap" },
1694                 { "allocate-gid", 0, POPT_ARG_NONE, 0, OPT_ALLOCATE_GID,
1695                   "Get a new GID out of idmap" },
1696                 { "set-uid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_SET_UID_MAPPING, "Create or modify uid to sid mapping in idmap", "UID,SID" },
1697                 { "set-gid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_SET_GID_MAPPING, "Create or modify gid to sid mapping in idmap", "GID,SID" },
1698                 { "remove-uid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_REMOVE_UID_MAPPING, "Remove uid to sid mapping in idmap", "UID,SID" },
1699                 { "remove-gid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_REMOVE_GID_MAPPING, "Remove gid to sid mapping in idmap", "GID,SID" },
1700                 { "check-secret", 't', POPT_ARG_NONE, 0, 't', "Check shared secret" },
1701                 { "trusted-domains", 'm', POPT_ARG_NONE, 0, 'm', "List trusted domains" },
1702                 { "all-domains", 0, POPT_ARG_NONE, 0, OPT_LIST_ALL_DOMAINS, "List all domains (trusted and own domain)" },
1703                 { "own-domain", 0, POPT_ARG_NONE, 0, OPT_LIST_OWN_DOMAIN, "List own domain" },
1704                 { "sequence", 0, POPT_ARG_NONE, 0, OPT_SEQUENCE, "Show sequence numbers of all domains" },
1705                 { "online-status", 0, POPT_ARG_NONE, 0, OPT_ONLINESTATUS, "Show whether domains are marked as online or offline"},
1706                 { "domain-info", 'D', POPT_ARG_STRING, &string_arg, 'D', "Show most of the info we have about the domain" },
1707                 { "user-info", 'i', POPT_ARG_STRING, &string_arg, 'i', "Get user info", "USER" },
1708                 { "uid-info", 0, POPT_ARG_INT, &int_arg, OPT_UID_INFO, "Get user info from uid", "UID" },
1709                 { "group-info", 0, POPT_ARG_STRING, &string_arg, OPT_GROUP_INFO, "Get group info", "GROUP" },
1710                 { "user-sidinfo", 0, POPT_ARG_STRING, &string_arg, OPT_USER_SIDINFO, "Get user info from sid", "SID" },
1711                 { "gid-info", 0, POPT_ARG_INT, &int_arg, OPT_GID_INFO, "Get group info from gid", "GID" },
1712                 { "user-groups", 'r', POPT_ARG_STRING, &string_arg, 'r', "Get user groups", "USER" },
1713                 { "user-domgroups", 0, POPT_ARG_STRING, &string_arg,
1714                   OPT_USERDOMGROUPS, "Get user domain groups", "SID" },
1715                 { "sid-aliases", 0, POPT_ARG_STRING, &string_arg, OPT_SIDALIASES, "Get sid aliases", "SID" },
1716                 { "user-sids", 0, POPT_ARG_STRING, &string_arg, OPT_USERSIDS, "Get user group sids for user SID", "SID" },
1717                 { "authenticate", 'a', POPT_ARG_STRING, &string_arg, 'a', "authenticate user", "user%password" },
1718                 { "set-auth-user", 0, POPT_ARG_STRING, &string_arg, OPT_SET_AUTH_USER, "Store user and password used by winbindd (root only)", "user%password" },
1719                 { "getdcname", 0, POPT_ARG_STRING, &string_arg, OPT_GETDCNAME,
1720                   "Get a DC name for a foreign domain", "domainname" },
1721                 { "dsgetdcname", 0, POPT_ARG_STRING, &string_arg, OPT_DSGETDCNAME, "Find a DC for a domain", "domainname" },
1722                 { "get-auth-user", 0, POPT_ARG_NONE, NULL, OPT_GET_AUTH_USER, "Retrieve user and password used by winbindd (root only)", NULL },
1723                 { "ping", 'p', POPT_ARG_NONE, 0, 'p', "Ping winbindd to see if it is alive" },
1724                 { "domain", 0, POPT_ARG_STRING, &opt_domain_name, OPT_DOMAIN_NAME, "Define to the domain to restrict operation", "domain" },
1725 #ifdef WITH_FAKE_KASERVER
1726                 { "klog", 'k', POPT_ARG_STRING, &string_arg, 'k', "set an AFS token from winbind", "user%password" },
1727 #endif
1728 #ifdef HAVE_KRB5
1729                 { "krb5auth", 'K', POPT_ARG_STRING, &string_arg, 'K', "authenticate user using Kerberos", "user%password" },
1730                         /* destroys wbinfo --help output */
1731                         /* "user%password,DOM\\user%password,user@EXAMPLE.COM,EXAMPLE.COM\\user%password" }, */
1732 #endif
1733                 { "separator", 0, POPT_ARG_NONE, 0, OPT_SEPARATOR, "Get the active winbind separator", NULL },
1734                 { "verbose", 0, POPT_ARG_NONE, 0, OPT_VERBOSE, "Print additional information per command", NULL },
1735                 { "change-user-password", 0, POPT_ARG_STRING, &string_arg, OPT_CHANGE_USER_PASSWORD, "Change the password for a user", NULL },
1736                 POPT_COMMON_CONFIGFILE
1737                 POPT_COMMON_VERSION
1738                 POPT_TABLEEND
1739         };
1740
1741         /* Samba client initialisation */
1742         load_case_tables();
1743
1744
1745         /* Parse options */
1746
1747         pc = poptGetContext("wbinfo", argc, (const char **)argv, long_options, 0);
1748
1749         /* Parse command line options */
1750
1751         if (argc == 1) {
1752                 poptPrintHelp(pc, stderr, 0);
1753                 return 1;
1754         }
1755
1756         while((opt = poptGetNextOpt(pc)) != -1) {
1757                 /* get the generic configuration parameters like --domain */
1758                 switch (opt) {
1759                 case OPT_VERBOSE:
1760                         verbose = True;
1761                         break;
1762                 }
1763         }
1764
1765         poptFreeContext(pc);
1766
1767         if (!lp_load(get_dyn_CONFIGFILE(), true, false, false, true)) {
1768                 d_fprintf(stderr, "wbinfo: error opening config file %s. Error was %s\n",
1769                         get_dyn_CONFIGFILE(), strerror(errno));
1770                 exit(1);
1771         }
1772
1773         if (!init_names())
1774                 return 1;
1775
1776         load_interfaces();
1777
1778         pc = poptGetContext(NULL, argc, (const char **)argv, long_options,
1779                             POPT_CONTEXT_KEEP_FIRST);
1780
1781         while((opt = poptGetNextOpt(pc)) != -1) {
1782                 switch (opt) {
1783                 case 'u':
1784                         if (!print_domain_users(opt_domain_name)) {
1785                                 d_fprintf(stderr, "Error looking up domain users\n");
1786                                 goto done;
1787                         }
1788                         break;
1789                 case 'g':
1790                         if (!print_domain_groups(opt_domain_name)) {
1791                                 d_fprintf(stderr, "Error looking up domain groups\n");
1792                                 goto done;
1793                         }
1794                         break;
1795                 case 's':
1796                         if (!wbinfo_lookupsid(string_arg)) {
1797                                 d_fprintf(stderr, "Could not lookup sid %s\n", string_arg);
1798                                 goto done;
1799                         }
1800                         break;
1801                 case OPT_SID_TO_FULLNAME:
1802                         if (!wbinfo_lookupsid_fullname(string_arg)) {
1803                                 d_fprintf(stderr, "Could not lookup sid %s\n",
1804                                           string_arg);
1805                                 goto done;
1806                         }
1807                         break;
1808                 case 'R':
1809                         if (!wbinfo_lookuprids(opt_domain_name, string_arg)) {
1810                                 d_fprintf(stderr, "Could not lookup RIDs %s\n", string_arg);
1811                                 goto done;
1812                         }
1813                         break;
1814                 case 'n':
1815                         if (!wbinfo_lookupname(string_arg)) {
1816                                 d_fprintf(stderr, "Could not lookup name %s\n", string_arg);
1817                                 goto done;
1818                         }
1819                         break;
1820                 case 'N':
1821                         if (!wbinfo_wins_byname(string_arg)) {
1822                                 d_fprintf(stderr, "Could not lookup WINS by name %s\n", string_arg);
1823                                 goto done;
1824                         }
1825                         break;
1826                 case 'I':
1827                         if (!wbinfo_wins_byip(string_arg)) {
1828                                 d_fprintf(stderr, "Could not lookup WINS by IP %s\n", string_arg);
1829                                 goto done;
1830                         }
1831                         break;
1832                 case 'U':
1833                         if (!wbinfo_uid_to_sid(int_arg)) {
1834                                 d_fprintf(stderr, "Could not convert uid %d to sid\n", int_arg);
1835                                 goto done;
1836                         }
1837                         break;
1838                 case 'G':
1839                         if (!wbinfo_gid_to_sid(int_arg)) {
1840                                 d_fprintf(stderr, "Could not convert gid %d to sid\n",
1841                                        int_arg);
1842                                 goto done;
1843                         }
1844                         break;
1845                 case 'S':
1846                         if (!wbinfo_sid_to_uid(string_arg)) {
1847                                 d_fprintf(stderr, "Could not convert sid %s to uid\n",
1848                                        string_arg);
1849                                 goto done;
1850                         }
1851                         break;
1852                 case 'Y':
1853                         if (!wbinfo_sid_to_gid(string_arg)) {
1854                                 d_fprintf(stderr, "Could not convert sid %s to gid\n",
1855                                        string_arg);
1856                                 goto done;
1857                         }
1858                         break;
1859                 case OPT_ALLOCATE_UID:
1860                         if (!wbinfo_allocate_uid()) {
1861                                 d_fprintf(stderr, "Could not allocate a uid\n");
1862                                 goto done;
1863                         }
1864                         break;
1865                 case OPT_ALLOCATE_GID:
1866                         if (!wbinfo_allocate_gid()) {
1867                                 d_fprintf(stderr, "Could not allocate a gid\n");
1868                                 goto done;
1869                         }
1870                         break;
1871                 case OPT_SET_UID_MAPPING:
1872                         if (!parse_mapping_arg(string_arg, &int_subarg,
1873                                 &string_subarg) ||
1874                             !wbinfo_set_uid_mapping(int_subarg, string_subarg))
1875                         {
1876                                 d_fprintf(stderr, "Could not create or modify "
1877                                           "uid to sid mapping\n");
1878                                 goto done;
1879                         }
1880                         break;
1881                 case OPT_SET_GID_MAPPING:
1882                         if (!parse_mapping_arg(string_arg, &int_subarg,
1883                                 &string_subarg) ||
1884                             !wbinfo_set_gid_mapping(int_subarg, string_subarg))
1885                         {
1886                                 d_fprintf(stderr, "Could not create or modify "
1887                                           "gid to sid mapping\n");
1888                                 goto done;
1889                         }
1890                         break;
1891                 case OPT_REMOVE_UID_MAPPING:
1892                         if (!parse_mapping_arg(string_arg, &int_subarg,
1893                                 &string_subarg) ||
1894                             !wbinfo_remove_uid_mapping(int_subarg,
1895                                 string_subarg))
1896                         {
1897                                 d_fprintf(stderr, "Could not remove uid to sid "
1898                                     "mapping\n");
1899                                 goto done;
1900                         }
1901                         break;
1902                 case OPT_REMOVE_GID_MAPPING:
1903                         if (!parse_mapping_arg(string_arg, &int_subarg,
1904                                 &string_subarg) ||
1905                             !wbinfo_remove_gid_mapping(int_subarg,
1906                                 string_subarg))
1907                         {
1908                                 d_fprintf(stderr, "Could not remove gid to sid "
1909                                     "mapping\n");
1910                                 goto done;
1911                         }
1912                         break;
1913                 case 't':
1914                         if (!wbinfo_check_secret()) {
1915                                 d_fprintf(stderr, "Could not check secret\n");
1916                                 goto done;
1917                         }
1918                         break;
1919                 case 'm':
1920                         if (!wbinfo_list_domains(false, verbose)) {
1921                                 d_fprintf(stderr, "Could not list trusted domains\n");
1922                                 goto done;
1923                         }
1924                         break;
1925                 case OPT_SEQUENCE:
1926                         if (!wbinfo_show_sequence(opt_domain_name)) {
1927                                 d_fprintf(stderr, "Could not show sequence numbers\n");
1928                                 goto done;
1929                         }
1930                         break;
1931                 case OPT_ONLINESTATUS:
1932                         if (!wbinfo_show_onlinestatus(opt_domain_name)) {
1933                                 d_fprintf(stderr, "Could not show online-status\n");
1934                                 goto done;
1935                         }
1936                         break;
1937                 case 'D':
1938                         if (!wbinfo_domain_info(string_arg)) {
1939                                 d_fprintf(stderr, "Could not get domain info\n");
1940                                 goto done;
1941                         }
1942                         break;
1943                 case 'i':
1944                         if (!wbinfo_get_userinfo(string_arg)) {
1945                                 d_fprintf(stderr, "Could not get info for user %s\n",
1946                                                   string_arg);
1947                                 goto done;
1948                         }
1949                         break;
1950                 case OPT_USER_SIDINFO:
1951                         if ( !wbinfo_get_user_sidinfo(string_arg)) {
1952                                 d_fprintf(stderr, "Could not get info for user sid %s\n",
1953                                     string_arg);
1954                                 goto done;
1955                         }
1956                         break;
1957                 case OPT_UID_INFO:
1958                         if ( !wbinfo_get_uidinfo(int_arg)) {
1959                                 d_fprintf(stderr, "Could not get info for uid "
1960                                                 "%d\n", int_arg);
1961                                 goto done;
1962                         }
1963                         break;
1964                 case OPT_GROUP_INFO:
1965                         if ( !wbinfo_get_groupinfo(string_arg)) {
1966                                 d_fprintf(stderr, "Could not get info for "
1967                                           "group %s\n", string_arg);
1968                                 goto done;
1969                         }
1970                         break;
1971                 case OPT_GID_INFO:
1972                         if ( !wbinfo_get_gidinfo(int_arg)) {
1973                                 d_fprintf(stderr, "Could not get info for gid "
1974                                                 "%d\n", int_arg);
1975                                 goto done;
1976                         }
1977                         break;
1978                 case 'r':
1979                         if (!wbinfo_get_usergroups(string_arg)) {
1980                                 d_fprintf(stderr, "Could not get groups for user %s\n",
1981                                        string_arg);
1982                                 goto done;
1983                         }
1984                         break;
1985                 case OPT_USERSIDS:
1986                         if (!wbinfo_get_usersids(string_arg)) {
1987                                 d_fprintf(stderr, "Could not get group SIDs for user SID %s\n",
1988                                        string_arg);
1989                                 goto done;
1990                         }
1991                         break;
1992                 case OPT_USERDOMGROUPS:
1993                         if (!wbinfo_get_userdomgroups(string_arg)) {
1994                                 d_fprintf(stderr, "Could not get user's domain groups "
1995                                          "for user SID %s\n", string_arg);
1996                                 goto done;
1997                         }
1998                         break;
1999                 case OPT_SIDALIASES:
2000                         if (!wbinfo_get_sidaliases(opt_domain_name, string_arg)) {
2001                                 d_fprintf(stderr, "Could not get sid aliases "
2002                                          "for user SID %s\n", string_arg);
2003                                 goto done;
2004                         }
2005                         break;
2006                 case 'a': {
2007                                 bool got_error = false;
2008
2009                                 if (!wbinfo_auth(string_arg)) {
2010                                         d_fprintf(stderr, "Could not authenticate user %s with "
2011                                                 "plaintext password\n", string_arg);
2012                                         got_error = true;
2013                                 }
2014
2015                                 if (!wbinfo_auth_crap(string_arg)) {
2016                                         d_fprintf(stderr, "Could not authenticate user %s with "
2017                                                 "challenge/response\n", string_arg);
2018                                         got_error = true;
2019                                 }
2020
2021                                 if (got_error)
2022                                         goto done;
2023                                 break;
2024                         }
2025                 case 'K': {
2026                                 uint32 flags =  WBFLAG_PAM_KRB5 |
2027                                                 WBFLAG_PAM_CACHED_LOGIN |
2028                                                 WBFLAG_PAM_FALLBACK_AFTER_KRB5 |
2029                                                 WBFLAG_PAM_INFO3_TEXT;
2030
2031                                 if (!wbinfo_auth_krb5(string_arg, "FILE", flags)) {
2032                                         d_fprintf(stderr, "Could not authenticate user [%s] with "
2033                                                 "Kerberos (ccache: %s)\n", string_arg, "FILE");
2034                                         goto done;
2035                                 }
2036                                 break;
2037                         }
2038                 case 'k':
2039                         if (!wbinfo_klog(string_arg)) {
2040                                 d_fprintf(stderr, "Could not klog user\n");
2041                                 goto done;
2042                         }
2043                         break;
2044                 case 'p':
2045                         if (!wbinfo_ping()) {
2046                                 d_fprintf(stderr, "could not ping winbindd!\n");
2047                                 goto done;
2048                         }
2049                         break;
2050                 case OPT_SET_AUTH_USER:
2051                         if (!wbinfo_set_auth_user(string_arg)) {
2052                                 goto done;
2053                         }
2054                         break;
2055                 case OPT_GET_AUTH_USER:
2056                         wbinfo_get_auth_user();
2057                         break;
2058                 case OPT_GETDCNAME:
2059                         if (!wbinfo_getdcname(string_arg)) {
2060                                 goto done;
2061                         }
2062                         break;
2063                 case OPT_DSGETDCNAME:
2064                         if (!wbinfo_dsgetdcname(string_arg, 0)) {
2065                                 goto done;
2066                         }
2067                         break;
2068                 case OPT_SEPARATOR: {
2069                         const char sep = winbind_separator_int(true);
2070                         if ( !sep ) {
2071                                 goto done;
2072                         }
2073                         d_printf("%c\n", sep);
2074                         break;
2075                 }
2076                 case OPT_LIST_ALL_DOMAINS:
2077                         if (!wbinfo_list_domains(true, verbose)) {
2078                                 goto done;
2079                         }
2080                         break;
2081                 case OPT_LIST_OWN_DOMAIN:
2082                         if (!wbinfo_list_own_domain()) {
2083                                 goto done;
2084                         }
2085                         break;
2086                 case OPT_CHANGE_USER_PASSWORD:
2087                         if (!wbinfo_change_user_password(string_arg)) {
2088                                 d_fprintf(stderr, "Could not change user password "
2089                                          "for user %s\n", string_arg);
2090                                 goto done;
2091                         }
2092                         break;
2093
2094                 /* generic configuration options */
2095                 case OPT_DOMAIN_NAME:
2096                         break;
2097                 case OPT_VERBOSE:
2098                         break;
2099                 default:
2100                         d_fprintf(stderr, "Invalid option\n");
2101                         poptPrintHelp(pc, stderr, 0);
2102                         goto done;
2103                 }
2104         }
2105
2106         result = 0;
2107
2108         /* Exit code */
2109
2110  done:
2111         talloc_destroy(frame);
2112
2113         poptFreeContext(pc);
2114         return result;
2115 }