/*

* Copyright (c) 2004 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of "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:

*

* Description:  Implementation

*

*/

#include <f32file.h>

#include <bautils.h>

#include "CTcFileHandler.h"

#include "TCmdTransferFile.h"

#include "SIPConstants.h"

#include "CTcSIPContext.h"

// Literals used for action name

_LIT8( KWrite, "write" );

_LIT8( KDelete, "delete" );

_LIT8( KExists, "exists" );

/**

 * INPUT:

 *   Headers:		-

 *   Parameters:	ActionName, *SrcPath, DestinationPath, *Data

 *   IDs:			-

 *

 * OUTPUT:

 *   Parameters:	StatusCode

 *   IDs:			-

 */

void TCmdTransferFile::ExecuteL()

	{

	// -- Setup ---------------------------------------------------------------

    // Get action name for operation (e.g. write&read)

    TPtrC8 actionName = ExtractTextL( KParamActionName );

    // Get parameter destination path

    TPtrC8 sourcePath = ExtractTextL( KParamSourcePath, EFalse );

	// Get parameter destination path

    TPtrC8 destinationPath = ExtractTextL( KParamDestinationPath );

	// Get actual data. Data parameter is having data in binary format.

	TPtrC8 data = ExtractTextL( KParamData, EFalse );

	// Extract content. Content parameter is having textual data.

	HBufC8* content = ExtractHBufLC( KParamContent );

	if ( !content )

	    {

	    // Create dummy zero length content

	    content = HBufC8::NewLC( 0 );

	    }

	// -- Execution -----------------------------------------------------------

    // Compare the operation and do it

    if( !actionName.CompareC( KWrite ) )

		{

		if ( sourcePath.Compare( KNullDesC8 ) != 0 )

		    {

		    // If source path was defined copy file from sourcepath

		    // to destinationpath

		    DoCopyL( sourcePath, destinationPath );

		    }

		else if ( content->Length() != 0 )

		    {

		     // Otherwise write received text data to destinationpath

		    TPtrC8 ptr(content->Right(content->Length()));

		    DoWriteL( destinationPath, ptr );   

		    }		    

		else if ( data.Compare( KNullDesC8 ) != 0 )

		    {

		    // Otherwise write received data to destinationpath

		    DoWriteL( destinationPath, data );   

		    }

		else

		    {

		    User::Leave( KErrNotFound );

		    }

		}

    else if( !actionName.CompareC( KExists ) )

    	{

    	TFileName filename;

    	filename.Copy(destinationPath);

    	if( CheckFileExists(filename) )

			{

			AddBooleanResponseL(_L8("FileExists"), ETrue);

			}

		else

			{

			AddBooleanResponseL(_L8("FileExists"), EFalse);

			}

    	}

    else if( !actionName.CompareC( KDelete ) )

    	{   

    	TParse parse;

    	TFileName name;

    	name.Copy(destinationPath);

    	parse.Set(name, NULL, NULL);

    	if( parse.DrivePresent() && parse.PathPresent() && parse.NameOrExtPresent() )

    		{

    		iContext.FileHandler().DeleteFileL(destinationPath);

    		}

    	else

    		{

    		User::Leave( KErrArgument);

    		}

    	}

    else { User::Leave( KErrNotSupported ); }

    // -- Response creation ---------------------------------------------------

    AddIntegerResponseL( KResponseActionReturnCode, KSIPReasonOk );

    CleanupStack::Pop(1);

    }

TBool TCmdTransferFile::Match( const TTcIdentifier& aId )

	{

	return TTcSIPCommandBase::Match( aId, _L8("fileXfer") );

	}

TTcCommandBase* TCmdTransferFile::CreateL( MTcTestContext& aContext )

	{

	return new( ELeave ) TCmdTransferFile( aContext );

	}

void TCmdTransferFile::DoWriteL( TPtrC8& aDestinationPath, TPtrC8& aData )

    {

    // Use FileHandler server for writing since SIPTester cannot have access

    // to /sys and /resource directories

    iContext.FileHandler().CreateFileL( aDestinationPath, aData );

    }

void TCmdTransferFile::DoCopyL( TPtrC8& aSourcePath, TPtrC8& aDestinationPath )

    {

    iContext.FileHandler().CopyFileL( aSourcePath, aDestinationPath );

    }

TDesC8 TCmdTransferFile::DoReadL( TFileName& aDestinationPath )

    {

    // Read the document into a buffer.

	RFs fs;

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

	CleanupClosePushL( fs );

	RFile in;

	User::LeaveIfError( in.Open( fs, aDestinationPath, 

						EFileRead ) );

	CleanupClosePushL( in );

    //TBuf8< KTcRequestMaxLength > data; // 5120

    //TBuf8< KTcResponseMaxLength > data; // 40960

    TBuf8< 20 > data;

	User::LeaveIfError( in.Read( data ) );

    in.Close();

    fs.Close();

	CleanupStack::PopAndDestroy( 2 );	// in, fs

    return data;

    }

TBool TCmdTransferFile::CheckFileExists(const TDesC& aFileName)

	{

	RFs fs;

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

	CleanupClosePushL( fs );

	TParse p;

	// do isolated parse

	User::LeaveIfError(p.Set(aFileName, NULL, NULL));

	User::LeaveIfError(fs.Parse(aFileName, p));

	TBool result = BaflUtils::FileExists(fs, aFileName);

	fs.Close();

	CleanupStack::PopAndDestroy( 1 );

	if(result)

		return ETrue;

	else

		return EFalse;

	}