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

//

#include "pnputils.h"

#include "cupnpservicediscoveryimpl.h"

#include <inetprottextutils.h>

#include <uriutils.h>

const TUint KHttpDefaultPort = 80;

/* Used to resolve the domain name into ipaddress

 @param aResolver   The RHostResolver reference used to resolve the domain name

 @param aUri		The url which has to be resolved into ip address

 @param aSockAddr	The resolved address which will get written to on success

 */

void CUPnPUtils::ResolveHostAddressL ( RHostResolver& aResolver,const TDesC8& aUri, TInetAddr& aSockAddr )

	{

	TUriParser8 parsedUri;

	parsedUri.Parse( aUri );

	_LIT8(KScheme,"http");

	const TDesC8& scheme = parsedUri.Extract( EUriScheme );

	if ( scheme.CompareF( KScheme ))

		User::Leave(KErrCorrupt);

	// Check if the character followed by the scheme eg. http:// is a numeral. If

	// so its already an ip address and hence no need to resolve

	//If the first character following http:// is a number then its already

	// an ipaddress and hence is returned as is		

	const TDesC8& hostname = parsedUri.Extract( EUriHost );

	if ( UriUtils::HostType( hostname ) == UriUtils::EIPv4Host )

		{

		RBuf hostBuf;

		hostBuf.CreateL ( hostname.Length ( ) );

		hostBuf.Copy ( hostname );

		aSockAddr.Input ( hostBuf );		

		hostBuf.Close ( );

		}

	else if ( UriUtils::HostType( hostname ) == UriUtils::ETextHost )

		{

		RBuf tempBuf;

		tempBuf.CreateL ( hostname.Length ( ) );		

		tempBuf.Copy ( hostname );

		TNameEntry dnsHostEntry;

		// Get the ip address corresponding to the hostname and write it to tempBuf

		aResolver.GetByName( tempBuf, dnsHostEntry );

		TInetAddr address = TInetAddr(dnsHostEntry().iAddr);

		aSockAddr.SetAddress ( address.Address ( ) );

		if ( address.Port () == 0 )

			{			

			aSockAddr.SetPort ( KHttpDefaultPort );

			}

		else

			{

			aSockAddr.SetPort ( address.Port () );

			}	

		tempBuf.Close ( );

		}

	else

		User::Leave(KErrCorrupt);

	if ( parsedUri.IsPresent ( EUriPort ) )

		{

		const TDesC8& portBuf = parsedUri.Extract( EUriPort );

		TInt port;

		InetProtTextUtils::ConvertDescriptorToInt ( portBuf, port );

		aSockAddr.SetPort ( port );

		}		

	}

/* Used to check whether uri conforms to given type. The uri types it checks are

  1. upnp:rootdevice

  2. urn:domain-name:service:serviceId

  3. urn:domain-name:device:deviceId

  4. uuid:

  @param aUri	The url whose validity must be checked

  @param aType	The type of uri to be checked against

  				If aType == EDevice Then aUri is of deviceType

  				else if aType == EService Then aUri is of serviceType

  				else if aType == EAny then aUri is generic

 */

TInt CUPnPUtils::GenericUriValidity ( const TDesC8& aUri , CUPnPUtils::TUriType aType)

	{

	_LIT8(KUrn,"urn");

	_LIT8(KUpnp,"upnp:rootdevice");

	_LIT8(KService,"service");

	_LIT8(KDevice,"device");

	_LIT8(KUuid,"uuid");

	if(aUri.Length()<=5)

		return KErrCorrupt;

	if((aType == CUPnPUtils::EDevice) || (aType == CUPnPUtils::EAny))

		{

		if ( aUri.Left(4) == KUuid && aUri[4] == ':')

			return KErrNone;

		// Test whether uri is "upnp:rootdevice"

		if (aUri.CompareF(KUpnp) == NULL)

			return KErrNone;

		}

	TLex8 uriParser(aUri);

	TChar ch = ':';

	uriParser.Mark();

	while((uriParser.Eos() == EFalse) && uriParser.Peek() != ch)

		uriParser.Inc();

	if(uriParser.MarkedToken().CompareF(KUrn) == NULL)

		{

		// Reach the first character after the first delimiter ":"

		uriParser.Inc();

		if( !uriParser.Eos() )

			uriParser.Inc();

		// Now move char pointer to the second delimiter

		while((uriParser.Eos() == EFalse) && uriParser.Peek() != ch)

			uriParser.Inc();

		if (uriParser.Eos())

			return KErrCorrupt;

		// Reach the the 2nd delimiter ":" and mark it. Now start searching

		// from the next character

		uriParser.Inc();

		uriParser.Mark();

		if( !uriParser.Eos() )

			uriParser.Inc();

		// Now move char pointer to the 3rd delimiter

		while((uriParser.Eos() == EFalse) && uriParser.Peek() != ch)

			uriParser.Inc();

		// Extract the token in between it should be either "service" or "device"

		const TDesC8& testUri = uriParser.MarkedToken();

		TBool flag = EFalse;

		if(aType == CUPnPUtils::EService && (testUri.CompareF(KService) == NULL))

			flag = ETrue;

		else if(aType == CUPnPUtils::EDevice && (testUri.CompareF(KDevice) == NULL))

			flag = ETrue;

		else if (aType == CUPnPUtils::EAny)

			{

			if ((testUri.CompareF(KDevice) == NULL) || (testUri.CompareF(KService)== NULL))

				flag = ETrue;

			}

		if (flag == EFalse )

			return KErrCorrupt;

		// Now check for the remaining part of the uri

		uriParser.Inc();

		uriParser.Mark();

		if( !uriParser.Eos() )

			uriParser.Inc();

		// Now move char pointer to the 4th delimiter

		while((uriParser.Eos() == EFalse) && uriParser.Peek() != ch)

			uriParser.Inc();

		if( uriParser.Eos() )

			return KErrCorrupt;

		// The service/device suffix should be of length <=64

		if((uriParser.MarkedToken()).Length() >64)

			return KErrCorrupt;

		// Now the first character outside the last colon should be a number

		uriParser.Inc();

		ch = uriParser.Peek();

		if( ch >= 48 && ch <= 57 )

			return KErrNone;

		else

			return KErrCorrupt;

		}

	else

		return KErrCorrupt;

	}