/*

* Copyright (c) 2002-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:   Dialog showing all email MTMs

*

*/

// INCLUDE FILES

#include <coemain.h> 

#include <aknnotewrappers.h> 

#include <eikenv.h>

#include "MceSettingsEmailSel.h"

#include <MceSettingsEmailSel.rsg>

#include <MceSettings.rsg>

#include <ConeResLoader.h>

#include <data_caging_path_literals.hrh>

#include <msvstd.h> 

#include <msvapi.h>

#include <msvids.h>

#include <StringLoader.h>

#include <centralrepository.h>

#include <MessagingDomainCRKeys.h>

#include <mtmuids.h>

#include <mtudcbas.h>

#include <mtmuibas.h>			

#include <SendUiConsts.h>

#include <bautils.h>

#include <MtmExtendedCapabilities.hrh>

#include <MuiuMsvUiServiceUtilities.h>

#include <mtudreg.h>

#include <miutset.h>

#include <ImumInternalApi.h>

#include <ImumInHealthServices.h>

#include <muiuflags.h>

#include <muiuemailtools.h>

#include <featmgr.h>

const TInt KArrayGranularity = 3;

const TInt KCapabilitiesUnset = -1;

_LIT( KMceEmailSelResourceFileName,

	  "\\resource\\MceSettingsEmailSel.rsc" );

#define KUidMsgTypeFsMtmVal               0x2001F406

// EXTERNAL DATA STRUCTURES

// EXTERNAL FUNCTION PROTOTYPES  

// CONSTANTS

// MACROS

// LOCAL CONSTANTS AND MACROS

// MODULE DATA STRUCTURES

// LOCAL FUNCTION PROTOTYPES

// FORWARD DECLARATIONS

// ============================= LOCAL FUNCTIONS ===============================

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

// ---------------------------------------------------------

// CSampleApplication::CreateDocumentL

// Create a Sample document, and return a pointer to it.

// ---------------------------------------------------------

//

CMceSettingsEmailSel* CMceSettingsEmailSel::NewL()

    {

    // Create an object, and return a pointer to it

    CMceSettingsEmailSel* self = new (ELeave) CMceSettingsEmailSel;

    CleanupStack::PushL( self );

    self->ConstructL();

    CleanupStack::Pop();

    return self;

    }

// ---------------------------------------------------------

// CMceSettingsEmailSel::ConstructL

// 2nd phase contructor that can leave.

// ---------------------------------------------------------

//

void CMceSettingsEmailSel::ConstructL()

    {

    iMsvSessionPtr = CMsvSession::OpenSyncL( *this );   

    iMtmStore = CMtmStore::NewL( *iMsvSessionPtr );   

    LoadResourceL();      

    iRequiredCapabilities.iFlags = KCapabilitiesUnset;    

    if ( FeatureManager::FeatureSupported( KFeatureIdFfEmailFramework ) )

    {

      iEmailFramework = ETrue;

    } 

    }

// ---------------------------------------------------------

// CMceSettingsEmailSel::CMceSettingsEmailSel

// contructor

// ---------------------------------------------------------

//

CMceSettingsEmailSel::CMceSettingsEmailSel()

		:iEmailFramework(EFalse)

    {

    }        

// ---------------------------------------------------------

// CMceSettingsEmailSel::~CMceSettingsEmailSel

// Destructor

// ---------------------------------------------------------

//

CMceSettingsEmailSel::~CMceSettingsEmailSel()

    {

    if( iMtmStore )

    	{

    	delete iMtmStore;

    	}     

    if( iMsvSessionPtr )

    	{

    	delete iMsvSessionPtr;

    	}  	  

    UnLoadResource();    	 	

    }    

// ---------------------------------------------------------

// CMceSettingsEmailSel::LoadResourceL

// Load the resource for the dll module

// ---------------------------------------------------------

//

void CMceSettingsEmailSel::LoadResourceL()

    {

    TFileName resourceFileNameBuf( KMceEmailSelResourceFileName );

    CEikonEnv* eikEnv = CEikonEnv::Static();

    BaflUtils::NearestLanguageFile( eikEnv->FsSession(),

    		                        resourceFileNameBuf );

    iResourceOffset = eikEnv->AddResourceFileL( resourceFileNameBuf );

    }    

// ---------------------------------------------------------

// CMceSettingsEmailSel::UnLoadResource

// Unload the resource for the dll module

// ---------------------------------------------------------

//

void CMceSettingsEmailSel::UnLoadResource()

    {

    CEikonEnv* eikEnv = CEikonEnv::Static();

    eikEnv->DeleteResourceFile( iResourceOffset );

    }

// ---------------------------------------------------------

// CMceSettingsEmailSel::HandleSessionEventL

// From MMsvSessionObserver

// ---------------------------------------------------------

//    

void CMceSettingsEmailSel::HandleSessionEventL(

    TMsvSessionEvent /*aEvent*/, TAny* /*aArg1*/,

    TAny* /*aArg2*/, TAny* /*aArg3*/ )

	{	

	}

// ---------------------------------------------------------

// CMceSettingsEmailSel::ShowEmailSelectDlgL

// 

// ---------------------------------------------------------

//    

EXPORT_C TBool CMceSettingsEmailSel::ShowSelectEmailDlgL(

    TMsvId& aSelectedService, TUid& aMtmType,

    TSendingCapabilities aRequiredCapabilities )

	{		

	CMceSettingsEmailSel* dlg = CMceSettingsEmailSel::NewL();

	CleanupStack::PushL( dlg );

	TBool retVal = dlg->ShowSelectDlgL(

			             aSelectedService, aMtmType, aRequiredCapabilities );

	CleanupStack::PopAndDestroy( dlg );

	return retVal;	

	}

// ---------------------------------------------------------

// CMceSettingsEmailSel::ShowSelectDlgL

// 

// ---------------------------------------------------------

//    	

TBool CMceSettingsEmailSel::ShowSelectDlgL(

                                           TMsvId& aSelectedService, TUid& aMtmType, 

                                           TSendingCapabilities aRequiredCapabilities )

    {

    iRequiredCapabilities = aRequiredCapabilities;

    // List items for list query.

    CDesCArrayFlat* listItems = new (ELeave) CDesCArrayFlat(

                                KArrayGranularity );

    CleanupStack::PushL( listItems );

    // This array is used to map user selection to correct service.

    CArrayFix<TUid>* listItemUids = 

        new ( ELeave ) CArrayFixFlat<TUid>( KArrayGranularity );

    CleanupStack::PushL( listItemUids );

    // Get and filter available MTM services supporting attachments.

    FilterEmailServicesL( *listItems, *listItemUids );

    //Check if Cmail is enabled

    if(iEmailFramework)

         {

         return ShowCmailSelectDlgL(aSelectedService, aMtmType,listItems, listItemUids );

         }

    // no accounts defined, nothing to show

    if ( 0 == listItems->Count() )

        {

        CleanupStack::PopAndDestroy( listItemUids );

        CleanupStack::PopAndDestroy( listItems );

        aSelectedService = KMsvUnknownServiceIndexEntryId;

        return ETrue;

        }

    // only one account, selection dialog not shown

    if( listItems->Count() == 1 )

        {

        aSelectedService = (*listItemUids)[0].iUid;

        TMsvEntry entry;

        TMsvId serviceId;

        User::LeaveIfError( iMsvSessionPtr->GetEntry(

                (*listItemUids)[0].iUid, serviceId, entry ) );

        if ( entry.iMtm == KSenduiMtmPop3Uid ||

             entry.iMtm == KSenduiMtmImap4Uid )

            {

            aMtmType = KSenduiMtmSmtpUid;

            aSelectedService = entry.iRelatedId; // related = SMTP

            }

        else

            {

            aMtmType = entry.iMtm;

            }		

        CleanupStack::PopAndDestroy( listItemUids );

        CleanupStack::PopAndDestroy( listItems );

        return ETrue;		

        }

    // Show list query.

    TInt choice = KErrNotFound;

    CAknListQueryDialog* dlg = new (ELeave) CAknListQueryDialog( &choice );

    dlg->PrepareLC( R_SEND_EMAIL_LIST_QUERY );

    dlg->SetItemTextArray( listItems );

    dlg->SetOwnershipType( ELbmDoesNotOwnItemArray );

    if ( !dlg->RunLD() )

        {

        // Cancel        

        CleanupStack::PopAndDestroy( listItemUids );

        CleanupStack::PopAndDestroy( listItems );

        return EFalse;

        }

    aSelectedService = (*listItemUids)[choice].iUid;

    TMsvEntry entry;

    TMsvId serviceId;

    User::LeaveIfError( iMsvSessionPtr->GetEntry(

            aSelectedService, serviceId, entry ) );

    if ( entry.iMtm == KSenduiMtmPop3Uid ||

         entry.iMtm == KSenduiMtmImap4Uid )

        {

        aMtmType = KSenduiMtmSmtpUid;

        aSelectedService = entry.iRelatedId; // related = SMTP

        }

    else

        {

        aMtmType = entry.iMtm;

        }

    CleanupStack::PopAndDestroy( listItemUids );

    CleanupStack::PopAndDestroy( listItems );

    return ETrue;	 

    }

// ---------------------------------------------------------

// CMceSettingsEmailSel::ShowCmailSelectDlgL

// 

// ---------------------------------------------------------

//  

TBool CMceSettingsEmailSel::ShowCmailSelectDlgL(TMsvId& aSelectedService, 

                            TUid& aMtmType,

                            CDesCArrayFlat*         aListItems,

                            CArrayFix<TUid>*        aListItemUids)

    {

    TBool retval = EFalse;

    //Add the non cmail boxes at the end of cmail list 

    for(int cnt = 0; cnt < aListItems->Count(); cnt++  )

        {

        iCmaillistItems->AppendL(aListItems->MdcaPoint(cnt));

        iCmaillistItemUids->AppendL(aListItemUids->At(cnt));

        }

    // no accounts defined, nothing to show

    if ( 0 == iCmaillistItems->Count() )

        {

        aSelectedService = KMsvUnknownServiceIndexEntryId;

        retval =  ETrue;

        }

    // only one account, selection dialog not shown

    if( iCmaillistItems->Count() == 1 && !retval )

        {

        aSelectedService = (*iCmaillistItemUids)[0].iUid;

        TMsvEntry entry;

        TMsvId serviceId;

        User::LeaveIfError( iMsvSessionPtr->GetEntry(

                (*iCmaillistItemUids)[0].iUid, serviceId, entry ) );

        if ( entry.iMtm == KSenduiMtmPop3Uid ||

             entry.iMtm == KSenduiMtmImap4Uid )

            {

            aMtmType = KSenduiMtmSmtpUid;

            aSelectedService = entry.iRelatedId; // related = SMTP

            }

        else

            {

            aMtmType = entry.iMtm;

            }       

        retval = ETrue;       

        }

    TBool cancel = EFalse;

    if( !retval )

        {

        // Show list query.

        TInt choice = KErrNotFound;

        CAknListQueryDialog* dlg = new (ELeave) CAknListQueryDialog( &choice );

        dlg->PrepareLC( R_SEND_EMAIL_LIST_QUERY );

        dlg->SetItemTextArray( iCmaillistItems );

        dlg->SetOwnershipType( ELbmDoesNotOwnItemArray );

        if ( !dlg->RunLD() )

            {

            // Cancel      

            cancel = ETrue;

            //retval = EFalse;

            }

        if(!cancel)

            {

            aSelectedService = (*iCmaillistItemUids)[choice].iUid;

            TMsvEntry entry;

            TMsvId serviceId;

            User::LeaveIfError( iMsvSessionPtr->GetEntry(

                    aSelectedService, serviceId, entry ) );

            aMtmType = entry.iMtm;

            }

        }

    delete iCmaillistItemUids;

    iCmaillistItemUids  = NULL;

    delete iCmaillistItems;

    iCmaillistItems = NULL;;

    CleanupStack::PopAndDestroy( aListItemUids );

    CleanupStack::PopAndDestroy( aListItems );

    if(cancel)

        return EFalse;

    else

        return ETrue;   

    }

// ---------------------------------------------------------

// TPtrC8Ident

// Hash Table Function 

// ---------------------------------------------------------

//

TBool TPtrC8Ident(const TPtrC16& aL, const TPtrC16& aR)

     {

     return DefaultIdentity::Des16(aL, aR);

     }

// ---------------------------------------------------------

// TPtrC8Hash

// Hash Table Function 

// ---------------------------------------------------------

//

TUint32 TPtrC8Hash(const TPtrC16& aPtr)

     {

     return DefaultHash::Des16(aPtr);

     }

// ---------------------------------------------------------

// CMceSettingsEmailSel::FilterEmailServicesL

// 

// ---------------------------------------------------------

//    

void CMceSettingsEmailSel::FilterEmailServicesL(

    CDesCArrayFlat&         aListItems,

    CArrayFix<TUid>&        aListItemUids )

    {

    iDefaultIndex = -1;    

    TInt keyValue;

    CRepository* repository = NULL;

    TRAPD( ret, repository = CRepository::NewL( KCRUidSelectableDefaultEmailSettings   ) );

    if ( ret == KErrNone )

        {

        if ( repository->Get( KSelectableDefaultMailAccount  , keyValue ) != KErrNone )

            {

            iDefaultIndex = -1;

            }

        // Check if there is other than platform email application registered

        // to handle S60 mailboxes	

        TInt err = repository->Get( KIntegratedEmailAppMtmPluginId  ,

                                    iMtmPluginID );

        if ( err != KErrNone )

            {

            iMtmPluginID = 0;

            }

        }

    delete repository;

    // fetch email mtms

    CMsvEntry* entry = iMsvSessionPtr->GetEntryL( KMsvRootIndexEntryId );

    CleanupStack::PushL( entry );

    TInt cnt = entry->Count();

    // Add default item first

    if(!iEmailFramework)

      {

      entry->SetSortTypeL( TMsvSelectionOrdering(

                              KMsvGroupByType | KMsvGroupByStandardFolders,

                              EMsvSortByDetailsReverse, ETrue ) );

      for ( TInt cc = entry->Count(); --cc >= 0; )

          {

          iTentryDef = (*entry)[cc];

            if(!IsMailBoxHealthyL(iTentryDef))

               {

               continue;

               }

            if ( iTentryDef.iType.iUid == KUidMsvServiceEntryValue &&

                    iTentryDef.Id() != KMsvLocalServiceIndexEntryIdValue )

                {

                const TBool noRelatedId =

                iTentryDef.iRelatedId == KMsvNullIndexEntryId ||

                iTentryDef.iRelatedId == iTentryDef.Id();

                if ( IsEmailEntryL(iTentryDef)  &&

                     ( ( iTentryDef.Id() == keyValue ) ||

                       ( iTentryDef.iRelatedId == keyValue) ) )

                    {

                    TBool append = ETrue;

                    // query capability (attachment)

                    TUid entryUid;

                    entryUid = iTentryDef.iMtm;

                    if ( iTentryDef.iMtm == KSenduiMtmPop3Uid ||

                            iTentryDef.iMtm == KSenduiMtmImap4Uid )

                        {

                        entryUid = KSenduiMtmSmtpUid;

                        }

                    TBool ret = EFalse;

                    TRAPD( err, ret = QueryCapabilitiesAndValidateAccountL(

                    		                                     entryUid ) )

                    if ( ret && ( err == KErrNone ) )

                        {

                        append = ETrue;

                        }

                    else

                        {

                        append = EFalse;

                        }

                    const TInt count = aListItemUids.Count();

                    // Check that related service is not already added to

                    // array

                    for ( TInt loop = 0; loop < count; loop ++ )

                        {

                        if ( iTentryDef.iRelatedId ==

                                                aListItemUids.At(loop).iUid )

                            {

                            append = EFalse;

                            break;

                            }

                        }

                    if( append )

                        {

                        // Add this service if:

                        // it is visible, or,there is no associated related

                        // service, or, we have been asked to list all

                        // services.

                        HBufC* stringholder;

                        stringholder = StringLoader::LoadLC(

                            R_MCE_POPUP_DEFAULT_EMAIL,

                            iTentryDef.iDetails ); //Pushes stringholder onto the

                                               //Cleanup Stack.

                        entryUid.iUid = iTentryDef.Id();

                        aListItems.AppendL( stringholder->Des() );

                        aListItemUids.AppendL( entryUid );

                        iDefaultIndex = cc;

                        CleanupStack::PopAndDestroy( stringholder );

                        iTentryDef = (*entry)[iDefaultIndex];

                        break;

                        }

                    }

                }

            }

        }

    //Add Other Email Boxes    

    AddOtherEmailBoxesL(aListItems, aListItemUids, entry);    

    if(iEmailFramework)

        {