trunk/rdesktop/tcp.c

/*
   rdesktop: A Remote Desktop Protocol client.
   Protocol services - TCP layer
   Copyright (C) Matthew Chapman 1999-2002
   
   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2 of the License, or
   (at your option) any later version.
   
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

#include <unistd.h>             /* select read write close */
#include <sys/socket.h>         /* socket connect setsockopt */
#include <sys/time.h>           /* timeval */
#include <netdb.h>              /* gethostbyname */
#include <netinet/in.h>         /* sockaddr_in */
#include <netinet/tcp.h>        /* TCP_NODELAY */
#include <arpa/inet.h>          /* inet_addr */
#include <errno.h>              /* errno */
#include "rdesktop.h"

#ifndef INADDR_NONE
#define INADDR_NONE ((unsigned long) -1)
#endif

static int sock;
static struct stream in;
static struct stream out;
extern int tcp_port_rdp;

/* Initialise TCP transport data packet */
STREAM
tcp_init(uint32 maxlen)
{
        if (maxlen > out.size)
        {
                out.data = (uint8 *) xrealloc(out.data, maxlen);
                out.size = maxlen;
        }

        out.p = out.data;
        out.end = out.data + out.size;
        return &out;
}

/* Send TCP transport data packet */
void
tcp_send(STREAM s)
{
        int length = s->end - s->data;
        int sent, total = 0;

        while (total < length)
        {
                sent = send(sock, s->data + total, length - total, 0);
                if (sent <= 0)
                {
                        error("send: %s\n", strerror(errno));
                        return;
                }

                total += sent;
        }
}

/* Receive a message on the TCP layer */
STREAM
tcp_recv(STREAM s, uint32 length)
{
        unsigned int new_length, end_offset, p_offset;
        int rcvd = 0;

        if (s == NULL)
        {
                /* read into "new" stream */
                if (length > in.size)
                {
                        in.data = (uint8 *) xrealloc(in.data, length);
                        in.size = length;
                }
                in.end = in.p = in.data;
                s = &in;
        }
        else
        {
                /* append to existing stream */
                new_length = (s->end - s->data) + length;
                if (new_length > s->size)
                {
                        p_offset = s->p - s->data;
                        end_offset = s->end - s->data;
                        s->data = (uint8 *) xrealloc(s->data, new_length);
                        s->size = new_length;
                        s->p = s->data + p_offset;
                        s->end = s->data + end_offset;
                }
        }

        while (length > 0)
        {
                if (!ui_select(sock))
                        /* User quit */
                        return NULL;

                rcvd = recv(sock, s->end, length, 0);
                if (rcvd < 0)
                {
                        error("recv: %s\n", strerror(errno));
                        return NULL;
                }
                else if (rcvd == 0)
                {
                        error("Connection closed\n");
                        return NULL;
                }

                s->end += rcvd;
                length -= rcvd;
        }

        return s;
}

/* Establish a connection on the TCP layer */
BOOL
tcp_connect(char *server)
{
        int true_value = 1;

#ifdef IPv6

        int n;
        struct addrinfo hints, *res, *ressave;
        char tcp_port_rdp_s[10];

        snprintf(tcp_port_rdp_s, 10, "%d", tcp_port_rdp);

        memset(&hints, 0, sizeof(struct addrinfo));
        hints.ai_family = AF_UNSPEC;
        hints.ai_socktype = SOCK_STREAM;

        n = getaddrinfo(server, tcp_port_rdp_s, &hints, &res);

        if (n < 0)
        {
                error("getaddrinfo: %s\n", gai_strerror(n));
                return False;
        }

        ressave = res;
        sock = -1;
        while (res)
        {
                sock = socket(res->ai_family, res->ai_socktype, res->ai_protocol);
                if (!(sock < 0))
                {
                        if (connect(sock, res->ai_addr, res->ai_addrlen) == 0)
                                break;
                        close(sock);
                        sock = -1;
                }
                res = res->ai_next;
        }
        freeaddrinfo(ressave);

        if (sock == -1)
        {
                error("%s: unable to connect\n", server);
                return False;
        }

#else /* no IPv6 support */

        struct hostent *nslookup;
        struct sockaddr_in servaddr;

        if ((nslookup = gethostbyname(server)) != NULL)
        {
                memcpy(&servaddr.sin_addr, nslookup->h_addr, sizeof(servaddr.sin_addr));
        }
        else if ((servaddr.sin_addr.s_addr = inet_addr(server)) == INADDR_NONE)
        {
                error("%s: unable to resolve host\n", server);
                return False;
        }

        if ((sock = socket(AF_INET, SOCK_STREAM, 0)) < 0)
        {
                error("socket: %s\n", strerror(errno));
                return False;
        }

        servaddr.sin_family = AF_INET;
        servaddr.sin_port = htons(tcp_port_rdp);

        if (connect(sock, (struct sockaddr *) &servaddr, sizeof(struct sockaddr)) < 0)
        {
                error("connect: %s\n", strerror(errno));
                close(sock);
                return False;
        }

#endif /* IPv6 */

        setsockopt(sock, IPPROTO_TCP, TCP_NODELAY, (void *) &true_value, sizeof(true_value));

        in.size = 4096;
        in.data = (uint8 *) xmalloc(in.size);

        out.size = 4096;
        out.data = (uint8 *) xmalloc(out.size);

        return True;
}

/* Disconnect on the TCP layer */
void
tcp_disconnect(void)
{
        close(sock);
}
1	matty	3	/*
2			rdesktop: A Remote Desktop Protocol client.
3			Protocol services - TCP layer
4	matthewc	207	Copyright (C) Matthew Chapman 1999-2002
5	matty	3
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.
10
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.
15	jsorg71	376
16	matty	3	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., 675 Mass Ave, Cambridge, MA 02139, USA.
19			*/
20
21	matty	24	#include <unistd.h> /* select read write close */
22			#include <sys/socket.h> /* socket connect setsockopt */
23			#include <sys/time.h> /* timeval */
24			#include <netdb.h> /* gethostbyname */
25			#include <netinet/in.h> /* sockaddr_in */
26			#include <netinet/tcp.h> /* TCP_NODELAY */
27			#include <arpa/inet.h> /* inet_addr */
28			#include <errno.h> /* errno */
29	matty	10	#include "rdesktop.h"
30	matty	3
31	matthewc	306	#ifndef INADDR_NONE
32			#define INADDR_NONE ((unsigned long) -1)
33			#endif
34
35	matty	10	static int sock;
36			static struct stream in;
37			static struct stream out;
38	jsorg71	58	extern int tcp_port_rdp;
39	matty	10
40			/* Initialise TCP transport data packet */
41	matty	25	STREAM
42	jsorg71	376	tcp_init(uint32 maxlen)
43	matty	3	{
44	matty	10	if (maxlen > out.size)
45	matty	3	{
46	forsberg	408	out.data = (uint8 *) xrealloc(out.data, maxlen);
47	matty	10	out.size = maxlen;
48	matty	3	}
49
50	matty	10	out.p = out.data;
51			out.end = out.data + out.size;
52			return &out;
53	matty	3	}
54
55			/* Send TCP transport data packet */
56	matty	25	void
57			tcp_send(STREAM s)
58	matty	3	{
59	matty	24	int length = s->end - s->data;
60	matty	3	int sent, total = 0;
61
62			while (total < length)
63			{
64	matty	33	sent = send(sock, s->data + total, length - total, 0);
65	matty	3	if (sent <= 0)
66			{
67	matty	33	error("send: %s\n", strerror(errno));
68	matty	10	return;
69	matty	3	}
70
71			total += sent;
72			}
73			}
74
75			/* Receive a message on the TCP layer */
76	matty	25	STREAM
77	matthewc	423	tcp_recv(STREAM s, uint32 length)
78	matty	3	{
79	matthewc	423	unsigned int new_length, end_offset, p_offset;
80	matty	33	int rcvd = 0;
81	matty	3
82	matthewc	423	if (s == NULL)
83	matty	10	{
84	matthewc	423	/* read into "new" stream */
85			if (length > in.size)
86			{
87			in.data = (uint8 *) xrealloc(in.data, length);
88			in.size = length;
89			}
90			in.end = in.p = in.data;
91			s = &in;
92	matty	10	}
93	matthewc	423	else
94			{
95			/* append to existing stream */
96			new_length = (s->end - s->data) + length;
97			if (new_length > s->size)
98			{
99			p_offset = s->p - s->data;
100			end_offset = s->end - s->data;
101			s->data = (uint8 *) xrealloc(s->data, new_length);
102			s->size = new_length;
103			s->p = s->data + p_offset;
104			s->end = s->data + end_offset;
105			}
106			}
107	matty	3
108			while (length > 0)
109			{
110	astrand	275	if (!ui_select(sock))
111			/* User quit */
112			return NULL;
113	matty	3
114	matthewc	423	rcvd = recv(sock, s->end, length, 0);
115	astrand	546	if (rcvd < 0)
116	matty	3	{
117	matty	33	error("recv: %s\n", strerror(errno));
118			return NULL;
119			}
120	astrand	546	else if (rcvd == 0)
121			{
122			error("Connection closed\n");
123			return NULL;
124			}
125	matty	9
126	matthewc	423	s->end += rcvd;
127	matty	33	length -= rcvd;
128	matty	3	}
129
130	matthewc	423	return s;
131	matty	10	}
132
133			/* Establish a connection on the TCP layer */
134	matty	25	BOOL
135			tcp_connect(char *server)
136	matty	10	{
137	astrand	440	int true_value = 1;
138
139			#ifdef IPv6
140
141			int n;
142			struct addrinfo hints, res, ressave;
143			char tcp_port_rdp_s[10];
144
145			snprintf(tcp_port_rdp_s, 10, "%d", tcp_port_rdp);
146
147			memset(&hints, 0, sizeof(struct addrinfo));
148			hints.ai_family = AF_UNSPEC;
149			hints.ai_socktype = SOCK_STREAM;
150
151			n = getaddrinfo(server, tcp_port_rdp_s, &hints, &res);
152
153			if (n < 0)
154			{
155	astrand	443	error("getaddrinfo: %s\n", gai_strerror(n));
156	astrand	440	return False;
157			}
158
159			ressave = res;
160			sock = -1;
161			while (res)
162			{
163			sock = socket(res->ai_family, res->ai_socktype, res->ai_protocol);
164			if (!(sock < 0))
165			{
166			if (connect(sock, res->ai_addr, res->ai_addrlen) == 0)
167			break;
168			close(sock);
169			sock = -1;
170			}
171			res = res->ai_next;
172			}
173			freeaddrinfo(ressave);
174
175	astrand	443	if (sock == -1)
176			{
177			error("%s: unable to connect\n", server);
178			return False;
179			}
180
181	astrand	440	#else /* no IPv6 support */
182
183	matty	10	struct hostent *nslookup;
184			struct sockaddr_in servaddr;
185
186			if ((nslookup = gethostbyname(server)) != NULL)
187			{
188	astrand	82	memcpy(&servaddr.sin_addr, nslookup->h_addr, sizeof(servaddr.sin_addr));
189	matty	10	}
190	matthewc	303	else if ((servaddr.sin_addr.s_addr = inet_addr(server)) == INADDR_NONE)
191	matty	10	{
192	matty	30	error("%s: unable to resolve host\n", server);
193	matty	10	return False;
194			}
195
196			if ((sock = socket(AF_INET, SOCK_STREAM, 0)) < 0)
197			{
198	matty	30	error("socket: %s\n", strerror(errno));
199	matty	10	return False;
200			}
201
202			servaddr.sin_family = AF_INET;
203	jsorg71	58	servaddr.sin_port = htons(tcp_port_rdp);
204	matty	10
205	astrand	82	if (connect(sock, (struct sockaddr *) &servaddr, sizeof(struct sockaddr)) < 0)
206	matty	10	{
207	matty	30	error("connect: %s\n", strerror(errno));
208	matty	10	close(sock);
209			return False;
210			}
211
212	astrand	440	#endif /* IPv6 */
213
214	jsorg71	376	setsockopt(sock, IPPROTO_TCP, TCP_NODELAY, (void *) &true_value, sizeof(true_value));
215	matty	10
216			in.size = 4096;
217	forsberg	408	in.data = (uint8 *) xmalloc(in.size);
218	matty	10
219			out.size = 4096;
220	forsberg	408	out.data = (uint8 *) xmalloc(out.size);
221	matty	10
222	matty	3	return True;
223			}
224	matty	10
225			/* Disconnect on the TCP layer */
226	matty	25	void
227	matthewc	192	tcp_disconnect(void)
228	matty	10	{
229			close(sock);
230			}