--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/satengine/SatServer/SatClient/src/RSatSession.cpp	Tue Feb 02 01:11:09 2010 +0200
@@ -0,0 +1,133 @@
+/*
+* Copyright (c) 2002-2007 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:  Session class to connect SatServer.
+*
+*/
+
+
+#include    <RSatSession.h>
+#include    "SatSOpcodes.h"
+#include    "SatServerFactory.h"
+#include    "SatLog.h"
+
+_LIT( KSatSessionMtx, "SATSESSIONMTX" );
+
+// ============================ MEMBER FUNCTIONS ===============================
+
+// -----------------------------------------------------------------------------
+// RSatSession::RSatSession
+// C++ default constructor can NOT contain any code, that
+// might leave.
+// -----------------------------------------------------------------------------
+//
+EXPORT_C RSatSession::RSatSession() :
+    RSessionBase()
+    {
+    LOG( SIMPLE, "SATCLIENT: RSatSession::RSatSession calling-exiting" )
+    }
+
+// -----------------------------------------------------------------------------
+// RSatSession::ConnectL
+// Connects to SatServer.
+// -----------------------------------------------------------------------------
+//
+EXPORT_C void RSatSession::ConnectL()
+    {
+    LOG( SIMPLE, "SATCLIENT: RSatSession::ConnectL calling" )
+    
+    #ifdef ENABLE_SAT_LOGGING
+    RProcess test;
+    LOG2( SIMPLE, 
+    "SATCLIENT: RSatSession::ConnectL UID of calling process: 0x%x",
+    test.SecureId().iId )
+    test.Close();
+    #endif
+
+    RMutex sessionStartMutex;
+    TInt createErr( sessionStartMutex.CreateGlobal( KSatSessionMtx ) );
+    if ( createErr )
+        {
+        TInt openErr( sessionStartMutex.OpenGlobal( KSatSessionMtx ) );
+        User::LeaveIfError( openErr );
+        LOG( SIMPLE, "SATCLIENT:   Opened SATSESSIONMTX" )
+        }
+
+    LOG( SIMPLE, "SATCLIENT:   Asking ownership of SATSESSIONMTX" )
+    sessionStartMutex.Wait();
+    LOG( SIMPLE, "SATCLIENT:   Got ownership of SATSESSIONMTX" )
+
+    // Create new session for SatServer.
+    TInt error( CreateSession( KSatServerName, Version(), KSatMessageSlots ) );
+
+    // Server may not be fully started, so let's retry after synchronization.
+    if ( KErrNone != error )
+        {
+        LOG2( SIMPLE,
+              "SATCLIENT: RSatSession::ConnectL CreateSession %d", error )
+
+        // Starts a new process, loading SAT Server.
+        TBuf<1> arguments;
+        RProcess satProcess;
+
+        if ( KErrNone == satProcess.Create( KSatServerNameAndPath, arguments ) )
+            {
+            TRequestStatus rendezvousStatus;
+
+            satProcess.Rendezvous( rendezvousStatus );
+            satProcess.Resume();
+            User::WaitForRequest( rendezvousStatus );
+            LOG2( SIMPLE,
+                  "SATCLIENT: RSatSession::ConnectL Rendezvous %d",
+                   rendezvousStatus.Int() )
+            satProcess.Close();
+            }
+
+        // Retry session creation.
+        error = CreateSession( KSatServerName,
+                               Version(), KSatMessageSlots );
+        LOG2( DETAILED,
+              "SATCLIENT: RSatSession::ConnectL CreateSession %d",
+              error )
+        }
+
+    LOG( SIMPLE, "SATCLIENT:   Releasing ownership of SATSESSIONMTX" )
+    sessionStartMutex.Signal();
+    sessionStartMutex.Close();
+    User::LeaveIfError( error );
+
+    LOG( SIMPLE, "SATCLIENT: RSatSession::ConnectL exiting" )
+    }
+
+// -----------------------------------------------------------------------------
+// RSatSession::Version
+// Returns the version of this API.
+// -----------------------------------------------------------------------------
+//
+EXPORT_C TVersion RSatSession::Version() const
+    {
+    LOG( SIMPLE, "SATCLIENT: RSatSession::Version calling-exiting" )
+    
+    #ifdef ENABLE_SAT_LOGGING
+    RProcess test;
+    LOG2( SIMPLE, 
+    "SATCLIENT: RSatSession::Version UID of calling process: 0x%x",
+    test.SecureId().iId )
+    test.Close();
+    #endif
+    
+    return TVersion(
+        KSatServerMajorVersionNumber,
+        KSatServerMinorVersionNumber,
+        KSatServerBuildVersionNumber );
+    }