/*

* Copyright (c) 2006-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:   VirtualPhonebook support for importing VCard messages

*

*/

// system includes

#include <AknQueryDialog.h>     // CAknTextQueryDialog

#include <vcardbc.rsg>          // resource definitions

//Phonebook 2 API

#include <CPbk2StoreConfiguration.h>

#include <VPbkContactStoreUris.h>

#include <CVPbkContactStoreUriArray.h>

#include <MVPbkContactStoreList.h>

#include <MVPbkContactStore.h>

#include <MVPbkContactOperationBase.h>

#include <CVPbkVCardEng.h>

#include <CVPbkContactManager.h>

#include <MVPbkStoreContact.h>

#include <MVPbkFieldType.h>

#include <MVPbkContactStoreProperties.h>

#include <MVPbkContactStoreInfo.h>

#include <CPbk2SortOrderManager.h>

#include <MPbk2ContactNameFormatter.h>

#include <Pbk2ContactNameFormatterFactory.h>

#include <MVPbkContactFieldData.h>

#include <MVPbkContactFieldTextData.h>

#include <Pbk2UIControls.rsg>

#include <VPbkSyncConstants.h>

#include <TVPbkFieldVersitProperty.h>

#include <TVPbkContactStoreUriPtr.h>

#include <MVPbkContactFieldDateTimeData.h>

#include <CVPbkFieldTypeSelector.h>

#include <CVPbkContactStoreUri.h>

#include <StringLoader.h>           // StringLoader

#include <aknnotewrappers.h>

#include <Pbk2CommonUi.rsg>

#include "VCardLog.h"

#include <s32file.h> // for RFileReadStream

#include <barsread.h> // for ResourceReader

// user includes

#include "vcardvpbutil.h"

// local constants & enumerations

_LIT(KClassName, "CVCardVpbUtil");

_LIT(KUnnamedText, "Unnamed");

_LIT(KDEFAULT_CNTDB_URI, "cntdb://c:contacts.cdb");

enum TPanicCode

	{

	ENoContactImported,

	EInvalidIndex,

    EPanicPostCond_ReallocBufferL

	};

/// Unnamed namespace for this-file-only helper funtions

namespace {

// Initial size for the conversion buffer

const TInt KBufferLength = 128;

_LIT8(KWvAddressVersitExtensionName, "X-WV-ID");

/**

 * Searches Versit property aArray for field aName.

 */

TBool ContainsFieldType(

        TArray<TVPbkFieldVersitProperty> aArray,

        TVPbkFieldTypeName aName)

    {

    TBool ret = EFalse;

    const TInt size = aArray.Count();

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

        {

        if (aArray[i].Name() == aName)

            {

            ret = ETrue;

            break;

            }

        }

    return ret;

    }

/**

 * Searches Versit property array for a field aName

 * which has aExtensionName.

 */

TBool ContainsFieldTypeAndExtensionName(

        TArray<TVPbkFieldVersitProperty> aArray,

        TVPbkFieldTypeName aName,

        const TDesC8& aExtensionName)

    {

    TBool ret = EFalse;

    const TInt size = aArray.Count();

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

        {

        if (aArray[i].Name() == aName &&

            aArray[i].ExtensionName().CompareF(aExtensionName) == 0)

            {

            ret = ETrue;

            break;

            }

        }

    return ret;

    }

/**

 * Inspects is number conversion allowed. It is not allowed

 * for certain fields, like for email field.

 */

inline TBool IsNumberConversionAllowed(const MVPbkFieldType& aFieldType)

    {

    TBool ret = ETrue;

    // Perform number conversion if allowed

    if (ContainsFieldType(aFieldType.VersitProperties(), EVPbkVersitNameURL))

        {

        ret = EFalse;

        }

    else if (ContainsFieldType(aFieldType.VersitProperties(), EVPbkVersitNameEMAIL))

        {

        ret = EFalse;

        }

    // search for the X-WV-ID field

    else if (ContainsFieldTypeAndExtensionName(

        aFieldType.VersitProperties(), EVPbkVersitNameX, KWvAddressVersitExtensionName))

        {

        ret = EFalse;

        }

    return ret;

    }

} // namespace

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

CVCardVpbUtil* CVCardVpbUtil::NewL()

    {

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

    CleanupStack::PushL( self );

    self->ConstructL();

    CleanupStack::Pop( self );

    return self;

    }

CVCardVpbUtil::~CVCardVpbUtil()

	{

    delete iAvailableUris;

	iContactsToShow.ResetAndDestroy();

	iContactsToStore.ResetAndDestroy();

	if ( iDefaultContactStore )

        {

        iDefaultContactStore->Close( *this );

        }

    if ( iShowContactStore )

        {

        iShowContactStore->Close( *this );

        }

    if(iStoreList)

        {

        iStoreList->CloseAll( *this );

        }

    delete iContactManager;

    delete iVCardEngine;

    delete iBuffer;

	}

void CVCardVpbUtil::ImportVCardL( TVCardBCBusinessCardType aVCardType, RFile aFileHandle )

	{

	RFileReadStream stream;

	stream.Attach( aFileHandle );

    CleanupClosePushL( stream );

	iVCardType = aVCardType;

    //import is done to both store at this point as the fileHandle is not

    //accessible later

	VCardToPhoneStoreL( stream );

	VCardToDefaultStoreL( stream );

	CleanupStack::Pop(); //stream

	//were done with stream as the data has been imported

	//this will also close the fileHandle

	stream.Release();

	stream.Close();

	}

TBool CVCardVpbUtil::CommitVCardToStoreL()

	{

	MVPbkContactOperationBase* ope( NULL );	

	if( DefaultStoreSupportsAllFieldsL()&& !StoreFullL() )

		{

		ope =

        	iContactManager->CommitContactsL( iContactsToStore.Array(), *this );

		}

	else

		{

		//dialog to ask user if contact data is to be stored to phone memory

		//this is the case if the contact data can not be fitted to the

		//default saving store ie. SIM store

		CAknQueryDialog* qDlg = CAknQueryDialog::NewL();

	    if ( qDlg->ExecuteLD( R_VCARD_STORE_QUERY ) )

	    	{

        	ope =

        	iContactManager->CommitContactsL( iContactsToShow.Array(), *this );

	    	}

		}

	if( ope )

		{

		CleanupDeletePushL( ope );

		//the active scheduler needs two iterations

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

        	{

        	StartSchedulerAndDecideToLeaveL();

        	}

        CleanupStack::PopAndDestroy();

    	return ETrue;

		}

	return EFalse;

	}

MVPbkStoreContact* CVCardVpbUtil::ContactData() const

	{

	__ASSERT_DEBUG( iContactsToShow.Count() > 0, Panic( ENoContactImported ) );

	return iContactsToShow[0];

	}

TBool CVCardVpbUtil::IsContactItemEmpty()

	{

	const MVPbkStoreContactFieldCollection& fields = ContactData()->Fields();

    TInt count = fields.FieldCount();

    TBool ret( ETrue );

    while( count )

        {

        __ASSERT_DEBUG( count <= fields.FieldCount() && count > 0,

                        Panic( EInvalidIndex ) );

        const MVPbkStoreContactField& field = fields.FieldAt( count - 1 );

        if( !field.FieldData().IsEmpty() )

            {

            ret = EFalse;

            break;

            }

        count--;

        }

    return ret;

	}

void CVCardVpbUtil::OpenComplete()

	{

	//nothing to do

	}

void CVCardVpbUtil::StoreReady( MVPbkContactStore& /*aContactStore*/ )

	{

	if( iRespondToObserverEvent )

	    {

    	iLastError = KErrNone;

        CActiveScheduler::Stop();

	    }

	}

void CVCardVpbUtil::StoreUnavailable(

				MVPbkContactStore& aContactStore,

				TInt /*aReason*/ )

	{

	// Remove the store from the available uri list. This is the case e.g. in when SIM card 

    // is set to be default saving memory and SIM card is not inserted to phone.

    TVPbkContactStoreUriPtr uri = aContactStore.StoreProperties().Uri();

    iAvailableUris->Remove( uri );

	if( iRespondToObserverEvent )

	    {

	    //we do not consider an unavailable store as leaving error situation

	    iLastError = KErrNone;

	    CActiveScheduler::Stop();

	    }

	}

void CVCardVpbUtil::HandleStoreEventL(

                MVPbkContactStore& /*aContactStore*/,

                TVPbkContactStoreEvent /*aStoreEvent*/ )

	{

	if( iRespondToObserverEvent )

	    {

	    CActiveScheduler::Stop();

	    }

	}

void CVCardVpbUtil::VPbkSingleContactOperationComplete(

                MVPbkContactOperationBase& /*aOperation*/,

                MVPbkStoreContact* /*aContact*/ )

	{

	if( iRespondToObserverEvent )

	    {

	    CActiveScheduler::Stop();

	    }

	}

void CVCardVpbUtil::VPbkSingleContactOperationFailed(

                MVPbkContactOperationBase& /*aOperation*/,

                TInt aError )

	{

	if( iRespondToObserverEvent )

	    {

	    iLastError = aError;

	    CActiveScheduler::Stop();

	    }

	}

void CVCardVpbUtil::StepComplete(

							MVPbkContactOperationBase& /*aOperation*/,

                            TInt /*aStepSize*/ )

    {

	if( iRespondToObserverEvent )

	    {

        iLastError = KErrNone;

	    }

    }

TBool CVCardVpbUtil::StepFailed(

        MVPbkContactOperationBase& /*aOperation*/,

        TInt /*aStepSize*/,

        TInt aError )

    {

	if( iRespondToObserverEvent )

	    {

        iLastError = aError;

        CActiveScheduler::Stop();

        //since we trigger a leave we can also cancel the

        //ongoing operation

        return EFalse;

	    }

    return ETrue;	    

    }

void CVCardVpbUtil::OperationComplete(

						MVPbkContactOperationBase& /*aOperation*/ )

    {

	if( iRespondToObserverEvent )

	    {

        iLastError = KErrNone;

        CActiveScheduler::Stop();

	    }

    }

CVCardVpbUtil::CVCardVpbUtil()

	{

	}

void CVCardVpbUtil::ConstructL()

	{

	CPbk2StoreConfiguration* storeConfiguration = CPbk2StoreConfiguration::NewL();

	CleanupStack::PushL( storeConfiguration );

    iAvailableUris = storeConfiguration->CurrentConfigurationL();

	//if default contact store is not included in uriarray we will add it manually

	//this happens if the store is not enabled in phonebook settings

	TVPbkContactStoreUriPtr defaultCntDbUriPtr( VPbkContactStoreUris::DefaultCntDbUri() );

	if ( !iAvailableUris->IsIncluded( defaultCntDbUriPtr ) )

        {

        iAvailableUris->AppendL( defaultCntDbUriPtr );

        }

	iContactManager = CVPbkContactManager::NewL( *iAvailableUris );

	iStoreList = &iContactManager->ContactStoresL();

	TInt storeCount ( iStoreList->Count() );

	iStoreList->OpenAllL( *this );

	// Every store sends EStoreReady or EOpenError event

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

        {

        StartSchedulerAndDecideToLeaveL();

        }

	iVCardEngine = CVPbkVCardEng::NewL( *iContactManager );

	if ( iAvailableUris->Count() > 0 )

        {

        // It is assumed that phone memory store is always succesfully opened.

        // Default saving memory might not be available. E.g. if it set to SIM and SIM is

        // not inserted to phone.

        TVPbkContactStoreUriPtr defaultsavingstore = storeConfiguration->DefaultSavingStoreL();

        if ( iAvailableUris->IsIncluded( defaultsavingstore ) )

            {

            iDefaultContactStore =

                iContactManager->ContactStoresL().Find( defaultsavingstore );        

            }

        else

            {

            iDefaultContactStore = 

                iContactManager->ContactStoresL().Find( defaultCntDbUriPtr );

            }

        iShowContactStore =

            iContactManager->ContactStoresL().Find( defaultCntDbUriPtr );

        }

    else

        {

        // Even the phone memory store could not be opened. We can leave, since it is impossible

        // to open vCard.

        User::Leave( KErrCouldNotConnect );

        }

    iBuffer = HBufC::NewL(KBufferLength);

    CleanupStack::PopAndDestroy( storeConfiguration );

	}

TBool CVCardVpbUtil::DefaultStoreSupportsAllFieldsL()

	{

	TBool retVal( ETrue );

	TInt shownCount = iContactsToShow[0]->Fields().FieldCount();

	TInt storedCount = iContactsToStore[0]->Fields().FieldCount();

	CPbk2SortOrderManager* sortOrderManager = CPbk2SortOrderManager::NewL( iContactManager->FieldTypes() );

	CleanupStack::PushL( sortOrderManager );

	MPbk2ContactNameFormatter* nameFormatter = Pbk2ContactNameFormatterFactory::CreateL(

            KUnnamedText, iContactManager->FieldTypes(),

            *sortOrderManager );

    CleanupStack::PushL( nameFormatter );

	TInt shownTitleFields( 0 );

	for( TInt counter = 0; counter < shownCount; counter++ )

		{

		const MVPbkBaseContactField& srcField = iContactsToShow[0]->Fields().FieldAt( counter );

		const MVPbkFieldType* fieldType = srcField.BestMatchingFieldType();

		if( nameFormatter->IsTitleFieldType( *fieldType ) )

			shownTitleFields++;

		}

	TInt storedTitleFields( 0 );

	for( TInt counter = 0; counter < storedCount; counter++ )

		{

		const MVPbkBaseContactField& srcField = iContactsToStore[0]->Fields().FieldAt( counter );

		const MVPbkFieldType* fieldType = srcField.BestMatchingFieldType();

		if( nameFormatter->IsTitleFieldType( *fieldType ) )

			storedTitleFields++;

		}

    CleanupStack::Pop( 2 );

    delete nameFormatter;

    delete sortOrderManager;

    //check if any of the dropped fields was title field

	if( shownCount - shownTitleFields > storedCount - storedTitleFields )

		retVal = EFalse;

	return retVal;

	}

void CVCardVpbUtil::VCardToPhoneStoreL( RFileReadStream& aStream )

	{

	if( iContactsToShow.Count() > 0 )

		{

		iContactsToShow.ResetAndDestroy();

    	iContactsToShow.Close();

		}

	//always ensure that the read stream is in the beginning

	//of the file

	aStream.Source()->SeekL( MStreamBuf::ERead, EStreamBeginning, 0 );

	MVPbkContactOperationBase* op;

	if( iVCardType == EVCard )

		{

		op = iVCardEngine->ImportVCardL(

				iContactsToShow,

    			*iShowContactStore,

    			aStream,

    			*this);

		}

	else

		{

		op =

    		iVCardEngine->ImportCompactBusinessCardL(

    		                        iContactsToShow,

    								*iShowContactStore,

    								aStream,

    								*this);

		}

    CleanupDeletePushL( op );

    StartSchedulerAndDecideToLeaveL();

    CleanupStack::PopAndDestroy();

	}

void CVCardVpbUtil::VCardToDefaultStoreL( RFileReadStream& aStream )

	{

	if( iContactsToStore.Count() > 0 )

		{

		iContactsToStore.ResetAndDestroy();

    	iContactsToStore.Close();

		}

	//always ensure that the read stream is in the beginning

	//of the file

	aStream.Source()->SeekL( MStreamBuf::ERead, EStreamBeginning, 0 );

	MVPbkContactOperationBase* op;

	if( iVCardType == EVCard )