source: branches/samba-3.3.x/source/libnet/libnet_join.c@ 206

Last change on this file since 206 was 206, checked in by Herwig Bauernfeind, 17 years ago

Import Samba 3.3 branch at 3.0.0 level (psmedley's port)
File size: 50.0 KB
Line 
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#define W_ERROR_NOT_OK_GOTO_DONE(x) do { \
54 if (!W_ERROR_IS_OK(x)) {\
55 goto done;\
56 }\
57} while (0)
58
59/****************************************************************
60****************************************************************/
61
62static void libnet_join_set_error_string(TALLOC_CTX *mem_ctx,
63 struct libnet_JoinCtx *r,
64 const char *format, ...)
65{
66 va_list args;
67
68 if (r->out.error_string) {
69 return;
70 }
71
72 va_start(args, format);
73 r->out.error_string = talloc_vasprintf(mem_ctx, format, args);
74 va_end(args);
75}
76
77/****************************************************************
78****************************************************************/
79
80static void libnet_unjoin_set_error_string(TALLOC_CTX *mem_ctx,
81 struct libnet_UnjoinCtx *r,
82 const char *format, ...)
83{
84 va_list args;
85
86 if (r->out.error_string) {
87 return;
88 }
89
90 va_start(args, format);
91 r->out.error_string = talloc_vasprintf(mem_ctx, format, args);
92 va_end(args);
93}
94
95#ifdef WITH_ADS
96
97/****************************************************************
98****************************************************************/
99
100static ADS_STATUS libnet_connect_ads(const char *dns_domain_name,
101 const char *netbios_domain_name,
102 const char *dc_name,
103 const char *user_name,
104 const char *password,
105 ADS_STRUCT **ads)
106{
107 ADS_STATUS status;
108 ADS_STRUCT *my_ads = NULL;
109
110 my_ads = ads_init(dns_domain_name,
111 netbios_domain_name,
112 dc_name);
113 if (!my_ads) {
114 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
115 }
116
117 if (user_name) {
118 SAFE_FREE(my_ads->auth.user_name);
119 my_ads->auth.user_name = SMB_STRDUP(user_name);
120 }
121
122 if (password) {
123 SAFE_FREE(my_ads->auth.password);
124 my_ads->auth.password = SMB_STRDUP(password);
125 }
126
127 status = ads_connect_user_creds(my_ads);
128 if (!ADS_ERR_OK(status)) {
129 ads_destroy(&my_ads);
130 return status;
131 }
132
133 *ads = my_ads;
134 return ADS_SUCCESS;
135}
136
137/****************************************************************
138****************************************************************/
139
140static ADS_STATUS libnet_join_connect_ads(TALLOC_CTX *mem_ctx,
141 struct libnet_JoinCtx *r)
142{
143 ADS_STATUS status;
144
145 status = libnet_connect_ads(r->out.dns_domain_name,
146 r->out.netbios_domain_name,
147 r->in.dc_name,
148 r->in.admin_account,
149 r->in.admin_password,
150 &r->in.ads);
151 if (!ADS_ERR_OK(status)) {
152 libnet_join_set_error_string(mem_ctx, r,
153 "failed to connect to AD: %s",
154 ads_errstr(status));
155 return status;
156 }
157
158 if (!r->out.netbios_domain_name) {
159 r->out.netbios_domain_name = talloc_strdup(mem_ctx,
160 r->in.ads->server.workgroup);
161 ADS_ERROR_HAVE_NO_MEMORY(r->out.netbios_domain_name);
162 }
163
164 if (!r->out.dns_domain_name) {
165 r->out.dns_domain_name = talloc_strdup(mem_ctx,
166 r->in.ads->config.realm);
167 ADS_ERROR_HAVE_NO_MEMORY(r->out.dns_domain_name);
168 }
169
170 r->out.domain_is_ad = true;
171
172 return ADS_SUCCESS;
173}
174
175/****************************************************************
176****************************************************************/
177
178static ADS_STATUS libnet_unjoin_connect_ads(TALLOC_CTX *mem_ctx,
179 struct libnet_UnjoinCtx *r)
180{
181 ADS_STATUS status;
182
183 status = libnet_connect_ads(r->in.domain_name,
184 r->in.domain_name,
185 r->in.dc_name,
186 r->in.admin_account,
187 r->in.admin_password,
188 &r->in.ads);
189 if (!ADS_ERR_OK(status)) {
190 libnet_unjoin_set_error_string(mem_ctx, r,
191 "failed to connect to AD: %s",
192 ads_errstr(status));
193 }
194
195 return status;
196}
197
198/****************************************************************
199 join a domain using ADS (LDAP mods)
200****************************************************************/
201
202static ADS_STATUS libnet_join_precreate_machine_acct(TALLOC_CTX *mem_ctx,
203 struct libnet_JoinCtx *r)
204{
205 ADS_STATUS status;
206 LDAPMessage *res = NULL;
207 const char *attrs[] = { "dn", NULL };
208 bool moved = false;
209
210 status = ads_check_ou_dn(mem_ctx, r->in.ads, &r->in.account_ou);
211 if (!ADS_ERR_OK(status)) {
212 return status;
213 }
214
215 status = ads_search_dn(r->in.ads, &res, r->in.account_ou, attrs);
216 if (!ADS_ERR_OK(status)) {
217 return status;
218 }
219
220 if (ads_count_replies(r->in.ads, res) != 1) {
221 ads_msgfree(r->in.ads, res);
222 return ADS_ERROR_LDAP(LDAP_NO_SUCH_OBJECT);
223 }
224
225 ads_msgfree(r->in.ads, res);
226
227 /* Attempt to create the machine account and bail if this fails.
228 Assume that the admin wants exactly what they requested */
229
230 status = ads_create_machine_acct(r->in.ads,
231 r->in.machine_name,
232 r->in.account_ou);
233
234 if (ADS_ERR_OK(status)) {
235 DEBUG(1,("machine account creation created\n"));
236 return status;
237 } else if ((status.error_type == ENUM_ADS_ERROR_LDAP) &&
238 (status.err.rc == LDAP_ALREADY_EXISTS)) {
239 status = ADS_SUCCESS;
240 }
241
242 if (!ADS_ERR_OK(status)) {
243 DEBUG(1,("machine account creation failed\n"));
244 return status;
245 }
246
247 status = ads_move_machine_acct(r->in.ads,
248 r->in.machine_name,
249 r->in.account_ou,
250 &moved);
251 if (!ADS_ERR_OK(status)) {
252 DEBUG(1,("failure to locate/move pre-existing "
253 "machine account\n"));
254 return status;
255 }
256
257 DEBUG(1,("The machine account %s the specified OU.\n",
258 moved ? "was moved into" : "already exists in"));
259
260 return status;
261}
262
263/****************************************************************
264****************************************************************/
265
266static ADS_STATUS libnet_unjoin_remove_machine_acct(TALLOC_CTX *mem_ctx,
267 struct libnet_UnjoinCtx *r)
268{
269 ADS_STATUS status;
270
271 if (!r->in.ads) {
272 return libnet_unjoin_connect_ads(mem_ctx, r);
273 }
274
275 status = ads_leave_realm(r->in.ads, r->in.machine_name);
276 if (!ADS_ERR_OK(status)) {
277 libnet_unjoin_set_error_string(mem_ctx, r,
278 "failed to leave realm: %s",
279 ads_errstr(status));
280 return status;
281 }
282
283 return ADS_SUCCESS;
284}
285
286/****************************************************************
287****************************************************************/
288
289static ADS_STATUS libnet_join_find_machine_acct(TALLOC_CTX *mem_ctx,
290 struct libnet_JoinCtx *r)
291{
292 ADS_STATUS status;
293 LDAPMessage *res = NULL;
294 char *dn = NULL;
295
296 if (!r->in.machine_name) {
297 return ADS_ERROR(LDAP_NO_MEMORY);
298 }
299
300 status = ads_find_machine_acct(r->in.ads,
301 &res,
302 r->in.machine_name);
303 if (!ADS_ERR_OK(status)) {
304 return status;
305 }
306
307 if (ads_count_replies(r->in.ads, res) != 1) {
308 status = ADS_ERROR_LDAP(LDAP_NO_MEMORY);
309 goto done;
310 }
311
312 dn = ads_get_dn(r->in.ads, res);
313 if (!dn) {
314 status = ADS_ERROR_LDAP(LDAP_NO_MEMORY);
315 goto done;
316 }
317
318 r->out.dn = talloc_strdup(mem_ctx, dn);
319 if (!r->out.dn) {
320 status = ADS_ERROR_LDAP(LDAP_NO_MEMORY);
321 goto done;
322 }
323
324 done:
325 ads_msgfree(r->in.ads, res);
326 ads_memfree(r->in.ads, dn);
327
328 return status;
329}
330
331/****************************************************************
332 Set a machines dNSHostName and servicePrincipalName attributes
333****************************************************************/
334
335static ADS_STATUS libnet_join_set_machine_spn(TALLOC_CTX *mem_ctx,
336 struct libnet_JoinCtx *r)
337{
338 ADS_STATUS status;
339 ADS_MODLIST mods;
340 fstring my_fqdn;
341 const char *spn_array[3] = {NULL, NULL, NULL};
342 char *spn = NULL;
343
344 /* Find our DN */
345
346 status = libnet_join_find_machine_acct(mem_ctx, r);
347 if (!ADS_ERR_OK(status)) {
348 return status;
349 }
350
351 /* Windows only creates HOST/shortname & HOST/fqdn. */
352
353 spn = talloc_asprintf(mem_ctx, "HOST/%s", r->in.machine_name);
354 if (!spn) {
355 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
356 }
357 strupper_m(spn);
358 spn_array[0] = spn;
359
360 if (!name_to_fqdn(my_fqdn, r->in.machine_name)
361 || (strchr(my_fqdn, '.') == NULL)) {
362 fstr_sprintf(my_fqdn, "%s.%s", r->in.machine_name,
363 r->out.dns_domain_name);
364 }
365
366 strlower_m(my_fqdn);
367
368 if (!strequal(my_fqdn, r->in.machine_name)) {
369 spn = talloc_asprintf(mem_ctx, "HOST/%s", my_fqdn);
370 if (!spn) {
371 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
372 }
373 spn_array[1] = spn;
374 }
375
376 mods = ads_init_mods(mem_ctx);
377 if (!mods) {
378 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
379 }
380
381 /* fields of primary importance */
382
383 status = ads_mod_str(mem_ctx, &mods, "dNSHostName", my_fqdn);
384 if (!ADS_ERR_OK(status)) {
385 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
386 }
387
388 status = ads_mod_strlist(mem_ctx, &mods, "servicePrincipalName",
389 spn_array);
390 if (!ADS_ERR_OK(status)) {
391 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
392 }
393
394 return ads_gen_mod(r->in.ads, r->out.dn, mods);
395}
396
397/****************************************************************
398****************************************************************/
399
400static ADS_STATUS libnet_join_set_machine_upn(TALLOC_CTX *mem_ctx,
401 struct libnet_JoinCtx *r)
402{
403 ADS_STATUS status;
404 ADS_MODLIST mods;
405
406 if (!r->in.create_upn) {
407 return ADS_SUCCESS;
408 }
409
410 /* Find our DN */
411
412 status = libnet_join_find_machine_acct(mem_ctx, r);
413 if (!ADS_ERR_OK(status)) {
414 return status;
415 }
416
417 if (!r->in.upn) {
418 r->in.upn = talloc_asprintf(mem_ctx,
419 "host/%s@%s",
420 r->in.machine_name,
421 r->out.dns_domain_name);
422 if (!r->in.upn) {
423 return ADS_ERROR(LDAP_NO_MEMORY);
424 }
425 }
426
427 /* now do the mods */
428
429 mods = ads_init_mods(mem_ctx);
430 if (!mods) {
431 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
432 }
433
434 /* fields of primary importance */
435
436 status = ads_mod_str(mem_ctx, &mods, "userPrincipalName", r->in.upn);
437 if (!ADS_ERR_OK(status)) {
438 return ADS_ERROR_LDAP(LDAP_NO_MEMORY);
439 }
440
441 return ads_gen_mod(r->in.ads, r->out.dn, mods);
442}
443
444
445/****************************************************************
446****************************************************************/
447
448static ADS_STATUS libnet_join_set_os_attributes(TALLOC_CTX *mem_ctx,
449 struct libnet_JoinCtx *r)
450{
451 ADS_STATUS status;
452 ADS_MODLIST mods;
453 char *os_sp = NULL;
454
455 if (!r->in.os_name || !r->in.os_version ) {
456 return ADS_SUCCESS;
457 }
458
459 /* Find our DN */
460
461 status = libnet_join_find_machine_acct(mem_ctx, r);
462 if (!ADS_ERR_OK(status)) {
463 return status;
464 }
465
466 /* now do the mods */
467
468 mods = ads_init_mods(mem_ctx);
469 if (!mods) {
470 return ADS_ERROR(LDAP_NO_MEMORY);
471 }
472
473 os_sp = talloc_asprintf(mem_ctx, "Samba %s", SAMBA_VERSION_STRING);
474 if (!os_sp) {
475 return ADS_ERROR(LDAP_NO_MEMORY);
476 }
477
478 /* fields of primary importance */
479
480 status = ads_mod_str(mem_ctx, &mods, "operatingSystem",
481 r->in.os_name);
482 if (!ADS_ERR_OK(status)) {
483 return status;
484 }
485
486 status = ads_mod_str(mem_ctx, &mods, "operatingSystemVersion",
487 r->in.os_version);
488 if (!ADS_ERR_OK(status)) {
489 return status;
490 }
491
492 status = ads_mod_str(mem_ctx, &mods, "operatingSystemServicePack",
493 os_sp);
494 if (!ADS_ERR_OK(status)) {
495 return status;
496 }
497
498 return ads_gen_mod(r->in.ads, r->out.dn, mods);
499}
500
501/****************************************************************
502****************************************************************/
503
504static bool libnet_join_create_keytab(TALLOC_CTX *mem_ctx,
505 struct libnet_JoinCtx *r)
506{
507 if (!lp_use_kerberos_keytab()) {
508 return true;
509 }
510
511 if (ads_keytab_create_default(r->in.ads) != 0) {
512 return false;
513 }
514
515 return true;
516}
517
518/****************************************************************
519****************************************************************/
520
521static bool libnet_join_derive_salting_principal(TALLOC_CTX *mem_ctx,
522 struct libnet_JoinCtx *r)
523{
524 uint32_t domain_func;
525 ADS_STATUS status;
526 const char *salt = NULL;
527 char *std_salt = NULL;
528
529 status = ads_domain_func_level(r->in.ads, &domain_func);
530 if (!ADS_ERR_OK(status)) {
531 libnet_join_set_error_string(mem_ctx, r,
532 "failed to determine domain functional level: %s",
533 ads_errstr(status));
534 return false;
535 }
536
537 /* go ahead and setup the default salt */
538
539 std_salt = kerberos_standard_des_salt();
540 if (!std_salt) {
541 libnet_join_set_error_string(mem_ctx, r,
542 "failed to obtain standard DES salt");
543 return false;
544 }
545
546 salt = talloc_strdup(mem_ctx, std_salt);
547 if (!salt) {
548 return false;
549 }
550
551 SAFE_FREE(std_salt);
552
553 /* if it's a Windows functional domain, we have to look for the UPN */
554
555 if (domain_func == DS_DOMAIN_FUNCTION_2000) {
556 char *upn;
557
558 upn = ads_get_upn(r->in.ads, mem_ctx,
559 r->in.machine_name);
560 if (upn) {
561 salt = talloc_strdup(mem_ctx, upn);
562 if (!salt) {
563 return false;
564 }
565 }
566 }
567
568 return kerberos_secrets_store_des_salt(salt);
569}
570
571/****************************************************************
572****************************************************************/
573
574static ADS_STATUS libnet_join_post_processing_ads(TALLOC_CTX *mem_ctx,
575 struct libnet_JoinCtx *r)
576{
577 ADS_STATUS status;
578
579 if (!r->in.ads) {
580 status = libnet_join_connect_ads(mem_ctx, r);
581 if (!ADS_ERR_OK(status)) {
582 return status;
583 }
584 }
585
586 status = libnet_join_set_machine_spn(mem_ctx, r);
587 if (!ADS_ERR_OK(status)) {
588 libnet_join_set_error_string(mem_ctx, r,
589 "failed to set machine spn: %s",
590 ads_errstr(status));
591 return status;
592 }
593
594 status = libnet_join_set_os_attributes(mem_ctx, r);
595 if (!ADS_ERR_OK(status)) {
596 libnet_join_set_error_string(mem_ctx, r,
597 "failed to set machine os attributes: %s",
598 ads_errstr(status));
599 return status;
600 }
601
602 status = libnet_join_set_machine_upn(mem_ctx, r);
603 if (!ADS_ERR_OK(status)) {
604 libnet_join_set_error_string(mem_ctx, r,
605 "failed to set machine upn: %s",
606 ads_errstr(status));
607 return status;
608 }
609
610 if (!libnet_join_derive_salting_principal(mem_ctx, r)) {
611 return ADS_ERROR_NT(NT_STATUS_UNSUCCESSFUL);
612 }
613
614 if (!libnet_join_create_keytab(mem_ctx, r)) {
615 libnet_join_set_error_string(mem_ctx, r,
616 "failed to create kerberos keytab");
617 return ADS_ERROR_NT(NT_STATUS_UNSUCCESSFUL);
618 }
619
620 return ADS_SUCCESS;
621}
622#endif /* WITH_ADS */
623
624/****************************************************************
625 Store the machine password and domain SID
626****************************************************************/
627
628static bool libnet_join_joindomain_store_secrets(TALLOC_CTX *mem_ctx,
629 struct libnet_JoinCtx *r)
630{
631 if (!secrets_store_domain_sid(r->out.netbios_domain_name,
632 r->out.domain_sid))
633 {
634 DEBUG(1,("Failed to save domain sid\n"));
635 return false;
636 }
637
638 if (!secrets_store_machine_password(r->in.machine_password,
639 r->out.netbios_domain_name,
640 r->in.secure_channel_type))
641 {
642 DEBUG(1,("Failed to save machine password\n"));
643 return false;
644 }
645
646 return true;
647}
648
649/****************************************************************
650 Connect dc's IPC$ share
651****************************************************************/
652
653static NTSTATUS libnet_join_connect_dc_ipc(const char *dc,
654 const char *user,
655 const char *pass,
656 bool use_kerberos,
657 struct cli_state **cli)
658{
659 int flags = 0;
660
661 if (use_kerberos) {
662 flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
663 }
664
665 if (use_kerberos && pass) {
666 flags |= CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS;
667 }
668
669 return cli_full_connection(cli, NULL,
670 dc,
671 NULL, 0,
672 "IPC$", "IPC",
673 user,
674 NULL,
675 pass,
676 flags,
677 Undefined, NULL);
678}
679
680/****************************************************************
681 Lookup domain dc's info
682****************************************************************/
683
684static NTSTATUS libnet_join_lookup_dc_rpc(TALLOC_CTX *mem_ctx,
685 struct libnet_JoinCtx *r,
686 struct cli_state **cli)
687{
688 struct rpc_pipe_client *pipe_hnd = NULL;
689 POLICY_HND lsa_pol;
690 NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
691 union lsa_PolicyInformation *info = NULL;
692
693 status = libnet_join_connect_dc_ipc(r->in.dc_name,
694 r->in.admin_account,
695 r->in.admin_password,
696 r->in.use_kerberos,
697 cli);
698 if (!NT_STATUS_IS_OK(status)) {
699 goto done;
700 }
701
702 status = cli_rpc_pipe_open_noauth(*cli, &ndr_table_lsarpc.syntax_id,
703 &pipe_hnd);
704 if (!NT_STATUS_IS_OK(status)) {
705 DEBUG(0,("Error connecting to LSA pipe. Error was %s\n",
706 nt_errstr(status)));
707 goto done;
708 }
709
710 status = rpccli_lsa_open_policy(pipe_hnd, mem_ctx, true,
711 SEC_RIGHTS_MAXIMUM_ALLOWED, &lsa_pol);
712 if (!NT_STATUS_IS_OK(status)) {
713 goto done;
714 }
715
716 status = rpccli_lsa_QueryInfoPolicy2(pipe_hnd, mem_ctx,
717 &lsa_pol,
718 LSA_POLICY_INFO_DNS,
719 &info);
720 if (NT_STATUS_IS_OK(status)) {
721 r->out.domain_is_ad = true;
722 r->out.netbios_domain_name = info->dns.name.string;
723 r->out.dns_domain_name = info->dns.dns_domain.string;
724 r->out.forest_name = info->dns.dns_forest.string;
725 r->out.domain_sid = sid_dup_talloc(mem_ctx, info->dns.sid);
726 NT_STATUS_HAVE_NO_MEMORY(r->out.domain_sid);
727 }
728
729 if (!NT_STATUS_IS_OK(status)) {
730 status = rpccli_lsa_QueryInfoPolicy(pipe_hnd, mem_ctx,
731 &lsa_pol,
732 LSA_POLICY_INFO_ACCOUNT_DOMAIN,
733 &info);
734 if (!NT_STATUS_IS_OK(status)) {
735 goto done;
736 }
737
738 r->out.netbios_domain_name = info->account_domain.name.string;
739 r->out.domain_sid = sid_dup_talloc(mem_ctx, info->account_domain.sid);
740 NT_STATUS_HAVE_NO_MEMORY(r->out.domain_sid);
741 }
742
743 rpccli_lsa_Close(pipe_hnd, mem_ctx, &lsa_pol);
744 TALLOC_FREE(pipe_hnd);
745
746 done:
747 return status;
748}
749
750/****************************************************************
751 Do the domain join
752****************************************************************/
753
754static NTSTATUS libnet_join_joindomain_rpc(TALLOC_CTX *mem_ctx,
755 struct libnet_JoinCtx *r,
756 struct cli_state *cli)
757{
758 struct rpc_pipe_client *pipe_hnd = NULL;
759 POLICY_HND sam_pol, domain_pol, user_pol;
760 NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
761 char *acct_name;
762 struct lsa_String lsa_acct_name;
763 uint32_t user_rid;
764 uint32_t acct_flags = ACB_WSTRUST;
765 struct samr_Ids user_rids;
766 struct samr_Ids name_types;
767 union samr_UserInfo user_info;
768
769 struct samr_CryptPassword crypt_pwd;
770 struct samr_CryptPasswordEx crypt_pwd_ex;
771
772 ZERO_STRUCT(sam_pol);
773 ZERO_STRUCT(domain_pol);
774 ZERO_STRUCT(user_pol);
775
776 if (!r->in.machine_password) {
777 r->in.machine_password = talloc_strdup(mem_ctx, generate_random_str(DEFAULT_TRUST_ACCOUNT_PASSWORD_LENGTH));
778 NT_STATUS_HAVE_NO_MEMORY(r->in.machine_password);
779 }
780
781 /* Open the domain */
782
783 status = cli_rpc_pipe_open_noauth(cli, &ndr_table_samr.syntax_id,
784 &pipe_hnd);
785 if (!NT_STATUS_IS_OK(status)) {
786 DEBUG(0,("Error connecting to SAM pipe. Error was %s\n",
787 nt_errstr(status)));
788 goto done;
789 }
790
791 status = rpccli_samr_Connect2(pipe_hnd, mem_ctx,
792 pipe_hnd->desthost,
793 SEC_RIGHTS_MAXIMUM_ALLOWED,
794 &sam_pol);
795 if (!NT_STATUS_IS_OK(status)) {
796 goto done;
797 }
798
799 status = rpccli_samr_OpenDomain(pipe_hnd, mem_ctx,
800 &sam_pol,
801 SEC_RIGHTS_MAXIMUM_ALLOWED,
802 r->out.domain_sid,
803 &domain_pol);
804 if (!NT_STATUS_IS_OK(status)) {
805 goto done;
806 }
807
808 /* Create domain user */
809
810 acct_name = talloc_asprintf(mem_ctx, "%s$", r->in.machine_name);
811 strlower_m(acct_name);
812
813 init_lsa_String(&lsa_acct_name, acct_name);
814
815 if (r->in.join_flags & WKSSVC_JOIN_FLAGS_ACCOUNT_CREATE) {
816 uint32_t access_desired =
817 SEC_GENERIC_READ | SEC_GENERIC_WRITE | SEC_GENERIC_EXECUTE |
818 SEC_STD_WRITE_DAC | SEC_STD_DELETE |
819 SAMR_USER_ACCESS_SET_PASSWORD |
820 SAMR_USER_ACCESS_GET_ATTRIBUTES |
821 SAMR_USER_ACCESS_SET_ATTRIBUTES;
822 uint32_t access_granted = 0;
823
824 /* Don't try to set any acct_flags flags other than ACB_WSTRUST */
825
826 DEBUG(10,("Creating account with desired access mask: %d\n",
827 access_desired));
828
829 status = rpccli_samr_CreateUser2(pipe_hnd, mem_ctx,
830 &domain_pol,
831 &lsa_acct_name,
832 ACB_WSTRUST,
833 access_desired,
834 &user_pol,
835 &access_granted,
836 &user_rid);
837 if (!NT_STATUS_IS_OK(status) &&
838 !NT_STATUS_EQUAL(status, NT_STATUS_USER_EXISTS)) {
839
840 DEBUG(10,("Creation of workstation account failed: %s\n",
841 nt_errstr(status)));
842
843 /* If NT_STATUS_ACCESS_DENIED then we have a valid
844 username/password combo but the user does not have
845 administrator access. */
846
847 if (NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED)) {
848 libnet_join_set_error_string(mem_ctx, r,
849 "User specified does not have "
850 "administrator privileges");
851 }
852
853 goto done;
854 }
855
856 if (NT_STATUS_EQUAL(status, NT_STATUS_USER_EXISTS)) {
857 if (!(r->in.join_flags &
858 WKSSVC_JOIN_FLAGS_DOMAIN_JOIN_IF_JOINED)) {
859 goto done;
860 }
861 }
862
863 /* We *must* do this.... don't ask... */
864
865 if (NT_STATUS_IS_OK(status)) {
866 rpccli_samr_Close(pipe_hnd, mem_ctx, &user_pol);
867 }
868 }
869
870 status = rpccli_samr_LookupNames(pipe_hnd, mem_ctx,
871 &domain_pol,
872 1,
873 &lsa_acct_name,
874 &user_rids,
875 &name_types);
876 if (!NT_STATUS_IS_OK(status)) {
877 goto done;
878 }
879
880 if (name_types.ids[0] != SID_NAME_USER) {
881 DEBUG(0,("%s is not a user account (type=%d)\n",
882 acct_name, name_types.ids[0]));
883 status = NT_STATUS_INVALID_WORKSTATION;
884 goto done;
885 }
886
887 user_rid = user_rids.ids[0];
888
889 /* Open handle on user */
890
891 status = rpccli_samr_OpenUser(pipe_hnd, mem_ctx,
892 &domain_pol,
893 SEC_RIGHTS_MAXIMUM_ALLOWED,
894 user_rid,
895 &user_pol);
896 if (!NT_STATUS_IS_OK(status)) {
897 goto done;
898 }
899
900 /* Fill in the additional account flags now */
901
902 acct_flags |= ACB_PWNOEXP;
903 if (r->out.domain_is_ad) {
904#if !defined(ENCTYPE_ARCFOUR_HMAC)
905 acct_flags |= ACB_USE_DES_KEY_ONLY;
906#endif
907 ;;
908 }
909
910 /* Set account flags on machine account */
911 ZERO_STRUCT(user_info.info16);
912 user_info.info16.acct_flags = acct_flags;
913
914 status = rpccli_samr_SetUserInfo(pipe_hnd, mem_ctx,
915 &user_pol,
916 16,
917 &user_info);
918
919 if (!NT_STATUS_IS_OK(status)) {
920
921 rpccli_samr_DeleteUser(pipe_hnd, mem_ctx,
922 &user_pol);
923
924 libnet_join_set_error_string(mem_ctx, r,
925 "Failed to set account flags for machine account (%s)\n",
926 nt_errstr(status));
927 goto done;
928 }
929
930 /* Set password on machine account - first try level 26 */
931
932 init_samr_CryptPasswordEx(r->in.machine_password,
933 &cli->user_session_key,
934 &crypt_pwd_ex);
935
936 init_samr_user_info26(&user_info.info26, &crypt_pwd_ex,
937 PASS_DONT_CHANGE_AT_NEXT_LOGON);
938
939 status = rpccli_samr_SetUserInfo2(pipe_hnd, mem_ctx,
940 &user_pol,
941 26,
942 &user_info);
943
944 if (NT_STATUS_EQUAL(status, NT_STATUS(DCERPC_FAULT_INVALID_TAG))) {
945
946 /* retry with level 24 */
947
948 init_samr_CryptPassword(r->in.machine_password,
949 &cli->user_session_key,
950 &crypt_pwd);
951
952 init_samr_user_info24(&user_info.info24, &crypt_pwd,
953 PASS_DONT_CHANGE_AT_NEXT_LOGON);
954
955 status = rpccli_samr_SetUserInfo2(pipe_hnd, mem_ctx,
956 &user_pol,
957 24,
958 &user_info);
959 }
960
961 if (!NT_STATUS_IS_OK(status)) {
962
963 rpccli_samr_DeleteUser(pipe_hnd, mem_ctx,
964 &user_pol);
965
966 libnet_join_set_error_string(mem_ctx, r,
967 "Failed to set password for machine account (%s)\n",
968 nt_errstr(status));
969 goto done;
970 }
971
972 status = NT_STATUS_OK;
973
974 done:
975 if (!pipe_hnd) {
976 return status;
977 }
978
979 if (is_valid_policy_hnd(&sam_pol)) {
980 rpccli_samr_Close(pipe_hnd, mem_ctx, &sam_pol);
981 }
982 if (is_valid_policy_hnd(&domain_pol)) {
983 rpccli_samr_Close(pipe_hnd, mem_ctx, &domain_pol);
984 }
985 if (is_valid_policy_hnd(&user_pol)) {
986 rpccli_samr_Close(pipe_hnd, mem_ctx, &user_pol);
987 }
988 TALLOC_FREE(pipe_hnd);
989
990 return status;
991}
992
993/****************************************************************
994****************************************************************/
995
996NTSTATUS libnet_join_ok(const char *netbios_domain_name,
997 const char *machine_name,
998 const char *dc_name)
999{
1000 uint32_t neg_flags = NETLOGON_NEG_AUTH2_ADS_FLAGS;
1001 struct cli_state *cli = NULL;
1002 struct rpc_pipe_client *pipe_hnd = NULL;
1003 struct rpc_pipe_client *netlogon_pipe = NULL;
1004 NTSTATUS status;
1005 char *machine_password = NULL;
1006 char *machine_account = NULL;
1007
1008 if (!dc_name) {
1009 return NT_STATUS_INVALID_PARAMETER;
1010 }
1011
1012 if (!secrets_init()) {
1013 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
1014 }
1015
1016 machine_password = secrets_fetch_machine_password(netbios_domain_name,
1017 NULL, NULL);
1018 if (!machine_password) {
1019 return NT_STATUS_NO_TRUST_LSA_SECRET;
1020 }
1021
1022 if (asprintf(&machine_account, "%s$", machine_name) == -1) {
1023 SAFE_FREE(machine_password);
1024 return NT_STATUS_NO_MEMORY;
1025 }
1026
1027 status = cli_full_connection(&cli, NULL,
1028 dc_name,
1029 NULL, 0,
1030 "IPC$", "IPC",
1031 machine_account,
1032 NULL,
1033 machine_password,
1034 0,
1035 Undefined, NULL);
1036 free(machine_account);
1037 free(machine_password);
1038
1039 if (!NT_STATUS_IS_OK(status)) {
1040 status = cli_full_connection(&cli, NULL,
1041 dc_name,
1042 NULL, 0,
1043 "IPC$", "IPC",
1044 "",
1045 NULL,
1046 "",
1047 0,
1048 Undefined, NULL);
1049 }
1050
1051 if (!NT_STATUS_IS_OK(status)) {
1052 return status;
1053 }
1054
1055 status = get_schannel_session_key(cli, netbios_domain_name,
1056 &neg_flags, &netlogon_pipe);
1057 if (!NT_STATUS_IS_OK(status)) {
1058 if (NT_STATUS_EQUAL(status, NT_STATUS_INVALID_NETWORK_RESPONSE)) {
1059 cli_shutdown(cli);
1060 return NT_STATUS_OK;
1061 }
1062
1063 DEBUG(0,("libnet_join_ok: failed to get schannel session "
1064 "key from server %s for domain %s. Error was %s\n",
1065 cli->desthost, netbios_domain_name, nt_errstr(status)));
1066 cli_shutdown(cli);
1067 return status;
1068 }
1069
1070 if (!lp_client_schannel()) {
1071 cli_shutdown(cli);
1072 return NT_STATUS_OK;
1073 }
1074
1075 status = cli_rpc_pipe_open_schannel_with_key(
1076 cli, &ndr_table_netlogon.syntax_id, PIPE_AUTH_LEVEL_PRIVACY,
1077 netbios_domain_name, netlogon_pipe->dc, &pipe_hnd);
1078
1079 cli_shutdown(cli);
1080
1081 if (!NT_STATUS_IS_OK(status)) {
1082 DEBUG(0,("libnet_join_ok: failed to open schannel session "
1083 "on netlogon pipe to server %s for domain %s. "
1084 "Error was %s\n",
1085 cli->desthost, netbios_domain_name, nt_errstr(status)));
1086 return status;
1087 }
1088
1089 return NT_STATUS_OK;
1090}
1091
1092/****************************************************************
1093****************************************************************/
1094
1095static WERROR libnet_join_post_verify(TALLOC_CTX *mem_ctx,
1096 struct libnet_JoinCtx *r)
1097{
1098 NTSTATUS status;
1099
1100 status = libnet_join_ok(r->out.netbios_domain_name,
1101 r->in.machine_name,
1102 r->in.dc_name);
1103 if (!NT_STATUS_IS_OK(status)) {
1104 libnet_join_set_error_string(mem_ctx, r,
1105 "failed to verify domain membership after joining: %s",
1106 get_friendly_nt_error_msg(status));
1107 return WERR_SETUP_NOT_JOINED;
1108 }
1109
1110 return WERR_OK;
1111}
1112
1113/****************************************************************
1114****************************************************************/
1115
1116static bool libnet_join_unjoindomain_remove_secrets(TALLOC_CTX *mem_ctx,
1117 struct libnet_UnjoinCtx *r)
1118{
1119 if (!secrets_delete_machine_password_ex(lp_workgroup())) {
1120 return false;
1121 }
1122
1123 if (!secrets_delete_domain_sid(lp_workgroup())) {
1124 return false;
1125 }
1126
1127 return true;
1128}
1129
1130/****************************************************************
1131****************************************************************/
1132
1133static NTSTATUS libnet_join_unjoindomain_rpc(TALLOC_CTX *mem_ctx,
1134 struct libnet_UnjoinCtx *r)
1135{
1136 struct cli_state *cli = NULL;
1137 struct rpc_pipe_client *pipe_hnd = NULL;
1138 POLICY_HND sam_pol, domain_pol, user_pol;
1139 NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
1140 char *acct_name;
1141 uint32_t user_rid;
1142 struct lsa_String lsa_acct_name;
1143 struct samr_Ids user_rids;
1144 struct samr_Ids name_types;
1145 union samr_UserInfo *info = NULL;
1146
1147 ZERO_STRUCT(sam_pol);
1148 ZERO_STRUCT(domain_pol);
1149 ZERO_STRUCT(user_pol);
1150
1151 status = libnet_join_connect_dc_ipc(r->in.dc_name,
1152 r->in.admin_account,
1153 r->in.admin_password,
1154 r->in.use_kerberos,
1155 &cli);
1156 if (!NT_STATUS_IS_OK(status)) {
1157 goto done;
1158 }
1159
1160 /* Open the domain */
1161
1162 status = cli_rpc_pipe_open_noauth(cli, &ndr_table_samr.syntax_id,
1163 &pipe_hnd);
1164 if (!NT_STATUS_IS_OK(status)) {
1165 DEBUG(0,("Error connecting to SAM pipe. Error was %s\n",
1166 nt_errstr(status)));
1167 goto done;
1168 }
1169
1170 status = rpccli_samr_Connect2(pipe_hnd, mem_ctx,
1171 pipe_hnd->desthost,
1172 SEC_RIGHTS_MAXIMUM_ALLOWED,
1173 &sam_pol);
1174 if (!NT_STATUS_IS_OK(status)) {
1175 goto done;
1176 }
1177
1178 status = rpccli_samr_OpenDomain(pipe_hnd, mem_ctx,
1179 &sam_pol,
1180 SEC_RIGHTS_MAXIMUM_ALLOWED,
1181 r->in.domain_sid,
1182 &domain_pol);
1183 if (!NT_STATUS_IS_OK(status)) {
1184 goto done;
1185 }
1186
1187 /* Create domain user */
1188
1189 acct_name = talloc_asprintf(mem_ctx, "%s$", r->in.machine_name);
1190 strlower_m(acct_name);
1191
1192 init_lsa_String(&lsa_acct_name, acct_name);
1193
1194 status = rpccli_samr_LookupNames(pipe_hnd, mem_ctx,
1195 &domain_pol,
1196 1,
1197 &lsa_acct_name,
1198 &user_rids,
1199 &name_types);
1200
1201 if (!NT_STATUS_IS_OK(status)) {
1202 goto done;
1203 }
1204
1205 if (name_types.ids[0] != SID_NAME_USER) {
1206 DEBUG(0, ("%s is not a user account (type=%d)\n", acct_name,
1207 name_types.ids[0]));
1208 status = NT_STATUS_INVALID_WORKSTATION;
1209 goto done;
1210 }
1211
1212 user_rid = user_rids.ids[0];
1213
1214 /* Open handle on user */
1215
1216 status = rpccli_samr_OpenUser(pipe_hnd, mem_ctx,
1217 &domain_pol,
1218 SEC_RIGHTS_MAXIMUM_ALLOWED,
1219 user_rid,
1220 &user_pol);
1221 if (!NT_STATUS_IS_OK(status)) {
1222 goto done;
1223 }
1224
1225 /* Get user info */
1226
1227 status = rpccli_samr_QueryUserInfo(pipe_hnd, mem_ctx,
1228 &user_pol,
1229 16,
1230 &info);
1231 if (!NT_STATUS_IS_OK(status)) {
1232 rpccli_samr_Close(pipe_hnd, mem_ctx, &user_pol);
1233 goto done;
1234 }
1235
1236 /* now disable and setuser info */
1237
1238 info->info16.acct_flags |= ACB_DISABLED;
1239
1240 status = rpccli_samr_SetUserInfo(pipe_hnd, mem_ctx,
1241 &user_pol,
1242 16,
1243 info);
1244
1245 rpccli_samr_Close(pipe_hnd, mem_ctx, &user_pol);
1246
1247done:
1248 if (pipe_hnd) {
1249 if (is_valid_policy_hnd(&domain_pol)) {
1250 rpccli_samr_Close(pipe_hnd, mem_ctx, &domain_pol);
1251 }
1252 if (is_valid_policy_hnd(&sam_pol)) {
1253 rpccli_samr_Close(pipe_hnd, mem_ctx, &sam_pol);
1254 }
1255 TALLOC_FREE(pipe_hnd);
1256 }
1257
1258 if (cli) {
1259 cli_shutdown(cli);
1260 }
1261
1262 return status;
1263}
1264
1265/****************************************************************
1266****************************************************************/
1267
1268static WERROR do_join_modify_vals_config(struct libnet_JoinCtx *r)
1269{
1270 WERROR werr;
1271 struct smbconf_ctx *ctx;
1272
1273 werr = smbconf_init_reg(r, &ctx, NULL);
1274 if (!W_ERROR_IS_OK(werr)) {
1275 goto done;
1276 }
1277
1278 if (!(r->in.join_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE)) {
1279
1280 werr = smbconf_set_global_parameter(ctx, "security", "user");
1281 W_ERROR_NOT_OK_GOTO_DONE(werr);
1282
1283 werr = smbconf_set_global_parameter(ctx, "workgroup",
1284 r->in.domain_name);
1285
1286 smbconf_delete_global_parameter(ctx, "realm");
1287 goto done;
1288 }
1289
1290 werr = smbconf_set_global_parameter(ctx, "security", "domain");
1291 W_ERROR_NOT_OK_GOTO_DONE(werr);
1292
1293 werr = smbconf_set_global_parameter(ctx, "workgroup",
1294 r->out.netbios_domain_name);
1295 W_ERROR_NOT_OK_GOTO_DONE(werr);
1296
1297 if (r->out.domain_is_ad) {
1298 werr = smbconf_set_global_parameter(ctx, "security", "ads");
1299 W_ERROR_NOT_OK_GOTO_DONE(werr);
1300
1301 werr = smbconf_set_global_parameter(ctx, "realm",
1302 r->out.dns_domain_name);
1303 W_ERROR_NOT_OK_GOTO_DONE(werr);
1304 }
1305
1306 done:
1307 smbconf_shutdown(ctx);
1308 return werr;
1309}
1310
1311/****************************************************************
1312****************************************************************/
1313
1314static WERROR do_unjoin_modify_vals_config(struct libnet_UnjoinCtx *r)
1315{
1316 WERROR werr = WERR_OK;
1317 struct smbconf_ctx *ctx;
1318
1319 werr = smbconf_init_reg(r, &ctx, NULL);
1320 if (!W_ERROR_IS_OK(werr)) {
1321 goto done;
1322 }
1323
1324 if (r->in.unjoin_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE) {
1325
1326 werr = smbconf_set_global_parameter(ctx, "security", "user");
1327 W_ERROR_NOT_OK_GOTO_DONE(werr);
1328
1329 werr = smbconf_delete_global_parameter(ctx, "workgroup");
1330 W_ERROR_NOT_OK_GOTO_DONE(werr);
1331
1332 smbconf_delete_global_parameter(ctx, "realm");
1333 }
1334
1335 done:
1336 smbconf_shutdown(ctx);
1337 return werr;
1338}
1339
1340/****************************************************************
1341****************************************************************/
1342
1343static WERROR do_JoinConfig(struct libnet_JoinCtx *r)
1344{
1345 WERROR werr;
1346
1347 if (!W_ERROR_IS_OK(r->out.result)) {
1348 return r->out.result;
1349 }
1350
1351 if (!r->in.modify_config) {
1352 return WERR_OK;
1353 }
1354
1355 werr = do_join_modify_vals_config(r);
1356 if (!W_ERROR_IS_OK(werr)) {
1357 return werr;
1358 }
1359
1360 lp_load(get_dyn_CONFIGFILE(),true,false,false,true);
1361
1362 r->out.modified_config = true;
1363 r->out.result = werr;
1364
1365 return werr;
1366}
1367
1368/****************************************************************
1369****************************************************************/
1370
1371static WERROR libnet_unjoin_config(struct libnet_UnjoinCtx *r)
1372{
1373 WERROR werr;
1374
1375 if (!W_ERROR_IS_OK(r->out.result)) {
1376 return r->out.result;
1377 }
1378
1379 if (!r->in.modify_config) {
1380 return WERR_OK;
1381 }
1382
1383 werr = do_unjoin_modify_vals_config(r);
1384 if (!W_ERROR_IS_OK(werr)) {
1385 return werr;
1386 }
1387
1388 lp_load(get_dyn_CONFIGFILE(),true,false,false,true);
1389
1390 r->out.modified_config = true;
1391 r->out.result = werr;
1392
1393 return werr;
1394}
1395
1396/****************************************************************
1397****************************************************************/
1398
1399static bool libnet_parse_domain_dc(TALLOC_CTX *mem_ctx,
1400 const char *domain_str,
1401 const char **domain_p,
1402 const char **dc_p)
1403{
1404 char *domain = NULL;
1405 char *dc = NULL;
1406 const char *p = NULL;
1407
1408 if (!domain_str || !domain_p || !dc_p) {
1409 return false;
1410 }
1411
1412 p = strchr_m(domain_str, '\\');
1413
1414 if (p != NULL) {
1415 domain = talloc_strndup(mem_ctx, domain_str,
1416 PTR_DIFF(p, domain_str));
1417 dc = talloc_strdup(mem_ctx, p+1);
1418 if (!dc) {
1419 return false;
1420 }
1421 } else {
1422 domain = talloc_strdup(mem_ctx, domain_str);
1423 dc = NULL;
1424 }
1425 if (!domain) {
1426 return false;
1427 }
1428
1429 *domain_p = domain;
1430
1431 if (!*dc_p && dc) {
1432 *dc_p = dc;
1433 }
1434
1435 return true;
1436}
1437
1438/****************************************************************
1439****************************************************************/
1440
1441static WERROR libnet_join_pre_processing(TALLOC_CTX *mem_ctx,
1442 struct libnet_JoinCtx *r)
1443{
1444 if (!r->in.domain_name) {
1445 libnet_join_set_error_string(mem_ctx, r,
1446 "No domain name defined");
1447 return WERR_INVALID_PARAM;
1448 }
1449
1450 if (!libnet_parse_domain_dc(mem_ctx, r->in.domain_name,
1451 &r->in.domain_name,
1452 &r->in.dc_name)) {
1453 libnet_join_set_error_string(mem_ctx, r,
1454 "Failed to parse domain name");
1455 return WERR_INVALID_PARAM;
1456 }
1457
1458 if (IS_DC) {
1459 return WERR_SETUP_DOMAIN_CONTROLLER;
1460 }
1461
1462 if (!secrets_init()) {
1463 libnet_join_set_error_string(mem_ctx, r,
1464 "Unable to open secrets database");
1465 return WERR_CAN_NOT_COMPLETE;
1466 }
1467
1468 return WERR_OK;
1469}
1470
1471/****************************************************************
1472****************************************************************/
1473
1474static void libnet_join_add_dom_rids_to_builtins(struct dom_sid *domain_sid)
1475{
1476 NTSTATUS status;
1477
1478 /* Try adding dom admins to builtin\admins. Only log failures. */
1479 status = create_builtin_administrators(domain_sid);
1480 if (NT_STATUS_EQUAL(status, NT_STATUS_PROTOCOL_UNREACHABLE)) {
1481 DEBUG(10,("Unable to auto-add domain administrators to "
1482 "BUILTIN\\Administrators during join because "
1483 "winbindd must be running."));
1484 } else if (!NT_STATUS_IS_OK(status)) {
1485 DEBUG(5, ("Failed to auto-add domain administrators to "
1486 "BUILTIN\\Administrators during join: %s\n",
1487 nt_errstr(status)));
1488 }
1489
1490 /* Try adding dom users to builtin\users. Only log failures. */
1491 status = create_builtin_users(domain_sid);
1492 if (NT_STATUS_EQUAL(status, NT_STATUS_PROTOCOL_UNREACHABLE)) {
1493 DEBUG(10,("Unable to auto-add domain users to BUILTIN\\users "
1494 "during join because winbindd must be running."));
1495 } else if (!NT_STATUS_IS_OK(status)) {
1496 DEBUG(5, ("Failed to auto-add domain administrators to "
1497 "BUILTIN\\Administrators during join: %s\n",
1498 nt_errstr(status)));
1499 }
1500}
1501
1502/****************************************************************
1503****************************************************************/
1504
1505static WERROR libnet_join_post_processing(TALLOC_CTX *mem_ctx,
1506 struct libnet_JoinCtx *r)
1507{
1508 WERROR werr;
1509
1510 if (!W_ERROR_IS_OK(r->out.result)) {
1511 return r->out.result;
1512 }
1513
1514 werr = do_JoinConfig(r);
1515 if (!W_ERROR_IS_OK(werr)) {
1516 return werr;
1517 }
1518
1519 if (!(r->in.join_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE)) {
1520 return WERR_OK;
1521 }
1522
1523 saf_join_store(r->out.netbios_domain_name, r->in.dc_name);
1524 if (r->out.dns_domain_name) {
1525 saf_join_store(r->out.dns_domain_name, r->in.dc_name);
1526 }
1527
1528#ifdef WITH_ADS
1529 if (r->out.domain_is_ad) {
1530 ADS_STATUS ads_status;
1531
1532 ads_status = libnet_join_post_processing_ads(mem_ctx, r);
1533 if (!ADS_ERR_OK(ads_status)) {
1534 return WERR_GENERAL_FAILURE;
1535 }
1536 }
1537#endif /* WITH_ADS */
1538
1539 libnet_join_add_dom_rids_to_builtins(r->out.domain_sid);
1540
1541 return WERR_OK;
1542}
1543
1544/****************************************************************
1545****************************************************************/
1546
1547static int libnet_destroy_JoinCtx(struct libnet_JoinCtx *r)
1548{
1549 const char *krb5_cc_env = NULL;
1550
1551 if (r->in.ads) {
1552 ads_destroy(&r->in.ads);
1553 }
1554
1555 krb5_cc_env = getenv(KRB5_ENV_CCNAME);
1556 if (krb5_cc_env && StrCaseCmp(krb5_cc_env, "MEMORY:libnetjoin")) {
1557 unsetenv(KRB5_ENV_CCNAME);
1558 }
1559
1560 return 0;
1561}
1562
1563/****************************************************************
1564****************************************************************/
1565
1566static int libnet_destroy_UnjoinCtx(struct libnet_UnjoinCtx *r)
1567{
1568 const char *krb5_cc_env = NULL;
1569
1570 if (r->in.ads) {
1571 ads_destroy(&r->in.ads);
1572 }
1573
1574 krb5_cc_env = getenv(KRB5_ENV_CCNAME);
1575 if (krb5_cc_env && StrCaseCmp(krb5_cc_env, "MEMORY:libnetjoin")) {
1576 unsetenv(KRB5_ENV_CCNAME);
1577 }
1578
1579 return 0;
1580}
1581
1582/****************************************************************
1583****************************************************************/
1584
1585WERROR libnet_init_JoinCtx(TALLOC_CTX *mem_ctx,
1586 struct libnet_JoinCtx **r)
1587{
1588 struct libnet_JoinCtx *ctx;
1589 const char *krb5_cc_env = NULL;
1590
1591 ctx = talloc_zero(mem_ctx, struct libnet_JoinCtx);
1592 if (!ctx) {
1593 return WERR_NOMEM;
1594 }
1595
1596 talloc_set_destructor(ctx, libnet_destroy_JoinCtx);
1597
1598 ctx->in.machine_name = talloc_strdup(mem_ctx, global_myname());
1599 W_ERROR_HAVE_NO_MEMORY(ctx->in.machine_name);
1600
1601 krb5_cc_env = getenv(KRB5_ENV_CCNAME);
1602 if (!krb5_cc_env || (strlen(krb5_cc_env) == 0)) {
1603 krb5_cc_env = talloc_strdup(mem_ctx, "MEMORY:libnetjoin");
1604 W_ERROR_HAVE_NO_MEMORY(krb5_cc_env);
1605 setenv(KRB5_ENV_CCNAME, krb5_cc_env, 1);
1606 }
1607
1608 ctx->in.secure_channel_type = SEC_CHAN_WKSTA;
1609
1610 *r = ctx;
1611
1612 return WERR_OK;
1613}
1614
1615/****************************************************************
1616****************************************************************/
1617
1618WERROR libnet_init_UnjoinCtx(TALLOC_CTX *mem_ctx,
1619 struct libnet_UnjoinCtx **r)
1620{
1621 struct libnet_UnjoinCtx *ctx;
1622 const char *krb5_cc_env = NULL;
1623
1624 ctx = talloc_zero(mem_ctx, struct libnet_UnjoinCtx);
1625 if (!ctx) {
1626 return WERR_NOMEM;
1627 }
1628
1629 talloc_set_destructor(ctx, libnet_destroy_UnjoinCtx);
1630
1631 ctx->in.machine_name = talloc_strdup(mem_ctx, global_myname());
1632 W_ERROR_HAVE_NO_MEMORY(ctx->in.machine_name);
1633
1634 krb5_cc_env = getenv(KRB5_ENV_CCNAME);
1635 if (!krb5_cc_env || (strlen(krb5_cc_env) == 0)) {
1636 krb5_cc_env = talloc_strdup(mem_ctx, "MEMORY:libnetjoin");
1637 W_ERROR_HAVE_NO_MEMORY(krb5_cc_env);
1638 setenv(KRB5_ENV_CCNAME, krb5_cc_env, 1);
1639 }
1640
1641 *r = ctx;
1642
1643 return WERR_OK;
1644}
1645
1646/****************************************************************
1647****************************************************************/
1648
1649static WERROR libnet_join_check_config(TALLOC_CTX *mem_ctx,
1650 struct libnet_JoinCtx *r)
1651{
1652 bool valid_security = false;
1653 bool valid_workgroup = false;
1654 bool valid_realm = false;
1655
1656 /* check if configuration is already set correctly */
1657
1658 valid_workgroup = strequal(lp_workgroup(), r->out.netbios_domain_name);
1659
1660 switch (r->out.domain_is_ad) {
1661 case false:
1662 valid_security = (lp_security() == SEC_DOMAIN);
1663 if (valid_workgroup && valid_security) {
1664 /* nothing to be done */
1665 return WERR_OK;
1666 }
1667 break;
1668 case true:
1669 valid_realm = strequal(lp_realm(), r->out.dns_domain_name);
1670 switch (lp_security()) {
1671 case SEC_DOMAIN:
1672 case SEC_ADS:
1673 valid_security = true;
1674 }
1675
1676 if (valid_workgroup && valid_realm && valid_security) {
1677 /* nothing to be done */
1678 return WERR_OK;
1679 }
1680 break;
1681 }
1682
1683 /* check if we are supposed to manipulate configuration */
1684
1685 if (!r->in.modify_config) {
1686
1687 char *wrong_conf = talloc_strdup(mem_ctx, "");
1688
1689 if (!valid_workgroup) {
1690 wrong_conf = talloc_asprintf_append(wrong_conf,
1691 "\"workgroup\" set to '%s', should be '%s'",
1692 lp_workgroup(), r->out.netbios_domain_name);
1693 W_ERROR_HAVE_NO_MEMORY(wrong_conf);
1694 }
1695
1696 if (!valid_realm) {
1697 wrong_conf = talloc_asprintf_append(wrong_conf,
1698 "\"realm\" set to '%s', should be '%s'",
1699 lp_realm(), r->out.dns_domain_name);
1700 W_ERROR_HAVE_NO_MEMORY(wrong_conf);
1701 }
1702
1703 if (!valid_security) {
1704 const char *sec = NULL;
1705 switch (lp_security()) {
1706 case SEC_SHARE: sec = "share"; break;
1707 case SEC_USER: sec = "user"; break;
1708 case SEC_DOMAIN: sec = "domain"; break;
1709 case SEC_ADS: sec = "ads"; break;
1710 }
1711 wrong_conf = talloc_asprintf_append(wrong_conf,
1712 "\"security\" set to '%s', should be %s",
1713 sec, r->out.domain_is_ad ?
1714 "either 'domain' or 'ads'" : "'domain'");
1715 W_ERROR_HAVE_NO_MEMORY(wrong_conf);
1716 }
1717
1718 libnet_join_set_error_string(mem_ctx, r,
1719 "Invalid configuration (%s) and configuration modification "
1720 "was not requested", wrong_conf);
1721 return WERR_CAN_NOT_COMPLETE;
1722 }
1723
1724 /* check if we are able to manipulate configuration */
1725
1726 if (!lp_config_backend_is_registry()) {
1727 libnet_join_set_error_string(mem_ctx, r,
1728 "Configuration manipulation requested but not "
1729 "supported by backend");
1730 return WERR_NOT_SUPPORTED;
1731 }
1732
1733 return WERR_OK;
1734}
1735
1736/****************************************************************
1737****************************************************************/
1738
1739static WERROR libnet_DomainJoin(TALLOC_CTX *mem_ctx,
1740 struct libnet_JoinCtx *r)
1741{
1742 NTSTATUS status;
1743 WERROR werr;
1744 struct cli_state *cli = NULL;
1745#ifdef WITH_ADS
1746 ADS_STATUS ads_status;
1747#endif /* WITH_ADS */
1748
1749 if (!r->in.dc_name) {
1750 struct netr_DsRGetDCNameInfo *info;
1751 const char *dc;
1752 status = dsgetdcname(mem_ctx,
1753 r->in.msg_ctx,
1754 r->in.domain_name,
1755 NULL,
1756 NULL,
1757 DS_FORCE_REDISCOVERY |
1758 DS_DIRECTORY_SERVICE_REQUIRED |
1759 DS_WRITABLE_REQUIRED |
1760 DS_RETURN_DNS_NAME,
1761 &info);
1762 if (!NT_STATUS_IS_OK(status)) {
1763 libnet_join_set_error_string(mem_ctx, r,
1764 "failed to find DC for domain %s",
1765 r->in.domain_name,
1766 get_friendly_nt_error_msg(status));
1767 return WERR_DOMAIN_CONTROLLER_NOT_FOUND;
1768 }
1769
1770 dc = strip_hostname(info->dc_unc);
1771 r->in.dc_name = talloc_strdup(mem_ctx, dc);
1772 W_ERROR_HAVE_NO_MEMORY(r->in.dc_name);
1773 }
1774
1775 status = libnet_join_lookup_dc_rpc(mem_ctx, r, &cli);
1776 if (!NT_STATUS_IS_OK(status)) {
1777 libnet_join_set_error_string(mem_ctx, r,
1778 "failed to lookup DC info for domain '%s' over rpc: %s",
1779 r->in.domain_name, get_friendly_nt_error_msg(status));
1780 return ntstatus_to_werror(status);
1781 }
1782
1783 werr = libnet_join_check_config(mem_ctx, r);
1784 if (!W_ERROR_IS_OK(werr)) {
1785 goto done;
1786 }
1787
1788#ifdef WITH_ADS
1789 if (r->out.domain_is_ad && r->in.account_ou) {
1790
1791 ads_status = libnet_join_connect_ads(mem_ctx, r);
1792 if (!ADS_ERR_OK(ads_status)) {
1793 return WERR_DEFAULT_JOIN_REQUIRED;
1794 }
1795
1796 ads_status = libnet_join_precreate_machine_acct(mem_ctx, r);
1797 if (!ADS_ERR_OK(ads_status)) {
1798 libnet_join_set_error_string(mem_ctx, r,
1799 "failed to precreate account in ou %s: %s",
1800 r->in.account_ou,
1801 ads_errstr(ads_status));
1802 return WERR_DEFAULT_JOIN_REQUIRED;
1803 }
1804
1805 r->in.join_flags &= ~WKSSVC_JOIN_FLAGS_ACCOUNT_CREATE;
1806 }
1807#endif /* WITH_ADS */
1808
1809 status = libnet_join_joindomain_rpc(mem_ctx, r, cli);
1810 if (!NT_STATUS_IS_OK(status)) {
1811 libnet_join_set_error_string(mem_ctx, r,
1812 "failed to join domain '%s' over rpc: %s",
1813 r->in.domain_name, get_friendly_nt_error_msg(status));
1814 if (NT_STATUS_EQUAL(status, NT_STATUS_USER_EXISTS)) {
1815 return WERR_SETUP_ALREADY_JOINED;
1816 }
1817 werr = ntstatus_to_werror(status);
1818 goto done;
1819 }
1820
1821 if (!libnet_join_joindomain_store_secrets(mem_ctx, r)) {
1822 werr = WERR_SETUP_NOT_JOINED;
1823 goto done;
1824 }
1825
1826 werr = WERR_OK;
1827
1828 done:
1829 if (cli) {
1830 cli_shutdown(cli);
1831 }
1832
1833 return werr;
1834}
1835
1836/****************************************************************
1837****************************************************************/
1838
1839static WERROR libnet_join_rollback(TALLOC_CTX *mem_ctx,
1840 struct libnet_JoinCtx *r)
1841{
1842 WERROR werr;
1843 struct libnet_UnjoinCtx *u = NULL;
1844
1845 werr = libnet_init_UnjoinCtx(mem_ctx, &u);
1846 if (!W_ERROR_IS_OK(werr)) {
1847 return werr;
1848 }
1849
1850 u->in.debug = r->in.debug;
1851 u->in.dc_name = r->in.dc_name;
1852 u->in.domain_name = r->in.domain_name;
1853 u->in.admin_account = r->in.admin_account;
1854 u->in.admin_password = r->in.admin_password;
1855 u->in.modify_config = r->in.modify_config;
1856 u->in.unjoin_flags = WKSSVC_JOIN_FLAGS_JOIN_TYPE |
1857 WKSSVC_JOIN_FLAGS_ACCOUNT_DELETE;
1858
1859 werr = libnet_Unjoin(mem_ctx, u);
1860 TALLOC_FREE(u);
1861
1862 return werr;
1863}
1864
1865/****************************************************************
1866****************************************************************/
1867
1868WERROR libnet_Join(TALLOC_CTX *mem_ctx,
1869 struct libnet_JoinCtx *r)
1870{
1871 WERROR werr;
1872
1873 if (r->in.debug) {
1874 LIBNET_JOIN_IN_DUMP_CTX(mem_ctx, r);
1875 }
1876
1877 werr = libnet_join_pre_processing(mem_ctx, r);
1878 if (!W_ERROR_IS_OK(werr)) {
1879 goto done;
1880 }
1881
1882 if (r->in.join_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE) {
1883 werr = libnet_DomainJoin(mem_ctx, r);
1884 if (!W_ERROR_IS_OK(werr)) {
1885 goto done;
1886 }
1887 }
1888
1889 werr = libnet_join_post_processing(mem_ctx, r);
1890 if (!W_ERROR_IS_OK(werr)) {
1891 goto done;
1892 }
1893
1894 if (r->in.join_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE) {
1895 werr = libnet_join_post_verify(mem_ctx, r);
1896 if (!W_ERROR_IS_OK(werr)) {
1897 libnet_join_rollback(mem_ctx, r);
1898 }
1899 }
1900
1901 done:
1902 r->out.result = werr;
1903
1904 if (r->in.debug) {
1905 LIBNET_JOIN_OUT_DUMP_CTX(mem_ctx, r);
1906 }
1907 return werr;
1908}
1909
1910/****************************************************************
1911****************************************************************/
1912
1913static WERROR libnet_DomainUnjoin(TALLOC_CTX *mem_ctx,
1914 struct libnet_UnjoinCtx *r)
1915{
1916 NTSTATUS status;
1917
1918 if (!r->in.domain_sid) {
1919 struct dom_sid sid;
1920 if (!secrets_fetch_domain_sid(lp_workgroup(), &sid)) {
1921 libnet_unjoin_set_error_string(mem_ctx, r,
1922 "Unable to fetch domain sid: are we joined?");
1923 return WERR_SETUP_NOT_JOINED;
1924 }
1925 r->in.domain_sid = sid_dup_talloc(mem_ctx, &sid);
1926 W_ERROR_HAVE_NO_MEMORY(r->in.domain_sid);
1927 }
1928
1929 if (!r->in.dc_name) {
1930 struct netr_DsRGetDCNameInfo *info;
1931 const char *dc;
1932 status = dsgetdcname(mem_ctx,
1933 r->in.msg_ctx,
1934 r->in.domain_name,
1935 NULL,
1936 NULL,
1937 DS_DIRECTORY_SERVICE_REQUIRED |
1938 DS_WRITABLE_REQUIRED |
1939 DS_RETURN_DNS_NAME,
1940 &info);
1941 if (!NT_STATUS_IS_OK(status)) {
1942 libnet_unjoin_set_error_string(mem_ctx, r,
1943 "failed to find DC for domain %s",
1944 r->in.domain_name,
1945 get_friendly_nt_error_msg(status));
1946 return WERR_DOMAIN_CONTROLLER_NOT_FOUND;
1947 }
1948
1949 dc = strip_hostname(info->dc_unc);
1950 r->in.dc_name = talloc_strdup(mem_ctx, dc);
1951 W_ERROR_HAVE_NO_MEMORY(r->in.dc_name);
1952 }
1953
1954 status = libnet_join_unjoindomain_rpc(mem_ctx, r);
1955 if (!NT_STATUS_IS_OK(status)) {
1956 libnet_unjoin_set_error_string(mem_ctx, r,
1957 "failed to disable machine account via rpc: %s",
1958 get_friendly_nt_error_msg(status));
1959 if (NT_STATUS_EQUAL(status, NT_STATUS_NO_SUCH_USER)) {
1960 return WERR_SETUP_NOT_JOINED;
1961 }
1962 return ntstatus_to_werror(status);
1963 }
1964
1965 r->out.disabled_machine_account = true;
1966
1967#ifdef WITH_ADS
1968 if (r->in.unjoin_flags & WKSSVC_JOIN_FLAGS_ACCOUNT_DELETE) {
1969 ADS_STATUS ads_status;
1970 libnet_unjoin_connect_ads(mem_ctx, r);
1971 ads_status = libnet_unjoin_remove_machine_acct(mem_ctx, r);
1972 if (!ADS_ERR_OK(ads_status)) {
1973 libnet_unjoin_set_error_string(mem_ctx, r,
1974 "failed to remove machine account from AD: %s",
1975 ads_errstr(ads_status));
1976 } else {
1977 r->out.deleted_machine_account = true;
1978 /* dirty hack */
1979 r->out.dns_domain_name = talloc_strdup(mem_ctx,
1980 r->in.ads->server.realm);
1981 W_ERROR_HAVE_NO_MEMORY(r->out.dns_domain_name);
1982 }
1983 }
1984#endif /* WITH_ADS */
1985
1986 libnet_join_unjoindomain_remove_secrets(mem_ctx, r);
1987
1988 return WERR_OK;
1989}
1990
1991/****************************************************************
1992****************************************************************/
1993
1994static WERROR libnet_unjoin_pre_processing(TALLOC_CTX *mem_ctx,
1995 struct libnet_UnjoinCtx *r)
1996{
1997 if (!r->in.domain_name) {
1998 libnet_unjoin_set_error_string(mem_ctx, r,
1999 "No domain name defined");
2000 return WERR_INVALID_PARAM;
2001 }
2002
2003 if (!libnet_parse_domain_dc(mem_ctx, r->in.domain_name,
2004 &r->in.domain_name,
2005 &r->in.dc_name)) {
2006 libnet_unjoin_set_error_string(mem_ctx, r,
2007 "Failed to parse domain name");
2008 return WERR_INVALID_PARAM;
2009 }
2010
2011 if (IS_DC) {
2012 return WERR_SETUP_DOMAIN_CONTROLLER;
2013 }
2014
2015 if (!secrets_init()) {
2016 libnet_unjoin_set_error_string(mem_ctx, r,
2017 "Unable to open secrets database");
2018 return WERR_CAN_NOT_COMPLETE;
2019 }
2020
2021 return WERR_OK;
2022}
2023
2024/****************************************************************
2025****************************************************************/
2026
2027static WERROR libnet_unjoin_post_processing(TALLOC_CTX *mem_ctx,
2028 struct libnet_UnjoinCtx *r)
2029{
2030 saf_delete(r->out.netbios_domain_name);
2031 saf_delete(r->out.dns_domain_name);
2032
2033 return libnet_unjoin_config(r);
2034}
2035
2036/****************************************************************
2037****************************************************************/
2038
2039WERROR libnet_Unjoin(TALLOC_CTX *mem_ctx,
2040 struct libnet_UnjoinCtx *r)
2041{
2042 WERROR werr;
2043
2044 if (r->in.debug) {
2045 LIBNET_UNJOIN_IN_DUMP_CTX(mem_ctx, r);
2046 }
2047
2048 werr = libnet_unjoin_pre_processing(mem_ctx, r);
2049 if (!W_ERROR_IS_OK(werr)) {
2050 goto done;
2051 }
2052
2053 if (r->in.unjoin_flags & WKSSVC_JOIN_FLAGS_JOIN_TYPE) {
2054 werr = libnet_DomainUnjoin(mem_ctx, r);
2055 if (!W_ERROR_IS_OK(werr)) {
2056 libnet_unjoin_config(r);
2057 goto done;
2058 }
2059 }
2060
2061 werr = libnet_unjoin_post_processing(mem_ctx, r);
2062 if (!W_ERROR_IS_OK(werr)) {
2063 goto done;
2064 }
2065
2066 done:
2067 r->out.result = werr;
2068
2069 if (r->in.debug) {
2070 LIBNET_UNJOIN_OUT_DUMP_CTX(mem_ctx, r);
2071 }
2072
2073 return werr;
2074}
Note: See TracBrowser for help on using the repository browser.