1 /* Serial interface for raw TCP connections on Un*x like systems
2 Copyright 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2001
3 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
26 #include <sys/types.h>
27 #include <sys/ioctl.h>
29 #include <netinet/in.h>
30 #include <arpa/inet.h>
32 #include <sys/socket.h>
33 #include <netinet/tcp.h>
36 #include "gdb_string.h"
38 static int tcp_open (struct serial *scb, const char *name);
39 static void tcp_close (struct serial *scb);
40 extern int (*ui_loop_hook) (int);
41 void _initialize_ser_tcp (void);
43 /* seconds to wait for connect */
45 /* how many times per second to poll ui_loop_hook */
46 #define POLL_INTERVAL 2
48 /* Open a tcp socket */
51 tcp_open (struct serial *scb, const char *name)
53 char *port_str, hostname[100];
55 struct hostent *hostent;
56 struct sockaddr_in sockaddr;
58 port_str = strchr (name, ':');
61 error ("tcp_open: No colon in host name!"); /* Shouldn't ever happen */
63 tmp = min (port_str - name, (int) sizeof hostname - 1);
64 strncpy (hostname, name, tmp); /* Don't want colon */
65 hostname[tmp] = '\000'; /* Tie off host name */
66 port = atoi (port_str + 1);
68 /* default hostname is localhost */
70 strcpy (hostname, "localhost");
72 hostent = gethostbyname (hostname);
75 fprintf_unfiltered (gdb_stderr, "%s: unknown host\n", hostname);
80 scb->fd = socket (PF_INET, SOCK_STREAM, 0);
84 sockaddr.sin_family = PF_INET;
85 sockaddr.sin_port = htons (port);
86 memcpy (&sockaddr.sin_addr.s_addr, hostent->h_addr,
87 sizeof (struct in_addr));
89 /* set socket nonblocking */
91 ioctl (scb->fd, FIONBIO, &tmp);
93 /* Use Non-blocking connect. connect() will return 0 if connected already. */
94 n = connect (scb->fd, (struct sockaddr *) &sockaddr, sizeof (sockaddr));
96 if (n < 0 && errno != EINPROGRESS)
104 /* looks like we need to wait for the connect */
112 /* While we wait for the connect to complete
113 poll the UI so it can update or the user can
117 if (ui_loop_hook (0))
125 FD_SET (scb->fd, &rset);
128 t.tv_usec = 1000000 / POLL_INTERVAL;
130 n = select (scb->fd + 1, &rset, &wset, NULL, &t);
133 while (n == 0 && polls <= TIMEOUT * POLL_INTERVAL);
134 if (n < 0 || polls > TIMEOUT * POLL_INTERVAL)
136 if (polls > TIMEOUT * POLL_INTERVAL)
143 /* Got something. Is it an error? */
147 res = getsockopt (scb->fd, SOL_SOCKET, SO_ERROR, &err, &len);
157 /* turn off nonblocking */
159 ioctl (scb->fd, FIONBIO, &tmp);
161 /* If we don't do this, then GDB simply exits
162 when the remote side dies. */
163 signal (SIGPIPE, SIG_IGN);
169 tcp_close (struct serial *scb)
179 _initialize_ser_tcp (void)
181 struct serial_ops *ops = XMALLOC (struct serial_ops);
182 memset (ops, sizeof (struct serial_ops), 0);
185 ops->open = tcp_open;
186 ops->close = tcp_close;
187 ops->readchar = ser_unix_readchar;
188 ops->write = ser_unix_write;
189 ops->flush_output = ser_unix_nop_flush_output;
190 ops->flush_input = ser_unix_flush_input;
191 ops->send_break = ser_unix_nop_send_break;
192 ops->go_raw = ser_unix_nop_raw;
193 ops->get_tty_state = ser_unix_nop_get_tty_state;
194 ops->set_tty_state = ser_unix_nop_set_tty_state;
195 ops->print_tty_state = ser_unix_nop_print_tty_state;
196 ops->noflush_set_tty_state = ser_unix_nop_noflush_set_tty_state;
197 ops->setbaudrate = ser_unix_nop_setbaudrate;
198 ops->setstopbits = ser_unix_nop_setstopbits;
199 ops->drain_output = ser_unix_nop_drain_output;
200 ops->async = ser_unix_async;
201 serial_add_interface (ops);