diff -r 000000000000 -r 8466d47a6819 emailservices/emailstore/preinstall/src/EmailStorePreInstall.cpp
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/emailservices/emailstore/preinstall/src/EmailStorePreInstall.cpp	Thu Dec 17 08:39:21 2009 +0200
@@ -0,0 +1,349 @@
+/*
+* Copyright (c) 2008 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: PreInstall helper class implementation.
+*
+*/
+
+
+
+#include <e32const.h>
+#include "EmailStorePreInstall.h"
+#include "EmailStoreUids.hrh"
+#include "emailstorepskeys.h"
+
+// Timeout for process exit.
+const TInt KProcessTimeout              = 5; //5 seconds
+
+/**
+ * Information about an executable file.
+ */
+class TImsServerInfo
+    {
+public:
+    /** Server name. */
+    TFileName iServerName;
+    
+    /** Server SecureID, usually UID3. */
+    TUint32 iServerSid;
+    };
+
+/**
+ * List of servers to be stopped, in order.
+ * Usually, the one with least dependencies is the last.
+ */
+const TImsServerInfo serverList[] =
+    {
+    { _L("MESSAGESTOREEXE*"), KUidMessageStoreExe },
+    { _L(""), 0 }  // end of array, DO NOT remove.
+    };
+
+
+/**********************************
+ * Method: NewL
+ **********************************/
+CEmailStorePreInstall* CEmailStorePreInstall::NewL()
+    {
+    CEmailStorePreInstall* self = CEmailStorePreInstall::NewLC();
+    CleanupStack::Pop(self);
+    return self;
+    }
+
+/**********************************
+ * Method: NewL
+ **********************************/
+CEmailStorePreInstall* CEmailStorePreInstall::NewLC()
+    {
+    CEmailStorePreInstall* self = new(ELeave) CEmailStorePreInstall();
+    CleanupStack::PushL(self);
+    self->ConstructL();
+    return self;
+    }
+
+/**********************************
+ * Method: Constructor
+ **********************************/
+CEmailStorePreInstall::CEmailStorePreInstall()
+  : CTimer(EPriorityHigh), iServerIndex(0), iState( EInit )
+    {
+    __LOG_CONSTRUCT( "IMS", "CEmailStorePreInstall" )
+    }
+
+
+/**********************************
+ * Method: ConstructL
+ **********************************/
+void CEmailStorePreInstall::ConstructL()
+    {
+    __LOG_ENTER("ConstructL")
+    
+    // Construct base
+    CTimer::ConstructL();
+    
+    // Define upgrade property.        
+    // Define security rights
+    TSecurityPolicy readPolicy( ECapabilityReadDeviceData );
+    TSecurityPolicy writePolicy( ECapabilityWriteDeviceData );
+    TInt err = RProperty::Define( KEmailStoreUpgradePSCategory, 
+                                  KProperty_EmailStore_Upgrade, 
+                                  RProperty::EInt, 
+                                  readPolicy, 
+                                  writePolicy );
+    
+    if ( KErrNone != err && KErrAlreadyExists != err )
+        {
+        User::Leave( err );
+        }
+
+    // We are an AO
+    CActiveScheduler::Add(this);
+
+    // Need timeout for closing a process
+    iTimeoutTimer = CProcessTimer::NewL(*this);
+    
+    // Start right away
+    CTimer::After( 0 );
+    __LOG_EXIT
+    }
+
+/**********************************
+ * Method: Destructor
+ **********************************/
+CEmailStorePreInstall::~CEmailStorePreInstall()
+    {
+    __LOG_ENTER( "Destructor" )
+    __LOG_WRITE_INFO( "EmailStore PreInstall.exe is exiting..." )
+    
+    // Stop AO activity
+    Cancel();
+    
+    // If any logon on process
+    delete iTimeoutTimer;
+    iProcess.Close();
+    
+    // Delete upgrade property.
+    RProperty::Delete( KEmailStoreUpgradePSCategory, KProperty_EmailStore_Upgrade );
+    
+    __LOG_EXIT
+    __LOG_DESTRUCT
+    }
+    	
+/**********************************
+ * Method: RunL
+ **********************************/
+void CEmailStorePreInstall::RunL()
+    {
+    __LOG_ENTER("RunL")
+    __LOG_WRITE_FORMAT1_INFO( "iStatus=%d", iStatus.Int() )
+    __LOG_WRITE_FORMAT1_INFO( "iState=%d", iState )
+
+    if ( KErrNone == iStatus.Int() )
+    {
+        switch( iState )
+        {
+            case EInit:
+                {    
+                iServerIndex = 0;
+                iState = EStopServers;
+                After( 0 );
+                }
+                break;
+                
+            case EStopServers:
+                {
+                StopNextServerL();
+                }
+                break;
+            
+            case EWaitForProcess:
+                {                
+                ++iServerIndex;
+                iState = EStopServers;
+                __LOG_WRITE_INFO( "Stoping Timeout Timer" );
+                iTimeoutTimer->Cancel();
+                StopNextServerL();
+                }
+                break;
+                
+            case EDone:
+                {
+                // Clear upgrade property.
+                RProperty::Set( KEmailStoreUpgradePSCategory, 
+                                KProperty_EmailStore_Upgrade, 
+                                0 );
+                            
+                __LOG_WRITE_INFO( "PreInstall done, Calling CActiveScheduler::Stop()" )
+                CActiveScheduler::Stop();
+                }
+                break;
+        }
+    }
+    else
+        {
+        if ( EWaitForProcess == iState && KErrCancel != iStatus.Int() )
+                {
+                ++iServerIndex;
+                iState = EStopServers;
+                __LOG_WRITE_INFO( "Stoping Timeout Timer" );
+                iTimeoutTimer->Cancel();                          
+                StopNextServerL();
+                }
+        else
+            {
+            // Clear upgrade property.
+            RProperty::Set( KEmailStoreUpgradePSCategory, 
+                            KProperty_EmailStore_Upgrade, 
+                            0 );
+
+            __LOG_WRITE_INFO( "PreInstall done due to errors, Calling CActiveScheduler::Stop()" )
+            CActiveScheduler::Stop();
+            }
+        }
+    
+    __LOG_EXIT;
+    }
+
+/**********************************
+ * Method: DoCancel
+ **********************************/
+void CEmailStorePreInstall::DoCancel()
+    {
+    // If we are waiting for a process to close?
+    if ( EWaitForProcess == iState )
+        {
+        iTimeoutTimer->Cancel();
+        iProcess.LogonCancel( iStatus );
+        }
+    else
+        {
+        CTimer::Cancel();
+        }
+    
+    // Clear upgrade property.
+    RProperty::Set( KEmailStoreUpgradePSCategory, 
+                    KProperty_EmailStore_Upgrade, 
+                    0 );
+
+    iState = EDone;
+    // Should we do what EDone state is supposed to do?
+    //CActiveScheduler::Stop();
+    }
+
+/**********************************
+ * Method: RunError
+ **********************************/
+TInt CEmailStorePreInstall::RunError( TInt __LOG_BLOCK(aError) )
+    {
+    __LOG_ENTER( "RunError" )
+    __LOG_WRITE_FORMAT1_INFO( "err=%d", aError )
+    __LOG_EXIT
+    return KErrNone;
+    }
+
+void CEmailStorePreInstall::StopNextServerL()
+    {
+    __LOG_ENTER( "StopNextServerL" )
+    
+    while ( serverList[iServerIndex].iServerSid != 0 )
+        {
+        // Notify upgrade regardless of the server running state.
+        RProperty::Set( KEmailStoreUpgradePSCategory, 
+                        KProperty_EmailStore_Upgrade, 
+                        static_cast<TInt>( serverList[iServerIndex].iServerSid ) );
+
+        // Verify if the process is running
+        TFindProcess findProcess;
+        findProcess.Find( serverList[iServerIndex].iServerName );
+        TFullName fullProcessName;
+        if ( KErrNone == findProcess.Next( fullProcessName ) )
+            {
+            // Process is running
+            __LOG_WRITE_FORMAT1_INFO( "Running Process - %S", &fullProcessName )
+            iProcess.Close();
+
+            if ( KErrNone == iProcess.Open( findProcess ) )
+                {                
+                iProcess.Logon( iStatus );
+                __LOG_BLOCK( TFileName processName = iProcess.FullName(); )
+                __LOG_WRITE_FORMAT1_INFO( "Starting Timeout Timer for: %S", &processName )
+                iTimeoutTimer->StartTimeoutTimer( KProcessTimeout );
+                SetActive();
+                iState = EWaitForProcess;
+                break;
+                }
+            else
+                {
+                // Move to next one.
+                ++iServerIndex;
+                }
+            }
+        else
+            {
+            // Move to next one.
+            ++iServerIndex;
+            }
+        }
+    
+    if ( serverList[iServerIndex].iServerSid == 0 )
+        {
+        iState = EDone;
+        After( 0 );
+        }
+    
+    __LOG_EXIT
+    }
+
+void CEmailStorePreInstall::Timeout()
+    {
+    // Cancel notifications
+    iProcess.LogonCancel( iStatus );
+    
+    // Kill this process
+    iProcess.Kill( KErrNone );
+    
+    // Stop next server
+    ++iServerIndex;
+    iState = EStopServers;    
+    }
+
+LOCAL_C void DoPreInstallL() 
+    {   
+    // Construct and install the active scheduler
+    CActiveScheduler* scheduler = new ( ELeave ) CActiveScheduler;
+    CleanupStack::PushL( scheduler );
+    CActiveScheduler::Install( scheduler ); 
+        
+    CEmailStorePreInstall::NewLC();
+    
+    CActiveScheduler::Start();
+    
+    CleanupStack::PopAndDestroy( 2 );  // CEmailStorePreInstall, scheduler
+    } // DoPostInstallL
+
+
+GLDEF_C TInt E32Main()
+    {
+    __UHEAP_MARK;
+    
+    CTrapCleanup* cleanup=CTrapCleanup::New(); // get clean-up stack
+    
+    TRAP_IGNORE( DoPreInstallL() ); 
+    
+    delete cleanup; // destroy clean-up stack
+    
+    __UHEAP_MARKEND;
+    
+    return 0; 
+    } // end E32Main
+
+