r4938: allow the caller to supply an existing event_context if they want to
[sfrench/samba-autobuild/.git] / source4 / libcli / composite / connect.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    Copyright (C) Andrew Tridgell 2005
5    
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 2 of the License, or
9    (at your option) any later version.
10    
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15    
16    You should have received a copy of the GNU General Public License
17    along with this program; if not, write to the Free Software
18    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
20 /*
21   a composite API for making a full SMB connection
22 */
23
24 #include "includes.h"
25 #include "libcli/raw/libcliraw.h"
26 #include "libcli/composite/composite.h"
27
28 /* the stages of this call */
29 enum connect_stage {CONNECT_RESOLVE, 
30                     CONNECT_SOCKET, 
31                     CONNECT_SESSION_REQUEST, 
32                     CONNECT_NEGPROT,
33                     CONNECT_SESSION_SETUP,
34                     CONNECT_TCON};
35
36 struct connect_state {
37         enum connect_stage stage;
38         struct smbcli_socket *sock;
39         struct smbcli_transport *transport;
40         struct smbcli_session *session;
41         struct smb_composite_connect *io;
42         union smb_tcon *io_tcon;
43         struct smb_composite_sesssetup *io_setup;
44         struct smbcli_request *req;
45         struct smbcli_composite *creq;
46 };
47
48
49 static void request_handler(struct smbcli_request *);
50 static void composite_handler(struct smbcli_composite *);
51
52 /*
53   setup a negprot send 
54 */
55 static NTSTATUS connect_send_negprot(struct smbcli_composite *c, 
56                                      struct smb_composite_connect *io)
57 {
58         struct connect_state *state = talloc_get_type(c->private, struct connect_state);
59
60         state->req = smb_raw_negotiate_send(state->transport, lp_maxprotocol());
61         NT_STATUS_HAVE_NO_MEMORY(state->req);
62
63         state->req->async.fn = request_handler;
64         state->req->async.private = c;
65         state->stage = CONNECT_NEGPROT;
66         
67         return NT_STATUS_OK;
68 }
69
70
71 /*
72   a tree connect request has competed
73 */
74 static NTSTATUS connect_tcon(struct smbcli_composite *c, 
75                              struct smb_composite_connect *io)
76 {
77         struct connect_state *state = talloc_get_type(c->private, struct connect_state);
78         NTSTATUS status;
79
80         status = smb_tree_connect_recv(state->req, c, state->io_tcon);
81         NT_STATUS_NOT_OK_RETURN(status);
82
83         io->out.tree->tid = state->io_tcon->tconx.out.tid;
84         if (state->io_tcon->tconx.out.dev_type) {
85                 io->out.tree->device = talloc_strdup(io->out.tree, 
86                                                      state->io_tcon->tconx.out.dev_type);
87         }
88         if (state->io_tcon->tconx.out.fs_type) {
89                 io->out.tree->fs_type = talloc_strdup(io->out.tree, 
90                                                       state->io_tcon->tconx.out.fs_type);
91         }
92
93         /* all done! */
94         c->state = SMBCLI_REQUEST_DONE;
95
96         return NT_STATUS_OK;
97 }
98
99
100 /*
101   a session setup request has competed
102 */
103 static NTSTATUS connect_session_setup(struct smbcli_composite *c, 
104                                       struct smb_composite_connect *io)
105 {
106         struct connect_state *state = talloc_get_type(c->private, struct connect_state);
107         NTSTATUS status;
108
109         status = smb_composite_sesssetup_recv(state->creq);
110         NT_STATUS_NOT_OK_RETURN(status);
111         
112         state->session->vuid = state->io_setup->out.vuid;
113         
114         /* setup for a tconx */
115         io->out.tree = smbcli_tree_init(state->session);
116         NT_STATUS_HAVE_NO_MEMORY(io->out.tree);
117
118         state->io_tcon = talloc(c, union smb_tcon);
119         NT_STATUS_HAVE_NO_MEMORY(state->io_tcon);
120
121         /* connect to a share using a tree connect */
122         state->io_tcon->generic.level = RAW_TCON_TCONX;
123         state->io_tcon->tconx.in.flags = 0;
124         state->io_tcon->tconx.in.password = data_blob(NULL, 0); 
125         
126         state->io_tcon->tconx.in.path = talloc_asprintf(state->io_tcon, 
127                                                  "\\\\%s\\%s", 
128                                                  io->in.called_name, 
129                                                  io->in.service);
130         NT_STATUS_HAVE_NO_MEMORY(state->io_tcon->tconx.in.path);
131         if (!io->in.service_type) {
132                 state->io_tcon->tconx.in.device = "?????";
133         } else {
134                 state->io_tcon->tconx.in.device = io->in.service_type;
135         }
136
137         state->req = smb_tree_connect_send(io->out.tree, state->io_tcon);
138         NT_STATUS_HAVE_NO_MEMORY(state->req);
139
140         state->req->async.fn = request_handler;
141         state->req->async.private = c;
142         state->stage = CONNECT_TCON;
143
144         return NT_STATUS_OK;
145 }
146
147 /*
148   a negprot request has competed
149 */
150 static NTSTATUS connect_negprot(struct smbcli_composite *c, 
151                                 struct smb_composite_connect *io)
152 {
153         struct connect_state *state = talloc_get_type(c->private, struct connect_state);
154         NTSTATUS status;
155
156         status = smb_raw_negotiate_recv(state->req);
157         NT_STATUS_NOT_OK_RETURN(status);
158
159         /* next step is a session setup */
160         state->session = smbcli_session_init(state->transport);
161         NT_STATUS_HAVE_NO_MEMORY(state->session);
162
163         /* get rid of the extra reference to the transport */
164         talloc_free(state->transport);
165
166         state->io_setup = talloc(c, struct smb_composite_sesssetup);
167         NT_STATUS_HAVE_NO_MEMORY(state->io_setup);
168
169         /* prepare a session setup to establish a security context */
170         state->io_setup->in.sesskey      = state->transport->negotiate.sesskey;
171         state->io_setup->in.capabilities = state->transport->negotiate.capabilities;
172         state->io_setup->in.domain       = io->in.domain;
173         state->io_setup->in.user         = io->in.user;
174         state->io_setup->in.password     = io->in.password;
175
176         state->creq = smb_composite_sesssetup_send(state->session, state->io_setup);
177         NT_STATUS_HAVE_NO_MEMORY(state->creq);
178
179         state->creq->async.fn = composite_handler;
180         state->creq->async.private = c;
181         state->stage = CONNECT_SESSION_SETUP;
182         
183         return NT_STATUS_OK;
184 }
185
186
187 /*
188   a session request operation has competed
189 */
190 static NTSTATUS connect_session_request(struct smbcli_composite *c, 
191                                         struct smb_composite_connect *io)
192 {
193         struct connect_state *state = talloc_get_type(c->private, struct connect_state);
194         NTSTATUS status;
195
196         status = smbcli_transport_connect_recv(state->req);
197         NT_STATUS_NOT_OK_RETURN(status);
198
199         /* next step is a negprot */
200         return connect_send_negprot(c, io);
201 }
202
203 /*
204   a socket connection operation has competed
205 */
206 static NTSTATUS connect_socket(struct smbcli_composite *c, 
207                                struct smb_composite_connect *io)
208 {
209         struct connect_state *state = talloc_get_type(c->private, struct connect_state);
210         NTSTATUS status;
211         struct nbt_name calling, called;
212
213         status = smbcli_sock_connect_recv(state->creq);
214         NT_STATUS_NOT_OK_RETURN(status);
215
216         /* the socket is up - we can initialise the smbcli transport layer */
217         state->transport = smbcli_transport_init(state->sock);
218         NT_STATUS_HAVE_NO_MEMORY(state->transport);
219
220         calling.name = io->in.calling_name;
221         calling.type = NBT_NAME_CLIENT;
222         calling.scope = NULL;
223
224         nbt_choose_called_name(state, &called, io->in.called_name, NBT_NAME_SERVER);
225
226         /* we have a connected socket - next step is a session
227            request, if needed. Port 445 doesn't need it, so it goes
228            straight to the negprot */
229         if (state->sock->port == 445) {
230                 status = nbt_name_dup(state->transport, &called, 
231                                       &state->transport->called);
232                 NT_STATUS_NOT_OK_RETURN(status);
233                 return connect_send_negprot(c, io);
234         }
235
236         state->req = smbcli_transport_connect_send(state->transport, &calling, &called);
237         NT_STATUS_HAVE_NO_MEMORY(state->req);
238
239         state->req->async.fn = request_handler;
240         state->req->async.private = c;
241         state->stage = CONNECT_SESSION_REQUEST;
242
243         return NT_STATUS_OK;
244 }
245
246
247 /*
248   called when name resolution is finished
249 */
250 static NTSTATUS connect_resolve(struct smbcli_composite *c, 
251                                 struct smb_composite_connect *io)
252 {
253         struct connect_state *state = talloc_get_type(c->private, struct connect_state);
254         NTSTATUS status;
255         const char *address;
256
257         status = resolve_name_recv(state->creq, state, &address);
258         NT_STATUS_NOT_OK_RETURN(status);
259
260         state->creq = smbcli_sock_connect_send(state->sock, address, state->io->in.port);
261         NT_STATUS_HAVE_NO_MEMORY(state->creq);
262
263         state->stage = CONNECT_SOCKET;
264         state->creq->async.private = c;
265         state->creq->async.fn = composite_handler;
266
267         return NT_STATUS_OK;
268 }
269
270
271 /*
272   handle and dispatch state transitions
273 */
274 static void state_handler(struct smbcli_composite *c)
275 {
276         struct connect_state *state = talloc_get_type(c->private, struct connect_state);
277
278         switch (state->stage) {
279         case CONNECT_RESOLVE:
280                 c->status = connect_resolve(c, state->io);
281                 break;
282         case CONNECT_SOCKET:
283                 c->status = connect_socket(c, state->io);
284                 break;
285         case CONNECT_SESSION_REQUEST:
286                 c->status = connect_session_request(c, state->io);
287                 break;
288         case CONNECT_NEGPROT:
289                 c->status = connect_negprot(c, state->io);
290                 break;
291         case CONNECT_SESSION_SETUP:
292                 c->status = connect_session_setup(c, state->io);
293                 break;
294         case CONNECT_TCON:
295                 c->status = connect_tcon(c, state->io);
296                 break;
297         }
298
299         if (!NT_STATUS_IS_OK(c->status)) {
300                 c->state = SMBCLI_REQUEST_ERROR;
301         }
302
303         if (c->state >= SMBCLI_REQUEST_DONE &&
304             c->async.fn) {
305                 c->async.fn(c);
306         }
307 }
308
309
310 /*
311   handler for completion of a smbcli_request sub-request
312 */
313 static void request_handler(struct smbcli_request *req)
314 {
315         struct smbcli_composite *c = talloc_get_type(req->async.private, 
316                                                      struct smbcli_composite);
317         return state_handler(c);
318 }
319
320 /*
321   handler for completion of a smbcli_composite sub-request
322 */
323 static void composite_handler(struct smbcli_composite *req)
324 {
325         struct smbcli_composite *c = talloc_get_type(req->async.private, 
326                                                      struct smbcli_composite);
327         return state_handler(c);
328 }
329
330 /*
331   a function to establish a smbcli_tree from scratch
332 */
333 struct smbcli_composite *smb_composite_connect_send(struct smb_composite_connect *io,
334                                                     struct event_context *event_ctx)
335 {
336         struct smbcli_composite *c;
337         struct connect_state *state;
338         struct nbt_name name;
339
340         c = talloc_zero(NULL, struct smbcli_composite);
341         if (c == NULL) goto failed;
342
343         state = talloc(c, struct connect_state);
344         if (state == NULL) goto failed;
345
346         state->sock = smbcli_sock_init(state, event_ctx);
347         if (state->sock == NULL) goto failed;
348
349         state->io = io;
350         state->stage = CONNECT_RESOLVE;
351
352         c->state = SMBCLI_REQUEST_SEND;
353         c->event_ctx = talloc_reference(c, state->sock->event.ctx);
354         c->private = state;
355
356         name.name = io->in.dest_host;
357         name.type = NBT_NAME_SERVER;
358         name.scope = NULL;
359
360         state->creq = resolve_name_send(&name, c->event_ctx);
361         if (state->creq == NULL) goto failed;
362
363         state->creq->async.private = c;
364         state->creq->async.fn = composite_handler;
365
366         return c;
367 failed:
368         talloc_free(c);
369         return NULL;
370 }
371
372 /*
373   recv half of async composite connect code
374 */
375 NTSTATUS smb_composite_connect_recv(struct smbcli_composite *c, TALLOC_CTX *mem_ctx)
376 {
377         NTSTATUS status;
378
379         status = smb_composite_wait(c);
380
381         if (NT_STATUS_IS_OK(status)) {
382                 struct connect_state *state = talloc_get_type(c->private, struct connect_state);
383                 talloc_steal(mem_ctx, state->io->out.tree);
384         }
385
386         talloc_free(c);
387         return status;
388 }
389
390 /*
391   sync version of smb_composite_connect 
392 */
393 NTSTATUS smb_composite_connect(struct smb_composite_connect *io, TALLOC_CTX *mem_ctx)
394 {
395         struct smbcli_composite *c = smb_composite_connect_send(io, NULL);
396         return smb_composite_connect_recv(c, mem_ctx);
397 }