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