void CTestUTCSort::CreateServiceAndAccountL() { CEmailAccounts* accounts = CEmailAccounts::NewL(); CleanupStack::PushL(accounts); CImSmtpSettings* settings=new(ELeave) CImSmtpSettings(); CleanupStack::PushL(settings); CImIAPPreferences* smtpIAP = CImIAPPreferences::NewLC(); TSmtpAccount smtpAccountId=accounts->CreateSmtpAccountL(_L("SMTP"),*settings, *smtpIAP, EFalse); CleanupStack::PopAndDestroy(smtpIAP); CleanupStack::PopAndDestroy(settings); CleanupStack::PopAndDestroy(accounts); }
void CMtfTestActionCreatePop3Service::ExecuteActionL() { TestCase().INFO_PRINTF2(_L("Test Action %S start..."), &KTestActionCreatePop3Service); // need to create an account in the central repository and make it the default account HBufC* paramAccountName = ObtainParameterReferenceL<HBufC>( TestCase(),ActionParameters().Parameter(6) ); HBufC* settingsFile = ObtainParameterReferenceL<HBufC>( TestCase(),ActionParameters().Parameter(7) ); CEmailAccounts *emailAccounts = CEmailAccounts::NewLC(); CImIAPPreferences *smtpPrefs = CImIAPPreferences::NewLC(); CImSmtpSettings *smtpSettings = new (ELeave) CImSmtpSettings; CleanupStack::PushL(smtpSettings); CImIAPPreferences *popPrefs = CImIAPPreferences::NewLC(); CImPop3Settings *popSettings = new (ELeave) CImPop3Settings; CleanupStack::PushL(popSettings); emailAccounts->PopulateDefaultPopSettingsL(*popSettings, *popPrefs); emailAccounts->PopulateDefaultSmtpSettingsL(*smtpSettings, *smtpPrefs ); if( settingsFile->Compare( _L("none") ) != 0 ) { CMtfTestActionUtilsPopScripts::ReadPopSettingsFromConfigurationFileL( TestCase(), settingsFile->Des(), *popSettings, *popPrefs, *smtpSettings, *smtpPrefs); } TPopAccount popAccount = emailAccounts->CreatePopAccountL(paramAccountName->Des(), *popSettings, *popPrefs, EFalse); TSmtpAccount smtpAccount = emailAccounts->CreateSmtpAccountL(popAccount, *smtpSettings, *smtpPrefs, EFalse); emailAccounts->SetDefaultSmtpAccountL(smtpAccount); // need to obtain the service id from the account details and save this as the service id TMsvId paramServiceId = popAccount.iPopService; CleanupStack::PopAndDestroy(5, emailAccounts); // popSettings, popPrefs, smtpSettings, smtpPrefs, emailAccounts StoreParameterL<TMsvId>( TestCase(),paramServiceId, ActionParameters().Parameter(8) ); TestCase().INFO_PRINTF2(_L("Test Action %S completed."), &KTestActionCreatePop3Service); TestCase().ActionCompletedL(*this); }