lib/stream-tcp.c

   1 /*
   2  * Copyright (c) 2008, 2009, 2010, 2012, 2013, 2014, 2015 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 <netinet/tcp.h>
  24 #include <netdb.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include <sys/socket.h>
  28 #include <unistd.h>
  29 #include "dynamic-string.h"
  30 #include "packets.h"
  31 #include "socket-util.h"
  32 #include "util.h"
  33 #include "stream-provider.h"
  34 #include "stream-fd.h"
  35 #include "vlog.h"
  36
  37 VLOG_DEFINE_THIS_MODULE(stream_tcp);
  38
  39 /* Active TCP. */
  40
  41 static int
  42 new_tcp_stream(const char *name, int fd, int connect_status,
  43                struct stream **streamp)
  44 {
  45     struct sockaddr_storage local;
  46     socklen_t local_len = sizeof local;
  47     int on = 1;
  48     int retval;
  49
  50     /* Get the local IP and port information */
  51     retval = getsockname(fd, (struct sockaddr *) &local, &local_len);
  52     if (retval) {
  53         memset(&local, 0, sizeof local);
  54     }
  55
  56     retval = setsockopt(fd, IPPROTO_TCP, TCP_NODELAY, &on, sizeof on);
  57     if (retval) {
  58         int error = sock_errno();
  59         VLOG_ERR("%s: setsockopt(TCP_NODELAY): %s",
  60                  name, sock_strerror(error));
  61         closesocket(fd);
  62         return error;
  63     }
  64
  65     return new_fd_stream(name, fd, connect_status, streamp);
  66 }
  67
  68 static int
  69 tcp_open(const char *name, char *suffix, struct stream **streamp, uint8_t dscp)
  70 {
  71     int fd, error;
  72
  73     error = inet_open_active(SOCK_STREAM, suffix, 0, NULL, &fd, dscp);
  74     if (fd >= 0) {
  75         return new_tcp_stream(name, fd, error, streamp);
  76     } else {
  77         VLOG_ERR("%s: connect: %s", name, ovs_strerror(error));
  78         return error;
  79     }
  80 }
  81
  82 const struct stream_class tcp_stream_class = {
  83     "tcp",                      /* name */
  84     true,                       /* needs_probes */
  85     tcp_open,                   /* open */
  86     NULL,                       /* close */
  87     NULL,                       /* connect */
  88     NULL,                       /* recv */
  89     NULL,                       /* send */
  90     NULL,                       /* run */
  91     NULL,                       /* run_wait */
  92     NULL,                       /* wait */
  93 };
  94
  95 #ifdef _WIN32
  96 static int
  97 windows_open(const char *name, char *suffix, struct stream **streamp,
  98              uint8_t dscp)
  99 {
 100     int error, port;
 101     FILE *file;
 102     char *suffix_new, *path;
 103
 104     /* If the path does not contain a ':', assume it is relative to
 105      * OVS_RUNDIR. */
 106     if (!strchr(suffix, ':')) {
 107         path = xasprintf("%s/%s", ovs_rundir(), suffix);
 108     } else {
 109         path = strdup(suffix);
 110     }
 111
 112     file = fopen(path, "r");
 113     if (!file) {
 114         error = errno;
 115         VLOG_DBG("%s: could not open %s (%s)", name, suffix,
 116                  ovs_strerror(error));
 117         return error;
 118     }
 119
 120     error = fscanf(file, "%d", &port);
 121     if (error != 1) {
 122         VLOG_ERR("failed to read port from %s", suffix);
 123         fclose(file);
 124         return EINVAL;
 125     }
 126     fclose(file);
 127
 128     suffix_new = xasprintf("127.0.0.1:%d", port);
 129
 130     error = tcp_open(name, suffix_new, streamp, dscp);
 131
 132     free(suffix_new);
 133     free(path);
 134     return error;
 135 }
 136
 137 const struct stream_class windows_stream_class = {
 138     "unix",                     /* name */
 139     false,                      /* needs_probes */
 140     windows_open,                  /* open */
 141     NULL,                       /* close */
 142     NULL,                       /* connect */
 143     NULL,                       /* recv */
 144     NULL,                       /* send */
 145     NULL,                       /* run */
 146     NULL,                       /* run_wait */
 147     NULL,                       /* wait */
 148 };
 149 #endif
 150 \f
 151 /* Passive TCP. */
 152
 153 static int ptcp_accept(int fd, const struct sockaddr_storage *,
 154                        size_t, struct stream **streamp);
 155
 156 static int
 157 ptcp_open(const char *name OVS_UNUSED, char *suffix, struct pstream **pstreamp,
 158           uint8_t dscp)
 159 {
 160     char bound_name[SS_NTOP_BUFSIZE + 16];
 161     char addrbuf[SS_NTOP_BUFSIZE];
 162     struct sockaddr_storage ss;
 163     uint16_t port;
 164     int error;
 165     int fd;
 166
 167     fd = inet_open_passive(SOCK_STREAM, suffix, -1, &ss, dscp);
 168     if (fd < 0) {
 169         return -fd;
 170     }
 171
 172     port = ss_get_port(&ss);
 173     snprintf(bound_name, sizeof bound_name, "ptcp:%"PRIu16":%s",
 174              port, ss_format_address(&ss, addrbuf, sizeof addrbuf));
 175
 176     error = new_fd_pstream(bound_name, fd, ptcp_accept, NULL, pstreamp);
 177     if (!error) {
 178         pstream_set_bound_port(*pstreamp, htons(port));
 179     }
 180     return error;
 181 }
 182
 183 static int
 184 ptcp_accept(int fd, const struct sockaddr_storage *ss,
 185             size_t ss_len OVS_UNUSED, struct stream **streamp)
 186 {
 187     char name[SS_NTOP_BUFSIZE + 16];
 188     char addrbuf[SS_NTOP_BUFSIZE];
 189
 190     snprintf(name, sizeof name, "tcp:%s:%"PRIu16,
 191              ss_format_address(ss, addrbuf, sizeof addrbuf),
 192              ss_get_port(ss));
 193     return new_tcp_stream(name, fd, 0, streamp);
 194 }
 195
 196 const struct pstream_class ptcp_pstream_class = {
 197     "ptcp",
 198     true,
 199     ptcp_open,
 200     NULL,
 201     NULL,
 202     NULL,
 203 };
 204
 205 #ifdef _WIN32
 206 static int
 207 pwindows_open(const char *name OVS_UNUSED, char *suffix,
 208               struct pstream **pstreamp, uint8_t dscp)
 209 {
 210     int error;
 211     char *suffix_new, *path;
 212     FILE *file;
 213     struct pstream *listener;
 214
 215     suffix_new = xstrdup("0:127.0.0.1");
 216     error = ptcp_open(name, suffix_new, pstreamp, dscp);
 217     if (error) {
 218         goto exit;
 219     }
 220     listener = *pstreamp;
 221
 222     /* If the path does not contain a ':', assume it is relative to
 223      * OVS_RUNDIR. */
 224     if (!strchr(suffix, ':')) {
 225         path = xasprintf("%s/%s", ovs_rundir(), suffix);
 226     } else {
 227         path = strdup(suffix);
 228     }
 229
 230     file = fopen(path, "w");
 231     if (!file) {
 232         error = errno;
 233         VLOG_DBG("could not open %s (%s)", path, ovs_strerror(error));
 234         goto exit;
 235     }
 236
 237     fprintf(file, "%d\n", ntohs(listener->bound_port));
 238     if (fflush(file) == EOF) {
 239         error = EIO;
 240         VLOG_ERR("write failed for %s", path);
 241         fclose(file);
 242         goto exit;
 243     }
 244     fclose(file);
 245     free(path);
 246
 247 exit:
 248     free(suffix_new);
 249     return error;
 250 }
 251
 252 const struct pstream_class pwindows_pstream_class = {
 253     "punix",
 254     false,
 255     pwindows_open,
 256     NULL,
 257     NULL,
 258     NULL,
 259     NULL,
 260 };
 261 #endif