/[rdesktop]/sourceforge.net/trunk/rdesktop/rdp.c
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /sourceforge.net/trunk/rdesktop/rdp.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 9 by matty, Tue Jul 25 12:34:29 2000 UTC revision 25 by matty, Sat Jan 6 03:47:04 2001 UTC
# Line 18  Line 18 
18     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19  */  */
20    
21  #include "includes.h"  #include "rdesktop.h"
22    
23  /* Establish a connection up to the RDP layer */  extern uint16 mcs_userid;
24  HCONN rdp_connect(char *server, int width, int height)  extern char username[16];
25  {  extern BOOL orders;
         HCONN conn;  
   
         if ((conn = mcs_connect(server)) == NULL)  
                 return NULL;  
   
         rdp_establish_key(conn);  
         mcs_recv(conn, False); /* Server's licensing certificate */  
         rdp_send_cert(conn);  
         mcs_recv(conn, False);  
         mcs_recv(conn, False);  
   
         return conn;  
   
 }  
   
 /* Work this out later. This is useless anyway when encryption is off. */  
 uint8 precanned_key_packet[] = {  
    0x48,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x33,0x00,0x00,0x00,0x00,0x00,  
    0x00,0x00,0x20,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x6c,0x86,  
    0xf7,0x99,0xef,0x60,0xc4,0x49,0x52,0xd0,0xd8,0xea,0xb5,0x4f,0x58,0x19,  
    0x52,0x2a,0x93,0x83,0x57,0x4f,0x4e,0x04,0xde,0x96,0x51,0xab,0x13,0x20,  
    0xd8,0xe5,0x00,0x00,0x00,0x00,0x00,0x00  
 };  
   
 uint8 precanned_key_packet_e1[] = {  
 0x01,0x00,0x00,0x00,0x48,0x00,0x00,0x00,0x7c,0xbd,0x8b,0x8f,0x16,0x2b,0xa1,0x00,  
 0xc6,0xfb,0x8a,0x39,0xf5,0x33,0xed,0x36,0x14,0x55,0x17,0x8c,0x3a,0xde,0x5e,0xdf,  
 0xcb,0x41,0x4c,0xc7,0x89,0x7d,0xe3,0xe9,0x34,0x08,0xda,0xdc,0x08,0x77,0x98,0xda,  
 0x65,0xae,0x27,0x74,0xf1,0x79,0xd0,0x28,0x54,0x64,0x86,0x7f,0x02,0xe0,0x71,0x51,  
 0x56,0x4e,0xca,0x72,0x94,0x62,0x49,0x27,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00  
 };  
   
 uint8 precanned_key_packet_e2[] = {  
 0x48,0x00,0x00,0x00,0x8a,0xe4,0x9f,0x8a,0xd5,0x04,0x02,0xfd,0x09,0x1f,0xff,0x53,  
 0xe0,0xb2,0x72,0x8b,0x19,0xba,0x22,0xe4,0x2a,0x7b,0xeb,0x79,0xa8,0x83,0x31,0x6f,  
 0x5c,0xcc,0x37,0x9c,0xe8,0x73,0x64,0x64,0xd3,0xab,0xaa,0x9f,0xbe,0x49,0x27,0xfc,  
 0x95,0xf3,0x6e,0xf8,0xb1,0x01,0x7c,0xba,0xa9,0xc5,0x35,0x9c,0x8f,0x74,0x3a,0x9f,  
 0xd4,0x26,0x4d,0x39,0x90,0xbe,0xf4,0xfb,0x72,0x9e,0x54,0x18  
 };  
   
 /* Create an RC4 key and transfer it to the server */  
 void rdp_establish_key(HCONN conn)  
 {  
         mcs_init_data(conn);  
         memcpy(conn->out.data + conn->out.offset, precanned_key_packet,  
                sizeof(precanned_key_packet));  
         conn->out.offset += sizeof(precanned_key_packet);  
         MARK_END(conn->out);  
         mcs_send_data(conn, MCS_GLOBAL_CHANNEL, True);  
 }  
   
 /* Create an RC4 key and transfer it to the server */  
 void rdp_establish_key_e1(HCONN conn)  
 {  
         mcs_init_data(conn);  
         memcpy(conn->out.data + conn->out.offset, precanned_key_packet_e1,  
                sizeof(precanned_key_packet_e1));  
         conn->out.offset += sizeof(precanned_key_packet_e1);  
         MARK_END(conn->out);  
         mcs_send_data(conn, MCS_GLOBAL_CHANNEL, True);  
 }  
   
 /* Create an RC4 key and transfer it to the server */  
 void rdp_establish_key_e2(HCONN conn)  
 {  
         mcs_init_data(conn);  
         memcpy(conn->out.data + conn->out.offset, precanned_key_packet_e2,  
                sizeof(precanned_key_packet_e2));  
         conn->out.offset += sizeof(precanned_key_packet_e2);  
         MARK_END(conn->out);  
         mcs_send_data(conn, MCS_GLOBAL_CHANNEL, True);  
 }  
   
 /* Horrible horrible certificate stuff. Work out later. */  
 uint8 precanned_cert_packet[] = { // 4c8  
 0x80,0x00,0x00,0x00,0x12,0x02,0xb4,0x04,0x01,0x00,0x00,  
 0x00,0x00,0x00,0x01,0x02,0x9d,0xa3,0x7a,0x93,0x34,0x7b,0x28,0x37,0x24,0xa0,0x1f,  
 0x61,0x26,0xfd,0x96,0x3a,0x92,0x83,0xf3,0xe9,0x6a,0x2e,0x81,0x7c,0x2c,0xe4,0x72,//  
 0x01,0x18,0xe9,0xa1,0x0f,0x00,0x00,0x48,0x00,0x84,0x23,0x90,0xe6,0xd3,0xf8,0x20,  
 0xdb,0xa8,0x1b,0xb2,0xd0,0x78,0x2c,0x35,0xde,0xe3,0x0e,0x63,0x40,0xca,0xac,0x71,  
 0xc9,0x17,0x49,0x05,0x25,0xeb,0x9b,0xd0,0xa6,0x5c,0x90,0x3e,0x9d,0x4b,0x27,0x01,  
 0x79,0x1c,0x22,0xfb,0x3c,0x2c,0xb9,0x9f,0xf5,0x21,0xf3,0xee,0xd5,0x4d,0x47,0x1c,  
 0x85,0xbe,0x83,0x93,0xe8,0xed,0x8c,0x5c,0x82,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  
 0x00,0x01,0x00,0x10,0x04,0x30,0x82,0x04,0x0c,0x06,0x09,0x2a,0x86,0x48,0x86,0xf7,  
 0x0d,0x01,0x07,0x02,0xa0,0x82,0x03,0xfd,0x30,0x82,0x03,0xf9,0x02,0x01,0x01,0x31,  
 0x00,0x30,0x0b,0x06,0x09,0x2a,0x86,0x48,0x86,0xf7,0x0d,0x01,0x07,0x01,0xa0,0x82,  
 0x03,0xe1,0x30,0x82,0x01,0x77,0x30,0x82,0x01,0x25,0xa0,0x03,0x02,0x01,0x02,0x02,  
 0x08,0x01,0xbf,0x06,0x84,0x9d,0xdb,0x2d,0xe0,0x30,0x0d,0x06,0x09,0x2a,0x86,0x48,  
 0x86,0xf7,0x0d,0x01,0x01,0x01,0x05,0x00,0x30,0x38,0x31,0x36,0x30,0x11,0x06,0x03,  
 0x55,0x04,0x03,0x1e,0x0a,0x00,0x4e,0x00,0x54,0x00,0x54,0x00,0x53,0x00,0x45,0x30,  
 0x21,0x06,0x03,0x55,0x04,0x07,0x1e,0x1a,0x00,0x4d,0x00,0x69,0x00,0x63,0x00,0x72,  
 0x00,0x6f,0x00,0x73,0x00,0x6f,0x00,0x66,0x00,0x74,0x00,0x2e,0x00,0x63,0x00,0x6f,  
 0x00,0x6d,0x30,0x1e,0x17,0x0d,0x39,0x39,0x30,0x39,0x32,0x34,0x31,0x32,0x30,0x32,  
 0x30,0x34,0x5a,0x17,0x0d,0x34,0x39,0x30,0x39,0x32,0x34,0x31,0x32,0x30,0x32,0x30,  
 0x34,0x5a,0x30,0x38,0x31,0x36,0x30,0x11,0x06,0x03,0x55,0x04,0x03,0x1e,0x0a,0x00,  
 0x4e,0x00,0x54,0x00,0x54,0x00,0x53,0x00,0x45,0x30,0x21,0x06,0x03,0x55,0x04,0x07,  
 0x1e,0x1a,0x00,0x4d,0x00,0x69,0x00,0x63,0x00,0x72,0x00,0x6f,0x00,0x73,0x00,0x6f,  
 0x00,0x66,0x00,0x74,0x00,0x2e,0x00,0x63,0x00,0x6f,0x00,0x6d,0x30,0x5c,0x30,0x0d,  
 0x06,0x09,0x2a,0x86,0x48,0x86,0xf7,0x0d,0x01,0x01,0x01,0x05,0x00,0x03,0x4b,0x00,  
 0x30,0x48,0x02,0x41,0x00,0x91,0xb2,0x16,0x1c,0xae,0x4f,0x7f,0x7c,0xaf,0x57,0x2b,  
 0x23,0x4c,0x0c,0x25,0x3c,0x4f,0x66,0x9d,0x25,0xc3,0x4f,0x29,0xee,0x8b,0xda,0x4e,  
 0x95,0xe7,0x3b,0xaa,0xc0,0xa7,0xba,0xaf,0x99,0x8c,0x47,0x24,0x8b,0x09,0x77,0xbc,  
 0x2c,0xf4,0xe7,0x1a,0x07,0x58,0x7b,0x11,0x37,0x2a,0xa8,0x90,0xc3,0x50,0x92,0x80,  
 0x15,0xc5,0xda,0x51,0x8b,0x02,0x03,0x01,0x00,0x01,0xa3,0x13,0x30,0x11,0x30,0x0f,  
 0x06,0x03,0x55,0x1d,0x13,0x04,0x08,0x30,0x06,0x01,0x01,0xff,0x02,0x01,0x00,0x30,  
 0x09,0x06,0x05,0x2b,0x0e,0x03,0x02,0x1d,0x05,0x00,0x03,0x41,0x00,0x14,0x04,0x67,  
 0x28,0xc8,0xd3,0x1f,0x13,0x14,0x2e,0x2c,0x93,0x09,0x25,0xbb,0xbe,0x86,0x6a,0xd3,  
 0x47,0x6f,0x44,0x16,0x7b,0x94,0x8c,0xb2,0xa2,0xd5,0xf7,0x4f,0xb1,0x8f,0x7f,0xde,  
 0x0b,0x88,0x34,0x4a,0x1d,0xdc,0xa1,0xfd,0x26,0xbd,0x43,0xbb,0x38,0xf1,0x87,0x34,  
 0xbb,0xe9,0x3b,0xfa,0x7f,0x1e,0xff,0xe1,0x10,0x7e,0xee,0x6e,0xd8,0x30,0x82,0x02,  
 0x62,0x30,0x82,0x02,0x10,0xa0,0x03,0x02,0x01,0x02,0x02,0x05,0x01,0x00,0x00,0x00,  
 0x01,0x30,0x09,0x06,0x05,0x2b,0x0e,0x03,0x02,0x1d,0x05,0x00,0x30,0x38,0x31,0x36,  
 0x30,0x11,0x06,0x03,0x55,0x04,0x03,0x1e,0x0a,0x00,0x4e,0x00,0x54,0x00,0x54,0x00,  
 0x53,0x00,0x45,0x30,0x21,0x06,0x03,0x55,0x04,0x07,0x1e,0x1a,0x00,0x4d,0x00,0x69,  
 0x00,0x63,0x00,0x72,0x00,0x6f,0x00,0x73,0x00,0x6f,0x00,0x66,0x00,0x74,0x00,0x2e,  
 0x00,0x63,0x00,0x6f,0x00,0x6d,0x30,0x1e,0x17,0x0d,0x39,0x39,0x30,0x39,0x32,0x34,  
 0x30,0x30,0x30,0x30,0x30,0x30,0x5a,0x17,0x0d,0x34,0x39,0x30,0x39,0x32,0x34,0x30,  
 0x30,0x30,0x30,0x30,0x30,0x5a,0x30,0x79,0x31,0x77,0x30,0x17,0x06,0x03,0x55,0x04,  
 0x03,0x1e,0x10,0x00,0x52,0x00,0x45,0x00,0x53,0x00,0x37,0x00,0x2d,0x00,0x4e,0x00,  
 0x45,0x00,0x57,0x30,0x17,0x06,0x03,0x55,0x04,0x07,0x1e,0x10,0x00,0x7a,0x00,0x32,  
 0x00,0x32,0x00,0x33,0x00,0x32,0x00,0x32,0x00,0x30,0x00,0x33,0x30,0x43,0x06,0x03,  
 0x55,0x04,0x05,0x1e,0x3c,0x00,0x31,0x00,0x42,0x00,0x63,0x00,0x4b,0x00,0x65,0x00,  
 0x57,0x00,0x50,0x00,0x6c,0x00,0x37,0x00,0x58,0x00,0x47,0x00,0x61,0x00,0x73,0x00,  
 0x38,0x00,0x4a,0x00,0x79,0x00,0x50,0x00,0x34,0x00,0x30,0x00,0x7a,0x00,0x49,0x00,  
 0x6d,0x00,0x6e,0x00,0x6f,0x00,0x51,0x00,0x5a,0x00,0x59,0x00,0x3d,0x00,0x0d,0x00,  
 0x0a,0x30,0x5c,0x30,0x0d,0x06,0x09,0x2a,0x86,0x48,0x86,0xf7,0x0d,0x01,0x01,0x01,  
 0x05,0x00,0x03,0x4b,0x00,0x30,0x48,0x02,0x41,0x00,0x91,0xb2,0x16,0x1c,0xae,0x4f,  
 0x7f,0x7c,0xaf,0x57,0x2b,0x23,0x4c,0x0c,0x25,0x3c,0x4f,0x66,0x9d,0x25,0xc3,0x4f,  
 0x29,0xee,0x8b,0xda,0x4e,0x95,0xe7,0x3b,0xaa,0xc0,0xa7,0xba,0xaf,0x99,0x8c,0x47,  
 0x24,0x8b,0x09,0x77,0xbc,0x2c,0xf4,0xe7,0x1a,0x07,0x58,0x7b,0x11,0x37,0x2a,0xa8,  
 0x90,0xc3,0x50,0x92,0x80,0x15,0xc5,0xda,0x51,0x8b,0x02,0x03,0x01,0x00,0x01,0xa3,  
 0x81,0xc3,0x30,0x81,0xc0,0x30,0x14,0x06,0x09,0x2b,0x06,0x01,0x04,0x01,0x82,0x37,  
 0x12,0x04,0x01,0x01,0xff,0x04,0x04,0x01,0x00,0x01,0x00,0x30,0x3c,0x06,0x09,0x2b,  
 0x06,0x01,0x04,0x01,0x82,0x37,0x12,0x02,0x01,0x01,0xff,0x04,0x2c,0x4d,0x00,0x69,  
 0x00,0x63,0x00,0x72,0x00,0x6f,0x00,0x73,0x00,0x6f,0x00,0x66,0x00,0x74,0x00,0x20,  
 0x00,0x43,0x00,0x6f,0x00,0x72,0x00,0x70,0x00,0x6f,0x00,0x72,0x00,0x61,0x00,0x74,  
 0x00,0x69,0x00,0x6f,0x00,0x6e,0x00,0x00,0x00,0x30,0x4c,0x06,0x09,0x2b,0x06,0x01,  
 0x04,0x01,0x82,0x37,0x12,0x05,0x01,0x01,0xff,0x04,0x3c,0x00,0x10,0x00,0x00,0x01,  
 0x00,0x00,0x00,0x02,0x00,0x00,0x00,0x09,0x04,0x00,0x00,0x18,0x00,0x18,0x00,0x30,  
 0x00,0x01,0x00,0x32,0x00,0x33,0x00,0x36,0x00,0x2d,0x00,0x34,0x00,0x2e,0x00,0x30,  
 0x00,0x30,0x00,0x2d,0x00,0x45,0x00,0x58,0x00,0x00,0x00,0x04,0x00,0x00,0x00,0x00,  
 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x1c,0x06,0x03,0x55,0x1d,0x23,0x01,0x01,  
 0xff,0x04,0x12,0x30,0x10,0xa1,0x07,0x81,0x05,0x4e,0x54,0x54,0x53,0x45,0x82,0x05,  
 0x01,0x00,0x00,0x00,0x01,0x30,0x09,0x06,0x05,0x2b,0x0e,0x03,0x02,0x1d,0x05,0x00,  
 0x03,0x41,0x00,0x7b,0x1d,0xfd,0x24,0xea,0xf2,0xe8,0x17,0xdd,0x88,0x7e,0xfd,0xee,  
 0x28,0x61,0x7a,0x02,0xc3,0x73,0xcf,0x32,0x0f,0x7c,0x66,0x87,0x31,0xa7,0xbe,0x1b,  
 0x31,0xe2,0x20,0xa5,0x76,0x91,0x68,0x97,0x53,0x9e,0x80,0xcd,0x2b,0xd0,0x8e,0x8b,  
 0x7f,0x89,0x1b,0x62,0xa8,0xf8,0xee,0x5e,0x56,0xbd,0x9c,0x6b,0x80,0x06,0x54,0xd3,  
 0xf0,0xbf,0xb2,0x31,0x00,0x01,0x00,0x14,0x00,0xc7,0x32,0xf2,0x5b,0x98,0x0e,0x04,  
 0x49,0xa0,0x27,0x7e,0xf5,0xf6,0x0f,0xda,0x08,0x1d,0xe9,0x79,0xd1,0x31,0xc6,0x50,  
 0x90,0x4a,0xd3,0x1f,0x1d,0xf0,0x65,0x0d,0xb6,0x1f,0xaf,0xc9,0x1d  
 };  
   
 /* Send license certificate and related data to the server */  
 void rdp_send_cert(HCONN conn)  
 {  
         mcs_init_data(conn);  
         prs_io_uint8s(&conn->out, precanned_cert_packet, sizeof(precanned_cert_packet));  
         MARK_END(conn->out);  
         mcs_send_data(conn, MCS_GLOBAL_CHANNEL, True);  
 }  
   
 /* Initialise RDP transport packet */  
 void rdp_init(HCONN conn)  
 {  
         mcs_init_data(conn);  
         PUSH_LAYER(conn->out, rdp_offset, 6);  
 }  
   
 /* Transmit RDP transport packet */  
 void rdp_send(HCONN conn, uint16 pdu_type)  
 {  
         RDP_HEADER hdr;  
         int length;  
   
         POP_LAYER(conn->out, rdp_offset);  
         length = conn->out.end - conn->out.offset;  
         rdp_make_header(&hdr, length, pdu_type, conn->mcs_userid);  
         rdp_io_header(&conn->out, &hdr);  
         mcs_send_data(conn, MCS_GLOBAL_CHANNEL, True);  
 }  
   
 /* Initialise RDP transport data packet */  
 void rdp_init_data(HCONN conn)  
 {  
         mcs_init_data(conn);  
         PUSH_LAYER(conn->out, rdp_offset, 18);  
 }  
   
 /* Transmit RDP transport data packet */  
 void rdp_send_data(HCONN conn, uint16 data_pdu_type)  
 {  
         RDP_HEADER hdr;  
         RDP_DATA_HEADER datahdr;  
         int length = conn->out.end - conn->out.offset;  
   
         POP_LAYER(conn->out, rdp_offset);  
         length = conn->out.end - conn->out.offset;  
         rdp_make_header(&hdr, length, RDP_PDU_DATA, conn->mcs_userid);  
         rdp_io_header(&conn->out, &hdr);  
         rdp_make_data_header(&datahdr, 0x103ea, length, data_pdu_type);  
         rdp_io_data_header(&conn->out, &datahdr);  
         mcs_send_data(conn, MCS_GLOBAL_CHANNEL, True);  
 }  
   
 void rdp_send_confirm_active(HCONN conn, uint32 shareid, int width, int height)  
 {  
         RDP_ACTIVE_PDU active;  
   
         rdp_init(conn);  
         rdp_make_active_pdu(&active, shareid, conn->mcs_userid, width, height);  
         rdp_io_active_pdu(&conn->out, &active, RDP_PDU_CONFIRM_ACTIVE);  
         MARK_END(conn->out);  
         rdp_send(conn, RDP_PDU_CONFIRM_ACTIVE);  
 }  
   
 void rdp_send_synchronize(HCONN conn)  
 {  
         RDP_SYNCHRONISE_PDU sync;  
   
         rdp_init_data(conn);  
         rdp_make_synchronise_pdu(&sync, 1002);  
         rdp_io_synchronise_pdu(&conn->out, &sync);  
         MARK_END(conn->out);  
         rdp_send_data(conn, RDP_DATA_PDU_SYNCHRONIZE);  
 }  
   
 void rdp_send_control(HCONN conn, uint16 action)  
 {  
         RDP_CONTROL_PDU control;  
   
         rdp_init_data(conn);  
         rdp_make_control_pdu(&control, action);  
         rdp_io_control_pdu(&conn->out, &control);  
         MARK_END(conn->out);  
         rdp_send_data(conn, RDP_DATA_PDU_CONTROL);  
 }  
   
 void rdp_send_fonts(HCONN conn, uint16 seqno)  
 {  
         RDP_FONT_PDU fonts;  
   
         rdp_init_data(conn);  
         rdp_make_font_pdu(&fonts, seqno);  
         rdp_io_font_pdu(&conn->out, &fonts);  
         MARK_END(conn->out);  
         rdp_send_data(conn, RDP_DATA_PDU_FONT2);  
 }  
   
 void rdp_send_input(HCONN conn, uint16 message_type, uint16 device_flags,  
                                 uint16 param1, uint16 param2)  
 {  
         RDP_INPUT_PDU input;  
   
         rdp_init_data(conn);  
         rdp_make_input_pdu(&input, message_type, device_flags, param1, param2);  
         rdp_io_input_pdu(&conn->out, &input);  
         MARK_END(conn->out);  
         rdp_send_data(conn, RDP_DATA_PDU_INPUT);  
 }  
   
 BOOL rdp_recv_pdu(HCONN conn, uint8 *type)  
 {  
         RDP_HEADER hdr;  
   
         conn->in.offset = conn->in.rdp_offset;  
   
         if (conn->in.offset >= conn->in.end)  
         {  
                 if (!mcs_recv(conn, False))  
                         return False;  
         }  
   
         if (!rdp_io_header(&conn->in, &hdr))  
                 return False;  
   
         conn->in.rdp_offset += hdr.length;  
         *type = hdr.pdu_type & 0xf;  
   
 #if DUMP  
         fprintf(stderr, "RDP packet (type %x):\n", *type);  
         dump_data(conn->in.data+conn->in.offset, conn->in.rdp_offset-conn->in.offset);  
 #endif  
   
         return True;  
 }  
   
 /* Disconnect from the RDP layer */  
 void rdp_disconnect(HCONN conn)  
 {  
         mcs_disconnect(conn);  
 }  
26    
27  /* Construct an RDP header */  unsigned char *next_packet;
28  void rdp_make_header(RDP_HEADER *hdr, uint16 length, uint16 pdu_type,  uint32 rdp_shareid;
                      uint16 userid)  
 {  
         hdr->length = length;  
         hdr->pdu_type = pdu_type | 0x10; /* Version 1 */  
         hdr->userid = userid + 1001;  
 }  
29    
30  /* Parse an RDP header */  /* Initialise an RDP packet */
31  BOOL rdp_io_header(STREAM s, RDP_HEADER *hdr)  static STREAM
32    rdp_init(int maxlen)
33  {  {
34          BOOL res = True;          STREAM s;
35    
36          res = res ? lsb_io_uint16(s, &hdr->length  ) : False;          s = sec_init(SEC_ENCRYPT, maxlen + 6);
37          res = res ? lsb_io_uint16(s, &hdr->pdu_type) : False;          s_push_layer(s, rdp_hdr, 6);
         if ((hdr->pdu_type & 0xf) != RDP_PDU_DEACTIVATE)  
                 res = res ? lsb_io_uint16(s, &hdr->userid  ) : False;  
38    
39          return res;          return s;
40  }  }
41    
42  /* Construct a data header */  /* Send an RDP packet */
43  void rdp_make_data_header(RDP_DATA_HEADER *hdr, uint32 shareid,  static void
44                            uint16 length, uint16 data_pdu_type)  rdp_send(STREAM s, uint8 pdu_type)
45  {  {
46          hdr->shareid = shareid;          uint16 length;
         hdr->pad = 0;  
         hdr->streamid = 1;  
         hdr->length = length - 14;  
         hdr->data_pdu_type = data_pdu_type;  
         hdr->compress_type = 0;  
         hdr->compress_len = 0;  
 }  
47    
48  /* Parse a data header */          s_pop_layer(s, rdp_hdr);
49  BOOL rdp_io_data_header(STREAM s, RDP_DATA_HEADER *hdr)          length = s->end - s->p;
 {  
         BOOL res = True;  
50    
51          res = res ? lsb_io_uint32(s, &hdr->shareid      ) : False;          out_uint16_le(s, length);
52          res = res ? prs_io_uint8 (s, &hdr->pad          ) : False;          out_uint16_le(s, (pdu_type | 0x10));    /* Version 1 */
53          res = res ? prs_io_uint8 (s, &hdr->streamid     ) : False;          out_uint16_le(s, (mcs_userid + 1001));
         res = res ? lsb_io_uint16(s, &hdr->length       ) : False;  
         res = res ? prs_io_uint8 (s, &hdr->data_pdu_type) : False;  
         res = res ? prs_io_uint8 (s, &hdr->compress_type) : False;  
         res = res ? lsb_io_uint16(s, &hdr->compress_len ) : False;  
54    
55          return res;          sec_send(s, SEC_ENCRYPT);
56  }  }
57    
58  BOOL rdp_io_present(STREAM s, uint32 *present, uint8 flags, int size)  /* Receive an RDP packet */
59    static STREAM
60    rdp_recv(uint8 *type)
61  {  {
62          uint8 bits;          static STREAM rdp_s;
63          int i;          uint16 length, pdu_type;
   
         if (flags & RDP_ORDER_SMALL)  
         {  
                 size--;  
         }  
64    
65          if (flags & RDP_ORDER_TINY)          if ((rdp_s == NULL) || (next_packet >= rdp_s->end))
66          {          {
67                  if (size < 2)                  rdp_s = sec_recv();
68                          return False;                  if (rdp_s == NULL)
69                            return NULL;
70    
71                  size -= 2;                  next_packet = rdp_s->p;
         }  
   
         *present = 0;  
         for (i = 0; i < size; i++)  
         {  
                 prs_io_uint8(s, &bits);  
                 *present |= bits << (i * 8);  
         }  
   
         return True;  
 }  
   
 BOOL rdp_io_coord(STREAM s, uint16 *coord, BOOL delta)  
 {  
         uint8 change;  
         BOOL res;  
   
         if (delta)  
         {  
                 res = prs_io_uint8(s, &change);  
                 *coord += (char)change;  
72          }          }
73          else          else
74          {          {
75                  res = lsb_io_uint16(s, coord);                  rdp_s->p = next_packet;
76          }          }
77    
78          return res;          in_uint16_le(rdp_s, length);
79  }          in_uint16_le(rdp_s, pdu_type);
80            in_uint8s(rdp_s, 2);    /* userid */
81    
82  BOOL rdp_io_colour(STREAM s, uint8 *colour)          next_packet += length;
83  {          *type = pdu_type & 0xf;
         BOOL res;  
   
         res = prs_io_uint8(s, colour);  
         s->offset += 2;  
   
         return res;  
 }  
   
 BOOL rdp_io_colourmap(STREAM s, COLOURMAP *colours)  
 {  
         int datasize;  
   
         lsb_io_uint16(s, &colours->ncolours);  
         datasize = colours->ncolours * 3;  
   
         if (datasize > sizeof(colours->colours))  
                 return False;  
   
         memcpy(colours->colours, s->data + s->offset, datasize);  
         s->offset += datasize;  
         return True;  
 }  
84    
85  BOOL rdp_io_bounds(STREAM s, BOUNDS *bounds)  #if RDP_DEBUG
86  {          DEBUG("RDP packet (type %x):\n", *type);
87          uint8 present;          hexdump(rdp_s->p, length);
88    #endif
         prs_io_uint8(s, &present);  
   
         if (present & 1)  
                 rdp_io_coord(s, &bounds->left, False);  
         else if (present & 16)  
                 rdp_io_coord(s, &bounds->left, True);  
   
         if (present & 2)  
                 rdp_io_coord(s, &bounds->top, False);  
         else if (present & 32)  
                 rdp_io_coord(s, &bounds->top, True);  
   
         if (present & 4)  
                 rdp_io_coord(s, &bounds->right, False);  
         else if (present & 64)  
                 rdp_io_coord(s, &bounds->right, True);  
   
         if (present & 8)  
                 rdp_io_coord(s, &bounds->bottom, False);  
         else if (present & 128)  
                 rdp_io_coord(s, &bounds->bottom, True);  
89    
90          return True;          return rdp_s;
91  }  }
92    
93  BOOL rdp_io_pen(STREAM s, PEN *pen, uint32 present)  /* Initialise an RDP data packet */
94    static STREAM
95    rdp_init_data(int maxlen)
96  {  {
97          BOOL res = True;          STREAM s;
   
         if (present & 1)  
                 res = res ? prs_io_uint8(s, &pen->style) : False;  
98    
99          if (present & 2)          s = sec_init(SEC_ENCRYPT, maxlen + 18);
100                  res = res ? prs_io_uint8(s, &pen->width) : False;          s_push_layer(s, rdp_hdr, 18);
101    
102          if (present & 4)          return s;
                 res = res ? rdp_io_colour(s, &pen->colour) : False;  
   
         return res;  
103  }  }
104    
105  BOOL rdp_io_brush(STREAM s, BRUSH *brush, uint32 present)  /* Send an RDP data packet */
106    static void
107    rdp_send_data(STREAM s, uint8 data_pdu_type)
108  {  {
109          BOOL res = True;          uint16 length;
   
         if (present & 1)  
                 res = res ? prs_io_uint8(s, &brush->xorigin) : False;  
   
         if (present & 2)  
                 res = res ? prs_io_uint8(s, &brush->yorigin) : False;  
   
         if (present & 4)  
                 res = res ? prs_io_uint8(s, &brush->style) : False;  
   
         if (present & 8)  
                 res = res ? prs_io_uint8(s, &brush->pattern[0]) : False;  
   
         if (present & 16)  
                 res = res ? prs_io_uint8s(s, &brush->pattern[1], 7) : False;  
110    
111          return res;          s_pop_layer(s, rdp_hdr);
112  }          length = s->end - s->p;
113    
114  /* Construct a confirm/demand active PDU */          out_uint16_le(s, length);
115  void rdp_make_active_pdu(RDP_ACTIVE_PDU *pdu, uint32 shareid, uint16 userid,          out_uint16_le(s, (RDP_PDU_DATA | 0x10));
116                                  int width, int height)          out_uint16_le(s, (mcs_userid + 1001));
 {  
         memset(pdu, 0, sizeof(*pdu));  
         pdu->shareid = shareid;  
         pdu->userid  = 1002;  
         pdu->source_len = sizeof(RDP_SOURCE);  
         memcpy(pdu->source, RDP_SOURCE, sizeof(RDP_SOURCE));  
117    
118          pdu->caps_len = RDP_CAPLEN_GENERAL + RDP_CAPLEN_BITMAP + RDP_CAPLEN_ORDER          out_uint32_le(s, rdp_shareid);
119                  + RDP_CAPLEN_BMPCACHE + RDP_CAPLEN_COLCACHE + RDP_CAPLEN_ACTIVATE          out_uint8(s, 0);        /* pad */
120                  + RDP_CAPLEN_CONTROL + RDP_CAPLEN_POINTER + RDP_CAPLEN_SHARE          out_uint8(s, 1);        /* streamid */
121                  + RDP_CAPLEN_UNKNOWN;          out_uint16(s, (length - 14));
122          pdu->num_caps = 0xD;          out_uint8(s, data_pdu_type);
123            out_uint8(s, 0);        /* compress_type */
124            out_uint16(s, 0);       /* compress_len */
125    
126          rdp_make_general_caps (&pdu->general_caps );          sec_send(s, SEC_ENCRYPT);
         rdp_make_bitmap_caps  (&pdu->bitmap_caps, width, height);  
         rdp_make_order_caps   (&pdu->order_caps   );  
         rdp_make_bmpcache_caps(&pdu->bmpcache_caps);  
         rdp_make_control_caps (&pdu->control_caps );  
         rdp_make_activate_caps(&pdu->activate_caps);  
         rdp_make_pointer_caps (&pdu->pointer_caps );  
         rdp_make_share_caps   (&pdu->share_caps, userid);  
         rdp_make_colcache_caps(&pdu->colcache_caps);  
127  }  }
128    
129  /* Parse a confirm/demand active PDU */  /* Output a string in Unicode */
130  BOOL rdp_io_active_pdu(STREAM s, RDP_ACTIVE_PDU *pdu, int pdutype)  void
131    rdp_out_unistr(STREAM s, char *string, int len)
132  {  {
133          uint16 capset;          int i = 0, j = 0;
         uint16 length;  
         BOOL res;  
         int i;  
134    
135          res = lsb_io_uint32(s, &pdu->shareid);          len += 2;
136    
137          if (pdutype == RDP_PDU_CONFIRM_ACTIVE)          while (i < len)
                 res = res ? lsb_io_uint16(s, &pdu->userid    ) : False;  
   
         res = res ? lsb_io_uint16(s, &pdu->source_len) : False;  
         res = res ? lsb_io_uint16(s, &pdu->caps_len  ) : False;  
   
         if (pdu->source_len > 48)  
138          {          {
139                  ERROR("RDP source descriptor too long\n");                  s->p[i++] = string[j++];
140                  return False;                  s->p[i++] = 0;
141          }          }
142    
143          res = res ? prs_io_uint8s(s,  pdu->source, pdu->source_len) : False;          s->p += len;
         res = res ? lsb_io_uint16(s, &pdu->num_caps  ) : False;  
         res = res ? lsb_io_uint16(s, &pdu->pad       ) : False;  
   
         if (s->marshall)  
         {  
                 capset = RDP_CAPSET_GENERAL;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_general_caps(s, &pdu->general_caps) : False;  
   
                 capset = RDP_CAPSET_BITMAP;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_bitmap_caps (s, &pdu->bitmap_caps ) : False;  
   
                 capset = RDP_CAPSET_ORDER;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_order_caps  (s, &pdu->order_caps  ) : False;  
   
                 capset = RDP_CAPSET_BMPCACHE;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_bmpcache_caps(s, &pdu->bmpcache_caps) : False;  
   
                 capset = RDP_CAPSET_COLCACHE;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_colcache_caps(s, &pdu->colcache_caps) : False;  
   
                 capset = RDP_CAPSET_ACTIVATE;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_activate_caps(s, &pdu->activate_caps) : False;  
   
                 capset = RDP_CAPSET_CONTROL;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_control_caps(s, &pdu->control_caps) : False;  
   
                 capset = RDP_CAPSET_POINTER;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_pointer_caps(s, &pdu->pointer_caps) : False;  
   
                 capset = RDP_CAPSET_SHARE;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_share_caps  (s, &pdu->share_caps  ) : False;  
   
                 capset = RDP_CAPSET_UNKNOWN;  
                 res = res ? lsb_io_uint16(s, &capset) : False;  
                 res = res ? rdp_io_unknown_caps(s, NULL) : False;  
         }  
         else  
         {  
                 for (i = 0; i < pdu->num_caps; i++)  
                 {  
                         if (!res)  
                                 return False;  
   
                         if (!lsb_io_uint16(s, &capset))  
                                 return False;  
   
                         switch (capset)  
                         {  
                         case RDP_CAPSET_GENERAL:  
                                 res = rdp_io_general_caps (s, &pdu->general_caps );  
                                 break;  
                         case RDP_CAPSET_BITMAP:  
                                 res = rdp_io_bitmap_caps  (s, &pdu->bitmap_caps  );  
                                 break;  
                         case RDP_CAPSET_ORDER:  
                                 res = rdp_io_order_caps   (s, &pdu->order_caps   );  
                                 break;  
                         case RDP_CAPSET_BMPCACHE:  
                                 res = rdp_io_bmpcache_caps(s, &pdu->bmpcache_caps);  
                                 break;  
                         case RDP_CAPSET_CONTROL:  
                                 res = rdp_io_control_caps (s, &pdu->control_caps );  
                                 break;  
                         case RDP_CAPSET_ACTIVATE:  
                                 res = rdp_io_activate_caps(s, &pdu->activate_caps);  
                                 break;  
                         case RDP_CAPSET_POINTER:  
                                 res = rdp_io_pointer_caps (s, &pdu->pointer_caps );  
                                 break;  
                         case RDP_CAPSET_SHARE:  
                                 res = rdp_io_share_caps   (s, &pdu->share_caps   );  
                                 break;  
                         case RDP_CAPSET_COLCACHE:  
                                 res = rdp_io_colcache_caps(s, &pdu->colcache_caps);  
                                 break;  
                         default:  
                                 NOTIMP("capset 0x%x\n", capset);  
   
                                 if (!lsb_io_uint16(s, &length))  
                                         return False;  
   
                                 s->offset += (length - 4);  
                         }  
                 }  
         }  
   
         return res;  
144  }  }
145    
146  /* Construct a control PDU */  /* Parse a logon info packet */
147  void rdp_make_control_pdu(RDP_CONTROL_PDU *pdu, uint16 action)  static void
148    rdp_send_logon_info(uint32 flags, char *domain, char *user,
149                        char *password, char *program, char *directory)
150  {  {
151          pdu->action = action;          int len_domain = 2 * strlen(domain);
152          pdu->userid = 0;          int len_user = 2 * strlen(user);
153          pdu->controlid = 0;          int len_password = 2 * strlen(password);
154  }          int len_program = 2 * strlen(program);
155            int len_directory = 2 * strlen(directory);
156            uint32 sec_flags = SEC_LOGON_INFO | SEC_ENCRYPT;
157            STREAM s;
158    
159  /* Parse a control PDU */          s = sec_init(sec_flags, 18 + len_domain + len_user + len_password
160  BOOL rdp_io_control_pdu(STREAM s, RDP_CONTROL_PDU *pdu)                       + len_program + len_directory + 10);
 {  
         BOOL res = True;  
161    
162          res = res ? lsb_io_uint16(s, &pdu->action   ) : False;          out_uint32(s, 0);
163          res = res ? lsb_io_uint16(s, &pdu->userid   ) : False;          out_uint32_le(s, flags);
164          res = res ? lsb_io_uint32(s, &pdu->controlid) : False;          out_uint16_le(s, len_domain);
165            out_uint16_le(s, len_user);
166            out_uint16_le(s, len_password);
167            out_uint16_le(s, len_program);
168            out_uint16_le(s, len_directory);
169            rdp_out_unistr(s, domain, len_domain);
170            rdp_out_unistr(s, user, len_user);
171            rdp_out_unistr(s, password, len_password);
172            rdp_out_unistr(s, program, len_program);
173            rdp_out_unistr(s, directory, len_directory);
174    
175          return res;          s_mark_end(s);
176            sec_send(s, sec_flags);
177  }  }
178    
179  /* Construct a synchronisation PDU */  /* Send a control PDU */
180  void rdp_make_synchronise_pdu(RDP_SYNCHRONISE_PDU *pdu, uint16 userid)  static void
181    rdp_send_control(uint16 action)
182  {  {
183          pdu->type = 1;          STREAM s;
         pdu->userid = userid;  
 }  
184    
185  /* Parse a synchronisation PDU */          s = rdp_init_data(8);
 BOOL rdp_io_synchronise_pdu(STREAM s, RDP_SYNCHRONISE_PDU *pdu)  
 {  
         BOOL res = True;  
186    
187          res = res ? lsb_io_uint16(s, &pdu->type  ) : False;          out_uint16_le(s, action);
188          res = res ? lsb_io_uint16(s, &pdu->userid) : False;          out_uint16(s, 0);       /* userid */
189            out_uint32(s, 0);       /* control id */
190    
191          return res;          s_mark_end(s);
192            rdp_send_data(s, RDP_DATA_PDU_CONTROL);
193  }  }
194    
195  /* Parse a single input event */  /* Send a synchronisation PDU */
196  BOOL rdp_io_input_event(STREAM s, RDP_INPUT_EVENT *evt)  static void
197    rdp_send_synchronise()
198  {  {
199          BOOL res = True;          STREAM s;
200    
201          res = res ? lsb_io_uint32(s, &evt->event_time)   : False;          s = rdp_init_data(4);
         res = res ? lsb_io_uint16(s, &evt->message_type) : False;  
         res = res ? lsb_io_uint16(s, &evt->device_flags) : False;  
202    
203          if (!res)          out_uint16_le(s, 1);    /* type */
204                  return False;          out_uint16_le(s, 1002);
205    
206          switch (evt->message_type)          s_mark_end(s);
207          {          rdp_send_data(s, RDP_DATA_PDU_SYNCHRONISE);
         case RDP_INPUT_CODEPOINT:  
         case RDP_INPUT_VIRTKEY:  
                 res = res ? lsb_io_uint16(s, &evt->param1) : False;  
                 break;  
         case RDP_INPUT_SYNCHRONIZE:  
         case RDP_INPUT_SCANCODE:  
         case RDP_INPUT_MOUSE:  
                 res = res ? lsb_io_uint16(s, &evt->param1) : False;  
                 res = res ? lsb_io_uint16(s, &evt->param2) : False;  
                 break;  
         default:  
                 NOTIMP("input type %d\n", evt->message_type);  
                 return False;  
         }  
   
         return res;  
208  }  }
209    
210  /* Construct an input PDU */  /* Send a single input event */
211  void rdp_make_input_pdu(RDP_INPUT_PDU *pdu, uint16 message_type,  void
212                          uint16 device_flags, uint16 param1, uint16 param2)  rdp_send_input(uint32 time, uint16 message_type, uint16 device_flags,
213                   uint16 param1, uint16 param2)
214  {  {
215          uint32 now = time(NULL);          STREAM s;
216    
217          pdu->num_events = 1;          s = rdp_init_data(16);
         pdu->pad = 0;  
218    
219          pdu->event[0].event_time = now;          out_uint16_le(s, 1);    /* number of events */
220          pdu->event[0].message_type = message_type;          out_uint16(s, 0);       /* pad */
         pdu->event[0].device_flags = device_flags;  
         pdu->event[0].param1 = param1;  
         pdu->event[0].param2 = param2;  
 }  
221    
222  /* Parse an input PDU */          out_uint32_le(s, time);
223  BOOL rdp_io_input_pdu(STREAM s, RDP_INPUT_PDU *pdu)          out_uint16_le(s, message_type);
224  {          out_uint16_le(s, device_flags);
225          BOOL res = True;          out_uint16_le(s, param1);
226          int i;          out_uint16_le(s, param2);
   
         res = res ? lsb_io_uint16(s, &pdu->num_events) : False;  
         res = res ? lsb_io_uint16(s, &pdu->pad       ) : False;  
227    
228          if (pdu->num_events > RDP_MAX_EVENTS)          s_mark_end(s);
229          {          rdp_send_data(s, RDP_DATA_PDU_INPUT);
                 ERROR("Too many events in one PDU\n");  
                 return False;  
         }  
   
         for (i = 0; i < pdu->num_events; i++)  
         {  
                 res = res ? rdp_io_input_event(s, &pdu->event[i]) : False;  
         }  
   
         return res;  
230  }  }
231    
232  /* Construct a font information PDU */  /* Send an (empty) font information PDU */
233  void rdp_make_font_pdu(RDP_FONT_PDU *pdu, uint16 seqno)  static void
234    rdp_send_fonts(uint16 seq)
235  {  {
236          pdu->num_fonts = 0;          STREAM s;
         pdu->unknown1 = 0x3e;  
         pdu->unknown2 = seqno;  
         pdu->entry_size = RDP_FONT_INFO_SIZE;  
 }  
237    
238  /* Parse a font information structure */          s = rdp_init_data(8);
 BOOL rdp_io_font_info(STREAM s, RDP_FONT_INFO *font)  
 {  
         BOOL res = True;  
239    
240          res = res ? prs_io_uint8s(s,  font->name, 32 ) : False;          out_uint16(s, 0);       /* number of fonts */
241          res = res ? lsb_io_uint16(s, &font->flags    ) : False;          out_uint16_le(s, 0x3e); /* unknown */
242          res = res ? lsb_io_uint16(s, &font->width    ) : False;          out_uint16_le(s, seq);  /* unknown */
243          res = res ? lsb_io_uint16(s, &font->height   ) : False;          out_uint16_le(s, 0x32); /* entry size */
         res = res ? lsb_io_uint16(s, &font->xaspect  ) : False;  
         res = res ? lsb_io_uint16(s, &font->yaspect  ) : False;  
         res = res ? lsb_io_uint32(s, &font->signature) : False;  
         res = res ? lsb_io_uint16(s, &font->codepage ) : False;  
         res = res ? lsb_io_uint16(s, &font->ascent   ) : False;  
244    
245          return res;          s_mark_end(s);
246            rdp_send_data(s, RDP_DATA_PDU_FONT2);
247  }  }
248    
249  /* Parse a font information PDU */  /* Output general capability set */
250  BOOL rdp_io_font_pdu(STREAM s, RDP_FONT_PDU *pdu)  static void
251    rdp_out_general_caps(STREAM s)
252  {  {
253          BOOL res = True;          out_uint16_le(s, RDP_CAPSET_GENERAL);
254          int i;          out_uint16_le(s, RDP_CAPLEN_GENERAL);
   
         res = res ? lsb_io_uint16(s, &pdu->num_fonts ) : False;  
         res = res ? lsb_io_uint16(s, &pdu->unknown1  ) : False;  
         res = res ? lsb_io_uint16(s, &pdu->unknown2  ) : False;  
         res = res ? lsb_io_uint16(s, &pdu->entry_size) : False;  
   
         if (pdu->num_fonts > RDP_MAX_FONTS)  
         {  
                 ERROR("Too many fonts in one PDU\n");  
                 return False;  
         }  
   
         for (i = 0; i < pdu->num_fonts; i++)  
         {  
                 res = res ? rdp_io_font_info(s, &pdu->font[i]) : False;  
         }  
255    
256          return res;          out_uint16_le(s, 1);    /* OS major type */
257            out_uint16_le(s, 3);    /* OS minor type */
258            out_uint16_le(s, 0x200);        /* Protocol version */
259            out_uint16(s, 0);       /* Pad */
260            out_uint16(s, 0);       /* Compression types */
261            out_uint16(s, 0);       /* Pad */
262            out_uint16(s, 0);       /* Update capability */
263            out_uint16(s, 0);       /* Remote unshare capability */
264            out_uint16(s, 0);       /* Compression level */
265            out_uint16(s, 0);       /* Pad */
266  }  }
267    
268  /* Parse a pointer PDU */  /* Output bitmap capability set */
269  BOOL rdp_io_pointer_pdu(STREAM s, RDP_POINTER_PDU *ptr)  static void
270    rdp_out_bitmap_caps(STREAM s)
271  {  {
272          BOOL res = True;          out_uint16_le(s, RDP_CAPSET_BITMAP);
273            out_uint16_le(s, RDP_CAPLEN_BITMAP);
         res = res ? lsb_io_uint16(s, &ptr->message) : False;  
         res = res ? lsb_io_uint16(s, &ptr->pad    ) : False;  
274    
275          switch (ptr->message)          out_uint16_le(s, 8);    /* Preferred BPP */
276          {          out_uint16(s, 1);       /* Receive 1 BPP */
277                  case RDP_POINTER_MOVE:          out_uint16(s, 1);       /* Receive 4 BPP */
278                          res = res ? lsb_io_uint16(s, &ptr->x      ) : False;          out_uint16_le(s, 1);    /* Receive 8 BPP */
279                          res = res ? lsb_io_uint16(s, &ptr->y      ) : False;          out_uint16_le(s, 800);  /* Desktop width */
280                          break;          out_uint16_le(s, 600);  /* Desktop height */
281          }          out_uint16(s, 0);       /* Pad */
282            out_uint16(s, 0);       /* Allow resize */
283          return res;          out_uint16_le(s, 1);    /* Support compression */
284            out_uint16(s, 0);       /* Unknown */
285            out_uint16_le(s, 1);    /* Unknown */
286            out_uint16(s, 0);       /* Pad */
287  }  }
288    
289  /* Parse an update PDU */  /* Output order capability set */
290  BOOL rdp_io_update_pdu(STREAM s, RDP_UPDATE_PDU *pdu)  static void
291    rdp_out_order_caps(STREAM s)
292  {  {
293          BOOL res = True;          uint8 order_caps[32];
294    
295          res = res ? lsb_io_uint16(s, &pdu->update_type) : False;          memset(order_caps, orders, 32);
         res = res ? lsb_io_uint16(s, &pdu->pad        ) : False;  
296    
297          return res;          out_uint16_le(s, RDP_CAPSET_ORDER);
298  }          out_uint16_le(s, RDP_CAPLEN_ORDER);
299    
300            out_uint8s(s, 20);      /* Terminal desc, pad */
301  /* PRIMARY ORDERS */          out_uint16_le(s, 1);    /* Cache X granularity */
302            out_uint16_le(s, 20);   /* Cache Y granularity */
303  /* Parse an destination blt order */          out_uint16(s, 0);       /* Pad */
304  BOOL rdp_io_destblt_order(STREAM s, DESTBLT_ORDER *os, uint32 present, BOOL delta)          out_uint16_le(s, 1);    /* Max order level */
305  {          out_uint16_le(s, 0x147);        /* Number of fonts */
306          if (present & 0x01)          out_uint16_le(s, 0x2a); /* Capability flags */
307                  rdp_io_coord(s, &os->x, delta);          out_uint8p(s, order_caps, 32);  /* Orders supported */
308            out_uint16_le(s, 0x6a1);        /* Text capability flags */
309          if (present & 0x02)          out_uint8s(s, 6);       /* Pad */
310                  rdp_io_coord(s, &os->y, delta);          out_uint32(s, 0x38400); /* Desktop cache size */
311            out_uint32(s, 0);       /* Unknown */
312          if (present & 0x04)          out_uint32(s, 0x4e4);   /* Unknown */
                 rdp_io_coord(s, &os->cx, delta);  
   
         if (present & 0x08)  
                 rdp_io_coord(s, &os->cy, delta);  
   
         if (present & 0x10)  
                 prs_io_uint8(s, &os->opcode);  
   
         return PRS_ERROR(s);  
313  }  }
314    
315  /* Parse an pattern blt order */  /* Output bitmap cache capability set */
316  BOOL rdp_io_patblt_order(STREAM s, PATBLT_ORDER *os, uint32 present, BOOL delta)  static void
317    rdp_out_bmpcache_caps(STREAM s)
318  {  {
319          if (present & 0x0001)          out_uint16_le(s, RDP_CAPSET_BMPCACHE);
320                  rdp_io_coord(s, &os->x, delta);          out_uint16_le(s, RDP_CAPLEN_BMPCACHE);
   
         if (present & 0x0002)  
                 rdp_io_coord(s, &os->y, delta);  
   
         if (present & 0x0004)  
                 rdp_io_coord(s, &os->cx, delta);  
   
         if (present & 0x0008)  
                 rdp_io_coord(s, &os->cy, delta);  
   
         if (present & 0x0010)  
                 prs_io_uint8(s, &os->opcode);  
321    
322          if (present & 0x0020)          out_uint8s(s, 24);      /* unused */
323                  rdp_io_colour(s, &os->bgcolour);          out_uint16_le(s, 0x258);        /* entries */
324            out_uint16_le(s, 0x100);        /* max cell size */
325          if (present & 0x0040)          out_uint16_le(s, 0x12c);        /* entries */
326                  rdp_io_colour(s, &os->fgcolour);          out_uint16_le(s, 0x400);        /* max cell size */
327            out_uint16_le(s, 0x106);        /* entries */
328          rdp_io_brush(s, &os->brush, present >> 7);          out_uint16_le(s, 0x1000);       /* max cell size */
   
         return PRS_ERROR(s);  
329  }  }
330    
331  /* Parse an screen blt order */  /* Output control capability set */
332  BOOL rdp_io_screenblt_order(STREAM s, SCREENBLT_ORDER *os, uint32 present, BOOL delta)  static void
333    rdp_out_control_caps(STREAM s)
334  {  {
335          if (present & 0x0001)          out_uint16_le(s, RDP_CAPSET_CONTROL);
336                  rdp_io_coord(s, &os->x, delta);          out_uint16_le(s, RDP_CAPLEN_CONTROL);
   
         if (present & 0x0002)  
                 rdp_io_coord(s, &os->y, delta);  
   
         if (present & 0x0004)  
                 rdp_io_coord(s, &os->cx, delta);  
   
         if (present & 0x0008)  
                 rdp_io_coord(s, &os->cy, delta);  
337    
338          if (present & 0x0010)          out_uint16(s, 0);       /* Control capabilities */
339                  prs_io_uint8(s, &os->opcode);          out_uint16(s, 0);       /* Remote detach */
340            out_uint16_le(s, 2);    /* Control interest */
341          if (present & 0x0020)          out_uint16_le(s, 2);    /* Detach interest */
                 rdp_io_coord(s, &os->srcx, delta);  
   
         if (present & 0x0040)  
                 rdp_io_coord(s, &os->srcy, delta);  
   
         return PRS_ERROR(s);  
342  }  }
343    
344  /* Parse a line order */  /* Output activation capability set */
345  BOOL rdp_io_line_order(STREAM s, LINE_ORDER *os, uint32 present, BOOL delta)  static void
346    rdp_out_activate_caps(STREAM s)
347  {  {
348          if (present & 0x0001)          out_uint16_le(s, RDP_CAPSET_ACTIVATE);
349                  lsb_io_uint16(s, &os->mixmode);          out_uint16_le(s, RDP_CAPLEN_ACTIVATE);
   
         if (present & 0x0002)  
                 rdp_io_coord(s, &os->startx, delta);  
   
         if (present & 0x0004)  
                 rdp_io_coord(s, &os->starty, delta);  
350    
351          if (present & 0x0008)          out_uint16(s, 0);       /* Help key */
352                  rdp_io_coord(s, &os->endx, delta);          out_uint16(s, 0);       /* Help index key */
353            out_uint16(s, 0);       /* Extended help key */
354          if (present & 0x0010)          out_uint16(s, 0);       /* Window activate */
                 rdp_io_coord(s, &os->endy, delta);  
   
         if (present & 0x0020)  
                 rdp_io_colour(s, &os->bgcolour);  
   
         if (present & 0x0040)  
                 prs_io_uint8(s, &os->opcode);  
   
         rdp_io_pen(s, &os->pen, present >> 7);  
   
         return PRS_ERROR(s);  
355  }  }
356    
357  /* Parse an opaque rectangle order */  /* Output pointer capability set */
358  BOOL rdp_io_rect_order(STREAM s, RECT_ORDER *os, uint32 present, BOOL delta)  static void
359    rdp_out_pointer_caps(STREAM s)
360  {  {
361          if (present & 0x01)          out_uint16_le(s, RDP_CAPSET_POINTER);
362                  rdp_io_coord(s, &os->x, delta);          out_uint16_le(s, RDP_CAPLEN_POINTER);
   
         if (present & 0x02)  
                 rdp_io_coord(s, &os->y, delta);  
363    
364          if (present & 0x04)          out_uint16(s, 0);       /* Colour pointer */
365                  rdp_io_coord(s, &os->cx, delta);          out_uint16_le(s, 20);   /* Cache size */
   
         if (present & 0x08)  
                 rdp_io_coord(s, &os->cy, delta);  
   
         if (present & 0x10)  
                 prs_io_uint8(s, &os->colour);  
   
         return PRS_ERROR(s);  
366  }  }
367    
368  /* Parse a desktop save order */  /* Output share capability set */
369  BOOL rdp_io_desksave_order(STREAM s, DESKSAVE_ORDER *os, uint32 present, BOOL delta)  static void
370    rdp_out_share_caps(STREAM s)
371  {  {
372          if (present & 0x01)          out_uint16_le(s, RDP_CAPSET_SHARE);
373                  lsb_io_uint32(s, &os->offset);          out_uint16_le(s, RDP_CAPLEN_SHARE);
   
         if (present & 0x02)  
                 rdp_io_coord(s, &os->left, delta);  
   
         if (present & 0x04)  
                 rdp_io_coord(s, &os->top, delta);  
   
         if (present & 0x08)  
                 rdp_io_coord(s, &os->right, delta);  
374    
375          if (present & 0x10)          out_uint16(s, 0);       /* userid */
376                  rdp_io_coord(s, &os->bottom, delta);          out_uint16(s, 0);       /* pad */
   
         if (present & 0x20)  
                 prs_io_uint8(s, &os->action);  
   
         return PRS_ERROR(s);  
377  }  }
378    
379  /* Parse a memory blt order */  /* Output colour cache capability set */
380  BOOL rdp_io_memblt_order(STREAM s, MEMBLT_ORDER *os, uint32 present, BOOL delta)  static void
381    rdp_out_colcache_caps(STREAM s)
382  {  {
383          if (present & 0x0001)          out_uint16_le(s, RDP_CAPSET_COLCACHE);
384          {          out_uint16_le(s, RDP_CAPLEN_COLCACHE);
                 prs_io_uint8(s, &os->cache_id);  
                 prs_io_uint8(s, &os->colour_table);  
         }  
   
         if (present & 0x0002)  
                 rdp_io_coord(s, &os->x, delta);  
   
         if (present & 0x0004)  
                 rdp_io_coord(s, &os->y, delta);  
   
         if (present & 0x0008)  
                 rdp_io_coord(s, &os->cx, delta);  
   
         if (present & 0x0010)  
                 rdp_io_coord(s, &os->cy, delta);  
   
         if (present & 0x0020)  
                 prs_io_uint8(s, &os->opcode);  
   
         if (present & 0x0040)  
                 rdp_io_coord(s, &os->srcx, delta);  
   
         if (present & 0x0080)  
                 rdp_io_coord(s, &os->srcy, delta);  
385    
386          if (present & 0x0100)          out_uint16_le(s, 6);    /* cache size */
387                  lsb_io_uint16(s, &os->cache_idx);          out_uint16(s, 0);       /* pad */
   
         return PRS_ERROR(s);  
388  }  }
389    
390  /* Parse a 3-way blt order */  static uint8 canned_caps[] = {
391  BOOL rdp_io_triblt_order(STREAM s, TRIBLT_ORDER *os, uint32 present, BOOL delta)          0x01, 0x00, 0x00, 0x00, 0x09, 0x04, 0x00, 0x00, 0x04,
392  {          0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00,
393          if (present & 0x000001)          0x00, 0x00, 0x00, 0x00, 0x00,
394          {          0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
395                  prs_io_uint8(s, &os->cache_id);          0x00, 0x00, 0x00, 0x00, 0x00,
396                  prs_io_uint8(s, &os->colour_table);          0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
397          }          0x00, 0x00, 0x00, 0x00, 0x00,
398            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
399          if (present & 0x000002)          0x00, 0x00, 0x00, 0x00, 0x00,
400                  rdp_io_coord(s, &os->x, delta);          0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
401            0x0C, 0x00, 0x08, 0x00, 0x01,
402          if (present & 0x000004)          0x00, 0x00, 0x00, 0x0E, 0x00, 0x08, 0x00, 0x01, 0x00, 0x00, 0x00,
403                  rdp_io_coord(s, &os->y, delta);          0x10, 0x00, 0x34, 0x00, 0xFE,
404            0x00, 0x04, 0x00, 0xFE, 0x00, 0x04, 0x00, 0xFE, 0x00, 0x08, 0x00,
405          if (present & 0x000008)          0xFE, 0x00, 0x08, 0x00, 0xFE,
406                  rdp_io_coord(s, &os->cx, delta);          0x00, 0x10, 0x00, 0xFE, 0x00, 0x20, 0x00, 0xFE, 0x00, 0x40, 0x00,
407            0xFE, 0x00, 0x80, 0x00, 0xFE,
408          if (present & 0x000010)          0x00, 0x00, 0x01, 0x40, 0x00, 0x00, 0x08, 0x00, 0x01, 0x00, 0x01,
409                  rdp_io_coord(s, &os->cy, delta);          0x02, 0x00, 0x00, 0x00
410    };
         if (present & 0x000020)  
                 prs_io_uint8(s, &os->opcode);  
   
         if (present & 0x000040)  
                 rdp_io_coord(s, &os->srcx, delta);  
   
         if (present & 0x000080)  
                 rdp_io_coord(s, &os->srcy, delta);  
   
         if (present & 0x000100)  
                 rdp_io_colour(s, &os->bgcolour);  
   
         if (present & 0x000200)  
                 rdp_io_colour(s, &os->fgcolour);  
   
         rdp_io_brush(s, &os->brush, present >> 10);  
   
         if (present & 0x008000)  
                 lsb_io_uint16(s, &os->cache_idx);  
411    
412          if (present & 0x010000)  /* Output unknown capability set */
413                  lsb_io_uint16(s, &os->unknown);  static void
414    rdp_out_unknown_caps(STREAM s)
415    {
416            out_uint16_le(s, RDP_CAPSET_UNKNOWN);
417            out_uint16_le(s, 0x58);
418    
419          return PRS_ERROR(s);          out_uint8p(s, canned_caps, RDP_CAPLEN_UNKNOWN - 4);
420  }  }
421    
422  /* Parse a text order */  /* Send a confirm active PDU */
423  BOOL rdp_io_text2_order(STREAM s, TEXT2_ORDER *os, uint32 present, BOOL delta)  static void
424    rdp_send_confirm_active()
425  {  {
426          if (present & 0x000001)          STREAM s;
427                  prs_io_uint8(s, &os->font);          uint16 caplen =
428                    RDP_CAPLEN_GENERAL + RDP_CAPLEN_BITMAP + RDP_CAPLEN_ORDER +
429          if (present & 0x000002)                  RDP_CAPLEN_BMPCACHE + RDP_CAPLEN_COLCACHE +
430                  prs_io_uint8(s, &os->flags);                  RDP_CAPLEN_ACTIVATE + RDP_CAPLEN_CONTROL +
431                    RDP_CAPLEN_POINTER + RDP_CAPLEN_SHARE + RDP_CAPLEN_UNKNOWN;
         if (present & 0x000004)  
                 prs_io_uint8(s, &os->unknown);  
   
         if (present & 0x000008)  
                 prs_io_uint8(s, &os->mixmode);  
   
         if (present & 0x000010)  
                 rdp_io_colour(s, &os->fgcolour);  
   
         if (present & 0x000020)  
                 rdp_io_colour(s, &os->bgcolour);  
   
         if (present & 0x000040)  
                 lsb_io_uint16(s, &os->clipleft);  
432    
433          if (present & 0x000080)          s = rdp_init(14 + caplen + sizeof(RDP_SOURCE));
                 lsb_io_uint16(s, &os->cliptop);  
434    
435          if (present & 0x000100)          out_uint32_le(s, rdp_shareid);
436                  lsb_io_uint16(s, &os->clipright);          out_uint16_le(s, 0x3ea);        /* userid */
437            out_uint16_le(s, sizeof(RDP_SOURCE));
438            out_uint16_le(s, caplen);
439    
440          if (present & 0x000200)          out_uint8p(s, RDP_SOURCE, sizeof(RDP_SOURCE));
441                  lsb_io_uint16(s, &os->clipbottom);          out_uint16_le(s, 0xd);  /* num_caps */
442            out_uint8s(s, 2);       /* pad */
443    
444          if (present & 0x000400)          rdp_out_general_caps(s);
445                  lsb_io_uint16(s, &os->boxleft);          rdp_out_bitmap_caps(s);
446            rdp_out_order_caps(s);
447            rdp_out_bmpcache_caps(s);
448            rdp_out_colcache_caps(s);
449            rdp_out_activate_caps(s);
450            rdp_out_control_caps(s);
451            rdp_out_pointer_caps(s);
452            rdp_out_share_caps(s);
453            rdp_out_unknown_caps(s);
454    
455          if (present & 0x000800)          s_mark_end(s);
456                  lsb_io_uint16(s, &os->boxtop);          rdp_send(s, RDP_PDU_CONFIRM_ACTIVE);
   
         if (present & 0x001000)  
                 lsb_io_uint16(s, &os->boxright);  
   
         if (present & 0x002000)  
                 lsb_io_uint16(s, &os->boxbottom);  
   
         if (present & 0x080000)  
                 lsb_io_uint16(s, &os->x);  
   
         if (present & 0x100000)  
                 lsb_io_uint16(s, &os->y);  
   
         if (present & 0x200000)  
         {  
                 prs_io_uint8(s, &os->length);  
                 prs_io_uint8s(s, os->text, os->length);  
         }  
   
         return PRS_ERROR(s);  
 }  
   
   
 /* SECONDARY ORDERS */  
   
 BOOL rdp_io_secondary_order(STREAM s, RDP_SECONDARY_ORDER *rso)  
 {  
         BOOL res = True;  
   
         res = res ? lsb_io_uint16(s, &rso->length) : False;  
         res = res ? lsb_io_uint16(s, &rso->flags ) : False;  
         res = res ? prs_io_uint8 (s, &rso->type  ) : False;  
   
         return res;  
457  }  }
458    
459  BOOL rdp_io_raw_bmpcache_order(STREAM s, RDP_RAW_BMPCACHE_ORDER *rbo)  /* Respond to a demand active PDU */
460    static void
461    process_demand_active(STREAM s)
462  {  {
463          BOOL res = True;          uint8 type;
464    
465          res = res ? prs_io_uint8 (s, &rbo->cache_id  ) : False;          in_uint32_le(s, rdp_shareid);
         res = res ? prs_io_uint8 (s, &rbo->pad1      ) : False;  
         res = res ? prs_io_uint8 (s, &rbo->width     ) : False;  
         res = res ? prs_io_uint8 (s, &rbo->height    ) : False;  
         res = res ? prs_io_uint8 (s, &rbo->bpp       ) : False;  
         res = res ? lsb_io_uint16(s, &rbo->bufsize   ) : False;  
         res = res ? lsb_io_uint16(s, &rbo->cache_idx ) : False;  
466    
467          rbo->data = s->data + s->offset;          DEBUG("DEMAND_ACTIVE(id=0x%x)\n", rdp_shareid);
         s->offset += rbo->bufsize;  
468    
469          return res;          rdp_send_confirm_active();
470            rdp_send_synchronise();
471            rdp_send_control(RDP_CTL_COOPERATE);
472            rdp_send_control(RDP_CTL_REQUEST_CONTROL);
473            rdp_recv(&type);        // RDP_PDU_SYNCHRONIZE
474            rdp_recv(&type);        // RDP_CTL_COOPERATE
475            rdp_recv(&type);        // RDP_CTL_GRANT_CONTROL
476            rdp_send_input(0, RDP_INPUT_SYNCHRONIZE, 0, 0, 0);
477            rdp_send_fonts(1);
478            rdp_send_fonts(2);
479            rdp_recv(&type);        // RDP_PDU_UNKNOWN 0x28
480            reset_order_state();
481  }  }
482    
483  BOOL rdp_io_bmpcache_order(STREAM s, RDP_BMPCACHE_ORDER *rbo)  /* Process a pointer PDU */
484    static void
485    process_pointer_pdu(STREAM s)
486  {  {
487          BOOL res = True;          uint16 message_type;
488            uint16 x, y;
489    
490          res = res ? prs_io_uint8 (s, &rbo->cache_id  ) : False;          in_uint16_le(s, message_type);
491          res = res ? prs_io_uint8 (s, &rbo->pad1      ) : False;          in_uint8s(s, 2);        /* pad */
         res = res ? prs_io_uint8 (s, &rbo->width     ) : False;  
         res = res ? prs_io_uint8 (s, &rbo->height    ) : False;  
         res = res ? prs_io_uint8 (s, &rbo->bpp       ) : False;  
         res = res ? lsb_io_uint16(s, &rbo->bufsize   ) : False;  
         res = res ? lsb_io_uint16(s, &rbo->cache_idx ) : False;  
         res = res ? lsb_io_uint16(s, &rbo->pad2      ) : False;  
         res = res ? lsb_io_uint16(s, &rbo->size      ) : False;  
         res = res ? lsb_io_uint16(s, &rbo->row_size  ) : False;  
         res = res ? lsb_io_uint16(s, &rbo->final_size) : False;  
492    
493          rbo->data = s->data + s->offset;          switch (message_type)
494          s->offset += rbo->size;          {
495                    case RDP_POINTER_MOVE:
496                            in_uint16_le(s, x);
497                            in_uint16_le(s, y);
498                            if (s_check(s))
499                                    ui_move_pointer(x, y);
500                            break;
501    
502          return res;                  default:
503                            DEBUG("Pointer message 0x%x\n", message_type);
504            }
505  }  }
506    
507  BOOL rdp_io_colcache_order(STREAM s, RDP_COLCACHE_ORDER *colours)  /* Process bitmap updates */
508    static void
509    process_bitmap_updates(STREAM s)
510  {  {
511          COLOURENTRY *entry;          uint16 num_updates;
512            uint16 left, top, right, bottom, width, height;
513            uint16 cx, cy, bpp, compress, bufsize, size;
514            uint8 *data, *rawdata;
515          int i;          int i;
516    
517          prs_io_uint8(s, &colours->cache_id);          in_uint16_le(s, num_updates);
         lsb_io_uint16(s, &colours->map.ncolours);  
518    
519          for (i = 0; i < colours->map.ncolours; i++)          for (i = 0; i < num_updates; i++)
520          {          {
521                  entry = &colours->map.colours[i];                  in_uint16_le(s, left);
522                  prs_io_uint8(s, &entry->blue);                  in_uint16_le(s, top);
523                  prs_io_uint8(s, &entry->green);                  in_uint16_le(s, right);
524                  prs_io_uint8(s, &entry->red);                  in_uint16_le(s, bottom);
525                  s->offset++;                  in_uint16_le(s, width);
526          }                  in_uint16_le(s, height);
527                    in_uint16_le(s, bpp);
528          return True;                  in_uint16_le(s, compress);
529  }                  in_uint16_le(s, bufsize);
530    
531  BOOL rdp_io_fontcache_order(STREAM s, RDP_FONTCACHE_ORDER *font)                  cx = right - left + 1;
532  {                  cy = bottom - top + 1;
         RDP_FONT_GLYPH *glyph;  
         BOOL res = True;  
         int i, j, datasize;  
         uint8 in, out;  
533    
534          res = res ? prs_io_uint8(s, &font->font   ) : False;                  DEBUG("UPDATE(l=%d,t=%d,r=%d,b=%d,w=%d,h=%d,cmp=%d)\n",
535          res = res ? prs_io_uint8(s, &font->nglyphs) : False;                        left, top, right, bottom, width, height, compress);
536    
537          for (i = 0; i < font->nglyphs; i++)                  if (!compress)
         {  
                 glyph = &font->glyphs[i];  
                 res = res ? lsb_io_uint16(s, &glyph->character) : False;  
                 res = res ? lsb_io_uint16(s, &glyph->unknown  ) : False;  
                 res = res ? lsb_io_uint16(s, &glyph->baseline ) : False;  
                 res = res ? lsb_io_uint16(s, &glyph->width    ) : False;  
                 res = res ? lsb_io_uint16(s, &glyph->height   ) : False;  
   
                 datasize = (glyph->height * ((glyph->width + 7) / 8) + 3) & ~3;  
                 res = res ? prs_io_uint8s(s, glyph->data, datasize) : False;  
                 for (j = 0; j < datasize; j++)  
538                  {                  {
539                          in = glyph->data[j];                          in_uint8p(s, data, bufsize);
540                          out = 0;                          ui_paint_bitmap(left, top, cx, cy, width, height,
541                          if (in & 1) out |= 128;                                          data);
542                          if (in & 2) out |= 64;                          return;
                         if (in & 4) out |= 32;  
                         if (in & 8) out |= 16;  
                         if (in & 16) out |= 8;  
                         if (in & 32) out |= 4;  
                         if (in & 64) out |= 2;  
                         if (in & 128) out |= 1;  
                         glyph->data[j] = out;  
543                  }                  }
         }  
   
         return res;  
 }  
   
544    
545  /* CAPABILITIES */                  in_uint8s(s, 2);        /* pad */
546                    in_uint16_le(s, size);
547                    in_uint8s(s, 4);        /* line_size, final_size */
548                    in_uint8p(s, data, size);
549    
550  /* Construct a general capability set */                  rawdata = xmalloc(width * height);
551  void rdp_make_general_caps(RDP_GENERAL_CAPS *caps)                  if (bitmap_decompress(rawdata, width, height, data, size))
552  {                  {
553          caps->os_major_type = 1;                          ui_paint_bitmap(left, top, cx, cy, width, height,
554          caps->os_minor_type = 3;                                          rawdata);
555          caps->ver_protocol = 0x200;                  }
 }  
   
 /* Parse general capability set */  
 BOOL rdp_io_general_caps(STREAM s, RDP_GENERAL_CAPS *caps)  
 {  
         uint16 length = RDP_CAPLEN_GENERAL;  
         uint16 pkt_length = length;  
         BOOL res;  
   
         res = lsb_io_uint16(s, &pkt_length);  
         if (pkt_length != length)  
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
         }  
   
         res = res ? lsb_io_uint16(s, &caps->os_major_type ) : False;  
         res = res ? lsb_io_uint16(s, &caps->os_minor_type ) : False;  
         res = res ? lsb_io_uint16(s, &caps->ver_protocol  ) : False;  
         res = res ? lsb_io_uint16(s, &caps->pad1          ) : False;  
         res = res ? lsb_io_uint16(s, &caps->compress_types) : False;  
         res = res ? lsb_io_uint16(s, &caps->pad2          ) : False;  
         res = res ? lsb_io_uint16(s, &caps->cap_update    ) : False;  
         res = res ? lsb_io_uint16(s, &caps->remote_unshare) : False;  
         res = res ? lsb_io_uint16(s, &caps->compress_level) : False;  
         res = res ? lsb_io_uint16(s, &caps->pad3          ) : False;  
   
         return res;  
 }  
   
 /* Construct a bitmap capability set */  
 void rdp_make_bitmap_caps(RDP_BITMAP_CAPS *caps, int width, int height)  
 {  
         caps->preferred_bpp = 8;  
         caps->receive1bpp = 1;  
         caps->receive4bpp = 1;  
         caps->receive8bpp = 1;  
         caps->width = width;  
         caps->height = height;  
         caps->compression = 1;  
         caps->unknown2 = 1;  
 }  
   
 /* Parse bitmap capability set */  
 BOOL rdp_io_bitmap_caps(STREAM s, RDP_BITMAP_CAPS *caps)  
 {  
         uint16 length = RDP_CAPLEN_BITMAP;  
         uint16 pkt_length = length;  
         BOOL res;  
   
         res = lsb_io_uint16(s, &pkt_length);  
         if (pkt_length != length)  
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
         }  
   
         res = res ? lsb_io_uint16(s, &caps->preferred_bpp) : False;  
         res = res ? lsb_io_uint16(s, &caps->receive1bpp  ) : False;  
         res = res ? lsb_io_uint16(s, &caps->receive4bpp  ) : False;  
         res = res ? lsb_io_uint16(s, &caps->receive8bpp  ) : False;  
         res = res ? lsb_io_uint16(s, &caps->width        ) : False;  
         res = res ? lsb_io_uint16(s, &caps->height       ) : False;  
         res = res ? lsb_io_uint16(s, &caps->pad1         ) : False;  
         res = res ? lsb_io_uint16(s, &caps->allow_resize ) : False;  
         res = res ? lsb_io_uint16(s, &caps->compression  ) : False;  
         res = res ? lsb_io_uint16(s, &caps->unknown1     ) : False;  
         res = res ? lsb_io_uint16(s, &caps->unknown2     ) : False;  
         res = res ? lsb_io_uint16(s, &caps->pad2         ) : False;  
   
         return res;  
 }  
   
 /* Construct an order capability set */  
 void rdp_make_order_caps(RDP_ORDER_CAPS *caps)  
 {  
         caps->xgranularity = 1;  
         caps->ygranularity = 20;  
         caps->max_order_level = 1;  
         caps->num_fonts = 0x147;  
         caps->cap_flags = 0x2A;  
   
 //      caps->cap_flags = ORDER_CAP_NEGOTIATE | ORDER_CAP_NOSUPPORT;  
   
         caps->support[0] = caps->support[1] = caps->support[2]  
                 = caps->support[3] = caps->support[4] = caps->support[5]  
                 = caps->support[6] = caps->support[8] = caps->support[11]  
                 = caps->support[12] = caps->support[22] = caps->support[28]  
                 = caps->support[29] = caps->support[30] = 1;  
         caps->text_cap_flags = 0x6A1;  
         caps->desk_save_size = 0x38400;  
         caps->unknown2 = 0x4E4;  
 }  
   
 /* Parse order capability set */  
 BOOL rdp_io_order_caps(STREAM s, RDP_ORDER_CAPS *caps)  
 {  
         uint16 length = RDP_CAPLEN_ORDER;  
         uint16 pkt_length = length;  
         BOOL res;  
556    
557          res = lsb_io_uint16(s, &pkt_length);                  xfree(rawdata);
         if (pkt_length != length)  
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
558          }          }
   
         res = res ? prs_io_uint8s(s,  caps->terminal_desc, 16) : False;  
         res = res ? lsb_io_uint32(s, &caps->pad1             ) : False;  
         res = res ? lsb_io_uint16(s, &caps->xgranularity     ) : False;  
         res = res ? lsb_io_uint16(s, &caps->ygranularity     ) : False;  
         res = res ? lsb_io_uint16(s, &caps->pad2             ) : False;  
         res = res ? lsb_io_uint16(s, &caps->max_order_level  ) : False;  
         res = res ? lsb_io_uint16(s, &caps->num_fonts        ) : False;  
         res = res ? lsb_io_uint16(s, &caps->cap_flags        ) : False;  
         res = res ? prs_io_uint8s(s,  caps->support      , 32) : False;  
         res = res ? lsb_io_uint16(s, &caps->text_cap_flags   ) : False;  
         res = res ? lsb_io_uint16(s, &caps->pad3             ) : False;  
         res = res ? lsb_io_uint32(s, &caps->pad4             ) : False;  
         res = res ? lsb_io_uint32(s, &caps->desk_save_size   ) : False;  
         res = res ? lsb_io_uint32(s, &caps->unknown1         ) : False;  
         res = res ? lsb_io_uint32(s, &caps->unknown2         ) : False;  
   
         return res;  
 }  
   
 /* Construct a bitmap cache capability set */  
 void rdp_make_bmpcache_caps(RDP_BMPCACHE_CAPS *caps)  
 {  
         caps->caches[0].entries = 0x258;  
         caps->caches[0].max_cell_size = 0x100;  
         caps->caches[1].entries = 0x12c;  
         caps->caches[1].max_cell_size = 0x400;  
         caps->caches[2].entries = 0x106;  
         caps->caches[2].max_cell_size = 0x1000;  
559  }  }
560    
561  /* Parse single bitmap cache information structure */  /* Process a palette update */
562  BOOL rdp_io_bmpcache_info(STREAM s, RDP_BMPCACHE_INFO *info)  static void
563    process_palette(STREAM s)
564  {  {
565          if (!lsb_io_uint16(s, &info->entries      ))          HCOLOURMAP hmap;
566                  return False;          COLOURMAP map;
567    
568          if (!lsb_io_uint16(s, &info->max_cell_size))          in_uint8s(s, 2);        /* pad */
569                  return False;          in_uint16_le(s, map.ncolours);
570            in_uint8s(s, 2);        /* pad */
571            in_uint8p(s, (uint8 *) map.colours, (map.ncolours * 3));
572    
573          return True;          hmap = ui_create_colourmap(&map);
574            ui_set_colourmap(hmap);
575  }  }
576    
577  /* Parse bitmap cache capability set */  /* Process an update PDU */
578  BOOL rdp_io_bmpcache_caps(STREAM s, RDP_BMPCACHE_CAPS *caps)  static void
579    process_update_pdu(STREAM s)
580  {  {
581          uint16 length = RDP_CAPLEN_BMPCACHE;          uint16 update_type;
         uint16 pkt_length = length;  
         BOOL res;  
         int i;  
582    
583          res = lsb_io_uint16(s, &pkt_length);          in_uint16_le(s, update_type);
         if (pkt_length != length)  
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
         }  
584    
585          for (i = 0; i < 6; i++)          switch (update_type)
586                  res = res ? lsb_io_uint32(s, &caps->unused[i]) : False;          {
587                    case RDP_UPDATE_ORDERS:
588          for (i = 0; i < 3; i++)                          process_orders(s);
589                  res = res ? rdp_io_bmpcache_info(s, &caps->caches[i]) : False;                          break;
590    
591          return res;                  case RDP_UPDATE_BITMAP:
592  }                          process_bitmap_updates(s);
593                            break;
594    
595  /* Construct a control capability set */                  case RDP_UPDATE_PALETTE:
596  void rdp_make_control_caps(RDP_CONTROL_CAPS *caps)                          process_palette(s);
597  {                          break;
         caps->control_interest = 2;  
         caps->detach_interest = 2;  
 }  
598    
599  /* Parse control capability set */                  case RDP_UPDATE_SYNCHRONIZE:
600  BOOL rdp_io_control_caps(STREAM s, RDP_CONTROL_CAPS *caps)                          break;
 {  
         uint16 length = RDP_CAPLEN_CONTROL;  
         uint16 pkt_length = length;  
         BOOL res;  
601    
602          res = lsb_io_uint16(s, &pkt_length);                  default:
603          if (pkt_length != length)                          NOTIMP("update %d\n", update_type);
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
604          }          }
605    
         res = res ? lsb_io_uint16(s, &caps->control_caps    ) : False;  
         res = res ? lsb_io_uint16(s, &caps->remote_detach   ) : False;  
         res = res ? lsb_io_uint16(s, &caps->control_interest) : False;  
         res = res ? lsb_io_uint16(s, &caps->detach_interest ) : False;  
   
         return res;  
606  }  }
607    
608  /* Construct an activation capability set */  /* Process data PDU */
609  void rdp_make_activate_caps(RDP_ACTIVATE_CAPS *caps)  static void
610    process_data_pdu(STREAM s)
611  {  {
612  }          uint8 data_pdu_type;
613    
614  /* Parse activation capability set */          in_uint8s(s, 8);        /* shareid, pad, streamid, length */
615  BOOL rdp_io_activate_caps(STREAM s, RDP_ACTIVATE_CAPS *caps)          in_uint8(s, data_pdu_type);
616  {          in_uint8s(s, 3);        /* compress_type, compress_len */
         uint16 length = RDP_CAPLEN_ACTIVATE;  
         uint16 pkt_length = length;  
         BOOL res;  
617    
618          res = lsb_io_uint16(s, &pkt_length);          switch (data_pdu_type)
         if (pkt_length != length)  
619          {          {
620                  ERROR("Unrecognised capabilities size\n");                  case RDP_DATA_PDU_UPDATE:
621                  return False;                          process_update_pdu(s);
622          }                          break;
   
         res = res ? lsb_io_uint16(s, &caps->help_key         ) : False;  
         res = res ? lsb_io_uint16(s, &caps->help_index_key   ) : False;  
         res = res ? lsb_io_uint16(s, &caps->help_extended_key) : False;  
         res = res ? lsb_io_uint16(s, &caps->window_activate  ) : False;  
623    
624          return res;                  case RDP_DATA_PDU_POINTER:
625  }                          process_pointer_pdu(s);
626                            break;
627    
628  /* Construct a pointer capability set */                  case RDP_DATA_PDU_BELL:
629  void rdp_make_pointer_caps(RDP_POINTER_CAPS *caps)                          ui_bell();
630  {                          break;
         caps->colour_pointer = 0;  
         caps->cache_size = 20;  
 }  
631    
632  /* Parse pointer capability set */                  case RDP_DATA_PDU_LOGON:
633  BOOL rdp_io_pointer_caps(STREAM s, RDP_POINTER_CAPS *caps)                          /* User logged on */
634  {                          break;
         uint16 length = RDP_CAPLEN_POINTER;  
         uint16 pkt_length = length;  
         BOOL res;  
635    
636          res = lsb_io_uint16(s, &pkt_length);                  default:
637          if (pkt_length != length)                          NOTIMP("data PDU %d\n", data_pdu_type);
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
638          }          }
   
         res = res ? lsb_io_uint16(s, &caps->colour_pointer) : False;  
         res = res ? lsb_io_uint16(s, &caps->cache_size    ) : False;  
   
         return res;  
639  }  }
640    
641  /* Construct a share capability set */  /* Process incoming packets */
642  void rdp_make_share_caps(RDP_SHARE_CAPS *caps, uint16 userid)  void
643    rdp_main_loop()
644  {  {
645  }          uint8 type;
646            STREAM s;
647    
648  /* Parse share capability set */          while ((s = rdp_recv(&type)) != NULL)
 BOOL rdp_io_share_caps(STREAM s, RDP_SHARE_CAPS *caps)  
 {  
         uint16 length = RDP_CAPLEN_SHARE;  
         uint16 pkt_length = length;  
         BOOL res;  
   
         res = lsb_io_uint16(s, &pkt_length);  
         if (pkt_length != length)  
649          {          {
650                  ERROR("Unrecognised capabilities size\n");                  switch (type)
651                  return False;                  {
652          }                          case RDP_PDU_DEMAND_ACTIVE:
653                                    process_demand_active(s);
654                                    break;
655    
656          res = res ? lsb_io_uint16(s, &caps->userid) : False;                          case RDP_PDU_DEACTIVATE:
657          res = res ? lsb_io_uint16(s, &caps->pad   ) : False;                                  break;
658    
659          return res;                          case RDP_PDU_DATA:
660  }                                  process_data_pdu(s);
661                                    break;
662    
663  /* Construct a colour cache capability set */                          default:
664  void rdp_make_colcache_caps(RDP_COLCACHE_CAPS *caps)                                  NOTIMP("PDU %d\n", type);
665  {                  }
666          caps->cache_size = 6;          }
667  }  }
668    
669  /* Parse colour cache capability set */  /* Establish a connection up to the RDP layer */
670  BOOL rdp_io_colcache_caps(STREAM s, RDP_COLCACHE_CAPS *caps)  BOOL
671    rdp_connect(char *server, uint32 flags, char *domain, char *password,
672                char *command, char *directory)
673  {  {
674          uint16 length = RDP_CAPLEN_COLCACHE;          if (!sec_connect(server))
         uint16 pkt_length = length;  
         BOOL res;  
   
         res = lsb_io_uint16(s, &pkt_length);  
         if (pkt_length != length)  
         {  
                 ERROR("Unrecognised capabilities size\n");  
675                  return False;                  return False;
         }  
676    
677          res = res ? lsb_io_uint16(s, &caps->cache_size) : False;          rdp_send_logon_info(flags, domain, username, password,
678          res = res ? lsb_io_uint16(s, &caps->pad       ) : False;                              command, directory);
679            return True;
         return res;  
680  }  }
681    
682  uint8 canned_caps[] = {  /* Disconnect from the RDP layer */
683  0x01,0x00,0x00,0x00,0x09,0x04,0x00,0x00,0x04,  void
684  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0C,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  rdp_disconnect()
 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  
 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  
 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,  
 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0C,0x00,0x08,0x00,0x01,  
 0x00,0x00,0x00,0x0E,0x00,0x08,0x00,0x01,0x00,0x00,0x00,0x10,0x00,0x34,0x00,0xFE,  
 0x00,0x04,0x00,0xFE,0x00,0x04,0x00,0xFE,0x00,0x08,0x00,0xFE,0x00,0x08,0x00,0xFE,  
 0x00,0x10,0x00,0xFE,0x00,0x20,0x00,0xFE,0x00,0x40,0x00,0xFE,0x00,0x80,0x00,0xFE,  
 0x00,0x00,0x01,0x40,0x00,0x00,0x08,0x00,0x01,0x00,0x01,0x02,0x00,0x00,0x00  
 };  
   
 /* Insert canned capabilities */  
 BOOL rdp_io_unknown_caps(STREAM s, void *caps)  
685  {  {
686          uint16 length = 0x58;          sec_disconnect();
         uint16 pkt_length = length;  
         BOOL res;  
   
         res = lsb_io_uint16(s, &pkt_length);  
         if (pkt_length != length)  
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
         }  
   
         res = res ? prs_io_uint8s(s, canned_caps, RDP_CAPLEN_UNKNOWN-4) : False;  
   
         return res;  
687  }  }
Legend:
Removed from v.9  
changed lines
  Added in v.25
  ViewVC Help
Powered by ViewVC 1.1.26