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;
200 buffer_reserve_tailroom(rx, want_bytes);
202 retval = read(tcp->fd, buffer_tail(rx), want_bytes);
205 if (retval == want_bytes) {
206 if (rx->size > sizeof(struct ofp_header)) {
215 } else if (retval == 0) {
216 return rx->size ? EPROTO : EOF;
218 return retval ? errno : EAGAIN;
223 tcp_clear_txbuf(struct tcp_vconn *tcp)
225 buffer_delete(tcp->txbuf);
227 tcp->tx_waiter = NULL;
231 tcp_do_tx(int fd UNUSED, short int revents UNUSED, void *vconn_)
233 struct vconn *vconn = vconn_;
234 struct tcp_vconn *tcp = tcp_vconn_cast(vconn);
235 ssize_t n = write(tcp->fd, tcp->txbuf->data, tcp->txbuf->size);
237 if (errno != EAGAIN) {
238 VLOG_ERR("send: %s", strerror(errno));
239 tcp_clear_txbuf(tcp);
243 buffer_pull(tcp->txbuf, n);
244 if (!tcp->txbuf->size) {
245 tcp_clear_txbuf(tcp);
249 tcp->tx_waiter = poll_fd_callback(tcp->fd, POLLOUT, tcp_do_tx, vconn);
253 tcp_send(struct vconn *vconn, struct buffer *buffer)
255 struct tcp_vconn *tcp = tcp_vconn_cast(vconn);
262 retval = write(tcp->fd, buffer->data, buffer->size);
263 if (retval == buffer->size) {
264 buffer_delete(buffer);
266 } else if (retval >= 0 || errno == EAGAIN) {
269 buffer_pull(buffer, retval);
271 tcp->tx_waiter = poll_fd_callback(tcp->fd, POLLOUT, tcp_do_tx, vconn);
279 tcp_wait(struct vconn *vconn, enum vconn_wait_type wait)
281 struct tcp_vconn *tcp = tcp_vconn_cast(vconn);
284 poll_fd_wait(tcp->fd, POLLOUT);
289 poll_fd_wait(tcp->fd, POLLOUT);
291 /* Nothing to do: need to drain txbuf first. */
296 poll_fd_wait(tcp->fd, POLLIN);
304 struct vconn_class tcp_vconn_class = {
308 .connect = tcp_connect,
322 static struct ptcp_vconn *
323 ptcp_vconn_cast(struct vconn *vconn)
325 assert(vconn->class == &ptcp_vconn_class);
326 return CONTAINER_OF(vconn, struct ptcp_vconn, vconn);
330 ptcp_open(const char *name, char *suffix, struct vconn **vconnp)
332 struct sockaddr_in sin;
333 struct ptcp_vconn *ptcp;
336 unsigned int yes = 1;
338 fd = socket(AF_INET, SOCK_STREAM, 0);
340 VLOG_ERR("%s: socket: %s", name, strerror(errno));
344 if ( setsockopt(fd, SOL_SOCKET, SO_REUSEADDR,&yes,sizeof(yes)) < 0) {
345 VLOG_ERR("%s: setsockopt::SO_REUSEADDR: %s", name, strerror(errno));
350 memset(&sin, 0, sizeof sin);
351 sin.sin_family = AF_INET;
352 sin.sin_addr.s_addr = htonl(INADDR_ANY);
353 sin.sin_port = htons(atoi(suffix) ? atoi(suffix) : OFP_TCP_PORT);
354 retval = bind(fd, (struct sockaddr *) &sin, sizeof sin);
357 VLOG_ERR("%s: bind: %s", name, strerror(error));
362 retval = listen(fd, 10);
365 VLOG_ERR("%s: listen: %s", name, strerror(error));
370 retval = set_nonblocking(fd);
376 ptcp = xmalloc(sizeof *ptcp);
377 ptcp->vconn.class = &ptcp_vconn_class;
378 ptcp->vconn.connect_status = 0;
380 *vconnp = &ptcp->vconn;
385 ptcp_close(struct vconn *vconn)
387 struct ptcp_vconn *ptcp = ptcp_vconn_cast(vconn);
393 ptcp_accept(struct vconn *vconn, struct vconn **new_vconnp)
395 struct ptcp_vconn *ptcp = ptcp_vconn_cast(vconn);
399 new_fd = accept(ptcp->fd, NULL, NULL);
402 if (error != EAGAIN) {
403 VLOG_DBG("accept: %s", strerror(error));
408 error = set_nonblocking(new_fd);
414 return new_tcp_vconn("tcp" /* FIXME */, new_fd, 0, new_vconnp);
418 ptcp_wait(struct vconn *vconn, enum vconn_wait_type wait)
420 struct ptcp_vconn *ptcp = ptcp_vconn_cast(vconn);
421 assert(wait == WAIT_ACCEPT);
422 poll_fd_wait(ptcp->fd, POLLIN);
425 struct vconn_class ptcp_vconn_class = {
429 .accept = ptcp_accept,