/*

* Copyright (c) 2002 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of the License "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:   ?Description

*

*/

// INCLUDE FILES

#include <e32svr.h>

#include <StifParser.h>

#include <f32file.h>

_LIT(LogFileName , "C:\\tsapiloctest.txt") ;

TInt returnCode;

RFile LogFile ;

RFs LogSession ;

#define GETLOCATION 0

#define TRACE 1

void OpenFile()

	{

	LogSession.Connect() ;

	if(LogFile.Open(LogSession ,LogFileName , EFileWrite | EFileShareAny )  == KErrNotFound)

		{

		LogFile.Create(LogSession ,LogFileName , EFileWrite | EFileShareAny ) ;

		}

	TInt End = 0 ;

	LogFile.Seek(ESeekEnd , End) ; 

	}

void CloseFile()

	{

	LogFile.Close() ;

	LogSession.Close() ;

	}

TInt ValidatePosition(TPosition& aPos)

	{

	TReal64 aLatitude  = aPos.Latitude();

	TReal64 aLongitude = aPos.Longitude() ;

	TReal32 aAltitude  = aPos.Altitude() ;

	if( (-90<=aLatitude<=90) && (-180<=aLongitude<=180) && (aAltitude) )

		{

		OpenFile();

		TBuf8<50> buf ;

		TRealFormat format ;

	    //Logging Latitude 

		buf.Num(aLatitude , format) ;

		LogFile.Write(_L8("Latitude = "));

		LogFile.Write(buf) ;

		LogFile.Write(_L8("\n")) ;

		//Logging Longitude

		buf.Num(aLongitude , format); 

		LogFile.Write(_L8("Longitude = "));

		LogFile.Write(buf) ;

		LogFile.Write(_L8("\n")) ;

		//Logging Altitude 

		buf.Num(aAltitude , format) ;

		LogFile.Write(_L8("Altitude = "));

		LogFile.Write(buf) ;

		LogFile.Write(_L8("\n")) ;

		CloseFile();

	    return KErrNone; 

		 }

	 else

		 {

	     OpenFile();

	     LogFile.Write(_L8("Test case failed.."));

		 CloseFile();

		 return KErrGeneral;	

		 }

	}

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

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

// CSAPILocTest::Delete

// Delete here all resources allocated and opened from test methods. 

// Called from destructor. 

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

//

void CSAPILocTest::Delete() 

    {

    }

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

// CSAPILocTest::RunMethodL

// Run specified method. Contains also table of test mothods and their names.

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

//

TInt CSAPILocTest::RunMethodL( 

    CStifItemParser& aItem ) 

    {

    static TStifFunctionInfo const KFunctions[] =

        {  

        // Copy this line for every implemented function.

        // First string is the function name used in TestScripter script file.

        // Second is the actual implementation member function. 

         ENTRY( "CreateLocObjWSer",    CSAPILocTest::CreateLocObjWSer ),

         ENTRY( "CreateLocObjs",    CSAPILocTest::CreateLocObjs ),

      // ENTRY( "CreateLocObjWOSer",    CSAPILocTest::CreateLocObjWOSer ),

         ENTRY( "GetPosition",    CSAPILocTest::GetPosition ),

         ENTRY( "GetPosition1",    CSAPILocTest::GetPosition1 ),

         ENTRY( "GetPosition2",    CSAPILocTest::GetPosition2 ),

      // ENTRY( "GetPositionTO",    CSAPILocTest::GetPositionTO ),

         ENTRY( "GetPositionAsync",    CSAPILocTest::GetPositionAsync ),

     //  ENTRY( "GetPositionAsyncTO",    CSAPILocTest::GetPositionAsyncTO ),

      // ENTRY( "GetPositionAsyncOpts",    CSAPILocTest::GetPositionAsyncOpts),

         ENTRY( "GetPositionAsyncOpts1",    CSAPILocTest::GetPositionAsyncOpts1),

         ENTRY( "GetPositionAsyncOpts2",    CSAPILocTest::GetPositionAsyncOpts2),

         ENTRY( "GetPositionAsyncOpts3",    CSAPILocTest::GetPositionAsyncOpts3),

         ENTRY( "GetPositionAsyncOpts4",    CSAPILocTest::GetPositionAsyncOpts4),

         ENTRY( "GetPositionAsyncOpts5",    CSAPILocTest::GetPositionAsyncOpts5),

         ENTRY( "GetPositionAsyncOpts6",    CSAPILocTest::GetPositionAsyncOpts6),

         ENTRY( "TraceLPosition",    CSAPILocTest::TraceLPosition),

         ENTRY( "TraceLPosition1",    CSAPILocTest::TraceLPosition1),

      // ENTRY( "TraceLPositionTO",    CSAPILocTest::TraceLPositionTO),

         ENTRY( "TraceLPosition2",    CSAPILocTest::TraceLPosition2),

         ENTRY( "TraceLPosition3",    CSAPILocTest::TraceLPosition3),

         ENTRY( "TraceLPosition4",    CSAPILocTest::TraceLPosition4),

         ENTRY( "TraceLPosition5",    CSAPILocTest::TraceLPosition5),

         ENTRY( "TraceLPosition6",    CSAPILocTest::TraceLPosition6),

         ENTRY( "TraceLPosition7",    CSAPILocTest::TraceLPosition7),

         ENTRY( "TraceLPosition8",    CSAPILocTest::TraceLPosition8),

         ENTRY( "TraceLPositionOpts",    CSAPILocTest::TraceLPositionOpts),

         ENTRY( "TraceLPositionOpts1",    CSAPILocTest::TraceLPositionOpts1),

         ENTRY( "TraceLPositionOpts2",    CSAPILocTest::TraceLPositionOpts2),

         ENTRY( "TraceLPositionOpts3",    CSAPILocTest::TraceLPositionOpts3),

         ENTRY( "CancelService1",    CSAPILocTest::CancelService1 ),

         ENTRY( "CancelService2",    CSAPILocTest::CancelService2 ),

         ENTRY( "GetTime",    CSAPILocTest::GetTime ),

         ENTRY( "GetSpeed",    CSAPILocTest::GetSpeed ),

         ENTRY( "GetPositionOpts",    CSAPILocTest::GetPositionOpts ),

         ENTRY( "GetPositionOpts1",    CSAPILocTest::GetPositionOpts1 ),

         ENTRY( "GetPositionOpts2",    CSAPILocTest::GetPositionOpts2 ),

         ENTRY( "GetPositionOpts3",    CSAPILocTest::GetPositionOpts3 ),

         ENTRY( "GetPositionOpts4",    CSAPILocTest::GetPositionOpts4 ),

         ENTRY( "GetPositionOpts5",    CSAPILocTest::GetPositionOpts5 ),

     //  ENTRY( "GetLastPosition",    CSAPILocTest::GetLastPosition ),

     //  ENTRY( "GetLastPosition1",    CSAPILocTest::GetLastPosition1 ),

         ENTRY( "GetDistance",    CSAPILocTest::GetDistance ),

         ENTRY( "GetDistance2",    CSAPILocTest::GetDistance2 ),

         ENTRY( "GetDistance3",    CSAPILocTest::GetDistance3 ),

         ENTRY( "GetDistance4",    CSAPILocTest::GetDistance4 ),

         ENTRY( "GetDistance5",    CSAPILocTest::GetDistance5 ),

         ENTRY( "GetDistance6",    CSAPILocTest::GetDistance6 ),

         ENTRY( "GetDistance7",    CSAPILocTest::GetDistance7 ),

         ENTRY( "GetDistance8",    CSAPILocTest::GetDistance8),

         ENTRY( "GetDistance9",    CSAPILocTest::GetDistance9),

         ENTRY( "GetDistance10",    CSAPILocTest::GetDistance10),

         ENTRY( "GetDistance11",    CSAPILocTest::GetDistance11),

         ENTRY( "GetDistance12",    CSAPILocTest::GetDistance12),

         ENTRY( "GetBearing",    CSAPILocTest::GetBearing),

         ENTRY( "GetBearing1",    CSAPILocTest::GetBearing1),

         ENTRY( "GetBearing2",    CSAPILocTest::GetBearing2),

         ENTRY( "GetBearing3",    CSAPILocTest::GetBearing3),

         ENTRY( "GetBearing4",    CSAPILocTest::GetBearing4),

         ENTRY( "GetBearing5",    CSAPILocTest::GetBearing5),

         ENTRY( "GetBearing6",    CSAPILocTest::GetBearing6),

         ENTRY( "GetBearing7",    CSAPILocTest::GetBearing7),

         ENTRY( "GetBearing8",    CSAPILocTest::GetBearing8),

         ENTRY( "GetBearing9",    CSAPILocTest::GetBearing9),

         ENTRY( "GetBearing10",    CSAPILocTest::GetBearing10),

         ENTRY( "GetBearing11",    CSAPILocTest::GetBearing11),

         ENTRY( "GetBearing12",    CSAPILocTest::GetBearing12),

         ENTRY( "GetBearing13",    CSAPILocTest::GetBearing13),

         ENTRY( "GetBearing14",    CSAPILocTest::GetBearing14),

         ENTRY( "Move1",    CSAPILocTest::Move1),

         ENTRY( "Move2",    CSAPILocTest::Move2),

         ENTRY( "Move3",    CSAPILocTest::Move3),

         ENTRY( "Move4",    CSAPILocTest::Move4),

         ENTRY( "Move5",    CSAPILocTest::Move5),

         ENTRY( "Move6",    CSAPILocTest::Move6),

         ENTRY( "Move7",    CSAPILocTest::Move7),

         ENTRY( "Move8",    CSAPILocTest::Move8),

         ENTRY( "Modinfo1",    CSAPILocTest::Modinfo1),

        };

    const TInt count = sizeof( KFunctions ) / 

                        sizeof( TStifFunctionInfo );

    return RunInternalL( KFunctions, count, aItem );

    }

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

// CSAPILocTest::CreateLocObjWSer

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

//

TInt CSAPILocTest::CreateLocObjWSer( CStifItemParser& /*aItem*/ )

    {

    returnCode = KErrNone;

    // Print to UI

    _LIT( KSAPILocTest, "SAPILocTest" );

    _LIT( KExample, "CreateLocationObjWSer" );

    TestModuleIf().Printf( 0, KSAPILocTest, KExample );

    __UHEAP_MARK;

    CLocationService *CoreObj = CLocationService :: NewL();

    if( NULL == CoreObj)

	    {

    	OpenFile();

        LogFile.Write(_L8("\n<CreateLocObjWSer Test>\n"));

        LogFile.Write(_L8("Failed..\n"));

    	CloseFile();

    	returnCode = KErrGeneral;

   		}

    else

	    {

        delete CoreObj;

    	OpenFile();

        LogFile.Write(_L8("\n<CreateLocObjWSer Test>\n"));

        LogFile.Write(_L8("Passed..\n"));

    	CloseFile();

     	returnCode = KErrNone;

	    }

    __UHEAP_MARKEND;

    return returnCode;

    }

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

// CSAPILocTest::CreateLocObjs

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

//

TInt CSAPILocTest::CreateLocObjs( CStifItemParser& /*aItem*/ )

    {

    // Print to UI

    TInt aLoopCount = 0;

    _LIT( KSAPILocTest, "SAPILocTest" );

    _LIT( KExample, "CreateLocationObjs" );

    TestModuleIf().Printf( 0, KSAPILocTest, KExample );

    __UHEAP_MARK;

    CLocationService *CoreObj[10];

    while( aLoopCount<10 )

	    {

	    CoreObj[aLoopCount] = CLocationService :: NewL();	

	    if( NULL == CoreObj)

	    	{

	     	OpenFile();

		    LogFile.Write(_L8("\n<CreateLocObjs Test>\n"));

		    LogFile.Write(_L8("Failed..\n"));

		    CloseFile();

		    __UHEAP_MARKEND;

		   	return KErrGeneral;		

	   	  	} 

	   	aLoopCount++;

	   	}

   	aLoopCount=0;

   	while( aLoopCount<10 )

    	{

    	delete CoreObj[aLoopCount];

    	aLoopCount++;

    	}

	OpenFile();

    LogFile.Write(_L8("\n<CreateLocObjs  Test>\n"));

    LogFile.Write(_L8("Passed..\n"));

	CloseFile();

    __UHEAP_MARKEND;

    return KErrNone; 

	}

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

// CSAPILocTest::GetPosition

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

//

TInt CSAPILocTest::GetPosition( CStifItemParser& /*aItem*/ )

    {

    TInt aRet = KErrNone;

    TPositionInfo currPos;

    returnCode = KErrNone;

    // Print to UI

    _LIT( KSAPILocTest, "SAPILocTest" );

    _LIT( KExample, "GetLocation" );

    TestModuleIf().Printf( 0, KSAPILocTest, KExample );

    __UHEAP_MARK;

    CLocationService *CoreObj = CLocationService :: NewL();

    if( NULL == CoreObj)

	    {

	    OpenFile();

	    LogFile.Write(_L8("\n<GetPosition Test>\n"));

	    LogFile.Write(_L8("Failed..\n"));

	    CloseFile();

	   	return KErrGeneral;

	   	}

    //This is not required now

    /*TRAPD( error,aRet = CoreObj->GetLocationL(&currPos) );

    if( KErrAccessDenied == aRet)

    	{

    	OpenFile();

	    LogFile.Write(_L8("\n<GetPosition Test>\n"));

	    LogFile.Write(_L8("Passed..\n"));

	    CloseFile();

	    delete CoreObj;

    	__UHEAP_MARKEND;

    	return KErrNone;	

    	}

      else

    	{

    	OpenFile();

	    LogFile.Write(_L8("\n<GetPosition Test>\n"));

	    LogFile.Write(_L8("Failed..\n"));

	    CloseFile();

	    delete CoreObj;

    	__UHEAP_MARKEND;

    	return KErrGeneral;	

    	}*/

    else

    	{

    	OpenFile();

	    LogFile.Write(_L8("\n<GetPosition Test>\n"));

	    LogFile.Write(_L8("Passed..\n"));

	    CloseFile();

	    delete CoreObj;

    	__UHEAP_MARKEND;

    	return KErrNone;	

    	}	

  }

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

// CSAPILocTest::GetPosition1

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

//

TInt CSAPILocTest::GetPosition1( CStifItemParser& /*aItem*/ )

    {

    TInt aRet = KErrNone,aFlag;

    TPositionInfo currPos;

    returnCode = KErrNone;

    // Print to UI

    _LIT( KSAPILocTest, "SAPILocTest" );

    _LIT( KExample, "GetLocation" );

    TestModuleIf().Printf( 0, KSAPILocTest, KExample );

    __UHEAP_MARK;

    CLocationService *CoreObj = CLocationService :: NewL();

    if( NULL == CoreObj)

	    {

	    OpenFile();

	    LogFile.Write(_L8("\n<GetPosition1 Test>\n"));

	    LogFile.Write(_L8("Failed..\n"));

	    CloseFile();

	   	return KErrGeneral;

	   	}

    _LIT(Kidentity ,"Coreclass Testing" ) ;

    //not needed any more

	/*RRequestorStack aRequestorStack;

	const CRequestor* identityInfo = CRequestor::NewL(1 , 1 , Kidentity) ;

    aRequestorStack.Insert(identityInfo,0);

    CoreObj->SetRequestorIdentityL(aRequestorStack) ;*/

    TRAP(aRet , CoreObj->GetLocationL(&currPos) );

    if( KErrNone == aRet )

    	{

    	OpenFile();

    	LogFile.Write(_L8("\n<GetPosition Test>\n"));

    	CloseFile();

    	TPosition currPos1; 

    	currPos.GetPosition(currPos1);

    	aFlag = ValidatePosition(currPos1);

    	returnCode = aFlag ;    

    	}

    else

    	{

        OpenFile();

	    LogFile.Write(_L8("\n<GetPosition1 Test>\n"));

	    LogFile.Write(_L8("Failed..\n"));

	    CloseFile();

    	returnCode = KErrGeneral;

    	}

 	/*aRequestorStack.Close();

    delete identityInfo;*/

    delete CoreObj;

   	__UHEAP_MARKEND;

	return returnCode;	

 	}

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

// CSAPILocTest::GetPosition2

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

//

TInt CSAPILocTest::GetPosition2( CStifItemParser& /*aItem*/ )

    {

	TInt aRet1,aRet2,aFlag1,aFlag2;

	TInt aError[2];

	TPositionInfo currPos1;

	TPositionInfo currPos2;

	TPosition currPosition1;

	TPosition currPosition2;

    returnCode = KErrNone;

    // Print to UI

    _LIT( KSAPILocTest, "SAPILocTest" );

    _LIT( KExample, "GetLocation2" );

    TestModuleIf().Printf( 0, KSAPILocTest, KExample );

    __UHEAP_MARK;

    CLocationService *CoreObj = CLocationService :: NewL();

    if( NULL == CoreObj )

    	{

    	OpenFile();

	    LogFile.Write(_L8("\n<GetPosition2 Test>\n"));

	    LogFile.Write(_L8("Failed(Null CoreObj)..\n"));

	    CloseFile();

   		return KErrGeneral;

   		}

    _LIT(Kidentity ,"Coreclass Testing" ) ;

    //not needed any more

	/*RRequestorStack aRequestorStack;

	const CRequestor* identityInfo = CRequestor::NewL(1 , 1 , Kidentity) ;

    aRequestorStack.Insert(identityInfo,0);

    CoreObj->SetRequestorIdentityL(aRequestorStack) ;*/

    //User::After(120000000) ;	

    TRAP(aRet1,CoreObj->GetLocationL(&currPos1) );

    if (KErrNone == aRet1)

        {

        TRAPD(aRet2,CoreObj->GetLocationL(&currPos2)) ;

        OpenFile();

        LogFile.Write(_L8("\n<GetPosition2 Test>\n"));

        CloseFile();

        currPos1.GetPosition(currPosition1);

        currPos2.GetPosition(currPosition2);

        aFlag1 = ValidatePosition(currPosition1);

        aFlag2 = ValidatePosition(currPosition2);

        if((KErrNone == aFlag1) && (KErrNone == aFlag2))

            {

            OpenFile();

            LogFile.Write(_L8("Passed..\n"));

            CloseFile();

            returnCode = KErrNone;

            }

        else

            {

            OpenFile();

            LogFile.Write(_L8("Failed..\n"));

            CloseFile();

            returnCode = KErrGeneral;	

            }

        }

    else

        {

        OpenFile();

        LogFile.Write(_L8("\n<GetPosition2 Test>\n"));

        LogFile.Write(_L8("Failed(getloc error)..\n"));

        CloseFile();

        returnCode = KErrGeneral;

        }

    /*aRequestorStack.Close();

	 delete identityInfo;*/

    delete CoreObj;

    __UHEAP_MARKEND;

    return returnCode;	

    }