trunk/rdesktop/rdesktop.c

/*
   rdesktop: A Remote Desktop Protocol client.
   Entrypoint and utility functions
   Copyright (C) Matthew Chapman 1999-2001

   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 <stdlib.h>             /* malloc realloc free */
#include <stdarg.h>             /* va_list va_start va_end */
#include <unistd.h>             /* read close getuid getgid getpid getppid gethostname */
#include <fcntl.h>              /* open */
#include <pwd.h>                /* getpwuid */
#include <limits.h>             /* PATH_MAX */
#include <sys/stat.h>           /* stat */
#include <sys/time.h>           /* gettimeofday */
#include <sys/times.h>          /* times */
#include "rdesktop.h"

char title[32];
char username[16];
char hostname[16];
char keymapname[16];
int keylayout = 0x409;          /* Defaults to US keyboard layout */
int width;
int height;
int tcp_port_rdp = TCP_PORT_RDP;
BOOL bitmap_compression = True;
BOOL sendmotion = True;
BOOL orders = True;
BOOL licence = True;
BOOL encryption = True;
BOOL desktop_save = True;
BOOL fullscreen = False;
BOOL grab_keyboard = True;

/* Display usage information */
static void
usage(char *program)
{
        printf("Usage: %s [options] server\n", program);
        printf("   -u: user name\n");
        printf("   -d: domain\n");
        printf("   -s: shell\n");
        printf("   -c: working directory\n");
        printf("   -p: password (autologon)\n");
        printf("   -P: askpass-program (autologon)\n");
        printf("   -n: client hostname\n");
        printf("   -k: keyboard layout on terminal server (us,sv,gr etc.)\n");
        printf("   -g: desktop geometry (WxH)\n");
        printf("   -f: full-screen mode\n");
        printf("   -b: force bitmap updates\n");
        printf("   -e: disable encryption (French TS)\n");
        printf("   -m: do not send motion events\n");
        printf("   -l: do not request licence\n");
        printf("   -t: rdp tcp port\n");
        printf("   -K: keep window manager key bindings\n");
}

/* Client program */
int
main(int argc, char *argv[])
{
        char fullhostname[64];
        char domain[16];
        char password[16];
        char *askpass_result;
        char shell[32];
        char directory[32];
        struct passwd *pw;
        char *server, *p;
        uint32 flags;
        int c;

        printf("rdesktop: A Remote Desktop Protocol client.\n");
        printf("Version " VERSION ". Copyright (C) 1999-2001 Matt Chapman.\n");
        printf("See http://www.rdesktop.org/ for more information.\n\n");

        flags = RDP_LOGON_NORMAL;
        domain[0] = password[0] = shell[0] = directory[0] = 0;
        strcpy(keymapname, "us");

        while ((c = getopt(argc, argv, "u:d:s:c:p:P:n:k:g:t:fbemlKh?")) != -1)
        {
                switch (c)
                {
                        case 'u':
                                STRNCPY(username, optarg, sizeof(username));
                                break;

                        case 'd':
                                STRNCPY(domain, optarg, sizeof(domain));
                                break;

                        case 's':
                                STRNCPY(shell, optarg, sizeof(shell));
                                break;

                        case 'c':
                                STRNCPY(directory, optarg, sizeof(directory));
                                break;

                        case 'p':
                                STRNCPY(password, optarg, sizeof(password));
                                flags |= RDP_LOGON_AUTO;
                                break;

                        case 'P':
                                askpass_result = askpass(optarg, "Enter password");
                                if (askpass_result == NULL)
                                        exit(1);

                                STRNCPY(password, askpass_result, sizeof(password));
                                free(askpass_result);
                                flags |= RDP_LOGON_AUTO;
                                break;

                        case 'n':
                                STRNCPY(hostname, optarg, sizeof(hostname));
                                break;

                        case 'k':
                                STRNCPY(keymapname, optarg, sizeof(keymapname));
                                break;

                        case 'g':
                                width = strtol(optarg, &p, 10);
                                if (*p == 'x')
                                        height = strtol(p + 1, NULL, 10);

                                if ((width == 0) || (height == 0))
                                {
                                        error("invalid geometry\n");
                                        return 1;
                                }
                                break;

                        case 'f':
                                fullscreen = True;
                                break;

                        case 'b':
                                orders = False;
                                break;

                        case 'e':
                                encryption = False;
                                break;

                        case 'm':
                                sendmotion = False;
                                break;

                        case 'l':
                                licence = False;
                                break;

                        case 't':
                                tcp_port_rdp = strtol(optarg, NULL, 10);
                                break;

                        case 'K':
                                grab_keyboard = False;
                                break;

                        case 'h':
                        case '?':
                        default:
                                usage(argv[0]);
                                return 1;
                }
        }

        if (argc - optind < 1)
        {
                usage(argv[0]);
                return 1;
        }

        server = argv[optind];

        if (username[0] == 0)
        {
                pw = getpwuid(getuid());
                if ((pw == NULL) || (pw->pw_name == NULL))
                {
                        error("could not determine username, use -u\n");
                        return 1;
                }

                STRNCPY(username, pw->pw_name, sizeof(username));
        }

        if (hostname[0] == 0)
        {
                if (gethostname(fullhostname, sizeof(fullhostname)) == -1)
                {
                        error("could not determine local hostname, use -n\n");
                        return 1;
                }

                p = strchr(fullhostname, '.');
                if (p != NULL)
                        *p = 0;

                STRNCPY(hostname, fullhostname, sizeof(hostname));
        }

        if (!strcmp(password, "-"))
        {
                p = getpass("Password: ");
                if (p == NULL)
                {
                        error("failed to read password\n");
                        return 0;
                }
                STRNCPY(password, p, sizeof(password));
        }

        if ((width == 0) || (height == 0))
        {
                width = 800;
                height = 600;
        }
        else
        {
                /* make sure width is a multiple of 4 */
                width = (width + 3) & ~3;
        }

        strcpy(title, "rdesktop - ");
        strncat(title, server, sizeof(title) - sizeof("rdesktop - "));

        xkeymap_init1();
        if (!ui_init())
                return 1;

        if (!rdp_connect(server, flags, domain, password, shell, directory))
                return 1;

        printf("Connection successful.\n");

        if (ui_create_window())
        {
                rdp_main_loop();
                ui_destroy_window();
        }

        printf("Disconnecting...\n");
        rdp_disconnect();
        return 0;
}

/* Generate a 32-byte random for the secure transport code. */
void
generate_random(uint8 * random)
{
        struct stat st;
        struct tms tmsbuf;
        uint32 *r = (uint32 *) random;
        int fd;

        /* If we have a kernel random device, use it. */
        if (((fd = open("/dev/urandom", O_RDONLY)) != -1)
            || ((fd = open("/dev/random", O_RDONLY)) != -1))
        {
                read(fd, random, 32);
                close(fd);
                return;
        }

        /* Otherwise use whatever entropy we can gather - ideas welcome. */
        r[0] = (getpid()) | (getppid() << 16);
        r[1] = (getuid()) | (getgid() << 16);
        r[2] = times(&tmsbuf);  /* system uptime (clocks) */
        gettimeofday((struct timeval *) &r[3], NULL);   /* sec and usec */
        stat("/tmp", &st);
        r[5] = st.st_atime;
        r[6] = st.st_mtime;
        r[7] = st.st_ctime;
}

/* malloc; exit if out of memory */
void *
xmalloc(int size)
{
        void *mem = malloc(size);
        if (mem == NULL)
        {
                error("xmalloc %d\n", size);
                exit(1);
        }
        return mem;
}

/* realloc; exit if out of memory */
void *
xrealloc(void *oldmem, int size)
{
        void *mem = realloc(oldmem, size);
        if (mem == NULL)
        {
                error("xrealloc %d\n", size);
                exit(1);
        }
        return mem;
}

/* free */
void
xfree(void *mem)
{
        free(mem);
}

/* report an error */
void
error(char *format, ...)
{
        va_list ap;

        fprintf(stderr, "ERROR: ");

        va_start(ap, format);
        vfprintf(stderr, format, ap);
        va_end(ap);
}

/* report an unimplemented protocol feature */
void
unimpl(char *format, ...)
{
        va_list ap;

        fprintf(stderr, "NOT IMPLEMENTED: ");

        va_start(ap, format);
        vfprintf(stderr, format, ap);
        va_end(ap);
}

/* produce a hex dump */
void
hexdump(unsigned char *p, unsigned int len)
{
        unsigned char *line = p;
        unsigned int thisline, offset = 0;
        int i;

        while (offset < len)
        {
                printf("%04x ", offset);
                thisline = len - offset;
                if (thisline > 16)
                        thisline = 16;

                for (i = 0; i < thisline; i++)
                        printf("%02x ", line[i]);

                for (; i < 16; i++)
                        printf("   ");

                for (i = 0; i < thisline; i++)
                        printf("%c", (line[i] >= 0x20 && line[i] < 0x7f) ? line[i] : '.');

                printf("\n");
                offset += thisline;
                line += thisline;
        }
}

int
load_licence(unsigned char **data)
{
        char path[PATH_MAX];
        char *home;
        struct stat st;
        int fd;

        home = getenv("HOME");
        if (home == NULL)
                return -1;

        STRNCPY(path, home, sizeof(path));
        strncat(path, "/.rdesktop/licence", sizeof(path) - strlen(path) - 1);

        fd = open(path, O_RDONLY);
        if (fd == -1)
                return -1;

        if (fstat(fd, &st))
                return -1;

        *data = xmalloc(st.st_size);
        return read(fd, *data, st.st_size);
}

void
save_licence(unsigned char *data, int length)
{
        char path[PATH_MAX];
        char *home;
        int fd;

        home = getenv("HOME");
        if (home == NULL)
                return;

        STRNCPY(path, home, sizeof(path));
        strncat(path, "/.rdesktop", sizeof(path) - strlen(path) - 1);
        mkdir(path, 0700);

        strncat(path, "/licence", sizeof(path) - strlen(path) - 1);

        fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0600);
        if (fd == -1)
        {
                perror("open");
                return;
        }

        write(fd, data, length);
        close(fd);
}
1	matty	10	/*
2			rdesktop: A Remote Desktop Protocol client.
3			Entrypoint and utility functions
4	matty	30	Copyright (C) Matthew Chapman 1999-2001
5	jsorg71	100
6	matty	10	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	jsorg71	100
11	matty	10	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	100
16	matty	10	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 <stdlib.h> /* malloc realloc free */
22	matty	30	#include <stdarg.h> /* va_list va_start va_end */
23	matty	24	#include <unistd.h> /* read close getuid getgid getpid getppid gethostname */
24			#include <fcntl.h> /* open */
25			#include <pwd.h> /* getpwuid */
26	matthewc	39	#include <limits.h> /* PATH_MAX */
27	matty	24	#include <sys/stat.h> /* stat */
28			#include <sys/time.h> /* gettimeofday */
29			#include <sys/times.h> /* times */
30	matty	10	#include "rdesktop.h"
31
32	jsorg71	100	char title[32];
33	matty	10	char username[16];
34			char hostname[16];
35	matthewc	38	char keymapname[16];
36	astrand	66	int keylayout = 0x409; /* Defaults to US keyboard layout */
37	matty	30	int width;
38			int height;
39	jsorg71	58	int tcp_port_rdp = TCP_PORT_RDP;
40	matty	28	BOOL bitmap_compression = True;
41	matty	29	BOOL sendmotion = True;
42	matty	10	BOOL orders = True;
43			BOOL licence = True;
44	matty	30	BOOL encryption = True;
45	matty	28	BOOL desktop_save = True;
46			BOOL fullscreen = False;
47	astrand	76	BOOL grab_keyboard = True;
48	matty	10
49			/* Display usage information */
50	matty	25	static void
51			usage(char *program)
52	matty	10	{
53	matty	30	printf("Usage: %s [options] server\n", program);
54			printf(" -u: user name\n");
55			printf(" -d: domain\n");
56			printf(" -s: shell\n");
57			printf(" -c: working directory\n");
58			printf(" -p: password (autologon)\n");
59	astrand	96	printf(" -P: askpass-program (autologon)\n");
60	matty	30	printf(" -n: client hostname\n");
61	astrand	66	printf(" -k: keyboard layout on terminal server (us,sv,gr etc.)\n");
62	matty	30	printf(" -g: desktop geometry (WxH)\n");
63			printf(" -f: full-screen mode\n");
64			printf(" -b: force bitmap updates\n");
65			printf(" -e: disable encryption (French TS)\n");
66			printf(" -m: do not send motion events\n");
67	jsorg71	58	printf(" -l: do not request licence\n");
68	astrand	79	printf(" -t: rdp tcp port\n");
69	astrand	76	printf(" -K: keep window manager key bindings\n");
70	matty	10	}
71
72			/* Client program */
73	matty	25	int
74			main(int argc, char *argv[])
75	matty	10	{
76	matty	30	char fullhostname[64];
77	matty	21	char domain[16];
78			char password[16];
79	astrand	96	char *askpass_result;
80	matty	21	char shell[32];
81			char directory[32];
82	matty	30	struct passwd *pw;
83			char server, p;
84			uint32 flags;
85	matty	10	int c;
86
87	matty	30	printf("rdesktop: A Remote Desktop Protocol client.\n");
88	astrand	82	printf("Version " VERSION ". Copyright (C) 1999-2001 Matt Chapman.\n");
89	matty	30	printf("See http://www.rdesktop.org/ for more information.\n\n");
90	matty	10
91	matty	21	flags = RDP_LOGON_NORMAL;
92			domain[0] = password[0] = shell[0] = directory[0] = 0;
93	matthewc	38	strcpy(keymapname, "us");
94	matty	21
95	astrand	96	while ((c = getopt(argc, argv, "u:d:s:c:p:P:n:k:g:t:fbemlKh?")) != -1)
96	matty	10	{
97			switch (c)
98			{
99			case 'u':
100	matty	30	STRNCPY(username, optarg, sizeof(username));
101	matty	10	break;
102
103	matty	21	case 'd':
104	matty	30	STRNCPY(domain, optarg, sizeof(domain));
105	matty	21	break;
106
107			case 's':
108	matty	30	STRNCPY(shell, optarg, sizeof(shell));
109	matty	21	break;
110
111			case 'c':
112	matty	30	STRNCPY(directory, optarg, sizeof(directory));
113	matty	21	break;
114
115	matty	30	case 'p':
116			STRNCPY(password, optarg, sizeof(password));
117			flags \|= RDP_LOGON_AUTO;
118			break;
119
120	astrand	96	case 'P':
121			askpass_result = askpass(optarg, "Enter password");
122			if (askpass_result == NULL)
123			exit(1);
124
125			STRNCPY(password, askpass_result, sizeof(password));
126			free(askpass_result);
127			flags \|= RDP_LOGON_AUTO;
128			break;
129
130	matty	10	case 'n':
131	matty	30	STRNCPY(hostname, optarg, sizeof(hostname));
132	matty	10	break;
133
134			case 'k':
135	astrand	82	STRNCPY(keymapname, optarg, sizeof(keymapname));
136	matty	10	break;
137
138	matty	30	case 'g':
139			width = strtol(optarg, &p, 10);
140			if (*p == 'x')
141	astrand	64	height = strtol(p + 1, NULL, 10);
142	matty	30
143			if ((width == 0) \|\| (height == 0))
144			{
145			error("invalid geometry\n");
146			return 1;
147			}
148	matty	10	break;
149
150	matty	30	case 'f':
151			fullscreen = True;
152			break;
153
154	matty	10	case 'b':
155			orders = False;
156			break;
157
158	matty	30	case 'e':
159			encryption = False;
160	matty	10	break;
161
162	matty	30	case 'm':
163			sendmotion = False;
164	matty	28	break;
165	matty	29
166	matty	30	case 'l':
167			licence = False;
168	matty	28	break;
169	matty	29
170	jsorg71	58	case 't':
171			tcp_port_rdp = strtol(optarg, NULL, 10);
172			break;
173
174	astrand	76	case 'K':
175			grab_keyboard = False;
176			break;
177
178	matty	28	case 'h':
179	matty	10	case '?':
180			default:
181			usage(argv[0]);
182			return 1;
183			}
184			}
185
186			if (argc - optind < 1)
187			{
188			usage(argv[0]);
189			return 1;
190			}
191
192			server = argv[optind];
193
194			if (username[0] == 0)
195			{
196			pw = getpwuid(getuid());
197			if ((pw == NULL) \|\| (pw->pw_name == NULL))
198			{
199	matty	30	error("could not determine username, use -u\n");
200	matty	10	return 1;
201			}
202
203	matty	30	STRNCPY(username, pw->pw_name, sizeof(username));
204	matty	10	}
205
206			if (hostname[0] == 0)
207			{
208	matty	30	if (gethostname(fullhostname, sizeof(fullhostname)) == -1)
209	matty	10	{
210	matty	30	error("could not determine local hostname, use -n\n");
211	matty	10	return 1;
212			}
213	matty	30
214			p = strchr(fullhostname, '.');
215			if (p != NULL)
216			*p = 0;
217
218			STRNCPY(hostname, fullhostname, sizeof(hostname));
219	matty	10	}
220
221	matty	30	if (!strcmp(password, "-"))
222			{
223			p = getpass("Password: ");
224			if (p == NULL)
225			{
226			error("failed to read password\n");
227			return 0;
228			}
229			STRNCPY(password, p, sizeof(password));
230			}
231
232			if ((width == 0) \|\| (height == 0))
233			{
234			width = 800;
235			height = 600;
236			}
237	matthewc	103	else
238			{
239			/* make sure width is a multiple of 4 */
240			width = (width + 3) & ~3;
241			}
242	matty	30
243	matty	12	strcpy(title, "rdesktop - ");
244	matty	30	strncat(title, server, sizeof(title) - sizeof("rdesktop - "));
245	matty	12
246	astrand	66	xkeymap_init1();
247	astrand	82	if (!ui_init())
248			return 1;
249	astrand	66
250	matthewc	53	if (!rdp_connect(server, flags, domain, password, shell, directory))
251			return 1;
252
253			printf("Connection successful.\n");
254
255	jsorg71	100	if (ui_create_window())
256	matty	10	{
257			rdp_main_loop();
258			ui_destroy_window();
259			}
260
261	matthewc	53	printf("Disconnecting...\n");
262			rdp_disconnect();
263	matty	10	return 0;
264			}
265
266			/* Generate a 32-byte random for the secure transport code. */
267	matty	25	void
268	astrand	64	generate_random(uint8 * random)
269	matty	10	{
270			struct stat st;
271	matty	22	struct tms tmsbuf;
272	matty	24	uint32 r = (uint32 ) random;
273	matty	10	int fd;
274
275			/* If we have a kernel random device, use it. */
276	matty	30	if (((fd = open("/dev/urandom", O_RDONLY)) != -1)
277			\|\| ((fd = open("/dev/random", O_RDONLY)) != -1))
278	matty	10	{
279			read(fd, random, 32);
280			close(fd);
281			return;
282			}
283
284			/* Otherwise use whatever entropy we can gather - ideas welcome. */
285			r[0] = (getpid()) \| (getppid() << 16);
286			r[1] = (getuid()) \| (getgid() << 16);
287	matty	24	r[2] = times(&tmsbuf); /* system uptime (clocks) */
288			gettimeofday((struct timeval ) &r[3], NULL); / sec and usec */
289	matty	10	stat("/tmp", &st);
290			r[5] = st.st_atime;
291			r[6] = st.st_mtime;
292			r[7] = st.st_ctime;
293			}
294
295			/* malloc; exit if out of memory */
296	matty	25	void *
297			xmalloc(int size)
298	matty	10	{
299			void *mem = malloc(size);
300			if (mem == NULL)
301			{
302	matty	30	error("xmalloc %d\n", size);
303	matty	10	exit(1);
304			}
305			return mem;
306			}
307
308			/* realloc; exit if out of memory */
309	matty	25	void *
310			xrealloc(void *oldmem, int size)
311	matty	10	{
312			void *mem = realloc(oldmem, size);
313			if (mem == NULL)
314			{
315	matty	30	error("xrealloc %d\n", size);
316	matty	10	exit(1);
317			}
318			return mem;
319			}
320
321			/* free */
322	matty	25	void
323			xfree(void *mem)
324	matty	10	{
325			free(mem);
326			}
327
328	matty	30	/* report an error */
329	matty	25	void
330	matty	30	error(char *format, ...)
331			{
332			va_list ap;
333
334			fprintf(stderr, "ERROR: ");
335
336			va_start(ap, format);
337			vfprintf(stderr, format, ap);
338			va_end(ap);
339			}
340
341			/* report an unimplemented protocol feature */
342			void
343			unimpl(char *format, ...)
344			{
345			va_list ap;
346
347			fprintf(stderr, "NOT IMPLEMENTED: ");
348
349			va_start(ap, format);
350			vfprintf(stderr, format, ap);
351			va_end(ap);
352			}
353
354			/* produce a hex dump */
355			void
356	matty	25	hexdump(unsigned char *p, unsigned int len)
357	matty	10	{
358			unsigned char *line = p;
359			unsigned int thisline, offset = 0;
360			int i;
361
362			while (offset < len)
363			{
364	matty	30	printf("%04x ", offset);
365	matty	10	thisline = len - offset;
366			if (thisline > 16)
367			thisline = 16;
368
369			for (i = 0; i < thisline; i++)
370	matty	30	printf("%02x ", line[i]);
371	matty	10
372	matty	30	for (; i < 16; i++)
373	astrand	64	printf(" ");
374	matty	30
375	matty	10	for (i = 0; i < thisline; i++)
376	astrand	82	printf("%c", (line[i] >= 0x20 && line[i] < 0x7f) ? line[i] : '.');
377	matty	10
378	matty	30	printf("\n");
379	matty	10	offset += thisline;
380			line += thisline;
381			}
382			}
383	matthewc	39
384			int
385			load_licence(unsigned char **data)
386			{
387			char path[PATH_MAX];
388			char *home;
389			struct stat st;
390			int fd;
391
392			home = getenv("HOME");
393			if (home == NULL)
394			return -1;
395
396			STRNCPY(path, home, sizeof(path));
397	astrand	64	strncat(path, "/.rdesktop/licence", sizeof(path) - strlen(path) - 1);
398	matthewc	39
399			fd = open(path, O_RDONLY);
400			if (fd == -1)
401			return -1;
402
403			if (fstat(fd, &st))
404			return -1;
405
406			*data = xmalloc(st.st_size);
407			return read(fd, *data, st.st_size);
408			}
409
410			void
411			save_licence(unsigned char *data, int length)
412			{
413			char path[PATH_MAX];
414			char *home;
415			int fd;
416
417			home = getenv("HOME");
418			if (home == NULL)
419			return;
420
421			STRNCPY(path, home, sizeof(path));
422	astrand	64	strncat(path, "/.rdesktop", sizeof(path) - strlen(path) - 1);
423	matthewc	39	mkdir(path, 0700);
424
425	astrand	64	strncat(path, "/licence", sizeof(path) - strlen(path) - 1);
426	matthewc	39
427	astrand	64	fd = open(path, O_WRONLY \| O_CREAT \| O_TRUNC, 0600);
428	matthewc	39	if (fd == -1)
429			{
430			perror("open");
431			return;
432			}
433
434			write(fd, data, length);
435			close(fd);
436			}