/*

* Copyright (c) 2010 Ixonos Plc.

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of the "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - Initial contribution

*

* Contributors:

* Ixonos Plc

*

* Description:  

*

*/

#include <fbs.h>

#include "CFilterJpegTarget.h"

#include "MJpegSave.h"

#include "JpegSaveFactory.h"

const TInt KSaveBufferLength = 0x40000; // 256 kilobytes

EXPORT_C TInt CFilterJpegTarget::Create()

	{

	CFilterJpegTarget* ptr = NULL;

	TRAPD( error, ptr = NewL(); );

	if( error != KErrNone )

		{

		ptr = NULL;

		}

	return (TInt)((MImageFilter*)ptr);

	}

CFilterJpegTarget* CFilterJpegTarget::NewL()

	{

	CFilterJpegTarget* self = new( ELeave )CFilterJpegTarget();

	CleanupStack::PushL( self );

	self->ConstructL();

	CleanupStack::Pop( self );

	return self;

	}

CFilterJpegTarget::~CFilterJpegTarget()

	{

	delete iJpegSave;

	iFile.Close();

	iFs.Close();

	}

CFilterJpegTarget::CFilterJpegTarget()

	{

	}

void CFilterJpegTarget::ConstructL()

	{

	User::LeaveIfError( iFs.Connect() );

	}

TRect CFilterJpegTarget::Rect()

    {

	TRect rect;

	rect.iTl.iX = 0;			

	rect.iTl.iY = 0;			

	rect.iBr.iX = iSize.iWidth;			

	rect.iBr.iY = iSize.iHeight;			

	return rect;

    }

TReal CFilterJpegTarget::Scale()

    {

    return iChild->Scale();

    }

TSize CFilterJpegTarget::ViewPortSize()

{

    return iChild->ViewPortSize();

}

TBlock * CFilterJpegTarget::GetBlockL ( const TRect & /*aRect*/ )

{

    return NULL;

}

void CFilterJpegTarget::SetParent( MImageFilter* aParent )

	{

	iParent = aParent;

	}

void CFilterJpegTarget::SetChild( MImageFilter* aChild )

	{

	iChild = aChild;

	}

TInt CFilterJpegTarget::CmdL( const TDesC16& aCmd )

	{

	TInt exifData = 0;

	TInt exifLength = 0;

	TLex lex( aCmd );

	while( ! lex.Eos() )

		{

		TPtrC token = lex.NextToken();

		if( token.Compare( _L("width") ) == 0 )

			{

			lex.Inc();

			lex.Val( iSize.iWidth );

			}

		else if( token.Compare( _L("height") ) == 0 )

			{

			lex.Inc();

			lex.Val( iSize.iHeight );

			}

		else if( token.Compare( _L("exifdata") ) == 0 )

			{

			lex.Inc();

			lex.Val( exifData );

			}

		else if( token.Compare( _L("exiflen") ) == 0 )

			{

			lex.Inc();

			lex.Val( exifLength );

			}

		else if( token.Compare( _L("file") ) == 0 )

			{

			//

			// Starts saving, gets filename in parenthesis: file "file.jpg"

			// !! lexer cuts with space in filename

			//

			if ( iSize.iWidth == 0 || iSize.iHeight == 0 )

				{

				iRect = iChild->Rect();

				iSize.iWidth = iRect.iBr.iX - iRect.iTl.iX;

		        iSize.iHeight = iRect.iBr.iY - iRect.iTl.iY;

				}

			else

				{

				iRect.iTl.iX = 0;			

				iRect.iTl.iY = 0;			

				iRect.iBr.iX = iSize.iWidth;			

				iRect.iBr.iY = iSize.iHeight;			

				}

			TPtrC filec = lex.NextToken();

			TPtrC file( filec.Ptr()+1, filec.Length()-2 );

			iFileName.Copy( file );

			iFile.Replace( iFs, iFileName, EFileWrite | EFileShareAny );

			iJpegSave = JpegSaveFactory::CreateJpegSaveL( &iFs, &iFile );

			TPtr8 exifPtr( (TUint8*)exifData, exifLength );

			exifPtr.SetLength( exifLength );

			iJpegSave->StartSaveL( iSize, exifPtr, KSaveBufferLength, 90 );

			iBm.iData = new( ELeave )TUint32[ 128 ];

			iBm.iSize = TSize (16,8);

            iBm.iDrawRect = iBm.iSize;

			iBm.iType = E16MColor;

			iBlockWidth = 16;

			iBlockHeight = 8;

			iBlockY = 0;

			}

		else if( token.Compare( _L("store") ) == 0 )

			{

            TInt height = iRect.iBr.iY - iRect.iTl.iY;

			TInt progress = (iBlockY * 100) / height;

			if( iBlockY >= height)

            	{

				iJpegSave->FinalizeSave();

				delete iBm.iData;

				progress = 100;

				iFile.Close();

				}

            else

            	{

                TPoint tl (iRect.iTl.iX, iBlockY + iRect.iTl.iY);

                TPoint br = tl + TPoint (iBlockWidth, iBlockHeight);

                while ( tl.iX < iRect.iBr.iX )

                	{

                    //  Get block

                    TBlock * pB = iChild->GetBlockL ( TRect(tl, br) );

                    if (pB)

                    	{

                        TUint32 * ps = 

                            pB->iData + 

                            (tl.iY - pB->iRect.iTl.iY) * pB->iWidth +

                            (tl.iX - pB->iRect.iTl.iX);

                        TUint32 * pd = (TUint32*)iBm.iData;

                        TInt datalength = iBlockWidth * sizeof(TUint32);

                        for (TInt i = 0; i < iBlockHeight; ++i)

                        	{

                            Mem::Copy (pd, ps, datalength);

                            ps += pB->iWidth;

                            pd += iBlockWidth;

                        	}

                        delete pB;

                        pB = NULL;

                    	}

                    else

                    	{

                        Mem::FillZ ((TUint8 *)iBm.iData, iBlockWidth * iBlockHeight * sizeof(TUint32));

                    	}

/*

            CFbsBitmap * bitmap = new (ELeave) CFbsBitmap;

            CleanupStack::PushL(bitmap);

            TSize blocksize (iBm.iSize);

            User::LeaveIfError(bitmap->Create(blocksize, EColor16M));

            TBitmapUtil bm (bitmap);

            bm.Begin(TPoint(0,0));

            TUint8 * pDOS = (TUint8 *)bitmap->DataAddress();

            TUint32 * pS = (TUint32 *)iBm.iData;

            TInt ws = CFbsBitmap::ScanLineLength(blocksize.iWidth, EColor16M);

            for (TInt ii = 0; ii < blocksize.iHeight; ++ii)

            {

                TUint8 * pD = pDOS;

                pDOS += ws;

                for (TInt j = 0; j < blocksize.iWidth; ++j)

                {

                    TUint32 c = *pS++;

                    *pD++ = c & 0xFF;

                    c >>= 8;

                    *pD++ = c & 0xFF;

                    c >>= 8;

                    *pD++ = c & 0xFF;

                }

            }

            bm.End();

            TFileName filename;

            filename.Copy (_L("c:\\nokia\\images\\sf_"));

            filename.AppendNum(tl.iY);

            filename.Append(_L("_"));

            filename.AppendNum(tl.iX);

            filename.Append(_L(".mbm"));

            bitmap->Save(filename);

            CleanupStack::PopAndDestroy(); // bitmap

*/

                    iJpegSave->SaveBlock( iBm );

                    tl.iX  += iBlockWidth;

                    br.iX  += iBlockWidth;

                	}

			    iBlockY += iBlockHeight;

            	}

			return progress;

			}

		else if( token.Compare( _L("abort") ) == 0 )

			{

			if (iBm.iData)

				{

				delete iBm.iData;	

				iBm.iData = NULL;

				}

			iFile.Close();

			}

		}

	return 0;

	}

const char* CFilterJpegTarget::Type()

	{

	return "jpegtarget";

	}

#if !defined(EKA2)

GLDEF_C TInt E32Dll( TDllReason )

    {

    return KErrNone;

    }	

#endif