FreeRDP
Loading...
Searching...
No Matches
pf_channel_rdpdr.c
1
21#include <freerdp/config.h>
22
23#include <winpr/assert.h>
24#include <winpr/cast.h>
25#include <winpr/string.h>
26#include <winpr/print.h>
27
28#include "pf_channel_rdpdr.h"
29#include "pf_channel_smartcard.h"
30
31#include <freerdp/server/proxy/proxy_log.h>
32#include <freerdp/channels/rdpdr.h>
33#include <freerdp/channels/channels.h>
34#include <freerdp/utils/rdpdr_utils.h>
35
36#define RTAG PROXY_TAG("channel.rdpdr")
37
38#define SCARD_DEVICE_ID UINT32_MAX
39
40typedef struct
41{
42 InterceptContextMapEntry base;
43 wStream* s;
44 wStream* buffer;
45 UINT16 versionMajor;
46 UINT16 versionMinor;
47 UINT32 clientID;
48 UINT32 computerNameLen;
49 BOOL computerNameUnicode;
50 union
51 {
52 WCHAR* wc;
53 char* c;
54 void* v;
55 } computerName;
56 UINT32 SpecialDeviceCount;
57 UINT32 capabilityVersions[6];
58} pf_channel_common_context;
59
60typedef enum
61{
62 STATE_CLIENT_EXPECT_SERVER_ANNOUNCE_REQUEST = 0x01,
63 STATE_CLIENT_EXPECT_SERVER_CORE_CAPABILITY_REQUEST = 0x02,
64 STATE_CLIENT_EXPECT_SERVER_CLIENT_ID_CONFIRM = 0x04,
65 STATE_CLIENT_CHANNEL_RUNNING = 0x10
66} pf_channel_client_state;
67
68typedef struct
69{
70 pf_channel_common_context common;
71 pf_channel_client_state state;
72 UINT32 flags;
73 UINT16 maxMajorVersion;
74 UINT16 maxMinorVersion;
75 wQueue* queue;
76 wLog* log;
77} pf_channel_client_context;
78
79typedef enum
80{
81 STATE_SERVER_INITIAL,
82 STATE_SERVER_EXPECT_CLIENT_ANNOUNCE_REPLY,
83 STATE_SERVER_EXPECT_CLIENT_NAME_REQUEST,
84 STATE_SERVER_EXPECT_EXPECT_CLIENT_CAPABILITY_RESPONE,
85 STATE_SERVER_CHANNEL_RUNNING
86} pf_channel_server_state;
87
88typedef struct
89{
90 pf_channel_common_context common;
91 pf_channel_server_state state;
92 DWORD SessionId;
93 HANDLE handle;
94 wArrayList* blockedDevices;
95 wLog* log;
96} pf_channel_server_context;
97
98#define proxy_client "[proxy<-->client]"
99#define proxy_server "[proxy<-->server]"
100
101#define proxy_client_rx proxy_client " receive"
102#define proxy_client_tx proxy_client " send"
103#define proxy_server_rx proxy_server " receive"
104#define proxy_server_tx proxy_server " send"
105
106#define SERVER_RX_LOG(log, lvl, fmt, ...) WLog_Print(log, lvl, proxy_client_rx fmt, ##__VA_ARGS__)
107#define CLIENT_RX_LOG(log, lvl, fmt, ...) WLog_Print(log, lvl, proxy_server_rx fmt, ##__VA_ARGS__)
108#define SERVER_TX_LOG(log, lvl, fmt, ...) WLog_Print(log, lvl, proxy_client_tx fmt, ##__VA_ARGS__)
109#define CLIENT_TX_LOG(log, lvl, fmt, ...) WLog_Print(log, lvl, proxy_server_tx fmt, ##__VA_ARGS__)
110#define RX_LOG(srv, lvl, fmt, ...) \
111 do \
112 { \
113 if (srv) \
114 { \
115 SERVER_RX_LOG(lvl, fmt, ##__VA_ARGS__); \
116 } \
117 else \
118 { \
119 CLIENT_RX_LOG(lvl, fmt, ##__VA_ARGS__); \
120 } \
121 } while (0)
122
123#define SERVER_RXTX_LOG(send, log, lvl, fmt, ...) \
124 do \
125 { \
126 if (send) \
127 { \
128 SERVER_TX_LOG(log, lvl, fmt, ##__VA_ARGS__); \
129 } \
130 else \
131 { \
132 SERVER_RX_LOG(log, lvl, fmt, ##__VA_ARGS__); \
133 } \
134 } while (0)
135
136#define Stream_CheckAndLogRequiredLengthSrv(log, s, len) \
137 Stream_CheckAndLogRequiredLengthWLogEx(log, WLOG_WARN, s, len, 1, \
138 proxy_client_rx " %s(%s:%" PRIuz ")", __func__, \
139 __FILE__, (size_t)__LINE__)
140#define Stream_CheckAndLogRequiredLengthClient(log, s, len) \
141 Stream_CheckAndLogRequiredLengthWLogEx(log, WLOG_WARN, s, len, 1, \
142 proxy_server_rx " %s(%s:%" PRIuz ")", __func__, \
143 __FILE__, (size_t)__LINE__)
144#define Stream_CheckAndLogRequiredLengthRx(srv, log, s, len) \
145 Stream_CheckAndLogRequiredLengthRx_(srv, log, s, len, 1, __func__, __FILE__, __LINE__)
146static BOOL Stream_CheckAndLogRequiredLengthRx_(BOOL srv, wLog* log, wStream* s, size_t nmemb,
147 size_t size, const char* fkt, const char* file,
148 size_t line)
149{
150 const char* fmt =
151 srv ? proxy_server_rx " %s(%s:%" PRIuz ")" : proxy_client_rx " %s(%s:%" PRIuz ")";
152
153 return Stream_CheckAndLogRequiredLengthWLogEx(log, WLOG_WARN, s, nmemb, size, fmt, fkt, file,
154 line);
155}
156
157static const char* rdpdr_server_state_to_string(pf_channel_server_state state)
158{
159 switch (state)
160 {
161 case STATE_SERVER_INITIAL:
162 return "STATE_SERVER_INITIAL";
163 case STATE_SERVER_EXPECT_CLIENT_ANNOUNCE_REPLY:
164 return "STATE_SERVER_EXPECT_CLIENT_ANNOUNCE_REPLY";
165 case STATE_SERVER_EXPECT_CLIENT_NAME_REQUEST:
166 return "STATE_SERVER_EXPECT_CLIENT_NAME_REQUEST";
167 case STATE_SERVER_EXPECT_EXPECT_CLIENT_CAPABILITY_RESPONE:
168 return "STATE_SERVER_EXPECT_EXPECT_CLIENT_CAPABILITY_RESPONE";
169 case STATE_SERVER_CHANNEL_RUNNING:
170 return "STATE_SERVER_CHANNEL_RUNNING";
171 default:
172 return "STATE_SERVER_UNKNOWN";
173 }
174}
175
176static const char* rdpdr_client_state_to_string(pf_channel_client_state state)
177{
178 switch (state)
179 {
180 case STATE_CLIENT_EXPECT_SERVER_ANNOUNCE_REQUEST:
181 return "STATE_CLIENT_EXPECT_SERVER_ANNOUNCE_REQUEST";
182 case STATE_CLIENT_EXPECT_SERVER_CORE_CAPABILITY_REQUEST:
183 return "STATE_CLIENT_EXPECT_SERVER_CORE_CAPABILITY_REQUEST";
184 case STATE_CLIENT_EXPECT_SERVER_CLIENT_ID_CONFIRM:
185 return "STATE_CLIENT_EXPECT_SERVER_CLIENT_ID_CONFIRM";
186 case STATE_CLIENT_CHANNEL_RUNNING:
187 return "STATE_CLIENT_CHANNEL_RUNNING";
188 default:
189 return "STATE_CLIENT_UNKNOWN";
190 }
191}
192
193static wStream* rdpdr_get_send_buffer(pf_channel_common_context* rdpdr, UINT16 component,
194 UINT16 PacketID, size_t capacity)
195{
196 WINPR_ASSERT(rdpdr);
197 WINPR_ASSERT(rdpdr->s);
198 if (!Stream_SetPosition(rdpdr->s, 0))
199 return NULL;
200 if (!Stream_EnsureCapacity(rdpdr->s, capacity + 4))
201 return NULL;
202 Stream_Write_UINT16(rdpdr->s, component);
203 Stream_Write_UINT16(rdpdr->s, PacketID);
204 return rdpdr->s;
205}
206
207static wStream* rdpdr_client_get_send_buffer(pf_channel_client_context* rdpdr, UINT16 component,
208 UINT16 PacketID, size_t capacity)
209{
210 WINPR_ASSERT(rdpdr);
211 return rdpdr_get_send_buffer(&rdpdr->common, component, PacketID, capacity);
212}
213
214static wStream* rdpdr_server_get_send_buffer(pf_channel_server_context* rdpdr, UINT16 component,
215 UINT16 PacketID, size_t capacity)
216{
217 WINPR_ASSERT(rdpdr);
218 return rdpdr_get_send_buffer(&rdpdr->common, component, PacketID, capacity);
219}
220
221static UINT rdpdr_client_send(wLog* log, pClientContext* pc, wStream* s)
222{
223 UINT16 channelId = 0;
224
225 WINPR_ASSERT(log);
226 WINPR_ASSERT(pc);
227 WINPR_ASSERT(s);
228 WINPR_ASSERT(pc->context.instance);
229
230 if (!pc->connected)
231 {
232 CLIENT_TX_LOG(log, WLOG_WARN, "Ignoring channel %s message, not connected!",
233 RDPDR_SVC_CHANNEL_NAME);
234 return CHANNEL_RC_OK;
235 }
236
237 channelId = freerdp_channels_get_id_by_name(pc->context.instance, RDPDR_SVC_CHANNEL_NAME);
238 /* Ignore unmappable channels. Might happen when the channel was already down and
239 * some delayed message is tried to be sent. */
240 if ((channelId == 0) || (channelId == UINT16_MAX))
241 return ERROR_INTERNAL_ERROR;
242
243 Stream_SealLength(s);
244 rdpdr_dump_send_packet(log, WLOG_TRACE, s, proxy_server_tx);
245 WINPR_ASSERT(pc->context.instance->SendChannelData);
246 if (!pc->context.instance->SendChannelData(pc->context.instance, channelId, Stream_Buffer(s),
247 Stream_Length(s)))
248 return ERROR_EVT_CHANNEL_NOT_FOUND;
249 return CHANNEL_RC_OK;
250}
251
252static UINT rdpdr_seal_send_free_request(pf_channel_server_context* context, wStream* s)
253{
254 BOOL status = 0;
255 size_t len = 0;
256
257 WINPR_ASSERT(context);
258 WINPR_ASSERT(context->handle);
259 WINPR_ASSERT(s);
260
261 Stream_SealLength(s);
262 len = Stream_Length(s);
263 WINPR_ASSERT(len <= UINT32_MAX);
264
265 rdpdr_dump_send_packet(context->log, WLOG_TRACE, s, proxy_client_tx);
266 status = WTSVirtualChannelWrite(context->handle, Stream_BufferAs(s, char), (ULONG)len, NULL);
267 return (status) ? CHANNEL_RC_OK : ERROR_INTERNAL_ERROR;
268}
269
270static BOOL rdpdr_process_server_header(BOOL server, wLog* log, wStream* s, UINT16 component,
271 UINT16 PacketId, size_t expect)
272{
273 UINT16 rpacketid = 0;
274 UINT16 rcomponent = 0;
275
276 WINPR_ASSERT(s);
277 if (!Stream_CheckAndLogRequiredLengthRx(server, log, s, 4))
278 {
279 RX_LOG(server, log, WLOG_WARN, "RDPDR_HEADER[%s | %s]: expected length 4, got %" PRIuz,
280 rdpdr_component_string(component), rdpdr_packetid_string(PacketId),
281 Stream_GetRemainingLength(s));
282 return FALSE;
283 }
284
285 Stream_Read_UINT16(s, rcomponent);
286 Stream_Read_UINT16(s, rpacketid);
287
288 if (rcomponent != component)
289 {
290 RX_LOG(server, log, WLOG_WARN, "RDPDR_HEADER[%s | %s]: got component %s",
291 rdpdr_component_string(component), rdpdr_packetid_string(PacketId),
292 rdpdr_component_string(rcomponent));
293 return FALSE;
294 }
295
296 if (rpacketid != PacketId)
297 {
298 RX_LOG(server, log, WLOG_WARN, "RDPDR_HEADER[%s | %s]: got PacketID %s",
299 rdpdr_component_string(component), rdpdr_packetid_string(PacketId),
300 rdpdr_packetid_string(rpacketid));
301 return FALSE;
302 }
303
304 if (!Stream_CheckAndLogRequiredLengthRx(server, log, s, expect))
305 {
306 RX_LOG(server, log, WLOG_WARN,
307 "RDPDR_HEADER[%s | %s] not enough data, expected %" PRIuz ", "
308 "got %" PRIuz,
309 rdpdr_component_string(component), rdpdr_packetid_string(PacketId), expect,
310 Stream_GetRemainingLength(s));
311 return ERROR_INVALID_DATA;
312 }
313
314 return TRUE;
315}
316
317static BOOL rdpdr_check_version(BOOL server, wLog* log, UINT16 versionMajor, UINT16 versionMinor,
318 UINT16 component, UINT16 PacketId)
319{
320 if (versionMajor != RDPDR_VERSION_MAJOR)
321 {
322 RX_LOG(server, log, WLOG_WARN, "[%s | %s] expected MajorVersion %" PRIu16 ", got %" PRIu16,
323 rdpdr_component_string(component), rdpdr_packetid_string(PacketId),
324 RDPDR_VERSION_MAJOR, versionMajor);
325 return FALSE;
326 }
327 switch (versionMinor)
328 {
329 case RDPDR_VERSION_MINOR_RDP50:
330 case RDPDR_VERSION_MINOR_RDP51:
331 case RDPDR_VERSION_MINOR_RDP52:
332 case RDPDR_VERSION_MINOR_RDP6X:
333 case RDPDR_VERSION_MINOR_RDP10X:
334 break;
335 default:
336 {
337 RX_LOG(server, log, WLOG_WARN, "[%s | %s] unsupported MinorVersion %" PRIu16,
338 rdpdr_component_string(component), rdpdr_packetid_string(PacketId),
339 versionMinor);
340 return FALSE;
341 }
342 }
343 return TRUE;
344}
345
346static UINT rdpdr_process_server_announce_request(pf_channel_client_context* rdpdr, wStream* s)
347{
348 const UINT16 component = RDPDR_CTYP_CORE;
349 const UINT16 packetid = PAKID_CORE_SERVER_ANNOUNCE;
350 WINPR_ASSERT(rdpdr);
351 WINPR_ASSERT(s);
352
353 if (!rdpdr_process_server_header(FALSE, rdpdr->log, s, component, packetid, 8))
354 return ERROR_INVALID_DATA;
355
356 Stream_Read_UINT16(s, rdpdr->common.versionMajor);
357 Stream_Read_UINT16(s, rdpdr->common.versionMinor);
358
359 if (!rdpdr_check_version(FALSE, rdpdr->log, rdpdr->common.versionMajor,
360 rdpdr->common.versionMinor, component, packetid))
361 return ERROR_INVALID_DATA;
362
363 /* Limit maximum channel protocol version to the one set by proxy server */
364 if (rdpdr->common.versionMajor > rdpdr->maxMajorVersion)
365 {
366 rdpdr->common.versionMajor = rdpdr->maxMajorVersion;
367 rdpdr->common.versionMinor = rdpdr->maxMinorVersion;
368 }
369 else if (rdpdr->common.versionMinor > rdpdr->maxMinorVersion)
370 rdpdr->common.versionMinor = rdpdr->maxMinorVersion;
371
372 Stream_Read_UINT32(s, rdpdr->common.clientID);
373 return CHANNEL_RC_OK;
374}
375
376static UINT rdpdr_server_send_announce_request(pf_channel_server_context* context)
377{
378 wStream* s =
379 rdpdr_server_get_send_buffer(context, RDPDR_CTYP_CORE, PAKID_CORE_SERVER_ANNOUNCE, 8);
380 if (!s)
381 return CHANNEL_RC_NO_MEMORY;
382
383 Stream_Write_UINT16(s, context->common.versionMajor); /* VersionMajor (2 bytes) */
384 Stream_Write_UINT16(s, context->common.versionMinor); /* VersionMinor (2 bytes) */
385 Stream_Write_UINT32(s, context->common.clientID); /* ClientId (4 bytes) */
386 return rdpdr_seal_send_free_request(context, s);
387}
388
389static UINT rdpdr_process_client_announce_reply(pf_channel_server_context* rdpdr, wStream* s)
390{
391 const UINT16 component = RDPDR_CTYP_CORE;
392 const UINT16 packetid = PAKID_CORE_CLIENTID_CONFIRM;
393 UINT16 versionMajor = 0;
394 UINT16 versionMinor = 0;
395 UINT32 clientID = 0;
396
397 WINPR_ASSERT(rdpdr);
398 WINPR_ASSERT(s);
399
400 if (!rdpdr_process_server_header(TRUE, rdpdr->log, s, component, packetid, 8))
401 return ERROR_INVALID_DATA;
402
403 Stream_Read_UINT16(s, versionMajor);
404 Stream_Read_UINT16(s, versionMinor);
405
406 if (!rdpdr_check_version(TRUE, rdpdr->log, versionMajor, versionMinor, component, packetid))
407 return ERROR_INVALID_DATA;
408
409 if ((rdpdr->common.versionMajor != versionMajor) ||
410 (rdpdr->common.versionMinor != versionMinor))
411 {
412 SERVER_RX_LOG(
413 rdpdr->log, WLOG_WARN,
414 "[%s | %s] downgrading version from %" PRIu16 ".%" PRIu16 " to %" PRIu16 ".%" PRIu16,
415 rdpdr_component_string(component), rdpdr_packetid_string(packetid),
416 rdpdr->common.versionMajor, rdpdr->common.versionMinor, versionMajor, versionMinor);
417 rdpdr->common.versionMajor = versionMajor;
418 rdpdr->common.versionMinor = versionMinor;
419 }
420 Stream_Read_UINT32(s, clientID);
421 if (rdpdr->common.clientID != clientID)
422 {
423 SERVER_RX_LOG(rdpdr->log, WLOG_WARN,
424 "[%s | %s] changing clientID 0x%08" PRIu32 " to 0x%08" PRIu32,
425 rdpdr_component_string(component), rdpdr_packetid_string(packetid),
426 rdpdr->common.clientID, clientID);
427 rdpdr->common.clientID = clientID;
428 }
429
430 return CHANNEL_RC_OK;
431}
432
433static UINT rdpdr_send_client_announce_reply(pClientContext* pc, pf_channel_client_context* rdpdr)
434{
435 wStream* s =
436 rdpdr_client_get_send_buffer(rdpdr, RDPDR_CTYP_CORE, PAKID_CORE_CLIENTID_CONFIRM, 8);
437 if (!s)
438 return CHANNEL_RC_NO_MEMORY;
439
440 Stream_Write_UINT16(s, rdpdr->common.versionMajor);
441 Stream_Write_UINT16(s, rdpdr->common.versionMinor);
442 Stream_Write_UINT32(s, rdpdr->common.clientID);
443 return rdpdr_client_send(rdpdr->log, pc, s);
444}
445
446static UINT rdpdr_process_client_name_request(pf_channel_server_context* rdpdr, wStream* s,
447 pClientContext* pc)
448{
449 UINT32 unicodeFlag = 0;
450 UINT32 codePage = 0;
451
452 WINPR_ASSERT(rdpdr);
453 WINPR_ASSERT(s);
454 WINPR_ASSERT(pc);
455
456 if (!rdpdr_process_server_header(TRUE, rdpdr->log, s, RDPDR_CTYP_CORE, PAKID_CORE_CLIENT_NAME,
457 12))
458 return ERROR_INVALID_DATA;
459
460 Stream_Read_UINT32(s, unicodeFlag);
461 rdpdr->common.computerNameUnicode = ((unicodeFlag & 1) != 0) ? TRUE : FALSE;
462
463 Stream_Read_UINT32(s, codePage);
464 WINPR_UNUSED(codePage); /* Field is ignored */
465 Stream_Read_UINT32(s, rdpdr->common.computerNameLen);
466 if (!Stream_CheckAndLogRequiredLengthSrv(rdpdr->log, s, rdpdr->common.computerNameLen))
467 {
468 SERVER_RX_LOG(
469 rdpdr->log, WLOG_WARN, "[%s | %s]: missing data, got %" PRIu32 ", expected %" PRIu32,
470 rdpdr_component_string(RDPDR_CTYP_CORE), rdpdr_packetid_string(PAKID_CORE_CLIENT_NAME),
471 Stream_GetRemainingLength(s), rdpdr->common.computerNameLen);
472 return ERROR_INVALID_DATA;
473 }
474 void* tmp = realloc(rdpdr->common.computerName.v, rdpdr->common.computerNameLen);
475 if (!tmp)
476 return CHANNEL_RC_NO_MEMORY;
477 rdpdr->common.computerName.v = tmp;
478
479 Stream_Read(s, rdpdr->common.computerName.v, rdpdr->common.computerNameLen);
480
481 pc->computerNameLen = rdpdr->common.computerNameLen;
482 pc->computerNameUnicode = rdpdr->common.computerNameUnicode;
483 tmp = realloc(pc->computerName.v, pc->computerNameLen);
484 if (!tmp)
485 return CHANNEL_RC_NO_MEMORY;
486 pc->computerName.v = tmp;
487 memcpy(pc->computerName.v, rdpdr->common.computerName.v, pc->computerNameLen);
488
489 return CHANNEL_RC_OK;
490}
491
492static UINT rdpdr_send_client_name_request(pClientContext* pc, pf_channel_client_context* rdpdr)
493{
494 wStream* s = NULL;
495
496 WINPR_ASSERT(rdpdr);
497 WINPR_ASSERT(pc);
498
499 {
500 void* tmp = realloc(rdpdr->common.computerName.v, pc->computerNameLen);
501 if (!tmp)
502 return CHANNEL_RC_NO_MEMORY;
503 rdpdr->common.computerName.v = tmp;
504 rdpdr->common.computerNameLen = pc->computerNameLen;
505 rdpdr->common.computerNameUnicode = pc->computerNameUnicode;
506 memcpy(rdpdr->common.computerName.v, pc->computerName.v, pc->computerNameLen);
507 }
508 s = rdpdr_client_get_send_buffer(rdpdr, RDPDR_CTYP_CORE, PAKID_CORE_CLIENT_NAME,
509 12U + rdpdr->common.computerNameLen);
510 if (!s)
511 return CHANNEL_RC_NO_MEMORY;
512
513 Stream_Write_UINT32(s, rdpdr->common.computerNameUnicode
514 ? 1
515 : 0); /* unicodeFlag, 0 for ASCII and 1 for Unicode */
516 Stream_Write_UINT32(s, 0); /* codePage, must be set to zero */
517 Stream_Write_UINT32(s, rdpdr->common.computerNameLen);
518 Stream_Write(s, rdpdr->common.computerName.v, rdpdr->common.computerNameLen);
519 return rdpdr_client_send(rdpdr->log, pc, s);
520}
521
522#define rdpdr_ignore_capset(srv, log, s, header) \
523 rdpdr_ignore_capset_((srv), (log), (s), header, __func__)
524static UINT rdpdr_ignore_capset_(WINPR_ATTR_UNUSED BOOL srv, WINPR_ATTR_UNUSED wLog* log,
525 wStream* s, const RDPDR_CAPABILITY_HEADER* header,
526 WINPR_ATTR_UNUSED const char* fkt)
527{
528 WINPR_ASSERT(s);
529 WINPR_ASSERT(header);
530
531 Stream_Seek(s, header->CapabilityLength);
532 return CHANNEL_RC_OK;
533}
534
535static UINT rdpdr_client_process_general_capset(pf_channel_client_context* rdpdr, wStream* s,
536 const RDPDR_CAPABILITY_HEADER* header)
537{
538 WINPR_UNUSED(rdpdr);
539 return rdpdr_ignore_capset(FALSE, rdpdr->log, s, header);
540}
541
542static UINT rdpdr_process_printer_capset(pf_channel_client_context* rdpdr, wStream* s,
543 const RDPDR_CAPABILITY_HEADER* header)
544{
545 WINPR_UNUSED(rdpdr);
546 return rdpdr_ignore_capset(FALSE, rdpdr->log, s, header);
547}
548
549static UINT rdpdr_process_port_capset(pf_channel_client_context* rdpdr, wStream* s,
550 const RDPDR_CAPABILITY_HEADER* header)
551{
552 WINPR_UNUSED(rdpdr);
553 return rdpdr_ignore_capset(FALSE, rdpdr->log, s, header);
554}
555
556static UINT rdpdr_process_drive_capset(pf_channel_client_context* rdpdr, wStream* s,
557 const RDPDR_CAPABILITY_HEADER* header)
558{
559 WINPR_UNUSED(rdpdr);
560 return rdpdr_ignore_capset(FALSE, rdpdr->log, s, header);
561}
562
563static UINT rdpdr_process_smartcard_capset(pf_channel_client_context* rdpdr, wStream* s,
564 const RDPDR_CAPABILITY_HEADER* header)
565{
566 WINPR_UNUSED(rdpdr);
567 return rdpdr_ignore_capset(FALSE, rdpdr->log, s, header);
568}
569
570static UINT rdpdr_process_server_core_capability_request(pf_channel_client_context* rdpdr,
571 wStream* s)
572{
573 UINT status = CHANNEL_RC_OK;
574 UINT16 numCapabilities = 0;
575
576 WINPR_ASSERT(rdpdr);
577
578 if (!rdpdr_process_server_header(FALSE, rdpdr->log, s, RDPDR_CTYP_CORE,
579 PAKID_CORE_SERVER_CAPABILITY, 4))
580 return ERROR_INVALID_DATA;
581
582 Stream_Read_UINT16(s, numCapabilities);
583 Stream_Seek(s, 2); /* pad (2 bytes) */
584
585 for (UINT16 i = 0; i < numCapabilities; i++)
586 {
587 RDPDR_CAPABILITY_HEADER header = { 0 };
588 UINT error = rdpdr_read_capset_header(rdpdr->log, s, &header);
589 if (error != CHANNEL_RC_OK)
590 return error;
591
592 if (header.CapabilityType < ARRAYSIZE(rdpdr->common.capabilityVersions))
593 {
594 if (rdpdr->common.capabilityVersions[header.CapabilityType] > header.Version)
595 rdpdr->common.capabilityVersions[header.CapabilityType] = header.Version;
596
597 WLog_Print(rdpdr->log, WLOG_TRACE,
598 "capability %s got version %" PRIu32 ", will use version %" PRIu32,
599 rdpdr_cap_type_string(header.CapabilityType), header.Version,
600 rdpdr->common.capabilityVersions[header.CapabilityType]);
601 }
602
603 switch (header.CapabilityType)
604 {
605 case CAP_GENERAL_TYPE:
606 status = rdpdr_client_process_general_capset(rdpdr, s, &header);
607 break;
608
609 case CAP_PRINTER_TYPE:
610 status = rdpdr_process_printer_capset(rdpdr, s, &header);
611 break;
612
613 case CAP_PORT_TYPE:
614 status = rdpdr_process_port_capset(rdpdr, s, &header);
615 break;
616
617 case CAP_DRIVE_TYPE:
618 status = rdpdr_process_drive_capset(rdpdr, s, &header);
619 break;
620
621 case CAP_SMARTCARD_TYPE:
622 status = rdpdr_process_smartcard_capset(rdpdr, s, &header);
623 break;
624
625 default:
626 WLog_Print(rdpdr->log, WLOG_WARN,
627 "unknown capability 0x%04" PRIx16 ", length %" PRIu16
628 ", version %" PRIu32,
629 header.CapabilityType, header.CapabilityLength, header.Version);
630 Stream_Seek(s, header.CapabilityLength);
631 break;
632 }
633
634 if (status != CHANNEL_RC_OK)
635 return status;
636 }
637
638 return CHANNEL_RC_OK;
639}
640
641static BOOL rdpdr_write_general_capset(wLog* log, pf_channel_common_context* rdpdr, wStream* s)
642{
643 WINPR_ASSERT(rdpdr);
644 WINPR_ASSERT(s);
645
646 const RDPDR_CAPABILITY_HEADER header = { CAP_GENERAL_TYPE, 44,
647 rdpdr->capabilityVersions[CAP_GENERAL_TYPE] };
648 if (rdpdr_write_capset_header(log, s, &header) != CHANNEL_RC_OK)
649 return FALSE;
650 Stream_Write_UINT32(s, 0); /* osType, ignored on receipt */
651 Stream_Write_UINT32(s, 0); /* osVersion, should be ignored */
652 Stream_Write_UINT16(s, rdpdr->versionMajor); /* protocolMajorVersion, must be set to 1 */
653 Stream_Write_UINT16(s, rdpdr->versionMinor); /* protocolMinorVersion */
654 Stream_Write_UINT32(s, 0x0000FFFF); /* ioCode1 */
655 Stream_Write_UINT32(s, 0); /* ioCode2, must be set to zero, reserved for future use */
656 Stream_Write_UINT32(s, RDPDR_DEVICE_REMOVE_PDUS | RDPDR_CLIENT_DISPLAY_NAME_PDU |
657 RDPDR_USER_LOGGEDON_PDU); /* extendedPDU */
658 Stream_Write_UINT32(s, ENABLE_ASYNCIO); /* extraFlags1 */
659 Stream_Write_UINT32(s, 0); /* extraFlags2, must be set to zero, reserved for future use */
660 Stream_Write_UINT32(s, rdpdr->SpecialDeviceCount); /* SpecialTypeDeviceCap, number of special
661 devices to be redirected before logon */
662 return TRUE;
663}
664
665static BOOL rdpdr_write_printer_capset(wLog* log, pf_channel_common_context* rdpdr, wStream* s)
666{
667 WINPR_ASSERT(rdpdr);
668 WINPR_ASSERT(s);
669
670 const RDPDR_CAPABILITY_HEADER header = { CAP_PRINTER_TYPE, 8,
671 rdpdr->capabilityVersions[CAP_PRINTER_TYPE] };
672 if (rdpdr_write_capset_header(log, s, &header) != CHANNEL_RC_OK)
673 return FALSE;
674 return TRUE;
675}
676
677static BOOL rdpdr_write_port_capset(wLog* log, pf_channel_common_context* rdpdr, wStream* s)
678{
679 WINPR_ASSERT(rdpdr);
680 WINPR_ASSERT(s);
681
682 const RDPDR_CAPABILITY_HEADER header = { CAP_PORT_TYPE, 8,
683 rdpdr->capabilityVersions[CAP_PORT_TYPE] };
684 if (rdpdr_write_capset_header(log, s, &header) != CHANNEL_RC_OK)
685 return FALSE;
686 return TRUE;
687}
688
689static BOOL rdpdr_write_drive_capset(wLog* log, pf_channel_common_context* rdpdr, wStream* s)
690{
691 WINPR_ASSERT(rdpdr);
692 WINPR_ASSERT(s);
693
694 const RDPDR_CAPABILITY_HEADER header = { CAP_DRIVE_TYPE, 8,
695 rdpdr->capabilityVersions[CAP_DRIVE_TYPE] };
696 if (rdpdr_write_capset_header(log, s, &header) != CHANNEL_RC_OK)
697 return FALSE;
698 return TRUE;
699}
700
701static BOOL rdpdr_write_smartcard_capset(wLog* log, pf_channel_common_context* rdpdr, wStream* s)
702{
703 WINPR_ASSERT(rdpdr);
704 WINPR_ASSERT(s);
705
706 const RDPDR_CAPABILITY_HEADER header = { CAP_SMARTCARD_TYPE, 8,
707 rdpdr->capabilityVersions[CAP_SMARTCARD_TYPE] };
708 if (rdpdr_write_capset_header(log, s, &header) != CHANNEL_RC_OK)
709 return FALSE;
710 return TRUE;
711}
712
713static UINT rdpdr_send_server_capability_request(pf_channel_server_context* rdpdr)
714{
715 wStream* s =
716 rdpdr_server_get_send_buffer(rdpdr, RDPDR_CTYP_CORE, PAKID_CORE_SERVER_CAPABILITY, 8);
717 if (!s)
718 return CHANNEL_RC_NO_MEMORY;
719 Stream_Write_UINT16(s, 5); /* numCapabilities */
720 Stream_Write_UINT16(s, 0); /* pad */
721 if (!rdpdr_write_general_capset(rdpdr->log, &rdpdr->common, s))
722 return CHANNEL_RC_NO_MEMORY;
723 if (!rdpdr_write_printer_capset(rdpdr->log, &rdpdr->common, s))
724 return CHANNEL_RC_NO_MEMORY;
725 if (!rdpdr_write_port_capset(rdpdr->log, &rdpdr->common, s))
726 return CHANNEL_RC_NO_MEMORY;
727 if (!rdpdr_write_drive_capset(rdpdr->log, &rdpdr->common, s))
728 return CHANNEL_RC_NO_MEMORY;
729 if (!rdpdr_write_smartcard_capset(rdpdr->log, &rdpdr->common, s))
730 return CHANNEL_RC_NO_MEMORY;
731 return rdpdr_seal_send_free_request(rdpdr, s);
732}
733
734static UINT rdpdr_process_client_capability_response(pf_channel_server_context* rdpdr, wStream* s)
735{
736 const UINT16 component = RDPDR_CTYP_CORE;
737 const UINT16 packetid = PAKID_CORE_CLIENT_CAPABILITY;
738 UINT status = CHANNEL_RC_OK;
739 UINT16 numCapabilities = 0;
740 WINPR_ASSERT(rdpdr);
741
742 if (!rdpdr_process_server_header(TRUE, rdpdr->log, s, component, packetid, 4))
743 return ERROR_INVALID_DATA;
744
745 Stream_Read_UINT16(s, numCapabilities);
746 Stream_Seek_UINT16(s); /* padding */
747
748 for (UINT16 x = 0; x < numCapabilities; x++)
749 {
750 RDPDR_CAPABILITY_HEADER header = { 0 };
751 UINT error = rdpdr_read_capset_header(rdpdr->log, s, &header);
752 if (error != CHANNEL_RC_OK)
753 return error;
754 if (header.CapabilityType < ARRAYSIZE(rdpdr->common.capabilityVersions))
755 {
756 if (rdpdr->common.capabilityVersions[header.CapabilityType] > header.Version)
757 rdpdr->common.capabilityVersions[header.CapabilityType] = header.Version;
758
759 WLog_Print(rdpdr->log, WLOG_TRACE,
760 "capability %s got version %" PRIu32 ", will use version %" PRIu32,
761 rdpdr_cap_type_string(header.CapabilityType), header.Version,
762 rdpdr->common.capabilityVersions[header.CapabilityType]);
763 }
764
765 switch (header.CapabilityType)
766 {
767 case CAP_GENERAL_TYPE:
768 status = rdpdr_ignore_capset(TRUE, rdpdr->log, s, &header);
769 break;
770
771 case CAP_PRINTER_TYPE:
772 status = rdpdr_ignore_capset(TRUE, rdpdr->log, s, &header);
773 break;
774
775 case CAP_PORT_TYPE:
776 status = rdpdr_ignore_capset(TRUE, rdpdr->log, s, &header);
777 break;
778
779 case CAP_DRIVE_TYPE:
780 status = rdpdr_ignore_capset(TRUE, rdpdr->log, s, &header);
781 break;
782
783 case CAP_SMARTCARD_TYPE:
784 status = rdpdr_ignore_capset(TRUE, rdpdr->log, s, &header);
785 break;
786
787 default:
788 SERVER_RX_LOG(rdpdr->log, WLOG_WARN,
789 "[%s | %s] invalid capability type 0x%04" PRIx16,
790 rdpdr_component_string(component), rdpdr_packetid_string(packetid),
791 header.CapabilityType);
792 status = ERROR_INVALID_DATA;
793 break;
794 }
795
796 if (status != CHANNEL_RC_OK)
797 break;
798 }
799
800 return status;
801}
802
803static UINT rdpdr_send_client_capability_response(pClientContext* pc,
804 pf_channel_client_context* rdpdr)
805{
806 wStream* s = NULL;
807
808 WINPR_ASSERT(rdpdr);
809 s = rdpdr_client_get_send_buffer(rdpdr, RDPDR_CTYP_CORE, PAKID_CORE_CLIENT_CAPABILITY, 4);
810 if (!s)
811 return CHANNEL_RC_NO_MEMORY;
812
813 Stream_Write_UINT16(s, 5); /* numCapabilities */
814 Stream_Write_UINT16(s, 0); /* pad */
815 if (!rdpdr_write_general_capset(rdpdr->log, &rdpdr->common, s))
816 return CHANNEL_RC_NO_MEMORY;
817 if (!rdpdr_write_printer_capset(rdpdr->log, &rdpdr->common, s))
818 return CHANNEL_RC_NO_MEMORY;
819 if (!rdpdr_write_port_capset(rdpdr->log, &rdpdr->common, s))
820 return CHANNEL_RC_NO_MEMORY;
821 if (!rdpdr_write_drive_capset(rdpdr->log, &rdpdr->common, s))
822 return CHANNEL_RC_NO_MEMORY;
823 if (!rdpdr_write_smartcard_capset(rdpdr->log, &rdpdr->common, s))
824 return CHANNEL_RC_NO_MEMORY;
825 return rdpdr_client_send(rdpdr->log, pc, s);
826}
827
828static UINT rdpdr_send_server_clientid_confirm(pf_channel_server_context* rdpdr)
829{
830 wStream* s = NULL;
831
832 s = rdpdr_server_get_send_buffer(rdpdr, RDPDR_CTYP_CORE, PAKID_CORE_CLIENTID_CONFIRM, 8);
833 if (!s)
834 return CHANNEL_RC_NO_MEMORY;
835 Stream_Write_UINT16(s, rdpdr->common.versionMajor);
836 Stream_Write_UINT16(s, rdpdr->common.versionMinor);
837 Stream_Write_UINT32(s, rdpdr->common.clientID);
838 return rdpdr_seal_send_free_request(rdpdr, s);
839}
840
841static UINT rdpdr_process_server_clientid_confirm(pf_channel_client_context* rdpdr, wStream* s)
842{
843 UINT16 versionMajor = 0;
844 UINT16 versionMinor = 0;
845 UINT32 clientID = 0;
846
847 WINPR_ASSERT(rdpdr);
848 WINPR_ASSERT(s);
849
850 if (!rdpdr_process_server_header(FALSE, rdpdr->log, s, RDPDR_CTYP_CORE,
851 PAKID_CORE_CLIENTID_CONFIRM, 8))
852 return ERROR_INVALID_DATA;
853
854 Stream_Read_UINT16(s, versionMajor);
855 Stream_Read_UINT16(s, versionMinor);
856 if (!rdpdr_check_version(FALSE, rdpdr->log, versionMajor, versionMinor, RDPDR_CTYP_CORE,
857 PAKID_CORE_CLIENTID_CONFIRM))
858 return ERROR_INVALID_DATA;
859
860 Stream_Read_UINT32(s, clientID);
861
862 if ((versionMajor != rdpdr->common.versionMajor) ||
863 (versionMinor != rdpdr->common.versionMinor))
864 {
865 CLIENT_RX_LOG(rdpdr->log, WLOG_WARN,
866 "[%s | %s] Version mismatch, sent %" PRIu16 ".%" PRIu16
867 ", downgraded to %" PRIu16 ".%" PRIu16,
868 rdpdr_component_string(RDPDR_CTYP_CORE),
869 rdpdr_packetid_string(PAKID_CORE_CLIENTID_CONFIRM),
870 rdpdr->common.versionMajor, rdpdr->common.versionMinor, versionMajor,
871 versionMinor);
872 rdpdr->common.versionMajor = versionMajor;
873 rdpdr->common.versionMinor = versionMinor;
874 }
875
876 if (clientID != rdpdr->common.clientID)
877 {
878 CLIENT_RX_LOG(rdpdr->log, WLOG_WARN,
879 "[%s | %s] clientID mismatch, sent 0x%08" PRIx32 ", changed to 0x%08" PRIx32,
880 rdpdr_component_string(RDPDR_CTYP_CORE),
881 rdpdr_packetid_string(PAKID_CORE_CLIENTID_CONFIRM), rdpdr->common.clientID,
882 clientID);
883 rdpdr->common.clientID = clientID;
884 }
885
886 return CHANNEL_RC_OK;
887}
888
889static BOOL
890rdpdr_process_server_capability_request_or_clientid_confirm(pf_channel_client_context* rdpdr,
891 wStream* s)
892{
893 const UINT32 mask = STATE_CLIENT_EXPECT_SERVER_CLIENT_ID_CONFIRM |
894 STATE_CLIENT_EXPECT_SERVER_CORE_CAPABILITY_REQUEST;
895 const UINT16 rcomponent = RDPDR_CTYP_CORE;
896 UINT16 component = 0;
897 UINT16 packetid = 0;
898
899 WINPR_ASSERT(rdpdr);
900 WINPR_ASSERT(s);
901
902 if ((rdpdr->flags & mask) == mask)
903 {
904 CLIENT_RX_LOG(rdpdr->log, WLOG_WARN, "already past this state, abort!");
905 return FALSE;
906 }
907
908 if (!Stream_CheckAndLogRequiredLengthClient(rdpdr->log, s, 4))
909 return FALSE;
910
911 Stream_Read_UINT16(s, component);
912 if (rcomponent != component)
913 {
914 CLIENT_RX_LOG(rdpdr->log, WLOG_WARN, "got component %s, expected %s",
915 rdpdr_component_string(component), rdpdr_component_string(rcomponent));
916 return FALSE;
917 }
918 Stream_Read_UINT16(s, packetid);
919 Stream_Rewind(s, 4);
920
921 switch (packetid)
922 {
923 case PAKID_CORE_SERVER_CAPABILITY:
924 if (rdpdr->flags & STATE_CLIENT_EXPECT_SERVER_CORE_CAPABILITY_REQUEST)
925 {
926 CLIENT_RX_LOG(rdpdr->log, WLOG_WARN, "got duplicate packetid %s",
927 rdpdr_packetid_string(packetid));
928 return FALSE;
929 }
930 rdpdr->flags |= STATE_CLIENT_EXPECT_SERVER_CORE_CAPABILITY_REQUEST;
931 return rdpdr_process_server_core_capability_request(rdpdr, s) == CHANNEL_RC_OK;
932 case PAKID_CORE_CLIENTID_CONFIRM:
933 default:
934 if (rdpdr->flags & STATE_CLIENT_EXPECT_SERVER_CLIENT_ID_CONFIRM)
935 {
936 CLIENT_RX_LOG(rdpdr->log, WLOG_WARN, "got duplicate packetid %s",
937 rdpdr_packetid_string(packetid));
938 return FALSE;
939 }
940 rdpdr->flags |= STATE_CLIENT_EXPECT_SERVER_CLIENT_ID_CONFIRM;
941 return rdpdr_process_server_clientid_confirm(rdpdr, s) == CHANNEL_RC_OK;
942 }
943}
944
945#if defined(WITH_PROXY_EMULATE_SMARTCARD)
946static UINT rdpdr_send_emulated_scard_device_list_announce_request(pClientContext* pc,
947 pf_channel_client_context* rdpdr)
948{
949 wStream* s = NULL;
950
951 s = rdpdr_client_get_send_buffer(rdpdr, RDPDR_CTYP_CORE, PAKID_CORE_DEVICELIST_ANNOUNCE, 24);
952 if (!s)
953 return CHANNEL_RC_NO_MEMORY;
954
955 Stream_Write_UINT32(s, 1); /* deviceCount -> our emulated smartcard only */
956 Stream_Write_UINT32(s, RDPDR_DTYP_SMARTCARD); /* deviceType */
957 Stream_Write_UINT32(
958 s, SCARD_DEVICE_ID); /* deviceID -> reserve highest value for the emulated smartcard */
959 Stream_Write(s, "SCARD\0\0\0", 8);
960 Stream_Write_UINT32(s, 6);
961 Stream_Write(s, "SCARD\0", 6);
962
963 return rdpdr_client_send(rdpdr->log, pc, s);
964}
965
966static UINT rdpdr_send_emulated_scard_device_remove(pClientContext* pc,
967 pf_channel_client_context* rdpdr)
968{
969 wStream* s = NULL;
970
971 s = rdpdr_client_get_send_buffer(rdpdr, RDPDR_CTYP_CORE, PAKID_CORE_DEVICELIST_REMOVE, 24);
972 if (!s)
973 return CHANNEL_RC_NO_MEMORY;
974
975 Stream_Write_UINT32(s, 1); /* deviceCount -> our emulated smartcard only */
976 Stream_Write_UINT32(
977 s, SCARD_DEVICE_ID); /* deviceID -> reserve highest value for the emulated smartcard */
978
979 return rdpdr_client_send(rdpdr->log, pc, s);
980}
981
982static UINT rdpdr_process_server_device_announce_response(pf_channel_client_context* rdpdr,
983 wStream* s)
984{
985 const UINT16 component = RDPDR_CTYP_CORE;
986 const UINT16 packetid = PAKID_CORE_DEVICE_REPLY;
987 UINT32 deviceID = 0;
988 UINT32 resultCode = 0;
989
990 WINPR_ASSERT(rdpdr);
991 WINPR_ASSERT(s);
992
993 if (!rdpdr_process_server_header(TRUE, rdpdr->log, s, component, packetid, 8))
994 return ERROR_INVALID_DATA;
995
996 Stream_Read_UINT32(s, deviceID);
997 Stream_Read_UINT32(s, resultCode);
998
999 if (deviceID != SCARD_DEVICE_ID)
1000 {
1001 CLIENT_RX_LOG(rdpdr->log, WLOG_WARN,
1002 "[%s | %s] deviceID mismatch, sent 0x%08" PRIx32 ", changed to 0x%08" PRIx32,
1003 rdpdr_component_string(component), rdpdr_packetid_string(packetid),
1004 SCARD_DEVICE_ID, deviceID);
1005 }
1006 else if (resultCode != 0)
1007 {
1008 CLIENT_RX_LOG(rdpdr->log, WLOG_WARN,
1009 "[%s | %s] deviceID 0x%08" PRIx32 " resultCode=0x%08" PRIx32,
1010 rdpdr_component_string(component), rdpdr_packetid_string(packetid), deviceID,
1011 resultCode);
1012 }
1013 else
1014 CLIENT_RX_LOG(rdpdr->log, WLOG_DEBUG,
1015 "[%s | %s] deviceID 0x%08" PRIx32 " resultCode=0x%08" PRIx32
1016 " -> emulated smartcard redirected!",
1017 rdpdr_component_string(component), rdpdr_packetid_string(packetid), deviceID,
1018 resultCode);
1019
1020 return CHANNEL_RC_OK;
1021}
1022#endif
1023
1024static BOOL pf_channel_rdpdr_rewrite_device_list_to(wStream* s, UINT32 fromVersion,
1025 UINT32 toVersion)
1026{
1027 BOOL rc = FALSE;
1028 if (fromVersion == toVersion)
1029 return TRUE;
1030
1031 const size_t cap = Stream_GetRemainingLength(s);
1032 wStream* clone = Stream_New(NULL, cap);
1033 if (!clone)
1034 goto fail;
1035 const size_t pos = Stream_GetPosition(s);
1036 Stream_Copy(s, clone, cap);
1037 Stream_SealLength(clone);
1038
1039 Stream_SetPosition(clone, 0);
1040 Stream_SetPosition(s, pos);
1041
1042 /* Skip device count */
1043 if (!Stream_SafeSeek(s, 4))
1044 goto fail;
1045
1046 UINT32 count = 0;
1047 if (Stream_GetRemainingLength(clone) < 4)
1048 goto fail;
1049 Stream_Read_UINT32(clone, count);
1050
1051 for (UINT32 x = 0; x < count; x++)
1052 {
1053 RdpdrDevice device = { 0 };
1054 const size_t charCount = ARRAYSIZE(device.PreferredDosName);
1055 if (Stream_GetRemainingLength(clone) < 20)
1056 goto fail;
1057
1058 Stream_Read_UINT32(clone, device.DeviceType); /* DeviceType (4 bytes) */
1059 Stream_Read_UINT32(clone, device.DeviceId); /* DeviceId (4 bytes) */
1060 Stream_Read(clone, device.PreferredDosName, charCount); /* PreferredDosName (8 bytes) */
1061 Stream_Read_UINT32(clone, device.DeviceDataLength); /* DeviceDataLength (4 bytes) */
1062 device.DeviceData = Stream_Pointer(clone);
1063 if (!Stream_SafeSeek(clone, device.DeviceDataLength))
1064 goto fail;
1065
1066 if (!Stream_EnsureRemainingCapacity(s, 20))
1067 goto fail;
1068 Stream_Write_UINT32(s, device.DeviceType);
1069 Stream_Write_UINT32(s, device.DeviceId);
1070 Stream_Write(s, device.PreferredDosName, charCount);
1071
1072 if (device.DeviceType == RDPDR_DTYP_FILESYSTEM)
1073 {
1074 if (toVersion == DRIVE_CAPABILITY_VERSION_01)
1075 Stream_Write_UINT32(s, 0); /* No unicode name */
1076 else
1077 {
1078 const size_t datalen = charCount * sizeof(WCHAR);
1079 if (!Stream_EnsureRemainingCapacity(s, datalen + sizeof(UINT32)))
1080 goto fail;
1081 Stream_Write_UINT32(s, WINPR_ASSERTING_INT_CAST(uint32_t, datalen));
1082
1083 const SSIZE_T rcw = Stream_Write_UTF16_String_From_UTF8(
1084 s, charCount, device.PreferredDosName, charCount - 1, TRUE);
1085 if (rcw < 0)
1086 goto fail;
1087 }
1088 }
1089 else
1090 {
1091 Stream_Write_UINT32(s, device.DeviceDataLength);
1092 if (!Stream_EnsureRemainingCapacity(s, device.DeviceDataLength))
1093 goto fail;
1094 Stream_Write(s, device.DeviceData, device.DeviceDataLength);
1095 }
1096 }
1097
1098 Stream_SealLength(s);
1099 rc = TRUE;
1100
1101fail:
1102 Stream_Free(clone, TRUE);
1103 return rc;
1104}
1105
1106static BOOL pf_channel_rdpdr_rewrite_device_list(pf_channel_client_context* rdpdr,
1107 pServerContext* ps, wStream* s, BOOL toServer)
1108{
1109 WINPR_ASSERT(rdpdr);
1110 WINPR_ASSERT(ps);
1111
1112 const size_t pos = Stream_GetPosition(s);
1113 UINT16 component = 0;
1114 UINT16 packetid = 0;
1115 Stream_SetPosition(s, 0);
1116
1117 if (!Stream_CheckAndLogRequiredLengthWLog(rdpdr->log, s, 4))
1118 return FALSE;
1119
1120 Stream_Read_UINT16(s, component);
1121 Stream_Read_UINT16(s, packetid);
1122 if ((component != RDPDR_CTYP_CORE) || (packetid != PAKID_CORE_DEVICELIST_ANNOUNCE))
1123 {
1124 Stream_SetPosition(s, pos);
1125 return TRUE;
1126 }
1127
1128 const pf_channel_server_context* srv =
1129 HashTable_GetItemValue(ps->interceptContextMap, RDPDR_SVC_CHANNEL_NAME);
1130 if (!srv)
1131 {
1132 WLog_Print(rdpdr->log, WLOG_ERROR, "No channel %s in intercep map", RDPDR_SVC_CHANNEL_NAME);
1133 return FALSE;
1134 }
1135
1136 UINT32 from = srv->common.capabilityVersions[CAP_DRIVE_TYPE];
1137 UINT32 to = rdpdr->common.capabilityVersions[CAP_DRIVE_TYPE];
1138 if (toServer)
1139 {
1140 from = rdpdr->common.capabilityVersions[CAP_DRIVE_TYPE];
1141 to = srv->common.capabilityVersions[CAP_DRIVE_TYPE];
1142 }
1143 if (!pf_channel_rdpdr_rewrite_device_list_to(s, from, to))
1144 return FALSE;
1145
1146 Stream_SetPosition(s, pos);
1147 return TRUE;
1148}
1149
1150static BOOL pf_channel_rdpdr_client_send_to_server(pf_channel_client_context* rdpdr,
1151 pServerContext* ps, wStream* s)
1152{
1153 WINPR_ASSERT(rdpdr);
1154 if (ps)
1155 {
1156 UINT16 server_channel_id = WTSChannelGetId(ps->context.peer, RDPDR_SVC_CHANNEL_NAME);
1157
1158 /* Ignore messages for channels that can not be mapped.
1159 * The client might not have enabled support for this specific channel,
1160 * so just drop the message. */
1161 if (server_channel_id == 0)
1162 return TRUE;
1163
1164 if (!pf_channel_rdpdr_rewrite_device_list(rdpdr, ps, s, TRUE))
1165 return FALSE;
1166 size_t len = Stream_Length(s);
1167 Stream_SetPosition(s, len);
1168 rdpdr_dump_send_packet(rdpdr->log, WLOG_TRACE, s, proxy_client_tx);
1169 WINPR_ASSERT(ps->context.peer);
1170 WINPR_ASSERT(ps->context.peer->SendChannelData);
1171 return ps->context.peer->SendChannelData(ps->context.peer, server_channel_id,
1172 Stream_Buffer(s), len);
1173 }
1174 return TRUE;
1175}
1176
1177static BOOL pf_channel_send_client_queue(pClientContext* pc, pf_channel_client_context* rdpdr);
1178
1179#if defined(WITH_PROXY_EMULATE_SMARTCARD)
1180static BOOL rdpdr_process_server_loggedon_request(pServerContext* ps, pClientContext* pc,
1181 pf_channel_client_context* rdpdr, wStream* s,
1182 UINT16 component, UINT16 packetid)
1183{
1184 WINPR_ASSERT(rdpdr);
1185 WLog_Print(rdpdr->log, WLOG_DEBUG, "[%s | %s]", rdpdr_component_string(component),
1186 rdpdr_packetid_string(packetid));
1187 if (rdpdr_send_emulated_scard_device_remove(pc, rdpdr) != CHANNEL_RC_OK)
1188 return FALSE;
1189 if (rdpdr_send_emulated_scard_device_list_announce_request(pc, rdpdr) != CHANNEL_RC_OK)
1190 return FALSE;
1191 return pf_channel_rdpdr_client_send_to_server(rdpdr, ps, s);
1192}
1193
1194static BOOL filter_smartcard_io_requests(pf_channel_client_context* rdpdr, wStream* s,
1195 UINT16* pPacketid)
1196{
1197 BOOL rc = FALSE;
1198 UINT16 component = 0;
1199 UINT16 packetid = 0;
1200 UINT32 deviceID = 0;
1201 size_t pos = 0;
1202
1203 WINPR_ASSERT(rdpdr);
1204 WINPR_ASSERT(pPacketid);
1205
1206 if (!Stream_CheckAndLogRequiredLengthWLog(rdpdr->log, s, 4))
1207 return FALSE;
1208
1209 pos = Stream_GetPosition(s);
1210 Stream_Read_UINT16(s, component);
1211 Stream_Read_UINT16(s, packetid);
1212
1213 if (Stream_GetRemainingLength(s) >= 4)
1214 Stream_Read_UINT32(s, deviceID);
1215
1216 WLog_Print(rdpdr->log, WLOG_DEBUG, "got: [%s | %s]: [0x%08" PRIx32 "]",
1217 rdpdr_component_string(component), rdpdr_packetid_string(packetid), deviceID);
1218
1219 if (component != RDPDR_CTYP_CORE)
1220 goto fail;
1221
1222 switch (packetid)
1223 {
1224 case PAKID_CORE_SERVER_ANNOUNCE:
1225 case PAKID_CORE_CLIENTID_CONFIRM:
1226 case PAKID_CORE_CLIENT_NAME:
1227 case PAKID_CORE_DEVICELIST_ANNOUNCE:
1228 case PAKID_CORE_DEVICELIST_REMOVE:
1229 case PAKID_CORE_SERVER_CAPABILITY:
1230 case PAKID_CORE_CLIENT_CAPABILITY:
1231 WLog_Print(rdpdr->log, WLOG_WARN, "Filtering client -> server message [%s | %s]",
1232 rdpdr_component_string(component), rdpdr_packetid_string(packetid));
1233 *pPacketid = packetid;
1234 break;
1235 case PAKID_CORE_USER_LOGGEDON:
1236 *pPacketid = packetid;
1237 break;
1238 case PAKID_CORE_DEVICE_REPLY:
1239 case PAKID_CORE_DEVICE_IOREQUEST:
1240 if (deviceID != SCARD_DEVICE_ID)
1241 goto fail;
1242 *pPacketid = packetid;
1243 break;
1244 default:
1245 if (deviceID != SCARD_DEVICE_ID)
1246 goto fail;
1247 WLog_Print(rdpdr->log, WLOG_WARN,
1248 "Got [%s | %s] for deviceID 0x%08" PRIx32 ", TODO: Not handled!",
1249 rdpdr_component_string(component), rdpdr_packetid_string(packetid),
1250 deviceID);
1251 goto fail;
1252 }
1253
1254 rc = TRUE;
1255
1256fail:
1257 Stream_SetPosition(s, pos);
1258 return rc;
1259}
1260#endif
1261
1262BOOL pf_channel_send_client_queue(pClientContext* pc, pf_channel_client_context* rdpdr)
1263{
1264 UINT16 channelId = 0;
1265
1266 WINPR_ASSERT(pc);
1267 WINPR_ASSERT(rdpdr);
1268
1269 if (rdpdr->state != STATE_CLIENT_CHANNEL_RUNNING)
1270 return FALSE;
1271 channelId = freerdp_channels_get_id_by_name(pc->context.instance, RDPDR_SVC_CHANNEL_NAME);
1272 if ((channelId == 0) || (channelId == UINT16_MAX))
1273 return TRUE;
1274
1275 Queue_Lock(rdpdr->queue);
1276 while (Queue_Count(rdpdr->queue) > 0)
1277 {
1278 wStream* s = Queue_Dequeue(rdpdr->queue);
1279 if (!s)
1280 continue;
1281
1282 size_t len = Stream_Length(s);
1283 Stream_SetPosition(s, len);
1284
1285 rdpdr_dump_send_packet(rdpdr->log, WLOG_TRACE, s, proxy_server_tx " (queue) ");
1286 WINPR_ASSERT(pc->context.instance->SendChannelData);
1287 if (!pc->context.instance->SendChannelData(pc->context.instance, channelId,
1288 Stream_Buffer(s), len))
1289 {
1290 CLIENT_TX_LOG(rdpdr->log, WLOG_ERROR, "xxxxxx TODO: Failed to send data!");
1291 }
1292 Stream_Free(s, TRUE);
1293 }
1294 Queue_Unlock(rdpdr->queue);
1295 return TRUE;
1296}
1297
1298static BOOL rdpdr_handle_server_announce_request(pClientContext* pc,
1299 pf_channel_client_context* rdpdr, wStream* s)
1300{
1301 WINPR_ASSERT(pc);
1302 WINPR_ASSERT(rdpdr);
1303 WINPR_ASSERT(s);
1304
1305 if (rdpdr_process_server_announce_request(rdpdr, s) != CHANNEL_RC_OK)
1306 return FALSE;
1307 if (rdpdr_send_client_announce_reply(pc, rdpdr) != CHANNEL_RC_OK)
1308 return FALSE;
1309 if (rdpdr_send_client_name_request(pc, rdpdr) != CHANNEL_RC_OK)
1310 return FALSE;
1311 rdpdr->state = STATE_CLIENT_EXPECT_SERVER_CORE_CAPABILITY_REQUEST;
1312 return TRUE;
1313}
1314
1315BOOL pf_channel_rdpdr_client_handle(pClientContext* pc, UINT16 channelId, const char* channel_name,
1316 const BYTE* xdata, size_t xsize, UINT32 flags, size_t totalSize)
1317{
1318 pf_channel_client_context* rdpdr = NULL;
1319 pServerContext* ps = NULL;
1320 wStream* s = NULL;
1321#if defined(WITH_PROXY_EMULATE_SMARTCARD)
1322 UINT16 packetid = 0;
1323#endif
1324
1325 WINPR_ASSERT(pc);
1326 WINPR_ASSERT(pc->pdata);
1327 WINPR_ASSERT(pc->interceptContextMap);
1328 WINPR_ASSERT(channel_name);
1329 WINPR_ASSERT(xdata);
1330
1331 ps = pc->pdata->ps;
1332
1333 rdpdr = HashTable_GetItemValue(pc->interceptContextMap, channel_name);
1334 if (!rdpdr)
1335 {
1336 CLIENT_RX_LOG(WLog_Get(RTAG), WLOG_ERROR,
1337 "Channel %s [0x%04" PRIx16 "] missing context in interceptContextMap",
1338 channel_name, channelId);
1339 return FALSE;
1340 }
1341 s = rdpdr->common.buffer;
1342 if (flags & CHANNEL_FLAG_FIRST)
1343 Stream_SetPosition(s, 0);
1344 if (!Stream_EnsureRemainingCapacity(s, xsize))
1345 {
1346 CLIENT_RX_LOG(rdpdr->log, WLOG_ERROR,
1347 "Channel %s [0x%04" PRIx16 "] not enough memory [need %" PRIuz "]",
1348 channel_name, channelId, xsize);
1349 return FALSE;
1350 }
1351 Stream_Write(s, xdata, xsize);
1352 if ((flags & CHANNEL_FLAG_LAST) == 0)
1353 return TRUE;
1354
1355 Stream_SealLength(s);
1356 Stream_SetPosition(s, 0);
1357 if (Stream_Length(s) != totalSize)
1358 {
1359 CLIENT_RX_LOG(rdpdr->log, WLOG_WARN,
1360 "Received invalid %s channel data (server -> proxy), expected %" PRIuz
1361 "bytes, got %" PRIuz,
1362 channel_name, totalSize, Stream_Length(s));
1363 return FALSE;
1364 }
1365
1366 rdpdr_dump_received_packet(rdpdr->log, WLOG_TRACE, s, proxy_server_rx);
1367 switch (rdpdr->state)
1368 {
1369 case STATE_CLIENT_EXPECT_SERVER_ANNOUNCE_REQUEST:
1370 if (!rdpdr_handle_server_announce_request(pc, rdpdr, s))
1371 return FALSE;
1372 break;
1373 case STATE_CLIENT_EXPECT_SERVER_CORE_CAPABILITY_REQUEST:
1374 if (!rdpdr_process_server_capability_request_or_clientid_confirm(rdpdr, s))
1375 return FALSE;
1376 rdpdr->state = STATE_CLIENT_EXPECT_SERVER_CLIENT_ID_CONFIRM;
1377 break;
1378 case STATE_CLIENT_EXPECT_SERVER_CLIENT_ID_CONFIRM:
1379 if (!rdpdr_process_server_capability_request_or_clientid_confirm(rdpdr, s))
1380 return FALSE;
1381 if (rdpdr_send_client_capability_response(pc, rdpdr) != CHANNEL_RC_OK)
1382 return FALSE;
1383#if defined(WITH_PROXY_EMULATE_SMARTCARD)
1384 if (pf_channel_smartcard_client_emulate(pc))
1385 {
1386 if (rdpdr_send_emulated_scard_device_list_announce_request(pc, rdpdr) !=
1387 CHANNEL_RC_OK)
1388 return FALSE;
1389 rdpdr->state = STATE_CLIENT_CHANNEL_RUNNING;
1390 }
1391 else
1392#endif
1393 {
1394 rdpdr->state = STATE_CLIENT_CHANNEL_RUNNING;
1395 pf_channel_send_client_queue(pc, rdpdr);
1396 }
1397
1398 break;
1399 case STATE_CLIENT_CHANNEL_RUNNING:
1400#if defined(WITH_PROXY_EMULATE_SMARTCARD)
1401 if (!pf_channel_smartcard_client_emulate(pc) ||
1402 !filter_smartcard_io_requests(rdpdr, s, &packetid))
1403 return pf_channel_rdpdr_client_send_to_server(rdpdr, ps, s);
1404 else
1405 {
1406 switch (packetid)
1407 {
1408 case PAKID_CORE_USER_LOGGEDON:
1409 return rdpdr_process_server_loggedon_request(ps, pc, rdpdr, s,
1410 RDPDR_CTYP_CORE, packetid);
1411 case PAKID_CORE_DEVICE_IOREQUEST:
1412 {
1413 wStream* out = rdpdr_client_get_send_buffer(
1414 rdpdr, RDPDR_CTYP_CORE, PAKID_CORE_DEVICE_IOCOMPLETION, 0);
1415 WINPR_ASSERT(out);
1416
1417 if (!rdpdr_process_server_header(FALSE, rdpdr->log, s, RDPDR_CTYP_CORE,
1418 PAKID_CORE_DEVICE_IOREQUEST, 20))
1419 return FALSE;
1420
1421 if (!pf_channel_smartcard_client_handle(rdpdr->log, pc, s, out,
1422 rdpdr_client_send))
1423 return FALSE;
1424 }
1425 break;
1426 case PAKID_CORE_SERVER_ANNOUNCE:
1427 pf_channel_rdpdr_client_reset(pc);
1428 if (!rdpdr_handle_server_announce_request(pc, rdpdr, s))
1429 return FALSE;
1430 break;
1431 case PAKID_CORE_SERVER_CAPABILITY:
1432 rdpdr->state = STATE_CLIENT_EXPECT_SERVER_CORE_CAPABILITY_REQUEST;
1433 rdpdr->flags = 0;
1434 return pf_channel_rdpdr_client_handle(pc, channelId, channel_name, xdata,
1435 xsize, flags, totalSize);
1436 case PAKID_CORE_DEVICE_REPLY:
1437 break;
1438 default:
1439 CLIENT_RX_LOG(
1440 rdpdr->log, WLOG_ERROR,
1441 "Channel %s [0x%04" PRIx16
1442 "] we´ve reached an impossible state %s! [%s] aliens invaded!",
1443 channel_name, channelId, rdpdr_client_state_to_string(rdpdr->state),
1444 rdpdr_packetid_string(packetid));
1445 return FALSE;
1446 }
1447 }
1448 break;
1449#else
1450 return pf_channel_rdpdr_client_send_to_server(rdpdr, ps, s);
1451#endif
1452 default:
1453 CLIENT_RX_LOG(rdpdr->log, WLOG_ERROR,
1454 "Channel %s [0x%04" PRIx16
1455 "] we´ve reached an impossible state %s! aliens invaded!",
1456 channel_name, channelId, rdpdr_client_state_to_string(rdpdr->state));
1457 return FALSE;
1458 }
1459
1460 return TRUE;
1461}
1462
1463static void pf_channel_rdpdr_common_context_free(pf_channel_common_context* common)
1464{
1465 if (!common)
1466 return;
1467 free(common->computerName.v);
1468 Stream_Free(common->s, TRUE);
1469 Stream_Free(common->buffer, TRUE);
1470}
1471
1472static void pf_channel_rdpdr_client_context_free(InterceptContextMapEntry* base)
1473{
1474 pf_channel_client_context* entry = (pf_channel_client_context*)base;
1475 if (!entry)
1476 return;
1477
1478 pf_channel_rdpdr_common_context_free(&entry->common);
1479 Queue_Free(entry->queue);
1480 free(entry);
1481}
1482
1483static BOOL pf_channel_rdpdr_common_context_new(pf_channel_common_context* common,
1484 void (*fkt)(InterceptContextMapEntry*))
1485{
1486 if (!common)
1487 return FALSE;
1488 common->base.free = fkt;
1489 common->s = Stream_New(NULL, 1024);
1490 if (!common->s)
1491 return FALSE;
1492 common->buffer = Stream_New(NULL, 1024);
1493 if (!common->buffer)
1494 return FALSE;
1495 common->computerNameUnicode = 1;
1496 common->computerName.v = NULL;
1497 common->versionMajor = RDPDR_VERSION_MAJOR;
1498 common->versionMinor = RDPDR_VERSION_MINOR_RDP10X;
1499 common->clientID = SCARD_DEVICE_ID;
1500
1501 const UINT32 versions[] = { 0,
1502 GENERAL_CAPABILITY_VERSION_02,
1503 PRINT_CAPABILITY_VERSION_01,
1504 PORT_CAPABILITY_VERSION_01,
1505 DRIVE_CAPABILITY_VERSION_02,
1506 SMARTCARD_CAPABILITY_VERSION_01 };
1507
1508 memcpy(common->capabilityVersions, versions, sizeof(common->capabilityVersions));
1509 return TRUE;
1510}
1511
1512static BOOL pf_channel_rdpdr_client_pass_message(pServerContext* ps, pClientContext* pc,
1513 WINPR_ATTR_UNUSED UINT16 channelId,
1514 const char* channel_name, wStream* s)
1515{
1516 pf_channel_client_context* rdpdr = NULL;
1517
1518 WINPR_ASSERT(ps);
1519 WINPR_ASSERT(pc);
1520
1521 rdpdr = HashTable_GetItemValue(pc->interceptContextMap, channel_name);
1522 if (!rdpdr)
1523 return TRUE; /* Ignore data for channels not available on proxy -> server connection */
1524 WINPR_ASSERT(rdpdr->queue);
1525
1526 if (!pf_channel_rdpdr_rewrite_device_list(rdpdr, ps, s, FALSE))
1527 return FALSE;
1528 if (!Queue_Enqueue(rdpdr->queue, s))
1529 return FALSE;
1530 pf_channel_send_client_queue(pc, rdpdr);
1531 return TRUE;
1532}
1533
1534#if defined(WITH_PROXY_EMULATE_SMARTCARD)
1535static BOOL filter_smartcard_device_list_remove(pf_channel_server_context* rdpdr, wStream* s)
1536{
1537 size_t pos = 0;
1538 UINT32 count = 0;
1539
1540 WINPR_ASSERT(rdpdr);
1541 if (!Stream_CheckAndLogRequiredLengthWLog(rdpdr->log, s, sizeof(UINT32)))
1542 return TRUE;
1543 pos = Stream_GetPosition(s);
1544 Stream_Read_UINT32(s, count);
1545
1546 if (count == 0)
1547 return TRUE;
1548
1549 if (!Stream_CheckAndLogRequiredLengthOfSizeWLog(rdpdr->log, s, count, sizeof(UINT32)))
1550 return TRUE;
1551
1552 for (UINT32 x = 0; x < count; x++)
1553 {
1554 UINT32 deviceID = 0;
1555 BYTE* dst = Stream_Pointer(s);
1556 Stream_Read_UINT32(s, deviceID);
1557 if (deviceID == SCARD_DEVICE_ID)
1558 {
1559 ArrayList_Remove(rdpdr->blockedDevices, (void*)(size_t)deviceID);
1560
1561 /* This is the only device, filter it! */
1562 if (count == 1)
1563 return TRUE;
1564
1565 /* Remove this device from the list */
1566 memmove(dst, Stream_ConstPointer(s), (count - x - 1) * sizeof(UINT32));
1567
1568 count--;
1569 Stream_SetPosition(s, pos);
1570 Stream_Write_UINT32(s, count);
1571 return FALSE;
1572 }
1573 }
1574
1575 return FALSE;
1576}
1577
1578static BOOL filter_smartcard_device_io_request(pf_channel_server_context* rdpdr, wStream* s)
1579{
1580 UINT32 DeviceID = 0;
1581 WINPR_ASSERT(rdpdr);
1582 WINPR_ASSERT(s);
1583 Stream_Read_UINT32(s, DeviceID);
1584 return ArrayList_Contains(rdpdr->blockedDevices, (void*)(size_t)DeviceID);
1585}
1586
1587static BOOL filter_smartcard_device_list_announce(pf_channel_server_context* rdpdr, wStream* s)
1588{
1589 UINT32 count = 0;
1590
1591 WINPR_ASSERT(rdpdr);
1592 if (!Stream_CheckAndLogRequiredLengthWLog(rdpdr->log, s, sizeof(UINT32)))
1593 return TRUE;
1594 const size_t pos = Stream_GetPosition(s);
1595 Stream_Read_UINT32(s, count);
1596
1597 if (count == 0)
1598 return TRUE;
1599
1600 for (UINT32 x = 0; x < count; x++)
1601 {
1602 UINT32 DeviceType = 0;
1603 UINT32 DeviceId = 0;
1604 char PreferredDosName[8];
1605 UINT32 DeviceDataLength = 0;
1606 BYTE* dst = Stream_Pointer(s);
1607 if (!Stream_CheckAndLogRequiredLengthWLog(rdpdr->log, s, 20))
1608 return TRUE;
1609 Stream_Read_UINT32(s, DeviceType);
1610 Stream_Read_UINT32(s, DeviceId);
1611 Stream_Read(s, PreferredDosName, ARRAYSIZE(PreferredDosName));
1612 Stream_Read_UINT32(s, DeviceDataLength);
1613 if (!Stream_SafeSeek(s, DeviceDataLength))
1614 return TRUE;
1615 if (DeviceType == RDPDR_DTYP_SMARTCARD)
1616 {
1617 ArrayList_Append(rdpdr->blockedDevices, (void*)(size_t)DeviceId);
1618 if (count == 1)
1619 return TRUE;
1620
1621 WLog_Print(rdpdr->log, WLOG_INFO, "Filtering smartcard device 0x%08" PRIx32 "",
1622 DeviceId);
1623
1624 memmove(dst, Stream_ConstPointer(s), Stream_GetRemainingLength(s));
1625 Stream_SetPosition(s, pos);
1626 Stream_Write_UINT32(s, count - 1);
1627 return FALSE;
1628 }
1629 }
1630
1631 return FALSE;
1632}
1633
1634static BOOL filter_smartcard_device_list_announce_request(pf_channel_server_context* rdpdr,
1635 wStream* s)
1636{
1637 BOOL rc = TRUE;
1638 size_t pos = 0;
1639 UINT16 component = 0;
1640 UINT16 packetid = 0;
1641
1642 WINPR_ASSERT(rdpdr);
1643 if (!Stream_CheckAndLogRequiredLengthWLog(rdpdr->log, s, 8))
1644 return FALSE;
1645
1646 pos = Stream_GetPosition(s);
1647
1648 Stream_Read_UINT16(s, component);
1649 Stream_Read_UINT16(s, packetid);
1650
1651 if (component != RDPDR_CTYP_CORE)
1652 goto fail;
1653
1654 switch (packetid)
1655 {
1656 case PAKID_CORE_DEVICELIST_ANNOUNCE:
1657 if (filter_smartcard_device_list_announce(rdpdr, s))
1658 goto fail;
1659 break;
1660 case PAKID_CORE_DEVICELIST_REMOVE:
1661 if (filter_smartcard_device_list_remove(rdpdr, s))
1662 goto fail;
1663 break;
1664 case PAKID_CORE_DEVICE_IOREQUEST:
1665 if (filter_smartcard_device_io_request(rdpdr, s))
1666 goto fail;
1667 break;
1668
1669 case PAKID_CORE_SERVER_ANNOUNCE:
1670 case PAKID_CORE_CLIENTID_CONFIRM:
1671 case PAKID_CORE_CLIENT_NAME:
1672 case PAKID_CORE_DEVICE_REPLY:
1673 case PAKID_CORE_SERVER_CAPABILITY:
1674 case PAKID_CORE_CLIENT_CAPABILITY:
1675 case PAKID_CORE_USER_LOGGEDON:
1676 WLog_Print(rdpdr->log, WLOG_WARN, "Filtering client -> server message [%s | %s]",
1677 rdpdr_component_string(component), rdpdr_packetid_string(packetid));
1678 goto fail;
1679 default:
1680 break;
1681 }
1682
1683 rc = FALSE;
1684fail:
1685 Stream_SetPosition(s, pos);
1686 return rc;
1687}
1688#endif
1689
1690static void* stream_copy(const void* obj)
1691{
1692 const wStream* src = obj;
1693 wStream* dst = Stream_New(NULL, Stream_Capacity(src));
1694 if (!dst)
1695 return NULL;
1696 memcpy(Stream_Buffer(dst), Stream_ConstBuffer(src), Stream_Capacity(dst));
1697 Stream_SetLength(dst, Stream_Length(src));
1698 Stream_SetPosition(dst, Stream_GetPosition(src));
1699 return dst;
1700}
1701
1702static void stream_free(void* obj)
1703{
1704 wStream* s = obj;
1705 Stream_Free(s, TRUE);
1706}
1707
1708static const char* pf_channel_rdpdr_client_context(void* arg)
1709{
1710 pClientContext* pc = arg;
1711 if (!pc)
1712 return "pc=null";
1713 if (!pc->pdata)
1714 return "pc->pdata=null";
1715 return pc->pdata->session_id;
1716}
1717
1718BOOL pf_channel_rdpdr_client_new(pClientContext* pc)
1719{
1720 wObject* obj = NULL;
1721 pf_channel_client_context* rdpdr = NULL;
1722
1723 WINPR_ASSERT(pc);
1724 WINPR_ASSERT(pc->interceptContextMap);
1725
1726 rdpdr = calloc(1, sizeof(pf_channel_client_context));
1727 if (!rdpdr)
1728 return FALSE;
1729 rdpdr->log = WLog_Get(RTAG);
1730 WINPR_ASSERT(rdpdr->log);
1731
1732 WLog_SetContext(rdpdr->log, pf_channel_rdpdr_client_context, pc);
1733 if (!pf_channel_rdpdr_common_context_new(&rdpdr->common, pf_channel_rdpdr_client_context_free))
1734 goto fail;
1735
1736 rdpdr->maxMajorVersion = RDPDR_VERSION_MAJOR;
1737 rdpdr->maxMinorVersion = RDPDR_VERSION_MINOR_RDP10X;
1738 rdpdr->state = STATE_CLIENT_EXPECT_SERVER_ANNOUNCE_REQUEST;
1739
1740 rdpdr->queue = Queue_New(TRUE, 0, 0);
1741 if (!rdpdr->queue)
1742 goto fail;
1743 obj = Queue_Object(rdpdr->queue);
1744 WINPR_ASSERT(obj);
1745 obj->fnObjectNew = stream_copy;
1746 obj->fnObjectFree = stream_free;
1747 if (!HashTable_Insert(pc->interceptContextMap, RDPDR_SVC_CHANNEL_NAME, rdpdr))
1748 goto fail;
1749 // NOLINTNEXTLINE(clang-analyzer-unix.Malloc): HashTable_Insert takes ownership of rdpdr
1750 return TRUE;
1751fail:
1752 pf_channel_rdpdr_client_context_free(&rdpdr->common.base);
1753 return FALSE;
1754}
1755
1756void pf_channel_rdpdr_client_free(pClientContext* pc)
1757{
1758 WINPR_ASSERT(pc);
1759 WINPR_ASSERT(pc->interceptContextMap);
1760 HashTable_Remove(pc->interceptContextMap, RDPDR_SVC_CHANNEL_NAME);
1761}
1762
1763static void pf_channel_rdpdr_server_context_free(InterceptContextMapEntry* base)
1764{
1765 pf_channel_server_context* entry = (pf_channel_server_context*)base;
1766 if (!entry)
1767 return;
1768
1769 (void)WTSVirtualChannelClose(entry->handle);
1770 pf_channel_rdpdr_common_context_free(&entry->common);
1771 ArrayList_Free(entry->blockedDevices);
1772 free(entry);
1773}
1774
1775static const char* pf_channel_rdpdr_server_context(void* arg)
1776{
1777 pServerContext* ps = arg;
1778 if (!ps)
1779 return "ps=null";
1780 if (!ps->pdata)
1781 return "ps->pdata=null";
1782 return ps->pdata->session_id;
1783}
1784
1785BOOL pf_channel_rdpdr_server_new(pServerContext* ps)
1786{
1787 pf_channel_server_context* rdpdr = NULL;
1788 PULONG pSessionId = NULL;
1789 DWORD BytesReturned = 0;
1790
1791 WINPR_ASSERT(ps);
1792 WINPR_ASSERT(ps->interceptContextMap);
1793
1794 rdpdr = calloc(1, sizeof(pf_channel_server_context));
1795 if (!rdpdr)
1796 return FALSE;
1797 rdpdr->log = WLog_Get(RTAG);
1798 WINPR_ASSERT(rdpdr->log);
1799 WLog_SetContext(rdpdr->log, pf_channel_rdpdr_server_context, ps);
1800
1801 if (!pf_channel_rdpdr_common_context_new(&rdpdr->common, pf_channel_rdpdr_server_context_free))
1802 goto fail;
1803 rdpdr->state = STATE_SERVER_INITIAL;
1804
1805 rdpdr->blockedDevices = ArrayList_New(FALSE);
1806 if (!rdpdr->blockedDevices)
1807 goto fail;
1808
1809 rdpdr->SessionId = WTS_CURRENT_SESSION;
1810 if (WTSQuerySessionInformationA(ps->vcm, WTS_CURRENT_SESSION, WTSSessionId, (LPSTR*)&pSessionId,
1811 &BytesReturned))
1812 {
1813 rdpdr->SessionId = (DWORD)*pSessionId;
1814 WTSFreeMemory(pSessionId);
1815 }
1816
1817 rdpdr->handle = WTSVirtualChannelOpenEx(rdpdr->SessionId, RDPDR_SVC_CHANNEL_NAME, 0);
1818 if (rdpdr->handle == 0)
1819 goto fail;
1820 if (!HashTable_Insert(ps->interceptContextMap, RDPDR_SVC_CHANNEL_NAME, rdpdr))
1821 goto fail;
1822
1823 // NOLINTNEXTLINE(clang-analyzer-unix.Malloc): HashTable_Insert takes ownership of rdpdr
1824 return TRUE;
1825fail:
1826 pf_channel_rdpdr_server_context_free(&rdpdr->common.base);
1827 return FALSE;
1828}
1829
1830void pf_channel_rdpdr_server_free(pServerContext* ps)
1831{
1832 WINPR_ASSERT(ps);
1833 WINPR_ASSERT(ps->interceptContextMap);
1834 HashTable_Remove(ps->interceptContextMap, RDPDR_SVC_CHANNEL_NAME);
1835}
1836
1837static pf_channel_server_context* get_channel(pServerContext* ps, BOOL send)
1838{
1839 pf_channel_server_context* rdpdr = NULL;
1840 WINPR_ASSERT(ps);
1841 WINPR_ASSERT(ps->interceptContextMap);
1842
1843 rdpdr = HashTable_GetItemValue(ps->interceptContextMap, RDPDR_SVC_CHANNEL_NAME);
1844 if (!rdpdr)
1845 {
1846 SERVER_RXTX_LOG(send, WLog_Get(RTAG), WLOG_ERROR,
1847 "Channel %s missing context in interceptContextMap",
1848 RDPDR_SVC_CHANNEL_NAME);
1849 return NULL;
1850 }
1851
1852 return rdpdr;
1853}
1854
1855BOOL pf_channel_rdpdr_server_handle(pServerContext* ps, UINT16 channelId, const char* channel_name,
1856 const BYTE* xdata, size_t xsize, UINT32 flags, size_t totalSize)
1857{
1858 wStream* s = NULL;
1859 pClientContext* pc = NULL;
1860 pf_channel_server_context* rdpdr = get_channel(ps, FALSE);
1861 if (!rdpdr)
1862 return FALSE;
1863
1864 WINPR_ASSERT(ps->pdata);
1865 pc = ps->pdata->pc;
1866
1867 s = rdpdr->common.buffer;
1868
1869 if (flags & CHANNEL_FLAG_FIRST)
1870 Stream_SetPosition(s, 0);
1871
1872 if (!Stream_EnsureRemainingCapacity(s, xsize))
1873 return FALSE;
1874 Stream_Write(s, xdata, xsize);
1875
1876 if ((flags & CHANNEL_FLAG_LAST) == 0)
1877 return TRUE;
1878
1879 Stream_SealLength(s);
1880 Stream_SetPosition(s, 0);
1881
1882 if (Stream_Length(s) != totalSize)
1883 {
1884 SERVER_RX_LOG(rdpdr->log, WLOG_WARN,
1885 "Received invalid %s channel data (client -> proxy), expected %" PRIuz
1886 "bytes, got %" PRIuz,
1887 channel_name, totalSize, Stream_Length(s));
1888 return FALSE;
1889 }
1890
1891 rdpdr_dump_received_packet(rdpdr->log, WLOG_TRACE, s, proxy_client_rx);
1892 switch (rdpdr->state)
1893 {
1894 case STATE_SERVER_EXPECT_CLIENT_ANNOUNCE_REPLY:
1895 if (rdpdr_process_client_announce_reply(rdpdr, s) != CHANNEL_RC_OK)
1896 return FALSE;
1897 rdpdr->state = STATE_SERVER_EXPECT_CLIENT_NAME_REQUEST;
1898 break;
1899 case STATE_SERVER_EXPECT_CLIENT_NAME_REQUEST:
1900 if (rdpdr_process_client_name_request(rdpdr, s, pc) != CHANNEL_RC_OK)
1901 return FALSE;
1902 if (rdpdr_send_server_capability_request(rdpdr) != CHANNEL_RC_OK)
1903 return FALSE;
1904 if (rdpdr_send_server_clientid_confirm(rdpdr) != CHANNEL_RC_OK)
1905 return FALSE;
1906 rdpdr->state = STATE_SERVER_EXPECT_EXPECT_CLIENT_CAPABILITY_RESPONE;
1907 break;
1908 case STATE_SERVER_EXPECT_EXPECT_CLIENT_CAPABILITY_RESPONE:
1909 if (rdpdr_process_client_capability_response(rdpdr, s) != CHANNEL_RC_OK)
1910 return FALSE;
1911 rdpdr->state = STATE_SERVER_CHANNEL_RUNNING;
1912 break;
1913 case STATE_SERVER_CHANNEL_RUNNING:
1914#if defined(WITH_PROXY_EMULATE_SMARTCARD)
1915 if (!pf_channel_smartcard_client_emulate(pc) ||
1916 !filter_smartcard_device_list_announce_request(rdpdr, s))
1917 {
1918 if (!pf_channel_rdpdr_client_pass_message(ps, pc, channelId, channel_name, s))
1919 return FALSE;
1920 }
1921 else
1922 return pf_channel_smartcard_server_handle(ps, s);
1923#else
1924 if (!pf_channel_rdpdr_client_pass_message(ps, pc, channelId, channel_name, s))
1925 return FALSE;
1926#endif
1927 break;
1928 default:
1929 case STATE_SERVER_INITIAL:
1930 SERVER_RX_LOG(rdpdr->log, WLOG_WARN, "Invalid state %s",
1931 rdpdr_server_state_to_string(rdpdr->state));
1932 return FALSE;
1933 }
1934
1935 return TRUE;
1936}
1937
1938BOOL pf_channel_rdpdr_server_announce(pServerContext* ps)
1939{
1940 pf_channel_server_context* rdpdr = get_channel(ps, TRUE);
1941 if (!rdpdr)
1942 return FALSE;
1943
1944 WINPR_ASSERT(rdpdr->state == STATE_SERVER_INITIAL);
1945 if (rdpdr_server_send_announce_request(rdpdr) != CHANNEL_RC_OK)
1946 return FALSE;
1947 rdpdr->state = STATE_SERVER_EXPECT_CLIENT_ANNOUNCE_REPLY;
1948 return TRUE;
1949}
1950
1951BOOL pf_channel_rdpdr_client_reset(pClientContext* pc)
1952{
1953 pf_channel_client_context* rdpdr = NULL;
1954
1955 WINPR_ASSERT(pc);
1956 WINPR_ASSERT(pc->pdata);
1957 WINPR_ASSERT(pc->interceptContextMap);
1958
1959 rdpdr = HashTable_GetItemValue(pc->interceptContextMap, RDPDR_SVC_CHANNEL_NAME);
1960 if (!rdpdr)
1961 return TRUE;
1962
1963 Queue_Clear(rdpdr->queue);
1964 rdpdr->flags = 0;
1965 rdpdr->state = STATE_CLIENT_EXPECT_SERVER_ANNOUNCE_REQUEST;
1966
1967 return TRUE;
1968}
1969
1970static PfChannelResult pf_rdpdr_back_data(proxyData* pdata,
1971 const pServerStaticChannelContext* channel,
1972 const BYTE* xdata, size_t xsize, UINT32 flags,
1973 size_t totalSize)
1974{
1975 WINPR_ASSERT(pdata);
1976 WINPR_ASSERT(channel);
1977
1978 if (!pf_channel_rdpdr_client_handle(pdata->pc,
1979 WINPR_ASSERTING_INT_CAST(UINT16, channel->back_channel_id),
1980 channel->channel_name, xdata, xsize, flags, totalSize))
1981 return PF_CHANNEL_RESULT_ERROR;
1982
1983#if defined(WITH_PROXY_EMULATE_SMARTCARD)
1984 if (pf_channel_smartcard_client_emulate(pdata->pc))
1985 return PF_CHANNEL_RESULT_DROP;
1986#endif
1987 return PF_CHANNEL_RESULT_DROP;
1988}
1989
1990static PfChannelResult pf_rdpdr_front_data(proxyData* pdata,
1991 const pServerStaticChannelContext* channel,
1992 const BYTE* xdata, size_t xsize, UINT32 flags,
1993 size_t totalSize)
1994{
1995 WINPR_ASSERT(pdata);
1996 WINPR_ASSERT(channel);
1997
1998 if (!pf_channel_rdpdr_server_handle(pdata->ps,
1999 WINPR_ASSERTING_INT_CAST(UINT16, channel->front_channel_id),
2000 channel->channel_name, xdata, xsize, flags, totalSize))
2001 return PF_CHANNEL_RESULT_ERROR;
2002
2003#if defined(WITH_PROXY_EMULATE_SMARTCARD)
2004 if (pf_channel_smartcard_client_emulate(pdata->pc))
2005 return PF_CHANNEL_RESULT_DROP;
2006#endif
2007 return PF_CHANNEL_RESULT_DROP;
2008}
2009
2010BOOL pf_channel_setup_rdpdr(pServerContext* ps, pServerStaticChannelContext* channel)
2011{
2012 channel->onBackData = pf_rdpdr_back_data;
2013 channel->onFrontData = pf_rdpdr_front_data;
2014
2015 if (!pf_channel_rdpdr_server_new(ps))
2016 return FALSE;
2017 if (!pf_channel_rdpdr_server_announce(ps))
2018 return FALSE;
2019
2020 return TRUE;
2021}
RDPDR_CAPABILITY_HEADER
Definition rdpdr_utils.h:42
wObject
This struct contains function pointer to initialize/free objects.
Definition collections.h:57