s4-ldb: cope better with corruption of tdb records
[Samba/aatanasov.git] / source3 / rpc_client / rpc_transport_smbd.c
blob171048ae2966aca446dbc868684764dc8456acfb
1 /*
2 * Unix SMB/CIFS implementation.
3 * RPC client transport over named pipes to a child smbd
4 * Copyright (C) Volker Lendecke 2009
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.
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.
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/>.
20 #include "includes.h"
22 #undef DBGC_CLASS
23 #define DBGC_CLASS DBGC_RPC_CLI
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.
29 * RPC pipe handles can be attached to this smbd connection with
30 * rpc_pipe_open_local().
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.
39 struct rpc_cli_smbd_conn {
40 /**
41 * The smb connection to handle the named pipe traffic over
43 struct cli_state *cli;
45 /**
46 * Attached to stdout in the forked smbd, this is where smbd will
47 * print its DEBUG.
49 int stdout_fd;
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.
55 struct {
56 void (*fn)(char *buf, size_t len, void *priv);
57 void *priv;
58 } stdout_callback ;
61 /**
62 * Event handler to be called whenever the forked smbd prints debugging
63 * output.
66 static void rpc_cli_smbd_stdout_reader(struct event_context *ev,
67 struct fd_event *fde,
68 uint16_t flags, void *priv)
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;
75 if ((flags & EVENT_FD_READ) == 0) {
76 return;
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;
86 if (nread == 0) {
87 DEBUG(0, ("EOF from smbd stdout\n"));
88 TALLOC_FREE(fde);
89 return;
91 buf[nread] = '\0';
93 if (conn->stdout_callback.fn != NULL) {
94 conn->stdout_callback.fn(buf, nread,
95 conn->stdout_callback.priv);
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.
104 struct rpc_transport_smbd_state {
105 struct rpc_cli_smbd_conn *conn;
106 struct rpc_cli_transport *sub_transp;
109 static int rpc_cli_smbd_conn_destructor(struct rpc_cli_smbd_conn *conn)
111 if (conn->cli != NULL) {
112 cli_shutdown(conn->cli);
113 conn->cli = NULL;
115 if (conn->stdout_fd != -1) {
116 close(conn->stdout_fd);
117 conn->stdout_fd = -1;
119 return 0;
123 * Do the negprot/sesssetup/tcon to an anonymous ipc$ connection
126 struct get_anon_ipc_state {
127 struct event_context *ev;
128 struct cli_state *cli;
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);
135 static struct tevent_req *get_anon_ipc_send(TALLOC_CTX *mem_ctx,
136 struct event_context *ev,
137 struct cli_state *cli)
139 struct tevent_req *req, *subreq;
140 struct get_anon_ipc_state *state;
142 req = tevent_req_create(mem_ctx, &state, struct get_anon_ipc_state);
143 if (req == NULL) {
144 return NULL;
146 state->ev = ev;
147 state->cli = cli;
149 subreq = cli_negprot_send(state, ev, cli);
150 if (tevent_req_nomem(subreq, req)) {
151 return tevent_req_post(req, ev);
153 tevent_req_set_callback(subreq, get_anon_ipc_negprot_done, req);
154 return req;
157 static void get_anon_ipc_negprot_done(struct tevent_req *subreq)
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;
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;
172 subreq = cli_session_setup_guest_send(state, state->ev, state->cli);
173 if (tevent_req_nomem(subreq, req)) {
174 return;
176 tevent_req_set_callback(subreq, get_anon_ipc_sesssetup_done, req);
179 static void get_anon_ipc_sesssetup_done(struct tevent_req *subreq)
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;
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;
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;
199 tevent_req_set_callback(subreq, get_anon_ipc_tcon_done, req);
202 static void get_anon_ipc_tcon_done(struct tevent_req *subreq)
204 struct tevent_req *req = tevent_req_callback_data(
205 subreq, struct tevent_req);
206 NTSTATUS status;
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;
214 tevent_req_done(req);
217 static NTSTATUS get_anon_ipc_recv(struct tevent_req *req)
219 return tevent_req_simple_recv_ntstatus(req);
222 struct rpc_cli_smbd_conn_init_state {
223 struct event_context *ev;
224 struct rpc_cli_smbd_conn *conn;
227 static void rpc_cli_smbd_conn_init_done(struct tevent_req *subreq);
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)
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;
244 smb_sock[0] = smb_sock[1] = stdout_pipe[0] = stdout_pipe[1] = -1;
246 req = tevent_req_create(mem_ctx, &state,
247 struct rpc_cli_smbd_conn_init_state);
248 if (req == NULL) {
249 return NULL;
251 state->ev = ev;
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);
258 state->conn->cli = cli_initialise();
259 if (tevent_req_nomem(state->conn->cli, req)) {
260 return tevent_req_post(req, ev);
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);
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;
272 ret = pipe(stdout_pipe);
273 if (ret == -1) {
274 status = map_nt_error_from_unix(errno);
275 goto post_status;
278 pid = sys_fork();
279 if (pid == -1) {
280 status = map_nt_error_from_unix(errno);
281 goto post_status;
283 if (pid == 0) {
284 char *smbd_cmd;
286 close(smb_sock[0]);
287 close(stdout_pipe[0]);
288 close(0);
289 if (dup(smb_sock[1]) == -1) {
290 exit(1);
292 close(smb_sock[1]);
293 close(1);
294 if (dup(stdout_pipe[1]) == -1) {
295 exit(1);
297 close(stdout_pipe[1]);
299 smbd_cmd = getenv("SMB_PATH");
301 if ((smbd_cmd == NULL)
302 && (asprintf(&smbd_cmd, "%s/smbd", get_dyn_SBINDIR())
303 == -1)) {
304 printf("no memory");
305 exit(1);
307 if (asprintf(&smbd_cmd, "%s -F -S -d %d", smbd_cmd,
308 DEBUGLEVEL) == -1) {
309 printf("no memory");
310 exit(1);
313 exit(system(smbd_cmd));
316 state->conn->cli->fd = smb_sock[0];
317 smb_sock[0] = -1;
318 close(smb_sock[1]);
319 smb_sock[1] = -1;
321 state->conn->stdout_fd = stdout_pipe[0];
322 stdout_pipe[0] = -1;
323 close(stdout_pipe[1]);
324 stdout_pipe[1] = -1;
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);
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;
337 tevent_req_set_callback(subreq, rpc_cli_smbd_conn_init_done, req);
338 return req;
340 post_status:
341 if (smb_sock[0] != -1) {
342 close(smb_sock[0]);
344 if (smb_sock[1] != -1) {
345 close(smb_sock[1]);
347 if (stdout_pipe[0] != -1) {
348 close(stdout_pipe[0]);
350 if (stdout_pipe[1] != -1) {
351 close(stdout_pipe[1]);
353 tevent_req_nterror(req, status);
354 return tevent_req_post(req, ev);
357 static void rpc_cli_smbd_conn_init_done(struct tevent_req *subreq)
359 struct tevent_req *req = tevent_req_callback_data(
360 subreq, struct tevent_req);
361 NTSTATUS status;
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;
369 tevent_req_done(req);
372 NTSTATUS rpc_cli_smbd_conn_init_recv(struct tevent_req *req,
373 TALLOC_CTX *mem_ctx,
374 struct rpc_cli_smbd_conn **pconn)
376 struct rpc_cli_smbd_conn_init_state *state = tevent_req_data(
377 req, struct rpc_cli_smbd_conn_init_state);
378 NTSTATUS status;
380 if (tevent_req_is_nterror(req, &status)) {
381 return status;
383 *pconn = talloc_move(mem_ctx, &state->conn);
384 return NT_STATUS_OK;
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)
394 TALLOC_CTX *frame = talloc_stackframe();
395 struct event_context *ev;
396 struct tevent_req *req;
397 NTSTATUS status;
399 ev = event_context_init(frame);
400 if (ev == NULL) {
401 status = NT_STATUS_NO_MEMORY;
402 goto fail;
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;
411 if (!tevent_req_poll(req, ev)) {
412 status = map_nt_error_from_unix(errno);
413 goto fail;
416 status = rpc_cli_smbd_conn_init_recv(req, mem_ctx, pconn);
417 fail:
418 TALLOC_FREE(frame);
419 return status;
422 struct rpc_smbd_write_state {
423 struct rpc_cli_transport *sub_transp;
424 ssize_t written;
427 static void rpc_smbd_write_done(struct tevent_req *subreq);
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)
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;
439 req = tevent_req_create(mem_ctx, &state, struct rpc_smbd_write_state);
440 if (req == NULL) {
441 return NULL;
443 state->sub_transp = transp->sub_transp;
445 subreq = transp->sub_transp->write_send(state, ev, data, size,
446 transp->sub_transp->priv);
447 if (subreq == NULL) {
448 goto fail;
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;
455 tevent_req_set_callback(subreq, rpc_smbd_write_done, req);
456 return req;
458 fail:
459 TALLOC_FREE(req);
460 return NULL;
463 static void rpc_smbd_write_done(struct tevent_req *subreq)
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;
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;
477 tevent_req_done(req);
480 static NTSTATUS rpc_smbd_write_recv(struct tevent_req *req, ssize_t *pwritten)
482 struct rpc_smbd_write_state *state = tevent_req_data(
483 req, struct rpc_smbd_write_state);
484 NTSTATUS status;
486 if (tevent_req_is_nterror(req, &status)) {
487 return status;
489 *pwritten = state->written;
490 return NT_STATUS_OK;
493 struct rpc_smbd_read_state {
494 struct rpc_cli_transport *sub_transp;
495 ssize_t received;
498 static void rpc_smbd_read_done(struct tevent_req *subreq);
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)
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;
510 req = tevent_req_create(mem_ctx, &state, struct rpc_smbd_read_state);
511 if (req == NULL) {
512 return NULL;
514 state->sub_transp = transp->sub_transp;
516 subreq = transp->sub_transp->read_send(state, ev, data, size,
517 transp->sub_transp->priv);
518 if (subreq == NULL) {
519 goto fail;
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;
526 tevent_req_set_callback(subreq, rpc_smbd_read_done, req);
527 return req;
528 fail:
529 TALLOC_FREE(req);
530 return NULL;
533 static void rpc_smbd_read_done(struct tevent_req *subreq)
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;
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;
547 tevent_req_done(req);
550 static NTSTATUS rpc_smbd_read_recv(struct tevent_req *req, ssize_t *preceived)
552 struct rpc_smbd_read_state *state = tevent_req_data(
553 req, struct rpc_smbd_read_state);
554 NTSTATUS status;
556 if (tevent_req_is_nterror(req, &status)) {
557 return status;
559 *preceived = state->received;
560 return NT_STATUS_OK;
563 struct rpc_transport_smbd_init_state {
564 struct rpc_cli_transport *transport;
565 struct rpc_transport_smbd_state *transport_smbd;
568 static void rpc_transport_smbd_init_done(struct tevent_req *subreq);
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)
575 struct tevent_req *req, *subreq;
576 struct rpc_transport_smbd_init_state *state;
578 req = tevent_req_create(mem_ctx, &state,
579 struct rpc_transport_smbd_init_state);
580 if (req == NULL) {
581 return NULL;
584 state->transport = talloc(state, struct rpc_cli_transport);
585 if (tevent_req_nomem(state->transport, req)) {
586 return tevent_req_post(req, ev);
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);
593 state->transport_smbd->conn = conn;
594 state->transport->priv = state->transport_smbd;
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);
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);
607 tevent_req_set_callback(subreq, rpc_transport_smbd_init_done, req);
608 return req;
611 static void rpc_transport_smbd_init_done(struct tevent_req *subreq)
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;
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;
627 tevent_req_done(req);
630 NTSTATUS rpc_transport_smbd_init_recv(struct tevent_req *req,
631 TALLOC_CTX *mem_ctx,
632 struct rpc_cli_transport **presult)
634 struct rpc_transport_smbd_init_state *state = tevent_req_data(
635 req, struct rpc_transport_smbd_init_state);
636 NTSTATUS status;
638 if (tevent_req_is_nterror(req, &status)) {
639 return status;
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;
649 *presult = talloc_move(mem_ctx, &state->transport);
650 return NT_STATUS_OK;
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)
658 TALLOC_CTX *frame = talloc_stackframe();
659 struct event_context *ev;
660 struct tevent_req *req;
661 NTSTATUS status;
663 ev = event_context_init(frame);
664 if (ev == NULL) {
665 status = NT_STATUS_NO_MEMORY;
666 goto fail;
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;
675 if (!tevent_req_poll(req, ev)) {
676 status = map_nt_error_from_unix(errno);
677 goto fail;
680 status = rpc_transport_smbd_init_recv(req, mem_ctx, presult);
681 fail:
682 TALLOC_FREE(frame);
683 return status;