/*

* Copyright (c) 2010 ISB.

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of the "Symbian Foundation License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.symbianfoundation.org/legal/sfl-v10.html".

*

* Initial Contributors:

* ISB - Initial contribution

*

* Contributors:

*

* Description:

*

*/

#include "ecamwebcameravfactive.h"

const TInt KVfWidth     = 160;			// viewfinder image width

const TInt KVfHeight    = 120;			// viewfinder image height

const TInt KVfLineBytes = KVfWidth * 3;	// bytes of one line

//

// CWebCameraVfActive

//

CWebCameraVfActive* CWebCameraVfActive::NewL(MWebCameraVfActiveCallBack* aOwner, RWebcameraDevice& aDriver)

	{

	CWebCameraVfActive* self = new(ELeave) CWebCameraVfActive(aOwner, aDriver);

	CleanupStack::PushL(self);

	self->ConstructL();

	CleanupStack::Pop(self);

	return self;

	}

CWebCameraVfActive::CWebCameraVfActive(MWebCameraVfActiveCallBack* aOwner, RWebcameraDevice& aDriver)

				   :CActive(CActive::EPriorityStandard),

				    iOwner(aOwner),

				    iDriver(aDriver),

				    iVfBufPtr(NULL, 0)

	{

	CActiveScheduler::Add(this);

	}

CWebCameraVfActive::~CWebCameraVfActive()

	{

	delete iVfBitmap;

	delete iDSA;

	delete iVfBuf;

	}

void CWebCameraVfActive::ConstructL()

	{

	}

/**

* RunL.

*/

void CWebCameraVfActive::RunL()

	{

	TInt wError = iStatus.Int();

	RDebug::Print(_L("CWebCameraVfActive::RunL wError = %d"), wError);

	if (iViewFinderActive)

		{

		//The whole view finder start repeats screen update and the data acquisition.

		UpdateViewL();

		Start();

		}

	}

void CWebCameraVfActive::DoCancel()

	{

	iDriver.StopViewFinder();

	}

/** 

Starts transfer of view finder data to the given portion of the screen using

direct screen access.

The aScreenRect parameter is in screen co-ordinates and may be modified if,

eg, the camera requires the destination to have a certain byte alignment, etc.

@param  aWs 

        Window server session.

@param  aScreenDevice 

        Screen device.

@param  aWindow 

        Displayable window.

@param  aScreenRect 

        Portion of the screen to which view finder data is to be

        transferred. This is in screen co-ordinates and may be modified if, for example,

        the camera requires the destination to have a certain byte alignment.

*/

void CWebCameraVfActive::StartViewFinderDirectL(RWsSession& aWs, CWsScreenDevice& aScreenDevice, RWindowBase& aWindow, TRect& aScreenRect, TRect& aClipRect)

	{

	iScreenRect = aScreenRect;

	iClipRect = aClipRect;

	// create buffer for view finder data

	iVfBuf = HBufC8::NewL(KMaxBufSize);

	// create DirectScreenAccess

	delete iDSA;

	iDSA = NULL;

	iViewFinderActive = EFalse;

	iDSA = CDirectScreenAccess::NewL(aWs, aScreenDevice, aWindow, *this);

	iDSA->StartL();

	iViewFinderActive = ETrue;

	iDSA->Gc()->SetOrigin();

	if (!iClipRect.IsEmpty())

		{

		iDSA->Gc()->SetClippingRect(iClipRect);

		}

	// start view finder

	// The division transfer is going to support in the next version. 

	Start();

	}

/** 

Stops transfer of view finder data to the screen. 

*/

void CWebCameraVfActive::StopViewFinder()

	{

	if (!iViewFinderActive)

		{

		return;

		}

	iViewFinderActive = EFalse;

	delete iDSA;

	iDSA = NULL;

	delete iVfBuf;

	iVfBuf = NULL;

	//Stop view finder

	iDriver.StopViewFinder();

	Cancel();

	}

/** 

Queries whether the view finder is active.

@return  ETrue if the view finder is active. EFalse if the view finder is not

         active. 

*/

TBool CWebCameraVfActive::ViewFinderActive()

	{

	return iViewFinderActive;

	}

/** 

Start viewfinder process.

*/

void CWebCameraVfActive::Start()

	{

	RDebug::Print(_L("CWebCameraVfActive::Start"));

	iVfBufPtr.Set(iVfBuf->Des());

	iVfBufPtr.SetLength(0);

	//Start view finder

	iDriver.StartViewFinder(iStatus, iVfBufPtr);

	SetActive();

	}

/** 

Draw the image of the view finder on screen.

*/

void CWebCameraVfActive::UpdateViewL()

	{

	RDebug::Print(_L("CWebCameraVfActive::UpdateViewL"));

	delete iVfBitmap;

	iVfBitmap = NULL;

	CFbsBitmap* image = new (ELeave) CFbsBitmap();

	CleanupStack::PushL(image);

	User::LeaveIfError(image->Create(TSize(KVfWidth, KVfHeight), EColor16M));

	CleanupStack::Pop(image);

	iVfBitmap = image;

// output received data log

//	RDebug::Print(_L("CWebCameraVfActive::UpdateView iVfBufLength[%d]"), iVfBufPtr.Length());

//	TBuf<256> hexBuf;

//	for (TInt i = 0; i < iVfBufPtr.Length(); i++)

//		{

//		hexBuf.AppendFormat(_L("%02X "), iVfBufPtr[i]);

//		if ((i % 16) == 15)

//			{

//			RDebug::Print(hexBuf);

//			hexBuf = KNullDesC;

//			}

//		}

//	RDebug::Print(hexBuf);

	// convert buffer data to Bitmap

	for (TInt height=0; height<KVfHeight; height++)

		{

		TInt pos = height * KVfLineBytes;

		TPtrC8 posptr = iVfBuf->Mid(pos, KVfLineBytes);

		TBuf8<KVfLineBytes>  buf;

		buf.Copy(posptr);

		iVfBitmap->SetScanLine(buf, (KVfHeight-1)-height);

		}

	// view position setting for test application

	iScreenRect.iTl.iY = 50;

	iScreenRect.iBr.iY = 169;

	// update view

	iDSA->Gc()->DrawBitmap(iScreenRect, iVfBitmap);

	iDSA->ScreenDevice()->Update();

	}

/** 

from MAbortDirectScreenAccess

This function is called by the window server when direct screen access must stop

(for example because a dialogue is moved in front of the area where direct screen access is taking place).

@param  aScreenDevice 

		The reason why direct screen access was terminated. 

*/

void CWebCameraVfActive::AbortNow(RDirectScreenAccess::TTerminationReasons /*aReason*/)

	{

	}

/** 

from 	from MDirectScreenAccess

This function is called by the window server as soon as direct screen access can resume.

@param  aScreenDevice 

		Provides the reason why direct screen access was terminated. 

*/

void CWebCameraVfActive::Restart(RDirectScreenAccess::TTerminationReasons /*aReason*/)

	{

	}