source/libnet/libnet_join.c

   1 /*
   2  *  Unix SMB/CIFS implementation.
   3  *  libnet Join Support
   4  *  Copyright (C) Gerald (Jerry) Carter 2006
   5  *  Copyright (C) Guenther Deschner 2007-2008
   6  *
   7  *  This program is free software; you can redistribute it and/or modify
   8  *  it under the terms of the GNU General Public License as published by
   9  *  the Free Software Foundation; either version 3 of the License, or
  10  *  (at your option) any later version.
  11  *
  12  *  This program is distributed in the hope that it will be useful,
  13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *  GNU General Public License for more details.
  16  *
  17  *  You should have received a copy of the GNU General Public License
  18  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
  19  */
  20
  21 #include "includes.h"
  22 #include "libnet/libnet.h"
  23
  24 /****************************************************************
  25 ****************************************************************/
  26
  27 #define LIBNET_JOIN_DUMP_CTX(ctx, r, f) \
  28         do { \
  29                 char *str = NULL; \
  30                 str = NDR_PRINT_FUNCTION_STRING(ctx, libnet_JoinCtx, f, r); \
  31                 DEBUG(1,("libnet_Join:\n%s", str)); \
  32                 talloc_free(str); \
  33         } while (0)
  34
  35 #define LIBNET_JOIN_IN_DUMP_CTX(ctx, r) \
  36         LIBNET_JOIN_DUMP_CTX(ctx, r, NDR_IN | NDR_SET_VALUES)
  37 #define LIBNET_JOIN_OUT_DUMP_CTX(ctx, r) \
  38         LIBNET_JOIN_DUMP_CTX(ctx, r, NDR_OUT)
  39
  40 #define LIBNET_UNJOIN_DUMP_CTX(ctx, r, f) \
  41         do { \
  42                 char *str = NULL; \
  43                 str = NDR_PRINT_FUNCTION_STRING(ctx, libnet_UnjoinCtx, f, r); \
  44                 DEBUG(1,("libnet_Unjoin:\n%s", str)); \
  45                 talloc_free(str); \
  46         } while (0)
  47
  48 #define LIBNET_UNJOIN_IN_DUMP_CTX(ctx, r) \
  49         LIBNET_UNJOIN_DUMP_CTX(ctx, r, NDR_IN | NDR_SET_VALUES)
  50 #define LIBNET_UNJOIN_OUT_DUMP_CTX(ctx, r) \
  51         LIBNET_UNJOIN_DUMP_CTX(ctx, r, NDR_OUT)
  52
  53 /****************************************************************
  54 ****************************************************************/
  55
  56 static void libnet_join_set_error_string(TALLOC_CTX *mem_ctx,
  57                                          struct libnet_JoinCtx *r,
  58                                          const char *format, ...)
  59 {
  60         va_list args;
  61
  62         if (r->out.error_string) {
  63                 return;
  64         }
  65
  66         va_start(args, format);
  67         r->out.error_string = talloc_vasprintf(mem_ctx, format, args);
  68         va_end(args);
  69 }
  70
  71 /****************************************************************
  72 ****************************************************************/
  73
  74 static void libnet_unjoin_set_error_string(TALLOC_CTX *mem_ctx,
  75                                            struct libnet_UnjoinCtx *r,
  76                                            const char *format, ...)
  77 {
  78         va_list args;
  79
  80         if (r->out.error_string) {
  81                 return;
  82         }
  83
  84         va_start(args, format);
  85         r->out.error_string = talloc_vasprintf(mem_ctx, format, args);
  86         va_end(args);
  87 }
  88
  89 #ifdef WITH_ADS
  90
  91 /****************************************************************
  92 ****************************************************************/
  93
  94 static ADS_STATUS libnet_connect_ads(const char *dns_domain_name,
  95                                      const char *netbios_domain_name,
  96                                      const char *dc_name,
  97                                      const char *user_name,
  98                                      const char *password,
  99                                      ADS_STRUCT **ads)
 100 {
 101         ADS_STATUS status;
 102         ADS_STRUCT *my_ads = NULL;
 103
 104         my_ads = ads_init(dns_domain_name,
 105                           netbios_domain_name,
 106                           dc_name);
 107         if (!my_ads) {
 108                 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 109         }
 110
 111         if (user_name) {
 112                 SAFE_FREE(my_ads->auth.user_name);
 113                 my_ads->auth.user_name = SMB_STRDUP(user_name);
 114         }
 115
 116         if (password) {
 117                 SAFE_FREE(my_ads->auth.password);
 118                 my_ads->auth.password = SMB_STRDUP(password);
 119         }
 120
 121         status = ads_connect(my_ads);
 122         if (!ADS_ERR_OK(status)) {
 123                 ads_destroy(&my_ads);
 124                 return status;
 125         }
 126
 127         *ads = my_ads;
 128         return ADS_SUCCESS;
 129 }
 130
 131 /****************************************************************
 132 ****************************************************************/
 133
 134 static ADS_STATUS libnet_join_connect_ads(TALLOC_CTX *mem_ctx,
 135                                           struct libnet_JoinCtx *r)
 136 {
 137         ADS_STATUS status;
 138
 139         status = libnet_connect_ads(r->in.domain_name,
 140                                     r->in.domain_name,
 141                                     r->in.dc_name,
 142                                     r->in.admin_account,
 143                                     r->in.admin_password,
 144                                     &r->in.ads);
 145         if (!ADS_ERR_OK(status)) {
 146                 libnet_join_set_error_string(mem_ctx, r,
 147                         "failed to connect to AD: %s",
 148                         ads_errstr(status));
 149         }
 150
 151         return status;
 152 }
 153
 154 /****************************************************************
 155 ****************************************************************/
 156
 157 static ADS_STATUS libnet_unjoin_connect_ads(TALLOC_CTX *mem_ctx,
 158                                             struct libnet_UnjoinCtx *r)
 159 {
 160         ADS_STATUS status;
 161
 162         status = libnet_connect_ads(r->in.domain_name,
 163                                     r->in.domain_name,
 164                                     r->in.dc_name,
 165                                     r->in.admin_account,
 166                                     r->in.admin_password,
 167                                     &r->in.ads);
 168         if (!ADS_ERR_OK(status)) {
 169                 libnet_unjoin_set_error_string(mem_ctx, r,
 170                         "failed to connect to AD: %s",
 171                         ads_errstr(status));
 172         }
 173
 174         return status;
 175 }
 176
 177 /****************************************************************
 178 ****************************************************************/
 179
 180 static ADS_STATUS libnet_join_precreate_machine_acct(TALLOC_CTX *mem_ctx,
 181                                                      struct libnet_JoinCtx *r)
 182 {
 183         ADS_STATUS status;
 184         LDAPMessage *res = NULL;
 185         const char *attrs[] = { "dn", NULL };
 186
 187         status = ads_search_dn(r->in.ads, &res, r->in.account_ou, attrs);
 188         if (!ADS_ERR_OK(status)) {
 189                 return status;
 190         }
 191
 192         if (ads_count_replies(r->in.ads, res) != 1) {
 193                 ads_msgfree(r->in.ads, res);
 194                 return ADS_ERROR_LDAP(LDAP_NO_SUCH_OBJECT);
 195         }
 196
 197         status = ads_create_machine_acct(r->in.ads,
 198                                          r->in.machine_name,
 199                                          r->in.account_ou);
 200         ads_msgfree(r->in.ads, res);
 201
 202         if ((status.error_type == ENUM_ADS_ERROR_LDAP) &&
 203             (status.err.rc == LDAP_ALREADY_EXISTS)) {
 204                 status = ADS_SUCCESS;
 205         }
 206
 207         return status;
 208 }
 209
 210 /****************************************************************
 211 ****************************************************************/
 212
 213 static ADS_STATUS libnet_unjoin_remove_machine_acct(TALLOC_CTX *mem_ctx,
 214                                                     struct libnet_UnjoinCtx *r)
 215 {
 216         ADS_STATUS status;
 217
 218         if (!r->in.ads) {
 219                 status = libnet_unjoin_connect_ads(mem_ctx, r);
 220                 if (!ADS_ERR_OK(status)) {
 221                         return status;
 222                 }
 223         }
 224
 225         status = ads_leave_realm(r->in.ads, r->in.machine_name);
 226         if (!ADS_ERR_OK(status)) {
 227                 libnet_unjoin_set_error_string(mem_ctx, r,
 228                         "failed to leave realm: %s",
 229                         ads_errstr(status));
 230                 return status;
 231         }
 232
 233         return ADS_SUCCESS;
 234 }
 235
 236 /****************************************************************
 237 ****************************************************************/
 238
 239 static ADS_STATUS libnet_join_find_machine_acct(TALLOC_CTX *mem_ctx,
 240                                                 struct libnet_JoinCtx *r)
 241 {
 242         ADS_STATUS status;
 243         LDAPMessage *res = NULL;
 244         char *dn = NULL;
 245
 246         if (!r->in.machine_name) {
 247                 return ADS_ERROR(LDAP_NO_MEMORY);
 248         }
 249
 250         status = ads_find_machine_acct(r->in.ads,
 251                                        &res,
 252                                        r->in.machine_name);
 253         if (!ADS_ERR_OK(status)) {
 254                 return status;
 255         }
 256
 257         if (ads_count_replies(r->in.ads, res) != 1) {
 258                 status = ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 259                 goto done;
 260         }
 261
 262         dn = ads_get_dn(r->in.ads, res);
 263         if (!dn) {
 264                 status = ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 265                 goto done;
 266         }
 267
 268         r->out.dn = talloc_strdup(mem_ctx, dn);
 269         if (!r->out.dn) {
 270                 status = ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 271                 goto done;
 272         }
 273
 274  done:
 275         ads_msgfree(r->in.ads, res);
 276         ads_memfree(r->in.ads, dn);
 277
 278         return status;
 279 }
 280
 281 /****************************************************************
 282 ****************************************************************/
 283
 284 static ADS_STATUS libnet_join_set_machine_spn(TALLOC_CTX *mem_ctx,
 285                                               struct libnet_JoinCtx *r)
 286 {
 287         ADS_STATUS status;
 288         ADS_MODLIST mods;
 289         fstring my_fqdn;
 290         const char *spn_array[3] = {NULL, NULL, NULL};
 291         char *spn = NULL;
 292
 293         if (!r->in.ads) {
 294                 status = libnet_join_connect_ads(mem_ctx, r);
 295                 if (!ADS_ERR_OK(status)) {
 296                         return status;
 297                 }
 298         }
 299
 300         status = libnet_join_find_machine_acct(mem_ctx, r);
 301         if (!ADS_ERR_OK(status)) {
 302                 return status;
 303         }
 304
 305         spn = talloc_asprintf(mem_ctx, "HOST/%s", r->in.machine_name);
 306         if (!spn) {
 307                 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 308         }
 309         strupper_m(spn);
 310         spn_array[0] = spn;
 311
 312         if (name_to_fqdn(my_fqdn, r->in.machine_name) &&
 313             !strequal(my_fqdn, r->in.machine_name)) {
 314
 315                 strlower_m(my_fqdn);
 316                 spn = talloc_asprintf(mem_ctx, "HOST/%s", my_fqdn);
 317                 if (!spn) {
 318                         return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 319                 }
 320                 spn_array[1] = spn;
 321         }
 322
 323         mods = ads_init_mods(mem_ctx);
 324         if (!mods) {
 325                 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 326         }
 327
 328         status = ads_mod_str(mem_ctx, &mods, "dNSHostName", my_fqdn);
 329         if (!ADS_ERR_OK(status)) {
 330                 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 331         }
 332
 333         status = ads_mod_strlist(mem_ctx, &mods, "servicePrincipalName",
 334                                  spn_array);
 335         if (!ADS_ERR_OK(status)) {
 336                 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 337         }
 338
 339         return ads_gen_mod(r->in.ads, r->out.dn, mods);
 340 }
 341
 342 /****************************************************************
 343 ****************************************************************/
 344
 345 static ADS_STATUS libnet_join_set_machine_upn(TALLOC_CTX *mem_ctx,
 346                                               struct libnet_JoinCtx *r)
 347 {
 348         ADS_STATUS status;
 349         ADS_MODLIST mods;
 350
 351         if (!r->in.create_upn) {
 352                 return ADS_SUCCESS;
 353         }
 354
 355         if (!r->in.ads) {
 356                 status = libnet_join_connect_ads(mem_ctx, r);
 357                 if (!ADS_ERR_OK(status)) {
 358                         return status;
 359                 }
 360         }
 361
 362         status = libnet_join_find_machine_acct(mem_ctx, r);
 363         if (!ADS_ERR_OK(status)) {
 364                 return status;
 365         }
 366
 367         if (!r->in.upn) {
 368                 r->in.upn = talloc_asprintf(mem_ctx,
 369                                             "host/%s@%s",
 370                                             r->in.machine_name,
 371                                             r->out.dns_domain_name);
 372                 if (!r->in.upn) {
 373                         return ADS_ERROR(LDAP_NO_MEMORY);
 374                 }
 375         }
 376
 377         mods = ads_init_mods(mem_ctx);
 378         if (!mods) {
 379                 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 380         }
 381
 382         status = ads_mod_str(mem_ctx, &mods, "userPrincipalName", r->in.upn);
 383         if (!ADS_ERR_OK(status)) {
 384                 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
 385         }
 386
 387         return ads_gen_mod(r->in.ads, r->out.dn, mods);
 388 }
 389
 390
 391 /****************************************************************
 392 ****************************************************************/
 393
 394 static ADS_STATUS libnet_join_set_os_attributes(TALLOC_CTX *mem_ctx,
 395                                                 struct libnet_JoinCtx *r)
 396 {
 397         ADS_STATUS status;
 398         ADS_MODLIST mods;
 399         char *os_sp = NULL;
 400
 401         if (!r->in.os_name || !r->in.os_version ) {
 402                 return ADS_SUCCESS;
 403         }
 404
 405         if (!r->in.ads) {
 406                 status = libnet_join_connect_ads(mem_ctx, r);
 407                 if (!ADS_ERR_OK(status)) {
 408                         return status;
 409                 }
 410         }
 411
 412         status = libnet_join_find_machine_acct(mem_ctx, r);
 413         if (!ADS_ERR_OK(status)) {
 414                 return status;
 415         }
 416
 417         mods = ads_init_mods(mem_ctx);
 418         if (!mods) {
 419                 return ADS_ERROR(LDAP_NO_MEMORY);
 420         }
 421
 422         os_sp = talloc_asprintf(mem_ctx, "Samba %s", SAMBA_VERSION_STRING);
 423         if (!os_sp) {
 424                 return ADS_ERROR(LDAP_NO_MEMORY);
 425         }
 426
 427         status = ads_mod_str(mem_ctx, &mods, "operatingSystem",
 428                              r->in.os_name);
 429         if (!ADS_ERR_OK(status)) {
 430                 return status;
 431         }
 432
 433         status = ads_mod_str(mem_ctx, &mods, "operatingSystemVersion",
 434                              r->in.os_version);
 435         if (!ADS_ERR_OK(status)) {
 436                 return status;
 437         }
 438
 439         status = ads_mod_str(mem_ctx, &mods, "operatingSystemServicePack",
 440                              os_sp);
 441         if (!ADS_ERR_OK(status)) {
 442                 return status;
 443         }
 444
 445         return ads_gen_mod(r->in.ads, r->out.dn, mods);
 446 }
 447
 448 /****************************************************************
 449 ****************************************************************/
 450
 451 static bool libnet_join_create_keytab(TALLOC_CTX *mem_ctx,
 452                                       struct libnet_JoinCtx *r)
 453 {
 454         if (!lp_use_kerberos_keytab()) {
 455                 return true;
 456         }
 457
 458         if (!ads_keytab_create_default(r->in.ads)) {
 459                 return false;
 460         }
 461
 462         return true;
 463 }
 464
 465 /****************************************************************
 466 ****************************************************************/
 467
 468 static bool libnet_join_derive_salting_principal(TALLOC_CTX *mem_ctx,
 469                                                  struct libnet_JoinCtx *r)
 470 {
 471         uint32_t domain_func;
 472         ADS_STATUS status;
 473         const char *salt = NULL;
 474         char *std_salt = NULL;
 475
 476         status = ads_domain_func_level(r->in.ads, &domain_func);
 477         if (!ADS_ERR_OK(status)) {
 478                 libnet_join_set_error_string(mem_ctx, r,
 479                         "failed to determine domain functional level: %s",
 480                         ads_errstr(status));
 481                 return false;
 482         }
 483
 484         std_salt = kerberos_standard_des_salt();
 485         if (!std_salt) {
 486                 libnet_join_set_error_string(mem_ctx, r,
 487                         "failed to obtain standard DES salt");
 488                 return false;
 489         }
 490
 491         salt = talloc_strdup(mem_ctx, std_salt);
 492         if (!salt) {
 493                 return false;
 494         }
 495
 496         SAFE_FREE(std_salt);
 497
 498         if (domain_func == DS_DOMAIN_FUNCTION_2000) {
 499                 char *upn;
 500
 501                 upn = ads_get_upn(r->in.ads, mem_ctx,
 502                                   r->in.machine_name);
 503                 if (upn) {
 504                         salt = talloc_strdup(mem_ctx, upn);
 505                         if (!salt) {
 506                                 return false;
 507                         }
 508                 }
 509         }
 510
 511         return kerberos_secrets_store_des_salt(salt);
 512 }
 513
 514 /****************************************************************
 515 ****************************************************************/
 516
 517 static ADS_STATUS libnet_join_post_processing_ads(TALLOC_CTX *mem_ctx,
 518                                                   struct libnet_JoinCtx *r)
 519 {
 520         ADS_STATUS status;
 521
 522         status = libnet_join_set_machine_spn(mem_ctx, r);
 523         if (!ADS_ERR_OK(status)) {
 524                 libnet_join_set_error_string(mem_ctx, r,
 525                         "failed to set machine spn: %s",
 526                         ads_errstr(status));
 527                 return status;
 528         }
 529
 530         status = libnet_join_set_os_attributes(mem_ctx, r);
 531         if (!ADS_ERR_OK(status)) {
 532                 libnet_join_set_error_string(mem_ctx, r,
 533                         "failed to set machine os attributes: %s",
 534                         ads_errstr(status));
 535                 return status;
 536         }
 537
 538         status = libnet_join_set_machine_upn(mem_ctx, r);
 539         if (!ADS_ERR_OK(status)) {
 540                 libnet_join_set_error_string(mem_ctx, r,
 541                         "failed to set machine upn: %s",
 542                         ads_errstr(status));
 543                 return status;
 544         }
 545
 546         if (!libnet_join_derive_salting_principal(mem_ctx, r)) {
 547                 return ADS_ERROR_NT(NT_STATUS_UNSUCCESSFUL);
 548         }
 549
 550         if (!libnet_join_create_keytab(mem_ctx, r)) {
 551                 libnet_join_set_error_string(mem_ctx, r,
 552                         "failed to create kerberos keytab");
 553                 return ADS_ERROR_NT(NT_STATUS_UNSUCCESSFUL);
 554         }
 555
 556         return ADS_SUCCESS;
 557 }
 558 #endif /* WITH_ADS */
 559
 560 /****************************************************************
 561 ****************************************************************/
 562
 563 static bool libnet_join_joindomain_store_secrets(TALLOC_CTX *mem_ctx,
 564                                                  struct libnet_JoinCtx *r)
 565 {
 566         if (!secrets_store_domain_sid(r->out.netbios_domain_name,
 567                                       r->out.domain_sid))
 568         {
 569                 return false;
 570         }
 571
 572         if (!secrets_store_machine_password(r->in.machine_password,
 573                                             r->out.netbios_domain_name,
 574                                             SEC_CHAN_WKSTA))
 575         {
 576                 return false;
 577         }
 578
 579         return true;
 580 }
 581
 582 /****************************************************************
 583 ****************************************************************/
 584
 585 static NTSTATUS libnet_join_joindomain_rpc(TALLOC_CTX *mem_ctx,
 586                                            struct libnet_JoinCtx *r)
 587 {
 588         struct cli_state *cli = NULL;
 589         struct rpc_pipe_client *pipe_hnd = NULL;
 590         POLICY_HND sam_pol, domain_pol, user_pol, lsa_pol;
 591         NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
 592         char *acct_name;
 593         const char *const_acct_name;
 594         uint32 user_rid;
 595         uint32 num_rids, *name_types, *user_rids;
 596         uint32 flags = 0x3e8;
 597         uint32 acb_info = ACB_WSTRUST;
 598         uint32 fields_present;
 599         uchar pwbuf[532];
 600         SAM_USERINFO_CTR ctr;
 601         SAM_USER_INFO_25 p25;
 602         const int infolevel = 25;
 603         struct MD5Context md5ctx;
 604         uchar md5buffer[16];
 605         DATA_BLOB digested_session_key;
 606         uchar md4_trust_password[16];
 607
 608         if (!r->in.machine_password) {
 609                 r->in.machine_password = talloc_strdup(mem_ctx, generate_random_str(DEFAULT_TRUST_ACCOUNT_PASSWORD_LENGTH));
 610                 NT_STATUS_HAVE_NO_MEMORY(r->in.machine_password);
 611         }
 612
 613         status = cli_full_connection(&cli, NULL,
 614                                      r->in.dc_name,
 615                                      NULL, 0,
 616                                      "IPC$", "IPC",
 617                                      r->in.admin_account,
 618                                      NULL,
 619                                      r->in.admin_password,
 620                                      0,
 621                                      Undefined, NULL);
 622
 623         if (!NT_STATUS_IS_OK(status)) {
 624                 goto done;
 625         }
 626
 627         pipe_hnd = cli_rpc_pipe_open_noauth(cli, PI_LSARPC, &status);
 628         if (!pipe_hnd) {
 629                 goto done;
 630         }
 631
 632         status = rpccli_lsa_open_policy(pipe_hnd, mem_ctx, True,
 633                                         SEC_RIGHTS_MAXIMUM_ALLOWED, &lsa_pol);
 634         if (!NT_STATUS_IS_OK(status)) {
 635                 goto done;
 636         }
 637
 638         status = rpccli_lsa_query_info_policy2(pipe_hnd, mem_ctx, &lsa_pol,
 639                                                12,
 640                                                &r->out.netbios_domain_name,
 641                                                &r->out.dns_domain_name,
 642                                                NULL,
 643                                                NULL,
 644                                                &r->out.domain_sid);
 645
 646         if (NT_STATUS_IS_OK(status)) {
 647                 r->out.domain_is_ad = true;
 648         }
 649
 650         if (!NT_STATUS_IS_OK(status)) {
 651                 status = rpccli_lsa_query_info_policy(pipe_hnd, mem_ctx, &lsa_pol,
 652                                                       5,
 653                                                       &r->out.netbios_domain_name,
 654                                                       &r->out.domain_sid);
 655                 if (!NT_STATUS_IS_OK(status)) {
 656                         goto done;
 657                 }
 658         }
 659
 660         rpccli_lsa_Close(pipe_hnd, mem_ctx, &lsa_pol);
 661         cli_rpc_pipe_close(pipe_hnd);
 662
 663         pipe_hnd = cli_rpc_pipe_open_noauth(cli, PI_SAMR, &status);
 664         if (!pipe_hnd) {
 665                 goto done;
 666         }
 667
 668         status = rpccli_samr_connect(pipe_hnd, mem_ctx,
 669                                      SEC_RIGHTS_MAXIMUM_ALLOWED, &sam_pol);
 670         if (!NT_STATUS_IS_OK(status)) {
 671                 goto done;
 672         }
 673
 674         status = rpccli_samr_open_domain(pipe_hnd, mem_ctx, &sam_pol,
 675                                          SEC_RIGHTS_MAXIMUM_ALLOWED,
 676                                          r->out.domain_sid,
 677                                          &domain_pol);
 678         if (!NT_STATUS_IS_OK(status)) {
 679                 goto done;
 680         }
 681
 682         acct_name = talloc_asprintf(mem_ctx, "%s$", r->in.machine_name);
 683         strlower_m(acct_name);
 684         const_acct_name = acct_name;
 685
 686         if (r->in.join_flags & WKSSVC_JOIN_FLAGS_ACCOUNT_CREATE) {
 687                 uint32_t acct_flags =
 688                         SEC_GENERIC_READ | SEC_GENERIC_WRITE | SEC_GENERIC_EXECUTE |
 689                         SEC_STD_WRITE_DAC | SEC_STD_DELETE |
 690                         SAMR_USER_ACCESS_SET_PASSWORD |
 691                         SAMR_USER_ACCESS_GET_ATTRIBUTES |
 692                         SAMR_USER_ACCESS_SET_ATTRIBUTES;
 693
 694                 status = rpccli_samr_create_dom_user(pipe_hnd, mem_ctx,
 695                                                      &domain_pol,
 696                                                      acct_name, ACB_WSTRUST,
 697                                                      acct_flags, &user_pol,
 698                                                      &user_rid);
 699                 if (NT_STATUS_EQUAL(status, NT_STATUS_USER_EXISTS)) {
 700                         if (!(r->in.join_flags &
 701                               WKSSVC_JOIN_FLAGS_DOMAIN_JOIN_IF_JOINED)) {
 702                                 goto done;
 703                         }
 704                 }
 705
 706                 if (NT_STATUS_IS_OK(status)) {
 707                         rpccli_samr_close(pipe_hnd, mem_ctx, &user_pol);
 708                 }
 709         }
 710
 711         status = rpccli_samr_lookup_names(pipe_hnd, mem_ctx,
 712                                           &domain_pol, flags, 1,
 713                                           &const_acct_name,
 714                                           &num_rids, &user_rids, &name_types);
 715         if (!NT_STATUS_IS_OK(status)) {
 716                 goto done;
 717         }
 718
 719         if (name_types[0] != SID_NAME_USER) {
 720                 status = NT_STATUS_INVALID_WORKSTATION;
 721                 goto done;
 722         }
 723
 724         user_rid = user_rids[0];
 725
 726         status = rpccli_samr_open_user(pipe_hnd, mem_ctx, &domain_pol,
 727                                        SEC_RIGHTS_MAXIMUM_ALLOWED, user_rid,
 728                                        &user_pol);
 729         if (!NT_STATUS_IS_OK(status)) {
 730                 goto done;
 731         }
 732
 733         E_md4hash(r->in.machine_password, md4_trust_password);
 734         encode_pw_buffer(pwbuf, r->in.machine_password, STR_UNICODE);
 735
 736         generate_random_buffer((uint8*)md5buffer, sizeof(md5buffer));
 737         digested_session_key = data_blob_talloc(mem_ctx, 0, 16);
 738
 739         MD5Init(&md5ctx);
 740         MD5Update(&md5ctx, md5buffer, sizeof(md5buffer));
 741         MD5Update(&md5ctx, cli->user_session_key.data,
 742                   cli->user_session_key.length);
 743         MD5Final(digested_session_key.data, &md5ctx);
 744
 745         SamOEMhashBlob(pwbuf, sizeof(pwbuf), &digested_session_key);
 746         memcpy(&pwbuf[516], md5buffer, sizeof(md5buffer));
 747
 748         acb_info |= ACB_PWNOEXP;
 749         if (r->out.domain_is_ad) {
 750 #if !defined(ENCTYPE_ARCFOUR_HMAC)
 751                 acb_info |= ACB_USE_DES_KEY_ONLY;
 752 #endif
 753                 ;;
 754         }
 755
 756         ZERO_STRUCT(ctr);
 757         ZERO_STRUCT(p25);
 758
 759         fields_present = ACCT_NT_PWD_SET | ACCT_LM_PWD_SET | ACCT_FLAGS;
 760         init_sam_user_info25P(&p25, fields_present, acb_info, (char *)pwbuf);
 761
 762         ctr.switch_value = infolevel;
 763         ctr.info.id25    = &p25;
 764
 765         status = rpccli_samr_set_userinfo2(pipe_hnd, mem_ctx, &user_pol,
 766                                            infolevel, &cli->user_session_key,
 767                                            &ctr);
 768         if (!NT_STATUS_IS_OK(status)) {
 769                 goto done;
 770         }
 771
 772         rpccli_samr_close(pipe_hnd, mem_ctx, &user_pol);
 773         cli_rpc_pipe_close(pipe_hnd);
 774
 775         status = NT_STATUS_OK;
 776  done:
 777         if (cli) {
 778                 cli_shutdown(cli);
 779         }
 780
 781         return status;
 782 }
 783
 784 /****************************************************************
 785 ****************************************************************/
 786
 787 static bool libnet_join_unjoindomain_remove_secrets(TALLOC_CTX *mem_ctx,
 788                                                     struct libnet_UnjoinCtx *r)
 789 {
 790         if (!secrets_delete_machine_password_ex(lp_workgroup())) {
 791                 return false;
 792         }
 793
 794         if (!secrets_delete_domain_sid(lp_workgroup())) {
 795                 return false;
 796         }
 797
 798         return true;
 799 }
 800
 801 /****************************************************************
 802 ****************************************************************/
 803
 804 static NTSTATUS libnet_join_unjoindomain_rpc(TALLOC_CTX *mem_ctx,
 805                                              struct libnet_UnjoinCtx *r)
 806 {
 807         struct cli_state *cli = NULL;
 808         struct rpc_pipe_client *pipe_hnd = NULL;
 809         POLICY_HND sam_pol, domain_pol, user_pol;
 810         NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
 811         char *acct_name;
 812         uint32 flags = 0x3e8;
 813         const char *const_acct_name;
 814         uint32 user_rid;
 815         uint32 num_rids, *name_types, *user_rids;
 816         SAM_USERINFO_CTR ctr, *qctr = NULL;
 817         SAM_USER_INFO_16 p16;
 818
 819         status = cli_full_connection(&cli, NULL,
 820                                      r->in.dc_name,
 821                                      NULL, 0,
 822                                      "IPC$", "IPC",
 823                                      r->in.admin_account,
 824                                      NULL,
 825                                      r->in.admin_password,
 826                                      0, Undefined, NULL);
 827
 828         if (!NT_STATUS_IS_OK(status)) {
 829                 goto done;
 830         }
 831
 832         pipe_hnd = cli_rpc_pipe_open_noauth(cli, PI_SAMR, &status);
 833         if (!pipe_hnd) {
 834                 goto done;
 835         }
 836
 837         status = rpccli_samr_connect(pipe_hnd, mem_ctx,
 838                                      SEC_RIGHTS_MAXIMUM_ALLOWED, &sam_pol);
 839         if (!NT_STATUS_IS_OK(status)) {
 840                 goto done;
 841         }
 842
 843         status = rpccli_samr_open_domain(pipe_hnd, mem_ctx, &sam_pol,
 844                                          SEC_RIGHTS_MAXIMUM_ALLOWED,
 845                                          r->in.domain_sid,
 846                                          &domain_pol);
 847         if (!NT_STATUS_IS_OK(status)) {
 848                 goto done;
 849         }
 850
 851         acct_name = talloc_asprintf(mem_ctx, "%s$", r->in.machine_name);
 852         strlower_m(acct_name);
 853         const_acct_name = acct_name;
 854
 855         status = rpccli_samr_lookup_names(pipe_hnd, mem_ctx,
 856                                           &domain_pol, flags, 1,
 857                                           &const_acct_name,
 858                                           &num_rids, &user_rids, &name_types);
 859         if (!NT_STATUS_IS_OK(status)) {
 860                 goto done;
 861         }
 862
 863         if (name_types[0] != SID_NAME_USER) {
 864                 status = NT_STATUS_INVALID_WORKSTATION;
 865                 goto done;
 866         }
 867
 868         user_rid = user_rids[0];
 869
 870         status = rpccli_samr_open_user(pipe_hnd, mem_ctx, &domain_pol,
 871                                        SEC_RIGHTS_MAXIMUM_ALLOWED,
 872                                        user_rid, &user_pol);
 873         if (!NT_STATUS_IS_OK(status)) {
 874                 goto done;
 875         }
 876
 877         status = rpccli_samr_query_userinfo(pipe_hnd, mem_ctx,
 878                                             &user_pol, 16, &qctr);
 879         if (!NT_STATUS_IS_OK(status)) {
 880                 rpccli_samr_close(pipe_hnd, mem_ctx, &user_pol);
 881                 goto done;
 882         }
 883
 884         ZERO_STRUCT(ctr);
 885         ctr.switch_value = 16;
 886         ctr.info.id16 = &p16;
 887
 888         p16.acb_info = qctr->info.id16->acb_info | ACB_DISABLED;
 889
 890         status = rpccli_samr_set_userinfo2(pipe_hnd, mem_ctx, &user_pol, 16,
 891                                            &cli->user_session_key, &ctr);
 892
 893         rpccli_samr_close(pipe_hnd, mem_ctx, &user_pol);
 894
 895 done:
 896         if (pipe_hnd) {
 897                 rpccli_samr_close(pipe_hnd, mem_ctx, &domain_pol);
 898                 rpccli_samr_close(pipe_hnd, mem_ctx, &sam_pol);
 899                 cli_rpc_pipe_close(pipe_hnd);
 900         }
 901
 902         if (cli) {
 903                 cli_shutdown(cli);
 904         }
 905
 906         return status;
 907 }
 908
 909 /****************************************************************
 910 ****************************************************************/
 911
 912 static WERROR do_join_modify_vals_config(struct libnet_JoinCtx *r)
 913 {
 914         WERROR werr;
 915         struct libnet_conf_ctx *ctx;
 916
 917         werr = libnet_conf_open(r, &ctx);
 918         if (!W_ERROR_IS_OK(werr)) {
 919                 goto done;
 920         }
 921
 922         if (!(r->in.join_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE)) {
 923
 924                 werr = libnet_conf_set_global_parameter(ctx, "security", "user");
 925                 if (!W_ERROR_IS_OK(werr)) {
 926                         goto done;
 927                 }
 928
 929                 werr = libnet_conf_set_global_parameter(ctx, "workgroup",
 930                                                         r->in.domain_name);
 931                 goto done;
 932         }
 933
 934         werr = libnet_conf_set_global_parameter(ctx, "security", "domain");
 935         if (!W_ERROR_IS_OK(werr)) {
 936                 goto done;
 937         }
 938
 939         werr = libnet_conf_set_global_parameter(ctx, "workgroup",
 940                                                 r->out.netbios_domain_name);
 941         if (!W_ERROR_IS_OK(werr)) {
 942                 goto done;
 943         }
 944
 945         if (r->out.domain_is_ad) {
 946                 werr = libnet_conf_set_global_parameter(ctx, "security", "ads");
 947                 if (!W_ERROR_IS_OK(werr)) {
 948                         goto done;
 949                 }
 950
 951                 werr = libnet_conf_set_global_parameter(ctx, "realm",
 952                                                         r->out.dns_domain_name);
 953         }
 954
 955 done:
 956         libnet_conf_close(ctx);
 957         return werr;
 958 }
 959
 960 /****************************************************************
 961 ****************************************************************/
 962
 963 static WERROR do_unjoin_modify_vals_config(struct libnet_UnjoinCtx *r)
 964 {
 965         WERROR werr = WERR_OK;
 966         struct libnet_conf_ctx *ctx;
 967
 968         werr = libnet_conf_open(r, &ctx);
 969         if (!W_ERROR_IS_OK(werr)) {
 970                 goto done;
 971         }
 972
 973         if (r->in.unjoin_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE) {
 974
 975                 werr = libnet_conf_set_global_parameter(ctx, "security", "user");
 976                 if (!W_ERROR_IS_OK(werr)) {
 977                         goto done;
 978                 }
 979         }
 980
 981         libnet_conf_delete_global_parameter(ctx, "realm");
 982
 983 done:
 984         libnet_conf_close(ctx);
 985         return werr;
 986 }
 987
 988 /****************************************************************
 989 ****************************************************************/
 990
 991 static WERROR do_JoinConfig(struct libnet_JoinCtx *r)
 992 {
 993         WERROR werr;
 994
 995         if (!W_ERROR_IS_OK(r->out.result)) {
 996                 return r->out.result;
 997         }
 998
 999         if (!r->in.modify_config) {
1000                 return WERR_OK;
1001         }
1002
1003         werr = do_join_modify_vals_config(r);
1004         if (!W_ERROR_IS_OK(werr)) {
1005                 return werr;
1006         }
1007
1008         r->out.modified_config = true;
1009         r->out.result = werr;
1010
1011         return werr;
1012 }
1013
1014 /****************************************************************
1015 ****************************************************************/
1016
1017 static WERROR do_UnjoinConfig(struct libnet_UnjoinCtx *r)
1018 {
1019         WERROR werr;
1020
1021         if (!W_ERROR_IS_OK(r->out.result)) {
1022                 return r->out.result;
1023         }
1024
1025         if (!r->in.modify_config) {
1026                 return WERR_OK;
1027         }
1028
1029         werr = do_unjoin_modify_vals_config(r);
1030         if (!W_ERROR_IS_OK(werr)) {
1031                 return werr;
1032         }
1033
1034         r->out.modified_config = true;
1035         r->out.result = werr;
1036
1037         return werr;
1038 }
1039
1040 /****************************************************************
1041 ****************************************************************/
1042
1043 static WERROR libnet_join_pre_processing(TALLOC_CTX *mem_ctx,
1044                                          struct libnet_JoinCtx *r)
1045 {
1046
1047         if (!r->in.domain_name) {
1048                 return WERR_INVALID_PARAM;
1049         }
1050
1051         if (r->in.modify_config && !lp_config_backend_is_registry()) {
1052                 return WERR_NOT_SUPPORTED;
1053         }
1054
1055         if (IS_DC) {
1056                 return WERR_SETUP_DOMAIN_CONTROLLER;
1057         }
1058
1059         if (!secrets_init()) {
1060                 libnet_join_set_error_string(mem_ctx, r,
1061                         "Unable to open secrets database");
1062                 return WERR_CAN_NOT_COMPLETE;
1063         }
1064
1065         return WERR_OK;
1066 }
1067
1068 /****************************************************************
1069 ****************************************************************/
1070
1071 static WERROR libnet_join_post_processing(TALLOC_CTX *mem_ctx,
1072                                           struct libnet_JoinCtx *r)
1073 {
1074         WERROR werr;
1075
1076         if (!W_ERROR_IS_OK(r->out.result)) {
1077                 return r->out.result;
1078         }
1079
1080         werr = do_JoinConfig(r);
1081         if (!W_ERROR_IS_OK(werr)) {
1082                 return werr;
1083         }
1084
1085         if (r->in.join_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE) {
1086                 saf_store(r->in.domain_name, r->in.dc_name);
1087         }
1088
1089         return WERR_OK;
1090 }
1091
1092 /****************************************************************
1093 ****************************************************************/
1094
1095 static int libnet_destroy_JoinCtx(struct libnet_JoinCtx *r)
1096 {
1097         if (r->in.ads) {
1098                 ads_destroy(&r->in.ads);
1099         }
1100
1101         return 0;
1102 }
1103
1104 /****************************************************************
1105 ****************************************************************/
1106
1107 static int libnet_destroy_UnjoinCtx(struct libnet_UnjoinCtx *r)
1108 {
1109         if (r->in.ads) {
1110                 ads_destroy(&r->in.ads);
1111         }
1112
1113         return 0;
1114 }
1115
1116 /****************************************************************
1117 ****************************************************************/
1118
1119 WERROR libnet_init_JoinCtx(TALLOC_CTX *mem_ctx,
1120                            struct libnet_JoinCtx **r)
1121 {
1122         struct libnet_JoinCtx *ctx;
1123
1124         ctx = talloc_zero(mem_ctx, struct libnet_JoinCtx);
1125         if (!ctx) {
1126                 return WERR_NOMEM;
1127         }
1128
1129         talloc_set_destructor(ctx, libnet_destroy_JoinCtx);
1130
1131         ctx->in.machine_name = talloc_strdup(mem_ctx, global_myname());
1132         W_ERROR_HAVE_NO_MEMORY(ctx->in.machine_name);
1133
1134         *r = ctx;
1135
1136         return WERR_OK;
1137 }
1138
1139 /****************************************************************
1140 ****************************************************************/
1141
1142 WERROR libnet_init_UnjoinCtx(TALLOC_CTX *mem_ctx,
1143                              struct libnet_UnjoinCtx **r)
1144 {
1145         struct libnet_UnjoinCtx *ctx;
1146
1147         ctx = talloc_zero(mem_ctx, struct libnet_UnjoinCtx);
1148         if (!ctx) {
1149                 return WERR_NOMEM;
1150         }
1151
1152         talloc_set_destructor(ctx, libnet_destroy_UnjoinCtx);
1153
1154         ctx->in.machine_name = talloc_strdup(mem_ctx, global_myname());
1155         W_ERROR_HAVE_NO_MEMORY(ctx->in.machine_name);
1156
1157         *r = ctx;
1158
1159         return WERR_OK;
1160 }
1161
1162 /****************************************************************
1163 ****************************************************************/
1164
1165 static WERROR libnet_DomainJoin(TALLOC_CTX *mem_ctx,
1166                                 struct libnet_JoinCtx *r)
1167 {
1168         NTSTATUS status;
1169 #ifdef WITH_ADS
1170         ADS_STATUS ads_status;
1171 #endif /* WITH_ADS */
1172
1173         if (!r->in.dc_name) {
1174                 struct DS_DOMAIN_CONTROLLER_INFO *info;
1175                 status = dsgetdcname(mem_ctx,
1176                                      NULL,
1177                                      r->in.domain_name,
1178                                      NULL,
1179                                      NULL,
1180                                      DS_DIRECTORY_SERVICE_REQUIRED |
1181                                      DS_WRITABLE_REQUIRED |
1182                                      DS_RETURN_DNS_NAME,
1183                                      &info);
1184                 if (!NT_STATUS_IS_OK(status)) {
1185                         libnet_join_set_error_string(mem_ctx, r,
1186                                 "failed to find DC for domain %s",
1187                                 r->in.domain_name,
1188                                 get_friendly_nt_error_msg(status));
1189                         return WERR_DOMAIN_CONTROLLER_NOT_FOUND;
1190                 }
1191
1192                 r->in.dc_name = talloc_strdup(mem_ctx,
1193                                               info->domain_controller_name);
1194                 W_ERROR_HAVE_NO_MEMORY(r->in.dc_name);
1195         }
1196
1197 #ifdef WITH_ADS
1198         if (r->in.account_ou) {
1199
1200                 ads_status = libnet_join_connect_ads(mem_ctx, r);
1201                 if (!ADS_ERR_OK(ads_status)) {
1202                         return WERR_DEFAULT_JOIN_REQUIRED;
1203                 }
1204
1205                 ads_status = libnet_join_precreate_machine_acct(mem_ctx, r);
1206                 if (!ADS_ERR_OK(ads_status)) {
1207                         libnet_join_set_error_string(mem_ctx, r,
1208                                 "failed to precreate account in ou %s: %s",
1209                                 r->in.account_ou,
1210                                 ads_errstr(ads_status));
1211                         return WERR_DEFAULT_JOIN_REQUIRED;
1212                 }
1213
1214                 r->in.join_flags &= ~WKSSVC_JOIN_FLAGS_ACCOUNT_CREATE;
1215         }
1216 #endif /* WITH_ADS */
1217
1218         status = libnet_join_joindomain_rpc(mem_ctx, r);
1219         if (!NT_STATUS_IS_OK(status)) {
1220                 libnet_join_set_error_string(mem_ctx, r,
1221                         "failed to join domain over rpc: %s",
1222                         get_friendly_nt_error_msg(status));
1223                 if (NT_STATUS_EQUAL(status, NT_STATUS_USER_EXISTS)) {
1224                         return WERR_SETUP_ALREADY_JOINED;
1225                 }
1226                 return ntstatus_to_werror(status);
1227         }
1228
1229         if (!libnet_join_joindomain_store_secrets(mem_ctx, r)) {
1230                 return WERR_SETUP_NOT_JOINED;
1231         }
1232
1233 #ifdef WITH_ADS
1234         if (r->out.domain_is_ad) {
1235                 ads_status  = libnet_join_post_processing_ads(mem_ctx, r);
1236                 if (!ADS_ERR_OK(ads_status)) {
1237                         return WERR_GENERAL_FAILURE;
1238                 }
1239         }
1240 #endif /* WITH_ADS */
1241
1242         return WERR_OK;
1243 }
1244
1245 /****************************************************************
1246 ****************************************************************/
1247
1248 WERROR libnet_Join(TALLOC_CTX *mem_ctx,
1249                    struct libnet_JoinCtx *r)
1250 {
1251         WERROR werr;
1252
1253         if (r->in.debug) {
1254                 LIBNET_JOIN_IN_DUMP_CTX(mem_ctx, r);
1255         }
1256
1257         werr = libnet_join_pre_processing(mem_ctx, r);
1258         if (!W_ERROR_IS_OK(werr)) {
1259                 goto done;
1260         }
1261
1262         if (r->in.join_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE) {
1263                 werr = libnet_DomainJoin(mem_ctx, r);
1264                 if (!W_ERROR_IS_OK(werr)) {
1265                         goto done;
1266                 }
1267         }
1268
1269         werr = libnet_join_post_processing(mem_ctx, r);
1270         if (!W_ERROR_IS_OK(werr)) {
1271                 goto done;
1272         }
1273  done:
1274         r->out.result = werr;
1275
1276         if (r->in.debug) {
1277                 LIBNET_JOIN_OUT_DUMP_CTX(mem_ctx, r);
1278         }
1279         return werr;
1280 }
1281
1282 /****************************************************************
1283 ****************************************************************/
1284
1285 static WERROR libnet_DomainUnjoin(TALLOC_CTX *mem_ctx,
1286                                   struct libnet_UnjoinCtx *r)
1287 {
1288         NTSTATUS status;
1289
1290         if (!r->in.domain_sid) {
1291                 struct dom_sid sid;
1292                 if (!secrets_fetch_domain_sid(lp_workgroup(), &sid)) {
1293                         libnet_unjoin_set_error_string(mem_ctx, r,
1294                                 "Unable to fetch domain sid: are we joined?");
1295                         return WERR_SETUP_NOT_JOINED;
1296                 }
1297                 r->in.domain_sid = sid_dup_talloc(mem_ctx, &sid);
1298                 W_ERROR_HAVE_NO_MEMORY(r->in.domain_sid);
1299         }
1300
1301         if (!r->in.dc_name) {
1302                 struct DS_DOMAIN_CONTROLLER_INFO *info;
1303                 status = dsgetdcname(mem_ctx,
1304                                      NULL,
1305                                      r->in.domain_name,
1306                                      NULL,
1307                                      NULL,
1308                                      DS_DIRECTORY_SERVICE_REQUIRED |
1309                                      DS_WRITABLE_REQUIRED |
1310                                      DS_RETURN_DNS_NAME,
1311                                      &info);
1312                 if (!NT_STATUS_IS_OK(status)) {
1313                         libnet_unjoin_set_error_string(mem_ctx, r,
1314                                 "failed to find DC for domain %s",
1315                                 r->in.domain_name,
1316                                 get_friendly_nt_error_msg(status));
1317                         return WERR_DOMAIN_CONTROLLER_NOT_FOUND;
1318                 }
1319
1320                 r->in.dc_name = talloc_strdup(mem_ctx,
1321                                               info->domain_controller_name);
1322                 W_ERROR_HAVE_NO_MEMORY(r->in.dc_name);
1323         }
1324
1325         status = libnet_join_unjoindomain_rpc(mem_ctx, r);
1326         if (!NT_STATUS_IS_OK(status)) {
1327                 libnet_unjoin_set_error_string(mem_ctx, r,
1328                         "failed to disable machine account via rpc: %s",
1329                         get_friendly_nt_error_msg(status));
1330                 if (NT_STATUS_EQUAL(status, NT_STATUS_NO_SUCH_USER)) {
1331                         return WERR_SETUP_NOT_JOINED;
1332                 }
1333                 return ntstatus_to_werror(status);
1334         }
1335
1336 #ifdef WITH_ADS
1337         if (r->in.unjoin_flags & WKSSVC_JOIN_FLAGS_ACCOUNT_DELETE) {
1338                 ADS_STATUS ads_status;
1339                 libnet_unjoin_connect_ads(mem_ctx, r);
1340                 ads_status = libnet_unjoin_remove_machine_acct(mem_ctx, r);
1341                 if (!ADS_ERR_OK(ads_status)) {
1342                         libnet_unjoin_set_error_string(mem_ctx, r,
1343                                 "failed to remove machine account from AD: %s",
1344                                 ads_errstr(ads_status));
1345                 }
1346         }
1347 #endif /* WITH_ADS */
1348
1349         libnet_join_unjoindomain_remove_secrets(mem_ctx, r);
1350
1351         return WERR_OK;
1352 }
1353
1354 /****************************************************************
1355 ****************************************************************/
1356
1357 static WERROR libnet_unjoin_pre_processing(TALLOC_CTX *mem_ctx,
1358                                            struct libnet_UnjoinCtx *r)
1359 {
1360         if (r->in.modify_config && !lp_config_backend_is_registry()) {
1361                 return WERR_NOT_SUPPORTED;
1362         }
1363
1364         if (!secrets_init()) {
1365                 libnet_unjoin_set_error_string(mem_ctx, r,
1366                         "Unable to open secrets database");
1367                 return WERR_CAN_NOT_COMPLETE;
1368         }
1369
1370         return WERR_OK;
1371 }
1372
1373
1374 /****************************************************************
1375 ****************************************************************/
1376
1377 WERROR libnet_Unjoin(TALLOC_CTX *mem_ctx,
1378                      struct libnet_UnjoinCtx *r)
1379 {
1380         WERROR werr;
1381
1382         if (r->in.debug) {
1383                 LIBNET_UNJOIN_IN_DUMP_CTX(mem_ctx, r);
1384         }
1385
1386         werr = libnet_unjoin_pre_processing(mem_ctx, r);
1387         if (!W_ERROR_IS_OK(werr)) {
1388                 goto done;
1389         }
1390
1391         if (r->in.unjoin_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE) {
1392                 werr = libnet_DomainUnjoin(mem_ctx, r);
1393                 if (!W_ERROR_IS_OK(werr)) {
1394                         goto done;
1395                 }
1396         }
1397
1398         werr = do_UnjoinConfig(r);
1399         if (!W_ERROR_IS_OK(werr)) {
1400                 goto done;
1401         }
1402
1403  done:
1404         r->out.result = werr;
1405
1406         if (r->in.debug) {
1407                 LIBNET_UNJOIN_OUT_DUMP_CTX(mem_ctx, r);
1408         }
1409
1410         return werr;
1411 }