nsswitch/wbinfo.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    Winbind status program.
   5
   6    Copyright (C) Tim Potter      2000-2003
   7    Copyright (C) Andrew Bartlett 2002-2007
   8    Copyright (C) Volker Lendecke 2009
   9
  10    This program is free software; you can redistribute it and/or modify
  11    it under the terms of the GNU General Public License as published by
  12    the Free Software Foundation; either version 3 of the License, or
  13    (at your option) any later version.
  14
  15    This program is distributed in the hope that it will be useful,
  16    but WITHOUT ANY WARRANTY; without even the implied warranty of
  17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18    GNU General Public License for more details.
  19
  20    You should have received a copy of the GNU General Public License
  21    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  22 */
  23
  24 #include "includes.h"
  25 #include "popt_common.h"
  26 #include "winbind_client.h"
  27 #include "libwbclient/wbclient.h"
  28 #include "lib/popt/popt.h"
  29 #include "../libcli/auth/libcli_auth.h"
  30 #if (_SAMBA_BUILD_) >= 4
  31 #include "lib/cmdline/popt_common.h"
  32 #endif
  33
  34 #ifdef DBGC_CLASS
  35 #undef DBGC_CLASS
  36 #define DBGC_CLASS DBGC_WINBIND
  37 #endif
  38
  39 static struct wbcInterfaceDetails *init_interface_details(void)
  40 {
  41         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
  42         static struct wbcInterfaceDetails *details;
  43
  44         if (details) {
  45                 return details;
  46         }
  47
  48         wbc_status = wbcInterfaceDetails(&details);
  49         if (!WBC_ERROR_IS_OK(wbc_status)) {
  50                 d_fprintf(stderr, "could not obtain winbind interface "
  51                                   "details: %s\n", wbcErrorString(wbc_status));
  52         }
  53
  54         return details;
  55 }
  56
  57 static char winbind_separator(void)
  58 {
  59         struct wbcInterfaceDetails *details;
  60         static bool got_sep;
  61         static char sep;
  62
  63         if (got_sep)
  64                 return sep;
  65
  66         details = init_interface_details();
  67
  68         if (!details) {
  69                 d_fprintf(stderr, "could not obtain winbind separator!\n");
  70                 return 0;
  71         }
  72
  73         sep = details->winbind_separator;
  74         got_sep = true;
  75
  76         if (!sep) {
  77                 d_fprintf(stderr, "winbind separator was NULL!\n");
  78                 return 0;
  79         }
  80
  81         return sep;
  82 }
  83
  84 static const char *get_winbind_domain(void)
  85 {
  86         static struct wbcInterfaceDetails *details;
  87
  88         details = init_interface_details();
  89
  90         if (!details) {
  91                 d_fprintf(stderr, "could not obtain winbind domain name!\n");
  92                 return 0;
  93         }
  94
  95         return details->netbios_domain;
  96 }
  97
  98 static const char *get_winbind_netbios_name(void)
  99 {
 100         static struct wbcInterfaceDetails *details;
 101
 102         details = init_interface_details();
 103
 104         if (!details) {
 105                 d_fprintf(stderr, "could not obtain winbind netbios name!\n");
 106                 return 0;
 107         }
 108
 109         return details->netbios_name;
 110 }
 111
 112 /* Copy of parse_domain_user from winbindd_util.c.  Parse a string of the
 113    form DOMAIN/user into a domain and a user */
 114
 115 static bool parse_wbinfo_domain_user(const char *domuser, fstring domain,
 116                                      fstring user)
 117 {
 118
 119         char *p = strchr(domuser,winbind_separator());
 120
 121         if (!p) {
 122                 /* Maybe it was a UPN? */
 123                 if ((p = strchr(domuser, '@')) != NULL) {
 124                         fstrcpy(domain, "");
 125                         fstrcpy(user, domuser);
 126                         return true;
 127                 }
 128
 129                 fstrcpy(user, domuser);
 130                 fstrcpy(domain, get_winbind_domain());
 131                 return true;
 132         }
 133
 134         fstrcpy(user, p+1);
 135         fstrcpy(domain, domuser);
 136         domain[PTR_DIFF(p, domuser)] = 0;
 137         strupper_m(domain);
 138
 139         return true;
 140 }
 141
 142 /* Parse string of "uid,sid" or "gid,sid" into separate int and string values.
 143  * Return true if input was valid, false otherwise. */
 144 static bool parse_mapping_arg(char *arg, int *id, char **sid)
 145 {
 146         char *tmp, *endptr;
 147
 148         if (!arg || !*arg)
 149                 return false;
 150
 151         tmp = strtok(arg, ",");
 152         *sid = strtok(NULL, ",");
 153
 154         if (!tmp || !*tmp || !*sid || !**sid)
 155                 return false;
 156
 157         /* Because atoi() can return 0 on invalid input, which would be a valid
 158          * UID/GID we must use strtoul() and do error checking */
 159         *id = strtoul(tmp, &endptr, 10);
 160
 161         if (endptr[0] != '\0')
 162                 return false;
 163
 164         return true;
 165 }
 166
 167 /* pull pwent info for a given user */
 168
 169 static bool wbinfo_get_userinfo(char *user)
 170 {
 171         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 172         struct passwd *pwd = NULL;
 173
 174         wbc_status = wbcGetpwnam(user, &pwd);
 175         if (!WBC_ERROR_IS_OK(wbc_status)) {
 176                 d_fprintf(stderr, "failed to call wbcGetpwnam: %s\n",
 177                           wbcErrorString(wbc_status));
 178                 return false;
 179         }
 180
 181         d_printf("%s:%s:%u:%u:%s:%s:%s\n",
 182                  pwd->pw_name,
 183                  pwd->pw_passwd,
 184                  (unsigned int)pwd->pw_uid,
 185                  (unsigned int)pwd->pw_gid,
 186                  pwd->pw_gecos,
 187                  pwd->pw_dir,
 188                  pwd->pw_shell);
 189
 190         wbcFreeMemory(pwd);
 191
 192         return true;
 193 }
 194
 195 /* pull pwent info for a given uid */
 196 static bool wbinfo_get_uidinfo(int uid)
 197 {
 198         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 199         struct passwd *pwd = NULL;
 200
 201         wbc_status = wbcGetpwuid(uid, &pwd);
 202         if (!WBC_ERROR_IS_OK(wbc_status)) {
 203                 d_fprintf(stderr, "failed to call wbcGetpwuid: %s\n",
 204                           wbcErrorString(wbc_status));
 205                 return false;
 206         }
 207
 208         d_printf("%s:%s:%u:%u:%s:%s:%s\n",
 209                  pwd->pw_name,
 210                  pwd->pw_passwd,
 211                  (unsigned int)pwd->pw_uid,
 212                  (unsigned int)pwd->pw_gid,
 213                  pwd->pw_gecos,
 214                  pwd->pw_dir,
 215                  pwd->pw_shell);
 216
 217         wbcFreeMemory(pwd);
 218
 219         return true;
 220 }
 221
 222 static bool wbinfo_get_user_sidinfo(const char *sid_str)
 223 {
 224         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 225         struct passwd *pwd = NULL;
 226         struct wbcDomainSid sid;
 227
 228         wbc_status = wbcStringToSid(sid_str, &sid);
 229         wbc_status = wbcGetpwsid(&sid, &pwd);
 230         if (!WBC_ERROR_IS_OK(wbc_status)) {
 231                 d_fprintf(stderr, "failed to call wbcGetpwsid: %s\n",
 232                           wbcErrorString(wbc_status));
 233                 return false;
 234         }
 235
 236         d_printf("%s:%s:%u:%u:%s:%s:%s\n",
 237                  pwd->pw_name,
 238                  pwd->pw_passwd,
 239                  (unsigned int)pwd->pw_uid,
 240                  (unsigned int)pwd->pw_gid,
 241                  pwd->pw_gecos,
 242                  pwd->pw_dir,
 243                  pwd->pw_shell);
 244
 245         return true;
 246 }
 247
 248
 249 /* pull grent for a given group */
 250 static bool wbinfo_get_groupinfo(const char *group)
 251 {
 252         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 253         struct group *grp;
 254         char **mem;
 255
 256         wbc_status = wbcGetgrnam(group, &grp);
 257         if (!WBC_ERROR_IS_OK(wbc_status)) {
 258                 d_fprintf(stderr, "failed to call wbcGetgrnam: %s\n",
 259                           wbcErrorString(wbc_status));
 260                 return false;
 261         }
 262
 263         d_printf("%s:%s:%u:",
 264                  grp->gr_name,
 265                  grp->gr_passwd,
 266                  (unsigned int)grp->gr_gid);
 267
 268         mem = grp->gr_mem;
 269         while (*mem != NULL) {
 270                 d_printf("%s%s", *mem, *(mem+1) != NULL ? "," : "");
 271                 mem += 1;
 272         }
 273         d_printf("\n");
 274
 275         wbcFreeMemory(grp);
 276
 277         return true;
 278 }
 279
 280 /* pull grent for a given gid */
 281 static bool wbinfo_get_gidinfo(int gid)
 282 {
 283         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 284         struct group *grp;
 285         char **mem;
 286
 287         wbc_status = wbcGetgrgid(gid, &grp);
 288         if (!WBC_ERROR_IS_OK(wbc_status)) {
 289                 d_fprintf(stderr, "failed to call wbcGetgrgid: %s\n",
 290                           wbcErrorString(wbc_status));
 291                 return false;
 292         }
 293
 294         d_printf("%s:%s:%u:",
 295                  grp->gr_name,
 296                  grp->gr_passwd,
 297                  (unsigned int)grp->gr_gid);
 298
 299         mem = grp->gr_mem;
 300         while (*mem != NULL) {
 301                 d_printf("%s%s", *mem, *(mem+1) != NULL ? "," : "");
 302                 mem += 1;
 303         }
 304         d_printf("\n");
 305
 306         wbcFreeMemory(grp);
 307
 308         return true;
 309 }
 310
 311 /* List groups a user is a member of */
 312
 313 static bool wbinfo_get_usergroups(const char *user)
 314 {
 315         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 316         uint32_t num_groups;
 317         uint32_t i;
 318         gid_t *groups = NULL;
 319
 320         /* Send request */
 321
 322         wbc_status = wbcGetGroups(user, &num_groups, &groups);
 323         if (!WBC_ERROR_IS_OK(wbc_status)) {
 324                 d_fprintf(stderr, "failed to call wbcGetGroups: %s\n",
 325                           wbcErrorString(wbc_status));
 326                 return false;
 327         }
 328
 329         for (i = 0; i < num_groups; i++) {
 330                 d_printf("%d\n", (int)groups[i]);
 331         }
 332
 333         wbcFreeMemory(groups);
 334
 335         return true;
 336 }
 337
 338
 339 /* List group SIDs a user SID is a member of */
 340 static bool wbinfo_get_usersids(const char *user_sid_str)
 341 {
 342         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 343         uint32_t num_sids;
 344         uint32_t i;
 345         struct wbcDomainSid user_sid, *sids = NULL;
 346
 347         /* Send request */
 348
 349         wbc_status = wbcStringToSid(user_sid_str, &user_sid);
 350         if (!WBC_ERROR_IS_OK(wbc_status)) {
 351                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
 352                           wbcErrorString(wbc_status));
 353                 return false;
 354         }
 355
 356         wbc_status = wbcLookupUserSids(&user_sid, false, &num_sids, &sids);
 357         if (!WBC_ERROR_IS_OK(wbc_status)) {
 358                 d_fprintf(stderr, "failed to call wbcLookupUserSids: %s\n",
 359                           wbcErrorString(wbc_status));
 360                 return false;
 361         }
 362
 363         for (i = 0; i < num_sids; i++) {
 364                 char str[WBC_SID_STRING_BUFLEN];
 365                 wbcSidToStringBuf(&sids[i], str, sizeof(str));
 366                 d_printf("%s\n", str);
 367         }
 368
 369         wbcFreeMemory(sids);
 370
 371         return true;
 372 }
 373
 374 static bool wbinfo_get_userdomgroups(const char *user_sid_str)
 375 {
 376         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 377         uint32_t num_sids;
 378         uint32_t i;
 379         struct wbcDomainSid user_sid, *sids = NULL;
 380
 381         /* Send request */
 382
 383         wbc_status = wbcStringToSid(user_sid_str, &user_sid);
 384         if (!WBC_ERROR_IS_OK(wbc_status)) {
 385                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
 386                           wbcErrorString(wbc_status));
 387                 return false;
 388         }
 389
 390         wbc_status = wbcLookupUserSids(&user_sid, true, &num_sids, &sids);
 391         if (!WBC_ERROR_IS_OK(wbc_status)) {
 392                 d_fprintf(stderr, "failed to call wbcLookupUserSids: %s\n",
 393                           wbcErrorString(wbc_status));
 394                 return false;
 395         }
 396
 397         for (i = 0; i < num_sids; i++) {
 398                 char str[WBC_SID_STRING_BUFLEN];
 399                 wbcSidToStringBuf(&sids[i], str, sizeof(str));
 400                 d_printf("%s\n", str);
 401         }
 402
 403         wbcFreeMemory(sids);
 404
 405         return true;
 406 }
 407
 408 static bool wbinfo_get_sidaliases(const char *domain,
 409                                   const char *user_sid_str)
 410 {
 411         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 412         struct wbcDomainInfo *dinfo = NULL;
 413         uint32_t i;
 414         struct wbcDomainSid user_sid;
 415         uint32_t *alias_rids = NULL;
 416         uint32_t num_alias_rids;
 417         char domain_sid_str[WBC_SID_STRING_BUFLEN];
 418
 419         /* Send request */
 420         if ((domain == NULL) || (strequal(domain, ".")) ||
 421            (domain[0] == '\0')) {
 422                 domain = get_winbind_domain();
 423         }
 424
 425         /* Send request */
 426
 427         wbc_status = wbcDomainInfo(domain, &dinfo);
 428         if (!WBC_ERROR_IS_OK(wbc_status)) {
 429                 d_fprintf(stderr, "wbcDomainInfo(%s) failed: %s\n", domain,
 430                           wbcErrorString(wbc_status));
 431                 goto done;
 432         }
 433         wbc_status = wbcStringToSid(user_sid_str, &user_sid);
 434         if (!WBC_ERROR_IS_OK(wbc_status)) {
 435                 goto done;
 436         }
 437
 438         wbc_status = wbcGetSidAliases(&dinfo->sid, &user_sid, 1,
 439             &alias_rids, &num_alias_rids);
 440         if (!WBC_ERROR_IS_OK(wbc_status)) {
 441                 goto done;
 442         }
 443
 444         wbcSidToStringBuf(&dinfo->sid, domain_sid_str, sizeof(domain_sid_str));
 445
 446         for (i = 0; i < num_alias_rids; i++) {
 447                 d_printf("%s-%d\n", domain_sid_str, alias_rids[i]);
 448         }
 449
 450         wbcFreeMemory(alias_rids);
 451
 452 done:
 453         wbcFreeMemory(dinfo);
 454         return (WBC_ERR_SUCCESS == wbc_status);
 455 }
 456
 457
 458 /* Convert NetBIOS name to IP */
 459
 460 static bool wbinfo_wins_byname(const char *name)
 461 {
 462         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 463         char *ip = NULL;
 464
 465         wbc_status = wbcResolveWinsByName(name, &ip);
 466         if (!WBC_ERROR_IS_OK(wbc_status)) {
 467                 d_fprintf(stderr, "failed to call wbcResolveWinsByName: %s\n",
 468                           wbcErrorString(wbc_status));
 469                 return false;
 470         }
 471
 472         /* Display response */
 473
 474         d_printf("%s\n", ip);
 475
 476         wbcFreeMemory(ip);
 477
 478         return true;
 479 }
 480
 481 /* Convert IP to NetBIOS name */
 482
 483 static bool wbinfo_wins_byip(const char *ip)
 484 {
 485         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 486         char *name = NULL;
 487
 488         wbc_status = wbcResolveWinsByIP(ip, &name);
 489         if (!WBC_ERROR_IS_OK(wbc_status)) {
 490                 d_fprintf(stderr, "failed to call wbcResolveWinsByIP: %s\n",
 491                           wbcErrorString(wbc_status));
 492                 return false;
 493         }
 494
 495         /* Display response */
 496
 497         d_printf("%s\n", name);
 498
 499         wbcFreeMemory(name);
 500
 501         return true;
 502 }
 503
 504 /* List all/trusted domains */
 505
 506 static bool wbinfo_list_domains(bool list_all_domains, bool verbose)
 507 {
 508         struct wbcDomainInfo *domain_list = NULL;
 509         size_t num_domains;
 510         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 511         bool print_all = !list_all_domains && verbose;
 512         int i;
 513
 514         wbc_status = wbcListTrusts(&domain_list, &num_domains);
 515         if (!WBC_ERROR_IS_OK(wbc_status)) {
 516                 d_fprintf(stderr, "failed to call wbcListTrusts: %s\n",
 517                           wbcErrorString(wbc_status));
 518                 return false;
 519         }
 520
 521         if (print_all) {
 522                 d_printf("%-16s%-24s%-12s%-12s%-5s%-5s\n",
 523                          "Domain Name", "DNS Domain", "Trust Type",
 524                          "Transitive", "In", "Out");
 525         }
 526
 527         for (i=0; i<num_domains; i++) {
 528                 if (print_all) {
 529                         d_printf("%-16s", domain_list[i].short_name);
 530                 } else {
 531                         d_printf("%s", domain_list[i].short_name);
 532                         d_printf("\n");
 533                         continue;
 534                 }
 535
 536                 d_printf("%-24s", domain_list[i].dns_name);
 537
 538                 switch(domain_list[i].trust_type) {
 539                 case WBC_DOMINFO_TRUSTTYPE_NONE:
 540                         d_printf("None        ");
 541                         break;
 542                 case WBC_DOMINFO_TRUSTTYPE_FOREST:
 543                         d_printf("Forest      ");
 544                         break;
 545                 case WBC_DOMINFO_TRUSTTYPE_EXTERNAL:
 546                         d_printf("External    ");
 547                         break;
 548                 case WBC_DOMINFO_TRUSTTYPE_IN_FOREST:
 549                         d_printf("In-Forest   ");
 550                         break;
 551                 }
 552
 553                 if (domain_list[i].trust_flags & WBC_DOMINFO_TRUST_TRANSITIVE) {
 554                         d_printf("Yes         ");
 555                 } else {
 556                         d_printf("No          ");
 557                 }
 558
 559                 if (domain_list[i].trust_flags & WBC_DOMINFO_TRUST_INCOMING) {
 560                         d_printf("Yes  ");
 561                 } else {
 562                         d_printf("No   ");
 563                 }
 564
 565                 if (domain_list[i].trust_flags & WBC_DOMINFO_TRUST_OUTGOING) {
 566                         d_printf("Yes  ");
 567                 } else {
 568                         d_printf("No   ");
 569                 }
 570
 571                 d_printf("\n");
 572         }
 573
 574         wbcFreeMemory(domain_list);
 575
 576         return true;
 577 }
 578
 579 /* List own domain */
 580
 581 static bool wbinfo_list_own_domain(void)
 582 {
 583         d_printf("%s\n", get_winbind_domain());
 584
 585         return true;
 586 }
 587
 588 /* show sequence numbers */
 589 static bool wbinfo_show_sequence(const char *domain)
 590 {
 591         d_printf("This command has been deprecated.  Please use the "
 592                  "--online-status option instead.\n");
 593         return false;
 594 }
 595
 596 /* show sequence numbers */
 597 static bool wbinfo_show_onlinestatus(const char *domain)
 598 {
 599         struct wbcDomainInfo *domain_list = NULL;
 600         size_t num_domains;
 601         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 602         int i;
 603
 604         wbc_status = wbcListTrusts(&domain_list, &num_domains);
 605         if (!WBC_ERROR_IS_OK(wbc_status)) {
 606                 d_fprintf(stderr, "failed to call wbcListTrusts: %s\n",
 607                           wbcErrorString(wbc_status));
 608                 return false;
 609         }
 610
 611         for (i=0; i<num_domains; i++) {
 612                 bool is_offline;
 613
 614                 if (domain) {
 615                         if (!strequal(domain_list[i].short_name, domain)) {
 616                                 continue;
 617                         }
 618                 }
 619
 620                 is_offline = (domain_list[i].domain_flags &
 621                               WBC_DOMINFO_DOMAIN_OFFLINE);
 622
 623                 d_printf("%s : %s\n",
 624                          domain_list[i].short_name,
 625                          is_offline ? "offline" : "online" );
 626         }
 627
 628         wbcFreeMemory(domain_list);
 629
 630         return true;
 631 }
 632
 633
 634 /* Show domain info */
 635
 636 static bool wbinfo_domain_info(const char *domain)
 637 {
 638         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 639         struct wbcDomainInfo *dinfo = NULL;
 640         char sid_str[WBC_SID_STRING_BUFLEN];
 641
 642         if ((domain == NULL) || (strequal(domain, ".")) || (domain[0] == '\0')){
 643                 domain = get_winbind_domain();
 644         }
 645
 646         /* Send request */
 647
 648         wbc_status = wbcDomainInfo(domain, &dinfo);
 649         if (!WBC_ERROR_IS_OK(wbc_status)) {
 650                 d_fprintf(stderr, "failed to call wbcDomainInfo: %s\n",
 651                           wbcErrorString(wbc_status));
 652                 return false;
 653         }
 654
 655         wbcSidToStringBuf(&dinfo->sid, sid_str, sizeof(sid_str));
 656
 657         /* Display response */
 658
 659         d_printf("Name              : %s\n", dinfo->short_name);
 660         d_printf("Alt_Name          : %s\n", dinfo->dns_name);
 661
 662         d_printf("SID               : %s\n", sid_str);
 663
 664         d_printf("Active Directory  : %s\n",
 665                  (dinfo->domain_flags & WBC_DOMINFO_DOMAIN_AD) ? "Yes" : "No");
 666         d_printf("Native            : %s\n",
 667                  (dinfo->domain_flags & WBC_DOMINFO_DOMAIN_NATIVE) ?
 668                  "Yes" : "No");
 669
 670         d_printf("Primary           : %s\n",
 671                  (dinfo->domain_flags & WBC_DOMINFO_DOMAIN_PRIMARY) ?
 672                  "Yes" : "No");
 673
 674         wbcFreeMemory(dinfo);
 675
 676         return true;
 677 }
 678
 679 /* Get a foreign DC's name */
 680 static bool wbinfo_getdcname(const char *domain_name)
 681 {
 682         struct winbindd_request request;
 683         struct winbindd_response response;
 684
 685         ZERO_STRUCT(request);
 686         ZERO_STRUCT(response);
 687
 688         fstrcpy(request.domain_name, domain_name);
 689
 690         /* Send request */
 691
 692         if (winbindd_request_response(WINBINDD_GETDCNAME, &request,
 693                                       &response) != NSS_STATUS_SUCCESS) {
 694                 d_fprintf(stderr, "Could not get dc name for %s\n",domain_name);
 695                 return false;
 696         }
 697
 698         /* Display response */
 699
 700         d_printf("%s\n", response.data.dc_name);
 701
 702         return true;
 703 }
 704
 705 /* Find a DC */
 706 static bool wbinfo_dsgetdcname(const char *domain_name, uint32_t flags)
 707 {
 708         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 709         struct wbcDomainControllerInfoEx *dc_info;
 710         char *str = NULL;
 711
 712         wbc_status = wbcLookupDomainControllerEx(domain_name, NULL, NULL,
 713                                                  flags | DS_DIRECTORY_SERVICE_REQUIRED,
 714                                                  &dc_info);
 715         if (!WBC_ERROR_IS_OK(wbc_status)) {
 716                 printf("Could not find dc for %s\n", domain_name);
 717                 return false;
 718         }
 719
 720         wbcGuidToString(dc_info->domain_guid, &str);
 721
 722         d_printf("%s\n", dc_info->dc_unc);
 723         d_printf("%s\n", dc_info->dc_address);
 724         d_printf("%d\n", dc_info->dc_address_type);
 725         d_printf("%s\n", str);
 726         d_printf("%s\n", dc_info->domain_name);
 727         d_printf("%s\n", dc_info->forest_name);
 728         d_printf("0x%08x\n", dc_info->dc_flags);
 729         d_printf("%s\n", dc_info->dc_site_name);
 730         d_printf("%s\n", dc_info->client_site_name);
 731
 732         return true;
 733 }
 734
 735 /* Check trust account password */
 736
 737 static bool wbinfo_check_secret(const char *domain)
 738 {
 739         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 740         struct wbcAuthErrorInfo *error = NULL;
 741         const char *domain_name;
 742
 743         if (domain) {
 744                 domain_name = domain;
 745         } else {
 746                 domain_name = get_winbind_domain();
 747         }
 748
 749         wbc_status = wbcCheckTrustCredentials(domain_name, &error);
 750
 751         d_printf("checking the trust secret for domain %s via RPC calls %s\n",
 752                 domain_name,
 753                 WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
 754
 755         if (wbc_status == WBC_ERR_AUTH_ERROR) {
 756                 d_fprintf(stderr, "error code was %s (0x%x)\n",
 757                           error->nt_string, error->nt_status);
 758                 wbcFreeMemory(error);
 759         }
 760         if (!WBC_ERROR_IS_OK(wbc_status)) {
 761                 d_fprintf(stderr, "failed to call wbcCheckTrustCredentials: "
 762                           "%s\n", wbcErrorString(wbc_status));
 763                 return false;
 764         }
 765
 766         return true;
 767 }
 768
 769 /* Find the currently connected DCs */
 770
 771 static bool wbinfo_dc_info(const char *domain_name)
 772 {
 773         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 774         size_t i, num_dcs;
 775         const char **dc_names, **dc_ips;
 776
 777         wbc_status = wbcDcInfo(domain_name, &num_dcs,
 778                                &dc_names, &dc_ips);
 779         if (!WBC_ERROR_IS_OK(wbc_status)) {
 780                 printf("Could not find dc info %s\n",
 781                        domain_name ? domain_name : "our domain");
 782                 return false;
 783         }
 784
 785         for (i=0; i<num_dcs; i++) {
 786                 printf("%s (%s)\n", dc_names[i], dc_ips[i]);
 787         }
 788         wbcFreeMemory(dc_names);
 789         wbcFreeMemory(dc_ips);
 790
 791         return true;
 792 }
 793
 794 /* Change trust account password */
 795
 796 static bool wbinfo_change_secret(const char *domain)
 797 {
 798         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 799         struct wbcAuthErrorInfo *error = NULL;
 800         const char *domain_name;
 801
 802         if (domain) {
 803                 domain_name = domain;
 804         } else {
 805                 domain_name = get_winbind_domain();
 806         }
 807
 808         wbc_status = wbcChangeTrustCredentials(domain_name, &error);
 809
 810         d_printf("changing the trust secret for domain %s via RPC calls %s\n",
 811                 domain_name,
 812                 WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
 813
 814         if (wbc_status == WBC_ERR_AUTH_ERROR) {
 815                 d_fprintf(stderr, "error code was %s (0x%x)\n",
 816                           error->nt_string, error->nt_status);
 817                 wbcFreeMemory(error);
 818         }
 819         if (!WBC_ERROR_IS_OK(wbc_status)) {
 820                 d_fprintf(stderr, "failed to call wbcChangeTrustCredentials: "
 821                           "%s\n", wbcErrorString(wbc_status));
 822                 return false;
 823         }
 824
 825         return true;
 826 }
 827
 828 /* Check DC connection */
 829
 830 static bool wbinfo_ping_dc(void)
 831 {
 832         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 833         struct wbcAuthErrorInfo *error = NULL;
 834
 835         wbc_status = wbcPingDc(NULL, &error);
 836
 837         d_printf("checking the NETLOGON dc connection %s\n",
 838                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
 839
 840         if (wbc_status == WBC_ERR_AUTH_ERROR) {
 841                 d_fprintf(stderr, "error code was %s (0x%x)\n",
 842                           error->nt_string, error->nt_status);
 843                 wbcFreeMemory(error);
 844         }
 845         if (!WBC_ERROR_IS_OK(wbc_status)) {
 846                 d_fprintf(stderr, "failed to call wbcPingDc: %s\n",
 847                           wbcErrorString(wbc_status));
 848                 return false;
 849         }
 850
 851         return true;
 852 }
 853
 854 /* Convert uid to sid */
 855
 856 static bool wbinfo_uid_to_sid(uid_t uid)
 857 {
 858         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 859         struct wbcDomainSid sid;
 860         char sid_str[WBC_SID_STRING_BUFLEN];
 861
 862         /* Send request */
 863
 864         wbc_status = wbcUidToSid(uid, &sid);
 865         if (!WBC_ERROR_IS_OK(wbc_status)) {
 866                 d_fprintf(stderr, "failed to call wbcUidToSid: %s\n",
 867                           wbcErrorString(wbc_status));
 868                 return false;
 869         }
 870
 871         wbcSidToStringBuf(&sid, sid_str, sizeof(sid_str));
 872
 873         /* Display response */
 874
 875         d_printf("%s\n", sid_str);
 876
 877         return true;
 878 }
 879
 880 /* Convert gid to sid */
 881
 882 static bool wbinfo_gid_to_sid(gid_t gid)
 883 {
 884         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 885         struct wbcDomainSid sid;
 886         char sid_str[WBC_SID_STRING_BUFLEN];
 887
 888         /* Send request */
 889
 890         wbc_status = wbcGidToSid(gid, &sid);
 891         if (!WBC_ERROR_IS_OK(wbc_status)) {
 892                 d_fprintf(stderr, "failed to call wbcGidToSid: %s\n",
 893                           wbcErrorString(wbc_status));
 894                 return false;
 895         }
 896
 897         wbcSidToStringBuf(&sid, sid_str, sizeof(sid_str));
 898
 899         /* Display response */
 900
 901         d_printf("%s\n", sid_str);
 902
 903         return true;
 904 }
 905
 906 /* Convert sid to uid */
 907
 908 static bool wbinfo_sid_to_uid(const char *sid_str)
 909 {
 910         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 911         struct wbcDomainSid sid;
 912         uid_t uid;
 913
 914         /* Send request */
 915
 916         wbc_status = wbcStringToSid(sid_str, &sid);
 917         if (!WBC_ERROR_IS_OK(wbc_status)) {
 918                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
 919                           wbcErrorString(wbc_status));
 920                 return false;
 921         }
 922
 923         wbc_status = wbcSidToUid(&sid, &uid);
 924         if (!WBC_ERROR_IS_OK(wbc_status)) {
 925                 d_fprintf(stderr, "failed to call wbcSidToUid: %s\n",
 926                           wbcErrorString(wbc_status));
 927                 return false;
 928         }
 929
 930         /* Display response */
 931
 932         d_printf("%d\n", (int)uid);
 933
 934         return true;
 935 }
 936
 937 static bool wbinfo_sid_to_gid(const char *sid_str)
 938 {
 939         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
 940         struct wbcDomainSid sid;
 941         gid_t gid;
 942
 943         /* Send request */
 944
 945         wbc_status = wbcStringToSid(sid_str, &sid);
 946         if (!WBC_ERROR_IS_OK(wbc_status)) {
 947                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
 948                           wbcErrorString(wbc_status));
 949                 return false;
 950         }
 951
 952         wbc_status = wbcSidToGid(&sid, &gid);
 953         if (!WBC_ERROR_IS_OK(wbc_status)) {
 954                 d_fprintf(stderr, "failed to call wbcSidToGid: %s\n",
 955                           wbcErrorString(wbc_status));
 956                 return false;
 957         }
 958
 959         /* Display response */
 960
 961         d_printf("%d\n", (int)gid);
 962
 963         return true;
 964 }
 965
 966 static bool wbinfo_sids_to_unix_ids(const char *arg)
 967 {
 968         char sidstr[WBC_SID_STRING_BUFLEN];
 969         struct wbcDomainSid *sids;
 970         struct wbcUnixId *unix_ids;
 971         int i, num_sids;
 972         const char *p;
 973         wbcErr wbc_status;
 974
 975
 976         num_sids = 0;
 977         sids = NULL;
 978         p = arg;
 979
 980         while (next_token(&p, sidstr, LIST_SEP, sizeof(sidstr))) {
 981                 sids = talloc_realloc(talloc_tos(), sids, struct wbcDomainSid,
 982                                       num_sids+1);
 983                 if (sids == NULL) {
 984                         d_fprintf(stderr, "talloc failed\n");
 985                         return false;
 986                 }
 987                 wbc_status = wbcStringToSid(sidstr, &sids[num_sids]);
 988                 if (!WBC_ERROR_IS_OK(wbc_status)) {
 989                         d_fprintf(stderr, "wbcSidToString(%s) failed: %s\n",
 990                                   sidstr, wbcErrorString(wbc_status));
 991                         TALLOC_FREE(sids);
 992                         return false;
 993                 }
 994                 num_sids += 1;
 995         }
 996
 997         unix_ids = talloc_array(talloc_tos(), struct wbcUnixId, num_sids);
 998         if (unix_ids == NULL) {
 999                 TALLOC_FREE(sids);
1000                 return false;
1001         }
1002
1003         wbc_status = wbcSidsToUnixIds(sids, num_sids, unix_ids);
1004         if (!WBC_ERROR_IS_OK(wbc_status)) {
1005                 d_fprintf(stderr, "wbcSidsToUnixIds failed: %s\n",
1006                           wbcErrorString(wbc_status));
1007                 TALLOC_FREE(sids);
1008                 return false;
1009         }
1010
1011         for (i=0; i<num_sids; i++) {
1012
1013                 wbcSidToStringBuf(&sids[i], sidstr, sizeof(sidstr));
1014
1015                 switch(unix_ids[i].type) {
1016                 case WBC_ID_TYPE_UID:
1017                         d_printf("%s -> uid %d\n", sidstr, unix_ids[i].id.uid);
1018                         break;
1019                 case WBC_ID_TYPE_GID:
1020                         d_printf("%s -> gid %d\n", sidstr, unix_ids[i].id.gid);
1021                         break;
1022                 default:
1023                         d_printf("%s -> unmapped\n", sidstr);
1024                         break;
1025                 }
1026         }
1027
1028         TALLOC_FREE(sids);
1029         TALLOC_FREE(unix_ids);
1030
1031         return true;
1032 }
1033
1034 static bool wbinfo_allocate_uid(void)
1035 {
1036         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1037         uid_t uid;
1038
1039         /* Send request */
1040
1041         wbc_status = wbcAllocateUid(&uid);
1042         if (!WBC_ERROR_IS_OK(wbc_status)) {
1043                 d_fprintf(stderr, "failed to call wbcAllocateUid: %s\n",
1044                           wbcErrorString(wbc_status));
1045                 return false;
1046         }
1047
1048         /* Display response */
1049
1050         d_printf("New uid: %u\n", (unsigned int)uid);
1051
1052         return true;
1053 }
1054
1055 static bool wbinfo_allocate_gid(void)
1056 {
1057         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1058         gid_t gid;
1059
1060         /* Send request */
1061
1062         wbc_status = wbcAllocateGid(&gid);
1063         if (!WBC_ERROR_IS_OK(wbc_status)) {
1064                 d_fprintf(stderr, "failed to call wbcAllocateGid: %s\n",
1065                           wbcErrorString(wbc_status));
1066                 return false;
1067         }
1068
1069         /* Display response */
1070
1071         d_printf("New gid: %u\n", (unsigned int)gid);
1072
1073         return true;
1074 }
1075
1076 static bool wbinfo_set_uid_mapping(uid_t uid, const char *sid_str)
1077 {
1078         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1079         struct wbcDomainSid sid;
1080
1081         /* Send request */
1082
1083         wbc_status = wbcStringToSid(sid_str, &sid);
1084         if (!WBC_ERROR_IS_OK(wbc_status)) {
1085                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1086                           wbcErrorString(wbc_status));
1087                 return false;
1088         }
1089
1090         wbc_status = wbcSetUidMapping(uid, &sid);
1091         if (!WBC_ERROR_IS_OK(wbc_status)) {
1092                 d_fprintf(stderr, "failed to call wbcSetUidMapping: %s\n",
1093                           wbcErrorString(wbc_status));
1094                 return false;
1095         }
1096
1097         /* Display response */
1098
1099         d_printf("uid %u now mapped to sid %s\n",
1100                 (unsigned int)uid, sid_str);
1101
1102         return true;
1103 }
1104
1105 static bool wbinfo_set_gid_mapping(gid_t gid, const char *sid_str)
1106 {
1107         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1108         struct wbcDomainSid sid;
1109
1110         /* Send request */
1111
1112         wbc_status = wbcStringToSid(sid_str, &sid);
1113         if (!WBC_ERROR_IS_OK(wbc_status)) {
1114                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1115                           wbcErrorString(wbc_status));
1116                 return false;
1117         }
1118
1119         wbc_status = wbcSetGidMapping(gid, &sid);
1120         if (!WBC_ERROR_IS_OK(wbc_status)) {
1121                 d_fprintf(stderr, "failed to call wbcSetGidMapping: %s\n",
1122                           wbcErrorString(wbc_status));
1123                 return false;
1124         }
1125
1126         /* Display response */
1127
1128         d_printf("gid %u now mapped to sid %s\n",
1129                 (unsigned int)gid, sid_str);
1130
1131         return true;
1132 }
1133
1134 static bool wbinfo_remove_uid_mapping(uid_t uid, const char *sid_str)
1135 {
1136         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1137         struct wbcDomainSid sid;
1138
1139         /* Send request */
1140
1141         wbc_status = wbcStringToSid(sid_str, &sid);
1142         if (!WBC_ERROR_IS_OK(wbc_status)) {
1143                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1144                           wbcErrorString(wbc_status));
1145                 return false;
1146         }
1147
1148         wbc_status = wbcRemoveUidMapping(uid, &sid);
1149         if (!WBC_ERROR_IS_OK(wbc_status)) {
1150                 d_fprintf(stderr, "failed to call wbcRemoveUidMapping: %s\n",
1151                           wbcErrorString(wbc_status));
1152                 return false;
1153         }
1154
1155         /* Display response */
1156
1157         d_printf("Removed uid %u to sid %s mapping\n",
1158                 (unsigned int)uid, sid_str);
1159
1160         return true;
1161 }
1162
1163 static bool wbinfo_remove_gid_mapping(gid_t gid, const char *sid_str)
1164 {
1165         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1166         struct wbcDomainSid sid;
1167
1168         /* Send request */
1169
1170         wbc_status = wbcStringToSid(sid_str, &sid);
1171         if (!WBC_ERROR_IS_OK(wbc_status)) {
1172                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1173                           wbcErrorString(wbc_status));
1174                 return false;
1175         }
1176
1177         wbc_status = wbcRemoveGidMapping(gid, &sid);
1178         if (!WBC_ERROR_IS_OK(wbc_status)) {
1179                 d_fprintf(stderr, "failed to call wbcRemoveGidMapping: %s\n",
1180                           wbcErrorString(wbc_status));
1181                 return false;
1182         }
1183
1184         /* Display response */
1185
1186         d_printf("Removed gid %u to sid %s mapping\n",
1187                 (unsigned int)gid, sid_str);
1188
1189         return true;
1190 }
1191
1192 /* Convert sid to string */
1193
1194 static bool wbinfo_lookupsid(const char *sid_str)
1195 {
1196         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1197         struct wbcDomainSid sid;
1198         char *domain;
1199         char *name;
1200         enum wbcSidType type;
1201
1202         /* Send off request */
1203
1204         wbc_status = wbcStringToSid(sid_str, &sid);
1205         if (!WBC_ERROR_IS_OK(wbc_status)) {
1206                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1207                           wbcErrorString(wbc_status));
1208                 return false;
1209         }
1210
1211         wbc_status = wbcLookupSid(&sid, &domain, &name, &type);
1212         if (!WBC_ERROR_IS_OK(wbc_status)) {
1213                 d_fprintf(stderr, "failed to call wbcLookupSid: %s\n",
1214                           wbcErrorString(wbc_status));
1215                 return false;
1216         }
1217
1218         /* Display response */
1219
1220         d_printf("%s%c%s %d\n",
1221                  domain, winbind_separator(), name, type);
1222
1223         return true;
1224 }
1225
1226 /* Convert sid to fullname */
1227
1228 static bool wbinfo_lookupsid_fullname(const char *sid_str)
1229 {
1230         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1231         struct wbcDomainSid sid;
1232         char *domain;
1233         char *name;
1234         enum wbcSidType type;
1235
1236         /* Send off request */
1237
1238         wbc_status = wbcStringToSid(sid_str, &sid);
1239         if (!WBC_ERROR_IS_OK(wbc_status)) {
1240                 d_fprintf(stderr, "failed to call wbcStringToSid: %s\n",
1241                           wbcErrorString(wbc_status));
1242                 return false;
1243         }
1244
1245         wbc_status = wbcGetDisplayName(&sid, &domain, &name, &type);
1246         if (!WBC_ERROR_IS_OK(wbc_status)) {
1247                 d_fprintf(stderr, "failed to call wbcGetDisplayName: %s\n",
1248                           wbcErrorString(wbc_status));
1249                 return false;
1250         }
1251
1252         /* Display response */
1253
1254         d_printf("%s%c%s %d\n",
1255                  domain, winbind_separator(), name, type);
1256
1257         return true;
1258 }
1259
1260 /* Lookup a list of RIDs */
1261
1262 static bool wbinfo_lookuprids(const char *domain, const char *arg)
1263 {
1264         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1265         struct wbcDomainInfo *dinfo = NULL;
1266         char *domain_name = NULL;
1267         const char **names = NULL;
1268         enum wbcSidType *types = NULL;
1269         size_t i;
1270         int num_rids;
1271         uint32_t *rids = NULL;
1272         const char *p;
1273         char *ridstr;
1274         TALLOC_CTX *mem_ctx = NULL;
1275         bool ret = false;
1276
1277         if ((domain == NULL) || (strequal(domain, ".")) || (domain[0] == '\0')){
1278                 domain = get_winbind_domain();
1279         }
1280
1281         /* Send request */
1282
1283         wbc_status = wbcDomainInfo(domain, &dinfo);
1284         if (!WBC_ERROR_IS_OK(wbc_status)) {
1285                 d_printf("wbcDomainInfo(%s) failed: %s\n", domain,
1286                          wbcErrorString(wbc_status));
1287                 goto done;
1288         }
1289
1290         mem_ctx = talloc_new(NULL);
1291         if (mem_ctx == NULL) {
1292                 d_printf("talloc_new failed\n");
1293                 goto done;
1294         }
1295
1296         num_rids = 0;
1297         rids = NULL;
1298         p = arg;
1299
1300         while (next_token_talloc(mem_ctx, &p, &ridstr, " ,\n")) {
1301                 uint32_t rid = strtoul(ridstr, NULL, 10);
1302                 rids = talloc_realloc(mem_ctx, rids, uint32_t, num_rids + 1);
1303                 if (rids == NULL) {
1304                         d_printf("talloc_realloc failed\n");
1305                 }
1306                 rids[num_rids] = rid;
1307                 num_rids += 1;
1308         }
1309
1310         if (rids == NULL) {
1311                 d_printf("no rids\n");
1312                 goto done;
1313         }
1314
1315         wbc_status = wbcLookupRids(&dinfo->sid, num_rids, rids,
1316                                    (const char **)&domain_name, &names, &types);
1317         if (!WBC_ERROR_IS_OK(wbc_status)) {
1318                 d_printf("winbind_lookup_rids failed: %s\n",
1319                          wbcErrorString(wbc_status));
1320                 goto done;
1321         }
1322
1323         d_printf("Domain: %s\n", domain_name);
1324
1325         for (i=0; i<num_rids; i++) {
1326                 d_printf("%8d: %s (%s)\n", rids[i], names[i],
1327                          wbcSidTypeString(types[i]));
1328         }
1329
1330         ret = true;
1331 done:
1332         wbcFreeMemory(dinfo);
1333         wbcFreeMemory(domain_name);
1334         wbcFreeMemory(names);
1335         wbcFreeMemory(types);
1336         TALLOC_FREE(mem_ctx);
1337         return ret;
1338 }
1339
1340 static bool wbinfo_lookup_sids(const char *arg)
1341 {
1342         char sidstr[WBC_SID_STRING_BUFLEN];
1343         struct wbcDomainSid *sids;
1344         struct wbcDomainInfo *domains;
1345         struct wbcTranslatedName *names;
1346         int num_domains;
1347         int i, num_sids;
1348         const char *p;
1349         wbcErr wbc_status;
1350
1351
1352         num_sids = 0;
1353         sids = NULL;
1354         p = arg;
1355
1356         while (next_token(&p, sidstr, LIST_SEP, sizeof(sidstr))) {
1357                 sids = talloc_realloc(talloc_tos(), sids, struct wbcDomainSid,
1358                                       num_sids+1);
1359                 if (sids == NULL) {
1360                         d_fprintf(stderr, "talloc failed\n");
1361                         return false;
1362                 }
1363                 wbc_status = wbcStringToSid(sidstr, &sids[num_sids]);
1364                 if (!WBC_ERROR_IS_OK(wbc_status)) {
1365                         d_fprintf(stderr, "wbcSidToString(%s) failed: %s\n",
1366                                   sidstr, wbcErrorString(wbc_status));
1367                         TALLOC_FREE(sids);
1368                         return false;
1369                 }
1370                 num_sids += 1;
1371         }
1372
1373         wbc_status = wbcLookupSids(sids, num_sids, &domains, &num_domains,
1374                                    &names);
1375         if (!WBC_ERROR_IS_OK(wbc_status)) {
1376                 d_fprintf(stderr, "wbcLookupSids failed: %s\n",
1377                           wbcErrorString(wbc_status));
1378                 TALLOC_FREE(sids);
1379                 return false;
1380         }
1381
1382         for (i=0; i<num_sids; i++) {
1383                 wbcSidToStringBuf(&sids[i], sidstr, sizeof(sidstr));
1384
1385                 d_printf("%s -> %s\\%s %d\n", sidstr,
1386                          domains[names[i].domain_index].short_name,
1387                          names[i].name, names[i].type);
1388         }
1389         return true;
1390 }
1391
1392 /* Convert string to sid */
1393
1394 static bool wbinfo_lookupname(const char *full_name)
1395 {
1396         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1397         struct wbcDomainSid sid;
1398         char sid_str[WBC_SID_STRING_BUFLEN];
1399         enum wbcSidType type;
1400         fstring domain_name;
1401         fstring account_name;
1402
1403         /* Send off request */
1404
1405         parse_wbinfo_domain_user(full_name, domain_name,
1406                                  account_name);
1407
1408         wbc_status = wbcLookupName(domain_name, account_name,
1409                                    &sid, &type);
1410         if (!WBC_ERROR_IS_OK(wbc_status)) {
1411                 d_fprintf(stderr, "failed to call wbcLookupName: %s\n",
1412                           wbcErrorString(wbc_status));
1413                 return false;
1414         }
1415
1416         wbcSidToStringBuf(&sid, sid_str, sizeof(sid_str));
1417
1418         /* Display response */
1419
1420         d_printf("%s %s (%d)\n", sid_str, wbcSidTypeString(type), type);
1421
1422         return true;
1423 }
1424
1425 static char *wbinfo_prompt_pass(TALLOC_CTX *mem_ctx,
1426                                 const char *prefix,
1427                                 const char *username)
1428 {
1429         char *prompt;
1430         const char *ret = NULL;
1431
1432         prompt = talloc_asprintf(mem_ctx, "Enter %s's ", username);
1433         if (!prompt) {
1434                 return NULL;
1435         }
1436         if (prefix) {
1437                 prompt = talloc_asprintf_append(prompt, "%s ", prefix);
1438                 if (!prompt) {
1439                         return NULL;
1440                 }
1441         }
1442         prompt = talloc_asprintf_append(prompt, "password: ");
1443         if (!prompt) {
1444                 return NULL;
1445         }
1446
1447         ret = getpass(prompt);
1448         TALLOC_FREE(prompt);
1449
1450         return talloc_strdup(mem_ctx, ret);
1451 }
1452
1453 /* Authenticate a user with a plaintext password */
1454
1455 static bool wbinfo_auth_krb5(char *username, const char *cctype, uint32_t flags)
1456 {
1457         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1458         char *s = NULL;
1459         char *p = NULL;
1460         char *password = NULL;
1461         char *name = NULL;
1462         char *local_cctype = NULL;
1463         uid_t uid;
1464         struct wbcLogonUserParams params;
1465         struct wbcLogonUserInfo *info;
1466         struct wbcAuthErrorInfo *error;
1467         struct wbcUserPasswordPolicyInfo *policy;
1468         TALLOC_CTX *frame = talloc_tos();
1469
1470         if ((s = talloc_strdup(frame, username)) == NULL) {
1471                 return false;
1472         }
1473
1474         if ((p = strchr(s, '%')) != NULL) {
1475                 *p = 0;
1476                 p++;
1477                 password = talloc_strdup(frame, p);
1478         } else {
1479                 password = wbinfo_prompt_pass(frame, NULL, username);
1480         }
1481
1482         local_cctype = talloc_strdup(frame, cctype);
1483
1484         name = s;
1485
1486         uid = geteuid();
1487
1488         params.username = name;
1489         params.password = password;
1490         params.num_blobs = 0;
1491         params.blobs = NULL;
1492
1493         wbc_status = wbcAddNamedBlob(&params.num_blobs,
1494                                      &params.blobs,
1495                                      "flags",
1496                                      0,
1497                                      (uint8_t *)&flags,
1498                                      sizeof(flags));
1499         if (!WBC_ERROR_IS_OK(wbc_status)) {
1500                 d_fprintf(stderr, "failed to call wbcAddNamedBlob: %s\n",
1501                           wbcErrorString(wbc_status));
1502                 goto done;
1503         }
1504
1505         wbc_status = wbcAddNamedBlob(&params.num_blobs,
1506                                      &params.blobs,
1507                                      "user_uid",
1508                                      0,
1509                                      (uint8_t *)&uid,
1510                                      sizeof(uid));
1511         if (!WBC_ERROR_IS_OK(wbc_status)) {
1512                 d_fprintf(stderr, "failed to call wbcAddNamedBlob: %s\n",
1513                           wbcErrorString(wbc_status));
1514                 goto done;
1515         }
1516
1517         wbc_status = wbcAddNamedBlob(&params.num_blobs,
1518                                      &params.blobs,
1519                                      "krb5_cc_type",
1520                                      0,
1521                                      (uint8_t *)local_cctype,
1522                                      strlen(cctype)+1);
1523         if (!WBC_ERROR_IS_OK(wbc_status)) {
1524                 d_fprintf(stderr, "failed to call wbcAddNamedBlob: %s\n",
1525                           wbcErrorString(wbc_status));
1526                 goto done;
1527         }
1528
1529         wbc_status = wbcLogonUser(&params, &info, &error, &policy);
1530
1531         d_printf("plaintext kerberos password authentication for [%s] %s "
1532                  "(requesting cctype: %s)\n",
1533                  username, WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed",
1534                  cctype);
1535
1536         if (error) {
1537                 d_fprintf(stderr,
1538                          "error code was %s (0x%x)\nerror message was: %s\n",
1539                          error->nt_string,
1540                          error->nt_status,
1541                          error->display_string);
1542         }
1543
1544         if (WBC_ERROR_IS_OK(wbc_status)) {
1545                 if (flags & WBFLAG_PAM_INFO3_TEXT) {
1546                         if (info && info->info && info->info->user_flags &
1547                             NETLOGON_CACHED_ACCOUNT) {
1548                                 d_printf("user_flgs: "
1549                                          "NETLOGON_CACHED_ACCOUNT\n");
1550                         }
1551                 }
1552
1553                 if (info) {
1554                         int i;
1555                         for (i=0; i < info->num_blobs; i++) {
1556                                 if (strequal(info->blobs[i].name,
1557                                              "krb5ccname")) {
1558                                         d_printf("credentials were put "
1559                                                  "in: %s\n",
1560                                                 (const char *)
1561                                                       info->blobs[i].blob.data);
1562                                         break;
1563                                 }
1564                         }
1565                 } else {
1566                         d_printf("no credentials cached\n");
1567                 }
1568         }
1569  done:
1570
1571         wbcFreeMemory(params.blobs);
1572
1573         return WBC_ERROR_IS_OK(wbc_status);
1574 }
1575
1576 /* Authenticate a user with a plaintext password */
1577
1578 static bool wbinfo_auth(char *username)
1579 {
1580         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1581         char *s = NULL;
1582         char *p = NULL;
1583         char *password = NULL;
1584         char *name = NULL;
1585         TALLOC_CTX *frame = talloc_tos();
1586
1587         if ((s = talloc_strdup(frame, username)) == NULL) {
1588                 return false;
1589         }
1590
1591         if ((p = strchr(s, '%')) != NULL) {
1592                 *p = 0;
1593                 p++;
1594                 password = talloc_strdup(frame, p);
1595         } else {
1596                 password = wbinfo_prompt_pass(frame, NULL, username);
1597         }
1598
1599         name = s;
1600
1601         wbc_status = wbcAuthenticateUser(name, password);
1602
1603         d_printf("plaintext password authentication %s\n",
1604                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1605
1606 #if 0
1607         if (response.data.auth.nt_status)
1608                 d_fprintf(stderr,
1609                          "error code was %s (0x%x)\nerror message was: %s\n",
1610                          response.data.auth.nt_status_string,
1611                          response.data.auth.nt_status,
1612                          response.data.auth.error_string);
1613 #endif
1614
1615         return WBC_ERROR_IS_OK(wbc_status);
1616 }
1617
1618 /* Authenticate a user with a challenge/response */
1619
1620 static bool wbinfo_auth_crap(char *username, bool use_ntlmv2, bool use_lanman)
1621 {
1622         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1623         struct wbcAuthUserParams params;
1624         struct wbcAuthUserInfo *info = NULL;
1625         struct wbcAuthErrorInfo *err = NULL;
1626         DATA_BLOB lm = data_blob_null;
1627         DATA_BLOB nt = data_blob_null;
1628         fstring name_user;
1629         fstring name_domain;
1630         char *pass;
1631         char *p;
1632         TALLOC_CTX *frame = talloc_tos();
1633
1634         p = strchr(username, '%');
1635
1636         if (p) {
1637                 *p = 0;
1638                 pass = talloc_strdup(frame, p + 1);
1639         } else {
1640                 pass = wbinfo_prompt_pass(frame, NULL, username);
1641         }
1642
1643         parse_wbinfo_domain_user(username, name_domain, name_user);
1644
1645         params.account_name     = name_user;
1646         params.domain_name      = name_domain;
1647         params.workstation_name = NULL;
1648
1649         params.flags            = 0;
1650         params.parameter_control= WBC_MSV1_0_ALLOW_WORKSTATION_TRUST_ACCOUNT |
1651                                   WBC_MSV1_0_ALLOW_SERVER_TRUST_ACCOUNT;
1652
1653         params.level            = WBC_AUTH_USER_LEVEL_RESPONSE;
1654
1655         generate_random_buffer(params.password.response.challenge, 8);
1656
1657         if (use_ntlmv2) {
1658                 DATA_BLOB server_chal;
1659                 DATA_BLOB names_blob;
1660
1661                 server_chal = data_blob(params.password.response.challenge, 8);
1662
1663                 /* Pretend this is a login to 'us', for blob purposes */
1664                 names_blob = NTLMv2_generate_names_blob(NULL,
1665                                                 get_winbind_netbios_name(),
1666                                                 get_winbind_domain());
1667
1668                 if (!SMBNTLMv2encrypt(NULL, name_user, name_domain, pass,
1669                                       &server_chal,
1670                                       &names_blob,
1671                                       &lm, &nt, NULL, NULL)) {
1672                         data_blob_free(&names_blob);
1673                         data_blob_free(&server_chal);
1674                         TALLOC_FREE(pass);
1675                         return false;
1676                 }
1677                 data_blob_free(&names_blob);
1678                 data_blob_free(&server_chal);
1679
1680         } else {
1681                 if (use_lanman) {
1682                         bool ok;
1683                         lm = data_blob(NULL, 24);
1684                         ok = SMBencrypt(pass,
1685                                         params.password.response.challenge,
1686                                         lm.data);
1687                         if (!ok) {
1688                                 data_blob_free(&lm);
1689                         }
1690                 }
1691                 nt = data_blob(NULL, 24);
1692                 SMBNTencrypt(pass, params.password.response.challenge,
1693                              nt.data);
1694         }
1695
1696         params.password.response.nt_length      = nt.length;
1697         params.password.response.nt_data        = nt.data;
1698         params.password.response.lm_length      = lm.length;
1699         params.password.response.lm_data        = lm.data;
1700
1701         wbc_status = wbcAuthenticateUserEx(&params, &info, &err);
1702
1703         /* Display response */
1704
1705         d_printf("challenge/response password authentication %s\n",
1706                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1707
1708         if (wbc_status == WBC_ERR_AUTH_ERROR) {
1709                 d_fprintf(stderr,
1710                          "error code was %s (0x%x)\nerror message was: %s\n",
1711                          err->nt_string,
1712                          err->nt_status,
1713                          err->display_string);
1714                 wbcFreeMemory(err);
1715         } else if (WBC_ERROR_IS_OK(wbc_status)) {
1716                 wbcFreeMemory(info);
1717         }
1718
1719         data_blob_free(&nt);
1720         data_blob_free(&lm);
1721
1722         return WBC_ERROR_IS_OK(wbc_status);
1723 }
1724
1725 /* Authenticate a user with a plaintext password */
1726
1727 static bool wbinfo_pam_logon(char *username)
1728 {
1729         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1730         struct wbcLogonUserParams params;
1731         struct wbcAuthErrorInfo *error;
1732         char *s = NULL;
1733         char *p = NULL;
1734         TALLOC_CTX *frame = talloc_tos();
1735         uint32_t flags;
1736         uint32_t uid;
1737
1738         ZERO_STRUCT(params);
1739
1740         if ((s = talloc_strdup(frame, username)) == NULL) {
1741                 return false;
1742         }
1743
1744         if ((p = strchr(s, '%')) != NULL) {
1745                 *p = 0;
1746                 p++;
1747                 params.password = talloc_strdup(frame, p);
1748         } else {
1749                 params.password = wbinfo_prompt_pass(frame, NULL, username);
1750         }
1751         params.username = s;
1752
1753         flags = WBFLAG_PAM_CACHED_LOGIN;
1754
1755         wbc_status = wbcAddNamedBlob(&params.num_blobs, &params.blobs,
1756                                      "flags", 0,
1757                                      (uint8_t *)&flags, sizeof(flags));
1758         if (!WBC_ERROR_IS_OK(wbc_status)) {
1759                 d_printf("wbcAddNamedBlob failed: %s\n",
1760                          wbcErrorString(wbc_status));
1761                 return false;
1762         }
1763
1764         uid = getuid();
1765
1766         wbc_status = wbcAddNamedBlob(&params.num_blobs, &params.blobs,
1767                                      "user_uid", 0,
1768                                      (uint8_t *)&uid, sizeof(uid));
1769         if (!WBC_ERROR_IS_OK(wbc_status)) {
1770                 d_printf("wbcAddNamedBlob failed: %s\n",
1771                          wbcErrorString(wbc_status));
1772                 return false;
1773         }
1774
1775         wbc_status = wbcLogonUser(&params, NULL, &error, NULL);
1776
1777         wbcFreeMemory(params.blobs);
1778
1779         d_printf("plaintext password authentication %s\n",
1780                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1781
1782         if (!WBC_ERROR_IS_OK(wbc_status)) {
1783                 d_fprintf(stderr,
1784                           "error code was %s (0x%x)\nerror message was: %s\n",
1785                           error->nt_string,
1786                           (int)error->nt_status,
1787                           error->display_string);
1788                 wbcFreeMemory(error);
1789                 return false;
1790         }
1791         return true;
1792 }
1793
1794 /* Save creds with winbind */
1795
1796 static bool wbinfo_ccache_save(char *username)
1797 {
1798         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1799         char *s = NULL;
1800         char *p = NULL;
1801         char *password = NULL;
1802         char *name = NULL;
1803         TALLOC_CTX *frame = talloc_stackframe();
1804
1805         s = talloc_strdup(frame, username);
1806         if (s == NULL) {
1807                 return false;
1808         }
1809
1810         p = strchr(s, '%');
1811         if (p != NULL) {
1812                 *p = 0;
1813                 p++;
1814                 password = talloc_strdup(frame, p);
1815         } else {
1816                 password = wbinfo_prompt_pass(frame, NULL, username);
1817         }
1818
1819         name = s;
1820
1821         wbc_status = wbcCredentialSave(name, password);
1822
1823         d_printf("saving creds %s\n",
1824                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1825
1826         TALLOC_FREE(frame);
1827
1828         return WBC_ERROR_IS_OK(wbc_status);
1829 }
1830
1831 #ifdef WITH_FAKE_KASERVER
1832 /* Authenticate a user with a plaintext password and set a token */
1833
1834 static bool wbinfo_klog(char *username)
1835 {
1836         struct winbindd_request request;
1837         struct winbindd_response response;
1838         NSS_STATUS result;
1839         char *p;
1840
1841         /* Send off request */
1842
1843         ZERO_STRUCT(request);
1844         ZERO_STRUCT(response);
1845
1846         p = strchr(username, '%');
1847
1848         if (p) {
1849                 *p = 0;
1850                 fstrcpy(request.data.auth.user, username);
1851                 fstrcpy(request.data.auth.pass, p + 1);
1852                 *p = '%';
1853         } else {
1854                 fstrcpy(request.data.auth.user, username);
1855                 fstrcpy(request.data.auth.pass, getpass("Password: "));
1856         }
1857
1858         request.flags |= WBFLAG_PAM_AFS_TOKEN;
1859
1860         result = winbindd_request_response(WINBINDD_PAM_AUTH, &request,
1861                                            &response);
1862
1863         /* Display response */
1864
1865         d_printf("plaintext password authentication %s\n",
1866                  (result == NSS_STATUS_SUCCESS) ? "succeeded" : "failed");
1867
1868         if (response.data.auth.nt_status)
1869                 d_fprintf(stderr,
1870                          "error code was %s (0x%x)\nerror message was: %s\n",
1871                          response.data.auth.nt_status_string,
1872                          response.data.auth.nt_status,
1873                          response.data.auth.error_string);
1874
1875         if (result != NSS_STATUS_SUCCESS)
1876                 return false;
1877
1878         if (response.extra_data.data == NULL) {
1879                 d_fprintf(stderr, "Did not get token data\n");
1880                 return false;
1881         }
1882
1883         if (!afs_settoken_str((char *)response.extra_data.data)) {
1884                 d_fprintf(stderr, "Could not set token\n");
1885                 return false;
1886         }
1887
1888         d_printf("Successfully created AFS token\n");
1889         return true;
1890 }
1891 #else
1892 static bool wbinfo_klog(char *username)
1893 {
1894         d_fprintf(stderr, "No AFS support compiled in.\n");
1895         return false;
1896 }
1897 #endif
1898
1899 /* Print domain users */
1900
1901 static bool print_domain_users(const char *domain)
1902 {
1903         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1904         uint32_t i;
1905         uint32_t num_users = 0;
1906         const char **users = NULL;
1907
1908         /* Send request to winbind daemon */
1909
1910         /* '.' is the special sign for our own domain */
1911         if (domain && strcmp(domain, ".") == 0) {
1912                 domain = get_winbind_domain();
1913         }
1914
1915         wbc_status = wbcListUsers(domain, &num_users, &users);
1916         if (!WBC_ERROR_IS_OK(wbc_status)) {
1917                 return false;
1918         }
1919
1920         for (i=0; i < num_users; i++) {
1921                 d_printf("%s\n", users[i]);
1922         }
1923
1924         wbcFreeMemory(users);
1925
1926         return true;
1927 }
1928
1929 /* Print domain groups */
1930
1931 static bool print_domain_groups(const char *domain)
1932 {
1933         wbcErr wbc_status = WBC_ERR_UNKNOWN_FAILURE;
1934         uint32_t i;
1935         uint32_t num_groups = 0;
1936         const char **groups = NULL;
1937
1938         /* Send request to winbind daemon */
1939
1940         /* '.' is the special sign for our own domain */
1941         if (domain && strcmp(domain, ".") == 0) {
1942                 domain = get_winbind_domain();
1943         }
1944
1945         wbc_status = wbcListGroups(domain, &num_groups, &groups);
1946         if (!WBC_ERROR_IS_OK(wbc_status)) {
1947                 d_fprintf(stderr, "failed to call wbcListGroups: %s\n",
1948                           wbcErrorString(wbc_status));
1949                 return false;
1950         }
1951
1952         for (i=0; i < num_groups; i++) {
1953                 d_printf("%s\n", groups[i]);
1954         }
1955
1956         wbcFreeMemory(groups);
1957
1958         return true;
1959 }
1960
1961 /* Set the authorised user for winbindd access in secrets.tdb */
1962
1963 static bool wbinfo_set_auth_user(char *username)
1964 {
1965         d_fprintf(stderr, "This functionality was moved to the 'net' utility.\n"
1966                           "See 'net help setauthuser' for details.\n");
1967         return false;
1968 }
1969
1970 static void wbinfo_get_auth_user(void)
1971 {
1972         d_fprintf(stderr, "This functionality was moved to the 'net' utility.\n"
1973                           "See 'net help getauthuser' for details.\n");
1974 }
1975
1976 static bool wbinfo_ping(void)
1977 {
1978         wbcErr wbc_status;
1979
1980         wbc_status = wbcPing();
1981
1982         /* Display response */
1983
1984         d_printf("Ping to winbindd %s\n",
1985                  WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
1986
1987         return WBC_ERROR_IS_OK(wbc_status);
1988 }
1989
1990 static bool wbinfo_change_user_password(const char *username)
1991 {
1992         wbcErr wbc_status;
1993         char *old_password = NULL;
1994         char *new_password = NULL;
1995         TALLOC_CTX *frame = talloc_tos();
1996
1997         old_password = wbinfo_prompt_pass(frame, "old", username);
1998         new_password = wbinfo_prompt_pass(frame, "new", username);
1999
2000         wbc_status = wbcChangeUserPassword(username, old_password,new_password);
2001
2002         /* Display response */
2003
2004         d_printf("Password change for user %s %s\n", username,
2005                 WBC_ERROR_IS_OK(wbc_status) ? "succeeded" : "failed");
2006
2007         return WBC_ERROR_IS_OK(wbc_status);
2008 }
2009
2010 /* Main program */
2011
2012 enum {
2013         OPT_SET_AUTH_USER = 1000,
2014         OPT_GET_AUTH_USER,
2015         OPT_DOMAIN_NAME,
2016         OPT_SEQUENCE,
2017         OPT_GETDCNAME,
2018         OPT_DSGETDCNAME,
2019         OPT_DC_INFO,
2020         OPT_USERDOMGROUPS,
2021         OPT_SIDALIASES,
2022         OPT_USERSIDS,
2023         OPT_LOOKUP_SIDS,
2024         OPT_ALLOCATE_UID,
2025         OPT_ALLOCATE_GID,
2026         OPT_SET_UID_MAPPING,
2027         OPT_SET_GID_MAPPING,
2028         OPT_REMOVE_UID_MAPPING,
2029         OPT_REMOVE_GID_MAPPING,
2030         OPT_SIDS_TO_XIDS,
2031         OPT_SEPARATOR,
2032         OPT_LIST_ALL_DOMAINS,
2033         OPT_LIST_OWN_DOMAIN,
2034         OPT_UID_INFO,
2035         OPT_USER_SIDINFO,
2036         OPT_GROUP_INFO,
2037         OPT_GID_INFO,
2038         OPT_VERBOSE,
2039         OPT_ONLINESTATUS,
2040         OPT_CHANGE_USER_PASSWORD,
2041         OPT_CCACHE_SAVE,
2042         OPT_SID_TO_FULLNAME,
2043         OPT_NTLMV2,
2044         OPT_PAM_LOGON,
2045         OPT_LOGOFF,
2046         OPT_LOGOFF_USER,
2047         OPT_LOGOFF_UID,
2048         OPT_LANMAN
2049 };
2050
2051 int main(int argc, char **argv, char **envp)
2052 {
2053         int opt;
2054         TALLOC_CTX *frame = talloc_stackframe();
2055         poptContext pc;
2056         static char *string_arg;
2057         char *string_subarg = NULL;
2058         static char *opt_domain_name;
2059         static int int_arg;
2060         int int_subarg = -1;
2061         int result = 1;
2062         bool verbose = false;
2063         bool use_ntlmv2 = false;
2064         bool use_lanman = false;
2065         char *logoff_user = getenv("USER");
2066         int logoff_uid = geteuid();
2067
2068         struct poptOption long_options[] = {
2069                 POPT_AUTOHELP
2070
2071                 /* longName, shortName, argInfo, argPtr, value, descrip,
2072                    argDesc */
2073
2074                 { "domain-users", 'u', POPT_ARG_NONE, 0, 'u', "Lists all domain users", "domain"},
2075                 { "domain-groups", 'g', POPT_ARG_NONE, 0, 'g', "Lists all domain groups", "domain" },
2076                 { "WINS-by-name", 'N', POPT_ARG_STRING, &string_arg, 'N', "Converts NetBIOS name to IP", "NETBIOS-NAME" },
2077                 { "WINS-by-ip", 'I', POPT_ARG_STRING, &string_arg, 'I', "Converts IP address to NetBIOS name", "IP" },
2078                 { "name-to-sid", 'n', POPT_ARG_STRING, &string_arg, 'n', "Converts name to sid", "NAME" },
2079                 { "sid-to-name", 's', POPT_ARG_STRING, &string_arg, 's', "Converts sid to name", "SID" },
2080                 { "sid-to-fullname", 0, POPT_ARG_STRING, &string_arg,
2081                   OPT_SID_TO_FULLNAME, "Converts sid to fullname", "SID" },
2082                 { "lookup-rids", 'R', POPT_ARG_STRING, &string_arg, 'R', "Converts RIDs to names", "RIDs" },
2083                 { "lookup-sids", 0, POPT_ARG_STRING, &string_arg,
2084                   OPT_LOOKUP_SIDS, "Converts SIDs to types and names",
2085                   "Sid-List"},
2086                 { "uid-to-sid", 'U', POPT_ARG_INT, &int_arg, 'U', "Converts uid to sid" , "UID" },
2087                 { "gid-to-sid", 'G', POPT_ARG_INT, &int_arg, 'G', "Converts gid to sid", "GID" },
2088                 { "sid-to-uid", 'S', POPT_ARG_STRING, &string_arg, 'S', "Converts sid to uid", "SID" },
2089                 { "sid-to-gid", 'Y', POPT_ARG_STRING, &string_arg, 'Y', "Converts sid to gid", "SID" },
2090                 { "allocate-uid", 0, POPT_ARG_NONE, 0, OPT_ALLOCATE_UID,
2091                   "Get a new UID out of idmap" },
2092                 { "allocate-gid", 0, POPT_ARG_NONE, 0, OPT_ALLOCATE_GID,
2093                   "Get a new GID out of idmap" },
2094                 { "set-uid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_SET_UID_MAPPING, "Create or modify uid to sid mapping in idmap", "UID,SID" },
2095                 { "set-gid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_SET_GID_MAPPING, "Create or modify gid to sid mapping in idmap", "GID,SID" },
2096                 { "remove-uid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_REMOVE_UID_MAPPING, "Remove uid to sid mapping in idmap", "UID,SID" },
2097                 { "remove-gid-mapping", 0, POPT_ARG_STRING, &string_arg, OPT_REMOVE_GID_MAPPING, "Remove gid to sid mapping in idmap", "GID,SID" },
2098                 { "sids-to-unix-ids", 0, POPT_ARG_STRING, &string_arg,
2099                   OPT_SIDS_TO_XIDS, "Translate SIDs to Unix IDs", "Sid-List" },
2100                 { "check-secret", 't', POPT_ARG_NONE, 0, 't', "Check shared secret" },
2101                 { "change-secret", 'c', POPT_ARG_NONE, 0, 'c', "Change shared secret" },
2102                 { "ping-dc", 'P', POPT_ARG_NONE, 0, 'P',
2103                   "Check the NETLOGON connection" },
2104                 { "trusted-domains", 'm', POPT_ARG_NONE, 0, 'm', "List trusted domains" },
2105                 { "all-domains", 0, POPT_ARG_NONE, 0, OPT_LIST_ALL_DOMAINS, "List all domains (trusted and own domain)" },
2106                 { "own-domain", 0, POPT_ARG_NONE, 0, OPT_LIST_OWN_DOMAIN, "List own domain" },
2107                 { "sequence", 0, POPT_ARG_NONE, 0, OPT_SEQUENCE, "Deprecated command, see --online-status" },
2108                 { "online-status", 0, POPT_ARG_NONE, 0, OPT_ONLINESTATUS, "Show whether domains are marked as online or offline"},
2109                 { "domain-info", 'D', POPT_ARG_STRING, &string_arg, 'D', "Show most of the info we have about the domain" },
2110                 { "user-info", 'i', POPT_ARG_STRING, &string_arg, 'i', "Get user info", "USER" },
2111                 { "uid-info", 0, POPT_ARG_INT, &int_arg, OPT_UID_INFO, "Get user info from uid", "UID" },
2112                 { "group-info", 0, POPT_ARG_STRING, &string_arg, OPT_GROUP_INFO, "Get group info", "GROUP" },
2113                 { "user-sidinfo", 0, POPT_ARG_STRING, &string_arg, OPT_USER_SIDINFO, "Get user info from sid", "SID" },
2114                 { "gid-info", 0, POPT_ARG_INT, &int_arg, OPT_GID_INFO, "Get group info from gid", "GID" },
2115                 { "user-groups", 'r', POPT_ARG_STRING, &string_arg, 'r', "Get user groups", "USER" },
2116                 { "user-domgroups", 0, POPT_ARG_STRING, &string_arg,
2117                   OPT_USERDOMGROUPS, "Get user domain groups", "SID" },
2118                 { "sid-aliases", 0, POPT_ARG_STRING, &string_arg, OPT_SIDALIASES, "Get sid aliases", "SID" },
2119                 { "user-sids", 0, POPT_ARG_STRING, &string_arg, OPT_USERSIDS, "Get user group sids for user SID", "SID" },
2120                 { "authenticate", 'a', POPT_ARG_STRING, &string_arg, 'a', "authenticate user", "user%password" },
2121                 { "pam-logon", 0, POPT_ARG_STRING, &string_arg, OPT_PAM_LOGON,
2122                   "do a pam logon equivalent", "user%password" },
2123                 { "logoff", 0, POPT_ARG_NONE, NULL, OPT_LOGOFF,
2124                   "log off user", "uid" },
2125                 { "logoff-user", 0, POPT_ARG_STRING, &logoff_user,
2126                   OPT_LOGOFF_USER, "username to log off" },
2127                 { "logoff-uid", 0, POPT_ARG_INT, &logoff_uid,
2128                   OPT_LOGOFF_UID, "uid to log off" },
2129                 { "set-auth-user", 0, POPT_ARG_STRING, &string_arg, OPT_SET_AUTH_USER, "Store user and password used by winbindd (root only)", "user%password" },
2130                 { "ccache-save", 0, POPT_ARG_STRING, &string_arg,
2131                   OPT_CCACHE_SAVE, "Store user and password for ccache "
2132                   "operation", "user%password" },
2133                 { "getdcname", 0, POPT_ARG_STRING, &string_arg, OPT_GETDCNAME,
2134                   "Get a DC name for a foreign domain", "domainname" },
2135                 { "dsgetdcname", 0, POPT_ARG_STRING, &string_arg, OPT_DSGETDCNAME, "Find a DC for a domain", "domainname" },
2136                 { "dc-info", 0, POPT_ARG_STRING, &string_arg, OPT_DC_INFO,
2137                   "Find the currently known DCs", "domainname" },
2138                 { "get-auth-user", 0, POPT_ARG_NONE, NULL, OPT_GET_AUTH_USER, "Retrieve user and password used by winbindd (root only)", NULL },
2139                 { "ping", 'p', POPT_ARG_NONE, 0, 'p', "Ping winbindd to see if it is alive" },
2140                 { "domain", 0, POPT_ARG_STRING, &opt_domain_name, OPT_DOMAIN_NAME, "Define to the domain to restrict operation", "domain" },
2141 #ifdef WITH_FAKE_KASERVER
2142                 { "klog", 'k', POPT_ARG_STRING, &string_arg, 'k', "set an AFS token from winbind", "user%password" },
2143 #endif
2144 #ifdef HAVE_KRB5
2145                 { "krb5auth", 'K', POPT_ARG_STRING, &string_arg, 'K', "authenticate user using Kerberos", "user%password" },
2146                         /* destroys wbinfo --help output */
2147                         /* "user%password,DOM\\user%password,user@EXAMPLE.COM,EXAMPLE.COM\\user%password" }, */
2148 #endif
2149                 { "separator", 0, POPT_ARG_NONE, 0, OPT_SEPARATOR, "Get the active winbind separator", NULL },
2150                 { "verbose", 0, POPT_ARG_NONE, 0, OPT_VERBOSE, "Print additional information per command", NULL },
2151                 { "change-user-password", 0, POPT_ARG_STRING, &string_arg, OPT_CHANGE_USER_PASSWORD, "Change the password for a user", NULL },
2152                 { "ntlmv2", 0, POPT_ARG_NONE, 0, OPT_NTLMV2, "Use NTLMv2 cryptography for user authentication", NULL},
2153                 { "lanman", 0, POPT_ARG_NONE, 0, OPT_LANMAN, "Use lanman cryptography for user authentication", NULL},
2154                 POPT_COMMON_VERSION
2155                 POPT_TABLEEND
2156         };
2157
2158         /* Samba client initialisation */
2159         load_case_tables();
2160
2161
2162         /* Parse options */
2163
2164         pc = poptGetContext("wbinfo", argc, (const char **)argv,
2165                             long_options, 0);
2166
2167         /* Parse command line options */
2168
2169         if (argc == 1) {
2170                 poptPrintHelp(pc, stderr, 0);
2171                 return 1;
2172         }
2173
2174         while((opt = poptGetNextOpt(pc)) != -1) {
2175                 /* get the generic configuration parameters like --domain */
2176                 switch (opt) {
2177                 case OPT_VERBOSE:
2178                         verbose = true;
2179                         break;
2180                 case OPT_NTLMV2:
2181                         use_ntlmv2 = true;
2182                         break;
2183                 case OPT_LANMAN:
2184                         use_lanman = true;
2185                         break;
2186                 }
2187         }
2188
2189         poptFreeContext(pc);
2190
2191         pc = poptGetContext(NULL, argc, (const char **)argv, long_options,
2192                             POPT_CONTEXT_KEEP_FIRST);
2193
2194         while((opt = poptGetNextOpt(pc)) != -1) {
2195                 switch (opt) {
2196                 case 'u':
2197                         if (!print_domain_users(opt_domain_name)) {
2198                                 d_fprintf(stderr,
2199                                           "Error looking up domain users\n");
2200                                 goto done;
2201                         }
2202                         break;
2203                 case 'g':
2204                         if (!print_domain_groups(opt_domain_name)) {
2205                                 d_fprintf(stderr,
2206                                           "Error looking up domain groups\n");
2207                                 goto done;
2208                         }
2209                         break;
2210                 case 's':
2211                         if (!wbinfo_lookupsid(string_arg)) {
2212                                 d_fprintf(stderr,
2213                                           "Could not lookup sid %s\n",
2214                                           string_arg);
2215                                 goto done;
2216                         }
2217                         break;
2218                 case OPT_SID_TO_FULLNAME:
2219                         if (!wbinfo_lookupsid_fullname(string_arg)) {
2220                                 d_fprintf(stderr, "Could not lookup sid %s\n",
2221                                           string_arg);
2222                                 goto done;
2223                         }
2224                         break;
2225                 case 'R':
2226                         if (!wbinfo_lookuprids(opt_domain_name, string_arg)) {
2227                                 d_fprintf(stderr, "Could not lookup RIDs %s\n",
2228                                           string_arg);
2229                                 goto done;
2230                         }
2231                         break;
2232                 case OPT_LOOKUP_SIDS:
2233                         if (!wbinfo_lookup_sids(string_arg)) {
2234                                 d_fprintf(stderr, "Could not lookup SIDs %s\n",
2235                                           string_arg);
2236                                 goto done;
2237                         }
2238                         break;
2239                 case 'n':
2240                         if (!wbinfo_lookupname(string_arg)) {
2241                                 d_fprintf(stderr, "Could not lookup name %s\n",
2242                                           string_arg);
2243                                 goto done;
2244                         }
2245                         break;
2246                 case 'N':
2247                         if (!wbinfo_wins_byname(string_arg)) {
2248                                 d_fprintf(stderr,
2249                                           "Could not lookup WINS by name %s\n",
2250                                           string_arg);
2251                                 goto done;
2252                         }
2253                         break;
2254                 case 'I':
2255                         if (!wbinfo_wins_byip(string_arg)) {
2256                                 d_fprintf(stderr,
2257                                           "Could not lookup WINS by IP %s\n",
2258                                           string_arg);
2259                                 goto done;
2260                         }
2261                         break;
2262                 case 'U':
2263                         if (!wbinfo_uid_to_sid(int_arg)) {
2264                                 d_fprintf(stderr,
2265                                           "Could not convert uid %d to sid\n",
2266                                           int_arg);
2267                                 goto done;
2268                         }
2269                         break;
2270                 case 'G':
2271                         if (!wbinfo_gid_to_sid(int_arg)) {
2272                                 d_fprintf(stderr,
2273                                           "Could not convert gid %d to sid\n",
2274                                           int_arg);
2275                                 goto done;
2276                         }
2277                         break;
2278                 case 'S':
2279                         if (!wbinfo_sid_to_uid(string_arg)) {
2280                                 d_fprintf(stderr,
2281                                           "Could not convert sid %s to uid\n",
2282                                           string_arg);
2283                                 goto done;
2284                         }
2285                         break;
2286                 case 'Y':
2287                         if (!wbinfo_sid_to_gid(string_arg)) {
2288                                 d_fprintf(stderr,
2289                                           "Could not convert sid %s to gid\n",
2290                                           string_arg);
2291                                 goto done;
2292                         }
2293                         break;
2294                 case OPT_ALLOCATE_UID:
2295                         if (!wbinfo_allocate_uid()) {
2296                                 d_fprintf(stderr, "Could not allocate a uid\n");
2297                                 goto done;
2298                         }
2299                         break;
2300                 case OPT_ALLOCATE_GID:
2301                         if (!wbinfo_allocate_gid()) {
2302                                 d_fprintf(stderr, "Could not allocate a gid\n");
2303                                 goto done;
2304                         }
2305                         break;
2306                 case OPT_SET_UID_MAPPING:
2307                         if (!parse_mapping_arg(string_arg, &int_subarg,
2308                                 &string_subarg) ||
2309                             !wbinfo_set_uid_mapping(int_subarg, string_subarg))
2310                         {
2311                                 d_fprintf(stderr, "Could not create or modify "
2312                                           "uid to sid mapping\n");
2313                                 goto done;
2314                         }
2315                         break;
2316                 case OPT_SET_GID_MAPPING:
2317                         if (!parse_mapping_arg(string_arg, &int_subarg,
2318                                 &string_subarg) ||
2319                             !wbinfo_set_gid_mapping(int_subarg, string_subarg))
2320                         {
2321                                 d_fprintf(stderr, "Could not create or modify "
2322                                           "gid to sid mapping\n");
2323                                 goto done;
2324                         }
2325                         break;
2326                 case OPT_REMOVE_UID_MAPPING:
2327                         if (!parse_mapping_arg(string_arg, &int_subarg,
2328                                 &string_subarg) ||
2329                             !wbinfo_remove_uid_mapping(int_subarg,
2330                                 string_subarg))
2331                         {
2332                                 d_fprintf(stderr, "Could not remove uid to sid "
2333                                     "mapping\n");
2334                                 goto done;
2335                         }
2336                         break;
2337                 case OPT_REMOVE_GID_MAPPING:
2338                         if (!parse_mapping_arg(string_arg, &int_subarg,
2339                                 &string_subarg) ||
2340                             !wbinfo_remove_gid_mapping(int_subarg,
2341                                 string_subarg))
2342                         {
2343                                 d_fprintf(stderr, "Could not remove gid to sid "
2344                                     "mapping\n");
2345                                 goto done;
2346                         }
2347                         break;
2348                 case OPT_SIDS_TO_XIDS:
2349                         if (!wbinfo_sids_to_unix_ids(string_arg)) {
2350                                 d_fprintf(stderr, "wbinfo_sids_to_unix_ids "
2351                                           "failed\n");
2352                                 goto done;
2353                         }
2354                         break;
2355                 case 't':
2356                         if (!wbinfo_check_secret(opt_domain_name)) {
2357                                 d_fprintf(stderr, "Could not check secret\n");
2358                                 goto done;
2359                         }
2360                         break;
2361                 case 'c':
2362                         if (!wbinfo_change_secret(opt_domain_name)) {
2363                                 d_fprintf(stderr, "Could not change secret\n");
2364                                 goto done;
2365                         }
2366                         break;
2367                 case 'P':
2368                         if (!wbinfo_ping_dc()) {
2369                                 d_fprintf(stderr, "Could not ping our DC\n");
2370                                 goto done;
2371                         }
2372                         break;
2373                 case 'm':
2374                         if (!wbinfo_list_domains(false, verbose)) {
2375                                 d_fprintf(stderr,
2376                                           "Could not list trusted domains\n");
2377                                 goto done;
2378                         }
2379                         break;
2380                 case OPT_SEQUENCE:
2381                         if (!wbinfo_show_sequence(opt_domain_name)) {
2382                                 d_fprintf(stderr,
2383                                           "Could not show sequence numbers\n");
2384                                 goto done;
2385                         }
2386                         break;
2387                 case OPT_ONLINESTATUS:
2388                         if (!wbinfo_show_onlinestatus(opt_domain_name)) {
2389                                 d_fprintf(stderr,
2390                                           "Could not show online-status\n");
2391                                 goto done;
2392                         }
2393                         break;
2394                 case 'D':
2395                         if (!wbinfo_domain_info(string_arg)) {
2396                                 d_fprintf(stderr,
2397                                           "Could not get domain info\n");
2398                                 goto done;
2399                         }
2400                         break;
2401                 case 'i':
2402                         if (!wbinfo_get_userinfo(string_arg)) {
2403                                 d_fprintf(stderr,
2404                                           "Could not get info for user %s\n",
2405                                           string_arg);
2406                                 goto done;
2407                         }
2408                         break;
2409                 case OPT_USER_SIDINFO:
2410                         if ( !wbinfo_get_user_sidinfo(string_arg)) {
2411                                 d_fprintf(stderr,
2412                                           "Could not get info for user "
2413                                           "sid %s\n", string_arg);
2414                                 goto done;
2415                         }
2416                         break;
2417                 case OPT_UID_INFO:
2418                         if ( !wbinfo_get_uidinfo(int_arg)) {
2419                                 d_fprintf(stderr, "Could not get info for uid "
2420                                                 "%d\n", int_arg);
2421                                 goto done;
2422                         }
2423                         break;
2424                 case OPT_GROUP_INFO:
2425                         if ( !wbinfo_get_groupinfo(string_arg)) {
2426                                 d_fprintf(stderr, "Could not get info for "
2427                                           "group %s\n", string_arg);
2428                                 goto done;
2429                         }
2430                         break;
2431                 case OPT_GID_INFO:
2432                         if ( !wbinfo_get_gidinfo(int_arg)) {
2433                                 d_fprintf(stderr, "Could not get info for gid "
2434                                                 "%d\n", int_arg);
2435                                 goto done;
2436                         }
2437                         break;
2438                 case 'r':
2439                         if (!wbinfo_get_usergroups(string_arg)) {
2440                                 d_fprintf(stderr,
2441                                           "Could not get groups for user %s\n",
2442                                           string_arg);
2443                                 goto done;
2444                         }
2445                         break;
2446                 case OPT_USERSIDS:
2447                         if (!wbinfo_get_usersids(string_arg)) {
2448                                 d_fprintf(stderr, "Could not get group SIDs "
2449                                           "for user SID %s\n",
2450                                           string_arg);
2451                                 goto done;
2452                         }
2453                         break;
2454                 case OPT_USERDOMGROUPS:
2455                         if (!wbinfo_get_userdomgroups(string_arg)) {
2456                                 d_fprintf(stderr, "Could not get user's domain "
2457                                          "groups for user SID %s\n",
2458                                          string_arg);
2459                                 goto done;
2460                         }
2461                         break;
2462                 case OPT_SIDALIASES:
2463                         if (!wbinfo_get_sidaliases(opt_domain_name,
2464                                                    string_arg)) {
2465                                 d_fprintf(stderr, "Could not get sid aliases "
2466                                          "for user SID %s\n", string_arg);
2467                                 goto done;
2468                         }
2469                         break;
2470                 case 'a': {
2471                                 bool got_error = false;
2472
2473                                 if (!wbinfo_auth(string_arg)) {
2474                                         d_fprintf(stderr,
2475                                                   "Could not authenticate user "
2476                                                   "%s with plaintext "
2477                                                   "password\n", string_arg);
2478                                         got_error = true;
2479                                 }
2480
2481                                 if (!wbinfo_auth_crap(string_arg, use_ntlmv2,
2482                                                       use_lanman)) {
2483                                         d_fprintf(stderr,
2484                                                 "Could not authenticate user "
2485                                                 "%s with challenge/response\n",
2486                                                 string_arg);
2487                                         got_error = true;
2488                                 }
2489
2490                                 if (got_error)
2491                                         goto done;
2492                                 break;
2493                         }
2494                 case OPT_PAM_LOGON:
2495                         if (!wbinfo_pam_logon(string_arg)) {
2496                                 d_fprintf(stderr, "pam_logon failed for %s\n",
2497                                           string_arg);
2498                                 goto done;
2499                         }
2500                         break;
2501                 case OPT_LOGOFF:
2502                 {
2503                         wbcErr wbc_status;
2504
2505                         wbc_status = wbcLogoffUser(logoff_user, logoff_uid,
2506                                                    "");
2507                         d_printf("Logoff %s (%d): %s\n", logoff_user,
2508                                  logoff_uid, wbcErrorString(wbc_status));
2509                         break;
2510                 }
2511                 case 'K': {
2512                                 uint32_t flags = WBFLAG_PAM_KRB5 |
2513                                                  WBFLAG_PAM_CACHED_LOGIN |
2514                                                 WBFLAG_PAM_FALLBACK_AFTER_KRB5 |
2515                                                  WBFLAG_PAM_INFO3_TEXT |
2516                                                  WBFLAG_PAM_CONTACT_TRUSTDOM;
2517
2518                                 if (!wbinfo_auth_krb5(string_arg, "FILE",
2519                                                       flags)) {
2520                                         d_fprintf(stderr,
2521                                                 "Could not authenticate user "
2522                                                 "[%s] with Kerberos "
2523                                                 "(ccache: %s)\n", string_arg,
2524                                                 "FILE");
2525                                         goto done;
2526                                 }
2527                                 break;
2528                         }
2529                 case 'k':
2530                         if (!wbinfo_klog(string_arg)) {
2531                                 d_fprintf(stderr, "Could not klog user\n");
2532                                 goto done;
2533                         }
2534                         break;
2535                 case 'p':
2536                         if (!wbinfo_ping()) {
2537                                 d_fprintf(stderr, "could not ping winbindd!\n");
2538                                 goto done;
2539                         }
2540                         break;
2541                 case OPT_SET_AUTH_USER:
2542                         if (!wbinfo_set_auth_user(string_arg)) {
2543                                 goto done;
2544                         }
2545                         break;
2546                 case OPT_GET_AUTH_USER:
2547                         wbinfo_get_auth_user();
2548                         goto done;
2549                         break;
2550                 case OPT_CCACHE_SAVE:
2551                         if (!wbinfo_ccache_save(string_arg)) {
2552                                 goto done;
2553                         }
2554                         break;
2555                 case OPT_GETDCNAME:
2556                         if (!wbinfo_getdcname(string_arg)) {
2557                                 goto done;
2558                         }
2559                         break;
2560                 case OPT_DSGETDCNAME:
2561                         if (!wbinfo_dsgetdcname(string_arg, 0)) {
2562                                 goto done;
2563                         }
2564                         break;
2565                 case OPT_DC_INFO:
2566                         if (!wbinfo_dc_info(string_arg)) {
2567                                 goto done;
2568                         }
2569                         break;
2570                 case OPT_SEPARATOR: {
2571                         const char sep = winbind_separator();
2572                         if ( !sep ) {
2573                                 goto done;
2574                         }
2575                         d_printf("%c\n", sep);
2576                         break;
2577                 }
2578                 case OPT_LIST_ALL_DOMAINS:
2579                         if (!wbinfo_list_domains(true, verbose)) {
2580                                 goto done;
2581                         }
2582                         break;
2583                 case OPT_LIST_OWN_DOMAIN:
2584                         if (!wbinfo_list_own_domain()) {
2585                                 goto done;
2586                         }
2587                         break;
2588                 case OPT_CHANGE_USER_PASSWORD:
2589                         if (!wbinfo_change_user_password(string_arg)) {
2590                                 d_fprintf(stderr,
2591                                         "Could not change user password "
2592                                          "for user %s\n", string_arg);
2593                                 goto done;
2594                         }
2595                         break;
2596
2597                 /* generic configuration options */
2598                 case OPT_DOMAIN_NAME:
2599                 case OPT_VERBOSE:
2600                 case OPT_NTLMV2:
2601                 case OPT_LANMAN:
2602                 case OPT_LOGOFF_USER:
2603                 case OPT_LOGOFF_UID:
2604                         break;
2605                 default:
2606                         d_fprintf(stderr, "Invalid option\n");
2607                         poptPrintHelp(pc, stderr, 0);
2608                         goto done;
2609                 }
2610         }
2611
2612         result = 0;
2613
2614         /* Exit code */
2615
2616  done:
2617         talloc_free(frame);
2618
2619         poptFreeContext(pc);
2620         return result;
2621 }