don't dereference null pointer
[Samba/gebeck_regimport.git] / source4 / nsswitch / wbinfo.c
blob68dc178bcdbe48cce6963b91df97eb78ad00cdc7
1 /*
2 Unix SMB/CIFS implementation.
4 Winbind status program.
6 Copyright (C) Tim Potter 2000-2002
7 Copyright (C) Andrew Bartlett 2002
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 2 of the License, or
12 (at your option) any later version.
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.
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the Free Software
21 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24 #include "includes.h"
25 #include "winbindd.h"
26 #include "debug.h"
28 #undef DBGC_CLASS
29 #define DBGC_CLASS DBGC_WINBIND
31 extern int winbindd_fd;
33 static char winbind_separator(void)
35 struct winbindd_response response;
36 static BOOL got_sep;
37 static char sep;
39 if (got_sep)
40 return sep;
42 ZERO_STRUCT(response);
44 /* Send off request */
46 if (winbindd_request(WINBINDD_INFO, NULL, &response) !=
47 NSS_STATUS_SUCCESS) {
48 d_printf("could not obtain winbind separator!\n");
49 /* HACK: (this module should not call lp_ funtions) */
50 return *lp_winbind_separator();
53 sep = response.data.info.winbind_separator;
54 got_sep = True;
56 if (!sep) {
57 d_printf("winbind separator was NULL!\n");
58 /* HACK: (this module should not call lp_ funtions) */
59 sep = *lp_winbind_separator();
62 return sep;
65 static const char *get_winbind_domain(void)
67 struct winbindd_response response;
68 static fstring winbind_domain;
70 ZERO_STRUCT(response);
72 /* Send off request */
74 if (winbindd_request(WINBINDD_DOMAIN_NAME, NULL, &response) !=
75 NSS_STATUS_SUCCESS) {
76 d_printf("could not obtain winbind domain name!\n");
78 /* HACK: (this module should not call lp_ funtions) */
79 return lp_workgroup();
82 fstrcpy(winbind_domain, response.data.domain_name);
84 return winbind_domain;
88 /* Copy of parse_domain_user from winbindd_util.c. Parse a string of the
89 form DOMAIN/user into a domain and a user */
91 static BOOL parse_wbinfo_domain_user(const char *domuser, fstring domain,
92 fstring user)
95 char *p = strchr(domuser,winbind_separator());
97 if (!p) {
98 fstrcpy(user, domuser);
99 fstrcpy(domain, get_winbind_domain());
100 return True;
103 fstrcpy(user, p+1);
104 fstrcpy(domain, domuser);
105 domain[PTR_DIFF(p, domuser)] = 0;
106 strupper(domain);
108 return True;
111 /* List groups a user is a member of */
113 static BOOL wbinfo_get_usergroups(char *user)
115 struct winbindd_request request;
116 struct winbindd_response response;
117 NSS_STATUS result;
118 int i;
120 ZERO_STRUCT(response);
122 /* Send request */
124 fstrcpy(request.data.username, user);
126 result = winbindd_request(WINBINDD_GETGROUPS, &request, &response);
128 if (result != NSS_STATUS_SUCCESS)
129 return False;
131 for (i = 0; i < response.data.num_entries; i++)
132 d_printf("%d\n", (int)((gid_t *)response.extra_data)[i]);
134 SAFE_FREE(response.extra_data);
136 return True;
139 /* Convert NetBIOS name to IP */
141 static BOOL wbinfo_wins_byname(char *name)
143 struct winbindd_request request;
144 struct winbindd_response response;
146 ZERO_STRUCT(request);
147 ZERO_STRUCT(response);
149 /* Send request */
151 fstrcpy(request.data.winsreq, name);
153 if (winbindd_request(WINBINDD_WINS_BYNAME, &request, &response) !=
154 NSS_STATUS_SUCCESS) {
155 return False;
158 /* Display response */
160 printf("%s\n", response.data.winsresp);
162 return True;
165 /* Convert IP to NetBIOS name */
167 static BOOL wbinfo_wins_byip(char *ip)
169 struct winbindd_request request;
170 struct winbindd_response response;
172 ZERO_STRUCT(request);
173 ZERO_STRUCT(response);
175 /* Send request */
177 fstrcpy(request.data.winsreq, ip);
179 if (winbindd_request(WINBINDD_WINS_BYIP, &request, &response) !=
180 NSS_STATUS_SUCCESS) {
181 return False;
184 /* Display response */
186 printf("%s\n", response.data.winsresp);
188 return True;
191 /* List trusted domains */
193 static BOOL wbinfo_list_domains(void)
195 struct winbindd_response response;
196 fstring name;
198 ZERO_STRUCT(response);
200 /* Send request */
202 if (winbindd_request(WINBINDD_LIST_TRUSTDOM, NULL, &response) !=
203 NSS_STATUS_SUCCESS)
204 return False;
206 /* Display response */
208 if (response.extra_data) {
209 const char *extra_data = (char *)response.extra_data;
211 while(next_token(&extra_data, name, ",", sizeof(fstring)))
212 d_printf("%s\n", name);
214 SAFE_FREE(response.extra_data);
217 return True;
221 /* show sequence numbers */
222 static BOOL wbinfo_show_sequence(void)
224 struct winbindd_response response;
226 ZERO_STRUCT(response);
228 /* Send request */
230 if (winbindd_request(WINBINDD_SHOW_SEQUENCE, NULL, &response) !=
231 NSS_STATUS_SUCCESS)
232 return False;
234 /* Display response */
236 if (response.extra_data) {
237 char *extra_data = (char *)response.extra_data;
238 d_printf("%s", extra_data);
239 SAFE_FREE(response.extra_data);
242 return True;
245 /* Check trust account password */
247 static BOOL wbinfo_check_secret(void)
249 struct winbindd_response response;
250 NSS_STATUS result;
252 ZERO_STRUCT(response);
254 result = winbindd_request(WINBINDD_CHECK_MACHACC, NULL, &response);
256 d_printf("checking the trust secret via RPC calls %s\n",
257 (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed");
259 if (result != NSS_STATUS_SUCCESS)
260 d_printf("error code was %s (0x%x)\n",
261 response.data.auth.nt_status_string,
262 response.data.auth.nt_status);
264 return result == NSS_STATUS_SUCCESS;
267 /* Convert uid to sid */
269 static BOOL wbinfo_uid_to_sid(uid_t uid)
271 struct winbindd_request request;
272 struct winbindd_response response;
274 ZERO_STRUCT(request);
275 ZERO_STRUCT(response);
277 /* Send request */
279 request.data.uid = uid;
281 if (winbindd_request(WINBINDD_UID_TO_SID, &request, &response) !=
282 NSS_STATUS_SUCCESS)
283 return False;
285 /* Display response */
287 d_printf("%s\n", response.data.sid.sid);
289 return True;
292 /* Convert gid to sid */
294 static BOOL wbinfo_gid_to_sid(gid_t gid)
296 struct winbindd_request request;
297 struct winbindd_response response;
299 ZERO_STRUCT(request);
300 ZERO_STRUCT(response);
302 /* Send request */
304 request.data.gid = gid;
306 if (winbindd_request(WINBINDD_GID_TO_SID, &request, &response) !=
307 NSS_STATUS_SUCCESS)
308 return False;
310 /* Display response */
312 d_printf("%s\n", response.data.sid.sid);
314 return True;
317 /* Convert sid to uid */
319 static BOOL wbinfo_sid_to_uid(char *sid)
321 struct winbindd_request request;
322 struct winbindd_response response;
324 ZERO_STRUCT(request);
325 ZERO_STRUCT(response);
327 /* Send request */
329 fstrcpy(request.data.sid, sid);
331 if (winbindd_request(WINBINDD_SID_TO_UID, &request, &response) !=
332 NSS_STATUS_SUCCESS)
333 return False;
335 /* Display response */
337 d_printf("%d\n", (int)response.data.uid);
339 return True;
342 static BOOL wbinfo_sid_to_gid(char *sid)
344 struct winbindd_request request;
345 struct winbindd_response response;
347 ZERO_STRUCT(request);
348 ZERO_STRUCT(response);
350 /* Send request */
352 fstrcpy(request.data.sid, sid);
354 if (winbindd_request(WINBINDD_SID_TO_GID, &request, &response) !=
355 NSS_STATUS_SUCCESS)
356 return False;
358 /* Display response */
360 d_printf("%d\n", (int)response.data.gid);
362 return True;
365 /* Convert sid to string */
367 static BOOL wbinfo_lookupsid(char *sid)
369 struct winbindd_request request;
370 struct winbindd_response response;
372 ZERO_STRUCT(request);
373 ZERO_STRUCT(response);
375 /* Send off request */
377 fstrcpy(request.data.sid, sid);
379 if (winbindd_request(WINBINDD_LOOKUPSID, &request, &response) !=
380 NSS_STATUS_SUCCESS)
381 return False;
383 /* Display response */
385 d_printf("%s%c%s %d\n", response.data.name.dom_name,
386 winbind_separator(), response.data.name.name,
387 response.data.name.type);
389 return True;
392 /* Convert string to sid */
394 static BOOL wbinfo_lookupname(char *name)
396 struct winbindd_request request;
397 struct winbindd_response response;
399 /* Send off request */
401 ZERO_STRUCT(request);
402 ZERO_STRUCT(response);
404 parse_wbinfo_domain_user(name, request.data.name.dom_name,
405 request.data.name.name);
407 if (winbindd_request(WINBINDD_LOOKUPNAME, &request, &response) !=
408 NSS_STATUS_SUCCESS)
409 return False;
411 /* Display response */
413 d_printf("%s %d\n", response.data.sid.sid, response.data.sid.type);
415 return True;
418 /* Authenticate a user with a plaintext password */
420 static BOOL wbinfo_auth(char *username)
422 struct winbindd_request request;
423 struct winbindd_response response;
424 NSS_STATUS result;
425 char *p;
427 /* Send off request */
429 ZERO_STRUCT(request);
430 ZERO_STRUCT(response);
432 p = strchr(username, '%');
434 if (p) {
435 *p = 0;
436 fstrcpy(request.data.auth.user, username);
437 fstrcpy(request.data.auth.pass, p + 1);
438 *p = '%';
439 } else
440 fstrcpy(request.data.auth.user, username);
442 result = winbindd_request(WINBINDD_PAM_AUTH, &request, &response);
444 /* Display response */
446 d_printf("plaintext password authentication %s\n",
447 (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed");
449 if (response.data.auth.nt_status)
450 d_printf("error code was %s (0x%x)\n",
451 response.data.auth.nt_status_string,
452 response.data.auth.nt_status);
454 return result == NSS_STATUS_SUCCESS;
457 /* Authenticate a user with a challenge/response */
459 static BOOL wbinfo_auth_crap(char *username)
461 struct winbindd_request request;
462 struct winbindd_response response;
463 NSS_STATUS result;
464 fstring name_user;
465 fstring name_domain;
466 fstring pass;
467 char *p;
469 /* Send off request */
471 ZERO_STRUCT(request);
472 ZERO_STRUCT(response);
474 p = strchr(username, '%');
476 if (p) {
477 *p = 0;
478 fstrcpy(pass, p + 1);
481 parse_wbinfo_domain_user(username, name_domain, name_user);
483 fstrcpy(request.data.auth_crap.user, name_user);
485 fstrcpy(request.data.auth_crap.domain, name_domain);
487 generate_random_buffer(request.data.auth_crap.chal, 8, False);
489 SMBencrypt(pass, request.data.auth_crap.chal,
490 (uchar *)request.data.auth_crap.lm_resp);
491 SMBNTencrypt(pass, request.data.auth_crap.chal,
492 (uchar *)request.data.auth_crap.nt_resp);
494 request.data.auth_crap.lm_resp_len = 24;
495 request.data.auth_crap.nt_resp_len = 24;
497 result = winbindd_request(WINBINDD_PAM_AUTH_CRAP, &request, &response);
499 /* Display response */
501 d_printf("challenge/response password authentication %s\n",
502 (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed");
504 if (response.data.auth.nt_status)
505 d_printf("error code was %s (0x%x)\n",
506 response.data.auth.nt_status_string,
507 response.data.auth.nt_status);
509 return result == NSS_STATUS_SUCCESS;
512 /* Print domain users */
514 static BOOL print_domain_users(void)
516 struct winbindd_response response;
517 const char *extra_data;
518 fstring name;
520 /* Send request to winbind daemon */
522 ZERO_STRUCT(response);
524 if (winbindd_request(WINBINDD_LIST_USERS, NULL, &response) !=
525 NSS_STATUS_SUCCESS)
526 return False;
528 /* Look through extra data */
530 if (!response.extra_data)
531 return False;
533 extra_data = (const char *)response.extra_data;
535 while(next_token(&extra_data, name, ",", sizeof(fstring)))
536 d_printf("%s\n", name);
538 SAFE_FREE(response.extra_data);
540 return True;
543 /* Print domain groups */
545 static BOOL print_domain_groups(void)
547 struct winbindd_response response;
548 const char *extra_data;
549 fstring name;
551 ZERO_STRUCT(response);
553 if (winbindd_request(WINBINDD_LIST_GROUPS, NULL, &response) !=
554 NSS_STATUS_SUCCESS)
555 return False;
557 /* Look through extra data */
559 if (!response.extra_data)
560 return False;
562 extra_data = (const char *)response.extra_data;
564 while(next_token(&extra_data, name, ",", sizeof(fstring)))
565 d_printf("%s\n", name);
567 SAFE_FREE(response.extra_data);
569 return True;
572 /* Set the authorised user for winbindd access in secrets.tdb */
574 static BOOL wbinfo_set_auth_user(char *username)
576 char *password;
577 fstring user, domain;
579 /* Separate into user and password */
581 parse_wbinfo_domain_user(username, domain, user);
583 password = strchr(user, '%');
585 if (password) {
586 *password = 0;
587 password++;
588 } else
589 password = "";
591 /* Store or remove DOMAIN\username%password in secrets.tdb */
593 secrets_init();
595 if (user[0]) {
597 if (!secrets_store(SECRETS_AUTH_USER, user,
598 strlen(user) + 1)) {
599 d_fprintf(stderr, "error storing username\n");
600 return False;
603 /* We always have a domain name added by the
604 parse_wbinfo_domain_user() function. */
606 if (!secrets_store(SECRETS_AUTH_DOMAIN, domain,
607 strlen(domain) + 1)) {
608 d_fprintf(stderr, "error storing domain name\n");
609 return False;
612 } else {
613 secrets_delete(SECRETS_AUTH_USER);
614 secrets_delete(SECRETS_AUTH_DOMAIN);
617 if (password[0]) {
619 if (!secrets_store(SECRETS_AUTH_PASSWORD, password,
620 strlen(password) + 1)) {
621 d_fprintf(stderr, "error storing password\n");
622 return False;
625 } else
626 secrets_delete(SECRETS_AUTH_PASSWORD);
628 return True;
631 static void wbinfo_get_auth_user(void)
633 char *user, *domain, *password;
635 /* Lift data from secrets file */
637 secrets_init();
639 user = secrets_fetch(SECRETS_AUTH_USER, NULL);
640 domain = secrets_fetch(SECRETS_AUTH_DOMAIN, NULL);
641 password = secrets_fetch(SECRETS_AUTH_PASSWORD, NULL);
643 if (!user && !domain && !password) {
644 d_printf("No authorised user configured\n");
645 return;
648 /* Pretty print authorised user info */
650 d_printf("%s%s%s%s%s\n", domain ? domain : "", domain ? "\\" : "",
651 user, password ? "%" : "", password ? password : "");
653 SAFE_FREE(user);
654 SAFE_FREE(domain);
655 SAFE_FREE(password);
658 static BOOL wbinfo_ping(void)
660 NSS_STATUS result;
662 result = winbindd_request(WINBINDD_PING, NULL, NULL);
664 /* Display response */
666 d_printf("'ping' to winbindd %s on fd %d\n",
667 (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed", winbindd_fd);
669 return result == NSS_STATUS_SUCCESS;
672 /* Main program */
674 enum {
675 OPT_SET_AUTH_USER = 1000,
676 OPT_GET_AUTH_USER,
677 OPT_SEQUENCE
680 int main(int argc, char **argv)
682 int opt;
684 poptContext pc;
685 static char *string_arg;
686 static int int_arg;
687 BOOL got_command = False;
688 int result = 1;
690 struct poptOption long_options[] = {
691 POPT_AUTOHELP
693 /* longName, shortName, argInfo, argPtr, value, descrip,
694 argDesc */
696 { "domain-users", 'u', POPT_ARG_NONE, 0, 'u', "Lists all domain users"},
697 { "domain-groups", 'g', POPT_ARG_NONE, 0, 'g', "Lists all domain groups" },
698 { "WINS-by-name", 'N', POPT_ARG_STRING, &string_arg, 'N', "Converts NetBIOS name to IP (WINS)", "NETBIOS-NAME" },
699 { "WINS-by-ip", 'I', POPT_ARG_STRING, &string_arg, 'I', "Converts IP address to NetBIOS name (WINS)", "IP" },
700 { "name-to-sid", 'n', POPT_ARG_STRING, &string_arg, 'n', "Converts name to sid", "NAME" },
701 { "sid-to-name", 's', POPT_ARG_STRING, &string_arg, 's', "Converts sid to name", "SID" },
702 { "uid-to-sid", 'U', POPT_ARG_INT, &int_arg, 'U', "Converts uid to sid" , "UID" },
703 { "gid-to-sid", 'G', POPT_ARG_INT, &int_arg, 'G', "Converts gid to sid", "GID" },
704 { "sid-to-uid", 'S', POPT_ARG_STRING, &string_arg, 'S', "Converts sid to uid", "SID" },
705 { "sid-to-gid", 'Y', POPT_ARG_STRING, &string_arg, 'Y', "Converts sid to gid", "SID" },
706 { "check-secret", 't', POPT_ARG_NONE, 0, 't', "Check shared secret" },
707 { "trusted-domains", 'm', POPT_ARG_NONE, 0, 'm', "List trusted domains" },
708 { "sequence", 0, POPT_ARG_NONE, 0, OPT_SEQUENCE, "show sequence numbers of all domains" },
709 { "user-groups", 'r', POPT_ARG_STRING, &string_arg, 'r', "Get user groups", "USER" },
710 { "authenticate", 'a', POPT_ARG_STRING, &string_arg, 'a', "authenticate user", "user%password" },
711 { "set-auth-user", 'A', POPT_ARG_STRING, &string_arg, OPT_SET_AUTH_USER, "Store user and password used by winbindd (root only)", "user%password" },
712 { "get-auth-user", 0, POPT_ARG_NONE, NULL, OPT_GET_AUTH_USER, "Retrieve user and password used by winbindd (root only)", NULL },
713 { "ping", 'p', POPT_ARG_NONE, 0, 'p', "'ping' winbindd to see if it is alive" },
714 { NULL, 0, POPT_ARG_INCLUDE_TABLE, popt_common_version},
715 { 0, 0, 0, 0 }
718 /* Samba client initialisation */
720 if (!lp_load(dyn_CONFIGFILE, True, False, False)) {
721 d_fprintf(stderr, "wbinfo: error opening config file %s. Error was %s\n",
722 dyn_CONFIGFILE, strerror(errno));
723 exit(1);
726 if (!init_names())
727 return 1;
729 load_interfaces();
731 /* Parse options */
733 pc = poptGetContext("wbinfo", argc, (const char **)argv, long_options, 0);
735 /* Parse command line options */
737 if (argc == 1) {
738 poptPrintHelp(pc, stderr, 0);
739 return 1;
742 while((opt = poptGetNextOpt(pc)) != -1) {
743 if (got_command) {
744 d_fprintf(stderr, "No more than one command may be specified at once.\n");
745 exit(1);
747 got_command = True;
750 poptFreeContext(pc);
752 pc = poptGetContext(NULL, argc, (const char **)argv, long_options,
753 POPT_CONTEXT_KEEP_FIRST);
755 while((opt = poptGetNextOpt(pc)) != -1) {
756 switch (opt) {
757 case 'u':
758 if (!print_domain_users()) {
759 d_printf("Error looking up domain users\n");
760 goto done;
762 break;
763 case 'g':
764 if (!print_domain_groups()) {
765 d_printf("Error looking up domain groups\n");
766 goto done;
768 break;
769 case 's':
770 if (!wbinfo_lookupsid(string_arg)) {
771 d_printf("Could not lookup sid %s\n", string_arg);
772 goto done;
774 break;
775 case 'n':
776 if (!wbinfo_lookupname(string_arg)) {
777 d_printf("Could not lookup name %s\n", string_arg);
778 goto done;
780 break;
781 case 'N':
782 if (!wbinfo_wins_byname(string_arg)) {
783 d_printf("Could not lookup WINS by name %s\n", string_arg);
784 goto done;
786 break;
787 case 'I':
788 if (!wbinfo_wins_byip(string_arg)) {
789 d_printf("Could not lookup WINS by IP %s\n", string_arg);
790 goto done;
792 break;
793 case 'U':
794 if (!wbinfo_uid_to_sid(int_arg)) {
795 d_printf("Could not convert uid %d to sid\n", int_arg);
796 goto done;
798 break;
799 case 'G':
800 if (!wbinfo_gid_to_sid(int_arg)) {
801 d_printf("Could not convert gid %d to sid\n",
802 int_arg);
803 goto done;
805 break;
806 case 'S':
807 if (!wbinfo_sid_to_uid(string_arg)) {
808 d_printf("Could not convert sid %s to uid\n",
809 string_arg);
810 goto done;
812 break;
813 case 'Y':
814 if (!wbinfo_sid_to_gid(string_arg)) {
815 d_printf("Could not convert sid %s to gid\n",
816 string_arg);
817 goto done;
819 break;
820 case 't':
821 if (!wbinfo_check_secret()) {
822 d_printf("Could not check secret\n");
823 goto done;
825 break;
826 case 'm':
827 if (!wbinfo_list_domains()) {
828 d_printf("Could not list trusted domains\n");
829 goto done;
831 break;
832 case OPT_SEQUENCE:
833 if (!wbinfo_show_sequence()) {
834 d_printf("Could not show sequence numbers\n");
835 goto done;
837 break;
838 case 'r':
839 if (!wbinfo_get_usergroups(string_arg)) {
840 d_printf("Could not get groups for user %s\n",
841 string_arg);
842 goto done;
844 break;
845 case 'a': {
846 BOOL got_error = False;
848 if (!wbinfo_auth(string_arg)) {
849 d_printf("Could not authenticate user %s with "
850 "plaintext password\n", string_arg);
851 got_error = True;
854 if (!wbinfo_auth_crap(string_arg)) {
855 d_printf("Could not authenticate user %s with "
856 "challenge/response\n", string_arg);
857 got_error = True;
860 if (got_error)
861 goto done;
862 break;
864 case 'p': {
865 if (!wbinfo_ping()) {
866 d_printf("could not ping winbindd!\n");
867 goto done;
869 break;
871 case OPT_SET_AUTH_USER:
872 wbinfo_set_auth_user(string_arg);
873 break;
874 case OPT_GET_AUTH_USER:
875 wbinfo_get_auth_user();
876 break;
877 default:
878 d_fprintf(stderr, "Invalid option\n");
879 poptPrintHelp(pc, stderr, 0);
880 goto done;
884 result = 0;
886 /* Exit code */
888 done:
889 poptFreeContext(pc);
890 return result;