20#include <freerdp/config.h>
22#include <freerdp/freerdp.h>
23#include <freerdp/channels/log.h>
24#include <freerdp/server/telemetry.h>
26#define TAG CHANNELS_TAG("telemetry.server")
32} eTelemetryChannelState;
36 TelemetryServerContext context;
41 void* telemetry_channel;
49 eTelemetryChannelState state;
55static UINT telemetry_server_initialize(TelemetryServerContext* context, BOOL externalThread)
57 UINT error = CHANNEL_RC_OK;
58 telemetry_server* telemetry = (telemetry_server*)context;
60 WINPR_ASSERT(telemetry);
62 if (telemetry->isOpened)
64 WLog_Print(telemetry->log, WLOG_WARN,
65 "Application error: TELEMETRY channel already initialized, "
66 "calling in this state is not possible!");
67 return ERROR_INVALID_STATE;
70 telemetry->externalThread = externalThread;
75static UINT telemetry_server_open_channel(telemetry_server* telemetry)
77 WINPR_ASSERT(telemetry);
79 TelemetryServerContext* context = &telemetry->context;
80 DWORD Error = ERROR_SUCCESS;
81 DWORD BytesReturned = 0;
82 PULONG pSessionId =
nullptr;
85 WINPR_ASSERT(telemetry);
87 if (WTSQuerySessionInformationA(telemetry->context.vcm, WTS_CURRENT_SESSION, WTSSessionId,
88 (LPSTR*)&pSessionId, &BytesReturned) == FALSE)
90 WLog_Print(telemetry->log, WLOG_ERROR,
"WTSQuerySessionInformationA failed!");
91 return ERROR_INTERNAL_ERROR;
94 telemetry->SessionId = (DWORD)*pSessionId;
95 WTSFreeMemory(pSessionId);
97 HANDLE hEvent = WTSVirtualChannelManagerGetEventHandle(telemetry->context.vcm);
99 if (WaitForSingleObject(hEvent, 1000) == WAIT_FAILED)
101 Error = GetLastError();
102 WLog_Print(telemetry->log, WLOG_ERROR,
"WaitForSingleObject failed with error %" PRIu32
"!",
107 telemetry->telemetry_channel = WTSVirtualChannelOpenEx(
108 telemetry->SessionId, TELEMETRY_DVC_CHANNEL_NAME, WTS_CHANNEL_OPTION_DYNAMIC);
109 if (!telemetry->telemetry_channel)
111 Error = GetLastError();
112 WLog_Print(telemetry->log, WLOG_ERROR,
113 "WTSVirtualChannelOpenEx failed with error %" PRIu32
"!", Error);
117 const UINT32 channelId = WTSChannelGetIdByHandle(telemetry->telemetry_channel);
119 IFCALLRET(context->ChannelIdAssigned, status, context, channelId);
122 WLog_Print(telemetry->log, WLOG_ERROR,
"context->ChannelIdAssigned failed!");
123 return ERROR_INTERNAL_ERROR;
129static UINT telemetry_server_recv_rdp_telemetry_pdu(TelemetryServerContext* context,
wStream* s)
132 UINT error = CHANNEL_RC_OK;
133 telemetry_server* telemetry = (telemetry_server*)context;
135 WINPR_ASSERT(telemetry);
137 if (!Stream_CheckAndLogRequiredLengthWLog(telemetry->log, s, 16))
138 return ERROR_NO_DATA;
140 Stream_Read_UINT32(s, pdu.PromptForCredentialsMillis);
141 Stream_Read_UINT32(s, pdu.PromptForCredentialsDoneMillis);
142 Stream_Read_UINT32(s, pdu.GraphicsChannelOpenedMillis);
143 Stream_Read_UINT32(s, pdu.FirstGraphicsReceivedMillis);
145 IFCALLRET(context->RdpTelemetry, error, context, &pdu);
147 WLog_Print(telemetry->log, WLOG_ERROR,
148 "context->RdpTelemetry failed with error %" PRIu32
"", error);
153static UINT telemetry_process_message(telemetry_server* telemetry)
155 UINT error = ERROR_INTERNAL_ERROR;
156 ULONG BytesReturned = 0;
160 WINPR_ASSERT(telemetry);
161 WINPR_ASSERT(telemetry->telemetry_channel);
163 wStream* s = telemetry->buffer;
166 Stream_ResetPosition(s);
168 WTSVirtualChannelRead(telemetry->telemetry_channel, 0,
nullptr, 0, &BytesReturned);
172 if (BytesReturned < 1)
174 error = CHANNEL_RC_OK;
178 if (!Stream_EnsureRemainingCapacity(s, BytesReturned))
180 WLog_Print(telemetry->log, WLOG_ERROR,
"Stream_EnsureRemainingCapacity failed!");
181 error = CHANNEL_RC_NO_MEMORY;
185 if (WTSVirtualChannelRead(telemetry->telemetry_channel, 0, Stream_BufferAs(s,
char),
186 (ULONG)Stream_Capacity(s), &BytesReturned) == FALSE)
188 WLog_Print(telemetry->log, WLOG_ERROR,
"WTSVirtualChannelRead failed!");
192 if (!Stream_SetLength(s, BytesReturned))
195 if (!Stream_CheckAndLogRequiredLengthWLog(telemetry->log, s, 2))
196 return ERROR_NO_DATA;
198 Stream_Read_UINT8(s, MessageId);
199 Stream_Read_UINT8(s, Length);
200 if (!Stream_CheckAndLogRequiredLengthWLog(telemetry->log, s, Length))
201 return ERROR_NO_DATA;
206 error = telemetry_server_recv_rdp_telemetry_pdu(&telemetry->context, s);
209 WLog_Print(telemetry->log, WLOG_ERROR,
210 "telemetry_process_message: unknown MessageId %" PRIu8
"", MessageId);
216 WLog_Print(telemetry->log, WLOG_ERROR,
"Response failed with error %" PRIu32
"!", error);
221static UINT telemetry_server_context_poll_int(TelemetryServerContext* context)
223 telemetry_server* telemetry = (telemetry_server*)context;
224 UINT error = ERROR_INTERNAL_ERROR;
226 WINPR_ASSERT(telemetry);
228 switch (telemetry->state)
230 case TELEMETRY_INITIAL:
231 error = telemetry_server_open_channel(telemetry);
233 WLog_Print(telemetry->log, WLOG_ERROR,
234 "telemetry_server_open_channel failed with error %" PRIu32
"!", error);
236 telemetry->state = TELEMETRY_OPENED;
238 case TELEMETRY_OPENED:
239 error = telemetry_process_message(telemetry);
248static HANDLE telemetry_server_get_channel_handle(telemetry_server* telemetry)
250 void* buffer =
nullptr;
251 DWORD BytesReturned = 0;
252 HANDLE ChannelEvent =
nullptr;
254 WINPR_ASSERT(telemetry);
256 if (WTSVirtualChannelQuery(telemetry->telemetry_channel, WTSVirtualEventHandle, &buffer,
257 &BytesReturned) == TRUE)
259 if (BytesReturned ==
sizeof(HANDLE))
260 ChannelEvent = *(HANDLE*)buffer;
262 WTSFreeMemory(buffer);
268static DWORD WINAPI telemetry_server_thread_func(LPVOID arg)
271 HANDLE events[2] = WINPR_C_ARRAY_INIT;
272 telemetry_server* telemetry = (telemetry_server*)arg;
273 UINT error = CHANNEL_RC_OK;
276 WINPR_ASSERT(telemetry);
279 events[nCount++] = telemetry->stopEvent;
281 while ((error == CHANNEL_RC_OK) && (WaitForSingleObject(events[0], 0) != WAIT_OBJECT_0))
283 switch (telemetry->state)
285 case TELEMETRY_INITIAL:
286 error = telemetry_server_context_poll_int(&telemetry->context);
287 if (error == CHANNEL_RC_OK)
289 events[1] = telemetry_server_get_channel_handle(telemetry);
293 case TELEMETRY_OPENED:
294 status = WaitForMultipleObjects(nCount, events, FALSE, INFINITE);
299 case WAIT_OBJECT_0 + 1:
301 error = telemetry_server_context_poll_int(&telemetry->context);
306 error = ERROR_INTERNAL_ERROR;
315 (void)WTSVirtualChannelClose(telemetry->telemetry_channel);
316 telemetry->telemetry_channel =
nullptr;
318 if (error && telemetry->context.rdpcontext)
319 setChannelError(telemetry->context.rdpcontext, error,
320 "telemetry_server_thread_func reported an error");
326static UINT telemetry_server_open(TelemetryServerContext* context)
328 telemetry_server* telemetry = (telemetry_server*)context;
330 WINPR_ASSERT(telemetry);
332 if (!telemetry->externalThread && (telemetry->thread ==
nullptr))
334 telemetry->stopEvent = CreateEvent(
nullptr, TRUE, FALSE,
nullptr);
335 if (!telemetry->stopEvent)
337 WLog_Print(telemetry->log, WLOG_ERROR,
"CreateEvent failed!");
338 return ERROR_INTERNAL_ERROR;
342 CreateThread(
nullptr, 0, telemetry_server_thread_func, telemetry, 0,
nullptr);
343 if (!telemetry->thread)
345 WLog_Print(telemetry->log, WLOG_ERROR,
"CreateThread failed!");
346 (void)CloseHandle(telemetry->stopEvent);
347 telemetry->stopEvent =
nullptr;
348 return ERROR_INTERNAL_ERROR;
351 telemetry->isOpened = TRUE;
353 return CHANNEL_RC_OK;
356static UINT telemetry_server_close(TelemetryServerContext* context)
358 telemetry_server* telemetry = (telemetry_server*)context;
360 WINPR_ASSERT(telemetry);
362 if (!telemetry->externalThread && telemetry->thread)
364 (void)SetEvent(telemetry->stopEvent);
366 if (WaitForSingleObject(telemetry->thread, INFINITE) == WAIT_FAILED)
368 const UINT error = GetLastError();
370 WLog_Print(telemetry->log, WLOG_ERROR,
371 "WaitForSingleObject failed with error %" PRIu32
"", error);
375 (void)CloseHandle(telemetry->thread);
376 (void)CloseHandle(telemetry->stopEvent);
377 telemetry->thread =
nullptr;
378 telemetry->stopEvent =
nullptr;
380 if (telemetry->externalThread)
382 if (telemetry->state != TELEMETRY_INITIAL)
384 (void)WTSVirtualChannelClose(telemetry->telemetry_channel);
385 telemetry->telemetry_channel =
nullptr;
386 telemetry->state = TELEMETRY_INITIAL;
389 telemetry->isOpened = FALSE;
391 return CHANNEL_RC_OK;
394static UINT telemetry_server_context_poll(TelemetryServerContext* context)
396 telemetry_server* telemetry = (telemetry_server*)context;
398 WINPR_ASSERT(telemetry);
400 if (!telemetry->externalThread)
401 return ERROR_INTERNAL_ERROR;
403 return telemetry_server_context_poll_int(context);
406static BOOL telemetry_server_context_handle(TelemetryServerContext* context, HANDLE* handle)
408 telemetry_server* telemetry = (telemetry_server*)context;
410 WINPR_ASSERT(telemetry);
411 WINPR_ASSERT(handle);
413 if (!telemetry->externalThread)
415 if (telemetry->state == TELEMETRY_INITIAL)
418 *handle = telemetry_server_get_channel_handle(telemetry);
423TelemetryServerContext* telemetry_server_context_new(HANDLE vcm)
425 telemetry_server* telemetry = (telemetry_server*)calloc(1,
sizeof(telemetry_server));
429 telemetry->log = WLog_Get(TAG);
432 telemetry->context.vcm = vcm;
433 telemetry->context.Initialize = telemetry_server_initialize;
434 telemetry->context.Open = telemetry_server_open;
435 telemetry->context.Close = telemetry_server_close;
436 telemetry->context.Poll = telemetry_server_context_poll;
437 telemetry->context.ChannelHandle = telemetry_server_context_handle;
439 telemetry->buffer = Stream_New(
nullptr, 4096);
440 if (!telemetry->buffer)
443 return &telemetry->context;
445 WINPR_PRAGMA_DIAG_PUSH
446 WINPR_PRAGMA_DIAG_IGNORED_MISMATCHED_DEALLOC
447 telemetry_server_context_free(&telemetry->context);
448 WINPR_PRAGMA_DIAG_POP
452void telemetry_server_context_free(TelemetryServerContext* context)
454 telemetry_server* telemetry = (telemetry_server*)context;
458 telemetry_server_close(context);
459 Stream_Free(telemetry->buffer, TRUE);