1 /* Serial interface for raw TCP connections on Un*x like systems.
3 Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2001, 2005, 2006
4 Free Software Foundation, Inc.
6 This file is part of GDB.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street, Fifth Floor,
21 Boston, MA 02110-1301, USA. */
28 #include <sys/types.h>
30 #ifdef HAVE_SYS_FILIO_H
31 #include <sys/filio.h> /* For FIONBIO. */
33 #ifdef HAVE_SYS_IOCTL_H
34 #include <sys/ioctl.h> /* For FIONBIO. */
41 #define ETIMEDOUT WSAETIMEDOUT
42 #define close(fd) closesocket (fd)
43 #define ioctl ioctlsocket
45 #include <netinet/in.h>
46 #include <arpa/inet.h>
48 #include <sys/socket.h>
49 #include <netinet/tcp.h>
53 #include "gdb_string.h"
55 #ifndef HAVE_SOCKLEN_T
56 typedef int socklen_t;
59 void _initialize_ser_tcp (void);
61 /* seconds to wait for connect */
63 /* how many times per second to poll deprecated_ui_loop_hook */
64 #define POLL_INTERVAL 2
66 /* Open a tcp socket */
69 net_open (struct serial *scb, const char *name)
71 char *port_str, hostname[100];
74 struct hostent *hostent;
75 struct sockaddr_in sockaddr;
83 if (strncmp (name, "udp:", 4) == 0)
88 else if (strncmp (name, "tcp:", 4) == 0)
91 port_str = strchr (name, ':');
94 error (_("net_open: No colon in host name!")); /* Shouldn't ever happen */
96 tmp = min (port_str - name, (int) sizeof hostname - 1);
97 strncpy (hostname, name, tmp); /* Don't want colon */
98 hostname[tmp] = '\000'; /* Tie off host name */
99 port = atoi (port_str + 1);
101 /* default hostname is localhost */
103 strcpy (hostname, "localhost");
105 hostent = gethostbyname (hostname);
108 fprintf_unfiltered (gdb_stderr, "%s: unknown host\n", hostname);
114 scb->fd = socket (PF_INET, SOCK_DGRAM, 0);
116 scb->fd = socket (PF_INET, SOCK_STREAM, 0);
121 sockaddr.sin_family = PF_INET;
122 sockaddr.sin_port = htons (port);
123 memcpy (&sockaddr.sin_addr.s_addr, hostent->h_addr,
124 sizeof (struct in_addr));
126 /* set socket nonblocking */
128 ioctl (scb->fd, FIONBIO, &ioarg);
130 /* Use Non-blocking connect. connect() will return 0 if connected already. */
131 n = connect (scb->fd, (struct sockaddr *) &sockaddr, sizeof (sockaddr));
135 /* Under Windows, calling "connect" with a non-blocking socket
136 results in WSAEWOULDBLOCK, not WSAEINPROGRESS. */
137 && WSAGetLastError() != WSAEWOULDBLOCK
139 && errno != EINPROGRESS
144 errno = WSAGetLastError();
152 /* looks like we need to wait for the connect */
154 fd_set rset, wset, eset;
160 /* While we wait for the connect to complete,
161 poll the UI so it can update or the user can
163 if (deprecated_ui_loop_hook)
165 if (deprecated_ui_loop_hook (0))
173 FD_SET (scb->fd, &rset);
177 t.tv_usec = 1000000 / POLL_INTERVAL;
179 /* POSIX systems return connection success or failure by signalling
180 wset. Windows systems return success in wset and failure in
183 We must call select here, rather than gdb_select, because
184 the serial structure has not yet been initialized - the
185 MinGW select wrapper will not know that this FD refers
187 n = select (scb->fd + 1, &rset, &wset, &eset, &t);
190 while (n == 0 && polls <= TIMEOUT * POLL_INTERVAL);
191 if (n < 0 || polls > TIMEOUT * POLL_INTERVAL)
193 if (polls > TIMEOUT * POLL_INTERVAL)
200 /* Got something. Is it an error? */
205 /* On Windows, the fourth parameter to getsockopt is a "char *";
206 on UNIX systems it is generally "void *". The cast to "void *"
207 is OK everywhere, since in C "void *" can be implicitly
208 converted to any pointer type. */
209 res = getsockopt (scb->fd, SOL_SOCKET, SO_ERROR, (void *) &err, &len);
219 /* turn off nonblocking */
221 ioctl (scb->fd, FIONBIO, &ioarg);
225 /* Disable Nagle algorithm. Needed in some cases. */
227 setsockopt (scb->fd, IPPROTO_TCP, TCP_NODELAY,
228 (char *)&tmp, sizeof (tmp));
232 /* If we don't do this, then GDB simply exits
233 when the remote side dies. */
234 signal (SIGPIPE, SIG_IGN);
241 net_close (struct serial *scb)
251 net_read_prim (struct serial *scb, size_t count)
253 return recv (scb->fd, scb->buf, count, 0);
257 net_write_prim (struct serial *scb, const void *buf, size_t count)
259 return send (scb->fd, buf, count, 0);
263 _initialize_ser_tcp (void)
266 /* Do nothing; the TCP serial operations will be initialized in
270 struct serial_ops *ops;
271 ops = XMALLOC (struct serial_ops);
272 memset (ops, 0, sizeof (struct serial_ops));
275 ops->open = net_open;
276 ops->close = net_close;
277 ops->readchar = ser_base_readchar;
278 ops->write = ser_base_write;
279 ops->flush_output = ser_base_flush_output;
280 ops->flush_input = ser_base_flush_input;
281 ops->send_break = ser_base_send_break;
282 ops->go_raw = ser_base_raw;
283 ops->get_tty_state = ser_base_get_tty_state;
284 ops->set_tty_state = ser_base_set_tty_state;
285 ops->print_tty_state = ser_base_print_tty_state;
286 ops->noflush_set_tty_state = ser_base_noflush_set_tty_state;
287 ops->setbaudrate = ser_base_setbaudrate;
288 ops->setstopbits = ser_base_setstopbits;
289 ops->drain_output = ser_base_drain_output;
290 ops->async = ser_base_async;
291 ops->read_prim = net_read_prim;
292 ops->write_prim = net_write_prim;
293 serial_add_interface (ops);
294 #endif /* USE_WIN32API */