/**

 * FreeRDP: A Remote Desktop Protocol Implementation

 * DirectFB Graphical Objects

 *

 * Copyright 2011 Marc-Andre Moreau <marcandre.moreau@gmail.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.

 */

#include <winpr/crt.h>

#include "df_graphics.h"

/* Pointer Class */

void df_Pointer_New(rdpContext* context, rdpPointer* pointer)

{

	dfInfo* dfi;

	DFBResult result;

	dfPointer* df_pointer;

	DFBSurfaceDescription dsc;

	dfi = ((dfContext*) context)->dfi;

	df_pointer = (dfPointer*) pointer;

	dsc.flags = DSDESC_CAPS | DSDESC_WIDTH | DSDESC_HEIGHT | DSDESC_PIXELFORMAT;

	dsc.caps = DSCAPS_SYSTEMONLY;

	dsc.width = pointer->width;

	dsc.height = pointer->height;

	dsc.pixelformat = DSPF_ARGB;

	result = dfi->dfb->CreateSurface(dfi->dfb, &dsc, &(df_pointer->surface));

	if (result == DFB_OK)

	{

		int pitch;

		BYTE* point = NULL;

		df_pointer->xhot = pointer->xPos;

		df_pointer->yhot = pointer->yPos;

		result = df_pointer->surface->Lock(df_pointer->surface,

				DSLF_WRITE, (void**) &point, &pitch);

		if (result != DFB_OK)

		{

			DirectFBErrorFatal("Error while creating pointer surface", result);

			return;

		}

		if ((pointer->andMaskData != 0) && (pointer->xorMaskData != 0))

		{

			freerdp_alpha_cursor_convert(point, pointer->xorMaskData, pointer->andMaskData,

					pointer->width, pointer->height, pointer->xorBpp, dfi->clrconv);

		}

		if (pointer->xorBpp > 24)

		{

			freerdp_image_swap_color_order(point, pointer->width, pointer->height);

		}

		df_pointer->surface->Unlock(df_pointer->surface);

	}

}

void df_Pointer_Free(rdpContext* context, rdpPointer* pointer)

{

	dfPointer* df_pointer = (dfPointer*) pointer;

	df_pointer->surface->Release(df_pointer->surface);

}

void df_Pointer_Set(rdpContext* context, rdpPointer* pointer)

{

	dfInfo* dfi;

	DFBResult result;

	dfPointer* df_pointer;

	dfi = ((dfContext*) context)->dfi;

	df_pointer = (dfPointer*) pointer;

	dfi->layer->SetCooperativeLevel(dfi->layer, DLSCL_ADMINISTRATIVE);

	dfi->layer->SetCursorOpacity(dfi->layer, df_pointer ? 255: 0);

	if(df_pointer != NULL)

	{

		result = dfi->layer->SetCursorShape(dfi->layer,

			df_pointer->surface, df_pointer->xhot, df_pointer->yhot);

		if (result != DFB_OK)

		{

			DirectFBErrorFatal("SetCursorShape Error", result);

			return;

		}

	}

	dfi->layer->SetCooperativeLevel(dfi->layer, DLSCL_SHARED);

}

void df_Pointer_SetNull(rdpContext* context)

{

	df_Pointer_Set(context, NULL);

}

void df_Pointer_SetDefault(rdpContext* context)

{

}

/* Graphics Module */

void df_register_graphics(rdpGraphics* graphics)

{

	rdpPointer* pointer;

	pointer = (rdpPointer*) malloc(sizeof(rdpPointer));

	ZeroMemory(pointer, sizeof(rdpPointer));

	pointer->size = sizeof(dfPointer);

	pointer->New = df_Pointer_New;

	pointer->Free = df_Pointer_Free;

	pointer->Set = df_Pointer_Set;

	pointer->SetNull = df_Pointer_SetNull;

	pointer->SetDefault = df_Pointer_SetDefault;

	graphics_register_pointer(graphics, pointer);

	free(pointer);

}