lib/stream-tcp.c

   1 /*
   2  * Copyright (c) 2008, 2009, 2010, 2012, 2013, 2014 Nicira, Inc.
   3  *
   4  * Licensed under the Apache License, Version 2.0 (the "License");
   5  * you may not use this file except in compliance with the License.
   6  * You may obtain a copy of the License at:
   7  *
   8  *     http://www.apache.org/licenses/LICENSE-2.0
   9  *
  10  * Unless required by applicable law or agreed to in writing, software
  11  * distributed under the License is distributed on an "AS IS" BASIS,
  12  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  13  * See the License for the specific language governing permissions and
  14  * limitations under the License.
  15  */
  16
  17 #include <config.h>
  18 #include "stream.h"
  19 #include <errno.h>
  20 #include <inttypes.h>
  21 #include <sys/types.h>
  22 #include <netinet/in.h>
  23 #include <netdb.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include <sys/socket.h>
  27 #include <unistd.h>
  28 #include "dynamic-string.h"
  29 #include "packets.h"
  30 #include "socket-util.h"
  31 #include "util.h"
  32 #include "stream-provider.h"
  33 #include "stream-fd.h"
  34 #include "vlog.h"
  35
  36 VLOG_DEFINE_THIS_MODULE(stream_tcp);
  37
  38 /* Active TCP. */
  39
  40 static int
  41 new_tcp_stream(const char *name, int fd, int connect_status,
  42                struct stream **streamp)
  43 {
  44     if (connect_status == 0) {
  45         setsockopt_tcp_nodelay(fd);
  46     }
  47
  48     return new_fd_stream(name, fd, connect_status, AF_INET, streamp);
  49 }
  50
  51 static int
  52 tcp_open(const char *name, char *suffix, struct stream **streamp, uint8_t dscp)
  53 {
  54     int fd, error;
  55
  56     error = inet_open_active(SOCK_STREAM, suffix, 0, NULL, &fd, dscp);
  57     if (fd >= 0) {
  58         return new_tcp_stream(name, fd, error, streamp);
  59     } else {
  60         VLOG_ERR("%s: connect: %s", name, ovs_strerror(error));
  61         return error;
  62     }
  63 }
  64
  65 const struct stream_class tcp_stream_class = {
  66     "tcp",                      /* name */
  67     true,                       /* needs_probes */
  68     tcp_open,                   /* open */
  69     NULL,                       /* close */
  70     NULL,                       /* connect */
  71     NULL,                       /* recv */
  72     NULL,                       /* send */
  73     NULL,                       /* run */
  74     NULL,                       /* run_wait */
  75     NULL,                       /* wait */
  76 };
  77
  78 #ifdef _WIN32
  79 static int
  80 windows_open(const char *name, char *suffix, struct stream **streamp,
  81              uint8_t dscp)
  82 {
  83     int error, port;
  84     FILE *file;
  85     char *suffix_new, *path;
  86
  87     /* If the path does not contain a ':', assume it is relative to
  88      * OVS_RUNDIR. */
  89     if (!strchr(suffix, ':')) {
  90         path = xasprintf("%s/%s", ovs_rundir(), suffix);
  91     } else {
  92         path = xstrdup(suffix);
  93     }
  94
  95     file = fopen(path, "r");
  96     if (!file) {
  97         error = errno;
  98         VLOG_DBG("%s: could not open %s (%s)", name, suffix,
  99                  ovs_strerror(error));
 100         return error;
 101     }
 102
 103     error = fscanf(file, "%d", &port);
 104     if (error != 1) {
 105         VLOG_ERR("failed to read port from %s", suffix);
 106         fclose(file);
 107         return EINVAL;
 108     }
 109     fclose(file);
 110
 111     suffix_new = xasprintf("127.0.0.1:%d", port);
 112
 113     error = tcp_open(name, suffix_new, streamp, dscp);
 114
 115     free(suffix_new);
 116     free(path);
 117     return error;
 118 }
 119
 120 const struct stream_class windows_stream_class = {
 121     "unix",                     /* name */
 122     false,                      /* needs_probes */
 123     windows_open,                  /* open */
 124     NULL,                       /* close */
 125     NULL,                       /* connect */
 126     NULL,                       /* recv */
 127     NULL,                       /* send */
 128     NULL,                       /* run */
 129     NULL,                       /* run_wait */
 130     NULL,                       /* wait */
 131 };
 132 #endif
 133 \f
 134 /* Passive TCP. */
 135
 136 static int ptcp_accept(int fd, const struct sockaddr_storage *,
 137                        size_t, struct stream **streamp);
 138
 139 static int
 140 new_pstream(char *suffix, const char *name, struct pstream **pstreamp,
 141             int dscp, char *unlink_path, bool kernel_print_port)
 142 {
 143     char bound_name[SS_NTOP_BUFSIZE + 16];
 144     char addrbuf[SS_NTOP_BUFSIZE];
 145     struct sockaddr_storage ss;
 146     int error;
 147     uint16_t port;
 148     int fd;
 149     char *conn_name = CONST_CAST(char *, name);
 150
 151     fd = inet_open_passive(SOCK_STREAM, suffix, -1, &ss, dscp,
 152                            kernel_print_port);
 153     if (fd < 0) {
 154         return -fd;
 155     }
 156
 157     port = ss_get_port(&ss);
 158     if (!conn_name) {
 159         snprintf(bound_name, sizeof bound_name, "ptcp:%"PRIu16":%s",
 160                  port, ss_format_address(&ss, addrbuf, sizeof addrbuf));
 161         conn_name = bound_name;
 162     }
 163
 164     error = new_fd_pstream(conn_name, fd, ptcp_accept, set_dscp, unlink_path,
 165                            pstreamp);
 166     if (!error) {
 167         pstream_set_bound_port(*pstreamp, htons(port));
 168     }
 169     return error;
 170 }
 171
 172 static int
 173 ptcp_open(const char *name OVS_UNUSED, char *suffix, struct pstream **pstreamp,
 174           uint8_t dscp)
 175 {
 176     return new_pstream(suffix, NULL, pstreamp, dscp, NULL, true);
 177 }
 178
 179 static int
 180 ptcp_accept(int fd, const struct sockaddr_storage *ss,
 181             size_t ss_len OVS_UNUSED, struct stream **streamp)
 182 {
 183     char name[SS_NTOP_BUFSIZE + 16];
 184     char addrbuf[SS_NTOP_BUFSIZE];
 185
 186     snprintf(name, sizeof name, "tcp:%s:%"PRIu16,
 187              ss_format_address(ss, addrbuf, sizeof addrbuf),
 188              ss_get_port(ss));
 189     return new_tcp_stream(name, fd, 0, streamp);
 190 }
 191
 192 const struct pstream_class ptcp_pstream_class = {
 193     "ptcp",
 194     true,
 195     ptcp_open,
 196     NULL,
 197     NULL,
 198     NULL,
 199     NULL,
 200 };
 201
 202 #ifdef _WIN32
 203 static int
 204 pwindows_open(const char *name, char *suffix, struct pstream **pstreamp,
 205               uint8_t dscp)
 206 {
 207     int error;
 208     char *suffix_new, *path;
 209     FILE *file;
 210     struct pstream *listener;
 211
 212     suffix_new = xstrdup("0:127.0.0.1");
 213
 214     /* If the path does not contain a ':', assume it is relative to
 215      * OVS_RUNDIR. */
 216     if (!strchr(suffix, ':')) {
 217         path = xasprintf("%s/%s", ovs_rundir(), suffix);
 218     } else {
 219         path = xstrdup(suffix);
 220     }
 221
 222     error = new_pstream(suffix_new, name, pstreamp, dscp, path, false);
 223     if (error) {
 224         goto exit;
 225     }
 226     listener = *pstreamp;
 227
 228     file = fopen(path, "w");
 229     if (!file) {
 230         error = errno;
 231         VLOG_DBG("could not open %s (%s)", path, ovs_strerror(error));
 232         goto exit;
 233     }
 234
 235     fprintf(file, "%d\n", ntohs(listener->bound_port));
 236     if (fflush(file) == EOF) {
 237         error = EIO;
 238         VLOG_ERR("write failed for %s", path);
 239         fclose(file);
 240         goto exit;
 241     }
 242     fclose(file);
 243
 244 exit:
 245     free(suffix_new);
 246     return error;
 247 }
 248
 249 const struct pstream_class pwindows_pstream_class = {
 250     "punix",
 251     false,
 252     pwindows_open,
 253     NULL,
 254     NULL,
 255     NULL,
 256     NULL,
 257 };
 258 #endif