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

 // Support for hostname & hostaddr related functions

 // 

 //

 #include "SYSIF.H"

 #include "FDESC.H"

 #include <unistd.h>

 #include <stdlib.h>

 #include <sys/errno.h>

 #include "LPOSIX.H"

 #include <sys/socket.h>

 #include <libc/netinet/in.h>

 #include <netdb_r.h>

 #include <string.h>

 #include <in_sock.h>

 #include <networking/dnd_err.h>

 extern "C" {

 /**

 Get the internet name of this host. Actually this will always return a null 

 string with TCPIP 030 and onwards because the "name" of a mobile host

 isn't really very meaningful - in practice the IP address is chosen dynamically

 once you start doing real networking, at which time the ISP can resolve the 

 IP address into a name of some sort if you really want.

 @return 

 @param name

 @param size

 */

 EXPORT_C int gethostname (char *name, size_t size)

 	{

 	int* perrno=__errno();

 	RSocketServ ss;

 	TInt err=ss.Connect(1);

 	if (err==KErrNone)

 		{

 		RHostResolver r;

 		err=r.Open(ss, AF_INET, KProtocolInetUdp);

 		if (err==KErrNone)

 			{

 			TBuf<128> hostname;

 			err=r.GetHostName(hostname);

 			if (err==KErrNone)

 				{

 				if (size>(size_t)hostname.Length())

 					{

 					TPtr8 retval((TText8*)name,size);

 					retval.Copy(hostname);

 					retval.PtrZ();

 					}

 				else

 					err=ENAMETOOLONG;

 				}

 			r.Close();

 			}

 		ss.Close();

 		}

 	return MapError(err,*perrno);

 	}

 /**

 Get the internet name of the host by address.

 @return 

 @param addr Address of the host

 @param length 

 @param format 

 */

 EXPORT_C struct hostent* gethostbyaddr (const char* addr, int length, int format)

 	{

 	return _gethostbyaddr_r(_REENT,addr,length,format);

 	}

 /**

 Get the internet name of the host by name.

 @return 	

 @param name Name of the host

 */

 EXPORT_C struct hostent* gethostbyname (const char* name)

 	{

 	return _gethostbyname_r(_REENT,name);

 	}

 enum GetHostType {ByName = 1, ByAddr};

 #define MAX_ADDR_OR_ALIAS_LIST	5

 struct hostent_buf

 	{

 	struct hostent iHostent;

 	char *iAliasesPtr[MAX_ADDR_OR_ALIAS_LIST+1];

 	char *iAddrListPtr[MAX_ADDR_OR_ALIAS_LIST+1];

 	THostName iHostAliases[MAX_ADDR_OR_ALIAS_LIST];

 	struct sockaddr iHostAddress[MAX_ADDR_OR_ALIAS_LIST];

 	};

 struct hostent* mapNameRecord(struct _reent* rp, TFixedArray<TNameRecord, MAX_ADDR_OR_ALIAS_LIST>& aRecord, const TInt aCount, const GetHostType aHostType, const int aLength, const int aFormat)

 	{

 	free(rp->_netdb);

 	struct hostent_buf* hbp = (struct hostent_buf*)calloc(1,sizeof(struct hostent_buf));

 	rp->_netdb = hbp;

 	if (hbp==0)

 		{

 		rp->_errno=ENOMEM;

 		return 0;

 		}

 	// Set-up Aliases & Address list pointer

 	hbp->iHostent.h_aliases = &hbp->iAliasesPtr[0];

 	hbp->iHostent.h_addr_list = &hbp->iAddrListPtr[0];

 	// Fill-up Host Name

 	hbp->iHostent.h_name = (char*) &hbp->iHostAliases[0];

 	TPtr8 name((TText8*)&hbp->iHostAliases[0], aRecord[0].iName.Length()+1);

 	name.Copy(aRecord[0].iName);

 	name.ZeroTerminate();

 	hbp->iHostent.h_addrtype = aFormat;

 	hbp->iHostent.h_length = aLength;

 	// Fill-up Address

 	hbp->iAddrListPtr[0] = (char*)&hbp->iHostAddress[0].sa_data[0];		// ... which is iAddr

 	unsigned long len=sizeof(struct sockaddr);

 	aRecord[0].iAddr.SetFamily(aFormat);	// not set by GetByName(_L(""));

 	STATIC_CAST(TUSockAddr*,&aRecord[0].iAddr)->Get(&hbp->iHostAddress[0],&len);

 	if (aCount > 1)

 		{

 		// If there are multiple host name or address

 		TInt i;

 		if (aHostType == ByName)

 			{

 			// there are multiple addresses for a given host

 			hbp->iAliasesPtr[0] = NULL;

 			for (i=1; i<aCount; i++)

 				{

 				hbp->iAddrListPtr[i] = (char*)&hbp->iHostAddress[i].sa_data[0];

 				len=sizeof(struct sockaddr);

 				aRecord[i].iAddr.SetFamily(aFormat);	// not set by GetByName(_L(""));

 				STATIC_CAST(TUSockAddr*,&aRecord[i].iAddr)->Get(&hbp->iHostAddress[i],&len);

 				}

 			hbp->iAddrListPtr[i] = NULL;

 			}

 		else

 			{

 			// there are multiple host/aliases name for a given address

 			hbp->iAddrListPtr[1] = NULL;

 			for (i=1; i<aCount; i++)

 				{

 				hbp->iAliasesPtr[i-1] = (char*) &hbp->iHostAliases[i];

 				name.Set((TText8*)&hbp->iHostAliases[i], 0, aRecord[i].iName.Length()+1);

 				name.Copy(aRecord[i].iName);

 				name.ZeroTerminate();

 				}

 			hbp->iAliasesPtr[i-1] = NULL;

 			}

 		}

 	else

 		{

 		hbp->iAliasesPtr[0] = NULL;

 		hbp->iAddrListPtr[1] = NULL;

 		}

 	return &hbp->iHostent;

 	}

 /**

 Get the internet name of the host by address.

 @return 

 @param rp pointer

 @param addr 

 @param length 

 @param format 

 */

 EXPORT_C struct hostent* _gethostbyaddr_r (struct _reent* rp, const char* addr, int length, int format)

 //

 // For AF_INET, 

 	{

 	RSocketServ ss;

 	TInt err=ss.Connect();

 	struct hostent* retval=0;

 	if (err==KErrNone)

 		{

 		RHostResolver r;

 		err=r.Open(ss, AF_INET, KProtocolInetUdp);

 		if (err==KErrNone)

 			{

 			struct sockaddr buf;

 			buf.sa_family=(unsigned short)format;

 			memcpy(buf.sa_data,addr,length);

 			TUSockAddr addr(&buf,length+4);

 			TFixedArray<TNameRecord, MAX_ADDR_OR_ALIAS_LIST> record;

 			TNameEntry entry;

 			TInt count = 0;

 			err=r.GetByAddress(addr,entry);

 			if (err==KErrNone)

 				{

 				record[count++]=entry();

 				while ((r.Next(entry) == KErrNone) && (count < MAX_ADDR_OR_ALIAS_LIST))

 					{

 					record[count++] = entry();

 					}

 				retval = mapNameRecord(rp, record, count, ByAddr, length, format);

 				}

 			r.Close();

 			}

 		ss.Close();

 		}

 	if (err==-3004)	// NETDIAL busy

 		err=TRY_AGAIN;

 	// KErrDndAddrNotFound=-5121 should be excluded (Returned when no data found for GetByAddr)

 	if ((err<-3000)	&& (err!=KErrDndAddrNotFound))	// i.e. a NETDIAL error

 		err=NO_RECOVERY;

 	MapError(err,rp->_errno);

 	return retval;

 	}

 /**

 Get the internet name of the host by name.

 @return 

 @param rp 

 @param name name of the host

 */

 EXPORT_C struct hostent* _gethostbyname_r (struct _reent* rp, const char* name)

 	{

 	RSocketServ ss;

 	TInt err=ss.Connect();

 	struct hostent* retval=0;

 	if (err==KErrNone)

 		{

 		RHostResolver r;

 		err=r.Open(ss, AF_INET, KProtocolInetUdp);

 		if (err==KErrNone)

 			{			

 			TFixedArray<TNameRecord, MAX_ADDR_OR_ALIAS_LIST> record;

 			TNameEntry entry;

 #ifdef _UNICODE

 			TPtrC8 ptr(REINTERPRET_CAST(const TUint8*,name));

 			TBuf<0x40> hostname;

 			hostname.Copy(ptr);

 #else

 			TPtrC8 hostname(REINTERPRET_CAST(const TUint8*,name));

 #endif /* _UNICODE */

 			TInt count = 0;

 			err=r.GetByName(hostname,entry);

 			if (err==KErrNone)

 				{

 				record[count++]=entry();

 				while ((r.Next(entry) == KErrNone) && (count < MAX_ADDR_OR_ALIAS_LIST))

 					{

 					record[count++] = entry();

 					}

 				retval = mapNameRecord(rp, record, count, ByName, sizeof(struct in_addr), AF_INET);

 				}

 			r.Close();

 			}

 		ss.Close();

 		}

 	if (err==-3004)	// NETDIAL busy

 		err=TRY_AGAIN;

 	// KErrDndNameNotFound=-5120 should be excluded (Returned when no data found for GetByName)

 	if ((err<-3000)	&& (err!=KErrDndNameNotFound)) // i.e. a NETDIAL error

 		err=NO_RECOVERY;

 	MapError(err,rp->_errno);

 	return retval;

 	}

 } // extern "C"