/*
* Copyright (c) 2002-2006 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: 
*     This class encapsulates the functionality associated with renaming
*     files in different situation. The implementation is made according
*     to the Folders v.4.0 specification.
*
*
*/


// INCLUDES
#include <f32file.h>
#include <AknQueryDialog.h>
#include <aknnotewrappers.h>
#include <bautils.h>
#include <StringLoader.h>
#include <apparc.h>

#include <voicerecorder.rsg>
#include "voicerecorder.hrh"
#include "TVRRename.h"

// CONSTANTS
const TInt KMaxFileNameLength( 64 );


// ================= MEMBER FUNCTIONS ========================================

// ---------------------------------------------------------------------------
// TVRRename::TVRRename
// 
// ---------------------------------------------------------------------------
//
EXPORT_C TVRRename::TVRRename( RFs& aFs ) : iFs( aFs )
    {
    }


// ---------------------------------------------------------------------------
// TVRRename::GetNewNameL
// 
// ---------------------------------------------------------------------------
//
EXPORT_C TBool TVRRename::GetNewNameL( const TDesC& aOldName, 
									   TDes& aNewName, 
									   const TInt aPrompt )
	{
	CCoeEnv* coeEnv = CCoeEnv::Static();

	TParsePtrC nameParse( aOldName );
	TBuf<KMaxFileNameLength> fileName;		

	// The query can fit only VRMEMONAMEMAXLENGTH characters
	fileName.Copy( nameParse.Name().Left( VRMEMONAMEMAXLENGTH ) );

	CAknStaticSizeDataQuerydialog* nameDlg = new( ELeave ) 
								CAknTextQueryDialog( fileName ); // CSI: 35 #
								
	nameDlg->PrepareLC( R_VR_RENAME_DIALOG );
	HBufC* prompt = StringLoader::LoadLC( aPrompt, coeEnv );
	nameDlg->SetPromptL( *prompt );
	CleanupStack::PopAndDestroy();

	while ( nameDlg->RunLD() != 0 )
		{
		// Construct the full path of the new proposed (by the user) name 
		aNewName.Copy( nameParse.DriveAndPath() );
		aNewName.Append( fileName );
		aNewName.Append( nameParse.Ext() );

		TInt backslash = fileName.Find(_L( "\\" ) );

		// Check that the name is valid for the fs32
		// Is ValidFileName does not check backslash
		if ( iFs.IsValidName( aNewName ) && backslash == KErrNotFound )
			{	
			// Check if it exists?
			if ( !BaflUtils::FileExists( iFs, aNewName ) ||
				aOldName == aNewName )
				{
				// Nope => accepted 
				return ETrue;
				}

			// Prompt the user for "Overwrite?"
			prompt = StringLoader::LoadLC( R_QTN_FLDR_OVERWRITE_QUERY, 
										   fileName, 
										   coeEnv );
										   
			CAknQueryDialog* queryDlg = CAknQueryDialog::NewL();
			TBool accepted( queryDlg->ExecuteLD( R_VR_CONFIRMATION_QUERY, 
												 *prompt ) );

			CleanupStack::PopAndDestroy( prompt );

			if ( accepted )
				{
				// User accepted overwrite
				return ETrue;
				}

			// Create a new dialog for the next round
			// TfileName. (CApaApplication::GenerateFileName needs it)
			TFileName generatedName;	 
			generatedName.Copy( nameParse.DriveAndPath() );
			generatedName.Append( fileName );
			generatedName.Append( nameParse.Ext() );
			User::LeaveIfError( 
					CApaApplication::GenerateFileName( iFs, generatedName ) );
			
			TParsePtrC generatedNameParse( generatedName );
			TPtrC generatedNamePtr( generatedNameParse.Name() );
			if ( generatedNamePtr.Length() > VRMEMONAMEMAXLENGTH )
				{
				// Name got too long => clip the suffix
				fileName.Copy( generatedNamePtr.Left( 
					generatedNamePtr.LocateReverse( '(' ) ) );
				}
			else 
				{
				fileName.Copy( generatedNamePtr );
				}
			
			}
		else
			{
			// The name wasn't a valid fs32 filename => show info note
			HBufC* noteText = coeEnv->AllocReadResourceLC
											( R_QTN_FLDR_ILLEGAL_CHARACTERS );
			CAknInformationNote* infoNote = new( ELeave ) 
												CAknInformationNote( ETrue );
			infoNote->ExecuteLD( *noteText );
			CleanupStack::PopAndDestroy();	// noteText
			}

		nameDlg = new( ELeave ) CAknTextQueryDialog( fileName );
		nameDlg->PrepareLC( R_VR_RENAME_DIALOG );	
		}

	// User canceled
	return EFalse;
	}


// ---------------------------------------------------------------------------
// TVRRename::RenameL
// 
// ---------------------------------------------------------------------------
//
EXPORT_C TBool TVRRename::RenameL( TDes& aName, const TInt aPrompt )
	{
	HBufC* oldName = aName.AllocLC();
	if ( GetNewNameL( *oldName, aName, aPrompt ) )
		{
		TInt err ( BaflUtils::RenameFile( iFs, *oldName, aName ) );
		if ( err )
			{
			// Show error note "Unable to rename %U"
			CAknInformationNote* infoNote = NULL;
			TParsePtrC parse( oldName->Des() );
			HBufC* noteText = StringLoader::LoadLC( R_QTN_FLDR_CANT_RENAME_ITEM, 
													parse.Name(), 
													CCoeEnv::Static() );
		    if ( !noteText )
		    	{
		    	CleanupStack::PopAndDestroy(); // oldName 
		    	return EFalse;
		    	}
			
			infoNote = new( ELeave ) CAknInformationNote( ETrue );
			if ( infoNote )
				{
				infoNote->ExecuteLD( *noteText );
				}
			CleanupStack::PopAndDestroy( 2 ); // oldName, noteText	
			return EFalse;
			}
			
		CleanupStack::PopAndDestroy( oldName );
		return ETrue;
		}
	else
		{
		CleanupStack::PopAndDestroy( oldName );
		return EFalse;
		}
	}


// ---------------------------------------------------------------------------
// TVRRename::RenameL
// The file handle may not point to private folder, since renaming can't be
// used in embedded mode
// ---------------------------------------------------------------------------
//
EXPORT_C TBool TVRRename::RenameL( RFile& aFile, const TInt aPrompt )
	{
	TFileName name( KNullDesC );
	aFile.FullName( name );
	HBufC* oldName = name.AllocLC();
	
	if ( GetNewNameL( *oldName, name, aPrompt ) )
		{
		aFile.Close();
		TInt err ( BaflUtils::RenameFile( iFs, *oldName, name ) );
		if ( err )
			{
			// Show error note "Unable to rename %U"
			// and open the old file again			
			User::LeaveIfError( aFile.Open( iFs, oldName->Des(),
			                                EFileShareReadersOnly ) );
			
			CAknInformationNote* infoNote = NULL;
			TParsePtrC parse( oldName->Des() );
			HBufC* noteText = StringLoader::LoadLC(
			    R_QTN_FLDR_CANT_RENAME_ITEM, parse.Name(), CCoeEnv::Static() );
			
			infoNote = new( ELeave ) CAknInformationNote( ETrue );
			infoNote->ExecuteLD( *noteText );

			CleanupStack::PopAndDestroy( 2 ); // oldName, noteText	
			return EFalse;
			}
		CleanupStack::PopAndDestroy( oldName );
		User::LeaveIfError( aFile.Open( iFs, name, EFileShareReadersOnly ) );
		return ETrue;
		}
	else
		{
		CleanupStack::PopAndDestroy( oldName );
		return EFalse;
		}
	}