/*

* 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    "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 );

    }