/*

* 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:  Implementation of SysLangUtil class.

*

*/

#include <s32file.h>

#include <centralrepository.h>

#include "syslangutil.h"

#include "syslangutiltrace.h"

#include "ssmmapperutilitystatic.h"

#include "syslangutilprivatecrkeys.h"

const TInt KReadBufSize = 10;

// R&D support: Use language file in Starters internal directory for module

// testing purposes.

#ifdef __STARTER_MODULE_TEST_SUPPORT__

  _LIT( KLanguagesIni, "C:\\private\\100059C9\\languages.txt" );

#else // __STARTER_MODULE_TEST_SUPPORT__

  _LIT( KLanguagesIni, "z:\\resource\\bootdata\\languages.txt" );

#endif // __STARTER_MODULE_TEST_SUPPORT__

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

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

// SysLangUtil::IsValidLanguage

//

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

//

EXPORT_C TBool SysLangUtil::IsValidLanguage(

    const TInt& aLanguage,

    RFs* aFileServerSession )

    {

    API_FUNC_ENTRY_TRACE;

    TBool hadFS;

    TInt err;

    aFileServerSession = CheckFS( aFileServerSession, hadFS, err );

    if ( err )

        {

        return EFalse;

        }

    RFile file;

    err = file.Open(

        *aFileServerSession,

        KLanguagesIni,

        EFileStream | EFileRead | EFileShareReadersOnly );

    if ( !err )

        {

        // Prepare Reader

        TFileText reader;

        reader.Set(file);

        if ( reader.Seek(ESeekStart) )

            {

            file.Close();

            if ( !hadFS )

                {

                aFileServerSession->Close();

                delete aFileServerSession;

                aFileServerSession = NULL;

                }

            return EFalse;

            }

        TBuf<KReadBufSize> readBuf;

        err = EFalse; // This solution is not very elegant but saves ROM :)

        while ( !reader.Read( readBuf ) && readBuf.Length() )

            {

            if ( readBuf.Length() > 1 )

                {

                TLex lex( readBuf );

                lex.SkipSpace();

                TInt language;

                err = lex.Val( language );

                if ( language == aLanguage )

                    {

                     err = ETrue;

                     break;

                    }

                }

            }

        file.Close();

        }

    else

        {

        err = EFalse;

        ERROR_TRACE_1( "ERROR: file '%S' is missing", &KLanguagesIni );

        }

    if ( !hadFS )

        {

        aFileServerSession->Close();

        delete aFileServerSession;

        aFileServerSession = NULL;

        }

    FUNC_EXIT_RET_TRACE( err );

    return err;

    }

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

// SysLangUtil::GetDefaultLanguage

//

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

//

EXPORT_C TInt SysLangUtil::GetDefaultLanguage(

    TInt& aLanguage,

    RFs* aFileServerSession )

    {

    API_FUNC_ENTRY_TRACE;

    TBool hadFS;

    TInt err;

    aFileServerSession = CheckFS( aFileServerSession, hadFS, err );

    if ( err )

        {

        return err;

        }

    RFile file;

    err = file.Open(

        *aFileServerSession,

        KLanguagesIni,

        EFileStream | EFileRead | EFileShareReadersOnly );

    if ( !err )

        {

        // Prepare Reader

        TFileText reader;

        reader.Set(file);

        err = reader.Seek( ESeekStart );

        if ( !err )

            {

            TBuf<KReadBufSize> readBuf;

            while ( !reader.Read( readBuf ) && readBuf.Length() )

                {

                if ( readBuf.Locate('d') != KErrNotFound )

                   {

                        TLex lex( readBuf );

                        lex.SkipSpace();

                        err = lex.Val( aLanguage );

                        break;

                   }

                readBuf.Zero();

                }

            if ( !readBuf.Length() )

                {

                ERROR_TRACE_1( "ERROR: file '%S' is missing", &KLanguagesIni );

                file.Close();

                return KErrNotFound;

                }

            }

        file.Close();

        }

    if ( !hadFS )

        {

        aFileServerSession->Close();

        delete aFileServerSession;

        aFileServerSession = NULL;

        }

    FUNC_EXIT_RET_TRACE( err );

    return err;

    }

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

// SysLangUtil::GetInstalledLanguages

//

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

//

EXPORT_C TInt SysLangUtil::GetInstalledLanguages(

    CArrayFixFlat<TInt>*& aLanguages,

    RFs* aFileServerSession )

    {

    API_FUNC_ENTRY_TRACE;

    if ( aLanguages )

        {

        delete aLanguages;

        }

    aLanguages = new CArrayFixFlat<TInt>( KLangArraySize );

    if ( !aLanguages )

        {

        return KErrNoMemory;

        }

    TBool hadFS;

    TInt err;

    aFileServerSession = CheckFS( aFileServerSession, hadFS, err );

    if ( err )

        {

        return err;

        }

    RFile file;

    err = file.Open(

        *aFileServerSession,

        KLanguagesIni,

        EFileStream | EFileRead | EFileShareReadersOnly );

    if ( !err )

        {

        // Prepare Reader

        TFileText reader;

        reader.Set( file );

        err = reader.Seek( ESeekStart );

        if ( !err )

            {

            TBuf<KReadBufSize> readBuf;

            for ( TInt i = 0; !reader.Read( readBuf ) && readBuf.Length(); i++ )

                {

                if ( readBuf.Length() > 0 )

                    {

                    TLex lex( readBuf );

                    lex.SkipSpace();

                    TInt language;

                    err = lex.Val( language );

                    if ( err ) break;

                    // Will not leave if array size (KLangArraySize) not exceeded

                    TRAP( err, aLanguages->AppendL( language ) );

                    err = KErrNone; // Ignore.

                    }

                readBuf.Zero();

                }

            }

        file.Close();

        }

    else

        {

        ERROR_TRACE_1( "ERROR: file '%S' is missing", &KLanguagesIni );

        }

    if ( !hadFS )

        {

        aFileServerSession->Close();

        delete aFileServerSession;

        aFileServerSession = NULL;

        }

    FUNC_EXIT_RET_TRACE( err );

    return err;

    }

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

// SysLangUtil::RestoreSIMLanguage

//

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

//

EXPORT_C TInt SysLangUtil::RestoreSIMLanguage(

    TInt &aLanguage,

    RFs* /*aFileServerSession*/ )

    {

    API_FUNC_ENTRY_TRACE;

    TUid mappedUid = SsmMapperUtility::CrUid( KCRUidSysLangUtil );

    CRepository* repository = NULL;

    TRAPD( errorCode, repository = CRepository::NewL( mappedUid ) );

    if ( errorCode == KErrNone )

        {

        errorCode = repository->Get( KSysLangUtilSimLanguage, aLanguage );

        if ( errorCode != KErrNone )

            {

            ERROR_TRACE_1( "Failed to get value from CentRep, error code %d.", errorCode );

            }

        }

    else

        {

        ERROR_TRACE_1( "Failed to open repository, error code %d.", errorCode );

        }

    delete repository;

    FUNC_EXIT_RET_TRACE( errorCode );

    return errorCode;

    }

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

// SysLangUtil::CheckFS

//

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

//

RFs* SysLangUtil::CheckFS( RFs* aRFs, TBool& aExist, TInt& aErr )

    {

    FUNC_ENTRY_TRACE;

    if ( !aRFs )

        {

        aExist = EFalse;

        aRFs = new RFs;

        if ( aRFs )

            {

            aErr = aRFs->Connect();

            if ( aErr != KErrNone)

                {

                delete aRFs;

                return NULL;

                }

            }

        else

            {

            aErr = KErrNoMemory;

            return NULL;

            }

        }

    else

        {

        // File server session given as argument MUST be already connected

        ASSERT_TRACE( aRFs->Handle() );

        aExist = ETrue;

        }

    aErr = KErrNone;

    FUNC_EXIT_TRACE;

    return aRFs;

    }