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

//

/**

 @file

*/

#include "TE_smsprt.h"

#include <sacls.h>

#include <exterror.h>

#include <emsformatie.h>

#include <logwraplimits.h>

#include <smspver.h>

using namespace CommsDat;

TVerdict CTestSimpleTxAndRx::doTestStepL()

/**

 *  Test a simple Transmit and Receive of a TPDU

 */

	{

	INFO_PRINTF1(_L("Test Simple Tx and Rx SMS"));

	RSocket socket;

	//Set destination and SC numbers

	iTelephoneNumber=KPekka;

	iServiceCenterNumber=KRadiolinjaSC;

	TSmsDataCodingScheme::TSmsAlphabet alphabet=TSmsDataCodingScheme::ESmsAlphabet8Bit;

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	//Send SMS

	SendSmsL(smsMessage,socket);

	CleanupStack::PopAndDestroy(smsMessage);

	//Receive SMS

	WaitForRecvL(socket);

	smsMessage = RecvSmsL(socket);

	//Save the received message to the SMS storage

	smsMessage->SetStorage(CSmsMessage::ESmsSIMStorage);

	WriteSmsToSimL(*smsMessage, socket);

	CleanupStack::PopAndDestroy(smsMessage);

	// Enumerate messages from Store

	RPointerArray<CSmsMessage> messages;

	ReadSmsStoreL(socket, messages);

	messages.ResetAndDestroy();

	CleanupStack::PopAndDestroy(&socket);

	return TestStepResult() ;

	}

TVerdict CTestBinaryTxAndRx::doTestStepL()

/**

 *  Test a binary Transmit and Receive of a TPDU

 */

	{

	INFO_PRINTF1(_L("Test Binary Tx and Rx SMS"));

	RSocket socket;

	CleanupClosePushL(socket);

	//Set destination and SC numbers

	iTelephoneNumber=KPekka;

	iServiceCenterNumber=KRadiolinjaSC;

	const TInt KTestPDUSize = 128;

	TBuf<KTestPDUSize> arrBuf;

	arrBuf.SetLength(KTestPDUSize);

	for(TInt i = 0; i < KTestPDUSize; ++i)

		{			

		arrBuf[i] = i;

		}

	TSmsDataCodingScheme::TSmsAlphabet alphabet=TSmsDataCodingScheme::ESmsAlphabet8Bit;

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	//Send first SMS

	SendSmsL(smsMessage,socket);

	CleanupStack::PopAndDestroy(smsMessage);

	TBuf<KTestPDUSize> arrBuf2;

	arrBuf2.SetLength(KTestPDUSize);

	for(TInt i = 0; i < KTestPDUSize; ++i)

		{		

		arrBuf2[i] = 128 + i;

		}

	//Send second SMS

	CleanupStack::PopAndDestroy(smsMessage);		

	//Receive first SMS

	WaitForRecvL(socket);

	smsMessage = RecvSmsL(socket);

	CleanupStack::PushL(smsMessage);

	//Save the received message to the SMS storage

	smsMessage->SetStorage(CSmsMessage::ESmsSIMStorage);

	WriteSmsToSimL(*smsMessage, socket);

	CleanupStack::PopAndDestroy(smsMessage);

	//Receive second SMS

	WaitForRecvL(socket);

	smsMessage = RecvSmsL(socket);

	CleanupStack::PushL(smsMessage);

	//Save the received message to the SMS storage

	smsMessage->SetStorage(CSmsMessage::ESmsSIMStorage);

	WriteSmsToSimL(*smsMessage, socket);

	CleanupStack::PopAndDestroy(smsMessage);				

	// Enumerate messages from Store

	RPointerArray<CSmsMessage> messages;

	ReadSmsStoreL(socket, messages);

	messages.ResetAndDestroy();

	CleanupStack::PopAndDestroy(&socket);

	return TestStepResult() ;	 	

	}	

TVerdict CTestStatusReport::doTestStepL()

/**

 *  Test a simple Transmit and Receive with status reporting

 */

	{

	INFO_PRINTF1(_L("Test Tx an SMS and then receive a status report"));

	RSocket socket;

	_LIT(KTestMsg1,"test message, 8bits, length 30");

	//Set destination and SC numbers

	iTelephoneNumber=KPekka;

	iServiceCenterNumber=KRadiolinjaSC;

	TSmsDataCodingScheme::TSmsAlphabet alphabet=TSmsDataCodingScheme::ESmsAlphabet8Bit;

	CSmsMessage* smsMessage=CreateSmsWithStatusReportReqL(KTestMsg1,alphabet);

	CleanupStack::PushL(smsMessage);

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	//Send SMS

	SendSmsL(smsMessage,socket);

	CleanupStack::PopAndDestroy(smsMessage);

	//Create and send the second SMS

	_LIT(KTest7bitMsg,"test message, length 23"); //7 bits test message, length 23 characters

	//Set destination number

	iTelephoneNumber=KOther;

	alphabet=TSmsDataCodingScheme::ESmsAlphabet7Bit;

	smsMessage=CreateSmsWithStatusReportReqL(KTest7bitMsg, alphabet);

	CleanupStack::PushL(smsMessage);

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	//Send SMS

	SendSmsL(smsMessage,socket);

	CleanupStack::PopAndDestroy(smsMessage);

	//Create and send the third SMS

	//Set destination number

	iTelephoneNumber=KOther;

	alphabet=TSmsDataCodingScheme::ESmsAlphabet8Bit;

	smsMessage=CreateSmsWithStatusReportReqL(KTestMsg1,alphabet);

	CleanupStack::PushL(smsMessage);

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	//Send SMS

	SendSmsL(smsMessage,socket);

	CleanupStack::PopAndDestroy(smsMessage);

	//Create and send the fourth SMS

	//Set destination and SC numbers

	iTelephoneNumber=KLocalNumber;

	iServiceCenterNumber=KRadiolinjaSC;

	alphabet=TSmsDataCodingScheme::ESmsAlphabet8Bit;

	smsMessage=CreateSmsWithStatusReportReqL(KTestMsg1,alphabet);

	CleanupStack::PushL(smsMessage);

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	//Send SMS

	SendSmsL(smsMessage,socket);

	CleanupStack::PopAndDestroy(smsMessage);

	// Create and send the 5th SMS. Here the submit PDU contains an international number

	// and the Status Report that will be received contains the local version of that number

	_LIT(KTestInternationalSMSWithLocalSRMsg, "Test international number");

	//Set destination and SC numbers

	iTelephoneNumber = KInternationalTestNumber;

	alphabet = TSmsDataCodingScheme::ESmsAlphabet7Bit;

	smsMessage = CreateSmsWithStatusReportReqL(KTestInternationalSMSWithLocalSRMsg, alphabet);

	CleanupStack::PushL(smsMessage);

	INFO_PRINTF2(_L("Destination number:..... %S"), &iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"), &iServiceCenterNumber);

	//Send SMS

	SendSmsL(smsMessage, socket);

	CleanupStack::PopAndDestroy(smsMessage);

	// PDEF137451

	//Create and send the sixth SMS

	//

	//Set destination and SC numbers

	iTelephoneNumber=KPekka;

	iServiceCenterNumber=KRadiolinjaSC;

	alphabet=TSmsDataCodingScheme::ESmsAlphabet8Bit;

	smsMessage=CreateSmsWithStatusReportReqL(KTestMsg1,alphabet);

	CleanupStack::PushL(smsMessage);

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	//Send SMS

	SendSmsL(smsMessage,socket);

	CleanupStack::PopAndDestroy(smsMessage);

	//

	//Create and send the seventh SMS (7-bit)

	//

	//Set destination number

	iTelephoneNumber=KOther;

	alphabet=TSmsDataCodingScheme::ESmsAlphabet7Bit;

	smsMessage=CreateSmsWithStatusReportReqL(KTest7bitMsg, alphabet);

	CleanupStack::PushL(smsMessage);

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	//Send SMS

	SendSmsL(smsMessage,socket);

	CleanupStack::PopAndDestroy(smsMessage);

	//Receive status report

	TSmsServiceCenterAddress telephoneNumber;

	telephoneNumber.Copy( KOther );

	RecvStatusReportL(telephoneNumber, socket);

	telephoneNumber = KLocalNumber;

	RecvStatusReportL(telephoneNumber, socket);

	telephoneNumber = KOther;

	RecvStatusReportL(telephoneNumber, socket);

	telephoneNumber.Copy( KPekka );

	RecvStatusReportL(telephoneNumber, socket);

	// CSmsPDUProcessor::DecodeAndProcessPDUL sets the address of the SR

	// to the same as that of the original submit. So we expect the

	// received SR to have an international number, despite the SR PDU

	// having a local number.

	telephoneNumber.Copy(KInternationalTestNumber);

	RecvStatusReportL(telephoneNumber, socket);

	// truncated user data, 8-bit:

	telephoneNumber.Copy( KPekka );

	RecvStatusReportL(telephoneNumber, socket);

	// truncated user data, 7-bit:

	telephoneNumber.Copy( KOther );			

	RecvStatusReportL(telephoneNumber, socket);

	CleanupStack::PopAndDestroy(&socket);

	return TestStepResult() ;

	}

TVerdict CTestTxWithError::doTestStepL()

/**

 *  Test a simple Transmit and Receive. This test case tests different errors from TSY.

 */

	{

	INFO_PRINTF1(_L("Test Tx an SMS, completed with error"));

	RSocket socket;

	RSocket socket2;

	_LIT(KTestMsg1,"test message, 8bits, length 30");

	//Set destination and SC numbers

	iTelephoneNumber=KPekka;

	iServiceCenterNumber=KSoneraSC;

	TSmsDataCodingScheme::TSmsAlphabet alphabet=TSmsDataCodingScheme::ESmsAlphabet8Bit;

	//Set Status report request

	CSmsSubmit& submitPdu=(CSmsSubmit&)smsMessage->SmsPDU();

	submitPdu.SetStatusReportRequest(ETrue);

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	INFO_PRINTF1(_L("waiting 2 secs for smsprot to load"));

	User::After(2000000);

	//Try sending, Tsy returns error

	SendSmsCancelL(smsMessage,socket, socket2);

	INFO_PRINTF1(_L("Try again sending the SMS"));

	//Now sending succeeds KErrNone

	SendSmsL(smsMessage,socket);

	//set reject duplicates to false

	submitPdu.SetRejectDuplicates(EFalse);

	INFO_PRINTF1(_L("Try sending duplicate SMS when Reject Duplicate is False"));

	SendSmsL(smsMessage,socket);

	TEST(submitPdu.RejectDuplicates() == EFalse);

	//set reject duplicates to true

	submitPdu.SetRejectDuplicates(ETrue);

	INFO_PRINTF1(_L("Try sending duplicate SMS when Reject Duplicate is True"));

	SendSmsL(smsMessage,socket);

	TEST(submitPdu.RejectDuplicates());

	TEST(ETrue);

	// Set reply path to False

    submitPdu.SetReplyPath(EFalse);

	INFO_PRINTF1(_L("Try sending SMS when Reply Path is False"));    

	SendSmsL(smsMessage,socket);

	TEST(submitPdu.ReplyPath() == EFalse);

	// Set reply path to True

    submitPdu.SetReplyPath(ETrue);

	INFO_PRINTF1(_L("Try sending SMS when Reply Path is True"));    

	SendSmsL(smsMessage,socket);

	TEST(submitPdu.ReplyPath());

	TEST(ETrue);

	CleanupStack::PopAndDestroy(smsMessage);

	//Receive SMS

	WaitForRecvL(socket);

	smsMessage = RecvSmsL(socket);

	CleanupStack::PushL(smsMessage);

	TestSmsContentsL(smsMessage,KTestMsg1);

	return TestStepResult() ;

	}

TVerdict CTestTxFailed::doTestStepL()

/**

 *  Test sending an SMS, transmit will be failed with different error codes

 */

	{

	INFO_PRINTF1(_L("Test Tx an SMS, failed with different error codes"));

	RSocket socket;

	_LIT(KTestMsg1,"test message, 8bits, length 30");

	//Set destination and SC numbers

	iTelephoneNumber=KPekka;

	iServiceCenterNumber=KSoneraSC;

	TSmsDataCodingScheme::TSmsAlphabet alphabet=TSmsDataCodingScheme::ESmsAlphabet8Bit;

	INFO_PRINTF2(_L("Destination number:..... %S"),&iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"),&iServiceCenterNumber);

	//Try sending, Dummy Tsy returns RP-error

	TInt i;

		{

		ret = SendSmsErrorL(smsMessage,socket);

		}

	//Try sending, Dummy Tsy returns RP-error with corrupted or wrong submit report PDU

		{

		ret = SendSmsErrorL(smsMessage,socket);

		}

	//Try sending, Dummy Tsy returns general error

		{

		ret = SendSmsErrorL(smsMessage,socket);

		}

	//Try sending, check expected error code

	ret = SendSmsErrorL(smsMessage,socket);

	TEST(ret== KErrGsmSMSMemCapacityExceeded);

	return TestStepResult() ;

	}

TVerdict CTestMatchingToObserver::doTestStepL()

/**

 *  Test a simple Receive of a single TPDU containing a simple text

 */

	{

	INFO_PRINTF1(_L("Test Messages matching to correct observer"));

	RSocket socket1;

	RSocket socket2;

	_LIT(KTestMsg1,"test message, 8bits, length 30"); //8 bits test message, length 30 chars

	_LIT(KTestMsg2,"test message, length 23"); //7 bits test message, length 23 characters

	TBuf8<128> match;

	match.Copy(KTestMsg2);

	RSocket socket3;

	TEST(ret == KErrNone);

	CleanupClosePushL(socket3);

	TSmsAddr smsaddr;

	smsaddr.SetSmsAddrFamily(ESmsAddrMatchText);

	smsaddr.SetTextMatch(_L8("test message, len"));

	ret=socket3.Bind(smsaddr);

	TEST(ret == KErrNone);

	smsaddr.SetTextMatch(_L8("test message, 8bi"));

	ret=socket1.Bind(smsaddr);

	TEST(ret == KErrNone);

	//Set destination and SC numbers

	iTelephoneNumber=KPekka;

	iServiceCenterNumber=KRadiolinjaSC;

	TSmsDataCodingScheme::TSmsAlphabet alphabet=TSmsDataCodingScheme::ESmsAlphabet8Bit;

	CSmsMessage* smsMessage=CreateSmsWithStatusReportReqL(KTestMsg1,alphabet);

	CleanupStack::PushL(smsMessage);

	INFO_PRINTF2(_L("Destination number:..... %S"), &iTelephoneNumber);

	INFO_PRINTF2(_L("ServiceCenter number:... %S"), &iServiceCenterNumber);

	//Send SMS

	SendSmsL(smsMessage,socket2);

	CleanupStack::PopAndDestroy(smsMessage);

	INFO_PRINTF1(_L("waiting for incoming SMS...") );

	//Set receiving status report to socket2

	TSmsAddr smsaddr2;

	//ESmsAddrStatusReport

	smsaddr2.SetSmsAddrFamily(ESmsAddrStatusReport);

	ret=socket2.Bind(smsaddr2);

	TEST(ret == KErrNone);

	INFO_PRINTF1(_L("waiting for incoming SMS...") );

	smsMessage = RecvSmsL(socket3);

	CleanupStack::PushL(smsMessage);

	TestSmsContentsL(smsMessage,KTestMsg2);

	CleanupStack::PopAndDestroy(smsMessage);