diff -r 000000000000 -r f5a58ecadc66 servicediscoveryandcontrol/pnp/test/upnp/unittests/tcpserver/src/ctcpservertestupnp7.cpp
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/servicediscoveryandcontrol/pnp/test/upnp/unittests/tcpserver/src/ctcpservertestupnp7.cpp	Tue Feb 02 01:12:20 2010 +0200
@@ -0,0 +1,242 @@
+/*
+* Copyright (c) 2008 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:
+*
+*/
+
+#include <ss_glob.h>
+#include <comms-infras/ss_thread.h>
+#include <comms-infras/ss_nodemessages_factory.h>
+#include <comms-infras/ss_nodemessages_dataclient.h>
+#include "ptcpservertests.h"
+#include "upnp_cf_msgs.h"
+#include "upnpflowbase.h"
+#include "upnpflowfactory.h"
+#include <httperr.h>
+#include "ctcpservertestupnp7.h"
+
+using namespace Messages;
+const TUint16 KActivityNull = 0;
+const TUint KHttpDefaultPort = 80;
+
+//------------------------------------------------------------//	
+/////////////////// CTcpServerTestUPnP7 /////////////////////////
+////// Testcase: Send the test data from the test client/////////
+//------------------------------------------------------------//
+
+_LIT8 ( KTestUPnPServiceUri,"http://127.0.0.1:80/testserviceuri1" );
+_LIT8 ( KRequestHeader, "GET / HTTP/1.0\r\nHost: 127.0.0.1:80\r\nConnection: Keep-Alive\r\n\r\n");
+_LIT8 ( KExpectedResponse, "HTTP/1.1 404 Not Found");
+_LIT8 ( KResponseData, "Test Server");
+
+CTcpServerTestUPnP7* CTcpServerTestUPnP7::NewL ( CProxyProvd* aProvd )
+	{
+	CTcpServerTestUPnP7* ret = new ( ELeave ) CTcpServerTestUPnP7 ( aProvd );
+	CleanupStack::PushL ( ret );
+	ret->ConstructL ();
+	CleanupStack::Pop ( ret );
+	return ret;
+	}
+
+CTcpServerTestUPnP7::CTcpServerTestUPnP7 ( CProxyProvd* aProvd ) :
+	CTcpServerTestBase ( aProvd ), iSocketHandler ( *this ), iHostAddr ( KInetAddrLoop, KHttpDefaultPort ), iState ( ECreateServer )
+	{
+	}
+	
+CTcpServerTestUPnP7::~CTcpServerTestUPnP7 ()
+	{
+	iServiceUri.Close ();
+		
+	iSocketHandler.CancelAll ();
+	iClientSocket.Close ();
+	delete iSocketOpener;
+	
+	iTimer.Close ();
+	
+	TUpnpMessage::DeRegister ();
+	}
+	
+void CTcpServerTestUPnP7::ConstructL ()
+	{
+	TUpnpMessage::RegisterL ( SockManGlobals::Get ()->SelfWorker ());
+	
+	iServiceUri.CreateL ( KTestUPnPServiceUri );
+	
+	iTimer.CreateLocal ();
+	TRAPD ( err, iSocketOpener = CSocketOpener::NewL ( *this ) );			
+	
+	User::LeaveIfError ( err );		
+	}
+
+TVerdict CTcpServerTestUPnP7::RunTestL ()
+	{
+	switch ( iState )
+		{
+		case ECreateServer:
+			{
+			const TUint8* uriPtr = NULL;
+			uriPtr = iServiceUri.Ptr ();
+			
+			const TUid reqUid = { CUPnPFlowFactory::iUid };		
+			THttpServerFlowQuery flowQuery ( uriPtr,
+										 iServiceUri.Size (),
+										 Id (),
+										 EHttpServerFlow, iChunkManager );
+			TCFPlayerRole playerRole ( TCFPlayerRole::EDataPlane );
+			
+			TCFFactory::TFindOrCreatePeer msg ( TCFPlayerRole::EDataPlane, reqUid, &flowQuery );
+			TNodeId factoryContainer = SockManGlobals::Get()->GetPlaneFC( playerRole );
+			
+			RClientInterface::OpenPostMessageClose ( Id (), TNodeCtxId ( KActivityNull, factoryContainer ), TCFFactory::TFindOrCreatePeer ( TCFPlayerRole::EDataPlane, reqUid, &flowQuery ).CRef () );
+			
+			iState  = EStartServer;
+			iStatus = KRequestPending;
+			Reschedule ();
+			return EPass;
+			}
+			
+		case EStartServer:
+			{
+			RClientInterface::OpenPostMessageClose ( TNodeCtxId ( KActivityNull, Id () ), TNodeCtxId ( KActivityNull, iTcpServer ), TCFDataClient::TStart ().CRef () );
+			
+			iState  = EOpenClientSocketAndConnect;
+			iStatus = KRequestPending;
+			Reschedule ();
+			return EPass;
+			}
+			
+		case EOpenClientSocketAndConnect:
+			{
+			iSocketOpener->MakeSocket ( KAfInet, KSockStream, KProtocolInetTcp );
+			
+			iState  = ESendData;
+			iStatus = KRequestPending;
+			Reschedule ();
+			return EPass;
+			}
+			
+		case ESendData:
+			{			
+			iSendChain.CreateL ( KRequestHeader );
+			iSocketHandler.Send ( iSendChain );
+			
+			iState = ESendStopServer;
+			iStatus = KRequestPending;
+			Reschedule ();
+			return EPass;
+			}
+		
+		// just to make sure production objects are cleaned-up properly.
+		case ESendStopServer:
+			{	
+			// cleanup tcp server flow
+			RClientInterface::OpenPostMessageClose ( TNodeCtxId ( KActivityNull, Id () ), TNodeCtxId ( KActivityNull, iTcpServer ), TCFDataClient::TStop ( KErrNone ).CRef () );
+			
+			iState = EServerStopped;
+			iStatus = KRequestPending;
+			Reschedule ();
+			return EPass;
+			}
+		
+		case EServerStopped:
+			{
+			// cleanup udp server flow
+			RClientInterface::OpenPostMessageClose ( TNodeCtxId ( KActivityNull, Id () ), TNodeCtxId ( KActivityNull, iTcpServer ), TEChild::TDestroy ().CRef () );
+			
+			iTimer.After ( iStatus, 1000000 ); //1secs
+			iState = ECleanup;
+			iStatus = KRequestPending;
+			Reschedule ();
+			return EPass;
+			}
+		
+		case ECleanup:
+			{
+			return iResponse; // Here the final test case is passed back to the RSocket::Ioctl
+			}
+					
+		default:
+			{
+			iLogger.WriteFormat(_L("<i> Failed: TestCase:..... </i>"));
+			ASSERT(0);
+			return EFail;
+			}
+		}
+	}
+	
+void CTcpServerTestUPnP7::OpenComplete ( RInternalSocket& aSocket )
+	{
+	iClientSocket = aSocket;
+	iSocketHandler.Attach ( aSocket );	
+	
+	iSocketHandler.Connect ( iHostAddr );
+	}
+	
+void CTcpServerTestUPnP7::ConnectComplete ()
+	{	
+	CompleteSelf ( KErrNone );
+	}
+	
+void CTcpServerTestUPnP7::SendComplete ( TInt /*aLength*/ )
+	{
+	iSendChain.Init ();
+	iSocketHandler.Recv ();
+	}
+	
+void CTcpServerTestUPnP7::RecvComplete ( RMBufChain& aData )
+	{
+	RBuf8 responseBuf;
+	responseBuf.CreateMax ( aData.Length () );
+	aData.CopyOut ( responseBuf );
+	aData.Free ();
+	
+	if ( responseBuf.FindF ( KExpectedResponse ) == KErrNotFound )
+		{
+		iResponse = EFail; // test case failed
+		}
+	else
+		{
+		iResponse = EPass;	// test case passed
+		}
+	
+	responseBuf.Close ();
+	CompleteSelf ( KErrNone );
+	}
+	
+void CTcpServerTestUPnP7::ReceivedL ( const TRuntimeCtxId& /*aSender*/, const TNodeId& /*aRecipient*/, TSignatureBase& aMessage )
+	{
+	if ( aMessage.IsMessage<TCFFactory::TPeerFoundOrCreated> () )
+		{
+		const TCFFactory::TPeerFoundOrCreated& msg = message_cast < const TCFFactory::TPeerFoundOrCreated > ( aMessage );
+		iTcpServer = msg.iNodeId;
+		CompleteSelf ( KErrNone );
+		}
+	else if ( aMessage.IsMessage<TCFDataClient::TStarted> () 
+				|| aMessage.IsMessage<TCFDataClient::TStopped> () )
+		{
+		CompleteSelf ( KErrNone );
+		}
+	else if ( aMessage.IsMessage<TUpnpMessage::TUPnPRequestInfo> ())
+		{
+		TUpnpMessage::TUPnPRequestInfo& requestMsg = message_cast< TUpnpMessage::TUPnPRequestInfo > ( aMessage );
+		CTransaction* trans = static_cast<CTransaction*> ( requestMsg.iPtr );
+		RMBufChain bufChain;
+		bufChain.CreateL ( KResponseData );	
+		trans->AddBodyPart ( bufChain );
+		
+		TUpnpMessage::TUPnPResponseInfo msg ( trans, HTTPStatus::EOk, NULL );
+		RClientInterface::OpenPostMessageClose ( TNodeCtxId ( KActivityNull, Id () ), TNodeCtxId ( KActivityNull, iTcpServer ), msg );
+		}
+	}
+