2 Unix SMB/CIFS implementation.
4 A composite API for initializing a domain
6 Copyright (C) Volker Lendecke 2005
7 Copyright (C) Andrew Bartlett <abartlet@samba.org> 2007
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>.
24 #include "libcli/composite/composite.h"
25 #include "libcli/smb_composite/smb_composite.h"
26 #include "winbind/wb_server.h"
27 #include "winbind/wb_async_helpers.h"
28 #include "winbind/wb_helper.h"
29 #include "smbd/service_task.h"
30 #include "librpc/gen_ndr/ndr_netlogon.h"
31 #include "librpc/gen_ndr/ndr_lsa_c.h"
32 #include "librpc/gen_ndr/ndr_samr_c.h"
33 #include "libcli/libcli.h"
35 #include "libcli/auth/credentials.h"
36 #include "libcli/security/security.h"
38 #include "libcli/ldap/ldap_client.h"
40 #include "auth/credentials/credentials.h"
43 * Initialize a domain:
45 * - With schannel credentials, try to open the SMB connection and
46 * NETLOGON pipe with the machine creds. This works against W2k3SP1
47 * with an NTLMSSP session setup. Fall back to anonymous (for the CIFS level).
49 * - If we have schannel creds, do the auth2 and open the schannel'ed netlogon
52 * - Open LSA. If we have machine creds, try to open with SPNEGO or NTLMSSP. Fall back
55 * - With queryinfopolicy, verify that we're talking to the right domain
57 * A bit complex, but with all the combinations I think it's the best we can
58 * get. NT4, W2k3 and W2k all have different combinations, but in the end we
59 * have a signed&sealed lsa connection on all of them.
61 * Not sure if it is overkill, but it seems to work.
64 struct init_domain_state {
65 struct composite_context *ctx;
66 struct wbsrv_domain *domain;
67 struct wbsrv_service *service;
69 struct lsa_ObjectAttribute objectattr;
70 struct lsa_OpenPolicy2 lsa_openpolicy;
71 struct lsa_QueryInfoPolicy queryinfo;
74 static void init_domain_recv_netlogonpipe(struct composite_context *ctx);
75 static void init_domain_recv_lsa_pipe(struct composite_context *ctx);
76 static void init_domain_recv_lsa_policy(struct rpc_request *req);
77 static void init_domain_recv_queryinfo(struct rpc_request *req);
78 static void init_domain_recv_ldapconn(struct composite_context *ctx);
79 static void init_domain_recv_samr(struct composite_context *ctx);
81 static struct dcerpc_binding *init_domain_binding(struct init_domain_state *state,
82 const struct ndr_interface_table *table)
84 struct dcerpc_binding *binding;
87 /* Make a binding string */
89 char *s = talloc_asprintf(state, "ncacn_np:%s", state->domain->dc_name);
90 if (s == NULL) return NULL;
91 status = dcerpc_parse_binding(state, s, &binding);
93 if (!NT_STATUS_IS_OK(status)) {
98 /* Alter binding to contain hostname, but also address (so we don't look it up twice) */
99 binding->target_hostname = state->domain->dc_name;
100 binding->host = state->domain->dc_address;
102 /* This shouldn't make a network call, as the mappings for named pipes are well known */
103 status = dcerpc_epm_map_binding(binding, binding, table, state->service->task->event_ctx);
104 if (!NT_STATUS_IS_OK(status)) {
111 struct composite_context *wb_init_domain_send(TALLOC_CTX *mem_ctx,
112 struct wbsrv_service *service,
113 struct wb_dom_info *dom_info)
115 struct composite_context *result, *ctx;
116 struct init_domain_state *state;
118 result = composite_create(mem_ctx, service->task->event_ctx);
119 if (result == NULL) goto failed;
121 state = talloc_zero(result, struct init_domain_state);
122 if (state == NULL) goto failed;
124 result->private_data = state;
126 state->service = service;
128 state->domain = talloc(state, struct wbsrv_domain);
129 if (state->domain == NULL) goto failed;
131 state->domain->info = talloc_reference(state->domain, dom_info);
132 if (state->domain->info == NULL) goto failed;
134 /* Caller should check, but to be safe: */
135 if (dom_info->num_dcs < 1) {
139 /* For now, we just pick the first. The next step will be to
140 * walk the entire list. Also need to fix finddcs() to return
142 state->domain->dc_name = dom_info->dcs[0].name;
143 state->domain->dc_address = dom_info->dcs[0].address;
145 state->domain->libnet_ctx = libnet_context_init(service->task->event_ctx);
147 /* Create a credentials structure */
148 state->domain->libnet_ctx->cred = cli_credentials_init(state->domain);
149 if (state->domain->libnet_ctx->cred == NULL) goto failed;
151 cli_credentials_set_event_context(state->domain->libnet_ctx->cred, service->task->event_ctx);
153 cli_credentials_set_conf(state->domain->libnet_ctx->cred);
155 /* Connect the machine account to the credentials */
157 cli_credentials_set_machine_account(state->domain->libnet_ctx->cred);
158 if (!NT_STATUS_IS_OK(state->ctx->status)) goto failed;
160 state->domain->netlogon_binding = init_domain_binding(state, &ndr_table_netlogon);
162 state->domain->netlogon_pipe = NULL;
164 if ((!cli_credentials_is_anonymous(state->domain->libnet_ctx->cred)) &&
165 ((lp_server_role() == ROLE_DOMAIN_MEMBER) ||
166 (lp_server_role() == ROLE_DOMAIN_CONTROLLER)) &&
167 (dom_sid_equal(state->domain->info->sid,
168 state->service->primary_sid))) {
169 state->domain->netlogon_binding->flags |= DCERPC_SCHANNEL;
171 /* For debugging, it can be a real pain if all the traffic is encrypted */
172 if (lp_winbind_sealed_pipes()) {
173 state->domain->netlogon_binding->flags |= (DCERPC_SIGN | DCERPC_SEAL );
175 state->domain->netlogon_binding->flags |= (DCERPC_SIGN);
179 /* No encryption on anonymous pipes */
181 ctx = dcerpc_pipe_connect_b_send(state, state->domain->netlogon_binding,
183 state->domain->libnet_ctx->cred,
184 service->task->event_ctx);
186 if (composite_nomem(ctx, state->ctx)) {
190 composite_continue(state->ctx, ctx, init_domain_recv_netlogonpipe,
198 /* Having make a netlogon connection (possibly secured with schannel),
199 * make an LSA connection to the same DC, on the same IPC$ share */
200 static void init_domain_recv_netlogonpipe(struct composite_context *ctx)
202 struct init_domain_state *state =
203 talloc_get_type(ctx->async.private_data,
204 struct init_domain_state);
206 state->ctx->status = dcerpc_pipe_connect_b_recv(ctx, state->domain,
207 &state->domain->netlogon_pipe);
209 if (!composite_is_ok(state->ctx)) {
210 talloc_free(state->domain->netlogon_binding);
213 talloc_steal(state->domain->netlogon_pipe, state->domain->netlogon_binding);
215 state->domain->lsa_binding = init_domain_binding(state, &ndr_table_lsarpc);
217 /* For debugging, it can be a real pain if all the traffic is encrypted */
218 if (lp_winbind_sealed_pipes()) {
219 state->domain->lsa_binding->flags |= (DCERPC_SIGN | DCERPC_SEAL );
221 state->domain->lsa_binding->flags |= (DCERPC_SIGN);
224 state->domain->libnet_ctx->lsa.pipe = NULL;
226 /* this will make the secondary connection on the same IPC$ share,
227 secured with SPNEGO or NTLMSSP */
228 ctx = dcerpc_secondary_auth_connection_send(state->domain->netlogon_pipe,
229 state->domain->lsa_binding,
231 state->domain->libnet_ctx->cred
233 composite_continue(state->ctx, ctx, init_domain_recv_lsa_pipe, state);
236 static bool retry_with_schannel(struct init_domain_state *state,
237 struct dcerpc_binding *binding,
238 const struct ndr_interface_table *table,
239 void (*continuation)(struct composite_context *))
241 struct composite_context *ctx;
242 state->ctx->status = NT_STATUS_OK;
243 if (state->domain->netlogon_binding->flags & DCERPC_SCHANNEL
244 && !(binding->flags & DCERPC_SCHANNEL)) {
245 /* Opening a policy handle failed, perhaps it was
246 * because we don't get a 'wrong password' error on
249 /* Try again with schannel */
250 binding->flags |= DCERPC_SCHANNEL;
252 /* Try again, likewise on the same IPC$ share,
253 secured with SCHANNEL */
254 ctx = dcerpc_secondary_auth_connection_send(state->domain->netlogon_pipe,
257 state->domain->libnet_ctx->cred);
258 composite_continue(state->ctx, ctx, continuation, state);
264 /* We should now have either an authenticated LSA pipe, or an error.
265 * On success, open a policy handle
267 static void init_domain_recv_lsa_pipe(struct composite_context *ctx)
269 struct rpc_request *req;
270 struct init_domain_state *state =
271 talloc_get_type(ctx->async.private_data,
272 struct init_domain_state);
274 state->ctx->status = dcerpc_secondary_auth_connection_recv(ctx, state->domain,
275 &state->domain->libnet_ctx->lsa.pipe);
276 if (NT_STATUS_EQUAL(state->ctx->status, NT_STATUS_LOGON_FAILURE)) {
277 if (retry_with_schannel(state, state->domain->lsa_binding,
279 init_domain_recv_lsa_pipe)) {
283 if (!composite_is_ok(state->ctx)) return;
285 talloc_steal(state->domain->libnet_ctx, state->domain->libnet_ctx->lsa.pipe);
286 talloc_steal(state->domain->libnet_ctx->lsa.pipe, state->domain->lsa_binding);
287 state->domain->libnet_ctx->lsa.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
288 state->domain->libnet_ctx->lsa.name = state->domain->info->name;
290 ZERO_STRUCT(state->domain->libnet_ctx->lsa.handle);
291 state->lsa_openpolicy.in.system_name =
292 talloc_asprintf(state, "\\\\%s",
293 dcerpc_server_name(state->domain->libnet_ctx->lsa.pipe));
294 ZERO_STRUCT(state->objectattr);
295 state->lsa_openpolicy.in.attr = &state->objectattr;
296 state->lsa_openpolicy.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
297 state->lsa_openpolicy.out.handle = &state->domain->libnet_ctx->lsa.handle;
299 req = dcerpc_lsa_OpenPolicy2_send(state->domain->libnet_ctx->lsa.pipe, state,
300 &state->lsa_openpolicy);
302 composite_continue_rpc(state->ctx, req, init_domain_recv_lsa_policy, state);
305 /* Receive a policy handle (or not, and retry the authentication) and
306 * obtain some basic information about the domain */
308 static void init_domain_recv_lsa_policy(struct rpc_request *req)
310 struct init_domain_state *state =
311 talloc_get_type(req->async.private_data,
312 struct init_domain_state);
314 state->ctx->status = dcerpc_ndr_request_recv(req);
315 if ((!NT_STATUS_IS_OK(state->ctx->status)
316 || !NT_STATUS_IS_OK(state->lsa_openpolicy.out.result))) {
317 if (retry_with_schannel(state, state->domain->lsa_binding,
319 init_domain_recv_lsa_pipe)) {
323 if (!composite_is_ok(state->ctx)) return;
324 state->ctx->status = state->lsa_openpolicy.out.result;
325 if (!composite_is_ok(state->ctx)) return;
327 state->queryinfo.in.handle = &state->domain->libnet_ctx->lsa.handle;
328 state->queryinfo.in.level = LSA_POLICY_INFO_ACCOUNT_DOMAIN;
330 req = dcerpc_lsa_QueryInfoPolicy_send(state->domain->libnet_ctx->lsa.pipe, state,
332 composite_continue_rpc(state->ctx, req,
333 init_domain_recv_queryinfo, state);
336 static void init_domain_recv_queryinfo(struct rpc_request *req)
338 struct init_domain_state *state =
339 talloc_get_type(req->async.private_data, struct init_domain_state);
340 struct lsa_DomainInfo *dominfo;
341 struct composite_context *ctx;
343 state->ctx->status = dcerpc_ndr_request_recv(req);
344 if (!composite_is_ok(state->ctx)) return;
345 state->ctx->status = state->queryinfo.out.result;
346 if (!composite_is_ok(state->ctx)) return;
348 dominfo = &state->queryinfo.out.info->account_domain;
350 if (strcasecmp(state->domain->info->name, dominfo->name.string) != 0) {
351 DEBUG(2, ("Expected domain name %s, DC %s said %s\n",
352 state->domain->info->name,
353 dcerpc_server_name(state->domain->libnet_ctx->lsa.pipe),
354 dominfo->name.string));
355 composite_error(state->ctx, NT_STATUS_INVALID_DOMAIN_STATE);
359 if (!dom_sid_equal(state->domain->info->sid, dominfo->sid)) {
360 DEBUG(2, ("Expected domain sid %s, DC %s said %s\n",
361 dom_sid_string(state, state->domain->info->sid),
362 dcerpc_server_name(state->domain->libnet_ctx->lsa.pipe),
363 dom_sid_string(state, dominfo->sid)));
364 composite_error(state->ctx, NT_STATUS_INVALID_DOMAIN_STATE);
368 state->domain->samr_binding = init_domain_binding(state, &ndr_table_samr);
370 /* We want to use the same flags as the LSA pipe did (so, if
371 * it needed schannel, then we need that here too) */
372 state->domain->samr_binding->flags = state->domain->lsa_binding->flags;
374 state->domain->libnet_ctx->samr.pipe = NULL;
376 ctx = wb_connect_samr_send(state, state->domain);
377 composite_continue(state->ctx, ctx, init_domain_recv_samr, state);
380 /* Recv the SAMR details (SamrConnect and SamrOpenDomain handle) and
381 * open an LDAP connection */
382 static void init_domain_recv_samr(struct composite_context *ctx)
384 const char *ldap_url;
385 struct init_domain_state *state =
386 talloc_get_type(ctx->async.private_data,
387 struct init_domain_state);
389 state->ctx->status = wb_connect_samr_recv(
391 &state->domain->libnet_ctx->samr.pipe,
392 &state->domain->libnet_ctx->samr.handle,
393 &state->domain->libnet_ctx->samr.handle);
394 if (!composite_is_ok(state->ctx)) return;
396 talloc_steal(state->domain->libnet_ctx->samr.pipe, state->domain->samr_binding);
397 state->domain->libnet_ctx->samr.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
398 state->domain->libnet_ctx->samr.name = state->domain->info->name;
399 state->domain->libnet_ctx->samr.sid = state->domain->info->sid;
401 state->domain->ldap_conn =
402 ldap4_new_connection(state->domain, state->ctx->event_ctx);
403 composite_nomem(state->domain->ldap_conn, state->ctx);
405 ldap_url = talloc_asprintf(state, "ldap://%s/",
406 state->domain->dc_address);
407 composite_nomem(ldap_url, state->ctx);
409 ctx = ldap_connect_send(state->domain->ldap_conn, ldap_url);
410 composite_continue(state->ctx, ctx, init_domain_recv_ldapconn, state);
413 static void init_domain_recv_ldapconn(struct composite_context *ctx)
415 struct init_domain_state *state =
416 talloc_get_type(ctx->async.private_data,
417 struct init_domain_state);
419 state->ctx->status = ldap_connect_recv(ctx);
420 if (NT_STATUS_IS_OK(state->ctx->status)) {
421 state->domain->ldap_conn->host =
422 talloc_strdup(state->domain->ldap_conn,
423 state->domain->dc_name);
425 ldap_bind_sasl(state->domain->ldap_conn,
426 state->domain->libnet_ctx->cred);
427 DEBUG(0, ("ldap_bind returned %s\n",
428 nt_errstr(state->ctx->status)));
431 composite_done(state->ctx);
434 NTSTATUS wb_init_domain_recv(struct composite_context *c,
436 struct wbsrv_domain **result)
438 NTSTATUS status = composite_wait(c);
439 if (NT_STATUS_IS_OK(status)) {
440 struct init_domain_state *state =
441 talloc_get_type(c->private_data,
442 struct init_domain_state);
443 *result = talloc_steal(mem_ctx, state->domain);
449 NTSTATUS wb_init_domain(TALLOC_CTX *mem_ctx, struct wbsrv_service *service,
450 struct wb_dom_info *dom_info,
451 struct wbsrv_domain **result)
453 struct composite_context *c =
454 wb_init_domain_send(mem_ctx, service, dom_info);
455 return wb_init_domain_recv(c, mem_ctx, result);