stream-tcp: Cleanup files created for Windows "unix" sockets.
[cascardo/ovs.git] / 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 <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 new_pstream(char *suffix, struct pstream **pstreamp, int dscp,
158             char *unlink_path, bool kernel_print_port)
159 {
160     char bound_name[SS_NTOP_BUFSIZE + 16];
161     char addrbuf[SS_NTOP_BUFSIZE];
162     struct sockaddr_storage ss;
163     int error;
164     uint16_t port;
165     int fd;
166
167     fd = inet_open_passive(SOCK_STREAM, suffix, -1, &ss, dscp,
168                            kernel_print_port);
169     if (fd < 0) {
170         return -fd;
171     }
172
173     port = ss_get_port(&ss);
174     snprintf(bound_name, sizeof bound_name, "ptcp:%"PRIu16":%s",
175              port, ss_format_address(&ss, addrbuf, sizeof addrbuf));
176
177     error = new_fd_pstream(bound_name, fd, ptcp_accept, set_dscp, unlink_path,
178                            pstreamp);
179     if (!error) {
180         pstream_set_bound_port(*pstreamp, htons(port));
181     }
182     return error;
183 }
184
185 static int
186 ptcp_open(const char *name OVS_UNUSED, char *suffix, struct pstream **pstreamp,
187           uint8_t dscp)
188 {
189     return new_pstream(suffix, pstreamp, dscp, NULL, true);
190 }
191
192 static int
193 ptcp_accept(int fd, const struct sockaddr_storage *ss,
194             size_t ss_len OVS_UNUSED, struct stream **streamp)
195 {
196     char name[SS_NTOP_BUFSIZE + 16];
197     char addrbuf[SS_NTOP_BUFSIZE];
198
199     snprintf(name, sizeof name, "tcp:%s:%"PRIu16,
200              ss_format_address(ss, addrbuf, sizeof addrbuf),
201              ss_get_port(ss));
202     return new_tcp_stream(name, fd, 0, streamp);
203 }
204
205 const struct pstream_class ptcp_pstream_class = {
206     "ptcp",
207     true,
208     ptcp_open,
209     NULL,
210     NULL,
211     NULL,
212     NULL,
213 };
214
215 #ifdef _WIN32
216 static int
217 pwindows_open(const char *name OVS_UNUSED, char *suffix,
218               struct pstream **pstreamp, uint8_t dscp)
219 {
220     int error;
221     char *suffix_new, *path;
222     FILE *file;
223     struct pstream *listener;
224
225     suffix_new = xstrdup("0:127.0.0.1");
226
227     /* If the path does not contain a ':', assume it is relative to
228      * OVS_RUNDIR. */
229     if (!strchr(suffix, ':')) {
230         path = xasprintf("%s/%s", ovs_rundir(), suffix);
231     } else {
232         path = strdup(suffix);
233     }
234
235     error = new_pstream(suffix_new, pstreamp, dscp, path, false);
236     if (error) {
237         goto exit;
238     }
239     listener = *pstreamp;
240
241     file = fopen(path, "w");
242     if (!file) {
243         error = errno;
244         VLOG_DBG("could not open %s (%s)", path, ovs_strerror(error));
245         goto exit;
246     }
247
248     fprintf(file, "%d\n", ntohs(listener->bound_port));
249     if (fflush(file) == EOF) {
250         error = EIO;
251         VLOG_ERR("write failed for %s", path);
252         fclose(file);
253         goto exit;
254     }
255     fclose(file);
256
257 exit:
258     free(suffix_new);
259     return error;
260 }
261
262 const struct pstream_class pwindows_pstream_class = {
263     "punix",
264     false,
265     pwindows_open,
266     NULL,
267     NULL,
268     NULL,
269     NULL,
270 };
271 #endif