// Copyright (c) 2006-2009 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:

// Test Wap Status reports

// 

//

/**

 @file

*/

#include "WapStatusReports.h"

/**

Preamble for all status report steps

*/

TVerdict CTestWapStatusReports::doTestStepPreambleL()

{

	CWapProtSuiteStepBase::doTestStepPreambleL();

	SetTestNumberL();

	//	Connect to socket server

    User::LeaveIfError(iSocketServer.Connect());

	//	Define and open the socket

    User::LeaveIfError(iSocket.Open(iSocketServer,KWAPSMSAddrFamily,KSockDatagram,KWAPSMSDatagramProtocol));

	//	Waiting for the phone to be initialised

	WaitForInitializeL();

	SetCodingSchemeL();

	SetMessageTypeL();

	SetWapAddrL();

	return TestStepResult();

}

/**

Utility for sending a wap message

*/

void CTestWapStatusReports::SendWapMessageL()

{

	//	Indicating to the protocol that it's a new client

	//INFO_PRINTF1(_L("Socket set option for indicating new client"));

	//User::LeaveIfError(iSocket.SetOpt(KWapSmsOptionNewStyleClient,KWapSmsOptionLevel, 0));

	//Get the data 

	TPtrC textData;

	GetStringFromConfig(ConfigSection(),_L("message"), textData);

	//Set the buffer

	TBuf8<1000> data;

	data.Copy(textData);

	//Send the message

	TRequestStatus status;

	iSocket.SendTo(data, iWapAddr, 0, status);

	User::WaitForRequest(status);

	User::LeaveIfError(status.Int());

	INFO_PRINTF1(_L("Message sent!"));

}

/**

Utility for getting the expected status

*/

void CTestWapStatusReports::GetExpectedStatus()

{

	//Get the port number from the ini file

	GetIntFromConfig(ConfigSection(),_L("expectedStatus"), iExpectedStatus);

}

/**

Utility for receiving status reports

*/

TSmsStatus::TSmsStatusValue CTestWapStatusReports::ReceiveStatusReportL()

{

	INFO_PRINTF1(_L("waiting for incoming status report...") );

	WaitForRecvL(iStatusReportSocket);

	CSmsMessage* smsMessage = RecvSmsL(iStatusReportSocket);

	INFO_PRINTF1(_L("incoming SMS") );

	//Check the status report

	CleanupStack::PushL(smsMessage);

	TBool isSR = (smsMessage->Type()==CSmsPDU::ESmsStatusReport);

	if (isSR)

		{

		INFO_PRINTF1(_L("Received status report"));

		TSmsServiceCenterAddress telephoneNumber=smsMessage->ToFromAddress();

		}

	else

		{

		INFO_PRINTF1(_L("Received SMS is NOT a Status report!"));

		}

	TEST(isSR==1);

	//Get the status report

	CSmsStatusReport& statusReport = static_cast<CSmsStatusReport&>(smsMessage->SmsPDU()); 

	TSmsStatus::TSmsStatusValue status = statusReport.Status();

	CleanupStack::PopAndDestroy(smsMessage);

	return status;

}

/**

Postamble for all status report steps

*/

TVerdict CTestWapStatusReports::doTestStepPostambleL()

{

    iSocket.Close();

    iSocketServer.Close();

	CWapProtSuiteStepBase::doTestStepPostambleL();

	return TestStepResult();

}

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

/**

Setup the SMS for TP-SRR operations on the SMS 

*/

TVerdict CTestRequestingStatusReports::doTestStepPreambleL()

{	

	//Call the base class preamble

	CTestWapStatusReports::doTestStepPreambleL();

	return TestStepResult();

}

/**

Common test steps for all status reports steps

*/

TVerdict CTestRequestingStatusReports::doTestStepL()

{

	SendWapMessageL();

	return TestStepResult();

}

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

/**

Setup the SMS for TP-SRR operations on the SMS 

*/

TVerdict CTestRequestingStatusReportsWithOption::doTestStepPreambleL()

{	

	//Call the base class preamble

	CTestRequestingStatusReports::doTestStepPreambleL();

	INFO_PRINTF1(_L("Socket set option for indicating last PDU status report"));

	User::LeaveIfError(iSocket.SetOpt(KWapSmsStatusReportScheme, KWapSmsOptionLevel, EWapSmsTPSRR));

	return TestStepResult();

}

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

/**

Setup the SMS for TP-SRR operations on the SMS 

*/

TVerdict CTestReceivingStatusReports::doTestStepPreambleL()

{	

	//Call the base class preamble

	CTestWapStatusReports::doTestStepPreambleL();

	GetExpectedStatus();

	SetupStatusReportSocketL();

	return TestStepResult();

}

/**

Common test steps for all status reports steps

*/

TVerdict CTestReceivingStatusReports::doTestStepL()

{

	SendWapMessageL();

	TSmsStatus::TSmsStatusValue status;

	status=ReceiveStatusReportL();

	TESTL(status == iExpectedStatus);

	return TestStepResult();

}

/**

Common test steps for all status reports steps

*/

TVerdict CTestReceivingStatusReports::doTestStepPostambleL()

{

	iStatusReportSocket.Close();

	//Call the base class preamble

	CTestWapStatusReports::doTestStepPostambleL();

	return TestStepResult();

}

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

/**

Common test steps for all status reports steps

*/

TVerdict CTestReceivingStatusReportsSevenBitMultiplePDUs::doTestStepL()

{

	CTestReceivingStatusReports::doTestStepL();

	//We will receive 2 status reports for this message

	TSmsStatus::TSmsStatusValue status;

	status=ReceiveStatusReportL();

	TESTL(status == iExpectedStatus);

	return TestStepResult();

}

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

TVerdict CTestReceivingStatusReportsWithOption::doTestStepPreambleL()

{	

	//Sets up the socket for receiving status reports

	CTestReceivingStatusReports::doTestStepPreambleL();

	//Set the option for last PDU only (TPSRR Scheme)

	INFO_PRINTF1(_L("Socket set option for indicating last PDU status report"));

	User::LeaveIfError(iSocket.SetOpt(KWapSmsStatusReportScheme, KWapSmsOptionLevel, EWapSmsTPSRR));

    return TestStepResult();

}

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