/[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 10 by matty, Tue Aug 15 10:23:24 2000 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);  
 }  
26    
27  /* Initialise RDP transport data packet */  unsigned char *next_packet;
28  void rdp_init_data(HCONN conn)  uint32 rdp_shareid;
 {  
         mcs_init_data(conn);  
         PUSH_LAYER(conn->out, rdp_offset, 18);  
 }  
29    
30  /* Transmit RDP transport data packet */  /* Initialise an RDP packet */
31  void rdp_send_data(HCONN conn, uint16 data_pdu_type)  static STREAM rdp_init(int maxlen)
32  {  {
33          RDP_HEADER hdr;          STREAM s;
         RDP_DATA_HEADER datahdr;  
         int length = conn->out.end - conn->out.offset;  
34    
35          POP_LAYER(conn->out, rdp_offset);          s = sec_init(SEC_ENCRYPT, maxlen + 6);
36          length = conn->out.end - conn->out.offset;          s_push_layer(s, rdp_hdr, 6);
         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);  
 }  
37    
38  void rdp_send_confirm_active(HCONN conn, uint32 shareid, int width, int height)          return s;
 {  
         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);  
39  }  }
40    
41  void rdp_send_synchronize(HCONN conn)  /* Send an RDP packet */
42    static void rdp_send(STREAM s, uint8 pdu_type)
43  {  {
44          RDP_SYNCHRONISE_PDU sync;          uint16 length;
   
         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);  
 }  
   
 /* Construct an RDP header */  
 void rdp_make_header(RDP_HEADER *hdr, uint16 length, uint16 pdu_type,  
                      uint16 userid)  
 {  
         hdr->length = length;  
         hdr->pdu_type = pdu_type | 0x10; /* Version 1 */  
         hdr->userid = userid + 1001;  
 }  
   
 /* Parse an RDP header */  
 BOOL rdp_io_header(STREAM s, RDP_HEADER *hdr)  
 {  
         BOOL res = True;  
45    
46          res = res ? lsb_io_uint16(s, &hdr->length  ) : False;          s_pop_layer(s, rdp_hdr);
47          res = res ? lsb_io_uint16(s, &hdr->pdu_type) : False;          length = s->end - s->p;
         if ((hdr->pdu_type & 0xf) != RDP_PDU_DEACTIVATE)  
                 res = res ? lsb_io_uint16(s, &hdr->userid  ) : False;  
48    
49          return res;          out_uint16_le(s, length);
50  }          out_uint16_le(s, (pdu_type | 0x10)); /* Version 1 */
51            out_uint16_le(s, (mcs_userid + 1001));
52    
53  /* Construct a data header */          sec_send(s, SEC_ENCRYPT);
 void rdp_make_data_header(RDP_DATA_HEADER *hdr, uint32 shareid,  
                           uint16 length, uint16 data_pdu_type)  
 {  
         hdr->shareid = shareid;  
         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;  
54  }  }
55    
56  /* Parse a data header */  /* Receive an RDP packet */
57  BOOL rdp_io_data_header(STREAM s, RDP_DATA_HEADER *hdr)  static STREAM rdp_recv(uint8 *type)
58  {  {
59          BOOL res = True;          static STREAM rdp_s;
60            uint16 length, pdu_type;
         res = res ? lsb_io_uint32(s, &hdr->shareid      ) : False;  
         res = res ? prs_io_uint8 (s, &hdr->pad          ) : False;  
         res = res ? prs_io_uint8 (s, &hdr->streamid     ) : False;  
         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;  
61    
62          return res;          if ((rdp_s == NULL) || (next_packet >= rdp_s->end))
 }  
   
 BOOL rdp_io_present(STREAM s, uint32 *present, uint8 flags, int size)  
 {  
         uint8 bits;  
         int i;  
   
         if (flags & RDP_ORDER_SMALL)  
         {  
                 size--;  
         }  
   
         if (flags & RDP_ORDER_TINY)  
         {  
                 if (size < 2)  
                         return False;  
   
                 size -= 2;  
         }  
   
         *present = 0;  
         for (i = 0; i < size; i++)  
63          {          {
64                  prs_io_uint8(s, &bits);                  rdp_s = sec_recv();
65                  *present |= bits << (i * 8);                  if (rdp_s == NULL)
66          }                          return NULL;
   
         return True;  
 }  
   
 BOOL rdp_io_coord(STREAM s, uint16 *coord, BOOL delta)  
 {  
         uint8 change;  
         BOOL res;  
67    
68          if (delta)                  next_packet = rdp_s->p;
         {  
                 res = prs_io_uint8(s, &change);  
                 *coord += (char)change;  
69          }          }
70          else          else
71          {          {
72                  res = lsb_io_uint16(s, coord);                  rdp_s->p = next_packet;
73          }          }
74    
75          return res;          in_uint16_le(rdp_s, length);
76  }          in_uint16_le(rdp_s, pdu_type);
77            in_uint8s(rdp_s, 2); /* userid */
 BOOL rdp_io_colour(STREAM s, uint8 *colour)  
 {  
         BOOL res;  
   
         res = prs_io_uint8(s, colour);  
         s->offset += 2;  
   
         return res;  
 }  
   
 BOOL rdp_io_colourmap(STREAM s, COLOURMAP *colours)  
 {  
         int datasize;  
78    
79          lsb_io_uint16(s, &colours->ncolours);          next_packet += length;
80          datasize = colours->ncolours * 3;          *type = pdu_type & 0xf;
81    
82          if (datasize > sizeof(colours->colours))  #if RDP_DEBUG
83                  return False;          DEBUG("RDP packet (type %x):\n", *type);
84            hexdump(rdp_s->p, length);
85          memcpy(colours->colours, s->data + s->offset, datasize);  #endif
         s->offset += datasize;  
         return True;  
 }  
   
 BOOL rdp_io_bounds(STREAM s, BOUNDS *bounds)  
 {  
         uint8 present;  
   
         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);  
86    
87          return True;          return rdp_s;
88  }  }
89    
90  BOOL rdp_io_pen(STREAM s, PEN *pen, uint32 present)  /* Initialise an RDP data packet */
91    static STREAM rdp_init_data(int maxlen)
92  {  {
93          BOOL res = True;          STREAM s;
94    
95          if (present & 1)          s = sec_init(SEC_ENCRYPT, maxlen + 18);
96                  res = res ? prs_io_uint8(s, &pen->style) : False;          s_push_layer(s, rdp_hdr, 18);
97    
98          if (present & 2)          return s;
                 res = res ? prs_io_uint8(s, &pen->width) : False;  
   
         if (present & 4)  
                 res = res ? rdp_io_colour(s, &pen->colour) : False;  
   
         return res;  
99  }  }
100    
101  BOOL rdp_io_brush(STREAM s, BRUSH *brush, uint32 present)  /* Send an RDP data packet */
102    static void rdp_send_data(STREAM s, uint8 data_pdu_type)
103  {  {
104          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;  
105    
106          return res;          s_pop_layer(s, rdp_hdr);
107  }          length = s->end - s->p;
108    
109  /* Construct a confirm/demand active PDU */          out_uint16_le(s, length);
110  void rdp_make_active_pdu(RDP_ACTIVE_PDU *pdu, uint32 shareid, uint16 userid,          out_uint16_le(s, (RDP_PDU_DATA | 0x10));
111                                  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));  
112    
113          pdu->caps_len = RDP_CAPLEN_GENERAL + RDP_CAPLEN_BITMAP + RDP_CAPLEN_ORDER          out_uint32_le(s, rdp_shareid);
114                  + RDP_CAPLEN_BMPCACHE + RDP_CAPLEN_COLCACHE + RDP_CAPLEN_ACTIVATE          out_uint8(s, 0);  /* pad */
115                  + RDP_CAPLEN_CONTROL + RDP_CAPLEN_POINTER + RDP_CAPLEN_SHARE          out_uint8(s, 1);  /* streamid */
116                  + RDP_CAPLEN_UNKNOWN;          out_uint16(s, (length - 14));
117          pdu->num_caps = 0xD;          out_uint8(s, data_pdu_type);
118            out_uint8(s, 0);  /* compress_type */
119            out_uint16(s, 0); /* compress_len */
120    
121          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);  
122  }  }
123    
124  /* Parse a confirm/demand active PDU */  /* Output a string in Unicode */
125  BOOL rdp_io_active_pdu(STREAM s, RDP_ACTIVE_PDU *pdu, int pdutype)  void rdp_out_unistr(STREAM s, char *string, int len)
126  {  {
127          uint16 capset;          int i = 0, j = 0;
         uint16 length;  
         BOOL res;  
         int i;  
128    
129          res = lsb_io_uint32(s, &pdu->shareid);          len += 2;
130    
131          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)  
         {  
                 ERROR("RDP source descriptor too long\n");  
                 return False;  
         }  
   
         res = res ? prs_io_uint8s(s,  pdu->source, pdu->source_len) : False;  
         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  
132          {          {
133                  for (i = 0; i < pdu->num_caps; i++)                  s->p[i++] = string[j++];
134                  {                  s->p[i++] = 0;
                         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);  
                         }  
                 }  
135          }          }
136    
137          return res;          s->p += len;
138  }  }
139    
140  /* Construct a control PDU */  /* Parse a logon info packet */
141  void rdp_make_control_pdu(RDP_CONTROL_PDU *pdu, uint16 action)  static void rdp_send_logon_info(uint32 flags, char *domain, char *user,
142                                    char *password, char *program, char *directory)
143  {  {
144          pdu->action = action;          int len_domain    = 2 * strlen(domain);
145          pdu->userid = 0;          int len_user      = 2 * strlen(user);
146          pdu->controlid = 0;          int len_password  = 2 * strlen(password);
147  }          int len_program   = 2 * strlen(program);
148            int len_directory = 2 * strlen(directory);
149            uint32 sec_flags = SEC_LOGON_INFO | SEC_ENCRYPT;
150            STREAM s;
151    
152  /* Parse a control PDU */          s = sec_init(sec_flags, 18 + len_domain + len_user + len_password
153  BOOL rdp_io_control_pdu(STREAM s, RDP_CONTROL_PDU *pdu)                                          + len_program + len_directory + 10);
 {  
         BOOL res = True;  
154    
155          res = res ? lsb_io_uint16(s, &pdu->action   ) : False;          out_uint32(s, 0);
156          res = res ? lsb_io_uint16(s, &pdu->userid   ) : False;          out_uint32_le(s, flags);
157          res = res ? lsb_io_uint32(s, &pdu->controlid) : False;          out_uint16_le(s, len_domain);
158            out_uint16_le(s, len_user);
159            out_uint16_le(s, len_password);
160            out_uint16_le(s, len_program);
161            out_uint16_le(s, len_directory);
162            rdp_out_unistr(s, domain,    len_domain);
163            rdp_out_unistr(s, user,      len_user);
164            rdp_out_unistr(s, password,  len_password);
165            rdp_out_unistr(s, program,   len_program);
166            rdp_out_unistr(s, directory, len_directory);
167    
168          return res;          s_mark_end(s);
169            sec_send(s, sec_flags);
170  }  }
171    
172  /* Construct a synchronisation PDU */  /* Send a control PDU */
173  void rdp_make_synchronise_pdu(RDP_SYNCHRONISE_PDU *pdu, uint16 userid)  static void rdp_send_control(uint16 action)
174  {  {
175          pdu->type = 1;          STREAM s;
         pdu->userid = userid;  
 }  
176    
177  /* Parse a synchronisation PDU */          s = rdp_init_data(8);
 BOOL rdp_io_synchronise_pdu(STREAM s, RDP_SYNCHRONISE_PDU *pdu)  
 {  
         BOOL res = True;  
178    
179          res = res ? lsb_io_uint16(s, &pdu->type  ) : False;          out_uint16_le(s, action);
180          res = res ? lsb_io_uint16(s, &pdu->userid) : False;          out_uint16(s, 0); /* userid */
181            out_uint32(s, 0); /* control id */
182    
183          return res;          s_mark_end(s);
184            rdp_send_data(s, RDP_DATA_PDU_CONTROL);
185  }  }
186    
187  /* Parse a single input event */  /* Send a synchronisation PDU */
188  BOOL rdp_io_input_event(STREAM s, RDP_INPUT_EVENT *evt)  static void rdp_send_synchronise()
189  {  {
190          BOOL res = True;          STREAM s;
191    
192          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;  
193    
194          if (!res)          out_uint16_le(s, 1); /* type */
195                  return False;          out_uint16_le(s, 1002);
196    
197          switch (evt->message_type)          s_mark_end(s);
198          {          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;  
199  }  }
200    
201  /* Construct an input PDU */  /* Send a single input event */
202  void rdp_make_input_pdu(RDP_INPUT_PDU *pdu, uint16 message_type,  void rdp_send_input(uint32 time, uint16 message_type, uint16 device_flags,
203                          uint16 device_flags, uint16 param1, uint16 param2)                      uint16 param1, uint16 param2)
204  {  {
205          uint32 now = time(NULL);          STREAM s;
   
         pdu->num_events = 1;  
         pdu->pad = 0;  
206    
207          pdu->event[0].event_time = now;          s = rdp_init_data(16);
         pdu->event[0].message_type = message_type;  
         pdu->event[0].device_flags = device_flags;  
         pdu->event[0].param1 = param1;  
         pdu->event[0].param2 = param2;  
 }  
208    
209  /* Parse an input PDU */          out_uint16_le(s, 1); /* number of events */
210  BOOL rdp_io_input_pdu(STREAM s, RDP_INPUT_PDU *pdu)          out_uint16(s, 0);    /* pad */
 {  
         BOOL res = True;  
         int i;  
211    
212          res = res ? lsb_io_uint16(s, &pdu->num_events) : False;          out_uint32_le(s, time);
213          res = res ? lsb_io_uint16(s, &pdu->pad       ) : False;          out_uint16_le(s, message_type);
214            out_uint16_le(s, device_flags);
215            out_uint16_le(s, param1);
216            out_uint16_le(s, param2);
217    
218          if (pdu->num_events > RDP_MAX_EVENTS)          s_mark_end(s);
219          {          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;  
220  }  }
221    
222  /* Construct a font information PDU */  /* Send an (empty) font information PDU */
223  void rdp_make_font_pdu(RDP_FONT_PDU *pdu, uint16 seqno)  static void rdp_send_fonts(uint16 seq)
224  {  {
225          pdu->num_fonts = 0;          STREAM s;
         pdu->unknown1 = 0x3e;  
         pdu->unknown2 = seqno;  
         pdu->entry_size = RDP_FONT_INFO_SIZE;  
 }  
226    
227  /* Parse a font information structure */          s = rdp_init_data(8);
 BOOL rdp_io_font_info(STREAM s, RDP_FONT_INFO *font)  
 {  
         BOOL res = True;  
228    
229          res = res ? prs_io_uint8s(s,  font->name, 32 ) : False;          out_uint16(s, 0);       /* number of fonts */
230          res = res ? lsb_io_uint16(s, &font->flags    ) : False;          out_uint16_le(s, 0x3e); /* unknown */
231          res = res ? lsb_io_uint16(s, &font->width    ) : False;          out_uint16_le(s, seq);  /* unknown */
232          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;  
233    
234          return res;          s_mark_end(s);
235            rdp_send_data(s, RDP_DATA_PDU_FONT2);
236  }  }
237    
238  /* Parse a font information PDU */  /* Output general capability set */
239  BOOL rdp_io_font_pdu(STREAM s, RDP_FONT_PDU *pdu)  static void rdp_out_general_caps(STREAM s)
240  {  {
241          BOOL res = True;          out_uint16_le(s, RDP_CAPSET_GENERAL);
242          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;  
243    
244          if (pdu->num_fonts > RDP_MAX_FONTS)          out_uint16_le(s, 1);    /* OS major type */
245          {          out_uint16_le(s, 3);    /* OS minor type */
246                  ERROR("Too many fonts in one PDU\n");          out_uint16_le(s, 0x200); /* Protocol version */
247                  return False;          out_uint16(s, 0);       /* Pad */
248          }          out_uint16(s, 0);       /* Compression types */
249            out_uint16(s, 0);       /* Pad */
250          for (i = 0; i < pdu->num_fonts; i++)          out_uint16(s, 0);       /* Update capability */
251          {          out_uint16(s, 0);       /* Remote unshare capability */
252                  res = res ? rdp_io_font_info(s, &pdu->font[i]) : False;          out_uint16(s, 0);       /* Compression level */
253          }          out_uint16(s, 0);       /* Pad */
   
         return res;  
 }  
   
 /* Parse a pointer PDU */  
 BOOL rdp_io_pointer_pdu(STREAM s, RDP_POINTER_PDU *ptr)  
 {  
         BOOL res = True;  
   
         res = res ? lsb_io_uint16(s, &ptr->message) : False;  
         res = res ? lsb_io_uint16(s, &ptr->pad    ) : False;  
   
         switch (ptr->message)  
         {  
                 case RDP_POINTER_MOVE:  
                         res = res ? lsb_io_uint16(s, &ptr->x      ) : False;  
                         res = res ? lsb_io_uint16(s, &ptr->y      ) : False;  
                         break;  
         }  
   
         return res;  
254  }  }
255    
256  /* Parse an update PDU */  /* Output bitmap capability set */
257  BOOL rdp_io_update_pdu(STREAM s, RDP_UPDATE_PDU *pdu)  static void rdp_out_bitmap_caps(STREAM s)
258  {  {
259          BOOL res = True;          out_uint16_le(s, RDP_CAPSET_BITMAP);
260            out_uint16_le(s, RDP_CAPLEN_BITMAP);
         res = res ? lsb_io_uint16(s, &pdu->update_type) : False;  
         res = res ? lsb_io_uint16(s, &pdu->pad        ) : False;  
261    
262          return res;          out_uint16_le(s, 8);    /* Preferred BPP */
263            out_uint16(s, 1);       /* Receive 1 BPP */
264            out_uint16(s, 1);       /* Receive 4 BPP */
265            out_uint16_le(s, 1);    /* Receive 8 BPP */
266            out_uint16_le(s, 800);  /* Desktop width */
267            out_uint16_le(s, 600);  /* Desktop height */
268            out_uint16(s, 0);       /* Pad */
269            out_uint16(s, 0);       /* Allow resize */
270            out_uint16_le(s, 1);    /* Support compression */
271            out_uint16(s, 0);       /* Unknown */
272            out_uint16_le(s, 1);    /* Unknown */
273            out_uint16(s, 0);       /* Pad */
274  }  }
275    
276    /* Output order capability set */
277  /* PRIMARY ORDERS */  static void rdp_out_order_caps(STREAM s)
   
 /* Parse an destination blt order */  
 BOOL rdp_io_destblt_order(STREAM s, DESTBLT_ORDER *os, uint32 present, BOOL delta)  
278  {  {
279          if (present & 0x01)          uint8 order_caps[32];
                 rdp_io_coord(s, &os->x, delta);  
   
         if (present & 0x02)  
                 rdp_io_coord(s, &os->y, delta);  
   
         if (present & 0x04)  
                 rdp_io_coord(s, &os->cx, delta);  
280    
281          if (present & 0x08)          memset(order_caps, orders, 32);
                 rdp_io_coord(s, &os->cy, delta);  
282    
283          if (present & 0x10)          out_uint16_le(s, RDP_CAPSET_ORDER);
284                  prs_io_uint8(s, &os->opcode);          out_uint16_le(s, RDP_CAPLEN_ORDER);
285    
286          return PRS_ERROR(s);          out_uint8s(s, 20);      /* Terminal desc, pad */
287            out_uint16_le(s, 1);    /* Cache X granularity */
288            out_uint16_le(s, 20);   /* Cache Y granularity */
289            out_uint16(s, 0);       /* Pad */
290            out_uint16_le(s, 1);    /* Max order level */
291            out_uint16_le(s, 0x147);        /* Number of fonts */
292            out_uint16_le(s, 0x2a);         /* Capability flags */
293            out_uint8p(s, order_caps, 32);  /* Orders supported */
294            out_uint16_le(s, 0x6a1);        /* Text capability flags */
295            out_uint8s(s, 6);       /* Pad */
296            out_uint32(s, 0x38400); /* Desktop cache size */
297            out_uint32(s, 0);       /* Unknown */
298            out_uint32(s, 0x4e4);   /* Unknown */
299  }  }
300    
301  /* Parse an pattern blt order */  /* Output bitmap cache capability set */
302  BOOL rdp_io_patblt_order(STREAM s, PATBLT_ORDER *os, uint32 present, BOOL delta)  static void rdp_out_bmpcache_caps(STREAM s)
303  {  {
304          if (present & 0x0001)          out_uint16_le(s, RDP_CAPSET_BMPCACHE);
305                  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);  
306    
307          if (present & 0x0010)          out_uint8s(s, 24); /* unused */
308                  prs_io_uint8(s, &os->opcode);          out_uint16_le(s, 0x258); /* entries */
309            out_uint16_le(s, 0x100); /* max cell size */
310          if (present & 0x0020)          out_uint16_le(s, 0x12c); /* entries */
311                  rdp_io_colour(s, &os->bgcolour);          out_uint16_le(s, 0x400); /* max cell size */
312            out_uint16_le(s, 0x106); /* entries */
313          if (present & 0x0040)          out_uint16_le(s, 0x1000); /* max cell size */
                 rdp_io_colour(s, &os->fgcolour);  
   
         rdp_io_brush(s, &os->brush, present >> 7);  
   
         return PRS_ERROR(s);  
314  }  }
315    
316  /* Parse an screen blt order */  /* Output control capability set */
317  BOOL rdp_io_screenblt_order(STREAM s, SCREENBLT_ORDER *os, uint32 present, BOOL delta)  static void rdp_out_control_caps(STREAM s)
318  {  {
319          if (present & 0x0001)          out_uint16_le(s, RDP_CAPSET_CONTROL);
320                  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);  
321    
322          if (present & 0x0010)          out_uint16(s, 0);       /* Control capabilities */
323                  prs_io_uint8(s, &os->opcode);          out_uint16(s, 0);       /* Remote detach */
324            out_uint16_le(s, 2);    /* Control interest */
325          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);  
326  }  }
327    
328  /* Parse a line order */  /* Output activation capability set */
329  BOOL rdp_io_line_order(STREAM s, LINE_ORDER *os, uint32 present, BOOL delta)  static void rdp_out_activate_caps(STREAM s)
330  {  {
331          if (present & 0x0001)          out_uint16_le(s, RDP_CAPSET_ACTIVATE);
332                  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);  
   
         if (present & 0x0008)  
                 rdp_io_coord(s, &os->endx, delta);  
333    
334          if (present & 0x0010)          out_uint16(s, 0);       /* Help key */
335                  rdp_io_coord(s, &os->endy, delta);          out_uint16(s, 0);       /* Help index key */
336            out_uint16(s, 0);       /* Extended help key */
337          if (present & 0x0020)          out_uint16(s, 0);       /* Window activate */
                 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);  
338  }  }
339    
340  /* Parse an opaque rectangle order */  /* Output pointer capability set */
341  BOOL rdp_io_rect_order(STREAM s, RECT_ORDER *os, uint32 present, BOOL delta)  static void rdp_out_pointer_caps(STREAM s)
342  {  {
343          if (present & 0x01)          out_uint16_le(s, RDP_CAPSET_POINTER);
344                  rdp_io_coord(s, &os->x, delta);          out_uint16_le(s, RDP_CAPLEN_POINTER);
   
         if (present & 0x02)  
                 rdp_io_coord(s, &os->y, delta);  
   
         if (present & 0x04)  
                 rdp_io_coord(s, &os->cx, delta);  
345    
346          if (present & 0x08)          out_uint16(s, 0);       /* Colour pointer */
347                  rdp_io_coord(s, &os->cy, delta);          out_uint16_le(s, 20);   /* Cache size */
   
         if (present & 0x10)  
                 prs_io_uint8(s, &os->colour);  
   
         return PRS_ERROR(s);  
348  }  }
349    
350  /* Parse a desktop save order */  /* Output share capability set */
351  BOOL rdp_io_desksave_order(STREAM s, DESKSAVE_ORDER *os, uint32 present, BOOL delta)  static void rdp_out_share_caps(STREAM s)
352  {  {
353          if (present & 0x01)          out_uint16_le(s, RDP_CAPSET_SHARE);
354                  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);  
   
         if (present & 0x10)  
                 rdp_io_coord(s, &os->bottom, delta);  
355    
356          if (present & 0x20)          out_uint16(s, 0);       /* userid */
357                  prs_io_uint8(s, &os->action);          out_uint16(s, 0);       /* pad */
   
         return PRS_ERROR(s);  
358  }  }
359    
360  /* Parse a memory blt order */  /* Output colour cache capability set */
361  BOOL rdp_io_memblt_order(STREAM s, MEMBLT_ORDER *os, uint32 present, BOOL delta)  static void rdp_out_colcache_caps(STREAM s)
362  {  {
363          if (present & 0x0001)          out_uint16_le(s, RDP_CAPSET_COLCACHE);
364          {          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);  
365    
366          if (present & 0x0010)          out_uint16_le(s, 6);    /* cache size */
367                  rdp_io_coord(s, &os->cy, delta);          out_uint16(s, 0);       /* pad */
   
         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);  
   
         if (present & 0x0100)  
                 lsb_io_uint16(s, &os->cache_idx);  
   
         return PRS_ERROR(s);  
368  }  }
369    
370  /* Parse a 3-way blt order */  static uint8 canned_caps[] = {
371  BOOL rdp_io_triblt_order(STREAM s, TRIBLT_ORDER *os, uint32 present, BOOL delta)  0x01,0x00,0x00,0x00,0x09,0x04,0x00,0x00,0x04,
372  {  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0C,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
373          if (present & 0x000001)  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
374          {  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
375                  prs_io_uint8(s, &os->cache_id);  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
376                  prs_io_uint8(s, &os->colour_table);  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0C,0x00,0x08,0x00,0x01,
377          }  0x00,0x00,0x00,0x0E,0x00,0x08,0x00,0x01,0x00,0x00,0x00,0x10,0x00,0x34,0x00,0xFE,
378    0x00,0x04,0x00,0xFE,0x00,0x04,0x00,0xFE,0x00,0x08,0x00,0xFE,0x00,0x08,0x00,0xFE,
379          if (present & 0x000002)  0x00,0x10,0x00,0xFE,0x00,0x20,0x00,0xFE,0x00,0x40,0x00,0xFE,0x00,0x80,0x00,0xFE,
380                  rdp_io_coord(s, &os->x, delta);  0x00,0x00,0x01,0x40,0x00,0x00,0x08,0x00,0x01,0x00,0x01,0x02,0x00,0x00,0x00
381    };
         if (present & 0x000004)  
                 rdp_io_coord(s, &os->y, delta);  
   
         if (present & 0x000008)  
                 rdp_io_coord(s, &os->cx, delta);  
   
         if (present & 0x000010)  
                 rdp_io_coord(s, &os->cy, delta);  
   
         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);  
   
         if (present & 0x010000)  
                 lsb_io_uint16(s, &os->unknown);  
382    
383          return PRS_ERROR(s);  /* Output unknown capability set */
384    static void rdp_out_unknown_caps(STREAM s)
385    {
386            out_uint16_le(s, RDP_CAPSET_UNKNOWN);
387            out_uint16_le(s, 0x58);
388            
389            out_uint8p(s, canned_caps, RDP_CAPLEN_UNKNOWN-4);
390  }  }
391    
392  /* Parse a text order */  /* Send a confirm active PDU */
393  BOOL rdp_io_text2_order(STREAM s, TEXT2_ORDER *os, uint32 present, BOOL delta)  static void rdp_send_confirm_active()
394  {  {
395          if (present & 0x000001)          STREAM s;
396                  prs_io_uint8(s, &os->font);          uint16 caplen = RDP_CAPLEN_GENERAL + RDP_CAPLEN_BITMAP + RDP_CAPLEN_ORDER
397                    + RDP_CAPLEN_BMPCACHE + RDP_CAPLEN_COLCACHE + RDP_CAPLEN_ACTIVATE
398          if (present & 0x000002)                  + RDP_CAPLEN_CONTROL + RDP_CAPLEN_POINTER + RDP_CAPLEN_SHARE
399                  prs_io_uint8(s, &os->flags);                  + 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);  
   
         if (present & 0x000080)  
                 lsb_io_uint16(s, &os->cliptop);  
   
         if (present & 0x000100)  
                 lsb_io_uint16(s, &os->clipright);  
   
         if (present & 0x000200)  
                 lsb_io_uint16(s, &os->clipbottom);  
   
         if (present & 0x000400)  
                 lsb_io_uint16(s, &os->boxleft);  
   
         if (present & 0x000800)  
                 lsb_io_uint16(s, &os->boxtop);  
   
         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);  
 }  
400    
401            s = rdp_init(14 + caplen + sizeof(RDP_SOURCE));
402    
403  /* SECONDARY ORDERS */          out_uint32_le(s, rdp_shareid);
404            out_uint16_le(s, 0x3ea); /* userid */
405            out_uint16_le(s, sizeof(RDP_SOURCE));
406            out_uint16_le(s, caplen);
407    
408  BOOL rdp_io_secondary_order(STREAM s, RDP_SECONDARY_ORDER *rso)          out_uint8p(s, RDP_SOURCE, sizeof(RDP_SOURCE));
409  {          out_uint16_le(s, 0xd); /* num_caps */
410          BOOL res = True;          out_uint8s(s, 2);     /* pad */
411    
412          res = res ? lsb_io_uint16(s, &rso->length) : False;          rdp_out_general_caps(s);
413          res = res ? lsb_io_uint16(s, &rso->flags ) : False;          rdp_out_bitmap_caps(s);
414          res = res ? prs_io_uint8 (s, &rso->type  ) : False;          rdp_out_order_caps(s);
415            rdp_out_bmpcache_caps(s);
416            rdp_out_colcache_caps(s);
417            rdp_out_activate_caps(s);
418            rdp_out_control_caps(s);
419            rdp_out_pointer_caps(s);
420            rdp_out_share_caps(s);
421            rdp_out_unknown_caps(s);
422    
423          return res;          s_mark_end(s);
424            rdp_send(s, RDP_PDU_CONFIRM_ACTIVE);
425  }  }
426    
427  BOOL rdp_io_raw_bmpcache_order(STREAM s, RDP_RAW_BMPCACHE_ORDER *rbo)  /* Respond to a demand active PDU */
428    static void process_demand_active(STREAM s)
429  {  {
430          BOOL res = True;          uint8 type;
431    
432          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;  
433    
434          rbo->data = s->data + s->offset;          DEBUG("DEMAND_ACTIVE(id=0x%x)\n", rdp_shareid);
         s->offset += rbo->bufsize;  
435    
436          return res;          rdp_send_confirm_active();
437            rdp_send_synchronise();
438            rdp_send_control(RDP_CTL_COOPERATE);
439            rdp_send_control(RDP_CTL_REQUEST_CONTROL);
440            rdp_recv(&type); // RDP_PDU_SYNCHRONIZE
441            rdp_recv(&type); // RDP_CTL_COOPERATE
442            rdp_recv(&type); // RDP_CTL_GRANT_CONTROL
443            rdp_send_input(0, RDP_INPUT_SYNCHRONIZE, 0, 0, 0);
444            rdp_send_fonts(1);
445            rdp_send_fonts(2);
446            rdp_recv(&type); // RDP_PDU_UNKNOWN 0x28
447            reset_order_state();
448  }  }
449    
450  BOOL rdp_io_bmpcache_order(STREAM s, RDP_BMPCACHE_ORDER *rbo)  /* Process a pointer PDU */
451    static void process_pointer_pdu(STREAM s)
452  {  {
453          BOOL res = True;          uint16 message_type;
454            uint16 x, y;
455    
456          res = res ? prs_io_uint8 (s, &rbo->cache_id  ) : False;          in_uint16_le(s, message_type);
457          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;  
458    
459          rbo->data = s->data + s->offset;          switch (message_type)
460          s->offset += rbo->size;          {
461                    case RDP_POINTER_MOVE:
462                            in_uint16_le(s, x);
463                            in_uint16_le(s, y);
464                            if (s_check(s))
465                                    ui_move_pointer(x, y);
466                            break;
467    
468          return res;                  default:
469                            DEBUG("Pointer message 0x%x\n", message_type);
470            }
471  }  }
472    
473  BOOL rdp_io_colcache_order(STREAM s, RDP_COLCACHE_ORDER *colours)  /* Process bitmap updates */
474    static void process_bitmap_updates(STREAM s)
475  {  {
476          COLOURENTRY *entry;          uint16 num_updates;
477            uint16 left, top, right, bottom, width, height;
478            uint16 cx, cy, bpp, compress, bufsize, size;
479            uint8 *data, *rawdata;
480          int i;          int i;
481    
482          prs_io_uint8(s, &colours->cache_id);          in_uint16_le(s, num_updates);
         lsb_io_uint16(s, &colours->map.ncolours);  
483    
484          for (i = 0; i < colours->map.ncolours; i++)          for (i = 0; i < num_updates; i++)
485          {          {
486                  entry = &colours->map.colours[i];                  in_uint16_le(s, left);
487                  prs_io_uint8(s, &entry->blue);                  in_uint16_le(s, top);
488                  prs_io_uint8(s, &entry->green);                  in_uint16_le(s, right);
489                  prs_io_uint8(s, &entry->red);                  in_uint16_le(s, bottom);
490                  s->offset++;                  in_uint16_le(s, width);
491          }                  in_uint16_le(s, height);
492                    in_uint16_le(s, bpp);
493                    in_uint16_le(s, compress);
494                    in_uint16_le(s, bufsize);
495    
496          return True;                  cx = right - left + 1;
497  }                  cy = bottom - top + 1;
   
 BOOL rdp_io_fontcache_order(STREAM s, RDP_FONTCACHE_ORDER *font)  
 {  
         RDP_FONT_GLYPH *glyph;  
         BOOL res = True;  
         int i, j, datasize;  
         uint8 in, out;  
498    
499          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",
500          res = res ? prs_io_uint8(s, &font->nglyphs) : False;                          left, top, right, bottom, width, height, compress);
501    
502          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++)  
503                  {                  {
504                          in = glyph->data[j];                          in_uint8p(s, data, bufsize);
505                          out = 0;                          ui_paint_bitmap(left, top, cx, cy, width, height, data);
506                          if (in & 1) out |= 128;                          return;
                         if (in & 2) out |= 64;  
                         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;  
507                  }                  }
         }  
   
         return res;  
 }  
   
508    
509  /* CAPABILITIES */                  in_uint8s(s, 2); /* pad */
510                    in_uint16_le(s, size);
511  /* Construct a general capability set */                  in_uint8s(s, 4); /* line_size, final_size */
512  void rdp_make_general_caps(RDP_GENERAL_CAPS *caps)                  in_uint8p(s, data, size);
 {  
         caps->os_major_type = 1;  
         caps->os_minor_type = 3;  
         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;  
513    
514          res = lsb_io_uint16(s, &pkt_length);                  rawdata = xmalloc(width * height);
515          if (pkt_length != length)                  if (bitmap_decompress(rawdata, width, height, data, size))
516          {                  {
517                  ERROR("Unrecognised capabilities size\n");                          ui_paint_bitmap(left, top, cx, cy, width, height,
518                  return False;                                          rawdata);
519          }                  }
   
         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;  
520    
521          res = lsb_io_uint16(s, &pkt_length);                  xfree(rawdata);
         if (pkt_length != length)  
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
522          }          }
   
         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;  
523  }  }
524    
525  /* Parse single bitmap cache information structure */  /* Process a palette update */
526  BOOL rdp_io_bmpcache_info(STREAM s, RDP_BMPCACHE_INFO *info)  static void process_palette(STREAM s)
527  {  {
528          if (!lsb_io_uint16(s, &info->entries      ))          HCOLOURMAP hmap;
529                  return False;          COLOURMAP map;
530    
531          if (!lsb_io_uint16(s, &info->max_cell_size))          in_uint8s(s, 2); /* pad */
532                  return False;          in_uint16_le(s, map.ncolours);
533            in_uint8s(s, 2); /* pad */
534            in_uint8p(s, (uint8 *)map.colours, (map.ncolours * 3));
535    
536          return True;          hmap = ui_create_colourmap(&map);
537            ui_set_colourmap(hmap);
538  }  }
539    
540  /* Parse bitmap cache capability set */  /* Process an update PDU */
541  BOOL rdp_io_bmpcache_caps(STREAM s, RDP_BMPCACHE_CAPS *caps)  static void process_update_pdu(STREAM s)
542  {  {
543          uint16 length = RDP_CAPLEN_BMPCACHE;          uint16 update_type;
         uint16 pkt_length = length;  
         BOOL res;  
         int i;  
544    
545          res = lsb_io_uint16(s, &pkt_length);          in_uint16_le(s, update_type);
         if (pkt_length != length)  
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
         }  
546    
547          for (i = 0; i < 6; i++)          switch (update_type)
548                  res = res ? lsb_io_uint32(s, &caps->unused[i]) : False;          {
549                    case RDP_UPDATE_ORDERS:
550          for (i = 0; i < 3; i++)                          process_orders(s);
551                  res = res ? rdp_io_bmpcache_info(s, &caps->caches[i]) : False;                          break;
552    
553          return res;                  case RDP_UPDATE_BITMAP:
554  }                          process_bitmap_updates(s);
555                            break;
556    
557  /* Construct a control capability set */                  case RDP_UPDATE_PALETTE:
558  void rdp_make_control_caps(RDP_CONTROL_CAPS *caps)                          process_palette(s);
559  {                          break;
         caps->control_interest = 2;  
         caps->detach_interest = 2;  
 }  
560    
561  /* Parse control capability set */                  case RDP_UPDATE_SYNCHRONIZE:
562  BOOL rdp_io_control_caps(STREAM s, RDP_CONTROL_CAPS *caps)                          break;
 {  
         uint16 length = RDP_CAPLEN_CONTROL;  
         uint16 pkt_length = length;  
         BOOL res;  
563    
564          res = lsb_io_uint16(s, &pkt_length);                  default:
565          if (pkt_length != length)                          NOTIMP("update %d\n", update_type);
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
566          }          }
567    
         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;  
568  }  }
569    
570  /* Construct an activation capability set */  /* Process data PDU */
571  void rdp_make_activate_caps(RDP_ACTIVATE_CAPS *caps)  static void process_data_pdu(STREAM s)
572  {  {
573  }          uint8 data_pdu_type;
574    
575  /* Parse activation capability set */          in_uint8s(s, 8); /* shareid, pad, streamid, length */
576  BOOL rdp_io_activate_caps(STREAM s, RDP_ACTIVATE_CAPS *caps)          in_uint8(s, data_pdu_type);
577  {          in_uint8s(s, 3); /* compress_type, compress_len */
         uint16 length = RDP_CAPLEN_ACTIVATE;  
         uint16 pkt_length = length;  
         BOOL res;  
578    
579          res = lsb_io_uint16(s, &pkt_length);          switch (data_pdu_type)
         if (pkt_length != length)  
580          {          {
581                  ERROR("Unrecognised capabilities size\n");                  case RDP_DATA_PDU_UPDATE:
582                  return False;                          process_update_pdu(s);
583          }                          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;  
584    
585          return res;                  case RDP_DATA_PDU_POINTER:
586  }                          process_pointer_pdu(s);
587                            break;
588    
589  /* Construct a pointer capability set */                  case RDP_DATA_PDU_BELL:
590  void rdp_make_pointer_caps(RDP_POINTER_CAPS *caps)                          ui_bell();
591  {                          break;
         caps->colour_pointer = 0;  
         caps->cache_size = 20;  
 }  
592    
593  /* Parse pointer capability set */                  case RDP_DATA_PDU_LOGON:
594  BOOL rdp_io_pointer_caps(STREAM s, RDP_POINTER_CAPS *caps)                          /* User logged on */
595  {                          break;
         uint16 length = RDP_CAPLEN_POINTER;  
         uint16 pkt_length = length;  
         BOOL res;  
596    
597          res = lsb_io_uint16(s, &pkt_length);                  default:
598          if (pkt_length != length)                          NOTIMP("data PDU %d\n", data_pdu_type);
         {  
                 ERROR("Unrecognised capabilities size\n");  
                 return False;  
599          }          }
   
         res = res ? lsb_io_uint16(s, &caps->colour_pointer) : False;  
         res = res ? lsb_io_uint16(s, &caps->cache_size    ) : False;  
   
         return res;  
 }  
   
 /* Construct a share capability set */  
 void rdp_make_share_caps(RDP_SHARE_CAPS *caps, uint16 userid)  
 {  
600  }  }
601    
602  /* Parse share capability set */  /* Process incoming packets */
603  BOOL rdp_io_share_caps(STREAM s, RDP_SHARE_CAPS *caps)  void rdp_main_loop()
604  {  {
605          uint16 length = RDP_CAPLEN_SHARE;          uint8 type;
606          uint16 pkt_length = length;          STREAM s;
         BOOL res;  
607    
608          res = lsb_io_uint16(s, &pkt_length);          while ((s = rdp_recv(&type)) != NULL)
         if (pkt_length != length)  
609          {          {
610                  ERROR("Unrecognised capabilities size\n");                  switch (type)
611                  return False;                  {
612          }                          case RDP_PDU_DEMAND_ACTIVE:
613                                    process_demand_active(s);
614                                    break;
615    
616          res = res ? lsb_io_uint16(s, &caps->userid) : False;                          case RDP_PDU_DEACTIVATE:
617          res = res ? lsb_io_uint16(s, &caps->pad   ) : False;                                  break;
618    
619          return res;                          case RDP_PDU_DATA:
620  }                                  process_data_pdu(s);
621                                    break;
622    
623  /* Construct a colour cache capability set */                          default:
624  void rdp_make_colcache_caps(RDP_COLCACHE_CAPS *caps)                                  NOTIMP("PDU %d\n", type);
625  {                  }
626          caps->cache_size = 6;          }
627  }  }
628    
629  /* Parse colour cache capability set */  /* Establish a connection up to the RDP layer */
630  BOOL rdp_io_colcache_caps(STREAM s, RDP_COLCACHE_CAPS *caps)  BOOL rdp_connect(char *server)
631  {  {
632          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");  
633                  return False;                  return False;
         }  
   
         res = res ? lsb_io_uint16(s, &caps->cache_size) : False;  
         res = res ? lsb_io_uint16(s, &caps->pad       ) : False;  
634    
635          return res;          rdp_send_logon_info(0x33, "", username, "", "", "");
636            return True;
637  }  }
638    
639  uint8 canned_caps[] = {  /* Disconnect from the RDP layer */
640  0x01,0x00,0x00,0x00,0x09,0x04,0x00,0x00,0x04,  void rdp_disconnect()
 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0C,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,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)  
641  {  {
642          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;  
643  }  }
644    
Legend:
Removed from v.9  
changed lines
  Added in v.10
  ViewVC Help
Powered by ViewVC 1.1.26