s4-idmap: Add mapping using uidNumber and gidNumber like idmap_ad
[samba.git] / source4 / winbind / wb_init_domain.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    A composite API for initializing a domain
5
6    Copyright (C) Volker Lendecke 2005
7    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2007
8
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.
21 */
22
23 #include "includes.h"
24 #include "libcli/composite/composite.h"
25 #include "winbind/wb_server.h"
26 #include "smbd/service_task.h"
27 #include "librpc/gen_ndr/ndr_netlogon.h"
28 #include "librpc/gen_ndr/ndr_lsa_c.h"
29 #include "librpc/gen_ndr/ndr_samr_c.h"
30 #include "libcli/libcli.h"
31
32 #include "libcli/security/security.h"
33
34
35 #include "auth/credentials/credentials.h"
36 #include "param/param.h"
37
38 /*
39  * Initialize a domain:
40  *
41  * - With schannel credentials, try to open the SMB connection and
42  *   NETLOGON pipe with the machine creds. This works against W2k3SP1
43  *   with an NTLMSSP session setup. Fall back to anonymous (for the CIFS level).
44  *
45  * - If we have schannel creds, do the auth2 and open the schannel'ed netlogon
46  *   pipe.
47  *
48  * - Open LSA. If we have machine creds, try to open with SPNEGO or NTLMSSP. Fall back
49  *   to schannel.
50  *
51  * - With queryinfopolicy, verify that we're talking to the right domain
52  *
53  * A bit complex, but with all the combinations I think it's the best we can
54  * get. NT4, W2k3 and W2k all have different combinations, but in the end we
55  * have a signed&sealed lsa connection on all of them.
56  *
57  * Not sure if it is overkill, but it seems to work.
58  */
59
60 struct init_domain_state {
61         struct composite_context *ctx;
62         struct wbsrv_domain *domain;
63         struct wbsrv_service *service;
64
65         struct lsa_ObjectAttribute objectattr;
66         struct lsa_OpenPolicy2 lsa_openpolicy;
67         struct lsa_QueryInfoPolicy queryinfo;
68         union lsa_PolicyInformation *info;
69 };
70
71 static void init_domain_recv_netlogonpipe(struct composite_context *ctx);
72 static void init_domain_recv_lsa_pipe(struct composite_context *ctx);
73 static void init_domain_recv_lsa_policy(struct tevent_req *subreq);
74 static void init_domain_recv_queryinfo(struct tevent_req *subreq);
75 static void init_domain_recv_samr(struct composite_context *ctx);
76
77 static struct dcerpc_binding *init_domain_binding(struct init_domain_state *state, 
78                                                   const struct ndr_interface_table *table) 
79 {
80         struct dcerpc_binding *binding;
81         char *s;
82         NTSTATUS status;
83
84         /* Make a binding string */
85         if ((lpcfg_server_role(state->service->task->lp_ctx) != ROLE_DOMAIN_MEMBER) &&
86             dom_sid_equal(state->domain->info->sid, state->service->primary_sid) &&
87             state->service->sec_channel_type != SEC_CHAN_RODC) {
88                 s = talloc_asprintf(state, "ncalrpc:%s", state->domain->dc_name);
89                 if (s == NULL) return NULL;
90         } else {
91                 s = talloc_asprintf(state, "ncacn_np:%s", state->domain->dc_name);
92                 if (s == NULL) return NULL;
93
94         }
95         status = dcerpc_parse_binding(state, s, &binding);
96         talloc_free(s);
97         if (!NT_STATUS_IS_OK(status)) {
98                 return NULL;
99         }
100
101         /* Alter binding to contain hostname, but also address (so we don't look it up twice) */
102         binding->target_hostname = state->domain->dc_name;
103         binding->host = state->domain->dc_address;
104
105         if (binding->transport == NCALRPC) {
106                 return binding;
107         }
108
109         /* This shouldn't make a network call, as the mappings for named pipes are well known */
110         status = dcerpc_epm_map_binding(binding, binding, table, state->service->task->event_ctx,
111                                         state->service->task->lp_ctx);
112         if (!NT_STATUS_IS_OK(status)) {
113                 return NULL;
114         }
115
116         return binding;
117 }
118
119 struct composite_context *wb_init_domain_send(TALLOC_CTX *mem_ctx,
120                                               struct wbsrv_service *service,
121                                               struct wb_dom_info *dom_info)
122 {
123         struct composite_context *result, *ctx;
124         struct init_domain_state *state;
125
126         result = composite_create(mem_ctx, service->task->event_ctx);
127         if (result == NULL) goto failed;
128
129         state = talloc_zero(result, struct init_domain_state);
130         if (state == NULL) goto failed;
131         state->ctx = result;
132         result->private_data = state;
133
134         state->service = service;
135
136         state->domain = talloc(state, struct wbsrv_domain);
137         if (state->domain == NULL) goto failed;
138
139         state->domain->info = talloc_reference(state->domain, dom_info);
140         if (state->domain->info == NULL) goto failed;
141
142         state->domain->dc_name = dom_info->dc->name;
143         state->domain->dc_address = dom_info->dc->address;
144
145         state->domain->libnet_ctx = libnet_context_init(service->task->event_ctx, 
146                                                         service->task->lp_ctx);
147
148         /* Create a credentials structure */
149         state->domain->libnet_ctx->cred = cli_credentials_init(state->domain);
150         if (state->domain->libnet_ctx->cred == NULL) goto failed;
151
152         cli_credentials_set_conf(state->domain->libnet_ctx->cred, service->task->lp_ctx);
153
154         /* Connect the machine account to the credentials */
155         state->ctx->status =
156                 cli_credentials_set_machine_account(state->domain->libnet_ctx->cred, state->domain->libnet_ctx->lp_ctx);
157         if (!NT_STATUS_IS_OK(state->ctx->status)) goto failed;
158
159         state->domain->netlogon_binding = init_domain_binding(state, &ndr_table_netlogon);
160
161         state->domain->netlogon_pipe = NULL;
162
163         if ((!cli_credentials_is_anonymous(state->domain->libnet_ctx->cred)) &&
164             ((lpcfg_server_role(service->task->lp_ctx) == ROLE_DOMAIN_MEMBER) ||
165              (lpcfg_server_role(service->task->lp_ctx) == ROLE_ACTIVE_DIRECTORY_DC)) &&
166             (dom_sid_equal(state->domain->info->sid,
167                            state->service->primary_sid))) {
168                 state->domain->netlogon_binding->flags |= DCERPC_SCHANNEL | DCERPC_SCHANNEL_AUTO;
169
170                 /* For debugging, it can be a real pain if all the traffic is encrypted */
171                 if (lpcfg_winbind_sealed_pipes(service->task->lp_ctx)) {
172                         state->domain->netlogon_binding->flags |= (DCERPC_SIGN | DCERPC_SEAL );
173                 } else {
174                         state->domain->netlogon_binding->flags |= (DCERPC_SIGN);
175                 }
176         }
177
178         /* No encryption on anonymous pipes */
179
180         ctx = dcerpc_pipe_connect_b_send(state, state->domain->netlogon_binding, 
181                                          &ndr_table_netlogon,
182                                          state->domain->libnet_ctx->cred,
183                                          service->task->event_ctx,
184                                          service->task->lp_ctx);
185         
186         if (composite_nomem(ctx, state->ctx)) {
187                 goto failed;
188         }
189         
190         composite_continue(state->ctx, ctx, init_domain_recv_netlogonpipe,
191                            state);
192         return result;
193  failed:
194         talloc_free(result);
195         return NULL;
196 }
197
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)
201 {
202         struct init_domain_state *state =
203                 talloc_get_type(ctx->async.private_data,
204                                 struct init_domain_state);
205
206         state->ctx->status = dcerpc_pipe_connect_b_recv(ctx, state->domain, 
207                                                    &state->domain->netlogon_pipe);
208         
209         if (!composite_is_ok(state->ctx)) {
210                 return;
211         }
212         talloc_reparent(state, state->domain->netlogon_pipe, state->domain->netlogon_binding);
213
214         state->domain->lsa_binding = init_domain_binding(state, &ndr_table_lsarpc);
215
216         /* For debugging, it can be a real pain if all the traffic is encrypted */
217         if (lpcfg_winbind_sealed_pipes(state->service->task->lp_ctx)) {
218                 state->domain->lsa_binding->flags |= (DCERPC_SIGN | DCERPC_SEAL );
219         } else {
220                 state->domain->lsa_binding->flags |= (DCERPC_SIGN);
221         }
222
223         state->domain->libnet_ctx->lsa.pipe = NULL;
224
225         /* this will make the secondary connection on the same IPC$ share, 
226            secured with SPNEGO or NTLMSSP */
227         ctx = dcerpc_secondary_auth_connection_send(state->domain->netlogon_pipe,
228                                                     state->domain->lsa_binding,
229                                                     &ndr_table_lsarpc,
230                                                     state->domain->libnet_ctx->cred,
231                                                     state->domain->libnet_ctx->lp_ctx
232                 );
233         composite_continue(state->ctx, ctx, init_domain_recv_lsa_pipe, state);
234 }
235
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 *))
240 {
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
247                  * NTLMSSP binds */
248
249                 /* Try again with schannel */
250                 binding->flags |= DCERPC_SCHANNEL | DCERPC_SCHANNEL_AUTO;
251
252                 /* Try again, likewise on the same IPC$ share, 
253                    secured with SCHANNEL */
254                 ctx = dcerpc_secondary_auth_connection_send(state->domain->netlogon_pipe,
255                                                             binding,
256                                                             table, 
257                                                             state->domain->libnet_ctx->cred,
258                                                             state->domain->libnet_ctx->lp_ctx);
259                 composite_continue(state->ctx, ctx, continuation, state);               
260                 return true;
261         } else {
262                 return false;
263         }
264 }
265 /* We should now have either an authenticated LSA pipe, or an error.  
266  * On success, open a policy handle
267  */     
268 static void init_domain_recv_lsa_pipe(struct composite_context *ctx)
269 {
270         struct init_domain_state *state =
271                 talloc_get_type(ctx->async.private_data,
272                                 struct init_domain_state);
273         struct tevent_req *subreq;
274
275         state->ctx->status = dcerpc_secondary_auth_connection_recv(ctx, state->domain,
276                                                                    &state->domain->libnet_ctx->lsa.pipe);
277         if (NT_STATUS_EQUAL(state->ctx->status, NT_STATUS_LOGON_FAILURE)) {
278                 if (retry_with_schannel(state, state->domain->lsa_binding, 
279                                         &ndr_table_lsarpc,
280                                         init_domain_recv_lsa_pipe)) {
281                         return;
282                 }
283         }
284         if (!composite_is_ok(state->ctx)) return;
285
286         talloc_steal(state->domain->libnet_ctx, state->domain->libnet_ctx->lsa.pipe);
287         talloc_reparent(state, state->domain->libnet_ctx->lsa.pipe, state->domain->lsa_binding);
288         state->domain->libnet_ctx->lsa.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
289         state->domain->libnet_ctx->lsa.name = state->domain->info->name;
290
291         ZERO_STRUCT(state->domain->libnet_ctx->lsa.handle);
292         state->lsa_openpolicy.in.system_name =
293                 talloc_asprintf(state, "\\\\%s",
294                                 dcerpc_server_name(state->domain->libnet_ctx->lsa.pipe));
295         ZERO_STRUCT(state->objectattr);
296         state->lsa_openpolicy.in.attr = &state->objectattr;
297         state->lsa_openpolicy.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
298         state->lsa_openpolicy.out.handle = &state->domain->libnet_ctx->lsa.handle;
299
300         subreq = dcerpc_lsa_OpenPolicy2_r_send(state,
301                                                state->ctx->event_ctx,
302                                                state->domain->libnet_ctx->lsa.pipe->binding_handle,
303                                                &state->lsa_openpolicy);
304         if (composite_nomem(subreq, state->ctx)) return;
305         tevent_req_set_callback(subreq, init_domain_recv_lsa_policy, state);
306 }
307
308 /* Receive a policy handle (or not, and retry the authentication) and
309  * obtain some basic information about the domain */
310
311 static void init_domain_recv_lsa_policy(struct tevent_req *subreq)
312 {
313         struct init_domain_state *state =
314                 tevent_req_callback_data(subreq,
315                 struct init_domain_state);
316
317         state->ctx->status = dcerpc_lsa_OpenPolicy2_r_recv(subreq, state);
318         TALLOC_FREE(subreq);
319         if ((!NT_STATUS_IS_OK(state->ctx->status)
320               || !NT_STATUS_IS_OK(state->lsa_openpolicy.out.result))) {
321                 if (retry_with_schannel(state, state->domain->lsa_binding, 
322                                         &ndr_table_lsarpc,
323                                         init_domain_recv_lsa_pipe)) {
324                         return;
325                 }
326         }
327         if (!composite_is_ok(state->ctx)) return;
328         state->ctx->status = state->lsa_openpolicy.out.result;
329         if (!composite_is_ok(state->ctx)) return;
330
331         state->info = talloc_zero(state->ctx, union lsa_PolicyInformation);
332         if (composite_nomem(state->info, state->ctx)) return;
333
334         state->queryinfo.in.handle = &state->domain->libnet_ctx->lsa.handle;
335         state->queryinfo.in.level = LSA_POLICY_INFO_ACCOUNT_DOMAIN;
336         state->queryinfo.out.info = &state->info;
337
338         subreq = dcerpc_lsa_QueryInfoPolicy_r_send(state,
339                                                    state->ctx->event_ctx,
340                                                    state->domain->libnet_ctx->lsa.pipe->binding_handle,
341                                                    &state->queryinfo);
342         if (composite_nomem(subreq, state->ctx)) return;
343         tevent_req_set_callback(subreq, init_domain_recv_queryinfo, state);
344 }
345
346 static void init_domain_recv_queryinfo(struct tevent_req *subreq)
347 {
348         struct init_domain_state *state =
349                 tevent_req_callback_data(subreq,
350                 struct init_domain_state);
351         struct lsa_DomainInfo *dominfo;
352         struct composite_context *ctx;
353
354         state->ctx->status = dcerpc_lsa_QueryInfoPolicy_r_recv(subreq, state);
355         TALLOC_FREE(subreq);
356         if (!composite_is_ok(state->ctx)) return;
357         state->ctx->status = state->queryinfo.out.result;
358         if (!composite_is_ok(state->ctx)) return;
359
360         dominfo = &(*state->queryinfo.out.info)->account_domain;
361
362         if (strcasecmp(state->domain->info->name, dominfo->name.string) != 0) {
363                 DEBUG(2, ("Expected domain name %s, DC %s said %s\n",
364                           state->domain->info->name,
365                           dcerpc_server_name(state->domain->libnet_ctx->lsa.pipe),
366                           dominfo->name.string));
367                 composite_error(state->ctx, NT_STATUS_INVALID_DOMAIN_STATE);
368                 return;
369         }
370
371         if (!dom_sid_equal(state->domain->info->sid, dominfo->sid)) {
372                 DEBUG(2, ("Expected domain sid %s, DC %s said %s\n",
373                           dom_sid_string(state, state->domain->info->sid),
374                           dcerpc_server_name(state->domain->libnet_ctx->lsa.pipe),
375                           dom_sid_string(state, dominfo->sid)));
376                 composite_error(state->ctx, NT_STATUS_INVALID_DOMAIN_STATE);
377                 return;
378         }
379
380         state->domain->samr_binding = init_domain_binding(state, &ndr_table_samr);
381
382         /* We want to use the same flags as the LSA pipe did (so, if
383          * it needed schannel, then we need that here too) */
384         state->domain->samr_binding->flags = state->domain->lsa_binding->flags;
385
386         state->domain->libnet_ctx->samr.pipe = NULL;
387
388         ctx = wb_connect_samr_send(state, state->domain);
389         composite_continue(state->ctx, ctx, init_domain_recv_samr, state);
390 }
391
392 /* Recv the SAMR details (SamrConnect and SamrOpenDomain handle) and
393  * open an LDAP connection */
394 static void init_domain_recv_samr(struct composite_context *ctx)
395 {
396         struct init_domain_state *state =
397                 talloc_get_type(ctx->async.private_data,
398                                 struct init_domain_state);
399
400         state->ctx->status = wb_connect_samr_recv(
401                 ctx, state->domain,
402                 &state->domain->libnet_ctx->samr.pipe,
403                 &state->domain->libnet_ctx->samr.connect_handle,
404                 &state->domain->libnet_ctx->samr.handle);
405         if (!composite_is_ok(state->ctx)) return;
406
407         talloc_reparent(state, state->domain->libnet_ctx->samr.pipe, state->domain->samr_binding);
408         state->domain->libnet_ctx->samr.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
409         state->domain->libnet_ctx->samr.name = state->domain->info->name;
410         state->domain->libnet_ctx->samr.sid = dom_sid_dup(
411                                                 state->domain->libnet_ctx,
412                                                 state->domain->info->sid);
413
414         composite_done(state->ctx);
415 }
416
417 NTSTATUS wb_init_domain_recv(struct composite_context *c,
418                              TALLOC_CTX *mem_ctx,
419                              struct wbsrv_domain **result)
420 {
421         NTSTATUS status = composite_wait(c);
422         if (NT_STATUS_IS_OK(status)) {
423                 struct init_domain_state *state =
424                         talloc_get_type(c->private_data,
425                                         struct init_domain_state);
426                 *result = talloc_steal(mem_ctx, state->domain);
427         }
428         talloc_free(c);
429         return status;
430 }
431
432 NTSTATUS wb_init_domain(TALLOC_CTX *mem_ctx, struct wbsrv_service *service,
433                         struct wb_dom_info *dom_info,
434                         struct wbsrv_domain **result)
435 {
436         struct composite_context *c =
437                 wb_init_domain_send(mem_ctx, service, dom_info);
438         return wb_init_domain_recv(c, mem_ctx, result);
439 }