r25026: Move param/param.h out of includes.h
[ira/wip.git] / source / nsswitch / wbinfo.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    Winbind status program.
5
6    Copyright (C) Tim Potter      2000-2003
7    Copyright (C) Andrew Bartlett 2002-2007
8    
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 "pstring.h"
25 #include "winbind_nss_config.h"
26 #include "winbindd_nss.h"
27 #include "winbind_client.h"
28 #include "librpc/gen_ndr/ndr_netlogon.h"
29 #include "libcli/auth/libcli_auth.h"
30 #include "libcli/security/security.h"
31 #include "lib/cmdline/popt_common.h"
32 #include "dynconfig.h"
33 #include "param/param.h"
34
35 extern int winbindd_fd;
36
37 static char winbind_separator_int(BOOL strict)
38 {
39         struct winbindd_response response;
40         static BOOL got_sep;
41         static char sep;
42
43         if (got_sep)
44                 return sep;
45
46         ZERO_STRUCT(response);
47
48         /* Send off request */
49
50         if (winbindd_request(WINBINDD_INFO, NULL, &response) !=
51             NSS_STATUS_SUCCESS) {
52                 d_fprintf(stderr, "could not obtain winbind separator!\n");
53                 if (strict) {
54                         return 0;
55                 }
56                 /* HACK: (this module should not call lp_ funtions) */
57                 return *lp_winbind_separator();
58         }
59
60         sep = response.data.info.winbind_separator;
61         got_sep = True;
62
63         if (!sep) {
64                 d_fprintf(stderr, "winbind separator was NULL!\n");
65                 if (strict) {
66                         return 0;
67                 }
68                 /* HACK: (this module should not call lp_ funtions) */
69                 sep = *lp_winbind_separator();
70         }
71         
72         return sep;
73 }
74
75 static char winbind_separator(void)
76 {
77         return winbind_separator_int(False);
78 }
79
80 static const char *get_winbind_domain(void)
81 {
82         struct winbindd_response response;
83         static fstring winbind_domain;
84
85         ZERO_STRUCT(response);
86
87         /* Send off request */
88
89         if (winbindd_request(WINBINDD_DOMAIN_NAME, NULL, &response) !=
90             NSS_STATUS_SUCCESS) {
91                 d_fprintf(stderr, "could not obtain winbind domain name!\n");
92                 
93                 /* HACK: (this module should not call lp_ funtions) */
94                 return lp_workgroup();
95         }
96
97         fstrcpy(winbind_domain, response.data.domain_name);
98
99         return winbind_domain;
100
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                 fstrcpy(user, domuser);
114                 fstrcpy(domain, get_winbind_domain());
115                 return True;
116         }
117         
118         fstrcpy(user, p+1);
119         fstrcpy(domain, domuser);
120         domain[PTR_DIFF(p, domuser)] = 0;
121         strupper_m(domain);
122
123         return True;
124 }
125
126 /* pull pwent info for a given user */
127
128 static BOOL wbinfo_get_userinfo(char *user)
129 {
130         struct winbindd_request request;
131         struct winbindd_response response;
132         NSS_STATUS result;
133         
134         ZERO_STRUCT(request);
135         ZERO_STRUCT(response);
136
137         /* Send request */
138         
139         fstrcpy(request.data.username, user);
140
141         result = winbindd_request(WINBINDD_GETPWNAM, &request, &response);
142         
143         if (result != NSS_STATUS_SUCCESS)
144                 return False;
145         
146         d_printf( "%s:%s:%d:%d:%s:%s:%s\n",
147                           response.data.pw.pw_name,
148                           response.data.pw.pw_passwd,
149                           response.data.pw.pw_uid,
150                           response.data.pw.pw_gid,
151                           response.data.pw.pw_gecos,
152                           response.data.pw.pw_dir,
153                           response.data.pw.pw_shell );
154         
155         return True;
156 }
157
158 /* pull pwent info for a given uid */
159 static BOOL wbinfo_get_uidinfo(int uid)
160 {
161         struct winbindd_request request;
162         struct winbindd_response response;
163         NSS_STATUS result;
164
165         ZERO_STRUCT(request);
166         ZERO_STRUCT(response);
167
168         request.data.uid = uid;
169
170         result = winbindd_request(WINBINDD_GETPWUID, &request, &response);
171
172         if (result != NSS_STATUS_SUCCESS)
173                 return False;
174
175         d_printf( "%s:%s:%d:%d:%s:%s:%s\n",
176                 response.data.pw.pw_name,
177                 response.data.pw.pw_passwd,
178                 response.data.pw.pw_uid,
179                 response.data.pw.pw_gid,
180                 response.data.pw.pw_gecos,
181                 response.data.pw.pw_dir,
182                 response.data.pw.pw_shell );
183
184         return True;
185 }
186
187 /* pull grent for a given group */
188 static BOOL wbinfo_get_groupinfo(char *group)
189 {
190         struct winbindd_request request;
191         struct winbindd_response response;
192         NSS_STATUS result;
193
194         ZERO_STRUCT(request);
195         ZERO_STRUCT(response);
196
197         /* Send request */
198
199         fstrcpy(request.data.groupname, group);
200
201         result = winbindd_request(WINBINDD_GETGRNAM, &request,
202                                   &response);
203
204         if ( result != NSS_STATUS_SUCCESS)
205                 return False;
206
207         d_printf( "%s:%s:%d\n",
208                   response.data.gr.gr_name,
209                   response.data.gr.gr_passwd,
210                   response.data.gr.gr_gid );
211         
212         return True;
213 }
214
215 /* List groups a user is a member of */
216
217 static BOOL wbinfo_get_usergroups(char *user)
218 {
219         struct winbindd_request request;
220         struct winbindd_response response;
221         NSS_STATUS result;
222         int i;
223         
224         ZERO_STRUCT(request);
225         ZERO_STRUCT(response);
226
227         /* Send request */
228
229         fstrcpy(request.data.username, user);
230
231         result = winbindd_request(WINBINDD_GETGROUPS, &request, &response);
232
233         if (result != NSS_STATUS_SUCCESS)
234                 return False;
235
236         for (i = 0; i < response.data.num_entries; i++)
237                 d_printf("%d\n", (int)((gid_t *)response.extra_data.data)[i]);
238
239         SAFE_FREE(response.extra_data.data);
240
241         return True;
242 }
243
244
245 /* List group SIDs a user SID is a member of */
246 static BOOL wbinfo_get_usersids(char *user_sid)
247 {
248         struct winbindd_request request;
249         struct winbindd_response response;
250         NSS_STATUS result;
251         int i;
252         const char *s;
253
254         ZERO_STRUCT(request);
255         ZERO_STRUCT(response);
256
257         /* Send request */
258         fstrcpy(request.data.sid, user_sid);
259
260         result = winbindd_request(WINBINDD_GETUSERSIDS, &request, &response);
261
262         if (result != NSS_STATUS_SUCCESS)
263                 return False;
264
265         s = (const char *)response.extra_data.data;
266         for (i = 0; i < response.data.num_entries; i++) {
267                 d_printf("%s\n", s);
268                 s += strlen(s) + 1;
269         }
270
271         SAFE_FREE(response.extra_data.data);
272
273         return True;
274 }
275
276 static BOOL wbinfo_get_userdomgroups(const char *user_sid)
277 {
278         struct winbindd_request request;
279         struct winbindd_response response;
280         NSS_STATUS result;
281
282         ZERO_STRUCT(request);
283         ZERO_STRUCT(response);
284
285         /* Send request */
286         fstrcpy(request.data.sid, user_sid);
287
288         result = winbindd_request(WINBINDD_GETUSERDOMGROUPS, &request,
289                                   &response);
290
291         if (result != NSS_STATUS_SUCCESS)
292                 return False;
293
294         if (response.data.num_entries != 0)
295                 printf("%s", (char *)response.extra_data.data);
296         
297         SAFE_FREE(response.extra_data.data);
298
299         return True;
300 }
301
302 /* Convert NetBIOS name to IP */
303
304 static BOOL wbinfo_wins_byname(char *name)
305 {
306         struct winbindd_request request;
307         struct winbindd_response response;
308
309         ZERO_STRUCT(request);
310         ZERO_STRUCT(response);
311
312         /* Send request */
313
314         fstrcpy(request.data.winsreq, name);
315
316         if (winbindd_request(WINBINDD_WINS_BYNAME, &request, &response) !=
317             NSS_STATUS_SUCCESS) {
318                 return False;
319         }
320
321         /* Display response */
322
323         d_printf("%s\n", response.data.winsresp);
324
325         return True;
326 }
327
328 /* Convert IP to NetBIOS name */
329
330 static BOOL wbinfo_wins_byip(char *ip)
331 {
332         struct winbindd_request request;
333         struct winbindd_response response;
334
335         ZERO_STRUCT(request);
336         ZERO_STRUCT(response);
337
338         /* Send request */
339
340         fstrcpy(request.data.winsreq, ip);
341
342         if (winbindd_request(WINBINDD_WINS_BYIP, &request, &response) !=
343             NSS_STATUS_SUCCESS) {
344                 return False;
345         }
346
347         /* Display response */
348
349         d_printf("%s\n", response.data.winsresp);
350
351         return True;
352 }
353
354 /* List trusted domains */
355
356 static BOOL wbinfo_list_domains(BOOL list_all_domains)
357 {
358         struct winbindd_request request;
359         struct winbindd_response response;
360
361         ZERO_STRUCT(request);
362         ZERO_STRUCT(response);
363
364         /* Send request */
365
366         request.data.list_all_domains = list_all_domains;
367
368         if (winbindd_request(WINBINDD_LIST_TRUSTDOM, &request, &response) !=
369             NSS_STATUS_SUCCESS)
370                 return False;
371
372         /* Display response */
373
374         if (response.extra_data.data) {
375                 const char *extra_data = (char *)response.extra_data.data;
376                 fstring name;
377                 char *p;
378
379                 while(next_token(&extra_data, name, "\n", sizeof(fstring))) {
380                         p = strchr(name, '\\');
381                         if (p == 0) {
382                                 d_fprintf(stderr, "Got invalid response: %s\n",
383                                          extra_data);
384                                 return False;
385                         }
386                         *p = 0;
387                         d_printf("%s\n", name);
388                 }
389
390                 SAFE_FREE(response.extra_data.data);
391         }
392
393         return True;
394 }
395
396 /* List own domain */
397
398 static BOOL wbinfo_list_own_domain(void)
399 {
400         d_printf("%s\n", get_winbind_domain());
401
402         return True;
403 }
404
405 /* show sequence numbers */
406 static BOOL wbinfo_show_sequence(const char *domain)
407 {
408         struct winbindd_request  request;
409         struct winbindd_response response;
410
411         ZERO_STRUCT(response);
412         ZERO_STRUCT(request);
413
414         if ( domain )
415                 fstrcpy( request.domain_name, domain );
416
417         /* Send request */
418
419         if (winbindd_request(WINBINDD_SHOW_SEQUENCE, &request, &response) !=
420             NSS_STATUS_SUCCESS)
421                 return False;
422
423         /* Display response */
424
425         if (response.extra_data.data) {
426                 char *extra_data = (char *)response.extra_data.data;
427                 d_printf("%s", extra_data);
428                 SAFE_FREE(response.extra_data.data);
429         }
430
431         return True;
432 }
433
434 /* Show domain info */
435
436 static BOOL wbinfo_domain_info(const char *domain_name)
437 {
438         struct winbindd_request request;
439         struct winbindd_response response;
440
441         ZERO_STRUCT(request);
442         ZERO_STRUCT(response);
443
444         if ((strequal(domain_name, ".")) || (domain_name[0] == '\0'))
445                 fstrcpy(request.domain_name, get_winbind_domain());
446         else
447                 fstrcpy(request.domain_name, domain_name);
448
449         /* Send request */
450
451         if (winbindd_request(WINBINDD_DOMAIN_INFO, &request, &response) !=
452             NSS_STATUS_SUCCESS)
453                 return False;
454
455         /* Display response */
456
457         d_printf("Name              : %s\n", response.data.domain_info.name);
458         d_printf("Alt_Name          : %s\n", response.data.domain_info.alt_name);
459
460         d_printf("SID               : %s\n", response.data.domain_info.sid);
461
462         d_printf("Active Directory  : %s\n",
463                  response.data.domain_info.active_directory ? "Yes" : "No");
464         d_printf("Native            : %s\n",
465                  response.data.domain_info.native_mode ? "Yes" : "No");
466
467         d_printf("Primary           : %s\n",
468                  response.data.domain_info.primary ? "Yes" : "No");
469
470         d_printf("Sequence          : %d\n", response.data.domain_info.sequence_number);
471
472         return True;
473 }
474
475 /* Get a foreign DC's name */
476 static BOOL wbinfo_getdcname(const char *domain_name)
477 {
478         struct winbindd_request request;
479         struct winbindd_response response;
480
481         ZERO_STRUCT(request);
482         ZERO_STRUCT(response);
483
484         fstrcpy(request.domain_name, domain_name);
485
486         /* Send request */
487
488         if (winbindd_request(WINBINDD_GETDCNAME, &request, &response) !=
489             NSS_STATUS_SUCCESS) {
490                 d_fprintf(stderr, "Could not get dc name for %s\n", domain_name);
491                 return False;
492         }
493
494         /* Display response */
495
496         d_printf("%s\n", response.data.dc_name);
497
498         return True;
499 }
500
501 /* Check trust account password */
502
503 static BOOL wbinfo_check_secret(void)
504 {
505         struct winbindd_response response;
506         NSS_STATUS result;
507
508         ZERO_STRUCT(response);
509
510         result = winbindd_request(WINBINDD_CHECK_MACHACC, NULL, &response);
511                 
512         d_printf("checking the trust secret via RPC calls %s\n", 
513                  (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed");
514
515         if (result != NSS_STATUS_SUCCESS)       
516                 d_fprintf(stderr, "error code was %s (0x%x)\n", 
517                          response.data.auth.nt_status_string, 
518                          response.data.auth.nt_status);
519         
520         return result == NSS_STATUS_SUCCESS;    
521 }
522
523 /* Convert uid to sid */
524
525 static BOOL wbinfo_uid_to_sid(uid_t uid)
526 {
527         struct winbindd_request request;
528         struct winbindd_response response;
529
530         ZERO_STRUCT(request);
531         ZERO_STRUCT(response);
532
533         /* Send request */
534
535         request.data.uid = uid;
536
537         if (winbindd_request(WINBINDD_UID_TO_SID, &request, &response) !=
538             NSS_STATUS_SUCCESS)
539                 return False;
540
541         /* Display response */
542
543         d_printf("%s\n", response.data.sid.sid);
544
545         return True;
546 }
547
548 /* Convert gid to sid */
549
550 static BOOL wbinfo_gid_to_sid(gid_t gid)
551 {
552         struct winbindd_request request;
553         struct winbindd_response response;
554
555         ZERO_STRUCT(request);
556         ZERO_STRUCT(response);
557
558         /* Send request */
559
560         request.data.gid = gid;
561
562         if (winbindd_request(WINBINDD_GID_TO_SID, &request, &response) !=
563             NSS_STATUS_SUCCESS)
564                 return False;
565
566         /* Display response */
567
568         d_printf("%s\n", response.data.sid.sid);
569
570         return True;
571 }
572
573 /* Convert sid to uid */
574
575 static BOOL wbinfo_sid_to_uid(char *sid)
576 {
577         struct winbindd_request request;
578         struct winbindd_response response;
579
580         ZERO_STRUCT(request);
581         ZERO_STRUCT(response);
582
583         /* Send request */
584
585         fstrcpy(request.data.sid, sid);
586
587         if (winbindd_request(WINBINDD_SID_TO_UID, &request, &response) !=
588             NSS_STATUS_SUCCESS)
589                 return False;
590
591         /* Display response */
592
593         d_printf("%d\n", (int)response.data.uid);
594
595         return True;
596 }
597
598 static BOOL wbinfo_sid_to_gid(char *sid)
599 {
600         struct winbindd_request request;
601         struct winbindd_response response;
602
603         ZERO_STRUCT(request);
604         ZERO_STRUCT(response);
605
606         /* Send request */
607
608         fstrcpy(request.data.sid, sid);
609
610         if (winbindd_request(WINBINDD_SID_TO_GID, &request, &response) !=
611             NSS_STATUS_SUCCESS)
612                 return False;
613
614         /* Display response */
615
616         d_printf("%d\n", (int)response.data.gid);
617
618         return True;
619 }
620
621 /* Convert sid to string */
622
623 static BOOL wbinfo_lookupsid(char *sid)
624 {
625         struct winbindd_request request;
626         struct winbindd_response response;
627
628         ZERO_STRUCT(request);
629         ZERO_STRUCT(response);
630
631         /* Send off request */
632
633         fstrcpy(request.data.sid, sid);
634
635         if (winbindd_request(WINBINDD_LOOKUPSID, &request, &response) !=
636             NSS_STATUS_SUCCESS)
637                 return False;
638
639         /* Display response */
640
641         d_printf("%s%c%s %d\n", response.data.name.dom_name, 
642                  winbind_separator(), response.data.name.name, 
643                  response.data.name.type);
644
645         return True;
646 }
647
648 static const char *sid_type_lookup(enum lsa_SidType r)
649 {
650         switch (r) {
651                 case SID_NAME_USE_NONE: return "SID_NAME_USE_NONE"; break;
652                 case SID_NAME_USER: return "SID_NAME_USER"; break;
653                 case SID_NAME_DOM_GRP: return "SID_NAME_DOM_GRP"; break;
654                 case SID_NAME_DOMAIN: return "SID_NAME_DOMAIN"; break;
655                 case SID_NAME_ALIAS: return "SID_NAME_ALIAS"; break;
656                 case SID_NAME_WKN_GRP: return "SID_NAME_WKN_GRP"; break;
657                 case SID_NAME_DELETED: return "SID_NAME_DELETED"; break;
658                 case SID_NAME_INVALID: return "SID_NAME_INVALID"; break;
659                 case SID_NAME_UNKNOWN: return "SID_NAME_UNKNOWN"; break;
660         }
661         return "Invalid sid type\n";
662 }
663
664 /* Convert string to sid */
665
666 static BOOL wbinfo_lookupname(char *name)
667 {
668         struct winbindd_request request;
669         struct winbindd_response response;
670
671         /* Send off request */
672
673         ZERO_STRUCT(request);
674         ZERO_STRUCT(response);
675
676         parse_wbinfo_domain_user(name, request.data.name.dom_name, 
677                                  request.data.name.name);
678
679         if (winbindd_request(WINBINDD_LOOKUPNAME, &request, &response) !=
680             NSS_STATUS_SUCCESS)
681                 return False;
682
683         /* Display response */
684
685         d_printf("%s %s (%d)\n", response.data.sid.sid, sid_type_lookup(response.data.sid.type), response.data.sid.type);
686
687         return True;
688 }
689
690 /* Authenticate a user with a plaintext password */
691
692 static BOOL wbinfo_auth_krb5(char *username, const char *cctype, uint32 flags)
693 {
694         struct winbindd_request request;
695         struct winbindd_response response;
696         NSS_STATUS result;
697         char *p;
698
699         /* Send off request */
700
701         ZERO_STRUCT(request);
702         ZERO_STRUCT(response);
703
704         p = strchr(username, '%');
705
706         if (p) {
707                 *p = 0;
708                 fstrcpy(request.data.auth.user, username);
709                 fstrcpy(request.data.auth.pass, p + 1);
710                 *p = '%';
711         } else
712                 fstrcpy(request.data.auth.user, username);
713
714         request.flags = flags;
715
716         fstrcpy(request.data.auth.krb5_cc_type, cctype);
717
718         request.data.auth.uid = geteuid();
719
720         result = winbindd_request(WINBINDD_PAM_AUTH, &request, &response);
721
722         /* Display response */
723
724         d_printf("plaintext kerberos password authentication for [%s] %s (requesting cctype: %s)\n", 
725                 username, (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed", cctype);
726
727         if (response.data.auth.nt_status)
728                 d_fprintf(stderr, "error code was %s (0x%x)\nerror messsage was: %s\n", 
729                          response.data.auth.nt_status_string, 
730                          response.data.auth.nt_status,
731                          response.data.auth.error_string);
732
733         if (result == NSS_STATUS_SUCCESS) {
734
735                 if (request.flags & WBFLAG_PAM_INFO3_TEXT) {
736                         if (response.data.auth.info3.user_flgs & NETLOGON_CACHED_ACCOUNT) {
737                                 d_printf("user_flgs: NETLOGON_CACHED_ACCOUNT\n");
738                         }
739                 }
740
741                 if (response.data.auth.krb5ccname[0] != '\0') {
742                         d_printf("credentials were put in: %s\n", response.data.auth.krb5ccname);
743                 } else {
744                         d_printf("no credentials cached\n");
745                 }
746         }
747
748         return result == NSS_STATUS_SUCCESS;
749 }
750
751 /* Authenticate a user with a plaintext password */
752
753 static BOOL wbinfo_auth(char *username)
754 {
755         struct winbindd_request request;
756         struct winbindd_response response;
757         NSS_STATUS result;
758         char *p;
759
760         /* Send off request */
761
762         ZERO_STRUCT(request);
763         ZERO_STRUCT(response);
764
765         p = strchr(username, '%');
766
767         if (p) {
768                 *p = 0;
769                 fstrcpy(request.data.auth.user, username);
770                 fstrcpy(request.data.auth.pass, p + 1);
771                 *p = '%';
772         } else
773                 fstrcpy(request.data.auth.user, username);
774
775         result = winbindd_request(WINBINDD_PAM_AUTH, &request, &response);
776
777         /* Display response */
778
779         d_printf("plaintext password authentication %s\n", 
780                (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed");
781
782         if (response.data.auth.nt_status)
783                 d_fprintf(stderr, "error code was %s (0x%x)\nerror messsage was: %s\n", 
784                          response.data.auth.nt_status_string, 
785                          response.data.auth.nt_status,
786                          response.data.auth.error_string);
787
788         return result == NSS_STATUS_SUCCESS;
789 }
790
791 /* Authenticate a user with a challenge/response */
792
793 static BOOL wbinfo_auth_crap(char *username)
794 {
795         struct winbindd_request request;
796         struct winbindd_response response;
797         NSS_STATUS result;
798         fstring name_user;
799         fstring name_domain;
800         fstring pass;
801         char *p;
802
803         /* Send off request */
804
805         ZERO_STRUCT(request);
806         ZERO_STRUCT(response);
807
808         p = strchr(username, '%');
809
810         if (p) {
811                 *p = 0;
812                 fstrcpy(pass, p + 1);
813         }
814                 
815         parse_wbinfo_domain_user(username, name_domain, name_user);
816
817         request.data.auth_crap.logon_parameters = MSV1_0_ALLOW_WORKSTATION_TRUST_ACCOUNT | MSV1_0_ALLOW_SERVER_TRUST_ACCOUNT;
818
819         fstrcpy(request.data.auth_crap.user, name_user);
820
821         fstrcpy(request.data.auth_crap.domain, 
822                               name_domain);
823
824         generate_random_buffer(request.data.auth_crap.chal, 8);
825         
826         if (lp_client_ntlmv2_auth()) {
827                 DATA_BLOB server_chal;
828                 DATA_BLOB names_blob;   
829
830                 DATA_BLOB lm_response;
831                 DATA_BLOB nt_response;
832
833                 TALLOC_CTX *mem_ctx;
834                 mem_ctx = talloc_new(NULL);
835                 if (mem_ctx == NULL) {
836                         d_printf("talloc_new failed\n");
837                         return False;
838                 }
839
840                 server_chal = data_blob(request.data.auth_crap.chal, 8); 
841                 
842                 /* Pretend this is a login to 'us', for blob purposes */
843                 names_blob = NTLMv2_generate_names_blob(mem_ctx, lp_netbios_name(), lp_workgroup());
844                 
845                 if (!SMBNTLMv2encrypt(mem_ctx, name_user, name_domain, pass, &server_chal, 
846                                       &names_blob,
847                                       &lm_response, &nt_response, NULL, NULL)) {
848                         data_blob_free(&names_blob);
849                         data_blob_free(&server_chal);
850                         return False;
851                 }
852                 data_blob_free(&names_blob);
853                 data_blob_free(&server_chal);
854
855                 memcpy(request.data.auth_crap.nt_resp, nt_response.data, 
856                        MIN(nt_response.length, 
857                            sizeof(request.data.auth_crap.nt_resp)));
858                 request.data.auth_crap.nt_resp_len = nt_response.length;
859
860                 memcpy(request.data.auth_crap.lm_resp, lm_response.data, 
861                        MIN(lm_response.length, 
862                            sizeof(request.data.auth_crap.lm_resp)));
863                 request.data.auth_crap.lm_resp_len = lm_response.length;
864                        
865                 data_blob_free(&nt_response);
866                 data_blob_free(&lm_response);
867
868         } else {
869                 if (lp_client_lanman_auth() 
870                     && SMBencrypt(pass, request.data.auth_crap.chal, 
871                                (unsigned char *)request.data.auth_crap.lm_resp)) {
872                         request.data.auth_crap.lm_resp_len = 24;
873                 } else {
874                         request.data.auth_crap.lm_resp_len = 0;
875                 }
876                 SMBNTencrypt(pass, request.data.auth_crap.chal,
877                              (unsigned char *)request.data.auth_crap.nt_resp);
878
879                 request.data.auth_crap.nt_resp_len = 24;
880         }
881
882         result = winbindd_request(WINBINDD_PAM_AUTH_CRAP, &request, &response);
883
884         /* Display response */
885
886         d_printf("challenge/response password authentication %s\n", 
887                (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed");
888
889         if (response.data.auth.nt_status)
890                 d_fprintf(stderr, "error code was %s (0x%x)\nerror messsage was: %s\n", 
891                          response.data.auth.nt_status_string, 
892                          response.data.auth.nt_status,
893                          response.data.auth.error_string);
894
895         return result == NSS_STATUS_SUCCESS;
896 }
897
898 /* Print domain users */
899
900 static BOOL print_domain_users(const char *domain)
901 {
902         struct winbindd_request request;
903         struct winbindd_response response;
904         const char *extra_data;
905         fstring name;
906
907         /* Send request to winbind daemon */
908
909         ZERO_STRUCT(request);
910         ZERO_STRUCT(response);
911         
912         if (domain) {
913                 /* '.' is the special sign for our own domain */
914                 if ( strequal(domain, ".") )
915                         fstrcpy( request.domain_name, get_winbind_domain() );
916                 else
917                         fstrcpy( request.domain_name, domain );
918         }
919
920         if (winbindd_request(WINBINDD_LIST_USERS, &request, &response) !=
921             NSS_STATUS_SUCCESS)
922                 return False;
923
924         /* Look through extra data */
925
926         if (!response.extra_data.data)
927                 return False;
928
929         extra_data = (const char *)response.extra_data.data;
930
931         while(next_token(&extra_data, name, ",", sizeof(fstring)))
932                 d_printf("%s\n", name);
933         
934         SAFE_FREE(response.extra_data.data);
935
936         return True;
937 }
938
939 /* Print domain groups */
940
941 static BOOL print_domain_groups(const char *domain)
942 {
943         struct winbindd_request  request;
944         struct winbindd_response response;
945         const char *extra_data;
946         fstring name;
947
948         ZERO_STRUCT(request);
949         ZERO_STRUCT(response);
950
951         if (domain) {
952                 if ( strequal(domain, ".") )
953                         fstrcpy( request.domain_name, get_winbind_domain() );
954                 else
955                         fstrcpy( request.domain_name, domain );
956         }
957
958         if (winbindd_request(WINBINDD_LIST_GROUPS, &request, &response) !=
959             NSS_STATUS_SUCCESS)
960                 return False;
961
962         /* Look through extra data */
963
964         if (!response.extra_data.data)
965                 return False;
966
967         extra_data = (const char *)response.extra_data.data;
968
969         while(next_token(&extra_data, name, ",", sizeof(fstring)))
970                 d_printf("%s\n", name);
971
972         SAFE_FREE(response.extra_data.data);
973         
974         return True;
975 }
976
977 static BOOL wbinfo_ping(void)
978 {
979         NSS_STATUS result;
980
981         result = winbindd_request(WINBINDD_PING, NULL, NULL);
982
983         /* Display response */
984
985         d_printf("Ping to winbindd %s on fd %d\n", 
986                (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed", winbindd_fd);
987
988         return result == NSS_STATUS_SUCCESS;
989 }
990
991 /* Main program */
992
993 enum {
994         OPT_SET_AUTH_USER = 1000,
995         OPT_GET_AUTH_USER,
996         OPT_DOMAIN_NAME,
997         OPT_SEQUENCE,
998         OPT_GETDCNAME,
999         OPT_USERDOMGROUPS,
1000         OPT_USERSIDS,
1001         OPT_ALLOCATE_UID,
1002         OPT_ALLOCATE_GID,
1003         OPT_SEPARATOR,
1004         OPT_LIST_ALL_DOMAINS,
1005         OPT_LIST_OWN_DOMAIN,
1006         OPT_UID_INFO,
1007         OPT_GROUP_INFO,
1008 };
1009
1010 int main(int argc, char **argv, char **envp)
1011 {
1012         int opt;
1013
1014         poptContext pc;
1015         static char *string_arg;
1016         static char *opt_domain_name;
1017         static int int_arg;
1018         int result = 1;
1019
1020         struct poptOption long_options[] = {
1021                 POPT_AUTOHELP
1022
1023                 /* longName, shortName, argInfo, argPtr, value, descrip, 
1024                    argDesc */
1025
1026                 { "domain-users", 'u', POPT_ARG_NONE, 0, 'u', "Lists all domain users", "domain"},
1027                 { "domain-groups", 'g', POPT_ARG_NONE, 0, 'g', "Lists all domain groups", "domain" },
1028                 { "WINS-by-name", 'N', POPT_ARG_STRING, &string_arg, 'N', "Converts NetBIOS name to IP", "NETBIOS-NAME" },
1029                 { "WINS-by-ip", 'I', POPT_ARG_STRING, &string_arg, 'I', "Converts IP address to NetBIOS name", "IP" },
1030                 { "name-to-sid", 'n', POPT_ARG_STRING, &string_arg, 'n', "Converts name to sid", "NAME" },
1031                 { "sid-to-name", 's', POPT_ARG_STRING, &string_arg, 's', "Converts sid to name", "SID" },
1032                 { "uid-to-sid", 'U', POPT_ARG_INT, &int_arg, 'U', "Converts uid to sid" , "UID" },
1033                 { "gid-to-sid", 'G', POPT_ARG_INT, &int_arg, 'G', "Converts gid to sid", "GID" },
1034                 { "sid-to-uid", 'S', POPT_ARG_STRING, &string_arg, 'S', "Converts sid to uid", "SID" },
1035                 { "sid-to-gid", 'Y', POPT_ARG_STRING, &string_arg, 'Y', "Converts sid to gid", "SID" },
1036                 { "check-secret", 't', POPT_ARG_NONE, 0, 't', "Check shared secret" },
1037                 { "trusted-domains", 'm', POPT_ARG_NONE, 0, 'm', "List trusted domains" },
1038                 { "all-domains", 0, POPT_ARG_NONE, 0, OPT_LIST_ALL_DOMAINS, "List all domains (trusted and own domain)" },
1039                 { "own-domain", 0, POPT_ARG_NONE, 0, OPT_LIST_OWN_DOMAIN, "List own domain" },
1040                 { "sequence", 0, POPT_ARG_NONE, 0, OPT_SEQUENCE, "Show sequence numbers of all domains" },
1041                 { "domain-info", 'D', POPT_ARG_STRING, &string_arg, 'D', "Show most of the info we have about the domain" },
1042                 { "user-info", 'i', POPT_ARG_STRING, &string_arg, 'i', "Get user info", "USER" },
1043                 { "uid-info", 0, POPT_ARG_INT, &int_arg, OPT_UID_INFO, "Get user info from uid", "UID" },
1044                 { "group-info", 0, POPT_ARG_STRING, &string_arg, OPT_GROUP_INFO, "Get group info", "GROUP" },
1045                 { "user-groups", 'r', POPT_ARG_STRING, &string_arg, 'r', "Get user groups", "USER" },
1046                 { "user-domgroups", 0, POPT_ARG_STRING, &string_arg,
1047                   OPT_USERDOMGROUPS, "Get user domain groups", "SID" },
1048                 { "user-sids", 0, POPT_ARG_STRING, &string_arg, OPT_USERSIDS, "Get user group sids for user SID", "SID" },
1049                 { "authenticate", 'a', POPT_ARG_STRING, &string_arg, 'a', "authenticate user", "user%password" },
1050                 { "getdcname", 0, POPT_ARG_STRING, &string_arg, OPT_GETDCNAME,
1051                   "Get a DC name for a foreign domain", "domainname" },
1052                 { "ping", 'p', POPT_ARG_NONE, 0, 'p', "Ping winbindd to see if it is alive" },
1053                 { "domain", 0, POPT_ARG_STRING, &opt_domain_name, OPT_DOMAIN_NAME, "Define to the domain to restrict operation", "domain" },
1054 #ifdef HAVE_KRB5
1055                 { "krb5auth", 'K', POPT_ARG_STRING, &string_arg, 'K', "authenticate user using Kerberos", "user%password" },
1056                         /* destroys wbinfo --help output */
1057                         /* "user%password,DOM\\user%password,user@EXAMPLE.COM,EXAMPLE.COM\\user%password" }, */
1058 #endif
1059                 { "separator", 0, POPT_ARG_NONE, 0, OPT_SEPARATOR, "Get the active winbind separator", NULL },
1060                 POPT_COMMON_VERSION
1061                 POPT_COMMON_SAMBA
1062                 POPT_TABLEEND
1063         };
1064
1065         /* Parse options */
1066
1067         pc = poptGetContext("wbinfo", argc, (const char **)argv, long_options, 0);
1068
1069         /* Parse command line options */
1070
1071         if (argc == 1) {
1072                 poptPrintHelp(pc, stderr, 0);
1073                 return 1;
1074         }
1075
1076         while((opt = poptGetNextOpt(pc)) != -1) {
1077                 /* get the generic configuration parameters like --domain */
1078         }
1079
1080         poptFreeContext(pc);
1081
1082         pc = poptGetContext(NULL, argc, (const char **)argv, long_options, 
1083                             POPT_CONTEXT_KEEP_FIRST);
1084
1085         while((opt = poptGetNextOpt(pc)) != -1) {
1086                 switch (opt) {
1087                 case 'u':
1088                         if (!print_domain_users(opt_domain_name)) {
1089                                 d_fprintf(stderr, "Error looking up domain users\n");
1090                                 goto done;
1091                         }
1092                         break;
1093                 case 'g':
1094                         if (!print_domain_groups(opt_domain_name)) {
1095                                 d_fprintf(stderr, "Error looking up domain groups\n");
1096                                 goto done;
1097                         }
1098                         break;
1099                 case 's':
1100                         if (!wbinfo_lookupsid(string_arg)) {
1101                                 d_fprintf(stderr, "Could not lookup sid %s\n", string_arg);
1102                                 goto done;
1103                         }
1104                         break;
1105                 case 'n':
1106                         if (!wbinfo_lookupname(string_arg)) {
1107                                 d_fprintf(stderr, "Could not lookup name %s\n", string_arg);
1108                                 goto done;
1109                         }
1110                         break;
1111                 case 'N':
1112                         if (!wbinfo_wins_byname(string_arg)) {
1113                                 d_fprintf(stderr, "Could not lookup WINS by name %s\n", string_arg);
1114                                 goto done;
1115                         }
1116                         break;
1117                 case 'I':
1118                         if (!wbinfo_wins_byip(string_arg)) {
1119                                 d_fprintf(stderr, "Could not lookup WINS by IP %s\n", string_arg);
1120                                 goto done;
1121                         }
1122                         break;
1123                 case 'U':
1124                         if (!wbinfo_uid_to_sid(int_arg)) {
1125                                 d_fprintf(stderr, "Could not convert uid %d to sid\n", int_arg);
1126                                 goto done;
1127                         }
1128                         break;
1129                 case 'G':
1130                         if (!wbinfo_gid_to_sid(int_arg)) {
1131                                 d_fprintf(stderr, "Could not convert gid %d to sid\n",
1132                                        int_arg);
1133                                 goto done;
1134                         }
1135                         break;
1136                 case 'S':
1137                         if (!wbinfo_sid_to_uid(string_arg)) {
1138                                 d_fprintf(stderr, "Could not convert sid %s to uid\n",
1139                                        string_arg);
1140                                 goto done;
1141                         }
1142                         break;
1143                 case 'Y':
1144                         if (!wbinfo_sid_to_gid(string_arg)) {
1145                                 d_fprintf(stderr, "Could not convert sid %s to gid\n",
1146                                        string_arg);
1147                                 goto done;
1148                         }
1149                         break;
1150                 case 't':
1151                         if (!wbinfo_check_secret()) {
1152                                 d_fprintf(stderr, "Could not check secret\n");
1153                                 goto done;
1154                         }
1155                         break;
1156                 case 'm':
1157                         if (!wbinfo_list_domains(False)) {
1158                                 d_fprintf(stderr, "Could not list trusted domains\n");
1159                                 goto done;
1160                         }
1161                         break;
1162                 case OPT_SEQUENCE:
1163                         if (!wbinfo_show_sequence(opt_domain_name)) {
1164                                 d_fprintf(stderr, "Could not show sequence numbers\n");
1165                                 goto done;
1166                         }
1167                         break;
1168                 case 'D':
1169                         if (!wbinfo_domain_info(string_arg)) {
1170                                 d_fprintf(stderr, "Could not get domain info\n");
1171                                 goto done;
1172                         }
1173                         break;
1174                 case 'i':
1175                         if (!wbinfo_get_userinfo(string_arg)) {
1176                                 d_fprintf(stderr, "Could not get info for user %s\n",
1177                                                   string_arg);
1178                                 goto done;
1179                         }
1180                         break;
1181                 case OPT_UID_INFO:
1182                         if ( !wbinfo_get_uidinfo(int_arg)) {
1183                                 d_fprintf(stderr, "Could not get info for uid "
1184                                                 "%d\n", int_arg);
1185                                 goto done;
1186                         }
1187                         break;
1188                 case OPT_GROUP_INFO:
1189                         if ( !wbinfo_get_groupinfo(string_arg)) {
1190                                 d_fprintf(stderr, "Could not get info for "
1191                                           "group %s\n", string_arg);
1192                                 goto done;
1193                         }
1194                         break;
1195                 case 'r':
1196                         if (!wbinfo_get_usergroups(string_arg)) {
1197                                 d_fprintf(stderr, "Could not get groups for user %s\n", 
1198                                        string_arg);
1199                                 goto done;
1200                         }
1201                         break;
1202                 case OPT_USERSIDS:
1203                         if (!wbinfo_get_usersids(string_arg)) {
1204                                 d_fprintf(stderr, "Could not get group SIDs for user SID %s\n", 
1205                                        string_arg);
1206                                 goto done;
1207                         }
1208                         break;
1209                 case OPT_USERDOMGROUPS:
1210                         if (!wbinfo_get_userdomgroups(string_arg)) {
1211                                 d_fprintf(stderr, "Could not get user's domain groups "
1212                                          "for user SID %s\n", string_arg);
1213                                 goto done;
1214                         }
1215                         break;
1216                 case 'a': {
1217                                 BOOL got_error = False;
1218
1219                                 if (!wbinfo_auth(string_arg)) {
1220                                         d_fprintf(stderr, "Could not authenticate user %s with "
1221                                                 "plaintext password\n", string_arg);
1222                                         got_error = True;
1223                                 }
1224
1225                                 if (!wbinfo_auth_crap(string_arg)) {
1226                                         d_fprintf(stderr, "Could not authenticate user %s with "
1227                                                 "challenge/response\n", string_arg);
1228                                         got_error = True;
1229                                 }
1230
1231                                 if (got_error)
1232                                         goto done;
1233                                 break;
1234                         }
1235                 case 'K': {
1236                                 uint32 flags =  WBFLAG_PAM_KRB5 |
1237                                                 WBFLAG_PAM_CACHED_LOGIN |
1238                                                 WBFLAG_PAM_FALLBACK_AFTER_KRB5 |
1239                                                 WBFLAG_PAM_INFO3_TEXT;
1240
1241                                 if (!wbinfo_auth_krb5(string_arg, "FILE", flags)) {
1242                                         d_fprintf(stderr, "Could not authenticate user [%s] with "
1243                                                 "Kerberos (ccache: %s)\n", string_arg, "FILE");
1244                                         goto done;
1245                                 }
1246                                 break;
1247                         }
1248                 case 'p':
1249                         if (!wbinfo_ping()) {
1250                                 d_fprintf(stderr, "could not ping winbindd!\n");
1251                                 goto done;
1252                         }
1253                         break;
1254                 case OPT_GETDCNAME:
1255                         if (!wbinfo_getdcname(string_arg)) {
1256                                 goto done;
1257                         }
1258                         break;
1259                 case OPT_SEPARATOR: {
1260                         const char sep = winbind_separator_int(True);
1261                         if ( !sep ) {
1262                                 goto done;
1263                         }
1264                         d_printf("%c\n", sep);
1265                         break;
1266                 }
1267                 case OPT_LIST_ALL_DOMAINS:
1268                         if (!wbinfo_list_domains(True)) {
1269                                 goto done;
1270                         }
1271                         break;
1272                 case OPT_LIST_OWN_DOMAIN:
1273                         if (!wbinfo_list_own_domain()) {
1274                                 goto done;
1275                         }
1276                         break;
1277                 /* generic configuration options */
1278                 case OPT_DOMAIN_NAME:
1279                         break;
1280                 default:
1281                         d_fprintf(stderr, "Invalid option\n");
1282                         poptPrintHelp(pc, stderr, 0);
1283                         goto done;
1284                 }
1285         }
1286
1287         result = 0;
1288
1289         /* Exit code */
1290
1291  done:
1292         poptFreeContext(pc);
1293         return result;
1294 }