source/librpc/rpc/dcerpc_sock.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    dcerpc over standard sockets transport
   5
   6    Copyright (C) Andrew Tridgell 2003
   7    Copyright (C) Jelmer Vernooij 2004
   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 2 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, write to the Free Software
  21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22 */
  23
  24 #include "includes.h"
  25 #include "lib/events/events.h"
  26 #include "lib/socket/socket.h"
  27 #include "lib/stream/packet.h"
  28 #include "libcli/composite/composite.h"
  29
  30 /* transport private information used by general socket pipe transports */
  31 struct sock_private {
  32         struct fd_event *fde;
  33         struct socket_context *sock;
  34         char *server_name;
  35
  36         struct packet_context *packet;
  37         uint32_t pending_reads;
  38 };
  39
  40
  41 /*
  42   mark the socket dead
  43 */
  44 static void sock_dead(struct dcerpc_connection *p, NTSTATUS status)
  45 {
  46         struct sock_private *sock = p->transport.private;
  47
  48         if (sock && sock->sock != NULL) {
  49                 talloc_free(sock->fde);
  50                 talloc_free(sock->sock);
  51                 sock->sock = NULL;
  52         }
  53
  54         if (!NT_STATUS_IS_OK(status)) {
  55                 p->transport.recv_data(p, NULL, status);
  56         }
  57 }
  58
  59
  60 /*
  61   handle socket recv errors
  62 */
  63 static void sock_error_handler(void *private, NTSTATUS status)
  64 {
  65         struct dcerpc_connection *p = talloc_get_type(private,
  66                                                       struct dcerpc_connection);
  67         sock_dead(p, status);
  68 }
  69
  70 /*
  71   check if a blob is a complete packet
  72 */
  73 static NTSTATUS sock_complete_packet(void *private, DATA_BLOB blob, size_t *size)
  74 {
  75         if (blob.length < DCERPC_FRAG_LEN_OFFSET+2) {
  76                 return STATUS_MORE_ENTRIES;
  77         }
  78         *size = dcerpc_get_frag_length(&blob);
  79         if (*size > blob.length) {
  80                 return STATUS_MORE_ENTRIES;
  81         }
  82         return NT_STATUS_OK;
  83 }
  84
  85 /*
  86   process recv requests
  87 */
  88 static NTSTATUS sock_process_recv(void *private, DATA_BLOB blob)
  89 {
  90         struct dcerpc_connection *p = talloc_get_type(private,
  91                                                       struct dcerpc_connection);
  92         struct sock_private *sock = p->transport.private;
  93         sock->pending_reads--;
  94         if (sock->pending_reads == 0) {
  95                 packet_recv_disable(sock->packet);
  96         }
  97         p->transport.recv_data(p, &blob, NT_STATUS_OK);
  98         return NT_STATUS_OK;
  99 }
 100
 101 /*
 102   called when a IO is triggered by the events system
 103 */
 104 static void sock_io_handler(struct event_context *ev, struct fd_event *fde,
 105                             uint16_t flags, void *private)
 106 {
 107         struct dcerpc_connection *p = talloc_get_type(private,
 108                                                       struct dcerpc_connection);
 109         struct sock_private *sock = p->transport.private;
 110
 111         if (flags & EVENT_FD_WRITE) {
 112                 packet_queue_run(sock->packet);
 113                 return;
 114         }
 115
 116         if (sock->sock == NULL) {
 117                 return;
 118         }
 119
 120         if (flags & EVENT_FD_READ) {
 121                 packet_recv(sock->packet);
 122         }
 123 }
 124
 125 /*
 126    initiate a read request - not needed for dcerpc sockets
 127 */
 128 static NTSTATUS sock_send_read(struct dcerpc_connection *p)
 129 {
 130         struct sock_private *sock = p->transport.private;
 131         sock->pending_reads++;
 132         if (sock->pending_reads == 1) {
 133                 packet_recv_enable(sock->packet);
 134         }
 135         return NT_STATUS_OK;
 136 }
 137
 138 /*
 139    send an initial pdu in a multi-pdu sequence
 140 */
 141 static NTSTATUS sock_send_request(struct dcerpc_connection *p, DATA_BLOB *data,
 142                                   BOOL trigger_read)
 143 {
 144         struct sock_private *sock = p->transport.private;
 145         DATA_BLOB blob;
 146         NTSTATUS status;
 147
 148         if (sock->sock == NULL) {
 149                 return NT_STATUS_CONNECTION_DISCONNECTED;
 150         }
 151
 152         blob = data_blob_talloc(sock->packet, data->data, data->length);
 153         if (blob.data == NULL) {
 154                 return NT_STATUS_NO_MEMORY;
 155         }
 156
 157         status = packet_send(sock->packet, blob);
 158         if (!NT_STATUS_IS_OK(status)) {
 159                 return status;
 160         }
 161
 162         if (trigger_read) {
 163                 sock_send_read(p);
 164         }
 165
 166         return NT_STATUS_OK;
 167 }
 168
 169 /*
 170    shutdown sock pipe connection
 171 */
 172 static NTSTATUS sock_shutdown_pipe(struct dcerpc_connection *p)
 173 {
 174         struct sock_private *sock = p->transport.private;
 175
 176         if (sock && sock->sock) {
 177                 sock_dead(p, NT_STATUS_OK);
 178         }
 179
 180         return NT_STATUS_OK;
 181 }
 182
 183 /*
 184   return sock server name
 185 */
 186 static const char *sock_peer_name(struct dcerpc_connection *p)
 187 {
 188         struct sock_private *sock = p->transport.private;
 189         return sock->server_name;
 190 }
 191
 192
 193 struct pipe_open_socket_state {
 194         struct dcerpc_connection *conn;
 195         struct socket_context *socket_ctx;
 196         struct sock_private *sock;
 197         struct socket_address *server;
 198         enum dcerpc_transport_t transport;
 199 };
 200
 201
 202 static void continue_socket_connect(struct composite_context *ctx)
 203 {
 204         struct dcerpc_connection *conn;
 205         struct sock_private *sock;
 206         struct composite_context *c = talloc_get_type(ctx->async.private_data,
 207                                                       struct composite_context);
 208         struct pipe_open_socket_state *s = talloc_get_type(c->private_data,
 209                                                            struct pipe_open_socket_state);
 210
 211         /* make it easier to write a function calls */
 212         conn = s->conn;
 213         sock = s->sock;
 214
 215         c->status = socket_connect_recv(ctx);
 216         if (!NT_STATUS_IS_OK(c->status)) {
 217                 DEBUG(0, ("Failed to connect host %s on port %d - %s\n",
 218                           s->server->addr, s->server->port,
 219                           nt_errstr(c->status)));
 220                 composite_error(c, c->status);
 221                 return;
 222         }
 223
 224         /*
 225           fill in the transport methods
 226         */
 227         conn->transport.transport     = s->transport;
 228         conn->transport.private       = NULL;
 229
 230         conn->transport.send_request  = sock_send_request;
 231         conn->transport.send_read     = sock_send_read;
 232         conn->transport.recv_data     = NULL;
 233
 234         conn->transport.shutdown_pipe = sock_shutdown_pipe;
 235         conn->transport.peer_name     = sock_peer_name;
 236
 237         sock->sock          = s->socket_ctx;
 238         sock->pending_reads = 0;
 239         sock->server_name   = strupper_talloc(sock, s->server->addr);
 240
 241         sock->fde = event_add_fd(conn->event_ctx, sock->sock, socket_get_fd(sock->sock),
 242                                  0, sock_io_handler, conn);
 243
 244         conn->transport.private = sock;
 245
 246         sock->packet = packet_init(sock);
 247         if (sock->packet == NULL) {
 248                 composite_error(c, NT_STATUS_NO_MEMORY);
 249                 talloc_free(sock);
 250                 return;
 251         }
 252
 253         packet_set_private(sock->packet, conn);
 254         packet_set_socket(sock->packet, sock->sock);
 255         packet_set_callback(sock->packet, sock_process_recv);
 256         packet_set_full_request(sock->packet, sock_complete_packet);
 257         packet_set_error_handler(sock->packet, sock_error_handler);
 258         packet_set_event_context(sock->packet, conn->event_ctx);
 259         packet_set_fde(sock->packet, sock->fde);
 260         packet_set_serialise(sock->packet);
 261         packet_recv_disable(sock->packet);
 262         packet_set_initial_read(sock->packet, 16);
 263
 264         /* ensure we don't get SIGPIPE */
 265         BlockSignals(True,SIGPIPE);
 266
 267         composite_done(c);
 268 }
 269
 270
 271 struct composite_context *dcerpc_pipe_open_socket_send(TALLOC_CTX *mem_ctx,
 272                                                        struct dcerpc_connection *cn,
 273                                                        struct socket_address *server,
 274                                                        enum dcerpc_transport_t transport)
 275 {
 276         NTSTATUS status;
 277         struct composite_context *c;
 278         struct pipe_open_socket_state *s;
 279         struct composite_context *conn_req;
 280
 281         c = talloc_zero(mem_ctx, struct composite_context);
 282         if (c == NULL) return NULL;
 283
 284         s = talloc_zero(c, struct pipe_open_socket_state);
 285         if (s == NULL) {
 286                 composite_error(c, NT_STATUS_NO_MEMORY);
 287                 goto done;
 288         }
 289
 290         c->state = COMPOSITE_STATE_IN_PROGRESS;
 291         c->private_data = s;
 292         c->event_ctx = cn->event_ctx;
 293
 294         s->conn      = cn;
 295         s->transport = transport;
 296         s->server    = talloc_reference(c, server);
 297         if (s->server == NULL) {
 298                 composite_error(c, NT_STATUS_NO_MEMORY);
 299                 goto done;
 300         }
 301
 302         s->sock = talloc(cn, struct sock_private);
 303         if (s->sock == NULL) {
 304                 composite_error(c, NT_STATUS_NO_MEMORY);
 305                 goto done;
 306         }
 307
 308         status = socket_create(server->family, SOCKET_TYPE_STREAM, &s->socket_ctx, 0);
 309         if (!NT_STATUS_IS_OK(status)) {
 310                 composite_error(c, status);
 311                 talloc_free(s->sock);
 312                 goto done;
 313         }
 314         talloc_steal(s->sock, s->socket_ctx);
 315
 316         conn_req = socket_connect_send(s->socket_ctx, NULL, s->server, 0, c->event_ctx);
 317         if (conn_req == NULL) {
 318                 composite_error(c, NT_STATUS_NO_MEMORY);
 319                 goto done;
 320         }
 321
 322         composite_continue(c, conn_req, continue_socket_connect, c);
 323
 324 done:
 325         return c;
 326 }
 327
 328
 329 NTSTATUS dcerpc_pipe_open_socket_recv(struct composite_context *c)
 330 {
 331         NTSTATUS status = composite_wait(c);
 332
 333         talloc_free(c);
 334         return status;
 335 }
 336
 337 /*
 338    open a rpc connection using the generic socket library
 339 */
 340 NTSTATUS dcerpc_pipe_open_socket(struct dcerpc_connection *conn,
 341                                  struct socket_address *server,
 342                                  enum dcerpc_transport_t transport)
 343 {
 344         struct composite_context *c;
 345
 346         c = dcerpc_pipe_open_socket_send(conn, conn, server, transport);
 347         return dcerpc_pipe_open_socket_recv(c);
 348 }
 349
 350
 351 /*
 352    open a rpc connection using tcp
 353 */
 354 NTSTATUS dcerpc_pipe_open_tcp(struct dcerpc_connection *c, const char *server, uint32_t port)
 355 {
 356         NTSTATUS status;
 357         struct socket_address *srvaddr;
 358
 359         srvaddr = socket_address_from_strings(c, "ipv6", server, port);
 360         if (!srvaddr) {
 361                 return NT_STATUS_NO_MEMORY;
 362         }
 363
 364         /* Try IPv6 first */
 365         status = dcerpc_pipe_open_socket(c, srvaddr, NCACN_IP_TCP);
 366         if (NT_STATUS_IS_OK(status)) {
 367                 return status;
 368         }
 369
 370         talloc_free(srvaddr);
 371         srvaddr = socket_address_from_strings(c, "ipv4", server, port);
 372         if (!srvaddr) {
 373                 return NT_STATUS_NO_MEMORY;
 374         }
 375
 376         return dcerpc_pipe_open_socket(c, srvaddr, NCACN_IP_TCP);
 377 }
 378
 379 /*
 380    open a rpc connection to a unix socket
 381 */
 382 NTSTATUS dcerpc_pipe_open_unix_stream(struct dcerpc_connection *c, const char *path)
 383 {
 384         struct socket_address *srvaddr;
 385
 386         srvaddr = socket_address_from_strings(c, "unix", path, 0);
 387         if (!srvaddr) {
 388                 return NT_STATUS_NO_MEMORY;
 389         }
 390
 391         return dcerpc_pipe_open_socket(c, srvaddr, NCALRPC);
 392 }
 393
 394 /*
 395    open a rpc connection to a named pipe
 396 */
 397 NTSTATUS dcerpc_pipe_open_pipe(struct dcerpc_connection *c, const char *identifier)
 398 {
 399         NTSTATUS status;
 400         char *canon, *full_path;
 401         struct socket_address *srvaddr;
 402
 403         canon = talloc_strdup(NULL, identifier);
 404
 405         string_replace(canon, '/', '\\');
 406         full_path = talloc_asprintf(canon, "%s/%s", lp_ncalrpc_dir(), canon);
 407
 408         srvaddr = socket_address_from_strings(c, "unix", full_path, 0);
 409         if (!srvaddr) {
 410                 return NT_STATUS_NO_MEMORY;
 411         }
 412
 413         status = dcerpc_pipe_open_socket(c, srvaddr, NCALRPC);
 414         talloc_free(canon);
 415
 416         return status;
 417 }