s3-selftest: fix typo.
[samba.git] / source3 / rpc_client / rpc_transport_smbd.c
1 /*
2  *  Unix SMB/CIFS implementation.
3  *  RPC client transport over named pipes to a child smbd
4  *  Copyright (C) Volker Lendecke 2009
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 3 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, see <http://www.gnu.org/licenses/>.
18  */
19
20 #include "includes.h"
21
22 #undef DBGC_CLASS
23 #define DBGC_CLASS DBGC_RPC_CLI
24
25 /**
26  * struct rpc_cli_smbd_conn represents a forked smbd. This structure should
27  * exist only once per process which does the rpc calls.
28  *
29  * RPC pipe handles can be attached to this smbd connection with
30  * rpc_pipe_open_local().
31  *
32  * For this to work right, we can not use rpc_transport_np directly, because
33  * the child smbd wants to write its DEBUG output somewhere. We redirect the
34  * child's output to rpc_cli_smbd_conn->stdout_fd. While the RPC calls are
35  * active, we have an event context available and attach a fd event to the
36  * stdout_df.
37  */
38
39 struct rpc_cli_smbd_conn {
40         /**
41          * The smb connection to handle the named pipe traffic over
42          */
43         struct cli_state *cli;
44
45         /**
46          * Attached to stdout in the forked smbd, this is where smbd will
47          * print its DEBUG.
48          */
49         int stdout_fd;
50
51         /**
52          * Custom callback provided by the owner of the
53          * rpc_cli_smbd_conn. Here we send the smbd DEBUG output. Can be NULL.
54          */
55         struct {
56                 void (*fn)(char *buf, size_t len, void *priv);
57                 void *priv;
58         } stdout_callback ;
59 };
60
61 /**
62  * Event handler to be called whenever the forked smbd prints debugging
63  * output.
64  */
65
66 static void rpc_cli_smbd_stdout_reader(struct event_context *ev,
67                                        struct fd_event *fde,
68                                        uint16_t flags, void *priv)
69 {
70         struct rpc_cli_smbd_conn *conn = talloc_get_type_abort(
71                 priv, struct rpc_cli_smbd_conn);
72         char buf[1024];
73         ssize_t nread;
74
75         if ((flags & EVENT_FD_READ) == 0) {
76                 return;
77         }
78
79         nread = read(conn->stdout_fd, buf, sizeof(buf)-1);
80         if (nread < 0) {
81                 DEBUG(0, ("Could not read from smbd stdout: %s\n",
82                           strerror(errno)));
83                 TALLOC_FREE(fde);
84                 return;
85         }
86         if (nread == 0) {
87                 DEBUG(0, ("EOF from smbd stdout\n"));
88                 TALLOC_FREE(fde);
89                 return;
90         }
91         buf[nread] = '\0';
92
93         if (conn->stdout_callback.fn != NULL) {
94                 conn->stdout_callback.fn(buf, nread,
95                                          conn->stdout_callback.priv);
96         }
97 }
98
99 /**
100  * struct rpc_transport_smbd_state is the link from a struct rpc_pipe_client
101  * to the rpc_cli_smbd_conn. We use a named pipe transport as a subtransport.
102  */
103
104 struct rpc_transport_smbd_state {
105         struct rpc_cli_smbd_conn *conn;
106         struct rpc_cli_transport *sub_transp;
107 };
108
109 static int rpc_cli_smbd_conn_destructor(struct rpc_cli_smbd_conn *conn)
110 {
111         if (conn->cli != NULL) {
112                 cli_shutdown(conn->cli);
113                 conn->cli = NULL;
114         }
115         if (conn->stdout_fd != -1) {
116                 close(conn->stdout_fd);
117                 conn->stdout_fd = -1;
118         }
119         return 0;
120 }
121
122 /*
123  * Do the negprot/sesssetup/tcon to an anonymous ipc$ connection
124  */
125
126 struct get_anon_ipc_state {
127         struct event_context *ev;
128         struct cli_state *cli;
129 };
130
131 static void get_anon_ipc_negprot_done(struct tevent_req *subreq);
132 static void get_anon_ipc_sesssetup_done(struct tevent_req *subreq);
133 static void get_anon_ipc_tcon_done(struct tevent_req *subreq);
134
135 static struct tevent_req *get_anon_ipc_send(TALLOC_CTX *mem_ctx,
136                                             struct event_context *ev,
137                                             struct cli_state *cli)
138 {
139         struct tevent_req *req, *subreq;
140         struct get_anon_ipc_state *state;
141
142         req = tevent_req_create(mem_ctx, &state, struct get_anon_ipc_state);
143         if (req == NULL) {
144                 return NULL;
145         }
146         state->ev = ev;
147         state->cli = cli;
148
149         subreq = cli_negprot_send(state, ev, cli);
150         if (tevent_req_nomem(subreq, req)) {
151                 return tevent_req_post(req, ev);
152         }
153         tevent_req_set_callback(subreq, get_anon_ipc_negprot_done, req);
154         return req;
155 }
156
157 static void get_anon_ipc_negprot_done(struct tevent_req *subreq)
158 {
159         struct tevent_req *req = tevent_req_callback_data(
160                 subreq, struct tevent_req);
161         struct get_anon_ipc_state *state = tevent_req_data(
162                 req, struct get_anon_ipc_state);
163         NTSTATUS status;
164
165         status = cli_negprot_recv(subreq);
166         TALLOC_FREE(subreq);
167         if (!NT_STATUS_IS_OK(status)) {
168                 tevent_req_nterror(req, status);
169                 return;
170         }
171
172         subreq = cli_session_setup_guest_send(state, state->ev, state->cli);
173         if (tevent_req_nomem(subreq, req)) {
174                 return;
175         }
176         tevent_req_set_callback(subreq, get_anon_ipc_sesssetup_done, req);
177 }
178
179 static void get_anon_ipc_sesssetup_done(struct tevent_req *subreq)
180 {
181         struct tevent_req *req = tevent_req_callback_data(
182                 subreq, struct tevent_req);
183         struct get_anon_ipc_state *state = tevent_req_data(
184                 req, struct get_anon_ipc_state);
185         NTSTATUS status;
186
187         status = cli_session_setup_guest_recv(subreq);
188         TALLOC_FREE(subreq);
189         if (!NT_STATUS_IS_OK(status)) {
190                 tevent_req_nterror(req, status);
191                 return;
192         }
193
194         subreq = cli_tcon_andx_send(state, state->ev, state->cli,
195                                     "IPC$", "IPC", NULL, 0);
196         if (tevent_req_nomem(subreq, req)) {
197                 return;
198         }
199         tevent_req_set_callback(subreq, get_anon_ipc_tcon_done, req);
200 }
201
202 static void get_anon_ipc_tcon_done(struct tevent_req *subreq)
203 {
204         struct tevent_req *req = tevent_req_callback_data(
205                 subreq, struct tevent_req);
206         NTSTATUS status;
207
208         status = cli_tcon_andx_recv(subreq);
209         TALLOC_FREE(subreq);
210         if (!NT_STATUS_IS_OK(status)) {
211                 tevent_req_nterror(req, status);
212                 return;
213         }
214         tevent_req_done(req);
215 }
216
217 static NTSTATUS get_anon_ipc_recv(struct tevent_req *req)
218 {
219         return tevent_req_simple_recv_ntstatus(req);
220 }
221
222 struct rpc_cli_smbd_conn_init_state {
223         struct event_context *ev;
224         struct rpc_cli_smbd_conn *conn;
225 };
226
227 static void rpc_cli_smbd_conn_init_done(struct tevent_req *subreq);
228
229 struct tevent_req *rpc_cli_smbd_conn_init_send(TALLOC_CTX *mem_ctx,
230                                                struct event_context *ev,
231                                                void (*stdout_callback)(char *buf,
232                                                                        size_t len,
233                                                                        void *priv),
234                                                void *priv)
235 {
236         struct tevent_req *req, *subreq;
237         struct rpc_cli_smbd_conn_init_state *state;
238         int smb_sock[2];
239         int stdout_pipe[2];
240         NTSTATUS status;
241         pid_t pid;
242         int ret;
243
244         smb_sock[0] = smb_sock[1] = stdout_pipe[0] = stdout_pipe[1] = -1;
245
246         req = tevent_req_create(mem_ctx, &state,
247                                 struct rpc_cli_smbd_conn_init_state);
248         if (req == NULL) {
249                 return NULL;
250         }
251         state->ev = ev;
252
253         state->conn = talloc(state, struct rpc_cli_smbd_conn);
254         if (tevent_req_nomem(state->conn, req)) {
255                 return tevent_req_post(req, ev);
256         }
257
258         state->conn->cli = cli_initialise();
259         if (tevent_req_nomem(state->conn->cli, req)) {
260                 return tevent_req_post(req, ev);
261         }
262         state->conn->stdout_fd = -1;
263         state->conn->stdout_callback.fn = stdout_callback;
264         state->conn->stdout_callback.priv = priv;
265         talloc_set_destructor(state->conn, rpc_cli_smbd_conn_destructor);
266
267         ret = socketpair(AF_UNIX, SOCK_STREAM, 0, smb_sock);
268         if (ret == -1) {
269                 status = map_nt_error_from_unix(errno);
270                 goto post_status;
271         }
272         ret = pipe(stdout_pipe);
273         if (ret == -1) {
274                 status = map_nt_error_from_unix(errno);
275                 goto post_status;
276         }
277
278         pid = sys_fork();
279         if (pid == -1) {
280                 status = map_nt_error_from_unix(errno);
281                 goto post_status;
282         }
283         if (pid == 0) {
284                 char *smbd_cmd;
285
286                 close(smb_sock[0]);
287                 close(stdout_pipe[0]);
288                 close(0);
289                 if (dup(smb_sock[1]) == -1) {
290                         exit(1);
291                 }
292                 close(smb_sock[1]);
293                 close(1);
294                 if (dup(stdout_pipe[1]) == -1) {
295                         exit(1);
296                 }
297                 close(stdout_pipe[1]);
298
299                 smbd_cmd = getenv("SMB_PATH");
300
301                 if ((smbd_cmd == NULL)
302                     && (asprintf(&smbd_cmd, "%s/smbd", get_dyn_SBINDIR())
303                         == -1)) {
304                         printf("no memory");
305                         exit(1);
306                 }
307                 if (asprintf(&smbd_cmd, "%s -F -S -d %d", smbd_cmd,
308                              DEBUGLEVEL) == -1) {
309                         printf("no memory");
310                         exit(1);
311                 }
312
313                 exit(system(smbd_cmd));
314         }
315
316         state->conn->cli->fd = smb_sock[0];
317         smb_sock[0] = -1;
318         close(smb_sock[1]);
319         smb_sock[1] = -1;
320
321         state->conn->stdout_fd = stdout_pipe[0];
322         stdout_pipe[0] = -1;
323         close(stdout_pipe[1]);
324         stdout_pipe[1] = -1;
325
326         subreq = get_anon_ipc_send(state, ev, state->conn->cli);
327         if (tevent_req_nomem(subreq, req)) {
328                 return tevent_req_post(req, ev);
329         }
330
331         if (event_add_fd(ev, state, state->conn->stdout_fd, EVENT_FD_READ,
332                          rpc_cli_smbd_stdout_reader, state->conn) == NULL) {
333                 status = NT_STATUS_NO_MEMORY;
334                 goto post_status;
335         }
336
337         tevent_req_set_callback(subreq, rpc_cli_smbd_conn_init_done, req);
338         return req;
339
340  post_status:
341         if (smb_sock[0] != -1) {
342                 close(smb_sock[0]);
343         }
344         if (smb_sock[1] != -1) {
345                 close(smb_sock[1]);
346         }
347         if (stdout_pipe[0] != -1) {
348                 close(stdout_pipe[0]);
349         }
350         if (stdout_pipe[1] != -1) {
351                 close(stdout_pipe[1]);
352         }
353         tevent_req_nterror(req, status);
354         return tevent_req_post(req, ev);
355 }
356
357 static void rpc_cli_smbd_conn_init_done(struct tevent_req *subreq)
358 {
359         struct tevent_req *req = tevent_req_callback_data(
360                 subreq, struct tevent_req);
361         NTSTATUS status;
362
363         status = get_anon_ipc_recv(subreq);
364         TALLOC_FREE(subreq);
365         if (!NT_STATUS_IS_OK(status)) {
366                 tevent_req_nterror(req, status);
367                 return;
368         }
369         tevent_req_done(req);
370 }
371
372 NTSTATUS rpc_cli_smbd_conn_init_recv(struct tevent_req *req,
373                                      TALLOC_CTX *mem_ctx,
374                                      struct rpc_cli_smbd_conn **pconn)
375 {
376         struct rpc_cli_smbd_conn_init_state *state = tevent_req_data(
377                 req, struct rpc_cli_smbd_conn_init_state);
378         NTSTATUS status;
379
380         if (tevent_req_is_nterror(req, &status)) {
381                 return status;
382         }
383         *pconn = talloc_move(mem_ctx, &state->conn);
384         return NT_STATUS_OK;
385 }
386
387 NTSTATUS rpc_cli_smbd_conn_init(TALLOC_CTX *mem_ctx,
388                                 struct rpc_cli_smbd_conn **pconn,
389                                 void (*stdout_callback)(char *buf,
390                                                         size_t len,
391                                                         void *priv),
392                                 void *priv)
393 {
394         TALLOC_CTX *frame = talloc_stackframe();
395         struct event_context *ev;
396         struct tevent_req *req;
397         NTSTATUS status;
398
399         ev = event_context_init(frame);
400         if (ev == NULL) {
401                 status = NT_STATUS_NO_MEMORY;
402                 goto fail;
403         }
404
405         req = rpc_cli_smbd_conn_init_send(frame, ev, stdout_callback, priv);
406         if (req == NULL) {
407                 status = NT_STATUS_NO_MEMORY;
408                 goto fail;
409         }
410
411         if (!tevent_req_poll(req, ev)) {
412                 status = map_nt_error_from_unix(errno);
413                 goto fail;
414         }
415
416         status = rpc_cli_smbd_conn_init_recv(req, mem_ctx, pconn);
417  fail:
418         TALLOC_FREE(frame);
419         return status;
420 }
421
422 struct rpc_smbd_write_state {
423         struct rpc_cli_transport *sub_transp;
424         ssize_t written;
425 };
426
427 static void rpc_smbd_write_done(struct tevent_req *subreq);
428
429 static struct tevent_req *rpc_smbd_write_send(TALLOC_CTX *mem_ctx,
430                                               struct event_context *ev,
431                                               const uint8_t *data, size_t size,
432                                               void *priv)
433 {
434         struct rpc_transport_smbd_state *transp = talloc_get_type_abort(
435                 priv, struct rpc_transport_smbd_state);
436         struct tevent_req *req, *subreq;
437         struct rpc_smbd_write_state *state;
438
439         req = tevent_req_create(mem_ctx, &state, struct rpc_smbd_write_state);
440         if (req == NULL) {
441                 return NULL;
442         }
443         state->sub_transp = transp->sub_transp;
444
445         subreq = transp->sub_transp->write_send(state, ev, data, size,
446                                                 transp->sub_transp->priv);
447         if (subreq == NULL) {
448                 goto fail;
449         }
450
451         if (event_add_fd(ev, state, transp->conn->stdout_fd, EVENT_FD_READ,
452                          rpc_cli_smbd_stdout_reader, transp->conn) == NULL) {
453                 goto fail;
454         }
455         tevent_req_set_callback(subreq, rpc_smbd_write_done, req);
456         return req;
457
458  fail:
459         TALLOC_FREE(req);
460         return NULL;
461 }
462
463 static void rpc_smbd_write_done(struct tevent_req *subreq)
464 {
465         struct tevent_req *req = tevent_req_callback_data(
466                 subreq, struct tevent_req);
467         struct rpc_smbd_write_state *state = tevent_req_data(
468                 req, struct rpc_smbd_write_state);
469         NTSTATUS status;
470
471         status = state->sub_transp->write_recv(subreq, &state->written);
472         TALLOC_FREE(subreq);
473         if (!NT_STATUS_IS_OK(status)) {
474                 tevent_req_nterror(req, status);
475                 return;
476         }
477         tevent_req_done(req);
478 }
479
480 static NTSTATUS rpc_smbd_write_recv(struct tevent_req *req, ssize_t *pwritten)
481 {
482         struct rpc_smbd_write_state *state = tevent_req_data(
483                 req, struct rpc_smbd_write_state);
484         NTSTATUS status;
485
486         if (tevent_req_is_nterror(req, &status)) {
487                 return status;
488         }
489         *pwritten = state->written;
490         return NT_STATUS_OK;
491 }
492
493 struct rpc_smbd_read_state {
494         struct rpc_cli_transport *sub_transp;
495         ssize_t received;
496 };
497
498 static void rpc_smbd_read_done(struct tevent_req *subreq);
499
500 static struct tevent_req *rpc_smbd_read_send(TALLOC_CTX *mem_ctx,
501                                              struct event_context *ev,
502                                              uint8_t *data, size_t size,
503                                              void *priv)
504 {
505         struct rpc_transport_smbd_state *transp = talloc_get_type_abort(
506                 priv, struct rpc_transport_smbd_state);
507         struct tevent_req *req, *subreq;
508         struct rpc_smbd_read_state *state;
509
510         req = tevent_req_create(mem_ctx, &state, struct rpc_smbd_read_state);
511         if (req == NULL) {
512                 return NULL;
513         }
514         state->sub_transp = transp->sub_transp;
515
516         subreq = transp->sub_transp->read_send(state, ev, data, size,
517                                                 transp->sub_transp->priv);
518         if (subreq == NULL) {
519                 goto fail;
520         }
521
522         if (event_add_fd(ev, state, transp->conn->stdout_fd, EVENT_FD_READ,
523                          rpc_cli_smbd_stdout_reader, transp->conn) == NULL) {
524                 goto fail;
525         }
526         tevent_req_set_callback(subreq, rpc_smbd_read_done, req);
527         return req;
528  fail:
529         TALLOC_FREE(req);
530         return NULL;
531 }
532
533 static void rpc_smbd_read_done(struct tevent_req *subreq)
534 {
535         struct tevent_req *req = tevent_req_callback_data(
536                 subreq, struct tevent_req);
537         struct rpc_smbd_read_state *state = tevent_req_data(
538                 req, struct rpc_smbd_read_state);
539         NTSTATUS status;
540
541         status = state->sub_transp->read_recv(subreq, &state->received);
542         TALLOC_FREE(subreq);
543         if (!NT_STATUS_IS_OK(status)) {
544                 tevent_req_nterror(req, status);
545                 return;
546         }
547         tevent_req_done(req);
548 }
549
550 static NTSTATUS rpc_smbd_read_recv(struct tevent_req *req, ssize_t *preceived)
551 {
552         struct rpc_smbd_read_state *state = tevent_req_data(
553                 req, struct rpc_smbd_read_state);
554         NTSTATUS status;
555
556         if (tevent_req_is_nterror(req, &status)) {
557                 return status;
558         }
559         *preceived = state->received;
560         return NT_STATUS_OK;
561 }
562
563 struct rpc_transport_smbd_init_state {
564         struct rpc_cli_transport *transport;
565         struct rpc_transport_smbd_state *transport_smbd;
566 };
567
568 static void rpc_transport_smbd_init_done(struct tevent_req *subreq);
569
570 struct tevent_req *rpc_transport_smbd_init_send(TALLOC_CTX *mem_ctx,
571                                                 struct event_context *ev,
572                                                 struct rpc_cli_smbd_conn *conn,
573                                                 const struct ndr_syntax_id *abstract_syntax)
574 {
575         struct tevent_req *req, *subreq;
576         struct rpc_transport_smbd_init_state *state;
577
578         req = tevent_req_create(mem_ctx, &state,
579                                 struct rpc_transport_smbd_init_state);
580         if (req == NULL) {
581                 return NULL;
582         }
583
584         state->transport = talloc(state, struct rpc_cli_transport);
585         if (tevent_req_nomem(state->transport, req)) {
586                 return tevent_req_post(req, ev);
587         }
588         state->transport_smbd = talloc(state->transport,
589                                        struct rpc_transport_smbd_state);
590         if (tevent_req_nomem(state->transport_smbd, req)) {
591                 return tevent_req_post(req, ev);
592         }
593         state->transport_smbd->conn = conn;
594         state->transport->priv = state->transport_smbd;
595
596         if (event_add_fd(ev, state, conn->stdout_fd, EVENT_FD_READ,
597                          rpc_cli_smbd_stdout_reader, conn) == NULL) {
598                 tevent_req_nterror(req, NT_STATUS_NO_MEMORY);
599                 return tevent_req_post(req, ev);
600         }
601
602         subreq = rpc_transport_np_init_send(state, ev, conn->cli,
603                                             abstract_syntax);
604         if (tevent_req_nomem(subreq, req)) {
605                 return tevent_req_post(req, ev);
606         }
607         tevent_req_set_callback(subreq, rpc_transport_smbd_init_done, req);
608         return req;
609 }
610
611 static void rpc_transport_smbd_init_done(struct tevent_req *subreq)
612 {
613         struct tevent_req *req = tevent_req_callback_data(
614                 subreq, struct tevent_req);
615         struct rpc_transport_smbd_init_state *state = tevent_req_data(
616                 req, struct rpc_transport_smbd_init_state);
617         NTSTATUS status;
618
619         status = rpc_transport_np_init_recv(
620                 subreq, state->transport_smbd,
621                 &state->transport_smbd->sub_transp);
622         TALLOC_FREE(subreq);
623         if (!NT_STATUS_IS_OK(status)) {
624                 tevent_req_nterror(req, status);
625                 return;
626         }
627         tevent_req_done(req);
628 }
629
630 NTSTATUS rpc_transport_smbd_init_recv(struct tevent_req *req,
631                                       TALLOC_CTX *mem_ctx,
632                                       struct rpc_cli_transport **presult)
633 {
634         struct rpc_transport_smbd_init_state *state = tevent_req_data(
635                 req, struct rpc_transport_smbd_init_state);
636         NTSTATUS status;
637
638         if (tevent_req_is_nterror(req, &status)) {
639                 return status;
640         }
641
642         state->transport->write_send = rpc_smbd_write_send;
643         state->transport->write_recv = rpc_smbd_write_recv;
644         state->transport->read_send = rpc_smbd_read_send;
645         state->transport->read_recv = rpc_smbd_read_recv;
646         state->transport->trans_send = NULL;
647         state->transport->trans_recv = NULL;
648
649         *presult = talloc_move(mem_ctx, &state->transport);
650         return NT_STATUS_OK;
651 }
652
653 NTSTATUS rpc_transport_smbd_init(TALLOC_CTX *mem_ctx,
654                                  struct rpc_cli_smbd_conn *conn,
655                                  const struct ndr_syntax_id *abstract_syntax,
656                                  struct rpc_cli_transport **presult)
657 {
658         TALLOC_CTX *frame = talloc_stackframe();
659         struct event_context *ev;
660         struct tevent_req *req;
661         NTSTATUS status;
662
663         ev = event_context_init(frame);
664         if (ev == NULL) {
665                 status = NT_STATUS_NO_MEMORY;
666                 goto fail;
667         }
668
669         req = rpc_transport_smbd_init_send(frame, ev, conn, abstract_syntax);
670         if (req == NULL) {
671                 status = NT_STATUS_NO_MEMORY;
672                 goto fail;
673         }
674
675         if (!tevent_req_poll(req, ev)) {
676                 status = map_nt_error_from_unix(errno);
677                 goto fail;
678         }
679
680         status = rpc_transport_smbd_init_recv(req, mem_ctx, presult);
681  fail:
682         TALLOC_FREE(frame);
683         return status;
684 }