/*

* Copyright (c) 2002-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 FILES

#include <e32svr.h>

#include "tifioctls.h"

#include <stdio.h>

#include <sys/types.h>

#include <string.h>

#include <sys/socket.h>

#include <stdapis/arpa/inet.h>

#include <cdblen.h>

#include <stdapis/net/if.h>

#include <sys/ioctl.h>

#include <stdapis/netinet/in.h>

#include <stdlib.h>

#include <unistd.h>

#include <netdb.h>

#include <fcntl.h>

#include <stdapis/net/route.h>

#include <in_sock.h>

#include <in_iface.h>

#include <es_sock.h>

#include <in_sock.h>

#include <in_iface.h>

#include <nifman.h>

// EXTERNAL FUNCTION PROTOTYPES

TInt PrintInterfaceList(void *aIfc);

TInt PrintAndSelectInterface(void *aIfc, ifreq &aIfr);

//void GetParameters(char aParamets[10][256]);

void StripStar(char *aString);

// CONSTANTS

const TInt KErrSocket = -1002;

const TInt KErrIoctl = -1003;

//const TInt KErrGetHostByName = -1004;

const TInt KErrBind = -1005;

const TInt KErrConnect = -1006;

const TInt KErrSendto = -1007;

const TUint KTestPort = 5000;

// MODULE DATA STRUCTURES

enum InterfaceType

	{

	EACCESS_POINT,

	EACTIVE_CONNECTION

	};

// ============================ MEMBER FUNCTIONS ===============================

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

// CTestIfioctls::ExampleL

// Example test method function.

// (other items were commented in a header).

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

//

TInt CTestIfioctls::ExampleL(  )

    {

    // Print to UI

    _LIT( Ktifioctls, "tifioctls: In Example" );

    INFO_PRINTF1(Ktifioctls);

    TPtrC string;

    _LIT( KParam, "Param: %S" );

    _LIT( Kstring, "string" );

    TBool res = GetStringFromConfig(ConfigSection(), Kstring, string);

    if (res)

    {

        INFO_PRINTF2( KParam, &string );

    }

    return KErrNone;

    }

TInt CTestIfioctls::ListInterfaces(  )

	{

	ifconf ifc;

	TInt sockfd;

	TInt ret = KErrNone;

	TBool res = EFalse;

	TInt Iface;

	_LIT( KIface, "Iface" );

	TInt operation ; 

	sockfd = socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP);	

    if (sockfd < 0)

        {

        ret = KErrSocket;

        goto close;

        }

   	TInt IfconfLen;

   	_LIT( KIfconfLen, "IfconfLen" );

	res = GetIntFromConfig(ConfigSection(), KIfconfLen, IfconfLen);

	if(!res)

		{

	 	_LIT(Kerr , "Failed to read ifconfig length") ;

		close(sockfd);

	 	INFO_PRINTF1(Kerr) ;

	 	return KErrGeneral ;

		}

	ifc.ifc_len = sizeof(ifreq) * IfconfLen;	

	if (ifc.ifc_len == 0)

		{

		ifc.ifc_buf = NULL;

		}

	else

		{

		ifc.ifc_buf = (caddr_t)malloc( ifc.ifc_len );

		}	

	// 1 = Interfaces, 2 = Active interfaces

	res = GetIntFromConfig(ConfigSection(), KIface, Iface);

	if(!res)

		{

	 	_LIT(Kerr , "Failed to read interface type") ;

	 	INFO_PRINTF1(Kerr) ;

		close(sockfd);

	 	return KErrGeneral ;

		}

	operation = Iface; 

	if (operation == 2)

		{

		ret = ioctl(sockfd,SIOCGIFACTIVECONF, &ifc);

		}

	else if (operation == 1)

		{

		ret = ioctl(sockfd,SIOCGIFCONF, &ifc);

		}

	close:

		close(sockfd);

		free(ifc.ifc_buf);

		return ret;

	}

TInt CTestIfioctls::CreateManyActiveInterfaces(  )

	{

	ifreq ifr;

	TInt sockfdArry[100];

	TInt sockfdCnt;

	TInt ret = KErrNone;

	TInt index;	

	ifconf ifc;	

	TInt sockfd;

	// Name of the interface

	TPtrC String;

	_LIT( KString, "String" );

    TBool res = GetStringFromConfig(ConfigSection(), KString, String );

	if(!res)  

		{

     	_LIT(Kerr , "Failed to read interface name") ;

     	INFO_PRINTF1(Kerr) ;

     	return KErrGeneral ;

		}

    TBuf8<256> asciiBuffer;

	asciiBuffer.Copy(String);

	TInt len = asciiBuffer.Length();

	Mem::Copy(ifr.ifr_name, asciiBuffer.Ptr(), len);

	ifr.ifr_name[len] = 0;

	StripStar(ifr.ifr_name);

	// Number of interafces

	TInt No;

	_LIT( KNo, "No" );

	res = GetIntFromConfig(ConfigSection(), KNo, No);

	sockfdCnt = No;	

	for (index = 0; index < sockfdCnt; index++)

		{

		sockfdArry[index] = socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP);	

    	if (sockfdArry[index] < 0)

        	{

        	ret = KErrSocket;

        	goto close;

        	}

		ret = ioctl(sockfdArry[index],SIOCSIFNAME, &ifr);

		if (ret != KErrNone)

			{

			ret = KErrIoctl;

			goto close;

			}

		ret = ioctl(sockfdArry[index], SIOCIFSTART , &ifr);

		if (ret != KErrNone)

			{

			goto close;

			}

		}

	ifc.ifc_buf = NULL;

	sockfd = socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP);	

    if (sockfd < 0)

       	{

       	ret = KErrSocket;

       	goto close;

       	}

	ret = ioctl(sockfd,SIOCGIFACTIVECONF, &ifc);

close:

	for (index = 0; index < sockfdCnt; index++)

		{

		ioctl(sockfdArry[index], SIOCIFSTOP, &ifr);

		close(sockfdArry[index]);

		}

	return ret;

	}

TInt CTestIfioctls::ChooseInterface()

	{

	ifreq ifr;

	TInt sockfd;

	TInt ret = KErrNone;	

	// Name of the interface

	TPtrC String;

	_LIT( KString, "String" );

    TBool res = GetStringFromConfig(ConfigSection(), KString, String );

	if(!res)  

		{

     	_LIT(Kerr , "Failed to read interface name") ;

     	INFO_PRINTF1(Kerr) ;

     	return KErrGeneral ;

		}

    TBuf8<256> asciiBuffer;

	asciiBuffer.Copy(String);

	TInt len = asciiBuffer.Length();

	Mem::Copy(ifr.ifr_name, asciiBuffer.Ptr(), len);

	ifr.ifr_name[len] = 0;

	StripStar(ifr.ifr_name);

	sockfd = socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP);	

    if (sockfd < 0)

        {

        ret = KErrSocket;

        close(sockfd);

		return ret;

        }

	ret = ioctl(sockfd,SIOCSIFNAME, &ifr);

	if (ret != KErrNone)

		{

		ret = KErrIoctl;

		close(sockfd);

		return ret;

		}

	ret = ioctl(sockfd, SIOCIFSTART , &ifr);

	if (ret != KErrNone)

		{

		close(sockfd);

		return ret;

		}

	ret = ioctl(sockfd, SIOCIFSTOP, &ifr);

	return ret;		

	}

TInt CTestIfioctls::ChooseActiveInterface(  )

	{

	ifreq ifr;

	TInt sockfd1=0, sockfd2=0;

	TInt ret = KErrNone;

	// Name of the interface

	TPtrC String;

	_LIT( KString, "String" );

    TBool res = GetStringFromConfig(ConfigSection(), KString, String );

	if(!res)  

    	{

     	_LIT(Kerr , "Failed to read interface name") ;

     	INFO_PRINTF1(Kerr) ;

     	return KErrGeneral ;

    	}

	TBuf8<256> asciiBuffer;

	asciiBuffer.Copy(String);

	TInt len = asciiBuffer.Length();

	Mem::Copy(ifr.ifr_name, asciiBuffer.Ptr(), len);

	ifr.ifr_name[len] = 0;

	StripStar(ifr.ifr_name);

	sockfd1 = socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP);

    if (sockfd1 < 0)

        {

        ret = KErrSocket;

        ioctl(sockfd1, SIOCIFSTOP, &ifr);

		close(sockfd1);

		return ret;

        }

	ret = ioctl(sockfd1,SIOCSIFNAME, &ifr);

	if (ret != KErrNone)

		{

		ret = KErrIoctl;

		ioctl(sockfd1, SIOCIFSTOP, &ifr);

		close(sockfd1);

		return ret;

		}

	ret = ioctl(sockfd1, SIOCIFSTART , &ifr);

	if (ret != KErrNone)

		{

		ioctl(sockfd1, SIOCIFSTOP, &ifr);

		close(sockfd1);

		return ret;

		}

	sockfd2 = socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP);

    if (sockfd2 < 0)

        {

        ret = KErrSocket;

        ioctl(sockfd2, SIOCIFSTOP, &ifr);

		ioctl(sockfd1, SIOCIFSTOP, &ifr);

		close(sockfd1);

		return ret;

        }

	ret = ioctl(sockfd2,SIOCSIFNAME, &ifr);

	if (ret != KErrNone)

		{

		ret = KErrIoctl;

		ioctl(sockfd2, SIOCIFSTOP, &ifr);

		ioctl(sockfd1, SIOCIFSTOP, &ifr);

		close(sockfd1);

		return ret;

		}

	ret = ioctl(sockfd2, SIOCIFACTIVESTART , &ifr);

	if (ret != KErrNone)

		{

		ioctl(sockfd2, SIOCIFSTOP, &ifr);

		ioctl(sockfd1, SIOCIFSTOP, &ifr);

		close(sockfd1);

		return ret;

		}

	return ret;

	}

TInt CTestIfioctls::TestIfNameIndex()

	{

	TInt ret = KErrNone;

	struct if_nameindex *ifname;

	ifname = if_nameindex();

	if_freenameindex(ifname);

	return ret;

	}	

TInt CTestIfioctls::TestIfIndexToName(  )

	{

	TInt ret = KErrNone;

	char ifName[255];	

	TInt IfIndex;

	_LIT( KIfIndex, "IfIndex" );

	TBool res = GetIntFromConfig(ConfigSection(), KIfIndex, IfIndex);

	if(!res)

		{

	 	_LIT(Kerr , "Failed to read interface index from ini file.") ;

	 	INFO_PRINTF1(Kerr) ;

	 	return KErrGeneral ;

		}

	if_indextoname(IfIndex, ifName);

	return ret;

	}	

TInt CTestIfioctls::TestIfNameToIndex(  )

	{

	TInt ret = KErrNone;

	char IfName[30];

	TPtrC String;

	_LIT( KString, "String" );

    TBool res = GetStringFromConfig(ConfigSection(), KString, String );

    if(!res)  

		{

     	_LIT(Kerr , "Failed to read interface name from ini file.") ;

     	INFO_PRINTF1(Kerr) ;

     	return KErrGeneral ;

		}

	TBuf8<256> asciiBuffer;

	asciiBuffer.Copy(String);

	TInt len = asciiBuffer.Length();

	Mem::Copy(IfName, asciiBuffer.Ptr(), len);

	IfName[len] = 0;	

	StripStar(IfName);

	if_nametoindex(IfName);

	return ret;

	}

TInt CTestIfioctls::TestSiocGIfIndex(  )

	{

	TInt ret = KErrNone;

	struct ifreq ifr;

	int sockfd;

	TPtrC String;

	_LIT( KString, "String" );

    TBool res = GetStringFromConfig(ConfigSection(), KString, String );

    if(!res)  

		{

     	_LIT(Kerr , "Failed to read interface name from ini file.") ;

     	INFO_PRINTF1(Kerr) ;

     	return KErrGeneral ;

		}

	TBuf8<256> asciiBuffer;

	 asciiBuffer.Copy(String);

	TInt len = asciiBuffer.Length();

	Mem::Copy(ifr.ifr_name, asciiBuffer.Ptr(), len);

	ifr.ifr_name[len] = 0;

	StripStar(ifr.ifr_name);

	sockfd = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);	

	*(ifr.ifr_name + sizeof(ifr.ifr_name) - 1 ) = '\0';

	if (ioctl(sockfd, SIOCGIFINDEX, &ifr) != -1)

		{

		ret = KErrIoctl;

		}

	close(sockfd);

	return ret;

	}

TInt CTestIfioctls::ConnectToIpUsingConnection(  )

	{

	ifreq ifr;

	TInt sockfd;

	TInt ret = KErrNone;

	struct sockaddr_in destAddr, selfAddr;	

	TPtrC String = NULL ;

	// Name of the interface

	TPtrC IfaceName;

	_LIT( KIfaceName, "IfaceName" );

    TBool res = GetStringFromConfig(ConfigSection(), KIfaceName, IfaceName);

    if(!res)  

		{

     	_LIT(Kerr , "Failed to read interface name from ini file.") ;

     	INFO_PRINTF1(Kerr) ;

     	return KErrGeneral ;

		}

	TBuf8<256> asciiBuffer;

	 asciiBuffer.Copy(IfaceName);

	TInt len = asciiBuffer.Length();

	Mem::Copy(ifr.ifr_name, asciiBuffer.Ptr(), len);

	ifr.ifr_name[len] = 0;

	StripStar(ifr.ifr_name);

	sockfd = socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP);	

    if (sockfd < 0)

        {

        ret = KErrSocket;

        goto close;

        }

	ret = ioctl(sockfd,SIOCSIFNAME, &ifr);

	if (ret != KErrNone)

		{

		ret = KErrIoctl;

		goto close;

		}

	ret = ioctl(sockfd, SIOCIFSTART , &ifr);

	if (ret != KErrNone)

		{

		goto close;

		}

	selfAddr.sin_family = AF_INET;

	selfAddr.sin_addr.s_addr = INADDR_ANY;

	selfAddr.sin_port = htons(KTestPort);	/* echo */

	ret = bind(sockfd,(struct sockaddr*)&selfAddr, sizeof(selfAddr));

	if (ret != KErrNone)

		{

		ret = KErrBind;

		goto close;

		}

	destAddr.sin_family = AF_INET;

	char ipaddr[20];

	_LIT( KString, "String" );

    res = GetStringFromConfig(ConfigSection(), KString, String );

    if(!res)  

		{

     	_LIT(Kerr , "Failed to read interface name from ini file.") ;

     	INFO_PRINTF1(Kerr) ;

     	return KErrGeneral ;

		}

	asciiBuffer.Copy(String);

	len = asciiBuffer.Length();

	Mem::Copy(ipaddr, asciiBuffer.Ptr(), len);

	ipaddr[len] = 0;

	destAddr.sin_addr.s_addr = inet_addr(ipaddr);

	destAddr.sin_port = htons(KTestPort);	/* http */

	ret = connect(sockfd, (struct sockaddr*)&destAddr, sizeof(destAddr));

	if (ret != KErrNone)

		{