Merge branch 'master' of ssh://git.samba.org/data/git/samba into libcli-auth-merge...
[sfrench/samba-autobuild/.git] / source4 / libnet / libnet_samsync.c
1 /* 
2    Unix SMB/CIFS implementation.
3    
4    Extract the user/system database from a remote SamSync server
5
6    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2004-2005
7    
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 3 of the License, or
11    (at your option) any later version.
12    
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
20 */
21
22
23 #include "includes.h"
24 #include "libnet/libnet.h"
25 #include "libcli/auth/libcli_auth.h"
26 #include "../libcli/samsync/samsync.h"
27 #include "auth/gensec/gensec.h"
28 #include "auth/credentials/credentials.h"
29 #include "auth/gensec/schannel_proto.h"
30 #include "librpc/gen_ndr/ndr_netlogon.h"
31 #include "librpc/gen_ndr/ndr_netlogon_c.h"
32 #include "param/param.h"
33
34 NTSTATUS libnet_SamSync_netlogon(struct libnet_context *ctx, TALLOC_CTX *mem_ctx, struct libnet_SamSync *r)
35 {
36         NTSTATUS nt_status, dbsync_nt_status;
37         TALLOC_CTX *samsync_ctx, *loop_ctx, *delta_ctx;
38         struct netlogon_creds_CredentialState *creds;
39         struct netr_DatabaseSync dbsync;
40         struct netr_Authenticator credential, return_authenticator;
41         struct netr_DELTA_ENUM_ARRAY *delta_enum_array = NULL;
42         struct cli_credentials *machine_account;
43         struct dcerpc_pipe *p;
44         struct libnet_context *machine_net_ctx;
45         struct libnet_RpcConnect *c;
46         struct libnet_SamSync_state *state;
47         const enum netr_SamDatabaseID database_ids[] = {SAM_DATABASE_DOMAIN, SAM_DATABASE_BUILTIN, SAM_DATABASE_PRIVS}; 
48         int i;
49
50         samsync_ctx = talloc_named(mem_ctx, 0, "SamSync top context");
51
52         if (!r->in.machine_account) { 
53                 machine_account = cli_credentials_init(samsync_ctx);
54                 if (!machine_account) {
55                         talloc_free(samsync_ctx);
56                         return NT_STATUS_NO_MEMORY;
57                 }
58                 cli_credentials_set_conf(machine_account, ctx->lp_ctx);
59                 nt_status = cli_credentials_set_machine_account(machine_account, ctx->lp_ctx);
60                 if (!NT_STATUS_IS_OK(nt_status)) {
61                         r->out.error_string = talloc_strdup(mem_ctx, "Could not obtain machine account password - are we joined to the domain?");
62                         talloc_free(samsync_ctx);
63                         return nt_status;
64                 }
65         } else {
66                 machine_account = r->in.machine_account;
67         }
68
69         /* We cannot do this unless we are a BDC.  Check, before we get odd errors later */
70         if (cli_credentials_get_secure_channel_type(machine_account) != SEC_CHAN_BDC) {
71                 r->out.error_string
72                         = talloc_asprintf(mem_ctx, 
73                                           "Our join to domain %s is not as a BDC (%d), please rejoin as a BDC",
74                                           cli_credentials_get_domain(machine_account),
75                                           cli_credentials_get_secure_channel_type(machine_account));
76                 talloc_free(samsync_ctx);
77                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
78         }
79
80         c = talloc(samsync_ctx, struct libnet_RpcConnect);
81         if (!c) {
82                 r->out.error_string = NULL;
83                 talloc_free(samsync_ctx);
84                 return NT_STATUS_NO_MEMORY;
85         }
86
87         c->level              = LIBNET_RPC_CONNECT_DC_INFO;
88         if (r->in.binding_string) {
89                 c->in.binding = r->in.binding_string;
90                 c->in.name    = NULL;
91         } else {
92                 c->in.binding = NULL;
93                 c->in.name    = cli_credentials_get_domain(machine_account);
94         }
95         
96         /* prepare connect to the NETLOGON pipe of PDC */
97         c->in.dcerpc_iface      = &ndr_table_netlogon;
98
99         /* We must do this as the machine, not as any command-line
100          * user.  So we override the credentials in the
101          * libnet_context */
102         machine_net_ctx = talloc(samsync_ctx, struct libnet_context);
103         if (!machine_net_ctx) {
104                 r->out.error_string = NULL;
105                 talloc_free(samsync_ctx);
106                 return NT_STATUS_NO_MEMORY;
107         }
108         *machine_net_ctx = *ctx;
109         machine_net_ctx->cred = machine_account;
110
111         /* connect to the NETLOGON pipe of the PDC */
112         nt_status = libnet_RpcConnect(machine_net_ctx, samsync_ctx, c);
113         if (!NT_STATUS_IS_OK(nt_status)) {
114                 if (r->in.binding_string) {
115                         r->out.error_string = talloc_asprintf(mem_ctx,
116                                                               "Connection to NETLOGON pipe of DC %s failed: %s",
117                                                               r->in.binding_string, c->out.error_string);
118                 } else {
119                         r->out.error_string = talloc_asprintf(mem_ctx,
120                                                               "Connection to NETLOGON pipe of DC for %s failed: %s",
121                                                               c->in.name, c->out.error_string);
122                 }
123                 talloc_free(samsync_ctx);
124                 return nt_status;
125         }
126
127         /* This makes a new pipe, on which we can do schannel.  We
128          * should do this in the RpcConnect code, but the abstaction
129          * layers do not suit yet */
130
131         nt_status = dcerpc_secondary_connection(c->out.dcerpc_pipe, &p,
132                                                 c->out.dcerpc_pipe->binding);
133
134         if (!NT_STATUS_IS_OK(nt_status)) {
135                 r->out.error_string = talloc_asprintf(mem_ctx,
136                                                       "Secondary connection to NETLOGON pipe of DC %s failed: %s",
137                                                       dcerpc_server_name(p), nt_errstr(nt_status));
138                 talloc_free(samsync_ctx);
139                 return nt_status;
140         }
141
142         nt_status = dcerpc_bind_auth_schannel(samsync_ctx, p, &ndr_table_netlogon,
143                                               machine_account, ctx->lp_ctx, DCERPC_AUTH_LEVEL_PRIVACY);
144
145         if (!NT_STATUS_IS_OK(nt_status)) {
146                 r->out.error_string = talloc_asprintf(mem_ctx,
147                                                       "SCHANNEL authentication to NETLOGON pipe of DC %s failed: %s",
148                                                       dcerpc_server_name(p), nt_errstr(nt_status));
149                 talloc_free(samsync_ctx);
150                 return nt_status;
151         }
152
153         state = talloc(samsync_ctx, struct libnet_SamSync_state);
154         if (!state) {
155                 r->out.error_string = NULL;
156                 talloc_free(samsync_ctx);
157                 return nt_status;
158         }               
159
160         state->domain_name     = c->out.domain_name;
161         state->domain_sid      = c->out.domain_sid;
162         state->realm           = c->out.realm;
163         state->domain_guid     = c->out.guid;
164         state->machine_net_ctx = machine_net_ctx;
165         state->netlogon_pipe   = p;
166
167         /* initialise the callback layer.  It may wish to contact the
168          * server with ldap, now we know the name */
169         
170         if (r->in.init_fn) {
171                 char *error_string;
172                 nt_status = r->in.init_fn(samsync_ctx, 
173                                           r->in.fn_ctx,
174                                           state, 
175                                           &error_string); 
176                 if (!NT_STATUS_IS_OK(nt_status)) {
177                         r->out.error_string = talloc_steal(mem_ctx, error_string);
178                         talloc_free(samsync_ctx);
179                         return nt_status;
180                 }
181         }
182
183         /* get NETLOGON credentials */
184
185         nt_status = dcerpc_schannel_creds(p->conn->security_state.generic_state, samsync_ctx, &creds);
186         if (!NT_STATUS_IS_OK(nt_status)) {
187                 r->out.error_string = talloc_strdup(mem_ctx, "Could not obtain NETLOGON credentials from DCERPC/GENSEC layer");
188                 talloc_free(samsync_ctx);
189                 return nt_status;
190         }
191
192         /* Setup details for the synchronisation */
193
194         ZERO_STRUCT(return_authenticator);
195
196         dbsync.in.logon_server = talloc_asprintf(samsync_ctx, "\\\\%s", dcerpc_server_name(p));
197         dbsync.in.computername = cli_credentials_get_workstation(machine_account);
198         dbsync.in.preferredmaximumlength = (uint32_t)-1;
199         dbsync.in.return_authenticator = &return_authenticator;
200         dbsync.out.return_authenticator = &return_authenticator;
201         dbsync.out.delta_enum_array = &delta_enum_array;
202
203         for (i=0;i< ARRAY_SIZE(database_ids); i++) {
204
205                 uint32_t sync_context = 0;
206
207                 dbsync.in.database_id = database_ids[i];
208                 dbsync.in.sync_context = &sync_context;
209                 dbsync.out.sync_context = &sync_context;
210                 
211                 do {
212                         int d;
213                         loop_ctx = talloc_named(samsync_ctx, 0, "DatabaseSync loop context");
214                         netlogon_creds_client_authenticator(creds, &credential);
215
216                         dbsync.in.credential = &credential;
217                         
218                         dbsync_nt_status = dcerpc_netr_DatabaseSync(p, loop_ctx, &dbsync);
219                         if (!NT_STATUS_IS_OK(dbsync_nt_status) &&
220                             !NT_STATUS_EQUAL(dbsync_nt_status, STATUS_MORE_ENTRIES)) {
221                                 r->out.error_string = talloc_asprintf(mem_ctx, "DatabaseSync failed - %s", nt_errstr(nt_status));
222                                 talloc_free(samsync_ctx);
223                                 return nt_status;
224                         }
225                         
226                         if (!netlogon_creds_client_check(creds, &dbsync.out.return_authenticator->cred)) {
227                                 r->out.error_string = talloc_strdup(mem_ctx, "Credential chaining on incoming DatabaseSync failed");
228                                 talloc_free(samsync_ctx);
229                                 return NT_STATUS_ACCESS_DENIED;
230                         }
231                         
232                         dbsync.in.sync_context = dbsync.out.sync_context;
233                         
234                         /* For every single remote 'delta' entry: */
235                         for (d=0; d < delta_enum_array->num_deltas; d++) {
236                                 char *error_string = NULL;
237                                 delta_ctx = talloc_named(loop_ctx, 0, "DatabaseSync delta context");
238                                 /* 'Fix' elements, by decrypting and
239                                  * de-obfuscating the data */
240                                 nt_status = samsync_fix_delta(delta_ctx, 
241                                                               creds, 
242                                                               dbsync.in.database_id,
243                                                               &delta_enum_array->delta_enum[d]);
244                                 if (!NT_STATUS_IS_OK(nt_status)) {
245                                         r->out.error_string = talloc_steal(mem_ctx, error_string);
246                                         talloc_free(samsync_ctx);
247                                         return nt_status;
248                                 }
249
250                                 /* Now call the callback.  This will
251                                  * do something like print the data or
252                                  * write to an ldb */
253                                 nt_status = r->in.delta_fn(delta_ctx, 
254                                                            r->in.fn_ctx,
255                                                            dbsync.in.database_id,
256                                                            &delta_enum_array->delta_enum[d],
257                                                            &error_string);
258                                 if (!NT_STATUS_IS_OK(nt_status)) {
259                                         r->out.error_string = talloc_steal(mem_ctx, error_string);
260                                         talloc_free(samsync_ctx);
261                                         return nt_status;
262                                 }
263                                 talloc_free(delta_ctx);
264                         }
265                         talloc_free(loop_ctx);
266                 } while (NT_STATUS_EQUAL(dbsync_nt_status, STATUS_MORE_ENTRIES));
267                 
268                 if (!NT_STATUS_IS_OK(dbsync_nt_status)) {
269                         r->out.error_string = talloc_asprintf(mem_ctx, "libnet_SamSync_netlogon failed: unexpected inconsistancy. Should not get error %s here", nt_errstr(nt_status));
270                         talloc_free(samsync_ctx);
271                         return dbsync_nt_status;
272                 }
273                 nt_status = NT_STATUS_OK;
274         }
275         talloc_free(samsync_ctx);
276         return nt_status;
277 }
278