34 |
#endif |
#endif |
35 |
|
|
36 |
extern char hostname[16]; |
extern char hostname[16]; |
37 |
extern int width; |
extern int g_width; |
38 |
extern int height; |
extern int g_height; |
39 |
extern int keylayout; |
extern int keylayout; |
40 |
extern BOOL encryption; |
extern BOOL g_encryption; |
41 |
extern BOOL licence_issued; |
extern BOOL g_licence_issued; |
42 |
extern BOOL use_rdp5; |
extern BOOL g_use_rdp5; |
43 |
extern int server_bpp; |
extern BOOL g_console_session; |
44 |
|
extern int g_server_bpp; |
45 |
|
extern uint16 mcs_userid; |
46 |
|
extern VCHANNEL g_channels[]; |
47 |
|
extern unsigned int g_num_channels; |
48 |
|
|
49 |
static int rc4_key_len; |
static int rc4_key_len; |
50 |
static RC4_KEY rc4_decrypt_key; |
static RC4_KEY rc4_decrypt_key; |
58 |
static uint8 sec_encrypt_update_key[16]; |
static uint8 sec_encrypt_update_key[16]; |
59 |
static uint8 sec_crypted_random[SEC_MODULUS_SIZE]; |
static uint8 sec_crypted_random[SEC_MODULUS_SIZE]; |
60 |
|
|
61 |
uint16 server_rdp_version = 0; |
uint16 g_server_rdp_version = 0; |
62 |
|
|
63 |
/* |
/* |
64 |
* General purpose 48-byte transformation, using two 32-byte salts (generally, |
* General purpose 48-byte transformation, using two 32-byte salts (generally, |
334 |
int hdrlen; |
int hdrlen; |
335 |
STREAM s; |
STREAM s; |
336 |
|
|
337 |
if (!licence_issued) |
if (!g_licence_issued) |
338 |
hdrlen = (flags & SEC_ENCRYPT) ? 12 : 4; |
hdrlen = (flags & SEC_ENCRYPT) ? 12 : 4; |
339 |
else |
else |
340 |
hdrlen = (flags & SEC_ENCRYPT) ? 12 : 0; |
hdrlen = (flags & SEC_ENCRYPT) ? 12 : 0; |
344 |
return s; |
return s; |
345 |
} |
} |
346 |
|
|
347 |
/* Transmit secure transport packet */ |
/* Transmit secure transport packet over specified channel */ |
348 |
void |
void |
349 |
sec_send(STREAM s, uint32 flags) |
sec_send_to_channel(STREAM s, uint32 flags, uint16 channel) |
350 |
{ |
{ |
351 |
int datalen; |
int datalen; |
352 |
|
|
353 |
s_pop_layer(s, sec_hdr); |
s_pop_layer(s, sec_hdr); |
354 |
if (!licence_issued || (flags & SEC_ENCRYPT)) |
if (!g_licence_issued || (flags & SEC_ENCRYPT)) |
355 |
out_uint32_le(s, flags); |
out_uint32_le(s, flags); |
356 |
|
|
357 |
if (flags & SEC_ENCRYPT) |
if (flags & SEC_ENCRYPT) |
368 |
sec_encrypt(s->p + 8, datalen); |
sec_encrypt(s->p + 8, datalen); |
369 |
} |
} |
370 |
|
|
371 |
mcs_send(s); |
mcs_send_to_channel(s, channel); |
372 |
|
} |
373 |
|
|
374 |
|
/* Transmit secure transport packet */ |
375 |
|
|
376 |
|
void |
377 |
|
sec_send(STREAM s, uint32 flags) |
378 |
|
{ |
379 |
|
sec_send_to_channel(s, flags, MCS_GLOBAL_CHANNEL); |
380 |
} |
} |
381 |
|
|
382 |
|
|
383 |
/* Transfer the client random to the server */ |
/* Transfer the client random to the server */ |
384 |
static void |
static void |
385 |
sec_establish_key(void) |
sec_establish_key(void) |
403 |
sec_out_mcs_data(STREAM s) |
sec_out_mcs_data(STREAM s) |
404 |
{ |
{ |
405 |
int hostlen = 2 * strlen(hostname); |
int hostlen = 2 * strlen(hostname); |
406 |
int length = 158 + 76 + 12 + 4 + 20; |
int length = 158 + 76 + 12 + 4; |
407 |
|
unsigned int i; |
408 |
|
|
409 |
|
if (g_num_channels > 0) |
410 |
|
length += g_num_channels * 12 + 8; |
411 |
|
|
412 |
if (hostlen > 30) |
if (hostlen > 30) |
413 |
hostlen = 30; |
hostlen = 30; |
425 |
out_uint16_le(s, 0xc001); |
out_uint16_le(s, 0xc001); |
426 |
out_uint8(s, 0); |
out_uint8(s, 0); |
427 |
|
|
428 |
out_uint32_le(s, 0x61637544); /* "Duca" ?! */ |
out_uint32_le(s, 0x61637544); /* "Duca", as in Ducati. */ |
429 |
out_uint16_be(s, ((length - 14) | 0x8000)); /* remaining length */ |
out_uint16_be(s, ((length - 14) | 0x8000)); /* remaining length */ |
430 |
|
|
431 |
/* Client information */ |
/* Client information */ |
432 |
out_uint16_le(s, SEC_TAG_CLI_INFO); |
out_uint16_le(s, SEC_TAG_CLI_INFO); |
433 |
out_uint16_le(s, 212); /* length */ |
out_uint16_le(s, 212); /* length */ |
434 |
out_uint16_le(s, use_rdp5 ? 4 : 1); /* RDP version. 1 == RDP4, 4 == RDP5. */ |
out_uint16_le(s, g_use_rdp5 ? 4 : 1); /* RDP version. 1 == RDP4, 4 == RDP5. */ |
435 |
out_uint16_le(s, 8); |
out_uint16_le(s, 8); |
436 |
out_uint16_le(s, width); |
out_uint16_le(s, g_width); |
437 |
out_uint16_le(s, height); |
out_uint16_le(s, g_height); |
438 |
out_uint16_le(s, 0xca01); |
out_uint16_le(s, 0xca01); |
439 |
out_uint16_le(s, 0xaa03); |
out_uint16_le(s, 0xaa03); |
440 |
out_uint32_le(s, keylayout); |
out_uint32_le(s, keylayout); |
449 |
out_uint32_le(s, 12); |
out_uint32_le(s, 12); |
450 |
out_uint8s(s, 64); /* reserved? 4 + 12 doublewords */ |
out_uint8s(s, 64); /* reserved? 4 + 12 doublewords */ |
451 |
|
|
452 |
switch (server_bpp) |
switch (g_server_bpp) |
453 |
{ |
{ |
454 |
case 8: |
case 8: |
455 |
out_uint16_le(s, 0xca01); |
out_uint16_le(s, 0xca01); |
464 |
out_uint16_le(s, 0xca04); |
out_uint16_le(s, 0xca04); |
465 |
break; |
break; |
466 |
} |
} |
467 |
out_uint16(s, 1); |
out_uint16_le(s, 1); |
468 |
|
|
469 |
out_uint32(s, 0); |
out_uint32(s, 0); |
470 |
out_uint8(s, server_bpp); |
out_uint8(s, g_server_bpp); |
471 |
out_uint16_le(s, 0x0700); |
out_uint16_le(s, 0x0700); |
472 |
out_uint8(s, 0); |
out_uint8(s, 0); |
473 |
out_uint32_le(s, 1); |
out_uint32_le(s, 1); |
475 |
|
|
476 |
out_uint16_le(s, SEC_TAG_CLI_4); |
out_uint16_le(s, SEC_TAG_CLI_4); |
477 |
out_uint16_le(s, 12); |
out_uint16_le(s, 12); |
478 |
out_uint32_le(s, 9); |
out_uint32_le(s, g_console_session ? 0xb : 9); |
479 |
out_uint32_le(s, 0); |
out_uint32(s, 0); |
480 |
|
|
481 |
/* Client encryption settings */ |
/* Client encryption settings */ |
482 |
out_uint16_le(s, SEC_TAG_CLI_CRYPT); |
out_uint16_le(s, SEC_TAG_CLI_CRYPT); |
483 |
out_uint16_le(s, 12); /* length */ |
out_uint16_le(s, 12); /* length */ |
484 |
out_uint32_le(s, encryption ? 0x3 : 0); /* encryption supported, 128-bit supported */ |
out_uint32_le(s, g_encryption ? 0x3 : 0); /* encryption supported, 128-bit supported */ |
485 |
out_uint32_le(s, 0); /* Unknown */ |
out_uint32(s, 0); /* Unknown */ |
486 |
|
|
487 |
out_uint16_le(s, SEC_TAG_CLI_CHANNELS); |
DEBUG_RDP5(("g_num_channels is %d\n", g_num_channels)); |
488 |
out_uint16_le(s, 20); /* length */ |
if (g_num_channels > 0) |
489 |
out_uint32_le(s, 1); /* number of virtual channels */ |
{ |
490 |
out_uint8p(s, "cliprdr", 8); /* name padded to 8(?) */ |
out_uint16_le(s, SEC_TAG_CLI_CHANNELS); |
491 |
out_uint16(s, 0); |
out_uint16_le(s, g_num_channels * 12 + 8); /* length */ |
492 |
out_uint16_le(s, 0xc0a0); /* Flags. Rumours tell this is documented in MSDN. */ |
out_uint32_le(s, g_num_channels); /* number of virtual channels */ |
493 |
|
for (i = 0; i < g_num_channels; i++) |
494 |
|
{ |
495 |
|
DEBUG_RDP5(("Requesting channel %s\n", g_channels[i].name)); |
496 |
|
out_uint8a(s, g_channels[i].name, 8); |
497 |
|
out_uint32_be(s, g_channels[i].flags); |
498 |
|
} |
499 |
|
} |
500 |
|
|
501 |
s_mark_end(s); |
s_mark_end(s); |
502 |
} |
} |
562 |
uint8 ** server_random, uint8 ** modulus, uint8 ** exponent) |
uint8 ** server_random, uint8 ** modulus, uint8 ** exponent) |
563 |
{ |
{ |
564 |
uint32 crypt_level, random_len, rsa_info_len; |
uint32 crypt_level, random_len, rsa_info_len; |
565 |
uint32 cacert_len, cert_len; |
uint32 cacert_len, cert_len, flags; |
566 |
X509 *cacert, *server_cert; |
X509 *cacert, *server_cert; |
567 |
uint16 tag, length; |
uint16 tag, length; |
568 |
uint8 *next_tag, *end; |
uint8 *next_tag, *end; |
587 |
if (end > s->end) |
if (end > s->end) |
588 |
return False; |
return False; |
589 |
|
|
590 |
if (!use_rdp5 || 1 == server_rdp_version) |
in_uint32_le(s, flags); /* 1 = RDP4-style, 0x80000002 = X.509 */ |
591 |
|
if (flags & 1) |
592 |
{ |
{ |
593 |
DEBUG_RDP5(("We're going for the RDP4-style encryption\n")); |
DEBUG_RDP5(("We're going for the RDP4-style encryption\n")); |
594 |
in_uint8s(s, 12); /* unknown */ |
in_uint8s(s, 8); /* unknown */ |
595 |
|
|
596 |
while (s->p < end) |
while (s->p < end) |
597 |
{ |
{ |
623 |
s->p = next_tag; |
s->p = next_tag; |
624 |
} |
} |
625 |
} |
} |
626 |
else if (4 == server_rdp_version) |
else |
627 |
{ |
{ |
628 |
|
uint32 certcount; |
629 |
|
|
630 |
DEBUG_RDP5(("We're going for the RDP5-style encryption\n")); |
DEBUG_RDP5(("We're going for the RDP5-style encryption\n")); |
631 |
in_uint8s(s, 8); /* Unknown */ |
in_uint32_le(s, certcount); /* Number of certificates */ |
632 |
|
|
633 |
|
if (certcount < 2) |
634 |
|
{ |
635 |
|
error("Server didn't send enough X509 certificates\n"); |
636 |
|
return False; |
637 |
|
} |
638 |
|
|
639 |
|
for (; certcount > 2; certcount--) |
640 |
|
{ /* ignore all the certificates between the root and the signing CA */ |
641 |
|
uint32 ignorelen; |
642 |
|
X509 *ignorecert; |
643 |
|
|
644 |
|
DEBUG_RDP5(("Ignored certs left: %d\n", certcount)); |
645 |
|
|
646 |
|
in_uint32_le(s, ignorelen); |
647 |
|
DEBUG_RDP5(("Ignored Certificate length is %d\n", ignorelen)); |
648 |
|
ignorecert = d2i_X509(NULL, &(s->p), ignorelen); |
649 |
|
|
650 |
|
if (ignorecert == NULL) |
651 |
|
{ /* XXX: error out? */ |
652 |
|
DEBUG_RDP5(("got a bad cert: this will probably screw up the rest of the communication\n")); |
653 |
|
} |
654 |
|
|
655 |
|
#ifdef WITH_DEBUG_RDP5 |
656 |
|
DEBUG_RDP5(("cert #%d (ignored):\n", certcount)); |
657 |
|
X509_print_fp(stdout, ignorecert); |
658 |
|
#endif |
659 |
|
} |
660 |
|
|
661 |
/* Do da funky X.509 stuffy |
/* Do da funky X.509 stuffy |
662 |
|
|
668 |
*/ |
*/ |
669 |
|
|
670 |
in_uint32_le(s, cacert_len); |
in_uint32_le(s, cacert_len); |
671 |
|
DEBUG_RDP5(("CA Certificate length is %d\n", cacert_len)); |
672 |
cacert = d2i_X509(NULL, &(s->p), cacert_len); |
cacert = d2i_X509(NULL, &(s->p), cacert_len); |
673 |
/* Note: We don't need to move s->p here - d2i_X509 is |
/* Note: We don't need to move s->p here - d2i_X509 is |
674 |
"kind" enough to do it for us */ |
"kind" enough to do it for us */ |
689 |
*/ |
*/ |
690 |
|
|
691 |
in_uint32_le(s, cert_len); |
in_uint32_le(s, cert_len); |
692 |
|
DEBUG_RDP5(("Certificate length is %d\n", cert_len)); |
693 |
server_cert = d2i_X509(NULL, &(s->p), cert_len); |
server_cert = d2i_X509(NULL, &(s->p), cert_len); |
694 |
if (NULL == server_cert) |
if (NULL == server_cert) |
695 |
{ |
{ |
710 |
} |
} |
711 |
return True; /* There's some garbage here we don't care about */ |
return True; /* There's some garbage here we don't care about */ |
712 |
} |
} |
|
else |
|
|
{ |
|
|
error("Unknown Server RDP version %d", server_rdp_version); |
|
|
return False; |
|
|
} |
|
713 |
return s_check_end(s); |
return s_check_end(s); |
714 |
} |
} |
715 |
|
|
730 |
|
|
731 |
DEBUG(("Generating client random\n")); |
DEBUG(("Generating client random\n")); |
732 |
/* Generate a client random, and hence determine encryption keys */ |
/* Generate a client random, and hence determine encryption keys */ |
733 |
generate_random(inr); |
/* This is what the MS client do: */ |
734 |
// This is what the MS client do: |
memset(inr, 0, SEC_RANDOM_SIZE); |
735 |
// memset(inr, 0, SEC_RANDOM_SIZE); |
/* *ARIGL!* Plaintext attack, anyone? |
736 |
// *ARIGL!* |
I tried doing: |
737 |
|
generate_random(inr); |
738 |
|
..but that generates connection errors now and then (yes, |
739 |
|
"now and then". Something like 0 to 3 attempts needed before a |
740 |
|
successful connection. Nice. Not! |
741 |
|
*/ |
742 |
|
|
743 |
generate_random(client_random); |
generate_random(client_random); |
744 |
if (NULL != server_public_key) |
if (NULL != server_public_key) |
745 |
{ /* Which means we should use |
{ /* Which means we should use |
767 |
static void |
static void |
768 |
sec_process_srv_info(STREAM s) |
sec_process_srv_info(STREAM s) |
769 |
{ |
{ |
770 |
in_uint16_le(s, server_rdp_version); |
in_uint16_le(s, g_server_rdp_version); |
771 |
DEBUG_RDP5(("Server RDP version is %d\n", server_rdp_version)); |
DEBUG_RDP5(("Server RDP version is %d\n", g_server_rdp_version)); |
772 |
|
if (1 == g_server_rdp_version) |
773 |
|
g_use_rdp5 = 0; |
774 |
} |
} |
775 |
|
|
776 |
|
|
803 |
sec_process_srv_info(s); |
sec_process_srv_info(s); |
804 |
break; |
break; |
805 |
|
|
|
case SEC_TAG_SRV_3: |
|
|
break; |
|
|
|
|
806 |
case SEC_TAG_SRV_CRYPT: |
case SEC_TAG_SRV_CRYPT: |
807 |
sec_process_crypt_info(s); |
sec_process_crypt_info(s); |
808 |
break; |
break; |
809 |
|
|
810 |
|
case SEC_TAG_SRV_CHANNELS: |
811 |
|
/* FIXME: We should parse this information and |
812 |
|
use it to map RDP5 channels to MCS |
813 |
|
channels */ |
814 |
|
break; |
815 |
|
|
816 |
default: |
default: |
817 |
unimpl("response tag 0x%x\n", tag); |
unimpl("response tag 0x%x\n", tag); |
818 |
} |
} |
831 |
|
|
832 |
while ((s = mcs_recv(&channel)) != NULL) |
while ((s = mcs_recv(&channel)) != NULL) |
833 |
{ |
{ |
834 |
if (encryption || !licence_issued) |
if (g_encryption || !g_licence_issued) |
835 |
{ |
{ |
836 |
in_uint32_le(s, sec_flags); |
in_uint32_le(s, sec_flags); |
837 |
|
|
|
if (sec_flags & SEC_LICENCE_NEG) |
|
|
{ |
|
|
if (sec_flags & SEC_ENCRYPT) { |
|
|
DEBUG_RDP5(("Encrypted license detected\n")); |
|
|
} |
|
|
licence_process(s); |
|
|
continue; |
|
|
} |
|
|
|
|
838 |
if (sec_flags & SEC_ENCRYPT) |
if (sec_flags & SEC_ENCRYPT) |
839 |
{ |
{ |
840 |
in_uint8s(s, 8); /* signature */ |
in_uint8s(s, 8); /* signature */ |
841 |
sec_decrypt(s->p, s->end - s->p); |
sec_decrypt(s->p, s->end - s->p); |
842 |
} |
} |
843 |
|
|
844 |
|
if (sec_flags & SEC_LICENCE_NEG) |
845 |
|
{ |
846 |
|
licence_process(s); |
847 |
|
continue; |
848 |
|
} |
849 |
} |
} |
850 |
|
|
851 |
if (MCS_GLOBAL_CHANNEL == channel) |
if (channel != MCS_GLOBAL_CHANNEL) |
852 |
{ |
{ |
853 |
return s; |
channel_process(s, channel); |
854 |
|
continue; |
855 |
} |
} |
|
else |
|
|
rdp5_process_channel(s, channel); |
|
856 |
|
|
857 |
|
return s; |
858 |
} |
} |
859 |
|
|
860 |
return NULL; |
return NULL; |
868 |
|
|
869 |
/* We exchange some RDP data during the MCS-Connect */ |
/* We exchange some RDP data during the MCS-Connect */ |
870 |
mcs_data.size = 512; |
mcs_data.size = 512; |
871 |
mcs_data.p = mcs_data.data = xmalloc(mcs_data.size); |
mcs_data.p = mcs_data.data = (uint8 *) xmalloc(mcs_data.size); |
872 |
sec_out_mcs_data(&mcs_data); |
sec_out_mcs_data(&mcs_data); |
873 |
|
|
874 |
if (!mcs_connect(server, &mcs_data, username)) |
if (!mcs_connect(server, &mcs_data, username)) |
875 |
return False; |
return False; |
876 |
|
|
877 |
// sec_process_mcs_data(&mcs_data); |
/* sec_process_mcs_data(&mcs_data); */ |
878 |
if (encryption) |
if (g_encryption) |
879 |
sec_establish_key(); |
sec_establish_key(); |
880 |
xfree(mcs_data.data); |
xfree(mcs_data.data); |
881 |
return True; |
return True; |