/**

 * FreeRDP: A Remote Desktop Protocol Implementation

 * Clipboard Virtual Channel

 *

 * Copyright 2009-2011 Jay Sorg

 * Copyright 2010-2011 Vic Lee

 * Copyright 2015 Thincast Technologies GmbH

 * Copyright 2015 DI (FH) Martin Haimberger <martin.haimberger@thincast.com>

 *

 * Licensed under the Apache License, Version 2.0 (the "License");

 * you may not use this file except in compliance with the License.

 * You may obtain a copy of the License at

 *

 *     http://www.apache.org/licenses/LICENSE-2.0

 *

 * Unless required by applicable law or agreed to in writing, software

 * distributed under the License is distributed on an "AS IS" BASIS,

 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

 * See the License for the specific language governing permissions and

 * limitations under the License.

 */

#ifdef HAVE_CONFIG_H

#include "config.h"

#endif

#include <winpr/crt.h>

#include <winpr/print.h>

#include <freerdp/types.h>

#include <freerdp/constants.h>

#include <freerdp/client/cliprdr.h>

#include "cliprdr_main.h"

#include "cliprdr_format.h"

#include "../cliprdr_common.h"

#ifdef WITH_DEBUG_CLIPRDR

static const char* const CB_MSG_TYPE_STRINGS[] = { "",

	                                               "CB_MONITOR_READY",

	                                               "CB_FORMAT_LIST",

	                                               "CB_FORMAT_LIST_RESPONSE",

	                                               "CB_FORMAT_DATA_REQUEST",

	                                               "CB_FORMAT_DATA_RESPONSE",

	                                               "CB_TEMP_DIRECTORY",

	                                               "CB_CLIP_CAPS",

	                                               "CB_FILECONTENTS_REQUEST",

	                                               "CB_FILECONTENTS_RESPONSE",

	                                               "CB_LOCK_CLIPDATA",

	                                               "CB_UNLOCK_CLIPDATA" };

#endif

CliprdrClientContext* cliprdr_get_client_interface(cliprdrPlugin* cliprdr)

{

	CliprdrClientContext* pInterface;

	if (!cliprdr)

		return NULL;

	pInterface = (CliprdrClientContext*)cliprdr->channelEntryPoints.pInterface;

	return pInterface;

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_packet_send(cliprdrPlugin* cliprdr, wStream* s)

{

	size_t pos;

	UINT32 dataLen;

	UINT status = CHANNEL_RC_OK;

	pos = Stream_GetPosition(s);

	dataLen = pos - 8;

	Stream_SetPosition(s, 4);

	Stream_Write_UINT32(s, dataLen);

	Stream_SetPosition(s, pos);

#ifdef WITH_DEBUG_CLIPRDR

	WLog_DBG(TAG, "Cliprdr Sending (%" PRIu32 " bytes)", dataLen + 8);

	winpr_HexDump(TAG, WLOG_DEBUG, Stream_Buffer(s), dataLen + 8);

#endif

	if (!cliprdr)

	{

		status = CHANNEL_RC_BAD_INIT_HANDLE;

	}

	else

	{

		status = cliprdr->channelEntryPoints.pVirtualChannelWriteEx(

		    cliprdr->InitHandle, cliprdr->OpenHandle, Stream_Buffer(s),

		    (UINT32)Stream_GetPosition(s), s);

	}

	if (status != CHANNEL_RC_OK)

	{

		Stream_Free(s, TRUE);

		WLog_ERR(TAG, "VirtualChannelWrite failed with %s [%08" PRIX32 "]",

		         WTSErrorToString(status), status);

	}

	return status;

}

#ifdef WITH_DEBUG_CLIPRDR

static void cliprdr_print_general_capability_flags(UINT32 flags)

{

	WLog_INFO(TAG, "generalFlags (0x%08" PRIX32 ") {", flags);

	if (flags & CB_USE_LONG_FORMAT_NAMES)

		WLog_INFO(TAG, "\tCB_USE_LONG_FORMAT_NAMES");

	if (flags & CB_STREAM_FILECLIP_ENABLED)

		WLog_INFO(TAG, "\tCB_STREAM_FILECLIP_ENABLED");

	if (flags & CB_FILECLIP_NO_FILE_PATHS)

		WLog_INFO(TAG, "\tCB_FILECLIP_NO_FILE_PATHS");

	if (flags & CB_CAN_LOCK_CLIPDATA)

		WLog_INFO(TAG, "\tCB_CAN_LOCK_CLIPDATA");

	WLog_INFO(TAG, "}");

}

#endif

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_process_general_capability(cliprdrPlugin* cliprdr, wStream* s)

{

	UINT32 version;

	UINT32 generalFlags;

	CLIPRDR_CAPABILITIES capabilities;

	CLIPRDR_GENERAL_CAPABILITY_SET generalCapabilitySet;

	CliprdrClientContext* context = cliprdr_get_client_interface(cliprdr);

	UINT error = CHANNEL_RC_OK;

	if (!context)

	{

		WLog_ERR(TAG, "cliprdr_get_client_interface failed!");

		return ERROR_INTERNAL_ERROR;

	}

	if (Stream_GetRemainingLength(s) < 8)

		return ERROR_INVALID_DATA;

	Stream_Read_UINT32(s, version);      /* version (4 bytes) */

	Stream_Read_UINT32(s, generalFlags); /* generalFlags (4 bytes) */

	DEBUG_CLIPRDR("Version: %" PRIu32 "", version);

#ifdef WITH_DEBUG_CLIPRDR

	cliprdr_print_general_capability_flags(generalFlags);

#endif

	cliprdr->useLongFormatNames = (generalFlags & CB_USE_LONG_FORMAT_NAMES);

	cliprdr->streamFileClipEnabled = (generalFlags & CB_STREAM_FILECLIP_ENABLED);

	cliprdr->fileClipNoFilePaths = (generalFlags & CB_FILECLIP_NO_FILE_PATHS);

	cliprdr->canLockClipData = (generalFlags & CB_CAN_LOCK_CLIPDATA);

	cliprdr->capabilitiesReceived = TRUE;

	if (!context->custom)

	{

		WLog_ERR(TAG, "context->custom not set!");

		return ERROR_INTERNAL_ERROR;

	}

	capabilities.msgType = CB_CLIP_CAPS;

	capabilities.cCapabilitiesSets = 1;

	capabilities.capabilitySets = (CLIPRDR_CAPABILITY_SET*)&(generalCapabilitySet);

	generalCapabilitySet.capabilitySetType = CB_CAPSTYPE_GENERAL;

	generalCapabilitySet.capabilitySetLength = 12;

	generalCapabilitySet.version = version;

	generalCapabilitySet.generalFlags = generalFlags;

	IFCALLRET(context->ServerCapabilities, error, context, &capabilities);

	if (error)

		WLog_ERR(TAG, "ServerCapabilities failed with error %" PRIu32 "!", error);

	return error;

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_process_clip_caps(cliprdrPlugin* cliprdr, wStream* s, UINT32 length,

                                      UINT16 flags)

{

	UINT16 index;

	UINT16 lengthCapability;

	UINT16 cCapabilitiesSets;

	UINT16 capabilitySetType;

	UINT error = CHANNEL_RC_OK;

	if (Stream_GetRemainingLength(s) < 4)

		return ERROR_INVALID_DATA;

	Stream_Read_UINT16(s, cCapabilitiesSets); /* cCapabilitiesSets (2 bytes) */

	Stream_Seek_UINT16(s);                    /* pad1 (2 bytes) */

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ServerCapabilities");

	for (index = 0; index < cCapabilitiesSets; index++)

	{

		if (Stream_GetRemainingLength(s) < 4)

			return ERROR_INVALID_DATA;

		Stream_Read_UINT16(s, capabilitySetType); /* capabilitySetType (2 bytes) */

		Stream_Read_UINT16(s, lengthCapability);  /* lengthCapability (2 bytes) */

		if ((lengthCapability < 4) || (Stream_GetRemainingLength(s) < (lengthCapability - 4U)))

			return ERROR_INVALID_DATA;

		switch (capabilitySetType)

		{

			case CB_CAPSTYPE_GENERAL:

				if ((error = cliprdr_process_general_capability(cliprdr, s)))

				{

					WLog_ERR(TAG,

					         "cliprdr_process_general_capability failed with error %" PRIu32 "!",

					         error);

					return error;

				}

				break;

			default:

				WLog_ERR(TAG, "unknown cliprdr capability set: %" PRIu16 "", capabilitySetType);

				return CHANNEL_RC_BAD_PROC;

		}

	}

	return error;

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_process_monitor_ready(cliprdrPlugin* cliprdr, wStream* s, UINT32 length,

                                          UINT16 flags)

{

	CLIPRDR_MONITOR_READY monitorReady;

	CliprdrClientContext* context = cliprdr_get_client_interface(cliprdr);

	UINT error = CHANNEL_RC_OK;

	WLog_Print(cliprdr->log, WLOG_DEBUG, "MonitorReady");

	if (!context->custom)

	{

		WLog_ERR(TAG, "context->custom not set!");

		return ERROR_INTERNAL_ERROR;

	}

	if (!cliprdr->capabilitiesReceived)

	{

		/**

		 * The clipboard capabilities pdu from server to client is optional,

		 * but a server using it must send it before sending the monitor ready pdu.

		 * When the server capabilities pdu is not used, default capabilities

		 * corresponding to a generalFlags field set to zero are assumed.

		 */

		cliprdr->useLongFormatNames = FALSE;

		cliprdr->streamFileClipEnabled = FALSE;

		cliprdr->fileClipNoFilePaths = TRUE;

		cliprdr->canLockClipData = FALSE;

	}

	monitorReady.msgType = CB_MONITOR_READY;

	monitorReady.msgFlags = flags;

	monitorReady.dataLen = length;

	IFCALLRET(context->MonitorReady, error, context, &monitorReady);

	if (error)

		WLog_ERR(TAG, "MonitorReady failed with error %" PRIu32 "!", error);

	return error;

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_process_filecontents_request(cliprdrPlugin* cliprdr, wStream* s, UINT32 length,

                                                 UINT16 flags)

{

	CLIPRDR_FILE_CONTENTS_REQUEST request;

	CliprdrClientContext* context = cliprdr_get_client_interface(cliprdr);

	UINT error = CHANNEL_RC_OK;

	WLog_Print(cliprdr->log, WLOG_DEBUG, "FileContentsRequest");

	if (!context->custom)

	{

		WLog_ERR(TAG, "context->custom not set!");

		return ERROR_INTERNAL_ERROR;

	}

	request.msgType = CB_FILECONTENTS_REQUEST;

	request.msgFlags = flags;

	request.dataLen = length;

	if ((error = cliprdr_read_file_contents_request(s, &request)))

		return error;

	IFCALLRET(context->ServerFileContentsRequest, error, context, &request);

	if (error)

		WLog_ERR(TAG, "ServerFileContentsRequest failed with error %" PRIu32 "!", error);

	return error;

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_process_filecontents_response(cliprdrPlugin* cliprdr, wStream* s, UINT32 length,

                                                  UINT16 flags)

{

	CLIPRDR_FILE_CONTENTS_RESPONSE response;

	CliprdrClientContext* context = cliprdr_get_client_interface(cliprdr);

	UINT error = CHANNEL_RC_OK;

	WLog_Print(cliprdr->log, WLOG_DEBUG, "FileContentsResponse");

	if (!context->custom)

	{

		WLog_ERR(TAG, "context->custom not set!");

		return ERROR_INTERNAL_ERROR;

	}

	response.msgType = CB_FILECONTENTS_RESPONSE;

	response.msgFlags = flags;

	response.dataLen = length;

	if ((error = cliprdr_read_file_contents_response(s, &response)))

		return error;

	IFCALLRET(context->ServerFileContentsResponse, error, context, &response);

	if (error)

		WLog_ERR(TAG, "ServerFileContentsResponse failed with error %" PRIu32 "!", error);

	return error;

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_process_lock_clipdata(cliprdrPlugin* cliprdr, wStream* s, UINT32 length,

                                          UINT16 flags)

{

	CLIPRDR_LOCK_CLIPBOARD_DATA lockClipboardData;

	CliprdrClientContext* context = cliprdr_get_client_interface(cliprdr);

	UINT error = CHANNEL_RC_OK;

	WLog_Print(cliprdr->log, WLOG_DEBUG, "LockClipData");

	if (!context->custom)

	{

		WLog_ERR(TAG, "context->custom not set!");

		return ERROR_INTERNAL_ERROR;

	}

	if (Stream_GetRemainingLength(s) < 4)

	{

		WLog_ERR(TAG, "not enough remaining data");

		return ERROR_INVALID_DATA;

	}

	lockClipboardData.msgType = CB_LOCK_CLIPDATA;

	lockClipboardData.msgFlags = flags;

	lockClipboardData.dataLen = length;

	Stream_Read_UINT32(s, lockClipboardData.clipDataId); /* clipDataId (4 bytes) */

	IFCALLRET(context->ServerLockClipboardData, error, context, &lockClipboardData);

	if (error)

		WLog_ERR(TAG, "ServerLockClipboardData failed with error %" PRIu32 "!", error);

	return error;

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_process_unlock_clipdata(cliprdrPlugin* cliprdr, wStream* s, UINT32 length,

                                            UINT16 flags)

{

	CLIPRDR_UNLOCK_CLIPBOARD_DATA unlockClipboardData;

	CliprdrClientContext* context = cliprdr_get_client_interface(cliprdr);

	UINT error = CHANNEL_RC_OK;

	WLog_Print(cliprdr->log, WLOG_DEBUG, "UnlockClipData");

	if (!context->custom)

	{

		WLog_ERR(TAG, "context->custom not set!");

		return ERROR_INTERNAL_ERROR;

	}

	if ((error = cliprdr_read_unlock_clipdata(s, &unlockClipboardData)))

		return error;

	unlockClipboardData.msgType = CB_UNLOCK_CLIPDATA;

	unlockClipboardData.msgFlags = flags;

	unlockClipboardData.dataLen = length;

	IFCALLRET(context->ServerUnlockClipboardData, error, context, &unlockClipboardData);

	if (error)

		WLog_ERR(TAG, "ServerUnlockClipboardData failed with error %" PRIu32 "!", error);

	return error;

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_order_recv(cliprdrPlugin* cliprdr, wStream* s)

{

	UINT16 msgType;

	UINT16 msgFlags;

	UINT32 dataLen;

	UINT error;

	if (Stream_GetRemainingLength(s) < 8)

		return ERROR_INVALID_DATA;

	Stream_Read_UINT16(s, msgType);  /* msgType (2 bytes) */

	Stream_Read_UINT16(s, msgFlags); /* msgFlags (2 bytes) */

	Stream_Read_UINT32(s, dataLen);  /* dataLen (4 bytes) */

	if (Stream_GetRemainingLength(s) < dataLen)

		return ERROR_INVALID_DATA;

#ifdef WITH_DEBUG_CLIPRDR

	WLog_DBG(TAG, "msgType: %s (%" PRIu16 "), msgFlags: %" PRIu16 " dataLen: %" PRIu32 "",

	         CB_MSG_TYPE_STRINGS[msgType], msgType, msgFlags, dataLen);

	winpr_HexDump(TAG, WLOG_DEBUG, Stream_Buffer(s), dataLen + 8);

#endif

	switch (msgType)

	{

		case CB_CLIP_CAPS:

			if ((error = cliprdr_process_clip_caps(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG, "cliprdr_process_clip_caps failed with error %" PRIu32 "!", error);

			break;

		case CB_MONITOR_READY:

			if ((error = cliprdr_process_monitor_ready(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG, "cliprdr_process_monitor_ready failed with error %" PRIu32 "!",

				         error);

			break;

		case CB_FORMAT_LIST:

			if ((error = cliprdr_process_format_list(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG, "cliprdr_process_format_list failed with error %" PRIu32 "!", error);

			break;

		case CB_FORMAT_LIST_RESPONSE:

			if ((error = cliprdr_process_format_list_response(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG, "cliprdr_process_format_list_response failed with error %" PRIu32 "!",

				         error);

			break;

		case CB_FORMAT_DATA_REQUEST:

			if ((error = cliprdr_process_format_data_request(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG, "cliprdr_process_format_data_request failed with error %" PRIu32 "!",

				         error);

			break;

		case CB_FORMAT_DATA_RESPONSE:

			if ((error = cliprdr_process_format_data_response(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG, "cliprdr_process_format_data_response failed with error %" PRIu32 "!",

				         error);

			break;

		case CB_FILECONTENTS_REQUEST:

			if ((error = cliprdr_process_filecontents_request(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG, "cliprdr_process_filecontents_request failed with error %" PRIu32 "!",

				         error);

			break;

		case CB_FILECONTENTS_RESPONSE:

			if ((error = cliprdr_process_filecontents_response(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG,

				         "cliprdr_process_filecontents_response failed with error %" PRIu32 "!",

				         error);

			break;

		case CB_LOCK_CLIPDATA:

			if ((error = cliprdr_process_lock_clipdata(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG, "cliprdr_process_lock_clipdata failed with error %" PRIu32 "!",

				         error);

			break;

		case CB_UNLOCK_CLIPDATA:

			if ((error = cliprdr_process_unlock_clipdata(cliprdr, s, dataLen, msgFlags)))

				WLog_ERR(TAG, "cliprdr_process_lock_clipdata failed with error %" PRIu32 "!",

				         error);

			break;

		default:

			error = CHANNEL_RC_BAD_PROC;

			WLog_ERR(TAG, "unknown msgType %" PRIu16 "", msgType);

			break;

	}

	Stream_Free(s, TRUE);

	return error;

}

/**

 * Callback Interface

 */

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_client_capabilities(CliprdrClientContext* context,

                                        const CLIPRDR_CAPABILITIES* capabilities)

{

	wStream* s;

	UINT32 flags;

	const CLIPRDR_GENERAL_CAPABILITY_SET* generalCapabilitySet;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_new(CB_CLIP_CAPS, 0, 4 + CB_CAPSTYPE_GENERAL_LEN);

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	Stream_Write_UINT16(s, 1); /* cCapabilitiesSets */

	Stream_Write_UINT16(s, 0); /* pad1 */

	generalCapabilitySet = (const CLIPRDR_GENERAL_CAPABILITY_SET*)capabilities->capabilitySets;

	Stream_Write_UINT16(s, generalCapabilitySet->capabilitySetType);   /* capabilitySetType */

	Stream_Write_UINT16(s, generalCapabilitySet->capabilitySetLength); /* lengthCapability */

	Stream_Write_UINT32(s, generalCapabilitySet->version);             /* version */

	flags = generalCapabilitySet->generalFlags;

	/* Client capabilities are sent in response to server capabilities.

	 * -> Do not request features the server does not support.

	 * -> Update clipboard context feature state to what was agreed upon.

	 */

	if (!cliprdr->useLongFormatNames)

		flags &= ~CB_USE_LONG_FORMAT_NAMES;

	if (!cliprdr->streamFileClipEnabled)

		flags &= ~CB_STREAM_FILECLIP_ENABLED;

	if (!cliprdr->fileClipNoFilePaths)

		flags &= ~CB_FILECLIP_NO_FILE_PATHS;

	if (!cliprdr->canLockClipData)

		flags &= CB_CAN_LOCK_CLIPDATA;

	cliprdr->useLongFormatNames = flags & CB_USE_LONG_FORMAT_NAMES;

	cliprdr->streamFileClipEnabled = flags & CB_STREAM_FILECLIP_ENABLED;

	cliprdr->fileClipNoFilePaths = flags & CB_FILECLIP_NO_FILE_PATHS;

	cliprdr->canLockClipData = flags & CB_CAN_LOCK_CLIPDATA;

	Stream_Write_UINT32(s, flags); /* generalFlags */

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ClientCapabilities");

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_temp_directory(CliprdrClientContext* context,

                                   const CLIPRDR_TEMP_DIRECTORY* tempDirectory)

{

	int length;

	wStream* s;

	WCHAR* wszTempDir = NULL;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_new(CB_TEMP_DIRECTORY, 0, 260 * sizeof(WCHAR));

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	length = ConvertToUnicode(CP_UTF8, 0, tempDirectory->szTempDir, -1, &wszTempDir, 0);

	if (length < 0)

		return ERROR_INTERNAL_ERROR;

	/* Path must be 260 UTF16 characters with '\0' termination.

	 * ensure this here */

	if (length >= 260)

		length = 259;

	Stream_Write_UTF16_String(s, wszTempDir, length);

	Stream_Zero(s, 520 - (length * sizeof(WCHAR)));

	free(wszTempDir);

	WLog_Print(cliprdr->log, WLOG_DEBUG, "TempDirectory: %s", tempDirectory->szTempDir);

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_client_format_list(CliprdrClientContext* context,

                                       const CLIPRDR_FORMAT_LIST* formatList)

{

	wStream* s;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_format_list_new(formatList, cliprdr->useLongFormatNames);

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_format_list_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ClientFormatList: numFormats: %" PRIu32 "",

	           formatList->numFormats);

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT

cliprdr_client_format_list_response(CliprdrClientContext* context,

                                    const CLIPRDR_FORMAT_LIST_RESPONSE* formatListResponse)

{

	wStream* s;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_new(CB_FORMAT_LIST_RESPONSE, formatListResponse->msgFlags, 0);

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ClientFormatListResponse");

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_client_lock_clipboard_data(CliprdrClientContext* context,

                                               const CLIPRDR_LOCK_CLIPBOARD_DATA* lockClipboardData)

{

	wStream* s;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_lock_clipdata_new(lockClipboardData);

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ClientLockClipboardData: clipDataId: 0x%08" PRIX32 "",

	           lockClipboardData->clipDataId);

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT

cliprdr_client_unlock_clipboard_data(CliprdrClientContext* context,

                                     const CLIPRDR_UNLOCK_CLIPBOARD_DATA* unlockClipboardData)

{

	wStream* s;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_unlock_clipdata_new(unlockClipboardData);

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ClientUnlockClipboardData: clipDataId: 0x%08" PRIX32 "",

	           unlockClipboardData->clipDataId);

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_client_format_data_request(CliprdrClientContext* context,

                                               const CLIPRDR_FORMAT_DATA_REQUEST* formatDataRequest)

{

	wStream* s;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_new(CB_FORMAT_DATA_REQUEST, 0, 4);

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	Stream_Write_UINT32(s, formatDataRequest->requestedFormatId); /* requestedFormatId (4 bytes) */

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ClientFormatDataRequest");

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT

cliprdr_client_format_data_response(CliprdrClientContext* context,

                                    const CLIPRDR_FORMAT_DATA_RESPONSE* formatDataResponse)

{

	wStream* s;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_new(CB_FORMAT_DATA_RESPONSE, formatDataResponse->msgFlags,

	                       formatDataResponse->dataLen);

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	Stream_Write(s, formatDataResponse->requestedFormatData, formatDataResponse->dataLen);

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ClientFormatDataResponse");

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT

cliprdr_client_file_contents_request(CliprdrClientContext* context,

                                     const CLIPRDR_FILE_CONTENTS_REQUEST* fileContentsRequest)

{

	wStream* s;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_file_contents_request_new(fileContentsRequest);

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_file_contents_request_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ClientFileContentsRequest: streamId: 0x%08" PRIX32 "",

	           fileContentsRequest->streamId);

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT

cliprdr_client_file_contents_response(CliprdrClientContext* context,

                                      const CLIPRDR_FILE_CONTENTS_RESPONSE* fileContentsResponse)

{

	wStream* s;

	cliprdrPlugin* cliprdr = (cliprdrPlugin*)context->handle;

	s = cliprdr_packet_file_contents_response_new(fileContentsResponse);

	if (!s)

	{

		WLog_ERR(TAG, "cliprdr_packet_new failed!");

		return ERROR_INTERNAL_ERROR;

	}

	WLog_Print(cliprdr->log, WLOG_DEBUG, "ClientFileContentsResponse: streamId: 0x%08" PRIX32 "",

	           fileContentsResponse->streamId);

	return cliprdr_packet_send(cliprdr, s);

}

/**

 * Function description

 *

 * @return 0 on success, otherwise a Win32 error code

 */

static UINT cliprdr_virtual_channel_event_data_received(cliprdrPlugin* cliprdr, void* pData,

                                                        UINT32 dataLength, UINT32 totalLength,

                                                        UINT32 dataFlags)

{

	wStream* data_in;

	if ((dataFlags & CHANNEL_FLAG_SUSPEND) || (dataFlags & CHANNEL_FLAG_RESUME))

	{

		return CHANNEL_RC_OK;

	}

	if (dataFlags & CHANNEL_FLAG_FIRST)

	{

		if (cliprdr->data_in)

			Stream_Free(cliprdr->data_in, TRUE);

		cliprdr->data_in = Stream_New(NULL, totalLength);

	}

	if (!(data_in = cliprdr->data_in))

	{

		WLog_ERR(TAG, "Stream_New failed!");

		return CHANNEL_RC_NO_MEMORY;

	}

	if (!Stream_EnsureRemainingCapacity(data_in, dataLength))

	{

		Stream_Free(cliprdr->data_in, TRUE);

		cliprdr->data_in = NULL;

		return CHANNEL_RC_NO_MEMORY;

	}

	Stream_Write(data_in, pData, dataLength);

	if (dataFlags & CHANNEL_FLAG_LAST)

	{

		if (Stream_Capacity(data_in) != Stream_GetPosition(data_in))

		{

			WLog_ERR(TAG, "cliprdr_plugin_process_received: read error");

			return ERROR_INTERNAL_ERROR;

		}

		cliprdr->data_in = NULL;

		Stream_SealLength(data_in);

		Stream_SetPosition(data_in, 0);

		if (!MessageQueue_Post(cliprdr->queue, NULL, 0, (void*)data_in, NULL))

		{

			WLog_ERR(TAG, "MessageQueue_Post failed!");

			return ERROR_INTERNAL_ERROR;

		}

	}

	return CHANNEL_RC_OK;

}

static VOID VCAPITYPE cliprdr_virtual_channel_open_event_ex(LPVOID lpUserParam, DWORD openHandle,

                                                            UINT event, LPVOID pData,

                                                            UINT32 dataLength, UINT32 totalLength,

                                                            UINT32 dataFlags)

{