1 /* Copyright (c) 2008 The Board of Trustees of The Leland Stanford
4 * We are making the OpenFlow specification and associated documentation
5 * (Software) available for public use and benefit with the expectation
6 * that others will use, modify and enhance the Software and contribute
7 * those enhancements back to the community. However, since we would
8 * like to make the Software available for broadest use, with as few
9 * restrictions as possible permission is hereby granted, free of
10 * charge, to any person obtaining a copy of this Software to deal in
11 * the Software under the copyrights without restriction, including
12 * without limitation the rights to use, copy, modify, merge, publish,
13 * distribute, sublicense, and/or sell copies of the Software, and to
14 * permit persons to whom the Software is furnished to do so, subject to
15 * the following conditions:
17 * The above copyright notice and this permission notice shall be
18 * included in all copies or substantial portions of the Software.
20 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
21 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
22 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
23 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
24 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
25 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
26 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
29 * The name and trademarks of copyright holder(s) may NOT be used in
30 * advertising or publicity pertaining to the Software or any
31 * derivatives without specific, written prior permission.
39 #include <sys/types.h>
40 #include <netinet/in.h>
41 #include <netinet/tcp.h>
46 #include "socket-util.h"
49 #include "ofp-print.h"
50 #include "poll-loop.h"
53 #define THIS_MODULE VLM_vconn_tcp
63 struct poll_waiter *tx_waiter;
67 new_tcp_vconn(const char *name, int fd, int connect_status,
68 struct vconn **vconnp)
70 struct tcp_vconn *tcp;
74 retval = setsockopt(fd, IPPROTO_TCP, TCP_NODELAY, &on, sizeof on);
76 VLOG_ERR("%s: setsockopt(TCP_NODELAY): %s", name, strerror(errno));
81 tcp = xmalloc(sizeof *tcp);
82 tcp->vconn.class = &tcp_vconn_class;
83 tcp->vconn.connect_status = connect_status;
86 tcp->tx_waiter = NULL;
88 *vconnp = &tcp->vconn;
92 static struct tcp_vconn *
93 tcp_vconn_cast(struct vconn *vconn)
95 assert(vconn->class == &tcp_vconn_class);
96 return CONTAINER_OF(vconn, struct tcp_vconn, vconn);
101 tcp_open(const char *name, char *suffix, struct vconn **vconnp)
104 const char *host_name;
105 const char *port_string;
106 struct sockaddr_in sin;
110 /* Glibc 2.7 has a bug in strtok_r when compiling with optimization that
111 * can cause segfaults here:
112 * http://sources.redhat.com/bugzilla/show_bug.cgi?id=5614.
113 * Using "::" instead of the obvious ":" works around it. */
114 host_name = strtok_r(suffix, "::", &save_ptr);
115 port_string = strtok_r(NULL, "::", &save_ptr);
117 fatal(0, "%s: bad peer name format", name);
120 memset(&sin, 0, sizeof sin);
121 sin.sin_family = AF_INET;
122 if (lookup_ip(host_name, &sin.sin_addr)) {
125 sin.sin_port = htons(port_string ? atoi(port_string) : OFP_TCP_PORT);
127 fd = socket(AF_INET, SOCK_STREAM, 0);
129 VLOG_ERR("%s: socket: %s", name, strerror(errno));
133 retval = set_nonblocking(fd);
139 retval = connect(fd, (struct sockaddr *) &sin, sizeof sin);
141 if (errno == EINPROGRESS) {
142 return new_tcp_vconn(name, fd, EAGAIN, vconnp);
145 VLOG_ERR("%s: connect: %s", name, strerror(error));
150 return new_tcp_vconn(name, fd, 0, vconnp);
155 tcp_close(struct vconn *vconn)
157 struct tcp_vconn *tcp = tcp_vconn_cast(vconn);
158 poll_cancel(tcp->tx_waiter);
164 tcp_connect(struct vconn *vconn)
166 struct tcp_vconn *tcp = tcp_vconn_cast(vconn);
167 return check_connection_completion(tcp->fd);
171 tcp_recv(struct vconn *vconn, struct buffer **bufferp)
173 struct tcp_vconn *tcp = tcp_vconn_cast(vconn);
178 if (tcp->rxbuf == NULL) {
179 tcp->rxbuf = buffer_new(1564);
184 if (sizeof(struct ofp_header) > rx->size) {
185 want_bytes = sizeof(struct ofp_header) - rx->size;
187 struct ofp_header *oh = rx->data;
188 size_t length = ntohs(oh->length);
189 if (length < sizeof(struct ofp_header)) {
190 VLOG_ERR("received too-short ofp_header (%zu bytes)", length);
193 want_bytes = length - rx->size;
195 buffer_reserve_tailroom(rx, want_bytes);
197 retval = read(tcp->fd, buffer_tail(rx), want_bytes);
200 if (retval == want_bytes) {
201 if (rx->size > sizeof(struct ofp_header)) {
210 } else if (retval == 0) {
211 return rx->size ? EPROTO : EOF;
213 return retval ? errno : EAGAIN;
218 tcp_clear_txbuf(struct tcp_vconn *tcp)
220 buffer_delete(tcp->txbuf);
222 tcp->tx_waiter = NULL;
226 tcp_do_tx(int fd UNUSED, short int revents UNUSED, void *vconn_)
228 struct vconn *vconn = vconn_;
229 struct tcp_vconn *tcp = tcp_vconn_cast(vconn);
230 ssize_t n = write(tcp->fd, tcp->txbuf->data, tcp->txbuf->size);
232 if (errno != EAGAIN) {
233 VLOG_ERR("send: %s", strerror(errno));
234 tcp_clear_txbuf(tcp);
238 buffer_pull(tcp->txbuf, n);
239 if (!tcp->txbuf->size) {
240 tcp_clear_txbuf(tcp);
244 tcp->tx_waiter = poll_fd_callback(tcp->fd, POLLOUT, tcp_do_tx, vconn);
248 tcp_send(struct vconn *vconn, struct buffer *buffer)
250 struct tcp_vconn *tcp = tcp_vconn_cast(vconn);
257 retval = write(tcp->fd, buffer->data, buffer->size);
258 if (retval == buffer->size) {
259 buffer_delete(buffer);
261 } else if (retval >= 0 || errno == EAGAIN) {
264 buffer_pull(buffer, retval);
266 tcp->tx_waiter = poll_fd_callback(tcp->fd, POLLOUT, tcp_do_tx, vconn);
274 tcp_wait(struct vconn *vconn, enum vconn_wait_type wait)
276 struct tcp_vconn *tcp = tcp_vconn_cast(vconn);
279 poll_fd_wait(tcp->fd, POLLOUT, NULL);
284 poll_fd_wait(tcp->fd, POLLOUT, NULL);
286 /* Nothing to do: need to drain txbuf first. */
291 poll_fd_wait(tcp->fd, POLLIN, NULL);
299 struct vconn_class tcp_vconn_class = {
303 .connect = tcp_connect,
317 static struct ptcp_vconn *
318 ptcp_vconn_cast(struct vconn *vconn)
320 assert(vconn->class == &ptcp_vconn_class);
321 return CONTAINER_OF(vconn, struct ptcp_vconn, vconn);
325 ptcp_open(const char *name, char *suffix, struct vconn **vconnp)
327 struct sockaddr_in sin;
328 struct ptcp_vconn *ptcp;
331 unsigned int yes = 1;
333 fd = socket(AF_INET, SOCK_STREAM, 0);
335 VLOG_ERR("%s: socket: %s", name, strerror(errno));
339 if ( setsockopt(fd, SOL_SOCKET, SO_REUSEADDR,&yes,sizeof(yes)) < 0) {
340 VLOG_ERR("%s: setsockopt::SO_REUSEADDR: %s", name, strerror(errno));
345 memset(&sin, 0, sizeof sin);
346 sin.sin_family = AF_INET;
347 sin.sin_addr.s_addr = htonl(INADDR_ANY);
348 sin.sin_port = htons(atoi(suffix) ? atoi(suffix) : OFP_TCP_PORT);
349 retval = bind(fd, (struct sockaddr *) &sin, sizeof sin);
352 VLOG_ERR("%s: bind: %s", name, strerror(error));
357 retval = listen(fd, 10);
360 VLOG_ERR("%s: listen: %s", name, strerror(error));
365 retval = set_nonblocking(fd);
371 ptcp = xmalloc(sizeof *ptcp);
372 ptcp->vconn.class = &ptcp_vconn_class;
373 ptcp->vconn.connect_status = 0;
375 *vconnp = &ptcp->vconn;
380 ptcp_close(struct vconn *vconn)
382 struct ptcp_vconn *ptcp = ptcp_vconn_cast(vconn);
388 ptcp_accept(struct vconn *vconn, struct vconn **new_vconnp)
390 struct ptcp_vconn *ptcp = ptcp_vconn_cast(vconn);
394 new_fd = accept(ptcp->fd, NULL, NULL);
397 if (error != EAGAIN) {
398 VLOG_DBG("accept: %s", strerror(error));
403 error = set_nonblocking(new_fd);
409 return new_tcp_vconn("tcp" /* FIXME */, new_fd, 0, new_vconnp);
413 ptcp_wait(struct vconn *vconn, enum vconn_wait_type wait)
415 struct ptcp_vconn *ptcp = ptcp_vconn_cast(vconn);
416 assert(wait == WAIT_ACCEPT);
417 poll_fd_wait(ptcp->fd, POLLIN, NULL);
420 struct vconn_class ptcp_vconn_class = {
424 .accept = ptcp_accept,