torture/attr: use security_ace_equal instead of sec_ace_equal
[samba.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-2007
8    Copyright (C) Volker Lendecke 2009
9
10    This program is free software; you can redistribute it and/or modify
11    it under the terms of the GNU General Public License as published by
12    the Free Software Foundation; either version 3 of the License, or
13    (at your option) any later version.
14
15    This program is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18    GNU General Public License for more details.
19
20    You should have received a copy of the GNU General Public License
21    along with this program.  If not, see <http://www.gnu.org/licenses/>.
22 */
23
24 #include "includes.h"
25 #include "winbind_client.h"
26 #include "libwbclient/wbclient.h"
27 #include "lib/popt/popt.h"
28 #include "../libcli/auth/libcli_auth.h"
29 #include "lib/cmdline/popt_common.h"
30
31 #ifdef DBGC_CLASS
32 #undef DBGC_CLASS
33 #define DBGC_CLASS DBGC_WINBIND
34 #endif
35
36 static struct wbcInterfaceDetails *init_interface_details(void)
37 {
38         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
39         static struct wbcInterfaceDetails *details;
40
41         if (details) {
42                 return details;
43         }
44
45         wbc_status = wbcInterfaceDetails(&details);
46         if (!WBC_ERROR_IS_OK(wbc_status)) {
47                 d_fprintf(stderr, "could not obtain winbind interface "
48                                   "details: %s\n", wbcErrorString(wbc_status));
49         }
50
51         return details;
52 }
53
54 static char winbind_separator(void)
55 {
56         struct wbcInterfaceDetails *details;
57         static bool got_sep;
58         static char sep;
59
60         if (got_sep)
61                 return sep;
62
63         details = init_interface_details();
64
65         if (!details) {
66                 d_fprintf(stderr, "could not obtain winbind separator!\n");
67                 return 0;
68         }
69
70         sep = details->winbind_separator;
71         got_sep = true;
72
73         if (!sep) {
74                 d_fprintf(stderr, "winbind separator was NULL!\n");
75                 return 0;
76         }
77
78         return sep;
79 }
80
81 static const char *get_winbind_domain(void)
82 {
83         static struct wbcInterfaceDetails *details;
84
85         details = init_interface_details();
86
87         if (!details) {
88                 d_fprintf(stderr, "could not obtain winbind domain name!\n");
89                 return 0;
90         }
91
92         return details->netbios_domain;
93 }
94
95 static const char *get_winbind_netbios_name(void)
96 {
97         static struct wbcInterfaceDetails *details;
98
99         details = init_interface_details();
100
101         if (!details) {
102                 d_fprintf(stderr, "could not obtain winbind netbios name!\n");
103                 return 0;
104         }
105
106         return details->netbios_name;
107 }
108
109 /* Copy of parse_domain_user from winbindd_util.c.  Parse a string of the
110    form DOMAIN/user into a domain and a user */
111
112 static bool parse_wbinfo_domain_user(const char *domuser, fstring domain,
113                                      fstring user)
114 {
115
116         char *p = strchr(domuser,winbind_separator());
117
118         if (!p) {
119                 /* Maybe it was a UPN? */
120                 p = strchr(domuser, '@');
121                 if (p != NULL) {
122                         fstrcpy(domain, "");
123                         fstrcpy(user, domuser);
124                         return true;
125                 }
126
127                 fstrcpy(user, domuser);
128                 fstrcpy(domain, get_winbind_domain());
129                 return true;
130         }
131
132         fstrcpy(user, p+1);
133         fstrcpy(domain, domuser);
134         domain[PTR_DIFF(p, domuser)] = 0;
135
136         return true;
137 }
138
139 /* Parse string of "uid,sid" or "gid,sid" into separate int and string values.
140  * Return true if input was valid, false otherwise. */
141 static bool parse_mapping_arg(char *arg, int *id, char **sid)
142 {
143         char *tmp, *endptr;
144
145         if (!arg || !*arg)
146                 return false;
147
148         tmp = strtok(arg, ",");
149         *sid = strtok(NULL, ",");
150
151         if (!tmp || !*tmp || !*sid || !**sid)
152                 return false;
153
154         /* Because atoi() can return 0 on invalid input, which would be a valid
155          * UID/GID we must use strtoul() and do error checking */
156         *id = strtoul(tmp, &endptr, 10);
157
158         if (endptr[0] != '\0')
159                 return false;
160
161         return true;
162 }
163
164 /* pull pwent info for a given user */
165
166 static bool wbinfo_get_userinfo(char *user)
167 {
168         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
169         struct passwd *pwd = NULL;
170
171         wbc_status = wbcGetpwnam(user, &pwd);
172         if (!WBC_ERROR_IS_OK(wbc_status)) {
173                 d_fprintf(stderr, "failed to call wbcGetpwnam: %s\n",
174                           wbcErrorString(wbc_status));
175                 return false;
176         }
177
178         d_printf("%s:%s:%u:%u:%s:%s:%s\n",
179                  pwd->pw_name,
180                  pwd->pw_passwd,
181                  (unsigned int)pwd->pw_uid,
182                  (unsigned int)pwd->pw_gid,
183                  pwd->pw_gecos,
184                  pwd->pw_dir,
185                  pwd->pw_shell);
186
187         wbcFreeMemory(pwd);
188
189         return true;
190 }
191
192 /* pull pwent info for a given uid */
193 static bool wbinfo_get_uidinfo(int uid)
194 {
195         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
196         struct passwd *pwd = NULL;
197
198         wbc_status = wbcGetpwuid(uid, &pwd);
199         if (!WBC_ERROR_IS_OK(wbc_status)) {
200                 d_fprintf(stderr, "failed to call wbcGetpwuid: %s\n",
201                           wbcErrorString(wbc_status));
202                 return false;
203         }
204
205         d_printf("%s:%s:%u:%u:%s:%s:%s\n",
206                  pwd->pw_name,
207                  pwd->pw_passwd,
208                  (unsigned int)pwd->pw_uid,
209                  (unsigned int)pwd->pw_gid,
210                  pwd->pw_gecos,
211                  pwd->pw_dir,
212                  pwd->pw_shell);
213
214         wbcFreeMemory(pwd);
215
216         return true;
217 }
218
219 static bool wbinfo_get_user_sidinfo(const char *sid_str)
220 {
221         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
222         struct passwd *pwd = NULL;
223         struct wbcDomainSid sid;
224
225         wbc_status = wbcStringToSid(sid_str, &sid);
226         wbc_status = wbcGetpwsid(&sid, &pwd);
227         if (!WBC_ERROR_IS_OK(wbc_status)) {
228                 d_fprintf(stderr, "failed to call wbcGetpwsid: %s\n",
229                           wbcErrorString(wbc_status));
230                 return false;
231         }
232
233         d_printf("%s:%s:%u:%u:%s:%s:%s\n",
234                  pwd->pw_name,
235                  pwd->pw_passwd,
236                  (unsigned int)pwd->pw_uid,
237                  (unsigned int)pwd->pw_gid,
238                  pwd->pw_gecos,
239                  pwd->pw_dir,
240                  pwd->pw_shell);
241
242         wbcFreeMemory(pwd);
243
244         return true;
245 }
246
247
248 /* pull grent for a given group */
249 static bool wbinfo_get_groupinfo(const char *group)
250 {
251         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
252         struct group *grp;
253         char **mem;
254
255         wbc_status = wbcGetgrnam(group, &grp);
256         if (!WBC_ERROR_IS_OK(wbc_status)) {
257                 d_fprintf(stderr, "failed to call wbcGetgrnam: %s\n",
258                           wbcErrorString(wbc_status));
259                 return false;
260         }
261
262         d_printf("%s:%s:%u:",
263                  grp->gr_name,
264                  grp->gr_passwd,
265                  (unsigned int)grp->gr_gid);
266
267         mem = grp->gr_mem;
268         while (*mem != NULL) {
269                 d_printf("%s%s", *mem, *(mem+1) != NULL ? "," : "");
270                 mem += 1;
271         }
272         d_printf("\n");
273
274         wbcFreeMemory(grp);
275
276         return true;
277 }
278
279 /* pull grent for a given gid */
280 static bool wbinfo_get_gidinfo(int gid)
281 {
282         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
283         struct group *grp;
284         char **mem;
285
286         wbc_status = wbcGetgrgid(gid, &grp);
287         if (!WBC_ERROR_IS_OK(wbc_status)) {
288                 d_fprintf(stderr, "failed to call wbcGetgrgid: %s\n",
289                           wbcErrorString(wbc_status));
290                 return false;
291         }
292
293         d_printf("%s:%s:%u:",
294                  grp->gr_name,
295                  grp->gr_passwd,
296                  (unsigned int)grp->gr_gid);
297
298         mem = grp->gr_mem;
299         while (*mem != NULL) {
300                 d_printf("%s%s", *mem, *(mem+1) != NULL ? "," : "");
301                 mem += 1;
302         }
303         d_printf("\n");
304
305         wbcFreeMemory(grp);
306
307         return true;
308 }
309
310 /* List groups a user is a member of */
311
312 static bool wbinfo_get_usergroups(const char *user)
313 {
314         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
315         uint32_t num_groups;
316         uint32_t i;
317         gid_t *groups = NULL;
318
319         /* Send request */
320
321         wbc_status = wbcGetGroups(user, &num_groups, &groups);
322         if (!WBC_ERROR_IS_OK(wbc_status)) {
323                 d_fprintf(stderr, "failed to call wbcGetGroups: %s\n",
324                           wbcErrorString(wbc_status));
325                 return false;
326         }
327
328         for (i = 0; i < num_groups; i++) {
329                 d_printf("%d\n", (int)groups[i]);
330         }
331
332         wbcFreeMemory(groups);
333
334         return true;
335 }
336
337
338 /* List group SIDs a user SID is a member of */
339 static bool wbinfo_get_usersids(const char *user_sid_str)
340 {
341         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
342         uint32_t num_sids;
343         uint32_t i;
344         struct wbcDomainSid user_sid, *sids = NULL;
345
346         /* Send request */
347
348         wbc_status = wbcStringToSid(user_sid_str, &user_sid);
349         if (!WBC_ERROR_IS_OK(wbc_status)) {
350                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
351                           wbcErrorString(wbc_status));
352                 return false;
353         }
354
355         wbc_status = wbcLookupUserSids(&user_sid, false, &num_sids, &sids);
356         if (!WBC_ERROR_IS_OK(wbc_status)) {
357                 d_fprintf(stderr, "failed to call wbcLookupUserSids: %s\n",
358                           wbcErrorString(wbc_status));
359                 return false;
360         }
361
362         for (i = 0; i < num_sids; i++) {
363                 char str[WBC_SID_STRING_BUFLEN];
364                 wbcSidToStringBuf(&sids[i], str, sizeof(str));
365                 d_printf("%s\n", str);
366         }
367
368         wbcFreeMemory(sids);
369
370         return true;
371 }
372
373 static bool wbinfo_get_userdomgroups(const char *user_sid_str)
374 {
375         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
376         uint32_t num_sids;
377         uint32_t i;
378         struct wbcDomainSid user_sid, *sids = NULL;
379
380         /* Send request */
381
382         wbc_status = wbcStringToSid(user_sid_str, &user_sid);
383         if (!WBC_ERROR_IS_OK(wbc_status)) {
384                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
385                           wbcErrorString(wbc_status));
386                 return false;
387         }
388
389         wbc_status = wbcLookupUserSids(&user_sid, true, &num_sids, &sids);
390         if (!WBC_ERROR_IS_OK(wbc_status)) {
391                 d_fprintf(stderr, "failed to call wbcLookupUserSids: %s\n",
392                           wbcErrorString(wbc_status));
393                 return false;
394         }
395
396         for (i = 0; i < num_sids; i++) {
397                 char str[WBC_SID_STRING_BUFLEN];
398                 wbcSidToStringBuf(&sids[i], str, sizeof(str));
399                 d_printf("%s\n", str);
400         }
401
402         wbcFreeMemory(sids);
403
404         return true;
405 }
406
407 static bool wbinfo_get_sidaliases(const char *domain,
408                                   const char *user_sid_str)
409 {
410         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
411         struct wbcDomainInfo *dinfo = NULL;
412         uint32_t i;
413         struct wbcDomainSid user_sid;
414         uint32_t *alias_rids = NULL;
415         uint32_t num_alias_rids;
416         char domain_sid_str[WBC_SID_STRING_BUFLEN];
417
418         /* Send request */
419         if ((domain == NULL) || (strequal(domain, ".")) ||
420            (domain[0] == '\0')) {
421                 domain = get_winbind_domain();
422         }
423
424         /* Send request */
425
426         wbc_status = wbcDomainInfo(domain, &dinfo);
427         if (!WBC_ERROR_IS_OK(wbc_status)) {
428                 d_fprintf(stderr, "wbcDomainInfo(%s) failed: %s\n", domain,
429                           wbcErrorString(wbc_status));
430                 goto done;
431         }
432         wbc_status = wbcStringToSid(user_sid_str, &user_sid);
433         if (!WBC_ERROR_IS_OK(wbc_status)) {
434                 goto done;
435         }
436
437         wbc_status = wbcGetSidAliases(&dinfo->sid, &user_sid, 1,
438             &alias_rids, &num_alias_rids);
439         if (!WBC_ERROR_IS_OK(wbc_status)) {
440                 goto done;
441         }
442
443         wbcSidToStringBuf(&dinfo->sid, domain_sid_str, sizeof(domain_sid_str));
444
445         for (i = 0; i < num_alias_rids; i++) {
446                 d_printf("%s-%d\n", domain_sid_str, alias_rids[i]);
447         }
448
449         wbcFreeMemory(alias_rids);
450
451 done:
452         wbcFreeMemory(dinfo);
453         return (WBC_ERR_SUCCESS == wbc_status);
454 }
455
456
457 /* Convert NetBIOS name to IP */
458
459 static bool wbinfo_wins_byname(const char *name)
460 {
461         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
462         char *ip = NULL;
463
464         wbc_status = wbcResolveWinsByName(name, &ip);
465         if (!WBC_ERROR_IS_OK(wbc_status)) {
466                 d_fprintf(stderr, "failed to call wbcResolveWinsByName: %s\n",
467                           wbcErrorString(wbc_status));
468                 return false;
469         }
470
471         /* Display response */
472
473         d_printf("%s\n", ip);
474
475         wbcFreeMemory(ip);
476
477         return true;
478 }
479
480 /* Convert IP to NetBIOS name */
481
482 static bool wbinfo_wins_byip(const char *ip)
483 {
484         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
485         char *name = NULL;
486
487         wbc_status = wbcResolveWinsByIP(ip, &name);
488         if (!WBC_ERROR_IS_OK(wbc_status)) {
489                 d_fprintf(stderr, "failed to call wbcResolveWinsByIP: %s\n",
490                           wbcErrorString(wbc_status));
491                 return false;
492         }
493
494         /* Display response */
495
496         d_printf("%s\n", name);
497
498         wbcFreeMemory(name);
499
500         return true;
501 }
502
503 /* List all/trusted domains */
504
505 static bool wbinfo_list_domains(bool list_all_domains, bool verbose)
506 {
507         struct wbcDomainInfo *domain_list = NULL;
508         size_t num_domains;
509         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
510         bool print_all = !list_all_domains && verbose;
511         int i;
512
513         wbc_status = wbcListTrusts(&domain_list, &num_domains);
514         if (!WBC_ERROR_IS_OK(wbc_status)) {
515                 d_fprintf(stderr, "failed to call wbcListTrusts: %s\n",
516                           wbcErrorString(wbc_status));
517                 return false;
518         }
519
520         if (print_all) {
521                 d_printf("%-16s%-65s%-12s%-12s%-5s%-5s\n",
522                          "Domain Name", "DNS Domain", "Trust Type",
523                          "Transitive", "In", "Out");
524         }
525
526         for (i=0; i<num_domains; i++) {
527                 if (print_all) {
528                         d_printf("%-16s", domain_list[i].short_name);
529                 } else {
530                         d_printf("%s", domain_list[i].short_name);
531                         d_printf("\n");
532                         continue;
533                 }
534
535                 d_printf("%-65s", domain_list[i].dns_name);
536
537                 switch(domain_list[i].trust_type) {
538                 case WBC_DOMINFO_TRUSTTYPE_NONE:
539                         d_printf("None        ");
540                         break;
541                 case WBC_DOMINFO_TRUSTTYPE_FOREST:
542                         d_printf("Forest      ");
543                         break;
544                 case WBC_DOMINFO_TRUSTTYPE_EXTERNAL:
545                         d_printf("External    ");
546                         break;
547                 case WBC_DOMINFO_TRUSTTYPE_IN_FOREST:
548                         d_printf("In-Forest   ");
549                         break;
550                 }
551
552                 if (domain_list[i].trust_flags & WBC_DOMINFO_TRUST_TRANSITIVE) {
553                         d_printf("Yes         ");
554                 } else {
555                         d_printf("No          ");
556                 }
557
558                 if (domain_list[i].trust_flags & WBC_DOMINFO_TRUST_INCOMING) {
559                         d_printf("Yes  ");
560                 } else {
561                         d_printf("No   ");
562                 }
563
564                 if (domain_list[i].trust_flags & WBC_DOMINFO_TRUST_OUTGOING) {
565                         d_printf("Yes  ");
566                 } else {
567                         d_printf("No   ");
568                 }
569
570                 d_printf("\n");
571         }
572
573         wbcFreeMemory(domain_list);
574
575         return true;
576 }
577
578 /* List own domain */
579
580 static bool wbinfo_list_own_domain(void)
581 {
582         d_printf("%s\n", get_winbind_domain());
583
584         return true;
585 }
586
587 /* show sequence numbers */
588 static bool wbinfo_show_sequence(const char *domain)
589 {
590         d_printf("This command has been deprecated.  Please use the "
591                  "--online-status option instead.\n");
592         return false;
593 }
594
595 /* show sequence numbers */
596 static bool wbinfo_show_onlinestatus(const char *domain)
597 {
598         struct wbcDomainInfo *domain_list = NULL;
599         size_t num_domains;
600         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
601         int i;
602
603         wbc_status = wbcListTrusts(&domain_list, &num_domains);
604         if (!WBC_ERROR_IS_OK(wbc_status)) {
605                 d_fprintf(stderr, "failed to call wbcListTrusts: %s\n",
606                           wbcErrorString(wbc_status));
607                 return false;
608         }
609
610         for (i=0; i<num_domains; i++) {
611                 bool is_offline;
612
613                 if (domain) {
614                         if (!strequal(domain_list[i].short_name, domain)) {
615                                 continue;
616                         }
617                 }
618
619                 is_offline = (domain_list[i].domain_flags &
620                               WBC_DOMINFO_DOMAIN_OFFLINE);
621
622                 d_printf("%s : %s\n",
623                          domain_list[i].short_name,
624                          is_offline ? "offline" : "online" );
625         }
626
627         wbcFreeMemory(domain_list);
628
629         return true;
630 }
631
632
633 /* Show domain info */
634
635 static bool wbinfo_domain_info(const char *domain)
636 {
637         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
638         struct wbcDomainInfo *dinfo = NULL;
639         char sid_str[WBC_SID_STRING_BUFLEN];
640
641         if ((domain == NULL) || (strequal(domain, ".")) || (domain[0] == '\0')){
642                 domain = get_winbind_domain();
643         }
644
645         /* Send request */
646
647         wbc_status = wbcDomainInfo(domain, &dinfo);
648         if (!WBC_ERROR_IS_OK(wbc_status)) {
649                 d_fprintf(stderr, "failed to call wbcDomainInfo: %s\n",
650                           wbcErrorString(wbc_status));
651                 return false;
652         }
653
654         wbcSidToStringBuf(&dinfo->sid, sid_str, sizeof(sid_str));
655
656         /* Display response */
657
658         d_printf("Name              : %s\n", dinfo->short_name);
659         d_printf("Alt_Name          : %s\n", dinfo->dns_name);
660
661         d_printf("SID               : %s\n", sid_str);
662
663         d_printf("Active Directory  : %s\n",
664                  (dinfo->domain_flags & WBC_DOMINFO_DOMAIN_AD) ? "Yes" : "No");
665         d_printf("Native            : %s\n",
666                  (dinfo->domain_flags & WBC_DOMINFO_DOMAIN_NATIVE) ?
667                  "Yes" : "No");
668
669         d_printf("Primary           : %s\n",
670                  (dinfo->domain_flags & WBC_DOMINFO_DOMAIN_PRIMARY) ?
671                  "Yes" : "No");
672
673         wbcFreeMemory(dinfo);
674
675         return true;
676 }
677
678 /* Get a foreign DC's name */
679 static bool wbinfo_getdcname(const char *domain_name)
680 {
681         struct winbindd_request request;
682         struct winbindd_response response;
683
684         ZERO_STRUCT(request);
685         ZERO_STRUCT(response);
686
687         fstrcpy(request.domain_name, domain_name);
688
689         /* Send request */
690
691         if (winbindd_request_response(WINBINDD_GETDCNAME, &request,
692                                       &response) != NSS_STATUS_SUCCESS) {
693                 d_fprintf(stderr, "Could not get dc name for %s\n",domain_name);
694                 return false;
695         }
696
697         /* Display response */
698
699         d_printf("%s\n", response.data.dc_name);
700
701         return true;
702 }
703
704 /* Find a DC */
705 static bool wbinfo_dsgetdcname(const char *domain_name, uint32_t flags)
706 {
707         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
708         struct wbcDomainControllerInfoEx *dc_info;
709         char *str = NULL;
710
711         wbc_status = wbcLookupDomainControllerEx(domain_name, NULL, NULL,
712                                                  flags | DS_DIRECTORY_SERVICE_REQUIRED,
713                                                  &dc_info);
714         if (!WBC_ERROR_IS_OK(wbc_status)) {
715                 printf("Could not find dc for %s\n", domain_name);
716                 return false;
717         }
718
719         wbcGuidToString(dc_info->domain_guid, &str);
720
721         d_printf("%s\n", dc_info->dc_unc);
722         d_printf("%s\n", dc_info->dc_address);
723         d_printf("%d\n", dc_info->dc_address_type);
724         d_printf("%s\n", str);
725         d_printf("%s\n", dc_info->domain_name);
726         d_printf("%s\n", dc_info->forest_name);
727         d_printf("0x%08x\n", dc_info->dc_flags);
728         d_printf("%s\n", dc_info->dc_site_name);
729         d_printf("%s\n", dc_info->client_site_name);
730
731         return true;
732 }
733
734 /* Check trust account password */
735
736 static bool wbinfo_check_secret(const char *domain)
737 {
738         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
739         struct wbcAuthErrorInfo *error = NULL;
740         const char *domain_name;
741
742         if (domain) {
743                 domain_name = domain;
744         } else {
745                 domain_name = get_winbind_domain();
746         }
747
748         wbc_status = wbcCheckTrustCredentials(domain_name, &error);
749
750         d_printf("checking the trust secret for domain %s via RPC calls %s\n",
751                 domain_name,
752                 WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
753
754         if (wbc_status == WBC_ERR_AUTH_ERROR) {
755                 d_fprintf(stderr, "error code was %s (0x%x)\n",
756                           error->nt_string, error->nt_status);
757                 wbcFreeMemory(error);
758         }
759         if (!WBC_ERROR_IS_OK(wbc_status)) {
760                 d_fprintf(stderr, "failed to call wbcCheckTrustCredentials: "
761                           "%s\n", wbcErrorString(wbc_status));
762                 return false;
763         }
764
765         return true;
766 }
767
768 /* Find the currently connected DCs */
769
770 static bool wbinfo_dc_info(const char *domain_name)
771 {
772         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
773         size_t i, num_dcs;
774         const char **dc_names, **dc_ips;
775
776         wbc_status = wbcDcInfo(domain_name, &num_dcs,
777                                &dc_names, &dc_ips);
778         if (!WBC_ERROR_IS_OK(wbc_status)) {
779                 printf("Could not find dc info %s\n",
780                        domain_name ? domain_name : "our domain");
781                 return false;
782         }
783
784         for (i=0; i<num_dcs; i++) {
785                 printf("%s (%s)\n", dc_names[i], dc_ips[i]);
786         }
787         wbcFreeMemory(dc_names);
788         wbcFreeMemory(dc_ips);
789
790         return true;
791 }
792
793 /* Change trust account password */
794
795 static bool wbinfo_change_secret(const char *domain)
796 {
797         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
798         struct wbcAuthErrorInfo *error = NULL;
799         const char *domain_name;
800
801         if (domain) {
802                 domain_name = domain;
803         } else {
804                 domain_name = get_winbind_domain();
805         }
806
807         wbc_status = wbcChangeTrustCredentials(domain_name, &error);
808
809         d_printf("changing the trust secret for domain %s via RPC calls %s\n",
810                 domain_name,
811                 WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
812
813         if (wbc_status == WBC_ERR_AUTH_ERROR) {
814                 d_fprintf(stderr, "error code was %s (0x%x)\n",
815                           error->nt_string, error->nt_status);
816                 wbcFreeMemory(error);
817         }
818         if (!WBC_ERROR_IS_OK(wbc_status)) {
819                 d_fprintf(stderr, "failed to call wbcChangeTrustCredentials: "
820                           "%s\n", wbcErrorString(wbc_status));
821                 return false;
822         }
823
824         return true;
825 }
826
827 /* Check DC connection */
828
829 static bool wbinfo_ping_dc(void)
830 {
831         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
832         struct wbcAuthErrorInfo *error = NULL;
833         char *dcname = NULL;
834
835         wbc_status = wbcPingDc2(NULL, &error, &dcname);
836
837         d_printf("checking the NETLOGON dc connection to \"%s\" %s\n",
838                  dcname ? dcname : "",
839                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
840
841         wbcFreeMemory(dcname);
842         if (wbc_status == WBC_ERR_AUTH_ERROR) {
843                 d_fprintf(stderr, "error code was %s (0x%x)\n",
844                           error->nt_string, error->nt_status);
845                 wbcFreeMemory(error);
846                 return false;
847         }
848         if (!WBC_ERROR_IS_OK(wbc_status)) {
849                 d_fprintf(stderr, "failed to call wbcPingDc: %s\n",
850                           wbcErrorString(wbc_status));
851                 return false;
852         }
853
854         return true;
855 }
856
857 /* Convert uid to sid */
858
859 static bool wbinfo_uid_to_sid(uid_t uid)
860 {
861         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
862         struct wbcDomainSid sid;
863         char sid_str[WBC_SID_STRING_BUFLEN];
864
865         /* Send request */
866
867         wbc_status = wbcUidToSid(uid, &sid);
868         if (!WBC_ERROR_IS_OK(wbc_status)) {
869                 d_fprintf(stderr, "failed to call wbcUidToSid: %s\n",
870                           wbcErrorString(wbc_status));
871                 return false;
872         }
873
874         wbcSidToStringBuf(&sid, sid_str, sizeof(sid_str));
875
876         /* Display response */
877
878         d_printf("%s\n", sid_str);
879
880         return true;
881 }
882
883 /* Convert gid to sid */
884
885 static bool wbinfo_gid_to_sid(gid_t gid)
886 {
887         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
888         struct wbcDomainSid sid;
889         char sid_str[WBC_SID_STRING_BUFLEN];
890
891         /* Send request */
892
893         wbc_status = wbcGidToSid(gid, &sid);
894         if (!WBC_ERROR_IS_OK(wbc_status)) {
895                 d_fprintf(stderr, "failed to call wbcGidToSid: %s\n",
896                           wbcErrorString(wbc_status));
897                 return false;
898         }
899
900         wbcSidToStringBuf(&sid, sid_str, sizeof(sid_str));
901
902         /* Display response */
903
904         d_printf("%s\n", sid_str);
905
906         return true;
907 }
908
909 /* Convert sid to uid */
910
911 static bool wbinfo_sid_to_uid(const char *sid_str)
912 {
913         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
914         struct wbcDomainSid sid;
915         uid_t uid;
916
917         /* Send request */
918
919         wbc_status = wbcStringToSid(sid_str, &sid);
920         if (!WBC_ERROR_IS_OK(wbc_status)) {
921                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
922                           wbcErrorString(wbc_status));
923                 return false;
924         }
925
926         wbc_status = wbcSidToUid(&sid, &uid);
927         if (!WBC_ERROR_IS_OK(wbc_status)) {
928                 d_fprintf(stderr, "failed to call wbcSidToUid: %s\n",
929                           wbcErrorString(wbc_status));
930                 return false;
931         }
932
933         /* Display response */
934
935         d_printf("%d\n", (int)uid);
936
937         return true;
938 }
939
940 static bool wbinfo_sid_to_gid(const char *sid_str)
941 {
942         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
943         struct wbcDomainSid sid;
944         gid_t gid;
945
946         /* Send request */
947
948         wbc_status = wbcStringToSid(sid_str, &sid);
949         if (!WBC_ERROR_IS_OK(wbc_status)) {
950                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
951                           wbcErrorString(wbc_status));
952                 return false;
953         }
954
955         wbc_status = wbcSidToGid(&sid, &gid);
956         if (!WBC_ERROR_IS_OK(wbc_status)) {
957                 d_fprintf(stderr, "failed to call wbcSidToGid: %s\n",
958                           wbcErrorString(wbc_status));
959                 return false;
960         }
961
962         /* Display response */
963
964         d_printf("%d\n", (int)gid);
965
966         return true;
967 }
968
969 static bool wbinfo_sids_to_unix_ids(const char *arg)
970 {
971         char sidstr[WBC_SID_STRING_BUFLEN];
972         struct wbcDomainSid *sids;
973         struct wbcUnixId *unix_ids;
974         int i, num_sids;
975         const char *p;
976         wbcErr wbc_status;
977
978
979         num_sids = 0;
980         sids = NULL;
981         p = arg;
982
983         while (next_token(&p, sidstr, LIST_SEP, sizeof(sidstr))) {
984                 sids = talloc_realloc(talloc_tos(), sids, struct wbcDomainSid,
985                                       num_sids+1);
986                 if (sids == NULL) {
987                         d_fprintf(stderr, "talloc failed\n");
988                         return false;
989                 }
990                 wbc_status = wbcStringToSid(sidstr, &sids[num_sids]);
991                 if (!WBC_ERROR_IS_OK(wbc_status)) {
992                         d_fprintf(stderr, "wbcSidToString(%s) failed: %s\n",
993                                   sidstr, wbcErrorString(wbc_status));
994                         TALLOC_FREE(sids);
995                         return false;
996                 }
997                 num_sids += 1;
998         }
999
1000         unix_ids = talloc_array(talloc_tos(), struct wbcUnixId, num_sids);
1001         if (unix_ids == NULL) {
1002                 TALLOC_FREE(sids);
1003                 return false;
1004         }
1005
1006         wbc_status = wbcSidsToUnixIds(sids, num_sids, unix_ids);
1007         if (!WBC_ERROR_IS_OK(wbc_status)) {
1008                 d_fprintf(stderr, "wbcSidsToUnixIds failed: %s\n",
1009                           wbcErrorString(wbc_status));
1010                 TALLOC_FREE(sids);
1011                 return false;
1012         }
1013
1014         for (i=0; i<num_sids; i++) {
1015
1016                 wbcSidToStringBuf(&sids[i], sidstr, sizeof(sidstr));
1017
1018                 switch(unix_ids[i].type) {
1019                 case WBC_ID_TYPE_UID:
1020                         d_printf("%s -> uid %d\n", sidstr, unix_ids[i].id.uid);
1021                         break;
1022                 case WBC_ID_TYPE_GID:
1023                         d_printf("%s -> gid %d\n", sidstr, unix_ids[i].id.gid);
1024                         break;
1025                 case WBC_ID_TYPE_BOTH:
1026                         d_printf("%s -> uid/gid %d\n", sidstr, unix_ids[i].id.uid);
1027                         break;
1028                 default:
1029                         d_printf("%s -> unmapped\n", sidstr);
1030                         break;
1031                 }
1032         }
1033
1034         TALLOC_FREE(sids);
1035         TALLOC_FREE(unix_ids);
1036
1037         return true;
1038 }
1039
1040 static bool wbinfo_allocate_uid(void)
1041 {
1042         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1043         uid_t uid;
1044
1045         /* Send request */
1046
1047         wbc_status = wbcAllocateUid(&uid);
1048         if (!WBC_ERROR_IS_OK(wbc_status)) {
1049                 d_fprintf(stderr, "failed to call wbcAllocateUid: %s\n",
1050                           wbcErrorString(wbc_status));
1051                 return false;
1052         }
1053
1054         /* Display response */
1055
1056         d_printf("New uid: %u\n", (unsigned int)uid);
1057
1058         return true;
1059 }
1060
1061 static bool wbinfo_allocate_gid(void)
1062 {
1063         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1064         gid_t gid;
1065
1066         /* Send request */
1067
1068         wbc_status = wbcAllocateGid(&gid);
1069         if (!WBC_ERROR_IS_OK(wbc_status)) {
1070                 d_fprintf(stderr, "failed to call wbcAllocateGid: %s\n",
1071                           wbcErrorString(wbc_status));
1072                 return false;
1073         }
1074
1075         /* Display response */
1076
1077         d_printf("New gid: %u\n", (unsigned int)gid);
1078
1079         return true;
1080 }
1081
1082 static bool wbinfo_set_uid_mapping(uid_t uid, const char *sid_str)
1083 {
1084         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1085         struct wbcDomainSid sid;
1086
1087         /* Send request */
1088
1089         wbc_status = wbcStringToSid(sid_str, &sid);
1090         if (!WBC_ERROR_IS_OK(wbc_status)) {
1091                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1092                           wbcErrorString(wbc_status));
1093                 return false;
1094         }
1095
1096         wbc_status = wbcSetUidMapping(uid, &sid);
1097         if (!WBC_ERROR_IS_OK(wbc_status)) {
1098                 d_fprintf(stderr, "failed to call wbcSetUidMapping: %s\n",
1099                           wbcErrorString(wbc_status));
1100                 return false;
1101         }
1102
1103         /* Display response */
1104
1105         d_printf("uid %u now mapped to sid %s\n",
1106                 (unsigned int)uid, sid_str);
1107
1108         return true;
1109 }
1110
1111 static bool wbinfo_set_gid_mapping(gid_t gid, const char *sid_str)
1112 {
1113         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1114         struct wbcDomainSid sid;
1115
1116         /* Send request */
1117
1118         wbc_status = wbcStringToSid(sid_str, &sid);
1119         if (!WBC_ERROR_IS_OK(wbc_status)) {
1120                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1121                           wbcErrorString(wbc_status));
1122                 return false;
1123         }
1124
1125         wbc_status = wbcSetGidMapping(gid, &sid);
1126         if (!WBC_ERROR_IS_OK(wbc_status)) {
1127                 d_fprintf(stderr, "failed to call wbcSetGidMapping: %s\n",
1128                           wbcErrorString(wbc_status));
1129                 return false;
1130         }
1131
1132         /* Display response */
1133
1134         d_printf("gid %u now mapped to sid %s\n",
1135                 (unsigned int)gid, sid_str);
1136
1137         return true;
1138 }
1139
1140 static bool wbinfo_remove_uid_mapping(uid_t uid, const char *sid_str)
1141 {
1142         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1143         struct wbcDomainSid sid;
1144
1145         /* Send request */
1146
1147         wbc_status = wbcStringToSid(sid_str, &sid);
1148         if (!WBC_ERROR_IS_OK(wbc_status)) {
1149                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1150                           wbcErrorString(wbc_status));
1151                 return false;
1152         }
1153
1154         wbc_status = wbcRemoveUidMapping(uid, &sid);
1155         if (!WBC_ERROR_IS_OK(wbc_status)) {
1156                 d_fprintf(stderr, "failed to call wbcRemoveUidMapping: %s\n",
1157                           wbcErrorString(wbc_status));
1158                 return false;
1159         }
1160
1161         /* Display response */
1162
1163         d_printf("Removed uid %u to sid %s mapping\n",
1164                 (unsigned int)uid, sid_str);
1165
1166         return true;
1167 }
1168
1169 static bool wbinfo_remove_gid_mapping(gid_t gid, const char *sid_str)
1170 {
1171         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1172         struct wbcDomainSid sid;
1173
1174         /* Send request */
1175
1176         wbc_status = wbcStringToSid(sid_str, &sid);
1177         if (!WBC_ERROR_IS_OK(wbc_status)) {
1178                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1179                           wbcErrorString(wbc_status));
1180                 return false;
1181         }
1182
1183         wbc_status = wbcRemoveGidMapping(gid, &sid);
1184         if (!WBC_ERROR_IS_OK(wbc_status)) {
1185                 d_fprintf(stderr, "failed to call wbcRemoveGidMapping: %s\n",
1186                           wbcErrorString(wbc_status));
1187                 return false;
1188         }
1189
1190         /* Display response */
1191
1192         d_printf("Removed gid %u to sid %s mapping\n",
1193                 (unsigned int)gid, sid_str);
1194
1195         return true;
1196 }
1197
1198 /* Convert sid to string */
1199
1200 static bool wbinfo_lookupsid(const char *sid_str)
1201 {
1202         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1203         struct wbcDomainSid sid;
1204         char *domain;
1205         char *name;
1206         enum wbcSidType type;
1207
1208         /* Send off request */
1209
1210         wbc_status = wbcStringToSid(sid_str, &sid);
1211         if (!WBC_ERROR_IS_OK(wbc_status)) {
1212                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1213                           wbcErrorString(wbc_status));
1214                 return false;
1215         }
1216
1217         wbc_status = wbcLookupSid(&sid, &domain, &name, &type);
1218         if (!WBC_ERROR_IS_OK(wbc_status)) {
1219                 d_fprintf(stderr, "failed to call wbcLookupSid: %s\n",
1220                           wbcErrorString(wbc_status));
1221                 return false;
1222         }
1223
1224         /* Display response */
1225
1226         if (type == WBC_SID_NAME_DOMAIN) {
1227                 d_printf("%s %d\n", domain, type);
1228         } else {
1229                 d_printf("%s%c%s %d\n",
1230                          domain, winbind_separator(), name, type);
1231         }
1232
1233         wbcFreeMemory(domain);
1234         wbcFreeMemory(name);
1235
1236         return true;
1237 }
1238
1239 /* Convert sid to fullname */
1240
1241 static bool wbinfo_lookupsid_fullname(const char *sid_str)
1242 {
1243         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1244         struct wbcDomainSid sid;
1245         char *domain;
1246         char *name;
1247         enum wbcSidType type;
1248
1249         /* Send off request */
1250
1251         wbc_status = wbcStringToSid(sid_str, &sid);
1252         if (!WBC_ERROR_IS_OK(wbc_status)) {
1253                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1254                           wbcErrorString(wbc_status));
1255                 return false;
1256         }
1257
1258         wbc_status = wbcGetDisplayName(&sid, &domain, &name, &type);
1259         if (!WBC_ERROR_IS_OK(wbc_status)) {
1260                 d_fprintf(stderr, "failed to call wbcGetDisplayName: %s\n",
1261                           wbcErrorString(wbc_status));
1262                 return false;
1263         }
1264
1265         /* Display response */
1266
1267         d_printf("%s%c%s %d\n",
1268                  domain, winbind_separator(), name, type);
1269
1270         wbcFreeMemory(domain);
1271         wbcFreeMemory(name);
1272
1273         return true;
1274 }
1275
1276 /* Lookup a list of RIDs */
1277
1278 static bool wbinfo_lookuprids(const char *domain, const char *arg)
1279 {
1280         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1281         struct wbcDomainInfo *dinfo = NULL;
1282         char *domain_name = NULL;
1283         const char **names = NULL;
1284         enum wbcSidType *types = NULL;
1285         size_t i;
1286         int num_rids;
1287         uint32_t *rids = NULL;
1288         const char *p;
1289         char *ridstr;
1290         TALLOC_CTX *mem_ctx = NULL;
1291         bool ret = false;
1292
1293         if ((domain == NULL) || (strequal(domain, ".")) || (domain[0] == '\0')){
1294                 domain = get_winbind_domain();
1295         }
1296
1297         /* Send request */
1298
1299         wbc_status = wbcDomainInfo(domain, &dinfo);
1300         if (!WBC_ERROR_IS_OK(wbc_status)) {
1301                 d_printf("wbcDomainInfo(%s) failed: %s\n", domain,
1302                          wbcErrorString(wbc_status));
1303                 goto done;
1304         }
1305
1306         mem_ctx = talloc_new(NULL);
1307         if (mem_ctx == NULL) {
1308                 d_printf("talloc_new failed\n");
1309                 goto done;
1310         }
1311
1312         num_rids = 0;
1313         rids = NULL;
1314         p = arg;
1315
1316         while (next_token_talloc(mem_ctx, &p, &ridstr, " ,\n")) {
1317                 uint32_t rid = strtoul(ridstr, NULL, 10);
1318                 rids = talloc_realloc(mem_ctx, rids, uint32_t, num_rids + 1);
1319                 if (rids == NULL) {
1320                         d_printf("talloc_realloc failed\n");
1321                 }
1322                 rids[num_rids] = rid;
1323                 num_rids += 1;
1324         }
1325
1326         if (rids == NULL) {
1327                 d_printf("no rids\n");
1328                 goto done;
1329         }
1330
1331         wbc_status = wbcLookupRids(&dinfo->sid, num_rids, rids,
1332                                    (const char **)&domain_name, &names, &types);
1333         if (!WBC_ERROR_IS_OK(wbc_status)) {
1334                 d_printf("winbind_lookup_rids failed: %s\n",
1335                          wbcErrorString(wbc_status));
1336                 goto done;
1337         }
1338
1339         d_printf("Domain: %s\n", domain_name);
1340
1341         for (i=0; i<num_rids; i++) {
1342                 d_printf("%8d: %s (%s)\n", rids[i], names[i],
1343                          wbcSidTypeString(types[i]));
1344         }
1345
1346         ret = true;
1347 done:
1348         wbcFreeMemory(dinfo);
1349         wbcFreeMemory(domain_name);
1350         wbcFreeMemory(names);
1351         wbcFreeMemory(types);
1352         TALLOC_FREE(mem_ctx);
1353         return ret;
1354 }
1355
1356 static bool wbinfo_lookup_sids(const char *arg)
1357 {
1358         char sidstr[WBC_SID_STRING_BUFLEN];
1359         struct wbcDomainSid *sids;
1360         struct wbcDomainInfo *domains;
1361         struct wbcTranslatedName *names;
1362         int num_domains;
1363         int i, num_sids;
1364         const char *p;
1365         wbcErr wbc_status;
1366
1367
1368         num_sids = 0;
1369         sids = NULL;
1370         p = arg;
1371
1372         while (next_token(&p, sidstr, LIST_SEP, sizeof(sidstr))) {
1373                 sids = talloc_realloc(talloc_tos(), sids, struct wbcDomainSid,
1374                                       num_sids+1);
1375                 if (sids == NULL) {
1376                         d_fprintf(stderr, "talloc failed\n");
1377                         return false;
1378                 }
1379                 wbc_status = wbcStringToSid(sidstr, &sids[num_sids]);
1380                 if (!WBC_ERROR_IS_OK(wbc_status)) {
1381                         d_fprintf(stderr, "wbcSidToString(%s) failed: %s\n",
1382                                   sidstr, wbcErrorString(wbc_status));
1383                         TALLOC_FREE(sids);
1384                         return false;
1385                 }
1386                 num_sids += 1;
1387         }
1388
1389         wbc_status = wbcLookupSids(sids, num_sids, &domains, &num_domains,
1390                                    &names);
1391         if (!WBC_ERROR_IS_OK(wbc_status)) {
1392                 d_fprintf(stderr, "wbcLookupSids failed: %s\n",
1393                           wbcErrorString(wbc_status));
1394                 TALLOC_FREE(sids);
1395                 return false;
1396         }
1397
1398         for (i=0; i<num_sids; i++) {
1399                 const char *domain = NULL;
1400
1401                 wbcSidToStringBuf(&sids[i], sidstr, sizeof(sidstr));
1402
1403                 if (names[i].domain_index >= num_domains) {
1404                         domain = "<none>";
1405                 } else if (names[i].domain_index < 0) {
1406                         domain = "<none>";
1407                 } else {
1408                         domain = domains[names[i].domain_index].short_name;
1409                 }
1410
1411                 if (names[i].type == WBC_SID_NAME_DOMAIN) {
1412                         d_printf("%s -> %s %d\n", sidstr,
1413                                  domain,
1414                                  names[i].type);
1415                 } else {
1416                         d_printf("%s -> %s%c%s %d\n", sidstr,
1417                                  domain,
1418                                  winbind_separator(),
1419                                  names[i].name, names[i].type);
1420                 }
1421         }
1422         wbcFreeMemory(names);
1423         wbcFreeMemory(domains);
1424         return true;
1425 }
1426
1427 /* Convert string to sid */
1428
1429 static bool wbinfo_lookupname(const char *full_name)
1430 {
1431         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1432         struct wbcDomainSid sid;
1433         char sid_str[WBC_SID_STRING_BUFLEN];
1434         enum wbcSidType type;
1435         fstring domain_name;
1436         fstring account_name;
1437
1438         /* Send off request */
1439
1440         parse_wbinfo_domain_user(full_name, domain_name,
1441                                  account_name);
1442
1443         wbc_status = wbcLookupName(domain_name, account_name,
1444                                    &sid, &type);
1445         if (!WBC_ERROR_IS_OK(wbc_status)) {
1446                 d_fprintf(stderr, "failed to call wbcLookupName: %s\n",
1447                           wbcErrorString(wbc_status));
1448                 return false;
1449         }
1450
1451         wbcSidToStringBuf(&sid, sid_str, sizeof(sid_str));
1452
1453         /* Display response */
1454
1455         d_printf("%s %s (%d)\n", sid_str, wbcSidTypeString(type), type);
1456
1457         return true;
1458 }
1459
1460 static char *wbinfo_prompt_pass(TALLOC_CTX *mem_ctx,
1461                                 const char *prefix,
1462                                 const char *username)
1463 {
1464         char *prompt;
1465         char buf[1024] = {0};
1466         int rc;
1467
1468         prompt = talloc_asprintf(mem_ctx, "Enter %s's ", username);
1469         if (!prompt) {
1470                 return NULL;
1471         }
1472         if (prefix) {
1473                 prompt = talloc_asprintf_append(prompt, "%s ", prefix);
1474                 if (!prompt) {
1475                         return NULL;
1476                 }
1477         }
1478         prompt = talloc_asprintf_append(prompt, "password: ");
1479         if (!prompt) {
1480                 return NULL;
1481         }
1482
1483         rc = samba_getpass(prompt, buf, sizeof(buf), false, false);
1484         TALLOC_FREE(prompt);
1485         if (rc < 0) {
1486                 return NULL;
1487         }
1488
1489         return talloc_strdup(mem_ctx, buf);
1490 }
1491
1492 /* Authenticate a user with a plaintext password */
1493
1494 static bool wbinfo_auth_krb5(char *username, const char *cctype, uint32_t flags)
1495 {
1496         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1497         char *s = NULL;
1498         char *p = NULL;
1499         char *password = NULL;
1500         char *name = NULL;
1501         char *local_cctype = NULL;
1502         uid_t uid;
1503         struct wbcLogonUserParams params;
1504         struct wbcLogonUserInfo *info;
1505         struct wbcAuthErrorInfo *error;
1506         struct wbcUserPasswordPolicyInfo *policy;
1507         TALLOC_CTX *frame = talloc_tos();
1508
1509         if ((s = talloc_strdup(frame, username)) == NULL) {
1510                 return false;
1511         }
1512
1513         if ((p = strchr(s, '%')) != NULL) {
1514                 *p = 0;
1515                 p++;
1516                 password = talloc_strdup(frame, p);
1517         } else {
1518                 password = wbinfo_prompt_pass(frame, NULL, username);
1519         }
1520
1521         local_cctype = talloc_strdup(frame, cctype);
1522
1523         name = s;
1524
1525         uid = geteuid();
1526
1527         params.username = name;
1528         params.password = password;
1529         params.num_blobs = 0;
1530         params.blobs = NULL;
1531
1532         wbc_status = wbcAddNamedBlob(&params.num_blobs,
1533                                      &params.blobs,
1534                                      "flags",
1535                                      0,
1536                                      (uint8_t *)&flags,
1537                                      sizeof(flags));
1538         if (!WBC_ERROR_IS_OK(wbc_status)) {
1539                 d_fprintf(stderr, "failed to call wbcAddNamedBlob: %s\n",
1540                           wbcErrorString(wbc_status));
1541                 goto done;
1542         }
1543
1544         wbc_status = wbcAddNamedBlob(&params.num_blobs,
1545                                      &params.blobs,
1546                                      "user_uid",
1547                                      0,
1548                                      (uint8_t *)&uid,
1549                                      sizeof(uid));
1550         if (!WBC_ERROR_IS_OK(wbc_status)) {
1551                 d_fprintf(stderr, "failed to call wbcAddNamedBlob: %s\n",
1552                           wbcErrorString(wbc_status));
1553                 goto done;
1554         }
1555
1556         wbc_status = wbcAddNamedBlob(&params.num_blobs,
1557                                      &params.blobs,
1558                                      "krb5_cc_type",
1559                                      0,
1560                                      (uint8_t *)local_cctype,
1561                                      strlen(cctype)+1);
1562         if (!WBC_ERROR_IS_OK(wbc_status)) {
1563                 d_fprintf(stderr, "failed to call wbcAddNamedBlob: %s\n",
1564                           wbcErrorString(wbc_status));
1565                 goto done;
1566         }
1567
1568         wbc_status = wbcLogonUser(&params, &info, &error, &policy);
1569
1570         d_printf("plaintext kerberos password authentication for [%s] %s "
1571                  "(requesting cctype: %s)\n",
1572                  username, WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed",
1573                  cctype);
1574
1575         if (error) {
1576                 d_fprintf(stderr,
1577                          "error code was %s (0x%x)\nerror message was: %s\n",
1578                          error->nt_string,
1579                          error->nt_status,
1580                          error->display_string);
1581         }
1582
1583         if (WBC_ERROR_IS_OK(wbc_status)) {
1584                 if (flags & WBFLAG_PAM_INFO3_TEXT) {
1585                         if (info && info->info && info->info->user_flags &
1586                             NETLOGON_CACHED_ACCOUNT) {
1587                                 d_printf("user_flgs: "
1588                                          "NETLOGON_CACHED_ACCOUNT\n");
1589                         }
1590                 }
1591
1592                 if (info) {
1593                         int i;
1594                         for (i=0; i < info->num_blobs; i++) {
1595                                 if (strequal(info->blobs[i].name,
1596                                              "krb5ccname")) {
1597                                         d_printf("credentials were put "
1598                                                  "in: %s\n",
1599                                                 (const char *)
1600                                                       info->blobs[i].blob.data);
1601                                         break;
1602                                 }
1603                         }
1604                 } else {
1605                         d_printf("no credentials cached\n");
1606                 }
1607         }
1608  done:
1609
1610         wbcFreeMemory(params.blobs);
1611
1612         return WBC_ERROR_IS_OK(wbc_status);
1613 }
1614
1615 /* Authenticate a user with a plaintext password */
1616
1617 static bool wbinfo_auth(char *username)
1618 {
1619         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1620         char *s = NULL;
1621         char *p = NULL;
1622         char *password = NULL;
1623         char *name = NULL;
1624         TALLOC_CTX *frame = talloc_tos();
1625
1626         if ((s = talloc_strdup(frame, username)) == NULL) {
1627                 return false;
1628         }
1629
1630         if ((p = strchr(s, '%')) != NULL) {
1631                 *p = 0;
1632                 p++;
1633                 password = talloc_strdup(frame, p);
1634         } else {
1635                 password = wbinfo_prompt_pass(frame, NULL, username);
1636         }
1637
1638         name = s;
1639
1640         wbc_status = wbcAuthenticateUser(name, password);
1641
1642         d_printf("plaintext password authentication %s\n",
1643                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1644
1645 #if 0
1646         if (response.data.auth.nt_status)
1647                 d_fprintf(stderr,
1648                          "error code was %s (0x%x)\nerror message was: %s\n",
1649                          response.data.auth.nt_status_string,
1650                          response.data.auth.nt_status,
1651                          response.data.auth.error_string);
1652 #endif
1653
1654         return WBC_ERROR_IS_OK(wbc_status);
1655 }
1656
1657 /* Authenticate a user with a challenge/response */
1658
1659 static bool wbinfo_auth_crap(char *username, bool use_ntlmv2, bool use_lanman)
1660 {
1661         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1662         struct wbcAuthUserParams params;
1663         struct wbcAuthUserInfo *info = NULL;
1664         struct wbcAuthErrorInfo *err = NULL;
1665         DATA_BLOB lm = data_blob_null;
1666         DATA_BLOB nt = data_blob_null;
1667         fstring name_user;
1668         fstring name_domain;
1669         char *pass;
1670         char *p;
1671         TALLOC_CTX *frame = talloc_tos();
1672
1673         p = strchr(username, '%');
1674
1675         if (p) {
1676                 *p = 0;
1677                 pass = talloc_strdup(frame, p + 1);
1678         } else {
1679                 pass = wbinfo_prompt_pass(frame, NULL, username);
1680         }
1681
1682         parse_wbinfo_domain_user(username, name_domain, name_user);
1683
1684         params.account_name     = name_user;
1685         params.domain_name      = name_domain;
1686         params.workstation_name = NULL;
1687
1688         params.flags            = 0;
1689         params.parameter_control= WBC_MSV1_0_ALLOW_WORKSTATION_TRUST_ACCOUNT |
1690                                   WBC_MSV1_0_ALLOW_SERVER_TRUST_ACCOUNT;
1691
1692         params.level            = WBC_AUTH_USER_LEVEL_RESPONSE;
1693
1694         generate_random_buffer(params.password.response.challenge, 8);
1695
1696         if (use_ntlmv2) {
1697                 DATA_BLOB server_chal;
1698                 DATA_BLOB names_blob;
1699
1700                 server_chal = data_blob(params.password.response.challenge, 8);
1701
1702                 /* Pretend this is a login to 'us', for blob purposes */
1703                 names_blob = NTLMv2_generate_names_blob(NULL,
1704                                                 get_winbind_netbios_name(),
1705                                                 get_winbind_domain());
1706
1707                 if (!SMBNTLMv2encrypt(NULL, name_user, name_domain, pass,
1708                                       &server_chal,
1709                                       &names_blob,
1710                                       &lm, &nt, NULL, NULL)) {
1711                         data_blob_free(&names_blob);
1712                         data_blob_free(&server_chal);
1713                         TALLOC_FREE(pass);
1714                         return false;
1715                 }
1716                 data_blob_free(&names_blob);
1717                 data_blob_free(&server_chal);
1718
1719         } else {
1720                 if (use_lanman) {
1721                         bool ok;
1722                         lm = data_blob(NULL, 24);
1723                         ok = SMBencrypt(pass,
1724                                         params.password.response.challenge,
1725                                         lm.data);
1726                         if (!ok) {
1727                                 data_blob_free(&lm);
1728                         }
1729                 }
1730                 nt = data_blob(NULL, 24);
1731                 SMBNTencrypt(pass, params.password.response.challenge,
1732                              nt.data);
1733         }
1734
1735         params.password.response.nt_length      = nt.length;
1736         params.password.response.nt_data        = nt.data;
1737         params.password.response.lm_length      = lm.length;
1738         params.password.response.lm_data        = lm.data;
1739
1740         wbc_status = wbcAuthenticateUserEx(&params, &info, &err);
1741
1742         /* Display response */
1743
1744         d_printf("challenge/response password authentication %s\n",
1745                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1746
1747         if (wbc_status == WBC_ERR_AUTH_ERROR) {
1748                 d_fprintf(stderr,
1749                          "error code was %s (0x%x)\nerror message was: %s\n",
1750                          err->nt_string,
1751                          err->nt_status,
1752                          err->display_string);
1753                 wbcFreeMemory(err);
1754         } else if (WBC_ERROR_IS_OK(wbc_status)) {
1755                 wbcFreeMemory(info);
1756         }
1757
1758         data_blob_free(&nt);
1759         data_blob_free(&lm);
1760
1761         return WBC_ERROR_IS_OK(wbc_status);
1762 }
1763
1764 /* Authenticate a user with a plaintext password */
1765
1766 static bool wbinfo_pam_logon(char *username)
1767 {
1768         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1769         struct wbcLogonUserParams params;
1770         struct wbcAuthErrorInfo *error = NULL;
1771         char *s = NULL;
1772         char *p = NULL;
1773         TALLOC_CTX *frame = talloc_tos();
1774         uint32_t flags;
1775         uint32_t uid;
1776
1777         ZERO_STRUCT(params);
1778
1779         if ((s = talloc_strdup(frame, username)) == NULL) {
1780                 return false;
1781         }
1782
1783         if ((p = strchr(s, '%')) != NULL) {
1784                 *p = 0;
1785                 p++;
1786                 params.password = talloc_strdup(frame, p);
1787         } else {
1788                 params.password = wbinfo_prompt_pass(frame, NULL, username);
1789         }
1790         params.username = s;
1791
1792         flags = WBFLAG_PAM_CACHED_LOGIN;
1793
1794         wbc_status = wbcAddNamedBlob(&params.num_blobs, &params.blobs,
1795                                      "flags", 0,
1796                                      (uint8_t *)&flags, sizeof(flags));
1797         if (!WBC_ERROR_IS_OK(wbc_status)) {
1798                 d_printf("wbcAddNamedBlob failed: %s\n",
1799                          wbcErrorString(wbc_status));
1800                 return false;
1801         }
1802
1803         uid = getuid();
1804
1805         wbc_status = wbcAddNamedBlob(&params.num_blobs, &params.blobs,
1806                                      "user_uid", 0,
1807                                      (uint8_t *)&uid, sizeof(uid));
1808         if (!WBC_ERROR_IS_OK(wbc_status)) {
1809                 d_printf("wbcAddNamedBlob failed: %s\n",
1810                          wbcErrorString(wbc_status));
1811                 return false;
1812         }
1813
1814         wbc_status = wbcLogonUser(&params, NULL, &error, NULL);
1815
1816         wbcFreeMemory(params.blobs);
1817
1818         d_printf("plaintext password authentication %s\n",
1819                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1820
1821         if (!WBC_ERROR_IS_OK(wbc_status) && (error != NULL)) {
1822                 d_fprintf(stderr,
1823                           "error code was %s (0x%x)\nerror message was: %s\n",
1824                           error->nt_string,
1825                           (int)error->nt_status,
1826                           error->display_string);
1827                 wbcFreeMemory(error);
1828         }
1829         return WBC_ERROR_IS_OK(wbc_status);
1830 }
1831
1832 /* Save creds with winbind */
1833
1834 static bool wbinfo_ccache_save(char *username)
1835 {
1836         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1837         char *s = NULL;
1838         char *p = NULL;
1839         char *password = NULL;
1840         char *name = NULL;
1841         TALLOC_CTX *frame = talloc_stackframe();
1842
1843         s = talloc_strdup(frame, username);
1844         if (s == NULL) {
1845                 return false;
1846         }
1847
1848         p = strchr(s, '%');
1849         if (p != NULL) {
1850                 *p = 0;
1851                 p++;
1852                 password = talloc_strdup(frame, p);
1853         } else {
1854                 password = wbinfo_prompt_pass(frame, NULL, username);
1855         }
1856
1857         name = s;
1858
1859         wbc_status = wbcCredentialSave(name, password);
1860
1861         d_printf("saving creds %s\n",
1862                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1863
1864         TALLOC_FREE(frame);
1865
1866         return WBC_ERROR_IS_OK(wbc_status);
1867 }
1868
1869 #ifdef WITH_FAKE_KASERVER
1870 /* Authenticate a user with a plaintext password and set a token */
1871
1872 static bool wbinfo_klog(char *username)
1873 {
1874         struct winbindd_request request;
1875         struct winbindd_response response;
1876         NSS_STATUS result;
1877         char *p;
1878
1879         /* Send off request */
1880
1881         ZERO_STRUCT(request);
1882         ZERO_STRUCT(response);
1883
1884         p = strchr(username, '%');
1885
1886         if (p) {
1887                 *p = 0;
1888                 fstrcpy(request.data.auth.user, username);
1889                 fstrcpy(request.data.auth.pass, p + 1);
1890                 *p = '%';
1891         } else {
1892                 fstrcpy(request.data.auth.user, username);
1893                 (void) samba_getpass("Password: ",
1894                                      request.data.auth.pass,
1895                                      sizeof(request.data.auth.pass),
1896                                      false, false);
1897         }
1898
1899         request.flags |= WBFLAG_PAM_AFS_TOKEN;
1900
1901         result = winbindd_request_response(WINBINDD_PAM_AUTH, &request,
1902                                            &response);
1903
1904         /* Display response */
1905
1906         d_printf("plaintext password authentication %s\n",
1907                  (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed");
1908
1909         if (response.data.auth.nt_status)
1910                 d_fprintf(stderr,
1911                          "error code was %s (0x%x)\nerror message was: %s\n",
1912                          response.data.auth.nt_status_string,
1913                          response.data.auth.nt_status,
1914                          response.data.auth.error_string);
1915
1916         if (result != NSS_STATUS_SUCCESS)
1917                 return false;
1918
1919         if (response.extra_data.data == NULL) {
1920                 d_fprintf(stderr, "Did not get token data\n");
1921                 return false;
1922         }
1923
1924         if (!afs_settoken_str((char *)response.extra_data.data)) {
1925                 d_fprintf(stderr, "Could not set token\n");
1926                 return false;
1927         }
1928
1929         d_printf("Successfully created AFS token\n");
1930         return true;
1931 }
1932 #else
1933 static bool wbinfo_klog(char *username)
1934 {
1935         d_fprintf(stderr, "No AFS support compiled in.\n");
1936         return false;
1937 }
1938 #endif
1939
1940 /* Print domain users */
1941
1942 static bool print_domain_users(const char *domain)
1943 {
1944         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1945         uint32_t i;
1946         uint32_t num_users = 0;
1947         const char **users = NULL;
1948
1949         /* Send request to winbind daemon */
1950
1951         if (domain == NULL) {
1952                 domain = get_winbind_domain();
1953         } else {
1954                 /* '.' is the special sign for our own domain */
1955                 if ((domain[0] == '\0') || strcmp(domain, ".") == 0) {
1956                         domain = get_winbind_domain();
1957                 /* '*' is the special sign for all domains */
1958                 } else if (strcmp(domain, "*") == 0) {
1959                         domain = NULL;
1960                 }
1961         }
1962
1963         wbc_status = wbcListUsers(domain, &num_users, &users);
1964         if (!WBC_ERROR_IS_OK(wbc_status)) {
1965                 return false;
1966         }
1967
1968         for (i=0; i < num_users; i++) {
1969                 d_printf("%s\n", users[i]);
1970         }
1971
1972         wbcFreeMemory(users);
1973
1974         return true;
1975 }
1976
1977 /* Print domain groups */
1978
1979 static bool print_domain_groups(const char *domain)
1980 {
1981         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1982         uint32_t i;
1983         uint32_t num_groups = 0;
1984         const char **groups = NULL;
1985
1986         /* Send request to winbind daemon */
1987
1988         if (domain == NULL) {
1989                 domain = get_winbind_domain();
1990         } else {
1991                 /* '.' is the special sign for our own domain */
1992                 if ((domain[0] == '\0') || strcmp(domain, ".") == 0) {
1993                         domain = get_winbind_domain();
1994                 /* '*' is the special sign for all domains */
1995                 } else if (strcmp(domain, "*") == 0) {
1996                         domain = NULL;
1997                 }
1998         }
1999
2000         wbc_status = wbcListGroups(domain, &num_groups, &groups);
2001         if (!WBC_ERROR_IS_OK(wbc_status)) {
2002                 d_fprintf(stderr, "failed to call wbcListGroups: %s\n",
2003                           wbcErrorString(wbc_status));
2004                 return false;
2005         }
2006
2007         for (i=0; i < num_groups; i++) {
2008                 d_printf("%s\n", groups[i]);
2009         }
2010
2011         wbcFreeMemory(groups);
2012
2013         return true;
2014 }
2015
2016 /* Set the authorised user for winbindd access in secrets.tdb */
2017
2018 static bool wbinfo_set_auth_user(char *username)
2019 {
2020         d_fprintf(stderr, "This functionality was moved to the 'net' utility.\n"
2021                           "See 'net help setauthuser' for details.\n");
2022         return false;
2023 }
2024
2025 static void wbinfo_get_auth_user(void)
2026 {
2027         d_fprintf(stderr, "This functionality was moved to the 'net' utility.\n"
2028                           "See 'net help getauthuser' for details.\n");
2029 }
2030
2031 static bool wbinfo_ping(void)
2032 {
2033         wbcErr wbc_status;
2034
2035         wbc_status = wbcPing();
2036
2037         /* Display response */
2038
2039         d_printf("Ping to winbindd %s\n",
2040                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
2041
2042         return WBC_ERROR_IS_OK(wbc_status);
2043 }
2044
2045 static bool wbinfo_change_user_password(const char *username)
2046 {
2047         wbcErr wbc_status;
2048         char *old_password = NULL;
2049         char *new_password = NULL;
2050         TALLOC_CTX *frame = talloc_tos();
2051
2052         old_password = wbinfo_prompt_pass(frame, "old", username);
2053         new_password = wbinfo_prompt_pass(frame, "new", username);
2054
2055         wbc_status = wbcChangeUserPassword(username, old_password,new_password);
2056
2057         /* Display response */
2058
2059         d_printf("Password change for user %s %s\n", username,
2060                 WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
2061
2062         return WBC_ERROR_IS_OK(wbc_status);
2063 }
2064
2065 /* Main program */
2066
2067 enum {
2068         OPT_SET_AUTH_USER = 1000,
2069         OPT_GET_AUTH_USER,
2070         OPT_DOMAIN_NAME,
2071         OPT_SEQUENCE,
2072         OPT_GETDCNAME,
2073         OPT_DSGETDCNAME,
2074         OPT_DC_INFO,
2075         OPT_USERDOMGROUPS,
2076         OPT_SIDALIASES,
2077         OPT_USERSIDS,
2078         OPT_LOOKUP_SIDS,
2079         OPT_ALLOCATE_UID,
2080         OPT_ALLOCATE_GID,
2081         OPT_SET_UID_MAPPING,
2082         OPT_SET_GID_MAPPING,
2083         OPT_REMOVE_UID_MAPPING,
2084         OPT_REMOVE_GID_MAPPING,
2085         OPT_SIDS_TO_XIDS,
2086         OPT_SEPARATOR,
2087         OPT_LIST_ALL_DOMAINS,
2088         OPT_LIST_OWN_DOMAIN,
2089         OPT_UID_INFO,
2090         OPT_USER_SIDINFO,
2091         OPT_GROUP_INFO,
2092         OPT_GID_INFO,
2093         OPT_VERBOSE,
2094         OPT_ONLINESTATUS,
2095         OPT_CHANGE_USER_PASSWORD,
2096         OPT_CCACHE_SAVE,
2097         OPT_SID_TO_FULLNAME,
2098         OPT_NTLMV2,
2099         OPT_PAM_LOGON,
2100         OPT_LOGOFF,
2101         OPT_LOGOFF_USER,
2102         OPT_LOGOFF_UID,
2103         OPT_LANMAN,
2104         OPT_KRB5CCNAME
2105 };
2106
2107 int main(int argc, char **argv, char **envp)
2108 {
2109         int opt;
2110         TALLOC_CTX *frame = talloc_stackframe();
2111         poptContext pc;
2112         static char *string_arg;
2113         char *string_subarg = NULL;
2114         static char *opt_domain_name;
2115         static int int_arg;
2116         int int_subarg = -1;
2117         int result = 1;
2118         bool verbose = false;
2119         bool use_ntlmv2 = false;
2120         bool use_lanman = false;
2121         char *logoff_user = getenv("USER");
2122         int logoff_uid = geteuid();
2123         const char *opt_krb5ccname = "FILE";
2124
2125         struct poptOption long_options[] = {
2126                 POPT_AUTOHELP
2127
2128                 /* longName, shortName, argInfo, argPtr, value, descrip,
2129                    argDesc */
2130
2131                 { "domain-users", 'u', POPT_ARG_NONE, 0, 'u', "Lists all domain users", "domain"},
2132                 { "domain-groups", 'g', POPT_ARG_NONE, 0, 'g', "Lists all domain groups", "domain" },
2133                 { "WINS-by-name", 'N', POPT_ARG_STRING, &string_arg, 'N', "Converts NetBIOS name to IP", "NETBIOS-NAME" },
2134                 { "WINS-by-ip", 'I', POPT_ARG_STRING, &string_arg, 'I', "Converts IP address to NetBIOS name", "IP" },
2135                 { "name-to-sid", 'n', POPT_ARG_STRING, &string_arg, 'n', "Converts name to sid", "NAME" },
2136                 { "sid-to-name", 's', POPT_ARG_STRING, &string_arg, 's', "Converts sid to name", "SID" },
2137                 { "sid-to-fullname", 0, POPT_ARG_STRING, &string_arg,
2138                   OPT_SID_TO_FULLNAME, "Converts sid to fullname", "SID" },
2139                 { "lookup-rids", 'R', POPT_ARG_STRING, &string_arg, 'R', "Converts RIDs to names", "RIDs" },
2140                 { "lookup-sids", 0, POPT_ARG_STRING, &string_arg,
2141                   OPT_LOOKUP_SIDS, "Converts SIDs to types and names",
2142                   "Sid-List"},
2143                 { "uid-to-sid", 'U', POPT_ARG_INT, &int_arg, 'U', "Converts uid to sid" , "UID" },
2144                 { "gid-to-sid", 'G', POPT_ARG_INT, &int_arg, 'G', "Converts gid to sid", "GID" },
2145                 { "sid-to-uid", 'S', POPT_ARG_STRING, &string_arg, 'S', "Converts sid to uid", "SID" },
2146                 { "sid-to-gid", 'Y', POPT_ARG_STRING, &string_arg, 'Y', "Converts sid to gid", "SID" },
2147                 { "allocate-uid", 0, POPT_ARG_NONE, 0, OPT_ALLOCATE_UID,
2148                   "Get a new UID out of idmap" },
2149                 { "allocate-gid", 0, POPT_ARG_NONE, 0, OPT_ALLOCATE_GID,
2150                   "Get a new GID out of idmap" },
2151                 { "set-uid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_SET_UID_MAPPING, "Create or modify uid to sid mapping in idmap", "UID,SID" },
2152                 { "set-gid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_SET_GID_MAPPING, "Create or modify gid to sid mapping in idmap", "GID,SID" },
2153                 { "remove-uid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_REMOVE_UID_MAPPING, "Remove uid to sid mapping in idmap", "UID,SID" },
2154                 { "remove-gid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_REMOVE_GID_MAPPING, "Remove gid to sid mapping in idmap", "GID,SID" },
2155                 { "sids-to-unix-ids", 0, POPT_ARG_STRING, &string_arg,
2156                   OPT_SIDS_TO_XIDS, "Translate SIDs to Unix IDs", "Sid-List" },
2157                 { "check-secret", 't', POPT_ARG_NONE, 0, 't', "Check shared secret" },
2158                 { "change-secret", 'c', POPT_ARG_NONE, 0, 'c', "Change shared secret" },
2159                 { "ping-dc", 'P', POPT_ARG_NONE, 0, 'P',
2160                   "Check the NETLOGON connection" },
2161                 { "trusted-domains", 'm', POPT_ARG_NONE, 0, 'm', "List trusted domains" },
2162                 { "all-domains", 0, POPT_ARG_NONE, 0, OPT_LIST_ALL_DOMAINS, "List all domains (trusted and own domain)" },
2163                 { "own-domain", 0, POPT_ARG_NONE, 0, OPT_LIST_OWN_DOMAIN, "List own domain" },
2164                 { "sequence", 0, POPT_ARG_NONE, 0, OPT_SEQUENCE, "Deprecated command, see --online-status" },
2165                 { "online-status", 0, POPT_ARG_NONE, 0, OPT_ONLINESTATUS, "Show whether domains are marked as online or offline"},
2166                 { "domain-info", 'D', POPT_ARG_STRING, &string_arg, 'D', "Show most of the info we have about the domain" },
2167                 { "user-info", 'i', POPT_ARG_STRING, &string_arg, 'i', "Get user info", "USER" },
2168                 { "uid-info", 0, POPT_ARG_INT, &int_arg, OPT_UID_INFO, "Get user info from uid", "UID" },
2169                 { "group-info", 0, POPT_ARG_STRING, &string_arg, OPT_GROUP_INFO, "Get group info", "GROUP" },
2170                 { "user-sidinfo", 0, POPT_ARG_STRING, &string_arg, OPT_USER_SIDINFO, "Get user info from sid", "SID" },
2171                 { "gid-info", 0, POPT_ARG_INT, &int_arg, OPT_GID_INFO, "Get group info from gid", "GID" },
2172                 { "user-groups", 'r', POPT_ARG_STRING, &string_arg, 'r', "Get user groups", "USER" },
2173                 { "user-domgroups", 0, POPT_ARG_STRING, &string_arg,
2174                   OPT_USERDOMGROUPS, "Get user domain groups", "SID" },
2175                 { "sid-aliases", 0, POPT_ARG_STRING, &string_arg, OPT_SIDALIASES, "Get sid aliases", "SID" },
2176                 { "user-sids", 0, POPT_ARG_STRING, &string_arg, OPT_USERSIDS, "Get user group sids for user SID", "SID" },
2177                 { "authenticate", 'a', POPT_ARG_STRING, &string_arg, 'a', "authenticate user", "user%password" },
2178                 { "pam-logon", 0, POPT_ARG_STRING, &string_arg, OPT_PAM_LOGON,
2179                   "do a pam logon equivalent", "user%password" },
2180                 { "logoff", 0, POPT_ARG_NONE, NULL, OPT_LOGOFF,
2181                   "log off user", "uid" },
2182                 { "logoff-user", 0, POPT_ARG_STRING, &logoff_user,
2183                   OPT_LOGOFF_USER, "username to log off" },
2184                 { "logoff-uid", 0, POPT_ARG_INT, &logoff_uid,
2185                   OPT_LOGOFF_UID, "uid to log off" },
2186                 { "set-auth-user", 0, POPT_ARG_STRING, &string_arg, OPT_SET_AUTH_USER, "Store user and password used by winbindd (root only)", "user%password" },
2187                 { "ccache-save", 0, POPT_ARG_STRING, &string_arg,
2188                   OPT_CCACHE_SAVE, "Store user and password for ccache "
2189                   "operation", "user%password" },
2190                 { "getdcname", 0, POPT_ARG_STRING, &string_arg, OPT_GETDCNAME,
2191                   "Get a DC name for a foreign domain", "domainname" },
2192                 { "dsgetdcname", 0, POPT_ARG_STRING, &string_arg, OPT_DSGETDCNAME, "Find a DC for a domain", "domainname" },
2193                 { "dc-info", 0, POPT_ARG_STRING, &string_arg, OPT_DC_INFO,
2194                   "Find the currently known DCs", "domainname" },
2195                 { "get-auth-user", 0, POPT_ARG_NONE, NULL, OPT_GET_AUTH_USER, "Retrieve user and password used by winbindd (root only)", NULL },
2196                 { "ping", 'p', POPT_ARG_NONE, 0, 'p', "Ping winbindd to see if it is alive" },
2197                 { "domain", 0, POPT_ARG_STRING, &opt_domain_name, OPT_DOMAIN_NAME, "Define to the domain to restrict operation", "domain" },
2198 #ifdef WITH_FAKE_KASERVER
2199                 { "klog", 'k', POPT_ARG_STRING, &string_arg, 'k', "set an AFS token from winbind", "user%password" },
2200 #endif
2201 #ifdef HAVE_KRB5
2202                 { "krb5auth", 'K', POPT_ARG_STRING, &string_arg, 'K', "authenticate user using Kerberos", "user%password" },
2203                         /* destroys wbinfo --help output */
2204                         /* "user%password,DOM\\user%password,user@EXAMPLE.COM,EXAMPLE.COM\\user%password" }, */
2205                 { "krb5ccname", 0, POPT_ARG_STRING, &opt_krb5ccname, OPT_KRB5CCNAME, "authenticate user using Kerberos and specific credential cache type", "krb5ccname" },
2206 #endif
2207                 { "separator", 0, POPT_ARG_NONE, 0, OPT_SEPARATOR, "Get the active winbind separator", NULL },
2208                 { "verbose", 0, POPT_ARG_NONE, 0, OPT_VERBOSE, "Print additional information per command", NULL },
2209                 { "change-user-password", 0, POPT_ARG_STRING, &string_arg, OPT_CHANGE_USER_PASSWORD, "Change the password for a user", NULL },
2210                 { "ntlmv2", 0, POPT_ARG_NONE, 0, OPT_NTLMV2, "Use NTLMv2 cryptography for user authentication", NULL},
2211                 { "lanman", 0, POPT_ARG_NONE, 0, OPT_LANMAN, "Use lanman cryptography for user authentication", NULL},
2212                 POPT_COMMON_VERSION
2213                 POPT_TABLEEND
2214         };
2215
2216         /* Samba client initialisation */
2217         load_case_tables();
2218
2219
2220         /* Parse options */
2221
2222         pc = poptGetContext("wbinfo", argc, (const char **)argv,
2223                             long_options, 0);
2224
2225         /* Parse command line options */
2226
2227         if (argc == 1) {
2228                 poptPrintHelp(pc, stderr, 0);
2229                 return 1;
2230         }
2231
2232         while((opt = poptGetNextOpt(pc)) != -1) {
2233                 /* get the generic configuration parameters like --domain */
2234                 switch (opt) {
2235                 case OPT_VERBOSE:
2236                         verbose = true;
2237                         break;
2238                 case OPT_NTLMV2:
2239                         use_ntlmv2 = true;
2240                         break;
2241                 case OPT_LANMAN:
2242                         use_lanman = true;
2243                         break;
2244                 }
2245         }
2246
2247         poptFreeContext(pc);
2248
2249         pc = poptGetContext(NULL, argc, (const char **)argv, long_options,
2250                             POPT_CONTEXT_KEEP_FIRST);
2251
2252         while((opt = poptGetNextOpt(pc)) != -1) {
2253                 switch (opt) {
2254                 case 'u':
2255                         if (!print_domain_users(opt_domain_name)) {
2256                                 d_fprintf(stderr,
2257                                           "Error looking up domain users\n");
2258                                 goto done;
2259                         }
2260                         break;
2261                 case 'g':
2262                         if (!print_domain_groups(opt_domain_name)) {
2263                                 d_fprintf(stderr,
2264                                           "Error looking up domain groups\n");
2265                                 goto done;
2266                         }
2267                         break;
2268                 case 's':
2269                         if (!wbinfo_lookupsid(string_arg)) {
2270                                 d_fprintf(stderr,
2271                                           "Could not lookup sid %s\n",
2272                                           string_arg);
2273                                 goto done;
2274                         }
2275                         break;
2276                 case OPT_SID_TO_FULLNAME:
2277                         if (!wbinfo_lookupsid_fullname(string_arg)) {
2278                                 d_fprintf(stderr, "Could not lookup sid %s\n",
2279                                           string_arg);
2280                                 goto done;
2281                         }
2282                         break;
2283                 case 'R':
2284                         if (!wbinfo_lookuprids(opt_domain_name, string_arg)) {
2285                                 d_fprintf(stderr, "Could not lookup RIDs %s\n",
2286                                           string_arg);
2287                                 goto done;
2288                         }
2289                         break;
2290                 case OPT_LOOKUP_SIDS:
2291                         if (!wbinfo_lookup_sids(string_arg)) {
2292                                 d_fprintf(stderr, "Could not lookup SIDs %s\n",
2293                                           string_arg);
2294                                 goto done;
2295                         }
2296                         break;
2297                 case 'n':
2298                         if (!wbinfo_lookupname(string_arg)) {
2299                                 d_fprintf(stderr, "Could not lookup name %s\n",
2300                                           string_arg);
2301                                 goto done;
2302                         }
2303                         break;
2304                 case 'N':
2305                         if (!wbinfo_wins_byname(string_arg)) {
2306                                 d_fprintf(stderr,
2307                                           "Could not lookup WINS by name %s\n",
2308                                           string_arg);
2309                                 goto done;
2310                         }
2311                         break;
2312                 case 'I':
2313                         if (!wbinfo_wins_byip(string_arg)) {
2314                                 d_fprintf(stderr,
2315                                           "Could not lookup WINS by IP %s\n",
2316                                           string_arg);
2317                                 goto done;
2318                         }
2319                         break;
2320                 case 'U':
2321                         if (!wbinfo_uid_to_sid(int_arg)) {
2322                                 d_fprintf(stderr,
2323                                           "Could not convert uid %d to sid\n",
2324                                           int_arg);
2325                                 goto done;
2326                         }
2327                         break;
2328                 case 'G':
2329                         if (!wbinfo_gid_to_sid(int_arg)) {
2330                                 d_fprintf(stderr,
2331                                           "Could not convert gid %d to sid\n",
2332                                           int_arg);
2333                                 goto done;
2334                         }
2335                         break;
2336                 case 'S':
2337                         if (!wbinfo_sid_to_uid(string_arg)) {
2338                                 d_fprintf(stderr,
2339                                           "Could not convert sid %s to uid\n",
2340                                           string_arg);
2341                                 goto done;
2342                         }
2343                         break;
2344                 case 'Y':
2345                         if (!wbinfo_sid_to_gid(string_arg)) {
2346                                 d_fprintf(stderr,
2347                                           "Could not convert sid %s to gid\n",
2348                                           string_arg);
2349                                 goto done;
2350                         }
2351                         break;
2352                 case OPT_ALLOCATE_UID:
2353                         if (!wbinfo_allocate_uid()) {
2354                                 d_fprintf(stderr, "Could not allocate a uid\n");
2355                                 goto done;
2356                         }
2357                         break;
2358                 case OPT_ALLOCATE_GID:
2359                         if (!wbinfo_allocate_gid()) {
2360                                 d_fprintf(stderr, "Could not allocate a gid\n");
2361                                 goto done;
2362                         }
2363                         break;
2364                 case OPT_SET_UID_MAPPING:
2365                         if (!parse_mapping_arg(string_arg, &int_subarg,
2366                                 &string_subarg) ||
2367                             !wbinfo_set_uid_mapping(int_subarg, string_subarg))
2368                         {
2369                                 d_fprintf(stderr, "Could not create or modify "
2370                                           "uid to sid mapping\n");
2371                                 goto done;
2372                         }
2373                         break;
2374                 case OPT_SET_GID_MAPPING:
2375                         if (!parse_mapping_arg(string_arg, &int_subarg,
2376                                 &string_subarg) ||
2377                             !wbinfo_set_gid_mapping(int_subarg, string_subarg))
2378                         {
2379                                 d_fprintf(stderr, "Could not create or modify "
2380                                           "gid to sid mapping\n");
2381                                 goto done;
2382                         }
2383                         break;
2384                 case OPT_REMOVE_UID_MAPPING:
2385                         if (!parse_mapping_arg(string_arg, &int_subarg,
2386                                 &string_subarg) ||
2387                             !wbinfo_remove_uid_mapping(int_subarg,
2388                                 string_subarg))
2389                         {
2390                                 d_fprintf(stderr, "Could not remove uid to sid "
2391                                     "mapping\n");
2392                                 goto done;
2393                         }
2394                         break;
2395                 case OPT_REMOVE_GID_MAPPING:
2396                         if (!parse_mapping_arg(string_arg, &int_subarg,
2397                                 &string_subarg) ||
2398                             !wbinfo_remove_gid_mapping(int_subarg,
2399                                 string_subarg))
2400                         {
2401                                 d_fprintf(stderr, "Could not remove gid to sid "
2402                                     "mapping\n");
2403                                 goto done;
2404                         }
2405                         break;
2406                 case OPT_SIDS_TO_XIDS:
2407                         if (!wbinfo_sids_to_unix_ids(string_arg)) {
2408                                 d_fprintf(stderr, "wbinfo_sids_to_unix_ids "
2409                                           "failed\n");
2410                                 goto done;
2411                         }
2412                         break;
2413                 case 't':
2414                         if (!wbinfo_check_secret(opt_domain_name)) {
2415                                 d_fprintf(stderr, "Could not check secret\n");
2416                                 goto done;
2417                         }
2418                         break;
2419                 case 'c':
2420                         if (!wbinfo_change_secret(opt_domain_name)) {
2421                                 d_fprintf(stderr, "Could not change secret\n");
2422                                 goto done;
2423                         }
2424                         break;
2425                 case 'P':
2426                         if (!wbinfo_ping_dc()) {
2427                                 goto done;
2428                         }
2429                         break;
2430                 case 'm':
2431                         if (!wbinfo_list_domains(false, verbose)) {
2432                                 d_fprintf(stderr,
2433                                           "Could not list trusted domains\n");
2434                                 goto done;
2435                         }
2436                         break;
2437                 case OPT_SEQUENCE:
2438                         if (!wbinfo_show_sequence(opt_domain_name)) {
2439                                 d_fprintf(stderr,
2440                                           "Could not show sequence numbers\n");
2441                                 goto done;
2442                         }
2443                         break;
2444                 case OPT_ONLINESTATUS:
2445                         if (!wbinfo_show_onlinestatus(opt_domain_name)) {
2446                                 d_fprintf(stderr,
2447                                           "Could not show online-status\n");
2448                                 goto done;
2449                         }
2450                         break;
2451                 case 'D':
2452                         if (!wbinfo_domain_info(string_arg)) {
2453                                 d_fprintf(stderr,
2454                                           "Could not get domain info\n");
2455                                 goto done;
2456                         }
2457                         break;
2458                 case 'i':
2459                         if (!wbinfo_get_userinfo(string_arg)) {
2460                                 d_fprintf(stderr,
2461                                           "Could not get info for user %s\n",
2462                                           string_arg);
2463                                 goto done;
2464                         }
2465                         break;
2466                 case OPT_USER_SIDINFO:
2467                         if ( !wbinfo_get_user_sidinfo(string_arg)) {
2468                                 d_fprintf(stderr,
2469                                           "Could not get info for user "
2470                                           "sid %s\n", string_arg);
2471                                 goto done;
2472                         }
2473                         break;
2474                 case OPT_UID_INFO:
2475                         if ( !wbinfo_get_uidinfo(int_arg)) {
2476                                 d_fprintf(stderr, "Could not get info for uid "
2477                                                 "%d\n", int_arg);
2478                                 goto done;
2479                         }
2480                         break;
2481                 case OPT_GROUP_INFO:
2482                         if ( !wbinfo_get_groupinfo(string_arg)) {
2483                                 d_fprintf(stderr, "Could not get info for "
2484                                           "group %s\n", string_arg);
2485                                 goto done;
2486                         }
2487                         break;
2488                 case OPT_GID_INFO:
2489                         if ( !wbinfo_get_gidinfo(int_arg)) {
2490                                 d_fprintf(stderr, "Could not get info for gid "
2491                                                 "%d\n", int_arg);
2492                                 goto done;
2493                         }
2494                         break;
2495                 case 'r':
2496                         if (!wbinfo_get_usergroups(string_arg)) {
2497                                 d_fprintf(stderr,
2498                                           "Could not get groups for user %s\n",
2499                                           string_arg);
2500                                 goto done;
2501                         }
2502                         break;
2503                 case OPT_USERSIDS:
2504                         if (!wbinfo_get_usersids(string_arg)) {
2505                                 d_fprintf(stderr, "Could not get group SIDs "
2506                                           "for user SID %s\n",
2507                                           string_arg);
2508                                 goto done;
2509                         }
2510                         break;
2511                 case OPT_USERDOMGROUPS:
2512                         if (!wbinfo_get_userdomgroups(string_arg)) {
2513                                 d_fprintf(stderr, "Could not get user's domain "
2514                                          "groups for user SID %s\n",
2515                                          string_arg);
2516                                 goto done;
2517                         }
2518                         break;
2519                 case OPT_SIDALIASES:
2520                         if (!wbinfo_get_sidaliases(opt_domain_name,
2521                                                    string_arg)) {
2522                                 d_fprintf(stderr, "Could not get sid aliases "
2523                                          "for user SID %s\n", string_arg);
2524                                 goto done;
2525                         }
2526                         break;
2527                 case 'a': {
2528                                 bool got_error = false;
2529
2530                                 if (!wbinfo_auth(string_arg)) {
2531                                         d_fprintf(stderr,
2532                                                   "Could not authenticate user "
2533                                                   "%s with plaintext "
2534                                                   "password\n", string_arg);
2535                                         got_error = true;
2536                                 }
2537
2538                                 if (!wbinfo_auth_crap(string_arg, use_ntlmv2,
2539                                                       use_lanman)) {
2540                                         d_fprintf(stderr,
2541                                                 "Could not authenticate user "
2542                                                 "%s with challenge/response\n",
2543                                                 string_arg);
2544                                         got_error = true;
2545                                 }
2546
2547                                 if (got_error)
2548                                         goto done;
2549                                 break;
2550                         }
2551                 case OPT_PAM_LOGON:
2552                         if (!wbinfo_pam_logon(string_arg)) {
2553                                 d_fprintf(stderr, "pam_logon failed for %s\n",
2554                                           string_arg);
2555                                 goto done;
2556                         }
2557                         break;
2558                 case OPT_LOGOFF:
2559                 {
2560                         wbcErr wbc_status;
2561
2562                         wbc_status = wbcLogoffUser(logoff_user, logoff_uid,
2563                                                    "");
2564                         d_printf("Logoff %s (%d): %s\n", logoff_user,
2565                                  logoff_uid, wbcErrorString(wbc_status));
2566                         break;
2567                 }
2568                 case 'K': {
2569                                 uint32_t flags = WBFLAG_PAM_KRB5 |
2570                                                  WBFLAG_PAM_CACHED_LOGIN |
2571                                                 WBFLAG_PAM_FALLBACK_AFTER_KRB5 |
2572                                                  WBFLAG_PAM_INFO3_TEXT |
2573                                                  WBFLAG_PAM_CONTACT_TRUSTDOM;
2574
2575                                 if (!wbinfo_auth_krb5(string_arg, opt_krb5ccname,
2576                                                       flags)) {
2577                                         d_fprintf(stderr,
2578                                                 "Could not authenticate user "
2579                                                 "[%s] with Kerberos "
2580                                                 "(ccache: %s)\n", string_arg,
2581                                                 opt_krb5ccname);
2582                                         goto done;
2583                                 }
2584                                 break;
2585                         }
2586                 case 'k':
2587                         if (!wbinfo_klog(string_arg)) {
2588                                 d_fprintf(stderr, "Could not klog user\n");
2589                                 goto done;
2590                         }
2591                         break;
2592                 case 'p':
2593                         if (!wbinfo_ping()) {
2594                                 d_fprintf(stderr, "could not ping winbindd!\n");
2595                                 goto done;
2596                         }
2597                         break;
2598                 case OPT_SET_AUTH_USER:
2599                         if (!wbinfo_set_auth_user(string_arg)) {
2600                                 goto done;
2601                         }
2602                         break;
2603                 case OPT_GET_AUTH_USER:
2604                         wbinfo_get_auth_user();
2605                         goto done;
2606                         break;
2607                 case OPT_CCACHE_SAVE:
2608                         if (!wbinfo_ccache_save(string_arg)) {
2609                                 goto done;
2610                         }
2611                         break;
2612                 case OPT_GETDCNAME:
2613                         if (!wbinfo_getdcname(string_arg)) {
2614                                 goto done;
2615                         }
2616                         break;
2617                 case OPT_DSGETDCNAME:
2618                         if (!wbinfo_dsgetdcname(string_arg, 0)) {
2619                                 goto done;
2620                         }
2621                         break;
2622                 case OPT_DC_INFO:
2623                         if (!wbinfo_dc_info(string_arg)) {
2624                                 goto done;
2625                         }
2626                         break;
2627                 case OPT_SEPARATOR: {
2628                         const char sep = winbind_separator();
2629                         if ( !sep ) {
2630                                 goto done;
2631                         }
2632                         d_printf("%c\n", sep);
2633                         break;
2634                 }
2635                 case OPT_LIST_ALL_DOMAINS:
2636                         if (!wbinfo_list_domains(true, verbose)) {
2637                                 goto done;
2638                         }
2639                         break;
2640                 case OPT_LIST_OWN_DOMAIN:
2641                         if (!wbinfo_list_own_domain()) {
2642                                 goto done;
2643                         }
2644                         break;
2645                 case OPT_CHANGE_USER_PASSWORD:
2646                         if (!wbinfo_change_user_password(string_arg)) {
2647                                 d_fprintf(stderr,
2648                                         "Could not change user password "
2649                                          "for user %s\n", string_arg);
2650                                 goto done;
2651                         }
2652                         break;
2653
2654                 /* generic configuration options */
2655                 case OPT_DOMAIN_NAME:
2656                 case OPT_VERBOSE:
2657                 case OPT_NTLMV2:
2658                 case OPT_LANMAN:
2659                 case OPT_LOGOFF_USER:
2660                 case OPT_LOGOFF_UID:
2661                 case OPT_KRB5CCNAME:
2662                         break;
2663                 default:
2664                         d_fprintf(stderr, "Invalid option\n");
2665                         poptPrintHelp(pc, stderr, 0);
2666                         goto done;
2667                 }
2668         }
2669
2670         result = 0;
2671
2672         /* Exit code */
2673
2674  done:
2675         talloc_free(frame);
2676
2677         poptFreeContext(pc);
2678         return result;
2679 }