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