1 /* Serial interface for raw TCP connections on Un*x like systems
2 Copyright 1992, 1993, 1998-1999 Free Software Foundation, Inc.
4 This file is part of GDB.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
25 #include <sys/types.h>
27 #include <netinet/in.h>
28 #include <arpa/inet.h>
30 #include <sys/socket.h>
32 #include <netinet/tcp.h>
36 #include "gdb_string.h"
38 static int tcp_open (serial_t scb
, const char *name
);
39 static void tcp_close (serial_t scb
);
41 void _initialize_ser_tcp (void);
43 /* Open up a raw tcp socket */
46 tcp_open (serial_t scb
, const char *name
)
50 struct hostent
*hostent
;
51 struct sockaddr_in sockaddr
;
54 struct protoent
*protoent
;
57 port_str
= strchr (name
, ':');
60 error ("tcp_open: No colon in host name!"); /* Shouldn't ever happen */
62 tmp
= min (port_str
- name
, (int) sizeof hostname
- 1);
63 strncpy (hostname
, name
, tmp
); /* Don't want colon */
64 hostname
[tmp
] = '\000'; /* Tie off host name */
65 port
= atoi (port_str
+ 1);
67 hostent
= gethostbyname (hostname
);
71 fprintf_unfiltered (gdb_stderr
, "%s: unknown host\n", hostname
);
76 for (i
= 1; i
<= 15; i
++)
78 scb
->fd
= socket (PF_INET
, SOCK_STREAM
, 0);
82 /* Allow rapid reuse of this port. */
84 setsockopt (scb
->fd
, SOL_SOCKET
, SO_REUSEADDR
, (char *) &tmp
, sizeof (tmp
));
86 /* Enable TCP keep alive process. */
88 setsockopt (scb
->fd
, SOL_SOCKET
, SO_KEEPALIVE
, (char *) &tmp
, sizeof (tmp
));
90 sockaddr
.sin_family
= PF_INET
;
91 sockaddr
.sin_port
= htons (port
);
92 memcpy (&sockaddr
.sin_addr
.s_addr
, hostent
->h_addr
,
93 sizeof (struct in_addr
));
95 if (!connect (scb
->fd
, (struct sockaddr
*) &sockaddr
, sizeof (sockaddr
)))
101 /* We retry for ECONNREFUSED because that is often a temporary condition, which
102 happens when the server is being restarted. */
104 if (errno
!= ECONNREFUSED
)
110 protoent
= getprotobyname ("tcp");
115 if (setsockopt (scb
->fd
, protoent
->p_proto
, TCP_NODELAY
,
116 (char *) &tmp
, sizeof (tmp
)))
119 signal (SIGPIPE
, SIG_IGN
); /* If we don't do this, then GDB simply exits
120 when the remote side dies. */
126 tcp_close (serial_t scb
)
136 _initialize_ser_tcp (void)
138 struct serial_ops
*ops
= XMALLOC (struct serial_ops
);
139 memset (ops
, sizeof (struct serial_ops
), 0);
142 ops
->open
= tcp_open
;
143 ops
->close
= tcp_close
;
144 ops
->readchar
= ser_unix_readchar
;
145 ops
->write
= ser_unix_write
;
146 ops
->flush_output
= ser_unix_nop_flush_output
;
147 ops
->flush_input
= ser_unix_flush_input
;
148 ops
->send_break
= ser_unix_nop_send_break
;
149 ops
->go_raw
= ser_unix_nop_raw
;
150 ops
->get_tty_state
= ser_unix_nop_get_tty_state
;
151 ops
->set_tty_state
= ser_unix_nop_set_tty_state
;
152 ops
->print_tty_state
= ser_unix_nop_print_tty_state
;
153 ops
->noflush_set_tty_state
= ser_unix_nop_noflush_set_tty_state
;
154 ops
->setbaudrate
= ser_unix_nop_setbaudrate
;
155 ops
->setstopbits
= ser_unix_nop_setstopbits
;
156 ops
->drain_output
= ser_unix_nop_drain_output
;
157 ops
->async
= ser_unix_async
;
158 serial_add_interface (ops
);