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