/[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

sourceforge.net/branches/RDESKTOP/rdesktop/rdp.c revision 3 by matty, Wed May 10 07:36:34 2000 UTC sourceforge.net/trunk/rdesktop/rdp.c revision 677 by n-ki, Mon Apr 26 13:48:39 2004 UTC
# Line 1  Line 1 
1  /*  /* -*- c-basic-offset: 8 -*-
2     rdesktop: A Remote Desktop Protocol client.     rdesktop: A Remote Desktop Protocol client.
3     Protocol services - RDP layer     Protocol services - RDP layer
4     Copyright (C) Matthew Chapman 1999-2000     Copyright (C) Matthew Chapman 1999-2002
5      
6     This program is free software; you can redistribute it and/or modify     This program is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.     (at your option) any later version.
10      
11     This program is distributed in the hope that it will be useful,     This program is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.     GNU General Public License for more details.
15      
16     You should have received a copy of the GNU General Public License     You should have received a copy of the GNU General Public License
17     along with this program; if not, write to the Free Software     along with this program; if not, write to the Free Software
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 <time.h>
22    #include "rdesktop.h"
 /* Establish a connection up to the RDP layer */  
 HCONN rdp_connect(char *server)  
 {  
         HCONN conn;  
         RDP_ACTIVE_PDU active;  
         RDP_DATA_HEADER hdr;  
         RDP_UPDATE_PDU update;  
         RDP_ORDER_STATE os;  
         uint8 type;  
   
         memset(&os, 0, sizeof(os));  
   
         if ((conn = mcs_connect(server)) == NULL)  
                 return NULL;  
23    
24          rdp_establish_key(conn);  extern uint16 g_mcs_userid;
25          mcs_recv(conn, False); /* Server's licensing certificate */  extern char g_username[16];
26          rdp_send_cert(conn);  extern BOOL g_bitmap_compression;
27          mcs_recv(conn, False);  extern BOOL g_orders;
28    extern BOOL g_encryption;
29    extern BOOL g_desktop_save;
30    extern BOOL g_use_rdp5;
31    extern uint16 g_server_rdp_version;
32    extern uint32 g_rdp5_performanceflags;
33    extern int g_server_bpp;
34    extern int g_width;
35    extern int g_height;
36    
37    uint8 *g_next_packet;
38    uint32 g_rdp_shareid;
39    
40    #if WITH_DEBUG
41    static uint32 g_packetno;
42    #endif
43    
44    /* Receive an RDP packet */
45    static STREAM
46    rdp_recv(uint8 * type)
47    {
48            static STREAM rdp_s;
49            uint16 length, pdu_type;
50    
51            if ((rdp_s == NULL) || (g_next_packet >= rdp_s->end))
52            {
53                    rdp_s = sec_recv();
54                    if (rdp_s == NULL)
55                            return NULL;
56    
57          if (rdp_recv_pdu(conn, &type) && (type != RDP_PDU_DEMAND_ACTIVE))                  g_next_packet = rdp_s->p;
58            }
59            else
60          {          {
61                  fprintf(stderr, "RDP error, expected Demand Active\n");                  rdp_s->p = g_next_packet;
                 mcs_disconnect(conn);  
                 return NULL;  
62          }          }
63    
64          rdp_io_active_pdu(&conn->in, &active, RDP_PDU_DEMAND_ACTIVE);          in_uint16_le(rdp_s, length);
65          rdp_send_confirm_active(conn);          /* 32k packets are really 8, keepalive fix */
66          rdp_send_synchronize(conn);          if (length == 0x8000)
         rdp_send_control(conn, RDP_CTL_COOPERATE);  
         rdp_send_control(conn, RDP_CTL_REQUEST_CONTROL);  
         rdp_recv_pdu(conn, &type); // RDP_PDU_SYNCHRONIZE  
         rdp_recv_pdu(conn, &type); // RDP_CTL_COOPERATE  
         rdp_recv_pdu(conn, &type); // RDP_CTL_GRANT_CONTROL  
         rdp_send_input(conn);  
         rdp_send_fonts(conn, 1);  
         rdp_send_fonts(conn, 2);  
         rdp_recv_pdu(conn, &type); // RDP_PDU_UNKNOWN 0x28  
         while (rdp_recv_pdu(conn, &type))  
67          {          {
68                  if (type != RDP_PDU_DATA)                  g_next_packet += 8;
69                          continue;                  *type = 0;
70                    return rdp_s;
                 rdp_io_data_header(&conn->in, &hdr);  
   
                 switch (hdr.data_pdu_type)  
                 {  
                 case RDP_DATA_PDU_UPDATE:  
                         rdp_io_update_pdu(&conn->in, &update);  
                         if (update.update_type == RDP_UPDATE_ORDERS)  
                         {  
                                 fprintf(stderr, "Received orders\n");  
                                 process_orders(conn, &os);  
                         }  
                         break;  
                 }  
71          }          }
72            in_uint16_le(rdp_s, pdu_type);
73            in_uint8s(rdp_s, 2);    /* userid */
74            *type = pdu_type & 0xf;
75    
76    #if WITH_DEBUG
77            DEBUG(("RDP packet #%d, (type %x)\n", ++g_packetno, *type));
78            hexdump(g_next_packet, length);
79    #endif /*  */
80    
81          return conn;          g_next_packet += length;
82            return rdp_s;
83  }  }
84    
85  void prs_io_coord(STREAM s, uint16 *coord, BOOL delta)  /* Initialise an RDP data packet */
86    static STREAM
87    rdp_init_data(int maxlen)
88  {  {
89          uint8 change;          STREAM s;
90    
91          if (delta)          s = sec_init(g_encryption ? SEC_ENCRYPT : 0, maxlen + 18);
92          {          s_push_layer(s, rdp_hdr, 18);
93                  prs_io_uint8(s, &change);  
94                  *coord += change;          return s;
         }  
         else  
         {  
                 lsb_io_uint16(s, coord);  
         }  
95  }  }
96    
97  void process_opaque_rect(HCONN conn, RDP_ORDER_STATE *os, BOOL delta)  /* Send an RDP data packet */
98    static void
99    rdp_send_data(STREAM s, uint8 data_pdu_type)
100  {  {
101          uint8 present;          uint16 length;
         prs_io_uint8(&conn->in, &present);  
   
         if (present & 1)  
                 prs_io_coord(&conn->in, &os->opaque_rect.x, delta);  
   
         if (present & 2)  
                 prs_io_coord(&conn->in, &os->opaque_rect.y, delta);  
102    
103          if (present & 4)          s_pop_layer(s, rdp_hdr);
104                  prs_io_coord(&conn->in, &os->opaque_rect.cx, delta);          length = s->end - s->p;
105    
106          if (present & 8)          out_uint16_le(s, length);
107                  prs_io_coord(&conn->in, &os->opaque_rect.cy, delta);          out_uint16_le(s, (RDP_PDU_DATA | 0x10));
108            out_uint16_le(s, (g_mcs_userid + 1001));
109    
110          if (present & 16)          out_uint32_le(s, g_rdp_shareid);
111                  prs_io_uint8(&conn->in, &os->opaque_rect.colour);          out_uint8(s, 0);        /* pad */
112            out_uint8(s, 1);        /* streamid */
113            out_uint16_le(s, (length - 14));
114            out_uint8(s, data_pdu_type);
115            out_uint8(s, 0);        /* compress_type */
116            out_uint16(s, 0);       /* compress_len */
117    
118          fprintf(stderr, "Opaque rectangle at %d, %d\n", os->opaque_rect.x, os->opaque_rect.y);          sec_send(s, g_encryption ? SEC_ENCRYPT : 0);
119  }  }
120    
121  void process_orders(HCONN conn, RDP_ORDER_STATE *os)  /* Output a string in Unicode */
122    void
123    rdp_out_unistr(STREAM s, char *string, int len)
124  {  {
125          uint16 num_orders;          int i = 0, j = 0;
         int processed = 0;  
         BOOL res = True;  
         //      unsigned char *p;  
126    
127          lsb_io_uint16(&conn->in, &num_orders);          len += 2;
128    
129          conn->in.offset += 2;          while (i < len)
130          //      p = &conn->in.data[conn->in.offset];          {
131                    s->p[i++] = string[j++];
132                    s->p[i++] = 0;
133            }
134    
135          //      fprintf(stderr, "%02X %02X %02X %02X\n", p[0], p[1], p[2], p[3]);          s->p += len;
136    }
137    
138    /* Input a string in Unicode
139     *
140     * Returns str_len of string
141     */
142    int
143    rdp_in_unistr(STREAM s, char *string, int uni_len)
144    {
145            int i = 0;
146    
147          while ((processed < num_orders) && res)          while (i < uni_len / 2)
148          {          {
149                  uint8 order_flags;                  in_uint8a(s, &string[i++], 1);
150                    in_uint8s(s, 1);
151            }
152    
153                  prs_io_uint8(&conn->in, &order_flags);          return i - 1;
154    }
155    
                 if (!(order_flags & RDP_ORDER_STANDARD))  
                         return;  
156    
157                  if (order_flags & RDP_ORDER_SECONDARY)  /* Parse a logon info packet */
158                  {  static void
159                          RDP_SECONDARY_ORDER rso;  rdp_send_logon_info(uint32 flags, char *domain, char *user,
160                        char *password, char *program, char *directory)
161    {
162            char *ipaddr = tcp_get_address();
163            int len_domain = 2 * strlen(domain);
164            int len_user = 2 * strlen(user);
165            int len_password = 2 * strlen(password);
166            int len_program = 2 * strlen(program);
167            int len_directory = 2 * strlen(directory);
168            int len_ip = 2 * strlen(ipaddr);
169            int len_dll = 2 * strlen("C:\\WINNT\\System32\\mstscax.dll");
170            int packetlen = 0;
171            uint32 sec_flags = g_encryption ? (SEC_LOGON_INFO | SEC_ENCRYPT) : SEC_LOGON_INFO;
172            STREAM s;
173            time_t t = time(NULL);
174            time_t tzone;
175    
176                          rdp_io_secondary_order(&conn->in, &rso);  #if 0
177                          switch (rso.type)          // enable rdp compression
178                          {          flags |= RDP_COMPRESSION;
179                          case RDP_ORDER_BMPCACHE:  #endif
                         {  
                                 RDP_BITMAP_HEADER rbh;  
                                 char output[8192];  
180    
181                                  rdp_io_bitmap_header(&conn->in, &rbh);          if (!g_use_rdp5 || 1 == g_server_rdp_version)
182                                  fprintf(stderr, "Decompressing bitmap %d x %d, final size %d\n", rbh.width, rbh.height, rbh.final_size);          {
183                                  bitmap_decompress(conn->in.data                  DEBUG_RDP5(("Sending RDP4-style Logon packet\n"));
                                                   + conn->in.offset, rbh.size,  
                                                   output, rbh.width);  
                                 conn->in.offset += rbh.size;  
                                 break;  
                         }  
                         default:  
                                 fprintf(stderr, "Unknown secondary order %d\n",  
                                         rso.type);  
                                 return;  
                         }  
184    
185                    s = sec_init(sec_flags, 18 + len_domain + len_user + len_password
186                                 + len_program + len_directory + 10);
187    
188                  }                  out_uint32(s, 0);
189                    out_uint32_le(s, flags);
190                    out_uint16_le(s, len_domain);
191                    out_uint16_le(s, len_user);
192                    out_uint16_le(s, len_password);
193                    out_uint16_le(s, len_program);
194                    out_uint16_le(s, len_directory);
195                    rdp_out_unistr(s, domain, len_domain);
196                    rdp_out_unistr(s, user, len_user);
197                    rdp_out_unistr(s, password, len_password);
198                    rdp_out_unistr(s, program, len_program);
199                    rdp_out_unistr(s, directory, len_directory);
200            }
201            else
202            {
203                    flags |= RDP_LOGON_BLOB;
204                    DEBUG_RDP5(("Sending RDP5-style Logon packet\n"));
205                    packetlen = 4 + /* Unknown uint32 */
206                            4 +     /* flags */
207                            2 +     /* len_domain */
208                            2 +     /* len_user */
209                            (flags & RDP_LOGON_AUTO ? 2 : 0) +      /* len_password */
210                            (flags & RDP_LOGON_BLOB ? 2 : 0) +      /* Length of BLOB */
211                            2 +     /* len_program */
212                            2 +     /* len_directory */
213                            (0 < len_domain ? len_domain : 2) +     /* domain */
214                            len_user + (flags & RDP_LOGON_AUTO ? len_password : 0) + 0 +    /* We have no 512 byte BLOB. Perhaps we must? */
215                            (flags & RDP_LOGON_BLOB && !(flags & RDP_LOGON_AUTO) ? 2 : 0) + /* After the BLOB is a unknown int16. If there is a BLOB, that is. */
216                            (0 < len_program ? len_program : 2) + (0 < len_directory ? len_directory : 2) + 2 +     /* Unknown (2) */
217                            2 +     /* Client ip length */
218                            len_ip +        /* Client ip */
219                            2 +     /* DLL string length */
220                            len_dll +       /* DLL string */
221                            2 +     /* Unknown */
222                            2 +     /* Unknown */
223                            64 +    /* Time zone #0 */
224                            2 +     /* Unknown */
225                            64 +    /* Time zone #1 */
226                            32;     /* Unknown */
227    
228                    s = sec_init(sec_flags, packetlen);
229                    DEBUG_RDP5(("Called sec_init with packetlen %d\n", packetlen));
230    
231                    out_uint32(s, 0);       /* Unknown */
232                    out_uint32_le(s, flags);
233                    out_uint16_le(s, len_domain);
234                    out_uint16_le(s, len_user);
235                    if (flags & RDP_LOGON_AUTO)
236                    {
237                            out_uint16_le(s, len_password);
238    
239                  if (order_flags & RDP_ORDER_CHANGE)                  }
240                          prs_io_uint8(&conn->in, &os->order_type);                  if (flags & RDP_LOGON_BLOB && !(flags & RDP_LOGON_AUTO))
241                    {
242                            out_uint16_le(s, 0);
243                    }
244                    out_uint16_le(s, len_program);
245                    out_uint16_le(s, len_directory);
246                    if (0 < len_domain)
247                            rdp_out_unistr(s, domain, len_domain);
248                    else
249                            out_uint16_le(s, 0);
250                    rdp_out_unistr(s, user, len_user);
251                    if (flags & RDP_LOGON_AUTO)
252                    {
253                            rdp_out_unistr(s, password, len_password);
254                    }
255                    if (flags & RDP_LOGON_BLOB && !(flags & RDP_LOGON_AUTO))
256                    {
257                            out_uint16_le(s, 0);
258                    }
259                    if (0 < len_program)
260                    {
261                            rdp_out_unistr(s, program, len_program);
262    
263                  switch (os->order_type)                  }
264                    else
265                  {                  {
266                  case RDP_ORDER_OPAQUE_RECT:                          out_uint16_le(s, 0);
267                          process_opaque_rect(conn, os, order_flags & RDP_ORDER_DELTA);                  }
268                          break;                  if (0 < len_directory)
269                  default:                  {
270                          fprintf(stderr, "Unknown order %d\n", os->order_type);                          rdp_out_unistr(s, directory, len_directory);
271                          return;                  }
272                    else
273                    {
274                            out_uint16_le(s, 0);
275                  }                  }
276                    out_uint16_le(s, 2);
277                    out_uint16_le(s, len_ip + 2);   /* Length of client ip */
278                    rdp_out_unistr(s, ipaddr, len_ip);
279                    out_uint16_le(s, len_dll + 2);
280                    rdp_out_unistr(s, "C:\\WINNT\\System32\\mstscax.dll", len_dll);
281    
282                  processed++;                  tzone = (mktime(gmtime(&t)) - mktime(localtime(&t))) / 60;
283          }                  out_uint32_le(s, tzone);
 }  
284    
285  /* Work this out later. This is useless anyway when encryption is off. */                  rdp_out_unistr(s, "GTB, normaltid", 2 * strlen("GTB, normaltid"));
286  uint8 precanned_key_packet[] = {                  out_uint8s(s, 62 - 2 * strlen("GTB, normaltid"));
    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  
 };  
287    
288  /* Create an RC4 key and transfer it to the server */                  out_uint32_le(s, 0x0a0000);
289  void rdp_establish_key(HCONN conn)                  out_uint32_le(s, 0x050000);
290  {                  out_uint32_le(s, 3);
291          mcs_init_data(conn);                  out_uint32_le(s, 0);
292          memcpy(conn->out.data + conn->out.offset, precanned_key_packet,                  out_uint32_le(s, 0);
                sizeof(precanned_key_packet));  
         conn->out.offset += sizeof(precanned_key_packet);  
         MARK_END(conn->out);  
         mcs_send_data(conn, MCS_GLOBAL_CHANNEL, True);  
 }  
   
 /* Horrible horrible certificate stuff. Work out later. */  
 uint8 precanned_cert_packet[] = {  
 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  
 };  
293    
294  /* Send license certificate and related data to the server */                  rdp_out_unistr(s, "GTB, sommartid", 2 * strlen("GTB, sommartid"));
295  void rdp_send_cert(HCONN conn)                  out_uint8s(s, 62 - 2 * strlen("GTB, sommartid"));
 {  
         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);  
 }  
296    
297  /* Initialise RDP transport packet */                  out_uint32_le(s, 0x30000);
298  void rdp_init(HCONN conn)                  out_uint32_le(s, 0x050000);
299  {                  out_uint32_le(s, 2);
300          mcs_init_data(conn);                  out_uint32(s, 0);
301          PUSH_LAYER(conn->out, rdp_offset, 6);                  out_uint32_le(s, 0xffffffc4);
302  }                  out_uint32_le(s, 0xfffffffe);
303                    out_uint32_le(s, g_rdp5_performanceflags);
304                    out_uint32(s, 0);
305    
 /* 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);  
 }  
306    
307  /* Initialise RDP transport data packet */          }
308  void rdp_init_data(HCONN conn)          s_mark_end(s);
309  {          sec_send(s, sec_flags);
         mcs_init_data(conn);  
         PUSH_LAYER(conn->out, rdp_offset, 18);  
310  }  }
311    
312  /* Transmit RDP transport data packet */  /* Send a control PDU */
313  void rdp_send_data(HCONN conn, uint16 data_pdu_type)  static void
314    rdp_send_control(uint16 action)
315  {  {
316          RDP_HEADER hdr;          STREAM s;
         RDP_DATA_HEADER datahdr;  
         int length = conn->out.end - conn->out.offset;  
317    
318          POP_LAYER(conn->out, rdp_offset);          s = rdp_init_data(8);
         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);  
 }  
319    
320  void rdp_send_confirm_active(HCONN conn)          out_uint16_le(s, action);
321  {          out_uint16(s, 0);       /* userid */
322          RDP_ACTIVE_PDU active;          out_uint32(s, 0);       /* control id */
323    
324          rdp_init(conn);          s_mark_end(s);
325          rdp_make_active_pdu(&active, 0x103ea, conn->mcs_userid);          rdp_send_data(s, RDP_DATA_PDU_CONTROL);
         rdp_io_active_pdu(&conn->out, &active, RDP_PDU_CONFIRM_ACTIVE);  
         MARK_END(conn->out);  
         rdp_send(conn, RDP_PDU_CONFIRM_ACTIVE);  
326  }  }
327    
328  void rdp_send_synchronize(HCONN conn)  /* Send a synchronisation PDU */
329    static void
330    rdp_send_synchronise(void)
331  {  {
332          RDP_SYNCHRONIZE_PDU sync;          STREAM s;
333    
334          rdp_init_data(conn);          s = rdp_init_data(4);
         rdp_make_synchronize_pdu(&sync, 1002);  
         rdp_io_synchronize_pdu(&conn->out, &sync);  
         MARK_END(conn->out);  
         rdp_send_data(conn, RDP_DATA_PDU_SYNCHRONIZE);  
 }  
335    
336  void rdp_send_control(HCONN conn, uint16 action)          out_uint16_le(s, 1);    /* type */
337  {          out_uint16_le(s, 1002);
         RDP_CONTROL_PDU control;  
338    
339          rdp_init_data(conn);          s_mark_end(s);
340          rdp_make_control_pdu(&control, action);          rdp_send_data(s, RDP_DATA_PDU_SYNCHRONISE);
         rdp_io_control_pdu(&conn->out, &control);  
         MARK_END(conn->out);  
         rdp_send_data(conn, RDP_DATA_PDU_CONTROL);  
341  }  }
342    
343  void rdp_send_fonts(HCONN conn, uint16 seqno)  /* Send a single input event */
344    void
345    rdp_send_input(uint32 time, uint16 message_type, uint16 device_flags, uint16 param1, uint16 param2)
346  {  {
347          RDP_FONT_PDU fonts;          STREAM s;
348    
349          rdp_init_data(conn);          s = rdp_init_data(16);
         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);  
 }  
350    
351  void rdp_send_input(HCONN conn)          out_uint16_le(s, 1);    /* number of events */
352  {          out_uint16(s, 0);       /* pad */
         RDP_INPUT_PDU input;  
353    
354          rdp_init_data(conn);          out_uint32_le(s, time);
355          rdp_make_input_pdu(&input);          out_uint16_le(s, message_type);
356          rdp_io_input_pdu(&conn->out, &input);          out_uint16_le(s, device_flags);
357          MARK_END(conn->out);          out_uint16_le(s, param1);
358          rdp_send_data(conn, RDP_DATA_PDU_INPUT);          out_uint16_le(s, param2);
359    
360            s_mark_end(s);
361            rdp_send_data(s, RDP_DATA_PDU_INPUT);
362  }  }
363    
364  BOOL rdp_recv_pdu(HCONN conn, uint8 *type)  /* Send an (empty) font information PDU */
365    static void
366    rdp_send_fonts(uint16 seq)
367  {  {
368          RDP_HEADER hdr;          STREAM s;
369    
370          if (!mcs_recv(conn, False) || !rdp_io_header(&conn->in, &hdr))          s = rdp_init_data(8);
                 return False;  
371    
372          *type = hdr.pdu_type & 0xf;          out_uint16(s, 0);       /* number of fonts */
373          return True;          out_uint16_le(s, 0);    /* pad? */
374  }          out_uint16_le(s, seq);  /* unknown */
375            out_uint16_le(s, 0x32); /* entry size */
376    
377  /* Disconnect from the RDP layer */          s_mark_end(s);
378  void rdp_disconnect(HCONN conn)          rdp_send_data(s, RDP_DATA_PDU_FONT2);
 {  
         mcs_disconnect(conn);  
379  }  }
380    
381  void rdp_make_header(RDP_HEADER *hdr, uint16 length, uint16 pdu_type,  /* Output general capability set */
382                       uint16 userid)  static void
383    rdp_out_general_caps(STREAM s)
384  {  {
385          hdr->length = length;          out_uint16_le(s, RDP_CAPSET_GENERAL);
386          hdr->pdu_type = pdu_type | 0x10; /* Version 1 */          out_uint16_le(s, RDP_CAPLEN_GENERAL);
         hdr->userid = userid + 1001;  
 }  
387    
388  void rdp_make_data_header(RDP_DATA_HEADER *hdr, uint32 shareid,          out_uint16_le(s, 1);    /* OS major type */
389                            uint16 length, uint16 data_pdu_type)          out_uint16_le(s, 3);    /* OS minor type */
390  {          out_uint16_le(s, 0x200);        /* Protocol version */
391          hdr->shareid = shareid;          out_uint16(s, 0);       /* Pad */
392          hdr->pad = 0;          out_uint16(s, 0);       /* Compression types */
393          hdr->streamid = 1;          out_uint16_le(s, g_use_rdp5 ? 0x40d : 0);
394          hdr->length = length - 14;          /* Pad, according to T.128. 0x40d seems to
395          hdr->data_pdu_type = data_pdu_type;             trigger
396          hdr->compress_type = 0;             the server to start sending RDP5 packets.
397          hdr->compress_len = 0;             However, the value is 0x1d04 with W2KTSK and
398               NT4MS. Hmm.. Anyway, thankyou, Microsoft,
399               for sending such information in a padding
400               field.. */
401            out_uint16(s, 0);       /* Update capability */
402            out_uint16(s, 0);       /* Remote unshare capability */
403            out_uint16(s, 0);       /* Compression level */
404            out_uint16(s, 0);       /* Pad */
405  }  }
406    
407  void rdp_make_general_caps(RDP_GENERAL_CAPS *caps)  /* Output bitmap capability set */
408    static void
409    rdp_out_bitmap_caps(STREAM s)
410  {  {
411          caps->os_major_type = 1;          out_uint16_le(s, RDP_CAPSET_BITMAP);
412          caps->os_minor_type = 3;          out_uint16_le(s, RDP_CAPLEN_BITMAP);
         caps->ver_protocol = 0x200;  
 }  
413    
414  void rdp_make_bitmap_caps(RDP_BITMAP_CAPS *caps)          out_uint16_le(s, g_server_bpp); /* Preferred BPP */
415  {          out_uint16_le(s, 1);    /* Receive 1 BPP */
416          caps->preferred_bpp = 8;          out_uint16_le(s, 1);    /* Receive 4 BPP */
417          caps->receive1bpp = 1;          out_uint16_le(s, 1);    /* Receive 8 BPP */
418          caps->receive4bpp = 1;          out_uint16_le(s, 800);  /* Desktop width */
419          caps->receive8bpp = 1;          out_uint16_le(s, 600);  /* Desktop height */
420          caps->width = 640;          out_uint16(s, 0);       /* Pad */
421          caps->height = 480;          out_uint16(s, 1);       /* Allow resize */
422          caps->compression = 1;          out_uint16_le(s, g_bitmap_compression ? 1 : 0); /* Support compression */
423          caps->unknown2 = 1;          out_uint16(s, 0);       /* Unknown */
424            out_uint16_le(s, 1);    /* Unknown */
425            out_uint16(s, 0);       /* Pad */
426  }  }
427    
428  void rdp_make_order_caps(RDP_ORDER_CAPS *caps)  /* Output order capability set */
429    static void
430    rdp_out_order_caps(STREAM s)
431  {  {
432          caps->xgranularity = 1;          uint8 order_caps[32];
         caps->ygranularity = 20;  
         caps->max_order_level = 1;  
         caps->num_fonts = 0x147;  
         caps->cap_flags = 0x2A;  
433    
 //      caps->cap_flags = ORDER_CAP_NEGOTIATE | ORDER_CAP_NOSUPPORT;  
434    
435          caps->support[0] = caps->support[1] = caps->support[2]          memset(order_caps, 0, 32);
436                  = caps->support[3] = caps->support[4] = caps->support[5]          order_caps[0] = 1;      /* dest blt */
437                  = caps->support[6] = caps->support[8] = caps->support[11]          order_caps[1] = 1;      /* pat blt */
438                  = caps->support[12] = caps->support[22] = caps->support[28]          order_caps[2] = 1;      /* screen blt */
439                  = caps->support[29] = caps->support[30] = 1;          order_caps[3] = 1;      /* required for memblt? */
440          caps->text_cap_flags = 0x6A1;          order_caps[8] = 1;      /* line */
441          caps->desk_save_size = 0x38400;          order_caps[9] = 1;      /* line */
442          caps->unknown2 = 0x4E4;          order_caps[10] = 1;     /* rect */
443  }          order_caps[11] = (g_desktop_save == False ? 0 : 1);     /* desksave */
444            order_caps[13] = 1;     /* memblt */
445            order_caps[14] = 1;     /* triblt */
446            order_caps[22] = 1;     /* polyline */
447            order_caps[27] = 1;     /* text2 */
448            out_uint16_le(s, RDP_CAPSET_ORDER);
449            out_uint16_le(s, RDP_CAPLEN_ORDER);
450    
451  void rdp_make_bmpcache_caps(RDP_BMPCACHE_CAPS *caps)          out_uint8s(s, 20);      /* Terminal desc, pad */
452  {          out_uint16_le(s, 1);    /* Cache X granularity */
453          caps->caches[0].entries = 0x258;          out_uint16_le(s, 20);   /* Cache Y granularity */
454          caps->caches[0].max_cell_size = 0x100;          out_uint16(s, 0);       /* Pad */
455          caps->caches[1].entries = 0x12c;          out_uint16_le(s, 1);    /* Max order level */
456          caps->caches[1].max_cell_size = 0x400;          out_uint16_le(s, 0x147);        /* Number of fonts */
457          caps->caches[2].entries = 0x106;          out_uint16_le(s, 0x2a); /* Capability flags */
458          caps->caches[2].max_cell_size = 0x1000;          out_uint8p(s, order_caps, 32);  /* Orders supported */
459            out_uint16_le(s, 0x6a1);        /* Text capability flags */
460            out_uint8s(s, 6);       /* Pad */
461            out_uint32_le(s, g_desktop_save == False ? 0 : 0x38400);        /* Desktop cache size */
462            out_uint32(s, 0);       /* Unknown */
463            out_uint32_le(s, 0x4e4);        /* Unknown */
464  }  }
465    
466  void rdp_make_control_caps(RDP_CONTROL_CAPS *caps)  /* Output bitmap cache capability set */
467    static void
468    rdp_out_bmpcache_caps(STREAM s)
469  {  {
470          caps->control_interest = 2;          int Bpp;
471          caps->detach_interest = 2;          out_uint16_le(s, RDP_CAPSET_BMPCACHE);
472  }          out_uint16_le(s, RDP_CAPLEN_BMPCACHE);
473    
474  void rdp_make_activate_caps(RDP_ACTIVATE_CAPS *caps)          Bpp = (g_server_bpp + 7) / 8;
475  {          out_uint8s(s, 24);      /* unused */
476            out_uint16_le(s, 0x258);        /* entries */
477            out_uint16_le(s, 0x100 * Bpp);  /* max cell size */
478            out_uint16_le(s, 0x12c);        /* entries */
479            out_uint16_le(s, 0x400 * Bpp);  /* max cell size */
480            out_uint16_le(s, 0x106);        /* entries */
481            out_uint16_le(s, 0x1000 * Bpp); /* max cell size */
482  }  }
483    
484  void rdp_make_pointer_caps(RDP_POINTER_CAPS *caps)  /* Output control capability set */
485    static void
486    rdp_out_control_caps(STREAM s)
487  {  {
488          caps->colour_pointer = 0;          out_uint16_le(s, RDP_CAPSET_CONTROL);
489          caps->cache_size = 20;          out_uint16_le(s, RDP_CAPLEN_CONTROL);
 }  
490    
491  void rdp_make_share_caps(RDP_SHARE_CAPS *caps, uint16 userid)          out_uint16(s, 0);       /* Control capabilities */
492  {          out_uint16(s, 0);       /* Remote detach */
493            out_uint16_le(s, 2);    /* Control interest */
494            out_uint16_le(s, 2);    /* Detach interest */
495  }  }
496    
497  void rdp_make_colcache_caps(RDP_COLCACHE_CAPS *caps)  /* Output activation capability set */
498    static void
499    rdp_out_activate_caps(STREAM s)
500  {  {
501          caps->cache_size = 6;          out_uint16_le(s, RDP_CAPSET_ACTIVATE);
502            out_uint16_le(s, RDP_CAPLEN_ACTIVATE);
503    
504            out_uint16(s, 0);       /* Help key */
505            out_uint16(s, 0);       /* Help index key */
506            out_uint16(s, 0);       /* Extended help key */
507            out_uint16(s, 0);       /* Window activate */
508  }  }
509    
510  void rdp_make_active_pdu(RDP_ACTIVE_PDU *pdu, uint32 shareid, uint16 userid)  /* Output pointer capability set */
511    static void
512    rdp_out_pointer_caps(STREAM s)
513  {  {
514          memset(pdu, 0, sizeof(*pdu));          out_uint16_le(s, RDP_CAPSET_POINTER);
515          pdu->shareid = shareid;          out_uint16_le(s, RDP_CAPLEN_POINTER);
         pdu->userid  = 1002;  
         pdu->source_len = sizeof(RDP_SOURCE);  
         memcpy(pdu->source, RDP_SOURCE, sizeof(RDP_SOURCE));  
   
         pdu->caps_len = RDP_CAPLEN_GENERAL + RDP_CAPLEN_BITMAP + RDP_CAPLEN_ORDER  
                 + RDP_CAPLEN_BMPCACHE + RDP_CAPLEN_COLCACHE + RDP_CAPLEN_ACTIVATE  
                 + RDP_CAPLEN_CONTROL + RDP_CAPLEN_POINTER + RDP_CAPLEN_SHARE  
                 + RDP_CAPLEN_UNKNOWN;  
         pdu->num_caps = 0xD;  
516    
517          rdp_make_general_caps (&pdu->general_caps );          out_uint16(s, 0);       /* Colour pointer */
518          rdp_make_bitmap_caps  (&pdu->bitmap_caps  );          out_uint16_le(s, 20);   /* Cache size */
         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);  
519  }  }
520    
521  void rdp_make_control_pdu(RDP_CONTROL_PDU *pdu, uint16 action)  /* Output share capability set */
522    static void
523    rdp_out_share_caps(STREAM s)
524  {  {
525          pdu->action = action;          out_uint16_le(s, RDP_CAPSET_SHARE);
526          pdu->userid = 0;          out_uint16_le(s, RDP_CAPLEN_SHARE);
527          pdu->controlid = 0;  
528            out_uint16(s, 0);       /* userid */
529            out_uint16(s, 0);       /* pad */
530  }  }
531    
532  void rdp_make_synchronize_pdu(RDP_SYNCHRONIZE_PDU *pdu, uint16 userid)  /* Output colour cache capability set */
533    static void
534    rdp_out_colcache_caps(STREAM s)
535  {  {
536          pdu->type = 1;          out_uint16_le(s, RDP_CAPSET_COLCACHE);
537          pdu->userid = userid;          out_uint16_le(s, RDP_CAPLEN_COLCACHE);
538    
539            out_uint16_le(s, 6);    /* cache size */
540            out_uint16(s, 0);       /* pad */
541  }  }
542    
543  void rdp_make_font_pdu(RDP_FONT_PDU *pdu, uint16 seqno)  static uint8 canned_caps[] = {
544            0x01, 0x00, 0x00, 0x00, 0x09, 0x04, 0x00, 0x00, 0x04,
545            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x0C, 0x00, 0x00, 0x00,
546            0x00, 0x00, 0x00, 0x00, 0x00,
547            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
548            0x00, 0x00, 0x00, 0x00, 0x00,
549            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
550            0x00, 0x00, 0x00, 0x00, 0x00,
551            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
552            0x00, 0x00, 0x00, 0x00, 0x00,
553            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
554            0x0C, 0x00, 0x08, 0x00, 0x01,
555            0x00, 0x00, 0x00, 0x0E, 0x00, 0x08, 0x00, 0x01, 0x00, 0x00, 0x00,
556            0x10, 0x00, 0x34, 0x00, 0xFE,
557            0x00, 0x04, 0x00, 0xFE, 0x00, 0x04, 0x00, 0xFE, 0x00, 0x08, 0x00,
558            0xFE, 0x00, 0x08, 0x00, 0xFE,
559            0x00, 0x10, 0x00, 0xFE, 0x00, 0x20, 0x00, 0xFE, 0x00, 0x40, 0x00,
560            0xFE, 0x00, 0x80, 0x00, 0xFE,
561            0x00, 0x00, 0x01, 0x40, 0x00, 0x00, 0x08, 0x00, 0x01, 0x00, 0x01,
562            0x02, 0x00, 0x00, 0x00
563    };
564    
565    /* Output unknown capability sets (number 13, 12, 14 and 16) */
566    static void
567    rdp_out_unknown_caps(STREAM s)
568  {  {
569          pdu->num_fonts = 0;          out_uint16_le(s, RDP_CAPSET_UNKNOWN);
570          pdu->unknown1 = 0x3e;          out_uint16_le(s, 0x58);
571          pdu->unknown2 = seqno;  
572          pdu->entry_size = RDP_FONT_INFO_SIZE;          out_uint8p(s, canned_caps, RDP_CAPLEN_UNKNOWN - 4);
573  }  }
574    
575  void rdp_make_input_pdu(RDP_INPUT_PDU *pdu)  #define RDP5_FLAG 0x0030
576    /* Send a confirm active PDU */
577    static void
578    rdp_send_confirm_active(void)
579  {  {
580          uint32 now = time(NULL);          STREAM s;
581            uint32 sec_flags = g_encryption ? (RDP5_FLAG | SEC_ENCRYPT) : RDP5_FLAG;
582            uint16 caplen =
583                    RDP_CAPLEN_GENERAL + RDP_CAPLEN_BITMAP + RDP_CAPLEN_ORDER +
584                    RDP_CAPLEN_BMPCACHE + RDP_CAPLEN_COLCACHE +
585                    RDP_CAPLEN_ACTIVATE + RDP_CAPLEN_CONTROL +
586                    RDP_CAPLEN_POINTER + RDP_CAPLEN_SHARE + RDP_CAPLEN_UNKNOWN + 4 /* w2k fix, why? */ ;
587    
588          pdu->num_events = 3;          s = sec_init(sec_flags, 6 + 14 + caplen + sizeof(RDP_SOURCE));
         pdu->pad = 0;  
589    
590          pdu->event[0].event_time = now;          out_uint16_le(s, 2 + 14 + caplen + sizeof(RDP_SOURCE));
591          pdu->event[0].message_type = RDP_INPUT_SYNCHRONIZE;          out_uint16_le(s, (RDP_PDU_CONFIRM_ACTIVE | 0x10));      /* Version 1 */
592          pdu->event[0].device_flags = 0;          out_uint16_le(s, (g_mcs_userid + 1001));
         pdu->event[0].mouse_x = 0;  
         pdu->event[0].mouse_y = 0;  
593    
594          pdu->event[1].event_time = now;          out_uint32_le(s, g_rdp_shareid);
595          pdu->event[1].message_type = RDP_INPUT_UNKNOWN;          out_uint16_le(s, 0x3ea);        /* userid */
596          pdu->event[1].device_flags = 0x8000;          out_uint16_le(s, sizeof(RDP_SOURCE));
597          pdu->event[1].mouse_x = 15;          out_uint16_le(s, caplen);
         pdu->event[1].mouse_y = 0;  
598    
599          pdu->event[2].event_time = now;          out_uint8p(s, RDP_SOURCE, sizeof(RDP_SOURCE));
600          pdu->event[2].message_type = RDP_INPUT_MOUSE;          out_uint16_le(s, 0xd);  /* num_caps */
601          pdu->event[2].device_flags = MOUSE_FLAG_MOVE;          out_uint8s(s, 2);       /* pad */
         pdu->event[2].mouse_x = 425;  
         pdu->event[2].mouse_y = 493;  
 }  
602    
603  BOOL rdp_io_header(STREAM s, RDP_HEADER *hdr)          rdp_out_general_caps(s);
604  {          rdp_out_bitmap_caps(s);
605          BOOL res = True;          rdp_out_order_caps(s);
606            rdp_out_bmpcache_caps(s);
607            rdp_out_colcache_caps(s);
608            rdp_out_activate_caps(s);
609            rdp_out_control_caps(s);
610            rdp_out_pointer_caps(s);
611            rdp_out_share_caps(s);
612            rdp_out_unknown_caps(s);
613    
614          res = res ? lsb_io_uint16(s, &hdr->length  ) : False;          s_mark_end(s);
615          res = res ? lsb_io_uint16(s, &hdr->pdu_type) : False;          sec_send(s, sec_flags);
         res = res ? lsb_io_uint16(s, &hdr->userid  ) : False;  
   
         return res;  
616  }  }
617    
618  BOOL rdp_io_data_header(STREAM s, RDP_DATA_HEADER *hdr)  /* Process a general capability set */
619    static void
620    rdp_process_general_caps(STREAM s)
621  {  {
622          BOOL res = True;          uint16 pad2octetsB;     /* rdp5 flags? */
623    
624          res = res ? lsb_io_uint32(s, &hdr->shareid      ) : False;          in_uint8s(s, 10);
625          res = res ? prs_io_uint8 (s, &hdr->pad          ) : False;          in_uint16_le(s, pad2octetsB);
         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;  
626    
627          return res;          if (!pad2octetsB)
628                    g_use_rdp5 = False;
629  }  }
630    
631  BOOL rdp_io_general_caps(STREAM s, RDP_GENERAL_CAPS *caps)  /* Process a bitmap capability set */
632    static void
633    rdp_process_bitmap_caps(STREAM s)
634  {  {
635          uint16 length = RDP_CAPLEN_GENERAL;          uint16 width, height, bpp;
         uint16 pkt_length = length;  
         BOOL res;  
   
         res = lsb_io_uint16(s, &pkt_length);  
         if (pkt_length != length)  
         {  
                 fprintf(stderr, "Unrecognised capabilities size\n");  
                 return False;  
         }  
636    
637          res = res ? lsb_io_uint16(s, &caps->os_major_type ) : False;          in_uint16_le(s, bpp);
638          res = res ? lsb_io_uint16(s, &caps->os_minor_type ) : False;          in_uint8s(s, 6);
         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;  
 }  
   
 BOOL rdp_io_bitmap_caps(STREAM s, RDP_BITMAP_CAPS *caps)  
 {  
         uint16 length = RDP_CAPLEN_BITMAP;  
         uint16 pkt_length = length;  
         BOOL res;  
639    
640          res = lsb_io_uint16(s, &pkt_length);          in_uint16_le(s, width);
641          if (pkt_length != length)          in_uint16_le(s, height);
         {  
                 fprintf(stderr, "Unrecognised capabilities size\n");  
                 return False;  
         }  
642    
643          res = res ? lsb_io_uint16(s, &caps->preferred_bpp) : False;          DEBUG(("setting desktop size and bpp to: %dx%dx%d\n", width, height, bpp));
         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;  
 }  
   
 BOOL rdp_io_order_caps(STREAM s, RDP_ORDER_CAPS *caps)  
 {  
         uint16 length = RDP_CAPLEN_ORDER;  
         uint16 pkt_length = length;  
         BOOL res;  
644    
645          res = lsb_io_uint16(s, &pkt_length);          /*
646          if (pkt_length != length)           * The server may limit bpp and change the size of the desktop (for
647          {           * example when shadowing another session).
648                  fprintf(stderr, "Unrecognised capabilities size\n");           */
649                  return False;          g_server_bpp = bpp;
650          }          g_width = width;
651            g_height = height;
652    
653          res = res ? prs_io_uint8s(s,  caps->terminal_desc, 16) : False;          ui_resize_window();
         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;  
654  }  }
655    
656  BOOL rdp_io_bmpcache_info(STREAM s, RDP_BMPCACHE_INFO *info)  /* Respond to a demand active PDU */
657    static void
658    process_demand_active(STREAM s)
659  {  {
660          if (!lsb_io_uint16(s, &info->entries      ))          int n;
661                  return False;          uint8 type, *next;
662            uint16 len_src_descriptor, len_combined_caps, num_capsets, capset_type, capset_length;
663    
664          if (!lsb_io_uint16(s, &info->max_cell_size))          in_uint32_le(s, g_rdp_shareid);
665                  return False;          in_uint16_le(s, len_src_descriptor);
666            in_uint16_le(s, len_combined_caps);
667            in_uint8s(s, len_src_descriptor);
668    
669          return True;          in_uint16_le(s, num_capsets);
670  }          in_uint8s(s, 2);        /* pad */
671    
672  BOOL rdp_io_bmpcache_caps(STREAM s, RDP_BMPCACHE_CAPS *caps)          DEBUG(("DEMAND_ACTIVE(id=0x%x,num_caps=%d)\n", g_rdp_shareid, num_capsets));
 {  
         uint16 length = RDP_CAPLEN_BMPCACHE;  
         uint16 pkt_length = length;  
         BOOL res;  
         int i;  
673    
674          res = lsb_io_uint16(s, &pkt_length);          for (n = 0; n < num_capsets; n++)
         if (pkt_length != length)  
675          {          {
676                  fprintf(stderr, "Unrecognised capabilities size\n");                  in_uint16_le(s, capset_type);
677                  return False;                  in_uint16_le(s, capset_length);
         }  
678    
679          for (i = 0; i < 6; i++)                  next = s->p + capset_length - 4;
                 res = res ? lsb_io_uint32(s, &caps->unused[i]) : False;  
680    
681          for (i = 0; i < 3; i++)                  switch (capset_type)
682                  res = res ? rdp_io_bmpcache_info(s, &caps->caches[i]) : False;                  {
683                            case RDP_CAPSET_GENERAL:
684                                    rdp_process_general_caps(s);
685                                    break;
686    
687          return res;                          case RDP_CAPSET_BITMAP:
688  }                                  rdp_process_bitmap_caps(s);
689                                    break;
690                    }
691    
692  BOOL rdp_io_control_caps(STREAM s, RDP_CONTROL_CAPS *caps)                  s->p = next;
693  {          }
694          uint16 length = RDP_CAPLEN_CONTROL;  
695          uint16 pkt_length = length;          rdp_send_confirm_active();
696          BOOL res;          rdp_send_synchronise();
697            rdp_send_control(RDP_CTL_COOPERATE);
698            rdp_send_control(RDP_CTL_REQUEST_CONTROL);
699            rdp_recv(&type);        /* RDP_PDU_SYNCHRONIZE */
700            rdp_recv(&type);        /* RDP_CTL_COOPERATE */
701            rdp_recv(&type);        /* RDP_CTL_GRANT_CONTROL */
702            rdp_send_input(0, RDP_INPUT_SYNCHRONIZE, 0, ui_get_numlock_state(read_keyboard_state()), 0);
703    
704          res = lsb_io_uint16(s, &pkt_length);          if (g_use_rdp5)
         if (pkt_length != length)  
705          {          {
706                  fprintf(stderr, "Unrecognised capabilities size\n");                  rdp_send_fonts(3);
707                  return False;          }
708            else
709            {
710                    rdp_send_fonts(1);
711                    rdp_send_fonts(2);
712          }          }
713    
714          res = res ? lsb_io_uint16(s, &caps->control_caps    ) : False;          rdp_recv(&type);        /* RDP_PDU_UNKNOWN 0x28 (Fonts?) */
715          res = res ? lsb_io_uint16(s, &caps->remote_detach   ) : False;          reset_order_state();
         res = res ? lsb_io_uint16(s, &caps->control_interest) : False;  
         res = res ? lsb_io_uint16(s, &caps->detach_interest ) : False;  
   
         return res;  
716  }  }
717    
718  BOOL rdp_io_activate_caps(STREAM s, RDP_ACTIVATE_CAPS *caps)  /* Process a colour pointer PDU */
719    void
720    process_colour_pointer_pdu(STREAM s)
721  {  {
722          uint16 length = RDP_CAPLEN_ACTIVATE;          uint16 x, y, width, height, cache_idx, masklen, datalen;
723          uint16 pkt_length = length;          uint8 *mask, *data;
724          BOOL res;          HCURSOR cursor;
725    
726          res = lsb_io_uint16(s, &pkt_length);          in_uint16_le(s, cache_idx);
727          if (pkt_length != length)          in_uint16_le(s, x);
728          {          in_uint16_le(s, y);
729                  fprintf(stderr, "Unrecognised capabilities size\n");          in_uint16_le(s, width);
730                  return False;          in_uint16_le(s, height);
731          }          in_uint16_le(s, masklen);
732            in_uint16_le(s, datalen);
733            in_uint8p(s, data, datalen);
734            in_uint8p(s, mask, masklen);
735            cursor = ui_create_cursor(x, y, width, height, mask, data);
736            ui_set_cursor(cursor);
737            cache_put_cursor(cache_idx, cursor);
738    }
739    
740          res = res ? lsb_io_uint16(s, &caps->help_key         ) : False;  /* Process a cached pointer PDU */
741          res = res ? lsb_io_uint16(s, &caps->help_index_key   ) : False;  void
742          res = res ? lsb_io_uint16(s, &caps->help_extended_key) : False;  process_cached_pointer_pdu(STREAM s)
743          res = res ? lsb_io_uint16(s, &caps->window_activate  ) : False;  {
744            uint16 cache_idx;
745    
746          return res;          in_uint16_le(s, cache_idx);
747            ui_set_cursor(cache_get_cursor(cache_idx));
748  }  }
749    
750  BOOL rdp_io_pointer_caps(STREAM s, RDP_POINTER_CAPS *caps)  /* Process a system pointer PDU */
751    void
752    process_system_pointer_pdu(STREAM s)
753  {  {
754          uint16 length = RDP_CAPLEN_POINTER;          uint16 system_pointer_type;
         uint16 pkt_length = length;  
         BOOL res;  
755    
756          res = lsb_io_uint16(s, &pkt_length);          in_uint16(s, system_pointer_type);
757          if (pkt_length != length)          switch (system_pointer_type)
758          {          {
759                  fprintf(stderr, "Unrecognised capabilities size\n");                  case RDP_NULL_POINTER:
760                  return False;                          ui_set_null_cursor();
761          }                          break;
   
         res = res ? lsb_io_uint16(s, &caps->colour_pointer) : False;  
         res = res ? lsb_io_uint16(s, &caps->cache_size    ) : False;  
762    
763          return res;                  default:
764                            unimpl("System pointer message 0x%x\n", system_pointer_type);
765            }
766  }  }
767    
768  BOOL rdp_io_share_caps(STREAM s, RDP_SHARE_CAPS *caps)  /* Process a pointer PDU */
769    static void
770    process_pointer_pdu(STREAM s)
771  {  {
772          uint16 length = RDP_CAPLEN_SHARE;          uint16 message_type;
773          uint16 pkt_length = length;          uint16 x, y;
         BOOL res;  
774    
775          res = lsb_io_uint16(s, &pkt_length);          in_uint16_le(s, message_type);
776          if (pkt_length != length)          in_uint8s(s, 2);        /* pad */
777    
778            switch (message_type)
779          {          {
780                  fprintf(stderr, "Unrecognised capabilities size\n");                  case RDP_POINTER_MOVE:
781                  return False;                          in_uint16_le(s, x);
782          }                          in_uint16_le(s, y);
783                            if (s_check(s))
784                                    ui_move_pointer(x, y);
785                            break;
786    
787          res = res ? lsb_io_uint16(s, &caps->userid) : False;                  case RDP_POINTER_COLOR:
788          res = res ? lsb_io_uint16(s, &caps->pad   ) : False;                          process_colour_pointer_pdu(s);
789                            break;
790    
791                    case RDP_POINTER_CACHED:
792                            process_cached_pointer_pdu(s);
793                            break;
794    
795          return res;                  case RDP_POINTER_SYSTEM:
796                            process_system_pointer_pdu(s);
797                            break;
798    
799                    default:
800                            unimpl("Pointer message 0x%x\n", message_type);
801            }
802  }  }
803    
804  BOOL rdp_io_colcache_caps(STREAM s, RDP_COLCACHE_CAPS *caps)  /* Process bitmap updates */
805    void
806    process_bitmap_updates(STREAM s)
807  {  {
808          uint16 length = RDP_CAPLEN_COLCACHE;          uint16 num_updates;
809          uint16 pkt_length = length;          uint16 left, top, right, bottom, width, height;
810          BOOL res;          uint16 cx, cy, bpp, Bpp, compress, bufsize, size;
811            uint8 *data, *bmpdata;
812            int i;
813    
814            in_uint16_le(s, num_updates);
815    
816          res = lsb_io_uint16(s, &pkt_length);          for (i = 0; i < num_updates; i++)
         if (pkt_length != length)  
817          {          {
818                  fprintf(stderr, "Unrecognised capabilities size\n");                  in_uint16_le(s, left);
819                  return False;                  in_uint16_le(s, top);
820          }                  in_uint16_le(s, right);
821                    in_uint16_le(s, bottom);
822                    in_uint16_le(s, width);
823                    in_uint16_le(s, height);
824                    in_uint16_le(s, bpp);
825                    Bpp = (bpp + 7) / 8;
826                    in_uint16_le(s, compress);
827                    in_uint16_le(s, bufsize);
828    
829          res = res ? lsb_io_uint16(s, &caps->cache_size) : False;                  cx = right - left + 1;
830          res = res ? lsb_io_uint16(s, &caps->pad       ) : False;                  cy = bottom - top + 1;
831    
832          return res;                  DEBUG(("BITMAP_UPDATE(l=%d,t=%d,r=%d,b=%d,w=%d,h=%d,Bpp=%d,cmp=%d)\n",
833  }                         left, top, right, bottom, width, height, Bpp, compress));
834    
835  uint8 canned_caps[] = {                  if (!compress)
836  0x01,0x00,0x00,0x00,0x09,0x04,0x00,0x00,0x04,                  {
837  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0C,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,                          int y;
838  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,                          bmpdata = (uint8 *) xmalloc(width * height * Bpp);
839  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,                          for (y = 0; y < height; y++)
840  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,                          {
841  0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0C,0x00,0x08,0x00,0x01,                                  in_uint8a(s, &bmpdata[(height - y - 1) * (width * Bpp)],
842  0x00,0x00,0x00,0x0E,0x00,0x08,0x00,0x01,0x00,0x00,0x00,0x10,0x00,0x34,0x00,0xFE,                                            width * Bpp);
843  0x00,0x04,0x00,0xFE,0x00,0x04,0x00,0xFE,0x00,0x08,0x00,0xFE,0x00,0x08,0x00,0xFE,                          }
844  0x00,0x10,0x00,0xFE,0x00,0x20,0x00,0xFE,0x00,0x40,0x00,0xFE,0x00,0x80,0x00,0xFE,                          ui_paint_bitmap(left, top, cx, cy, width, height, bmpdata);
845  0x00,0x00,0x01,0x40,0x00,0x00,0x08,0x00,0x01,0x00,0x01,0x02,0x00,0x00,0x00                          xfree(bmpdata);
846  };                          continue;
847                    }
 BOOL rdp_io_unknown_caps(STREAM s, void *caps)  
 {  
         uint16 length = 0x58;  
         uint16 pkt_length = length;  
         BOOL res;  
848    
         res = lsb_io_uint16(s, &pkt_length);  
         if (pkt_length != length)  
         {  
                 fprintf(stderr, "Unrecognised capabilities size\n");  
                 return False;  
         }  
849    
850          res = res ? prs_io_uint8s(s, canned_caps, RDP_CAPLEN_UNKNOWN-4) : False;                  if (compress & 0x400)
851                    {
852                            size = bufsize;
853                    }
854                    else
855                    {
856                            in_uint8s(s, 2);        /* pad */
857                            in_uint16_le(s, size);
858                            in_uint8s(s, 4);        /* line_size, final_size */
859                    }
860                    in_uint8p(s, data, size);
861                    bmpdata = (uint8 *) xmalloc(width * height * Bpp);
862                    if (bitmap_decompress(bmpdata, width, height, data, size, Bpp))
863                    {
864                            ui_paint_bitmap(left, top, cx, cy, width, height, bmpdata);
865                    }
866                    else
867                    {
868                            DEBUG_RDP5(("Failed to decompress data\n"));
869                    }
870    
871          return res;                  xfree(bmpdata);
872            }
873  }  }
874    
875  BOOL rdp_io_active_pdu(STREAM s, RDP_ACTIVE_PDU *pdu, int pdutype)  /* Process a palette update */
876    void
877    process_palette(STREAM s)
878  {  {
879          uint16 capset;          COLOURENTRY *entry;
880          uint16 length;          COLOURMAP map;
881          BOOL res;          HCOLOURMAP hmap;
882          int i;          int i;
883    
884          res = lsb_io_uint32(s, &pdu->shareid);          in_uint8s(s, 2);        /* pad */
885            in_uint16_le(s, map.ncolours);
886            in_uint8s(s, 2);        /* pad */
887    
888          if (pdutype == RDP_PDU_CONFIRM_ACTIVE)          map.colours = (COLOURENTRY *) xmalloc(sizeof(COLOURENTRY) * map.ncolours);
                 res = res ? lsb_io_uint16(s, &pdu->userid    ) : False;  
889    
890          res = res ? lsb_io_uint16(s, &pdu->source_len) : False;          DEBUG(("PALETTE(c=%d)\n", map.ncolours));
         res = res ? lsb_io_uint16(s, &pdu->caps_len  ) : False;  
891    
892          if (pdu->source_len > 48)          for (i = 0; i < map.ncolours; i++)
893          {          {
894                  fprintf(stderr, "RDP source descriptor too long\n");                  entry = &map.colours[i];
895                  return False;                  in_uint8(s, entry->red);
896                    in_uint8(s, entry->green);
897                    in_uint8(s, entry->blue);
898          }          }
899    
900          res = res ? prs_io_uint8s(s,  pdu->source, pdu->source_len) : False;          hmap = ui_create_colourmap(&map);
901          res = res ? lsb_io_uint16(s, &pdu->num_caps  ) : False;          ui_set_colourmap(hmap);
         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;  
902    
903                          if (!lsb_io_uint16(s, &capset))          xfree(map.colours);
904                                  return False;  }
905    
906                          switch (capset)  /* Process an update PDU */
907                          {  static void
908                          case RDP_CAPSET_GENERAL:  process_update_pdu(STREAM s)
909                                  res = rdp_io_general_caps (s, &pdu->general_caps );  {
910                                  break;          uint16 update_type, count;
                         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:  
                                 fprintf(stderr, "Warning: Unrecognised capset %x\n",  
                                         capset);  
911    
912                                  if (!lsb_io_uint16(s, &length))          in_uint16_le(s, update_type);
                                         return False;  
913    
914                                  s->offset += (length - 4);          switch (update_type)
915                          }          {
916                  }                  case RDP_UPDATE_ORDERS:
917          }                          in_uint8s(s, 2);        /* pad */
918                            in_uint16_le(s, count);
919                            in_uint8s(s, 2);        /* pad */
920                            process_orders(s, count);
921                            break;
922    
923          return res;                  case RDP_UPDATE_BITMAP:
924  }                          process_bitmap_updates(s);
925                            break;
926    
927  BOOL rdp_io_control_pdu(STREAM s, RDP_CONTROL_PDU *pdu)                  case RDP_UPDATE_PALETTE:
928  {                          process_palette(s);
929          BOOL res = True;                          break;
930    
931          res = res ? lsb_io_uint16(s, &pdu->action   ) : False;                  case RDP_UPDATE_SYNCHRONIZE:
932          res = res ? lsb_io_uint16(s, &pdu->userid   ) : False;                          break;
933          res = res ? lsb_io_uint32(s, &pdu->controlid) : False;  
934                    default:
935                            unimpl("update %d\n", update_type);
936            }
937    
         return res;  
938  }  }
939    
940  BOOL rdp_io_synchronize_pdu(STREAM s, RDP_SYNCHRONIZE_PDU *pdu)  /* Process a disconnect PDU */
941    void
942    process_disconnect_pdu(STREAM s, uint32 * ext_disc_reason)
943  {  {
944          BOOL res = True;          in_uint32_le(s, *ext_disc_reason);
   
         res = res ? lsb_io_uint16(s, &pdu->type  ) : False;  
         res = res ? lsb_io_uint16(s, &pdu->userid) : False;  
945    
946          return res;          DEBUG(("Received disconnect PDU\n"));
947  }  }
948    
949  BOOL rdp_io_input_event(STREAM s, RDP_INPUT_EVENT *evt)  /* Process data PDU */
950    static BOOL
951    process_data_pdu(STREAM s, uint32 * ext_disc_reason)
952  {  {
953          BOOL res = True;          uint8 data_pdu_type;
954            uint8 ctype;
955            uint16 clen;
956            int len;
957    #if 0
958            int roff, rlen, ret;
959            static struct stream ns;
960            static signed char *dict = 0;
961    #endif
962    
963          res = res ? lsb_io_uint32(s, &evt->event_time)   : False;          in_uint8s(s, 6);        /* shareid, pad, streamid */
964          res = res ? lsb_io_uint16(s, &evt->message_type) : False;          in_uint16(s, len);
965            in_uint8(s, data_pdu_type);
966          if (!res)          in_uint8(s, ctype);
967                  return False;          in_uint16(s, clen);
968            clen -= 18;
969    
970          switch (evt->message_type)  #if 0
971            if (ctype & 0x20)
972          {          {
973          case RDP_INPUT_CODEPOINT:                  if (!dict)
974          case RDP_INPUT_VIRTKEY:                  {
975                  res = res ? lsb_io_uint16(s, &evt->device_flags) : False;                          dict = (signed char *) malloc(8200 * sizeof(signed char));
976                  res = res ? lsb_io_uint16(s, &evt->kbd_keycode ) : False;                          dict = (signed char *) memset(dict, 0, 8200 * sizeof(signed char));
977                  break;                  }
         case RDP_INPUT_SYNCHRONIZE:  
         case RDP_INPUT_UNKNOWN:  
         case RDP_INPUT_MOUSE:  
                 res = res ? lsb_io_uint16(s, &evt->device_flags) : False;  
                 res = res ? lsb_io_uint16(s, &evt->mouse_x     ) : False;  
                 res = res ? lsb_io_uint16(s, &evt->mouse_y     ) : False;  
                 break;  
         default:  
                 fprintf(stderr, "Unknown input type %d\n", evt->message_type);  
                 return False;  
         }  
978    
979          return res;                  ret = decompress(s->p, clen, ctype, (signed char *) dict, &roff, &rlen);
 }  
980    
981  BOOL rdp_io_input_pdu(STREAM s, RDP_INPUT_PDU *pdu)                  len -= 18;
 {  
         BOOL res = True;  
         int i;  
982    
983          res = res ? lsb_io_uint16(s, &pdu->num_events) : False;                  ns.data = xrealloc(ns.data, len);
         res = res ? lsb_io_uint16(s, &pdu->pad       ) : False;  
984    
985          if (pdu->num_events > RDP_MAX_EVENTS)                  ns.data = (unsigned char *) memcpy(ns.data, (unsigned char *) (dict + roff), len);
         {  
                 fprintf(stderr, "Too many events in one PDU\n");  
                 return False;  
         }  
986    
987          for (i = 0; i < pdu->num_events; i++)                  ns.size = len;
988          {                  ns.end = ns.data + ns.size;
989                  res = res ? rdp_io_input_event(s, &pdu->event[i]) : False;                  ns.p = ns.data;
990                    ns.rdp_hdr = ns.p;
991    
992                    s = &ns;
993          }          }
994    #endif
995    
996          return res;          switch (data_pdu_type)
997  }          {
998                    case RDP_DATA_PDU_UPDATE:
999                            process_update_pdu(s);
1000                            break;
1001    
1002  BOOL rdp_io_font_info(STREAM s, RDP_FONT_INFO *font)                  case RDP_DATA_PDU_CONTROL:
1003  {                          DEBUG(("Received Control PDU\n"));
1004          BOOL res = True;                          break;
1005    
1006          res = res ? prs_io_uint8s(s,  font->name, 32 ) : False;                  case RDP_DATA_PDU_SYNCHRONISE:
1007          res = res ? lsb_io_uint16(s, &font->flags    ) : False;                          DEBUG(("Received Sync PDU\n"));
1008          res = res ? lsb_io_uint16(s, &font->width    ) : False;                          break;
         res = res ? lsb_io_uint16(s, &font->height   ) : False;  
         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;  
1009    
1010          return res;                  case RDP_DATA_PDU_POINTER:
1011  }                          process_pointer_pdu(s);
1012                            break;
1013    
1014  BOOL rdp_io_font_pdu(STREAM s, RDP_FONT_PDU *pdu)                  case RDP_DATA_PDU_BELL:
1015  {                          ui_bell();
1016          BOOL res = True;                          break;
         int i;  
1017    
1018          res = res ? lsb_io_uint16(s, &pdu->num_fonts ) : False;                  case RDP_DATA_PDU_LOGON:
1019          res = res ? lsb_io_uint16(s, &pdu->unknown1  ) : False;                          DEBUG(("Received Logon PDU\n"));
1020          res = res ? lsb_io_uint16(s, &pdu->unknown2  ) : False;                          /* User logged on */
1021          res = res ? lsb_io_uint16(s, &pdu->entry_size) : False;                          break;
1022    
1023          if (pdu->num_fonts > RDP_MAX_FONTS)                  case RDP_DATA_PDU_DISCONNECT:
1024          {                          process_disconnect_pdu(s, ext_disc_reason);
1025                  fprintf(stderr, "Too many fonts in one PDU\n");                          return True;
                 return False;  
         }  
1026    
1027          for (i = 0; i < pdu->num_fonts; i++)                  default:
1028          {                          unimpl("data PDU %d\n", data_pdu_type);
                 res = res ? rdp_io_font_info(s, &pdu->font[i]) : False;  
1029          }          }
1030            return False;
         return res;  
1031  }  }
1032    
1033  BOOL rdp_io_update_pdu(STREAM s, RDP_UPDATE_PDU *pdu)  /* Process incoming packets */
1034    void
1035    rdp_main_loop(BOOL * deactivated, uint32 * ext_disc_reason)
1036  {  {
1037          BOOL res = True;          uint8 type;
1038            BOOL disc = False;      /* True when a disconnect PDU was received */
1039            STREAM s;
1040    
1041          res = res ? lsb_io_uint16(s, &pdu->update_type) : False;          while ((s = rdp_recv(&type)) != NULL)
1042          res = res ? lsb_io_uint16(s, &pdu->pad        ) : False;          {
1043                    switch (type)
1044                    {
1045                            case RDP_PDU_DEMAND_ACTIVE:
1046                                    process_demand_active(s);
1047                                    *deactivated = False;
1048                                    break;
1049    
1050          return res;                          case RDP_PDU_DEACTIVATE:
1051  }                                  DEBUG(("RDP_PDU_DEACTIVATE\n"));
1052                                    *deactivated = True;
1053                                    break;
1054    
1055  BOOL rdp_io_secondary_order(STREAM s, RDP_SECONDARY_ORDER *rso)                          case RDP_PDU_DATA:
1056  {                                  disc = process_data_pdu(s, ext_disc_reason);
1057          BOOL res = True;                                  break;
1058    
1059          res = res ? lsb_io_uint16(s, &rso->length) : False;                          case 0:
1060          res = res ? lsb_io_uint16(s, &rso->flags ) : False;                                  break;
         res = res ? prs_io_uint8 (s, &rso->type  ) : False;  
1061    
1062          return res;                          default:
1063                                    unimpl("PDU %d\n", type);
1064                    }
1065    
1066                    if (disc)
1067                    {
1068                            return;
1069                    }
1070            }
1071            return;
1072  }  }
1073    
1074  BOOL rdp_io_bitmap_header(STREAM s, RDP_BITMAP_HEADER *rdh)  /* Establish a connection up to the RDP layer */
1075    BOOL
1076    rdp_connect(char *server, uint32 flags, char *domain, char *password,
1077                char *command, char *directory)
1078  {  {
1079          BOOL res = True;          if (!sec_connect(server, g_username))
1080                    return False;
1081    
1082          res = res ? prs_io_uint8 (s, &rdh->cache_id  ) : False;          rdp_send_logon_info(flags, domain, g_username, password, command, directory);
1083          res = res ? prs_io_uint8 (s, &rdh->pad1      ) : False;          return True;
1084          res = res ? prs_io_uint8 (s, &rdh->width     ) : False;  }
         res = res ? prs_io_uint8 (s, &rdh->height    ) : False;  
         res = res ? prs_io_uint8 (s, &rdh->bpp       ) : False;  
         res = res ? lsb_io_uint16(s, &rdh->bufsize   ) : False;  
         res = res ? lsb_io_uint16(s, &rdh->cache_idx ) : False;  
         res = res ? lsb_io_uint16(s, &rdh->pad2      ) : False;  
         res = res ? lsb_io_uint16(s, &rdh->size      ) : False;  
         res = res ? lsb_io_uint16(s, &rdh->row_size  ) : False;  
         res = res ? lsb_io_uint16(s, &rdh->final_size) : False;  
1085    
1086          return res;  /* Disconnect from the RDP layer */
1087    void
1088    rdp_disconnect(void)
1089    {
1090            sec_disconnect();
1091  }  }
Legend:
Removed from v.3  
changed lines
  Added in v.677
  ViewVC Help
Powered by ViewVC 1.1.26