Coverage Report

Created: 2026-01-09 06:49

next uncovered line (L), next uncovered region (R), next uncovered branch (B)
/src/FreeRDP/libfreerdp/core/mcs.c
Line
Count
Source
1
/**
2
 * FreeRDP: A Remote Desktop Protocol Implementation
3
 * T.125 Multipoint Communication Service (MCS) Protocol
4
 *
5
 * Copyright 2011 Marc-Andre Moreau <marcandre.moreau@gmail.com>
6
 * Copyright 2015 Thincast Technologies GmbH
7
 * Copyright 2015 DI (FH) Martin Haimberger <martin.haimberger@thincast.com>
8
 * Copyright 2017 Armin Novak <armin.novak@thincast.com>
9
 * Copyright 2017 Thincast Technologies GmbH
10
 *
11
 * Licensed under the Apache License, Version 2.0 (the "License");
12
 * you may not use this file except in compliance with the License.
13
 * You may obtain a copy of the License at
14
 *
15
 *     http://www.apache.org/licenses/LICENSE-2.0
16
 *
17
 * Unless required by applicable law or agreed to in writing, software
18
 * distributed under the License is distributed on an "AS IS" BASIS,
19
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
20
 * See the License for the specific language governing permissions and
21
 * limitations under the License.
22
 */
23
24
#include <freerdp/config.h>
25
26
#include <winpr/crt.h>
27
#include <winpr/assert.h>
28
#include <freerdp/log.h>
29
30
#include "gcc.h"
31
32
#include "mcs.h"
33
#include "tpdu.h"
34
#include "tpkt.h"
35
#include "client.h"
36
#include "connection.h"
37
38
51.8k
#define MCS_TAG FREERDP_TAG("core")
39
40
/**
41
 * T.125 MCS is defined in:
42
 *
43
 * http://www.itu.int/rec/T-REC-T.125-199802-I/
44
 * ITU-T T.125 Multipoint Communication Service Protocol Specification
45
 */
46
47
/**
48
 * Connect-Initial ::= [APPLICATION 101] IMPLICIT SEQUENCE
49
 * {
50
 *  callingDomainSelector   OCTET_STRING,
51
 *  calledDomainSelector    OCTET_STRING,
52
 *  upwardFlag      BOOLEAN,
53
 *  targetParameters    DomainParameters,
54
 *  minimumParameters   DomainParameters,
55
 *  maximumParameters   DomainParameters,
56
 *  userData      OCTET_STRING
57
 * }
58
 *
59
 * DomainParameters ::= SEQUENCE
60
 * {
61
 *  maxChannelIds     INTEGER (0..MAX),
62
 *  maxUserIds      INTEGER (0..MAX),
63
 *  maxTokenIds     INTEGER (0..MAX),
64
 *  numPriorities     INTEGER (0..MAX),
65
 *  minThroughput     INTEGER (0..MAX),
66
 *  maxHeight     INTEGER (0..MAX),
67
 *  maxMCSPDUsize     INTEGER (0..MAX),
68
 *  protocolVersion     INTEGER (0..MAX)
69
 * }
70
 *
71
 * Connect-Response ::= [APPLICATION 102] IMPLICIT SEQUENCE
72
 * {
73
 *  result        Result,
74
 *  calledConnectId     INTEGER (0..MAX),
75
 *  domainParameters    DomainParameters,
76
 *  userData      OCTET_STRING
77
 * }
78
 *
79
 * Result ::= ENUMERATED
80
 * {
81
 *  rt-successful     (0),
82
 *  rt-domain-merging   (1),
83
 *  rt-domain-not-hierarchical  (2),
84
 *  rt-no-such-channel    (3),
85
 *  rt-no-such-domain   (4),
86
 *  rt-no-such-user     (5),
87
 *  rt-not-admitted     (6),
88
 *  rt-other-user-id    (7),
89
 *  rt-parameters-unacceptable  (8),
90
 *  rt-token-not-available    (9),
91
 *  rt-token-not-possessed    (10),
92
 *  rt-too-many-channels    (11),
93
 *  rt-too-many-tokens    (12),
94
 *  rt-too-many-users   (13),
95
 *  rt-unspecified-failure    (14),
96
 *  rt-user-rejected    (15)
97
 * }
98
 *
99
 * ErectDomainRequest ::= [APPLICATION 1] IMPLICIT SEQUENCE
100
 * {
101
 *  subHeight     INTEGER (0..MAX),
102
 *  subInterval     INTEGER (0..MAX)
103
 * }
104
 *
105
 * AttachUserRequest ::= [APPLICATION 10] IMPLICIT SEQUENCE
106
 * {
107
 * }
108
 *
109
 * AttachUserConfirm ::= [APPLICATION 11] IMPLICIT SEQUENCE
110
 * {
111
 *  result        Result,
112
 *  initiator     UserId OPTIONAL
113
 * }
114
 *
115
 * ChannelJoinRequest ::= [APPLICATION 14] IMPLICIT SEQUENCE
116
 * {
117
 *  initiator     UserId,
118
 *  channelId     ChannelId
119
 * }
120
 *
121
 * ChannelJoinConfirm ::= [APPLICATION 15] IMPLICIT SEQUENCE
122
 * {
123
 *  result        Result,
124
 *  initiator     UserId,
125
 *  requested     ChannelId,
126
 *  channelId     ChannelId OPTIONAL
127
 * }
128
 *
129
 * SendDataRequest ::= [APPLICATION 25] IMPLICIT SEQUENCE
130
 * {
131
 *  initiator     UserId,
132
 *  channelId     ChannelId,
133
 *  dataPriority      DataPriority,
134
 *  segmentation      Segmentation,
135
 *  userData      OCTET_STRING
136
 * }
137
 *
138
 * DataPriority ::= CHOICE
139
 * {
140
 *  top       NULL,
141
 *  high        NULL,
142
 *  medium        NULL,
143
 *  low       NULL,
144
 *  ...
145
 * }
146
 *
147
 * Segmentation ::= BIT_STRING
148
 * {
149
 *  begin       (0),
150
 *  end       (1)
151
 * } (SIZE(2))
152
 *
153
 * SendDataIndication ::= SEQUENCE
154
 * {
155
 *  initiator     UserId,
156
 *  channelId     ChannelId,
157
 *  reliability     BOOLEAN,
158
 *  domainReferenceID   INTEGER (0..65535) OPTIONAL,
159
 *  dataPriority      DataPriority,
160
 *  segmentation      Segmentation,
161
 *  userData      OCTET_STRING,
162
 *  totalDataSize     INTEGER OPTIONAL,
163
 *  nonStandard     SEQUENCE OF NonStandardParameter OPTIONAL,
164
 *  ...
165
 * }
166
 *
167
 */
168
169
static const BYTE callingDomainSelector[1] = { 0x01 };
170
static const BYTE calledDomainSelector[1] = { 0x01 };
171
172
/*
173
static const char* const mcs_result_enumerated[] =
174
{
175
        "rt-successful",
176
        "rt-domain-merging",
177
        "rt-domain-not-hierarchical",
178
        "rt-no-such-channel",
179
        "rt-no-such-domain",
180
        "rt-no-such-user",
181
        "rt-not-admitted",
182
        "rt-other-user-id",
183
        "rt-parameters-unacceptable",
184
        "rt-token-not-available",
185
        "rt-token-not-possessed",
186
        "rt-too-many-channels",
187
        "rt-too-many-tokens",
188
        "rt-too-many-users",
189
        "rt-unspecified-failure",
190
        "rt-user-rejected"
191
};
192
*/
193
194
const char* mcs_domain_pdu_string(DomainMCSPDU pdu)
195
106
{
196
106
  switch (pdu)
197
106
  {
198
10
    case DomainMCSPDU_PlumbDomainIndication:
199
10
      return "DomainMCSPDU_PlumbDomainIndication";
200
1
    case DomainMCSPDU_ErectDomainRequest:
201
1
      return "DomainMCSPDU_ErectDomainRequest";
202
0
    case DomainMCSPDU_MergeChannelsRequest:
203
0
      return "DomainMCSPDU_MergeChannelsRequest";
204
3
    case DomainMCSPDU_MergeChannelsConfirm:
205
3
      return "DomainMCSPDU_MergeChannelsConfirm";
206
0
    case DomainMCSPDU_PurgeChannelsIndication:
207
0
      return "DomainMCSPDU_PurgeChannelsIndication";
208
0
    case DomainMCSPDU_MergeTokensRequest:
209
0
      return "DomainMCSPDU_MergeTokensRequest";
210
1
    case DomainMCSPDU_MergeTokensConfirm:
211
1
      return "DomainMCSPDU_MergeTokensConfirm";
212
1
    case DomainMCSPDU_PurgeTokensIndication:
213
1
      return "DomainMCSPDU_PurgeTokensIndication";
214
0
    case DomainMCSPDU_DisconnectProviderUltimatum:
215
0
      return "DomainMCSPDU_DisconnectProviderUltimatum";
216
0
    case DomainMCSPDU_RejectMCSPDUUltimatum:
217
0
      return "DomainMCSPDU_RejectMCSPDUUltimatum";
218
0
    case DomainMCSPDU_AttachUserRequest:
219
0
      return "DomainMCSPDU_AttachUserRequest";
220
0
    case DomainMCSPDU_AttachUserConfirm:
221
0
      return "DomainMCSPDU_AttachUserConfirm";
222
0
    case DomainMCSPDU_DetachUserRequest:
223
0
      return "DomainMCSPDU_DetachUserRequest";
224
1
    case DomainMCSPDU_DetachUserIndication:
225
1
      return "DomainMCSPDU_DetachUserIndication";
226
0
    case DomainMCSPDU_ChannelJoinRequest:
227
0
      return "DomainMCSPDU_ChannelJoinRequest";
228
0
    case DomainMCSPDU_ChannelJoinConfirm:
229
0
      return "DomainMCSPDU_ChannelJoinConfirm";
230
1
    case DomainMCSPDU_ChannelLeaveRequest:
231
1
      return "DomainMCSPDU_ChannelLeaveRequest";
232
0
    case DomainMCSPDU_ChannelConveneRequest:
233
0
      return "DomainMCSPDU_ChannelConveneRequest";
234
0
    case DomainMCSPDU_ChannelConveneConfirm:
235
0
      return "DomainMCSPDU_ChannelConveneConfirm";
236
1
    case DomainMCSPDU_ChannelDisbandRequest:
237
1
      return "DomainMCSPDU_ChannelDisbandRequest";
238
0
    case DomainMCSPDU_ChannelDisbandIndication:
239
0
      return "DomainMCSPDU_ChannelDisbandIndication";
240
0
    case DomainMCSPDU_ChannelAdmitRequest:
241
0
      return "DomainMCSPDU_ChannelAdmitRequest";
242
0
    case DomainMCSPDU_ChannelAdmitIndication:
243
0
      return "DomainMCSPDU_ChannelAdmitIndication";
244
2
    case DomainMCSPDU_ChannelExpelRequest:
245
2
      return "DomainMCSPDU_ChannelExpelRequest";
246
0
    case DomainMCSPDU_ChannelExpelIndication:
247
0
      return "DomainMCSPDU_ChannelExpelIndication";
248
24
    case DomainMCSPDU_SendDataRequest:
249
24
      return "DomainMCSPDU_SendDataRequest";
250
29
    case DomainMCSPDU_SendDataIndication:
251
29
      return "DomainMCSPDU_SendDataIndication";
252
1
    case DomainMCSPDU_UniformSendDataRequest:
253
1
      return "DomainMCSPDU_UniformSendDataRequest";
254
0
    case DomainMCSPDU_UniformSendDataIndication:
255
0
      return "DomainMCSPDU_UniformSendDataIndication";
256
0
    case DomainMCSPDU_TokenGrabRequest:
257
0
      return "DomainMCSPDU_TokenGrabRequest";
258
0
    case DomainMCSPDU_TokenGrabConfirm:
259
0
      return "DomainMCSPDU_TokenGrabConfirm";
260
8
    case DomainMCSPDU_TokenInhibitRequest:
261
8
      return "DomainMCSPDU_TokenInhibitRequest";
262
0
    case DomainMCSPDU_TokenInhibitConfirm:
263
0
      return "DomainMCSPDU_TokenInhibitConfirm";
264
0
    case DomainMCSPDU_TokenGiveRequest:
265
0
      return "DomainMCSPDU_TokenGiveRequest";
266
0
    case DomainMCSPDU_TokenGiveIndication:
267
0
      return "DomainMCSPDU_TokenGiveIndication";
268
0
    case DomainMCSPDU_TokenGiveResponse:
269
0
      return "DomainMCSPDU_TokenGiveResponse";
270
0
    case DomainMCSPDU_TokenGiveConfirm:
271
0
      return "DomainMCSPDU_TokenGiveConfirm";
272
2
    case DomainMCSPDU_TokenPleaseRequest:
273
2
      return "DomainMCSPDU_TokenPleaseRequest";
274
1
    case DomainMCSPDU_TokenPleaseConfirm:
275
1
      return "DomainMCSPDU_TokenPleaseConfirm";
276
0
    case DomainMCSPDU_TokenReleaseRequest:
277
0
      return "DomainMCSPDU_TokenReleaseRequest";
278
0
    case DomainMCSPDU_TokenReleaseConfirm:
279
0
      return "DomainMCSPDU_TokenReleaseConfirm";
280
0
    case DomainMCSPDU_TokenTestRequest:
281
0
      return "DomainMCSPDU_TokenTestRequest";
282
2
    case DomainMCSPDU_TokenTestConfirm:
283
2
      return "DomainMCSPDU_TokenTestConfirm";
284
0
    case DomainMCSPDU_enum_length:
285
0
      return "DomainMCSPDU_enum_length";
286
18
    default:
287
18
      return "DomainMCSPDU_UNKNOWN";
288
106
  }
289
106
}
290
291
static BOOL mcs_merge_domain_parameters(wLog* log, DomainParameters* targetParameters,
292
                                        DomainParameters* minimumParameters,
293
                                        DomainParameters* maximumParameters,
294
                                        DomainParameters* pOutParameters);
295
296
static BOOL mcs_write_connect_initial(wStream* s, rdpMcs* mcs, wStream* userData);
297
static BOOL mcs_write_connect_response(wStream* s, rdpMcs* mcs, wStream* userData);
298
static BOOL mcs_read_domain_mcspdu_header(wLog* log, wStream* s, DomainMCSPDU domainMCSPDU,
299
                                          UINT16* length, DomainMCSPDU* actual);
300
301
static int mcs_initialize_client_channels(rdpMcs* mcs, const rdpSettings* settings)
302
0
{
303
0
  if (!mcs || !settings)
304
0
    return -1;
305
306
0
  mcs->channelCount = freerdp_settings_get_uint32(settings, FreeRDP_ChannelCount);
307
308
0
  if (mcs->channelCount > mcs->channelMaxCount)
309
0
    mcs->channelCount = mcs->channelMaxCount;
310
311
0
  ZeroMemory(mcs->channels, sizeof(rdpMcsChannel) * mcs->channelMaxCount);
312
313
0
  for (UINT32 index = 0; index < mcs->channelCount; index++)
314
0
  {
315
0
    const CHANNEL_DEF* defchannel =
316
0
        freerdp_settings_get_pointer_array(settings, FreeRDP_ChannelDefArray, index);
317
0
    rdpMcsChannel* cur = &mcs->channels[index];
318
0
    WINPR_ASSERT(defchannel);
319
0
    CopyMemory(cur->Name, defchannel->name, CHANNEL_NAME_LEN);
320
0
    cur->options = defchannel->options;
321
0
  }
322
323
0
  return 0;
324
0
}
325
326
/**
327
 * Read a DomainMCSPDU header.
328
 * @param s stream
329
 * @param domainMCSPDU DomainMCSPDU type
330
 * @param length TPKT length
331
 *
332
 * @return \b TRUE for success, \b FALSE otherwise
333
 */
334
335
BOOL mcs_read_domain_mcspdu_header(wLog* log, wStream* s, DomainMCSPDU domainMCSPDU, UINT16* length,
336
                                   DomainMCSPDU* actual)
337
0
{
338
0
  UINT16 li = 0;
339
0
  BYTE choice = 0;
340
341
0
  if (actual)
342
0
    *actual = DomainMCSPDU_invalid;
343
344
0
  WINPR_ASSERT(s);
345
0
  WINPR_ASSERT(domainMCSPDU);
346
0
  WINPR_ASSERT(length);
347
348
0
  if (!tpkt_read_header(s, length))
349
0
    return FALSE;
350
351
0
  if (!tpdu_read_data(s, &li, *length))
352
0
    return FALSE;
353
354
0
  if (!per_read_choice(s, &choice))
355
0
    return FALSE;
356
357
0
  const DomainMCSPDU MCSPDU = (choice >> 2);
358
0
  if (actual)
359
0
    *actual = MCSPDU;
360
361
0
  if (domainMCSPDU != MCSPDU)
362
0
  {
363
0
    WLog_Print(log, WLOG_ERROR, "Expected MCS %s, got %s", mcs_domain_pdu_string(domainMCSPDU),
364
0
               mcs_domain_pdu_string(MCSPDU));
365
0
    return FALSE;
366
0
  }
367
368
0
  return TRUE;
369
0
}
370
371
/**
372
 * Write a DomainMCSPDU header.
373
 * @param s stream
374
 * @param domainMCSPDU DomainMCSPDU type
375
 * @param length TPKT length
376
 */
377
378
BOOL mcs_write_domain_mcspdu_header(wStream* s, DomainMCSPDU domainMCSPDU, UINT16 length,
379
                                    BYTE options)
380
2.65k
{
381
2.65k
  WINPR_ASSERT(s);
382
2.65k
  WINPR_ASSERT((options & ~0x03) == 0);
383
2.65k
  WINPR_ASSERT((domainMCSPDU & ~0x3F) == 0);
384
385
2.65k
  if (!tpkt_write_header(s, length))
386
0
    return FALSE;
387
2.65k
  if (!tpdu_write_data(s))
388
0
    return FALSE;
389
2.65k
  return per_write_choice(s, (BYTE)((domainMCSPDU << 2) | options));
390
2.65k
}
391
392
/**
393
 * Initialize MCS Domain Parameters.
394
 * @param domainParameters domain parameters
395
 * @param maxChannelIds max channel ids
396
 * @param maxUserIds max user ids
397
 * @param maxTokenIds max token ids
398
 * @param maxMCSPDUsize max MCS PDU size
399
 */
400
401
static BOOL mcs_init_domain_parameters(DomainParameters* domainParameters, UINT32 maxChannelIds,
402
                                       UINT32 maxUserIds, UINT32 maxTokenIds, UINT32 maxMCSPDUsize)
403
207k
{
404
207k
  if (!domainParameters)
405
0
    return FALSE;
406
407
207k
  domainParameters->maxChannelIds = maxChannelIds;
408
207k
  domainParameters->maxUserIds = maxUserIds;
409
207k
  domainParameters->maxTokenIds = maxTokenIds;
410
207k
  domainParameters->maxMCSPDUsize = maxMCSPDUsize;
411
207k
  domainParameters->numPriorities = 1;
412
207k
  domainParameters->minThroughput = 0;
413
207k
  domainParameters->maxHeight = 1;
414
207k
  domainParameters->protocolVersion = 2;
415
207k
  return TRUE;
416
207k
}
417
418
/**
419
 * Read MCS Domain Parameters.
420
 * @param s stream
421
 * @param domainParameters domain parameters
422
 */
423
424
static BOOL mcs_read_domain_parameters(wStream* s, DomainParameters* domainParameters)
425
5.67k
{
426
5.67k
  size_t length = 0;
427
428
5.67k
  if (!s || !domainParameters)
429
0
    return FALSE;
430
431
5.67k
  return ber_read_sequence_tag(s, &length) &&
432
5.59k
         ber_read_integer(s, &(domainParameters->maxChannelIds)) &&
433
5.57k
         ber_read_integer(s, &(domainParameters->maxUserIds)) &&
434
5.55k
         ber_read_integer(s, &(domainParameters->maxTokenIds)) &&
435
5.52k
         ber_read_integer(s, &(domainParameters->numPriorities)) &&
436
5.48k
         ber_read_integer(s, &(domainParameters->minThroughput)) &&
437
5.45k
         ber_read_integer(s, &(domainParameters->maxHeight)) &&
438
5.44k
         ber_read_integer(s, &(domainParameters->maxMCSPDUsize)) &&
439
5.42k
         ber_read_integer(s, &(domainParameters->protocolVersion));
440
5.67k
}
441
442
/**
443
 * Write MCS Domain Parameters.
444
 * @param s stream
445
 * @param domainParameters domain parameters
446
 */
447
448
static BOOL mcs_write_domain_parameters(wLog* log, wStream* s, DomainParameters* domainParameters)
449
0
{
450
0
  size_t length = 0;
451
0
  wStream* tmps = NULL;
452
453
0
  if (!s || !domainParameters)
454
0
    return FALSE;
455
456
0
  tmps = Stream_New(NULL, Stream_Capacity(s));
457
458
0
  if (!tmps)
459
0
  {
460
0
    WLog_Print(log, WLOG_ERROR, "Stream_New failed!");
461
0
    return FALSE;
462
0
  }
463
464
0
  ber_write_integer(tmps, domainParameters->maxChannelIds);
465
0
  ber_write_integer(tmps, domainParameters->maxUserIds);
466
0
  ber_write_integer(tmps, domainParameters->maxTokenIds);
467
0
  ber_write_integer(tmps, domainParameters->numPriorities);
468
0
  ber_write_integer(tmps, domainParameters->minThroughput);
469
0
  ber_write_integer(tmps, domainParameters->maxHeight);
470
0
  ber_write_integer(tmps, domainParameters->maxMCSPDUsize);
471
0
  ber_write_integer(tmps, domainParameters->protocolVersion);
472
0
  length = Stream_GetPosition(tmps);
473
0
  ber_write_sequence_tag(s, length);
474
0
  Stream_Write(s, Stream_Buffer(tmps), length);
475
0
  Stream_Free(tmps, TRUE);
476
0
  return TRUE;
477
0
}
478
479
#ifdef DEBUG_MCS
480
/**
481
 * Print MCS Domain Parameters.
482
 * @param domainParameters domain parameters
483
 */
484
485
static void mcs_print_domain_parameters(DomainParameters* domainParameters)
486
{
487
  WLog_INFO(TAG, "DomainParameters {");
488
489
  if (domainParameters)
490
  {
491
    WLog_INFO(TAG, "\tmaxChannelIds:%" PRIu32 "", domainParameters->maxChannelIds);
492
    WLog_INFO(TAG, "\tmaxUserIds:%" PRIu32 "", domainParameters->maxUserIds);
493
    WLog_INFO(TAG, "\tmaxTokenIds:%" PRIu32 "", domainParameters->maxTokenIds);
494
    WLog_INFO(TAG, "\tnumPriorities:%" PRIu32 "", domainParameters->numPriorities);
495
    WLog_INFO(TAG, "\tminThroughput:%" PRIu32 "", domainParameters->minThroughput);
496
    WLog_INFO(TAG, "\tmaxHeight:%" PRIu32 "", domainParameters->maxHeight);
497
    WLog_INFO(TAG, "\tmaxMCSPDUsize:%" PRIu32 "", domainParameters->maxMCSPDUsize);
498
    WLog_INFO(TAG, "\tprotocolVersion:%" PRIu32 "", domainParameters->protocolVersion);
499
  }
500
  else
501
    WLog_INFO(TAG, "\tdomainParameters=%p", domainParameters);
502
503
  WLog_INFO(TAG, "}");
504
}
505
#endif
506
507
/**
508
 * Merge MCS Domain Parameters.
509
 * @param targetParameters target parameters
510
 * @param minimumParameters minimum parameters
511
 * @param maximumParameters maximum parameters
512
 * @param pOutParameters output parameters
513
 *
514
 * @return \b TRUE for success, \b FALSE otherwise
515
 */
516
517
BOOL mcs_merge_domain_parameters(wLog* log, DomainParameters* targetParameters,
518
                                 DomainParameters* minimumParameters,
519
                                 DomainParameters* maximumParameters,
520
                                 DomainParameters* pOutParameters)
521
460
{
522
  /* maxChannelIds */
523
460
  if (!targetParameters || !minimumParameters || !maximumParameters || !pOutParameters)
524
0
    return FALSE;
525
526
460
  if (targetParameters->maxChannelIds >= 4)
527
403
  {
528
403
    pOutParameters->maxChannelIds = targetParameters->maxChannelIds;
529
403
  }
530
57
  else if (maximumParameters->maxChannelIds >= 4)
531
55
  {
532
55
    pOutParameters->maxChannelIds = 4;
533
55
  }
534
2
  else
535
2
  {
536
2
    WLog_Print(log, WLOG_ERROR, "invalid maxChannelIds [%" PRIu32 ", %" PRIu32 "]",
537
2
               targetParameters->maxChannelIds, maximumParameters->maxChannelIds);
538
2
    return FALSE;
539
2
  }
540
541
  /* maxUserIds */
542
543
458
  if (targetParameters->maxUserIds >= 3)
544
434
  {
545
434
    pOutParameters->maxUserIds = targetParameters->maxUserIds;
546
434
  }
547
24
  else if (maximumParameters->maxUserIds >= 3)
548
21
  {
549
21
    pOutParameters->maxUserIds = 3;
550
21
  }
551
3
  else
552
3
  {
553
3
    WLog_Print(log, WLOG_ERROR, "invalid maxUserIds [%" PRIu32 ", %" PRIu32 "]",
554
3
               targetParameters->maxUserIds, maximumParameters->maxUserIds);
555
3
    return FALSE;
556
3
  }
557
558
  /* maxTokenIds */
559
455
  pOutParameters->maxTokenIds = targetParameters->maxTokenIds;
560
561
  /* numPriorities */
562
563
455
  if (minimumParameters->numPriorities <= 1)
564
94
  {
565
94
    pOutParameters->numPriorities = 1;
566
94
  }
567
361
  else
568
361
  {
569
361
    WLog_Print(log, WLOG_ERROR, "invalid numPriorities [%" PRIu32 "]",
570
361
               maximumParameters->numPriorities);
571
361
    return FALSE;
572
361
  }
573
574
  /* minThroughput */
575
94
  pOutParameters->minThroughput = targetParameters->minThroughput;
576
577
  /* maxHeight */
578
579
94
  if ((targetParameters->maxHeight == 1) || (minimumParameters->maxHeight <= 1))
580
80
  {
581
80
    pOutParameters->maxHeight = 1;
582
80
  }
583
14
  else
584
14
  {
585
14
    WLog_Print(log, WLOG_ERROR, "invalid maxHeight [%" PRIu32 ", %" PRIu32 "]",
586
14
               targetParameters->maxHeight, minimumParameters->maxHeight);
587
14
    return FALSE;
588
14
  }
589
590
  /* maxMCSPDUsize */
591
592
80
  if (targetParameters->maxMCSPDUsize >= 1024)
593
66
  {
594
66
    if (targetParameters->maxMCSPDUsize <= 65528)
595
18
    {
596
18
      pOutParameters->maxMCSPDUsize = targetParameters->maxMCSPDUsize;
597
18
    }
598
48
    else if ((minimumParameters->maxMCSPDUsize >= 124) &&
599
47
             (minimumParameters->maxMCSPDUsize <= 65528))
600
1
    {
601
1
      pOutParameters->maxMCSPDUsize = 65528;
602
1
    }
603
47
    else
604
47
    {
605
47
      WLog_Print(log, WLOG_ERROR, "invalid maxMCSPDUsize [%" PRIu32 ", %" PRIu32 "]",
606
47
                 targetParameters->maxMCSPDUsize, minimumParameters->maxMCSPDUsize);
607
47
      return FALSE;
608
47
    }
609
66
  }
610
14
  else
611
14
  {
612
14
    if (maximumParameters->maxMCSPDUsize >= 124)
613
13
    {
614
13
      pOutParameters->maxMCSPDUsize = maximumParameters->maxMCSPDUsize;
615
13
    }
616
1
    else
617
1
    {
618
1
      WLog_Print(log, WLOG_ERROR, "invalid maxMCSPDUsize [%" PRIu32 "]",
619
1
                 maximumParameters->maxMCSPDUsize);
620
1
      return FALSE;
621
1
    }
622
14
  }
623
624
  /* protocolVersion */
625
626
32
  if ((targetParameters->protocolVersion == 2) ||
627
30
      ((minimumParameters->protocolVersion <= 2) && (maximumParameters->protocolVersion >= 2)))
628
3
  {
629
3
    pOutParameters->protocolVersion = 2;
630
3
  }
631
29
  else
632
29
  {
633
29
    WLog_Print(log, WLOG_ERROR,
634
29
               "invalid protocolVersion [%" PRIu32 ", %" PRIu32 ", %" PRIu32 "]",
635
29
               targetParameters->protocolVersion, minimumParameters->protocolVersion,
636
29
               maximumParameters->protocolVersion);
637
29
    return FALSE;
638
29
  }
639
640
3
  return TRUE;
641
32
}
642
643
/**
644
 * Read an MCS Connect Initial PDU.
645
 * msdn{cc240508}
646
 * @param mcs MCS module
647
 * @param s stream
648
 */
649
650
BOOL mcs_recv_connect_initial(rdpMcs* mcs, wStream* s)
651
17.2k
{
652
17.2k
  UINT16 li = 0;
653
17.2k
  size_t length = 0;
654
17.2k
  BOOL upwardFlag = FALSE;
655
17.2k
  UINT16 tlength = 0;
656
657
17.2k
  WINPR_ASSERT(mcs);
658
17.2k
  WINPR_ASSERT(s);
659
660
17.2k
  if (!tpkt_read_header(s, &tlength))
661
405
    return FALSE;
662
663
16.8k
  if (!tpdu_read_data(s, &li, tlength))
664
13.5k
    return FALSE;
665
666
3.29k
  if (!ber_read_application_tag(s, MCS_TYPE_CONNECT_INITIAL, &length))
667
1.82k
    return FALSE;
668
669
  /* callingDomainSelector (OCTET_STRING) */
670
1.46k
  if (!ber_read_octet_string_tag(s, &length) ||
671
1.44k
      (!Stream_CheckAndLogRequiredLengthWLog(mcs->log, s, length)))
672
25
    return FALSE;
673
674
1.44k
  Stream_Seek(s, length);
675
676
  /* calledDomainSelector (OCTET_STRING) */
677
1.44k
  if (!ber_read_octet_string_tag(s, &length) ||
678
1.42k
      (!Stream_CheckAndLogRequiredLengthWLog(mcs->log, s, length)))
679
25
    return FALSE;
680
681
1.41k
  Stream_Seek(s, length);
682
683
  /* upwardFlag (BOOLEAN) */
684
1.41k
  if (!ber_read_BOOL(s, &upwardFlag))
685
31
    return FALSE;
686
687
  /* targetParameters (DomainParameters) */
688
1.38k
  if (!mcs_read_domain_parameters(s, &mcs->targetParameters))
689
63
    return FALSE;
690
691
  /* minimumParameters (DomainParameters) */
692
1.32k
  if (!mcs_read_domain_parameters(s, &mcs->minimumParameters))
693
44
    return FALSE;
694
695
  /* maximumParameters (DomainParameters) */
696
1.28k
  if (!mcs_read_domain_parameters(s, &mcs->maximumParameters))
697
24
    return FALSE;
698
699
1.25k
  if (!ber_read_octet_string_tag(s, &length) ||
700
1.25k
      (!Stream_CheckAndLogRequiredLengthWLog(mcs->log, s, length)))
701
6
    return FALSE;
702
703
1.25k
  if (!gcc_read_conference_create_request(s, mcs))
704
790
    return FALSE;
705
706
460
  if (!mcs_merge_domain_parameters(mcs->log, &mcs->targetParameters, &mcs->minimumParameters,
707
460
                                   &mcs->maximumParameters, &mcs->domainParameters))
708
457
    return FALSE;
709
710
3
  return tpkt_ensure_stream_consumed(mcs->log, s, tlength);
711
460
}
712
713
/**
714
 * Write an MCS Connect Initial PDU.
715
 * msdn{cc240508}
716
 * @param s stream
717
 * @param mcs MCS module
718
 * @param userData GCC Conference Create Request
719
 */
720
721
BOOL mcs_write_connect_initial(wStream* s, rdpMcs* mcs, wStream* userData)
722
0
{
723
0
  size_t length = 0;
724
0
  wStream* tmps = NULL;
725
0
  BOOL ret = FALSE;
726
727
0
  if (!s || !mcs || !userData)
728
0
    return FALSE;
729
730
0
  tmps = Stream_New(NULL, Stream_Capacity(s));
731
732
0
  if (!tmps)
733
0
  {
734
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
735
0
    return FALSE;
736
0
  }
737
738
  /* callingDomainSelector (OCTET_STRING) */
739
0
  ber_write_octet_string(tmps, callingDomainSelector, sizeof(callingDomainSelector));
740
  /* calledDomainSelector (OCTET_STRING) */
741
0
  ber_write_octet_string(tmps, calledDomainSelector, sizeof(calledDomainSelector));
742
  /* upwardFlag (BOOLEAN) */
743
0
  ber_write_BOOL(tmps, TRUE);
744
745
  /* targetParameters (DomainParameters) */
746
0
  if (!mcs_write_domain_parameters(mcs->log, tmps, &mcs->targetParameters))
747
0
    goto out;
748
749
  /* minimumParameters (DomainParameters) */
750
0
  if (!mcs_write_domain_parameters(mcs->log, tmps, &mcs->minimumParameters))
751
0
    goto out;
752
753
  /* maximumParameters (DomainParameters) */
754
0
  if (!mcs_write_domain_parameters(mcs->log, tmps, &mcs->maximumParameters))
755
0
    goto out;
756
757
  /* userData (OCTET_STRING) */
758
0
  ber_write_octet_string(tmps, Stream_Buffer(userData), Stream_GetPosition(userData));
759
0
  length = Stream_GetPosition(tmps);
760
  /* Connect-Initial (APPLICATION 101, IMPLICIT SEQUENCE) */
761
0
  ber_write_application_tag(s, MCS_TYPE_CONNECT_INITIAL, length);
762
0
  Stream_Write(s, Stream_Buffer(tmps), length);
763
0
  ret = TRUE;
764
0
out:
765
0
  Stream_Free(tmps, TRUE);
766
0
  return ret;
767
0
}
768
769
/**
770
 * Write an MCS Connect Response PDU.
771
 * msdn{cc240508}
772
 * @param s stream
773
 * @param mcs MCS module
774
 * @param userData GCC Conference Create Response
775
 *
776
 * @return \b TRUE for success, \b FALSE otherwise
777
 */
778
779
BOOL mcs_write_connect_response(wStream* s, rdpMcs* mcs, wStream* userData)
780
0
{
781
0
  size_t length = 0;
782
0
  wStream* tmps = NULL;
783
0
  BOOL ret = FALSE;
784
785
0
  if (!s || !mcs || !userData)
786
0
    return FALSE;
787
788
0
  tmps = Stream_New(NULL, Stream_Capacity(s));
789
790
0
  if (!tmps)
791
0
  {
792
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
793
0
    return FALSE;
794
0
  }
795
796
0
  ber_write_enumerated(tmps, 0, MCS_Result_enum_length);
797
0
  ber_write_integer(tmps, 0); /* calledConnectId */
798
799
0
  if (!mcs_write_domain_parameters(mcs->log, tmps, &(mcs->domainParameters)))
800
0
    goto out;
801
802
  /* userData (OCTET_STRING) */
803
0
  ber_write_octet_string(tmps, Stream_Buffer(userData), Stream_GetPosition(userData));
804
0
  length = Stream_GetPosition(tmps);
805
0
  ber_write_application_tag(s, MCS_TYPE_CONNECT_RESPONSE, length);
806
0
  Stream_Write(s, Stream_Buffer(tmps), length);
807
0
  ret = TRUE;
808
0
out:
809
0
  Stream_Free(tmps, TRUE);
810
0
  return ret;
811
0
}
812
813
/**
814
 * Send MCS Connect Initial.
815
 * msdn{cc240508}
816
 * @param mcs mcs module
817
 */
818
819
static BOOL mcs_send_connect_initial(rdpMcs* mcs)
820
0
{
821
0
  int status = -1;
822
0
  size_t length = 0;
823
0
  wStream* s = NULL;
824
0
  size_t bm = 0;
825
0
  size_t em = 0;
826
0
  wStream* gcc_CCrq = NULL;
827
828
0
  if (!mcs || !mcs->context)
829
0
    return FALSE;
830
831
0
  mcs_initialize_client_channels(mcs, mcs->context->settings);
832
0
  wStream* client_data = Stream_New(NULL, 512);
833
834
0
  if (!client_data)
835
0
  {
836
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
837
0
    return FALSE;
838
0
  }
839
840
0
  if (!gcc_write_client_data_blocks(client_data, mcs))
841
0
    goto out;
842
0
  gcc_CCrq = Stream_New(NULL, 1024);
843
844
0
  if (!gcc_CCrq)
845
0
  {
846
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
847
0
    goto out;
848
0
  }
849
850
0
  if (!gcc_write_conference_create_request(gcc_CCrq, client_data))
851
0
    goto out;
852
0
  length = Stream_GetPosition(gcc_CCrq) + 7;
853
0
  s = Stream_New(NULL, 1024 + length);
854
855
0
  if (!s)
856
0
  {
857
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
858
0
    goto out;
859
0
  }
860
861
0
  bm = Stream_GetPosition(s);
862
0
  Stream_Seek(s, 7);
863
864
0
  if (!mcs_write_connect_initial(s, mcs, gcc_CCrq))
865
0
  {
866
0
    WLog_Print(mcs->log, WLOG_ERROR, "mcs_write_connect_initial failed!");
867
0
    goto out;
868
0
  }
869
870
0
  em = Stream_GetPosition(s);
871
0
  length = (em - bm);
872
0
  if (length > UINT16_MAX)
873
0
    goto out;
874
0
  Stream_SetPosition(s, bm);
875
0
  if (!tpkt_write_header(s, (UINT16)length))
876
0
    goto out;
877
0
  if (!tpdu_write_data(s))
878
0
    goto out;
879
0
  Stream_SetPosition(s, em);
880
0
  Stream_SealLength(s);
881
882
0
  {
883
0
    rdpTransport* transport = freerdp_get_transport(mcs->context);
884
0
    status = transport_write(transport, s);
885
0
  }
886
887
0
out:
888
0
  Stream_Free(s, TRUE);
889
0
  Stream_Free(gcc_CCrq, TRUE);
890
0
  Stream_Free(client_data, TRUE);
891
0
  return (status < 0 ? FALSE : TRUE);
892
0
}
893
894
/**
895
 * Read MCS Connect Response.
896
 * msdn{cc240501}
897
 * @param mcs mcs module
898
 */
899
900
BOOL mcs_recv_connect_response(rdpMcs* mcs, wStream* s)
901
17.2k
{
902
17.2k
  size_t length = 0;
903
17.2k
  UINT16 tlength = 0;
904
17.2k
  BYTE result = 0;
905
17.2k
  UINT16 li = 0;
906
17.2k
  UINT32 calledConnectId = 0;
907
908
17.2k
  if (!mcs || !s)
909
0
    return FALSE;
910
911
17.2k
  if (!tpkt_read_header(s, &tlength))
912
405
    return FALSE;
913
914
16.8k
  if (!tpdu_read_data(s, &li, tlength))
915
13.5k
    return FALSE;
916
917
3.29k
  if (!ber_read_application_tag(s, MCS_TYPE_CONNECT_RESPONSE, &length) ||
918
1.74k
      !ber_read_enumerated(s, &result, MCS_Result_enum_length) ||
919
1.69k
      !ber_read_integer(s, &calledConnectId) ||
920
1.68k
      !mcs_read_domain_parameters(s, &(mcs->domainParameters)) ||
921
1.53k
      !ber_read_octet_string_tag(s, &length))
922
1.75k
  {
923
1.75k
    return FALSE;
924
1.75k
  }
925
926
1.53k
  if (!gcc_read_conference_create_response(s, mcs))
927
1.39k
  {
928
1.39k
    WLog_Print(mcs->log, WLOG_ERROR, "gcc_read_conference_create_response failed");
929
1.39k
    return FALSE;
930
1.39k
  }
931
932
137
  return tpkt_ensure_stream_consumed(mcs->log, s, tlength);
933
1.53k
}
934
935
/**
936
 * Send MCS Connect Response.
937
 * msdn{cc240501}
938
 * @param mcs mcs module
939
 */
940
941
BOOL mcs_send_connect_response(rdpMcs* mcs)
942
0
{
943
0
  size_t length = 0;
944
0
  int status = -1;
945
0
  wStream* s = NULL;
946
0
  size_t bm = 0;
947
0
  size_t em = 0;
948
0
  wStream* gcc_CCrsp = NULL;
949
950
0
  if (!mcs)
951
0
    return FALSE;
952
953
0
  wStream* server_data = Stream_New(NULL, 512);
954
955
0
  if (!server_data)
956
0
  {
957
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
958
0
    return FALSE;
959
0
  }
960
961
0
  if (!gcc_write_server_data_blocks(server_data, mcs))
962
0
    goto out;
963
964
0
  gcc_CCrsp = Stream_New(NULL, 512 + Stream_Capacity(server_data));
965
966
0
  if (!gcc_CCrsp)
967
0
  {
968
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
969
0
    goto out;
970
0
  }
971
972
0
  if (!gcc_write_conference_create_response(gcc_CCrsp, server_data))
973
0
    goto out;
974
0
  length = Stream_GetPosition(gcc_CCrsp) + 7;
975
0
  s = Stream_New(NULL, length + 1024);
976
977
0
  if (!s)
978
0
  {
979
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
980
0
    goto out;
981
0
  }
982
983
0
  bm = Stream_GetPosition(s);
984
0
  Stream_Seek(s, 7);
985
986
0
  if (!mcs_write_connect_response(s, mcs, gcc_CCrsp))
987
0
    goto out;
988
989
0
  em = Stream_GetPosition(s);
990
0
  length = (em - bm);
991
0
  if (length > UINT16_MAX)
992
0
    goto out;
993
0
  Stream_SetPosition(s, bm);
994
0
  if (!tpkt_write_header(s, (UINT16)length))
995
0
    goto out;
996
0
  if (!tpdu_write_data(s))
997
0
    goto out;
998
0
  Stream_SetPosition(s, em);
999
0
  Stream_SealLength(s);
1000
1001
0
  {
1002
0
    rdpTransport* transport = freerdp_get_transport(mcs->context);
1003
0
    status = transport_write(transport, s);
1004
0
  }
1005
1006
0
out:
1007
0
  Stream_Free(s, TRUE);
1008
0
  Stream_Free(gcc_CCrsp, TRUE);
1009
0
  Stream_Free(server_data, TRUE);
1010
0
  return (status < 0) ? FALSE : TRUE;
1011
0
}
1012
1013
/**
1014
 * Read MCS Erect Domain Request.
1015
 * msdn{cc240523}
1016
 * @param mcs MCS module to use
1017
 * @param s stream
1018
 */
1019
1020
BOOL mcs_recv_erect_domain_request(rdpMcs* mcs, wStream* s)
1021
0
{
1022
0
  UINT16 length = 0;
1023
0
  UINT32 subHeight = 0;
1024
0
  UINT32 subInterval = 0;
1025
1026
0
  WINPR_ASSERT(mcs);
1027
0
  WINPR_ASSERT(s);
1028
1029
0
  if (!mcs_read_domain_mcspdu_header(mcs->log, s, DomainMCSPDU_ErectDomainRequest, &length, NULL))
1030
0
    return FALSE;
1031
1032
0
  if (!per_read_integer(s, &subHeight)) /* subHeight (INTEGER) */
1033
0
    return FALSE;
1034
1035
0
  if (!per_read_integer(s, &subInterval)) /* subInterval (INTEGER) */
1036
0
    return FALSE;
1037
1038
0
  return tpkt_ensure_stream_consumed(mcs->log, s, length);
1039
0
}
1040
1041
/**
1042
 * Send MCS Erect Domain Request.
1043
 * msdn{cc240523}
1044
 * @param mcs MCS module to use
1045
 */
1046
1047
BOOL mcs_send_erect_domain_request(rdpMcs* mcs)
1048
0
{
1049
0
  UINT16 length = 12;
1050
1051
0
  if (!mcs)
1052
0
    return FALSE;
1053
1054
0
  wStream* s = Stream_New(NULL, length);
1055
1056
0
  if (!s)
1057
0
  {
1058
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
1059
0
    return FALSE;
1060
0
  }
1061
1062
0
  mcs_write_domain_mcspdu_header(s, DomainMCSPDU_ErectDomainRequest, length, 0);
1063
0
  per_write_integer(s, 0); /* subHeight (INTEGER) */
1064
0
  per_write_integer(s, 0); /* subInterval (INTEGER) */
1065
0
  Stream_SealLength(s);
1066
1067
0
  rdpTransport* transport = freerdp_get_transport(mcs->context);
1068
0
  const int status = transport_write(transport, s);
1069
0
  Stream_Free(s, TRUE);
1070
0
  return (status < 0) ? FALSE : TRUE;
1071
0
}
1072
1073
/**
1074
 * Read MCS Attach User Request.
1075
 * msdn{cc240524}
1076
 * @param mcs mcs module
1077
 * @param s stream
1078
 */
1079
1080
BOOL mcs_recv_attach_user_request(rdpMcs* mcs, wStream* s)
1081
0
{
1082
0
  UINT16 length = 0;
1083
1084
0
  if (!mcs || !s)
1085
0
    return FALSE;
1086
1087
0
  if (!mcs_read_domain_mcspdu_header(mcs->log, s, DomainMCSPDU_AttachUserRequest, &length, NULL))
1088
0
    return FALSE;
1089
0
  return tpkt_ensure_stream_consumed(mcs->log, s, length);
1090
0
}
1091
1092
/**
1093
 * Send MCS Attach User Request.
1094
 * msdn{cc240524}
1095
 * @param mcs mcs module
1096
 */
1097
1098
BOOL mcs_send_attach_user_request(rdpMcs* mcs)
1099
0
{
1100
0
  UINT16 length = 8;
1101
1102
0
  if (!mcs)
1103
0
    return FALSE;
1104
1105
0
  wStream* s = Stream_New(NULL, length);
1106
1107
0
  if (!s)
1108
0
  {
1109
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
1110
0
    return FALSE;
1111
0
  }
1112
1113
0
  mcs_write_domain_mcspdu_header(s, DomainMCSPDU_AttachUserRequest, length, 0);
1114
0
  Stream_SealLength(s);
1115
1116
0
  rdpTransport* transport = freerdp_get_transport(mcs->context);
1117
0
  const int status = transport_write(transport, s);
1118
0
  Stream_Free(s, TRUE);
1119
0
  return (status < 0) ? FALSE : TRUE;
1120
0
}
1121
1122
/**
1123
 * Read MCS Attach User Confirm.
1124
 * msdn{cc240525}
1125
 * @param mcs mcs module
1126
 */
1127
1128
BOOL mcs_recv_attach_user_confirm(rdpMcs* mcs, wStream* s)
1129
0
{
1130
0
  BYTE result = 0;
1131
0
  UINT16 length = 0;
1132
1133
0
  if (!mcs || !s)
1134
0
    return FALSE;
1135
1136
0
  if (!mcs_read_domain_mcspdu_header(mcs->log, s, DomainMCSPDU_AttachUserConfirm, &length, NULL))
1137
0
    return FALSE;
1138
0
  if (!per_read_enumerated(s, &result, MCS_Result_enum_length)) /* result */
1139
0
    return FALSE;
1140
0
  if (!per_read_integer16(s, &(mcs->userId), MCS_BASE_CHANNEL_ID)) /* initiator (UserId) */
1141
0
    return FALSE;
1142
0
  return tpkt_ensure_stream_consumed(mcs->log, s, length);
1143
0
}
1144
1145
/**
1146
 * Send MCS Attach User Confirm.
1147
 * msdn{cc240525}
1148
 * @param mcs mcs module
1149
 */
1150
1151
BOOL mcs_send_attach_user_confirm(rdpMcs* mcs)
1152
0
{
1153
0
  UINT16 length = 11;
1154
1155
0
  if (!mcs)
1156
0
    return FALSE;
1157
1158
0
  wStream* s = Stream_New(NULL, length);
1159
1160
0
  if (!s)
1161
0
  {
1162
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
1163
0
    return FALSE;
1164
0
  }
1165
1166
0
  mcs->userId = mcs->baseChannelId++;
1167
0
  mcs_write_domain_mcspdu_header(s, DomainMCSPDU_AttachUserConfirm, length, 2);
1168
0
  per_write_enumerated(s, 0, MCS_Result_enum_length);       /* result */
1169
0
  per_write_integer16(s, mcs->userId, MCS_BASE_CHANNEL_ID); /* initiator (UserId) */
1170
0
  Stream_SealLength(s);
1171
1172
0
  rdpTransport* transport = freerdp_get_transport(mcs->context);
1173
0
  const int status = transport_write(transport, s);
1174
0
  Stream_Free(s, TRUE);
1175
0
  return (status < 0) ? FALSE : TRUE;
1176
0
}
1177
1178
/**
1179
 * Read MCS Channel Join Request.
1180
 * msdn{cc240526}
1181
 * @param mcs mcs module
1182
 * @param s stream
1183
 */
1184
1185
BOOL mcs_recv_channel_join_request(rdpMcs* mcs, const rdpSettings* settings, wStream* s,
1186
                                   UINT16* channelId)
1187
0
{
1188
0
  UINT16 length = 0;
1189
0
  UINT16 userId = 0;
1190
1191
0
  if (!mcs || !s || !channelId)
1192
0
    return FALSE;
1193
1194
0
  if (!mcs_read_domain_mcspdu_header(mcs->log, s, DomainMCSPDU_ChannelJoinRequest, &length, NULL))
1195
0
    return FALSE;
1196
1197
0
  if (!per_read_integer16(s, &userId, MCS_BASE_CHANNEL_ID))
1198
0
    return FALSE;
1199
0
  if (userId != mcs->userId)
1200
0
  {
1201
0
    if (freerdp_settings_get_bool(settings, FreeRDP_TransportDumpReplay))
1202
0
      mcs->userId = userId;
1203
0
    else
1204
0
      return FALSE;
1205
0
  }
1206
0
  if (!per_read_integer16(s, channelId, 0))
1207
0
    return FALSE;
1208
1209
0
  return tpkt_ensure_stream_consumed(mcs->log, s, length);
1210
0
}
1211
1212
/**
1213
 * Send MCS Channel Join Request.
1214
 * msdn{cc240526}
1215
 *
1216
 * @param mcs mcs module
1217
 * @param channelId channel id
1218
 *
1219
 * @return \b TRUE for success, \b FALSE otherwise
1220
 */
1221
1222
BOOL mcs_send_channel_join_request(rdpMcs* mcs, UINT16 channelId)
1223
0
{
1224
0
  UINT16 length = 12;
1225
1226
0
  WINPR_ASSERT(mcs);
1227
1228
0
  wStream* s = Stream_New(NULL, length);
1229
1230
0
  if (!s)
1231
0
  {
1232
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
1233
0
    return FALSE;
1234
0
  }
1235
1236
0
  mcs_write_domain_mcspdu_header(s, DomainMCSPDU_ChannelJoinRequest, length, 0);
1237
0
  per_write_integer16(s, mcs->userId, MCS_BASE_CHANNEL_ID);
1238
0
  per_write_integer16(s, channelId, 0);
1239
0
  Stream_SealLength(s);
1240
1241
0
  rdpTransport* transport = freerdp_get_transport(mcs->context);
1242
0
  const int status = transport_write(transport, s);
1243
0
  Stream_Free(s, TRUE);
1244
0
  return (status < 0) ? FALSE : TRUE;
1245
0
}
1246
1247
/**
1248
 * Read MCS Channel Join Confirm.
1249
 * msdn{cc240527}
1250
 * @param mcs mcs module
1251
 */
1252
1253
BOOL mcs_recv_channel_join_confirm(rdpMcs* mcs, wStream* s, UINT16* channelId)
1254
0
{
1255
0
  UINT16 length = 0;
1256
0
  BYTE result = 0;
1257
0
  UINT16 initiator = 0;
1258
0
  UINT16 requested = 0;
1259
1260
0
  WINPR_ASSERT(mcs);
1261
0
  WINPR_ASSERT(channelId);
1262
1263
0
  if (!mcs_read_domain_mcspdu_header(mcs->log, s, DomainMCSPDU_ChannelJoinConfirm, &length, NULL))
1264
0
    return FALSE;
1265
1266
0
  if (!per_read_enumerated(s, &result, MCS_Result_enum_length)) /* result */
1267
0
    return FALSE;
1268
0
  if (!per_read_integer16(s, &initiator, MCS_BASE_CHANNEL_ID)) /* initiator (UserId) */
1269
0
    return FALSE;
1270
0
  if (!per_read_integer16(s, &requested, 0)) /* requested (ChannelId) */
1271
0
    return FALSE;
1272
0
  if (!per_read_integer16(s, channelId, 0)) /* channelId */
1273
0
    return FALSE;
1274
0
  return tpkt_ensure_stream_consumed(mcs->log, s, length);
1275
0
}
1276
1277
/**
1278
 * Send MCS Channel Join Confirm.
1279
 * msdn{cc240527}
1280
 * @param mcs mcs module
1281
 */
1282
1283
BOOL mcs_send_channel_join_confirm(rdpMcs* mcs, UINT16 channelId)
1284
0
{
1285
0
  int status = -1;
1286
0
  UINT16 length = 15;
1287
1288
0
  if (!mcs)
1289
0
    return FALSE;
1290
1291
0
  wStream* s = Stream_New(NULL, length);
1292
1293
0
  if (!s)
1294
0
  {
1295
0
    WLog_Print(mcs->log, WLOG_ERROR, "Stream_New failed!");
1296
0
    return FALSE;
1297
0
  }
1298
1299
0
  if (!mcs_write_domain_mcspdu_header(s, DomainMCSPDU_ChannelJoinConfirm, length, 2))
1300
0
    goto fail;
1301
0
  if (!per_write_enumerated(s, 0, MCS_Result_enum_length)) /* result */
1302
0
    goto fail;
1303
0
  if (!per_write_integer16(s, mcs->userId, MCS_BASE_CHANNEL_ID)) /* initiator (UserId) */
1304
0
    goto fail;
1305
0
  if (!per_write_integer16(s, channelId, 0)) /* requested (ChannelId) */
1306
0
    goto fail;
1307
0
  if (!per_write_integer16(s, channelId, 0)) /* channelId */
1308
0
    goto fail;
1309
0
  Stream_SealLength(s);
1310
1311
0
  {
1312
0
    rdpTransport* transport = freerdp_get_transport(mcs->context);
1313
0
    status = transport_write(transport, s);
1314
0
  }
1315
1316
0
fail:
1317
0
  Stream_Free(s, TRUE);
1318
0
  return (status < 0) ? FALSE : TRUE;
1319
0
}
1320
1321
/**
1322
 * Receive MCS Disconnect Provider Ultimatum PDU.
1323
 * @param mcs mcs module
1324
 */
1325
1326
BOOL mcs_recv_disconnect_provider_ultimatum(WINPR_ATTR_UNUSED rdpMcs* mcs, wStream* s, int* reason)
1327
798
{
1328
798
  BYTE b1 = 0;
1329
798
  BYTE b2 = 0;
1330
1331
798
  WINPR_ASSERT(mcs);
1332
798
  WINPR_ASSERT(s);
1333
798
  WINPR_ASSERT(reason);
1334
1335
  /*
1336
   * http://msdn.microsoft.com/en-us/library/cc240872.aspx:
1337
   *
1338
   * PER encoded (ALIGNED variant of BASIC-PER) PDU contents:
1339
   * 21 80
1340
   *
1341
   * 0x21:
1342
   * 0 - --\
1343
   * 0 -   |
1344
   * 1 -   | CHOICE: From DomainMCSPDU select disconnectProviderUltimatum (8)
1345
   * 0 -   | of type DisconnectProviderUltimatum
1346
   * 0 -   |
1347
   * 0 - --/
1348
   * 0 - --\
1349
   * 1 -   |
1350
   *       | DisconnectProviderUltimatum::reason = rn-user-requested (3)
1351
   * 0x80: |
1352
   * 1 - --/
1353
   * 0 - padding
1354
   * 0 - padding
1355
   * 0 - padding
1356
   * 0 - padding
1357
   * 0 - padding
1358
   * 0 - padding
1359
   * 0 - padding
1360
   */
1361
1362
798
  if (!Stream_CheckAndLogRequiredLengthWLog(mcs->log, s, 1))
1363
2
    return FALSE;
1364
1365
796
  Stream_Rewind_UINT8(s);
1366
796
  Stream_Read_UINT8(s, b1);
1367
796
  Stream_Read_UINT8(s, b2);
1368
796
  *reason = ((b1 & 0x01) << 1) | (b2 >> 7);
1369
796
  return TRUE;
1370
798
}
1371
1372
/**
1373
 * Send MCS Disconnect Provider Ultimatum PDU.
1374
 * @param mcs mcs module
1375
 */
1376
1377
BOOL mcs_send_disconnect_provider_ultimatum(rdpMcs* mcs, enum Disconnect_Ultimatum reason)
1378
0
{
1379
0
  int status = -1;
1380
0
  UINT16 length = 9;
1381
1382
0
  WINPR_ASSERT(mcs);
1383
1384
0
  wStream* s = Stream_New(NULL, length);
1385
1386
0
  if (!s)
1387
0
    goto fail;
1388
1389
0
  if (!mcs_write_domain_mcspdu_header(s, DomainMCSPDU_DisconnectProviderUltimatum, length, 1))
1390
0
    goto fail;
1391
1392
0
  if (!per_write_enumerated(s, 0x80, WINPR_ASSERTING_INT_CAST(BYTE, reason)))
1393
0
    goto fail;
1394
1395
0
  {
1396
0
    rdpTransport* transport = freerdp_get_transport(mcs->context);
1397
0
    status = transport_write(transport, s);
1398
0
  }
1399
1400
0
fail:
1401
0
  WLog_Print(mcs->log, WLOG_DEBUG, "sending DisconnectProviderUltimatum(%s)",
1402
0
             freerdp_disconnect_reason_string((int)reason));
1403
0
  Stream_Free(s, TRUE);
1404
0
  return (status < 0) ? FALSE : TRUE;
1405
0
}
1406
1407
BOOL mcs_client_begin(rdpMcs* mcs)
1408
0
{
1409
0
  if (!mcs || !mcs->context)
1410
0
    return FALSE;
1411
1412
  /* First transition state, we need this to trigger session recording */
1413
0
  if (!mcs_send_connect_initial(mcs))
1414
0
  {
1415
0
    freerdp_set_last_error_if_not(mcs->context, FREERDP_ERROR_MCS_CONNECT_INITIAL_ERROR);
1416
1417
0
    WLog_Print(mcs->log, WLOG_ERROR, "Error: unable to send MCS Connect Initial");
1418
0
    return FALSE;
1419
0
  }
1420
1421
0
  return TRUE;
1422
0
}
1423
1424
/**
1425
 * Instantiate new MCS module.
1426
 * @param context rdpContext to use
1427
 * @return new MCS module
1428
 */
1429
1430
rdpMcs* mcs_new(rdpContext* context)
1431
51.8k
{
1432
51.8k
  rdpMcs* mcs = (rdpMcs*)calloc(1, sizeof(rdpMcs));
1433
1434
51.8k
  if (!mcs)
1435
0
    return NULL;
1436
51.8k
  mcs->log = WLog_Get(MCS_TAG);
1437
51.8k
  WINPR_ASSERT(mcs->log);
1438
1439
51.8k
  mcs->context = context;
1440
51.8k
  mcs_init_domain_parameters(&mcs->targetParameters, 34, 2, 0, 0xFFFF);
1441
51.8k
  mcs_init_domain_parameters(&mcs->minimumParameters, 1, 1, 1, 0x420);
1442
51.8k
  mcs_init_domain_parameters(&mcs->maximumParameters, 0xFFFF, 0xFC17, 0xFFFF, 0xFFFF);
1443
51.8k
  mcs_init_domain_parameters(&mcs->domainParameters, 0, 0, 0, 0xFFFF);
1444
51.8k
  mcs->channelCount = 0;
1445
51.8k
  mcs->channelMaxCount = CHANNEL_MAX_COUNT;
1446
51.8k
  mcs->baseChannelId = MCS_GLOBAL_CHANNEL_ID + 1;
1447
51.8k
  mcs->channels = (rdpMcsChannel*)calloc(mcs->channelMaxCount, sizeof(rdpMcsChannel));
1448
1449
51.8k
  if (!mcs->channels)
1450
0
    goto out_free;
1451
1452
51.8k
  return mcs;
1453
0
out_free:
1454
0
  free(mcs);
1455
0
  return NULL;
1456
51.8k
}
1457
1458
/**
1459
 * Free MCS module.
1460
 * @param mcs MCS module to be freed
1461
 */
1462
1463
void mcs_free(rdpMcs* mcs)
1464
51.8k
{
1465
51.8k
  if (mcs)
1466
51.8k
  {
1467
51.8k
    free(mcs->channels);
1468
51.8k
    free(mcs);
1469
51.8k
  }
1470
51.8k
}
1471
1472
BOOL mcs_server_apply_to_settings(const rdpMcs* mcs, rdpSettings* settings)
1473
0
{
1474
0
  BOOL rc = FALSE;
1475
1476
0
  WINPR_ASSERT(mcs);
1477
0
  WINPR_ASSERT(settings);
1478
1479
0
  if (!freerdp_settings_set_uint32(settings, FreeRDP_ChannelCount, mcs->channelCount))
1480
0
    goto fail;
1481
1482
0
  for (UINT32 x = 0; x < mcs->channelCount; x++)
1483
0
  {
1484
0
    const rdpMcsChannel* current = &mcs->channels[x];
1485
0
    CHANNEL_DEF def = { 0 };
1486
0
    def.options = current->options;
1487
0
    memcpy(def.name, current->Name, sizeof(def.name));
1488
0
    if (!freerdp_settings_set_pointer_array(settings, FreeRDP_ChannelDefArray, x, &def))
1489
0
      goto fail;
1490
0
  }
1491
1492
0
  rc = TRUE;
1493
0
fail:
1494
0
  if (!rc)
1495
0
    WLog_Print(mcs->log, WLOG_WARN, "failed to apply settings");
1496
1497
0
  return rc;
1498
0
}