source4/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         const char *server;
 198         uint32_t port;
 199         enum dcerpc_transport_t transport;
 200 };
 201
 202
 203 static void continue_socket_connect(struct composite_context *ctx)
 204 {
 205         struct dcerpc_connection *conn;
 206         struct sock_private *sock;
 207         struct composite_context *c = talloc_get_type(ctx->async.private_data,
 208                                                       struct composite_context);
 209         struct pipe_open_socket_state *s = talloc_get_type(c->private_data,
 210                                                            struct pipe_open_socket_state);
 211
 212         /* make it easier to write a function calls */
 213         conn = s->conn;
 214         sock = s->sock;
 215
 216         c->status = socket_connect_recv(ctx);
 217         if (!NT_STATUS_IS_OK(c->status)) {
 218                 DEBUG(0, ("Failed to connect host %s on port %d - %s\n", s->server, s->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);
 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                                                        const char *server,
 274                                                        uint32_t port,
 275                                                        const char *type,
 276                                                        enum dcerpc_transport_t transport)
 277 {
 278         NTSTATUS status;
 279         struct composite_context *c;
 280         struct pipe_open_socket_state *s;
 281         struct composite_context *conn_req;
 282
 283         c = talloc_zero(mem_ctx, struct composite_context);
 284         if (c == NULL) return NULL;
 285
 286         s = talloc_zero(c, struct pipe_open_socket_state);
 287         if (s == NULL) {
 288                 composite_error(c, NT_STATUS_NO_MEMORY);
 289                 goto done;
 290         }
 291
 292         c->state = COMPOSITE_STATE_IN_PROGRESS;
 293         c->private_data = s;
 294         c->event_ctx = cn->event_ctx;
 295
 296         s->conn      = cn;
 297         s->transport = transport;
 298         s->port      = port;
 299         s->server    = talloc_strdup(c, server);
 300         if (s->server == NULL) {
 301                 composite_error(c, NT_STATUS_NO_MEMORY);
 302                 goto done;
 303         }
 304
 305         s->sock = talloc(cn, struct sock_private);
 306         if (s->sock == NULL) {
 307                 composite_error(c, NT_STATUS_NO_MEMORY);
 308                 goto done;
 309         }
 310
 311         status = socket_create(type, SOCKET_TYPE_STREAM, &s->socket_ctx, 0);
 312         if (!NT_STATUS_IS_OK(status)) {
 313                 composite_error(c, status);
 314                 talloc_free(s->sock);
 315                 goto done;
 316         }
 317         talloc_steal(s->sock, s->socket_ctx);
 318
 319         conn_req = socket_connect_send(s->socket_ctx, NULL, 0, s->server, s->port, 0, c->event_ctx);
 320         if (conn_req == NULL) {
 321                 composite_error(c, NT_STATUS_NO_MEMORY);
 322                 goto done;
 323         }
 324
 325         composite_continue(c, conn_req, continue_socket_connect, c);
 326
 327 done:
 328         return c;
 329 }
 330
 331
 332 NTSTATUS dcerpc_pipe_open_socket_recv(struct composite_context *c)
 333 {
 334         NTSTATUS status = composite_wait(c);
 335
 336         talloc_free(c);
 337         return status;
 338 }
 339
 340 /*
 341    open a rpc connection using the generic socket library
 342 */
 343 NTSTATUS dcerpc_pipe_open_socket(struct dcerpc_connection *conn,
 344                                  const char *server,
 345                                  uint32_t port,
 346                                  const char *type,
 347                                  enum dcerpc_transport_t transport)
 348 {
 349         struct composite_context *c;
 350
 351         c = dcerpc_pipe_open_socket_send(conn, conn, server, port,
 352                                          type, transport);
 353         return dcerpc_pipe_open_socket_recv(c);
 354 }
 355
 356
 357 /*
 358    open a rpc connection using tcp
 359 */
 360 NTSTATUS dcerpc_pipe_open_tcp(struct dcerpc_connection *c, const char *server, uint32_t port)
 361 {
 362         NTSTATUS status;
 363
 364         /* Try IPv6 first */
 365         status = dcerpc_pipe_open_socket(c, server, port, "ipv6", NCACN_IP_TCP);
 366         if (NT_STATUS_IS_OK(status)) {
 367                 return status;
 368         }
 369
 370         return dcerpc_pipe_open_socket(c, server, port, "ipv4", NCACN_IP_TCP);
 371 }
 372
 373 /*
 374    open a rpc connection to a unix socket
 375 */
 376 NTSTATUS dcerpc_pipe_open_unix_stream(struct dcerpc_connection *c, const char *path)
 377 {
 378         return dcerpc_pipe_open_socket(c, path, 0, "unix", NCACN_UNIX_STREAM);
 379 }
 380
 381 /*
 382    open a rpc connection to a named pipe
 383 */
 384 NTSTATUS dcerpc_pipe_open_pipe(struct dcerpc_connection *c, const char *identifier)
 385 {
 386         NTSTATUS status;
 387         char *canon, *full_path;
 388
 389         canon = talloc_strdup(NULL, identifier);
 390
 391         string_replace(canon, '/', '\\');
 392         full_path = talloc_asprintf(canon, "%s/%s", lp_ncalrpc_dir(), canon);
 393
 394         status = dcerpc_pipe_open_socket(c, full_path, 0, "unix", NCALRPC);
 395         talloc_free(canon);
 396
 397         return status;
 398 }