/*

* Copyright (c) 2005-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:   

* System Includes

*

*/

#include <assert.h>

#include <time.h>

/*******************************************************************************

 *

 * Local Includes

 *

 ******************************************************************************/

#include "strncpynt.h"

#include "CForeignAgentServiceStub.h"

#include "CCFacontroller.h"

#include "../../Core/UCCS_ServiceValues.h"

#include "../../Core/UCCS_ErrorCodes.h"

/*******************************************************************************

 *

 * Definitions

 *

 ******************************************************************************/

#define MAXBUFFERSIZE	2048

/*******************************************************************************

 *

 * Macro Functions

 *

 ******************************************************************************/

/*******************************************************************************

 *

 * Constructor / Destructor

 *

 ******************************************************************************/

CForeignAgentServiceStub::CForeignAgentServiceStub()

{

	iClientForeignAgent = new CCFacontroller();

	assert( iClientForeignAgent != NULL );

}

CForeignAgentServiceStub::~CForeignAgentServiceStub()

{

	delete iClientForeignAgent;

}

/*******************************************************************************

 *

 * Startup / Shutdown

 *

 ******************************************************************************/

int CForeignAgentServiceStub::StartUccsService( char *aHostName, int *aErrorCode, int *aUnused )

{

	int client_stub_error;

	// check params

	assert( aHostName != NULL );

	assert( aErrorCode != NULL );

	*aErrorCode = 0;

	//copy to class variable so that startRPCservice can use it later on

	iHostName = aHostName;

	// connect to the remote service

	client_stub_error = iClientForeignAgent->Connect( iHostName );

	// return the result

	return client_stub_error;

}

int CForeignAgentServiceStub::StopUccsService( int *aErrorCode, int *aUnused )

{

	int client_stub_error;

	// check params

	assert( aErrorCode != NULL );

	*aErrorCode = 0;

	// shutdown the stub -- force it to close

	client_stub_error = iClientForeignAgent->Disconnect();

	// done

	return client_stub_error;

}

/*******************************************************************************

 *

 * IssueCommand

 *

 ******************************************************************************/

CDataRecord* CForeignAgentServiceStub::IssueCommand( CDataRecord* aRequest )

{

	int i, err, client_stub_error, method_id = -1;

	CDataRecord *request_reply;

	char *tmp_string;

	int rv_integer, sarg_integer;

	TComponentList rv_component_list;

	TOptionDesc sarg_option;

	TResult rv_result;

	TStartupInfo sarg_startup_info;

	TFaStatusInfo rv_fastatus;

	TFaTunnelID sarg_tunnel_id;

	TFaTunnelList rv_tunnel_list;

	TTimeoutRequest sarg_timeout;

	TStartAgentRequest sarg_start_agent_request;

	TFaTunnelID *tmp_tunnel_id;

	TGetTunnelRequest sarg_get_tunnel;

	TFaTunnelInfo rv_tunnel_info;

	// check params

	assert( aRequest != NULL );

	// create a standard reply 

	request_reply = CreateBaseReply( aRequest );

	assert( request_reply != NULL );

	// get and check the method_id

	err = request_reply->GetFieldAsInt( "METHODID", &method_id );

	if( method_id == -1 ) {

		UpdateCompletionCode( request_reply, ERR_INVALID_METHOD );

		return request_reply;

	}

	// now dispatch and call the appropriate method

	switch( method_id ) {

	// ss_startuprpcservice

	case 1:

		// extract the parameters

		GETINTEGERARGUMENT( "BASEINTERFACEINDEX", &(sarg_startup_info.iBaseInterfaceIndex), 1, 0, aRequest, request_reply );

		GETINTEGERARGUMENT( "NETMASK", &(sarg_startup_info.iNetworkMask), 2, 0, aRequest, request_reply );

		GETINTEGERARGUMENT( "STARTHOSTADDRESSRANGE", &(sarg_startup_info.iStartHostAddressRange), 3, 0, aRequest, request_reply );

		GETINTEGERARGUMENT( "STOPHOSTADDRESSRANGE", &(sarg_startup_info.iStopHostAddressRange), 4, 0, aRequest, request_reply );

		// make the call and update the return value

		client_stub_error = iClientForeignAgent->ss_startuprpcservice( sarg_startup_info, &rv_integer );

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_integer );

		break;

	// sc_shutdownrpcservice

	case 2:

		// extract the parameters

		GETINTEGERARGUMENT( "FORCE", &sarg_integer, 1, 1, aRequest, request_reply );

		// make the call and update the return value

		client_stub_error = iClientForeignAgent->sc_shutdownrpcservice( sarg_integer, &rv_integer );

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_integer );

		break;

	// list_devices

	case 30:

		// make the call and update the return value

		client_stub_error = iClientForeignAgent->list_devices( &rv_component_list );

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "AGENTCOUNT", rv_component_list.TComponentList_len );

		for( i = 0; i < rv_component_list.TComponentList_len; i++ ) {

			AddIteratedIntegerFieldName( "AGENTID", i, (rv_component_list.TComponentList_val)[i], request_reply );

		}

		break;		

	// cstr_createagent

	case 31:

		//make the call and update the return value

		client_stub_error = iClientForeignAgent->cstr_createagent( &rv_result ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_result.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );

		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );

		break;

	// dstr_removeagent

	case 32:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );

		//make the call and update the return value

		client_stub_error = iClientForeignAgent->dstr_removeagent( sarg_integer, &rv_integer ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_integer );

		break;

	// startmobileagent

	case 3:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &(sarg_start_agent_request.iAgentID), 1, 0, aRequest, request_reply );

		GETSTRINGARGUMENT( "INTERFACE", &tmp_string, 2, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_start_agent_request.iLowerInterface, tmp_string, X_MAXINTERFACENAMESIZE );

		GETINTEGERARGUMENT( "SOLICITATIONMODE", (int*)&(sarg_start_agent_request.iSolicitationMode), 3, 0, aRequest, request_reply );

		GETINTEGERARGUMENT( "INTERVAL", &(sarg_start_agent_request.iSolicitationInterval), 4, 1, aRequest, request_reply );

		//make the call and update the return value

		client_stub_error = iClientForeignAgent->startmobileagent( sarg_start_agent_request, &rv_result ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_result.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );

		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );

		break;

	// stopmobileagent

	case 4: 

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );

		//make the call and update the return value

		client_stub_error = iClientForeignAgent->stopmobileagent( sarg_integer, &rv_result ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_result.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );

		break;

	// getmobileagentstatus

	case 5:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );

		// make the call and update the return value

		client_stub_error = iClientForeignAgent->getmobileagentstatus( sarg_integer, &rv_result ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_result.iServiceResult );

		request_reply->NewField( "FOREIGN_AGENT_PROCESS_STATUS", rv_result.iData0 );

		break;

	// setsingleoption

	case 6:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &(sarg_option.iAgentID), 1, 0, aRequest, request_reply );

		GETSTRINGARGUMENT( "TOKEN", &tmp_string, 2, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_option.iOptionToken, tmp_string, X_MAXOPTIONTOKENSIZE );

		GETSTRINGARGUMENT( "VALUE", &tmp_string, 3, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_option.iOptionValue, tmp_string, X_MAXOPTIONTOKENSIZE );

		sarg_option.iOptionBlockStart[0] = sarg_option.iOptionBlockEnd[0] = 0;

		// make the call and update the return value

		client_stub_error = iClientForeignAgent->setsingleoption( sarg_option, &rv_result ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_result.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );

		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );

		break;

	// removesingleoption

	case 33:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &(sarg_option.iAgentID), 1, 0, aRequest, request_reply );

		GETSTRINGARGUMENT( "TOKEN", &tmp_string, 2, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_option.iOptionToken, tmp_string, X_MAXOPTIONTOKENSIZE );

		sarg_option.iOptionValue[0] = sarg_option.iOptionBlockStart[0] = sarg_option.iOptionBlockEnd[0] = 0;

		// make the call and update the return value

		client_stub_error = iClientForeignAgent->removesingleoption( sarg_option, &rv_result ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_result.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );

		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );

		break;

	// addlistoption

	case 7:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &(sarg_option.iAgentID), 1, 0, aRequest, request_reply );

		GETSTRINGARGUMENT( "VALUE", &tmp_string, 2, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_option.iOptionValue, tmp_string, X_MAXOPTIONTOKENSIZE );

		GETSTRINGARGUMENT( "BLOCKSTART", &tmp_string, 2, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_option.iOptionBlockStart, tmp_string, X_MAXOPTIONTOKENSIZE );

		GETSTRINGARGUMENT( "BLOCKEND", &tmp_string, 2, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_option.iOptionBlockEnd, tmp_string, X_MAXOPTIONTOKENSIZE );

		sarg_option.iOptionToken[0] = 0;

		// make the call and update the return value

		client_stub_error = iClientForeignAgent->addlistoption( sarg_option, &rv_result ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_result.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );

		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );

		break;

	// removelistoption

	case 8:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &(sarg_option.iAgentID), 1, 0, aRequest, request_reply );

		GETSTRINGARGUMENT( "TOKEN", &tmp_string, 2, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_option.iOptionToken, tmp_string, X_MAXOPTIONTOKENSIZE );

		GETSTRINGARGUMENT( "BLOCKSTART", &tmp_string, 2, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_option.iOptionBlockStart, tmp_string, X_MAXOPTIONTOKENSIZE );

		GETSTRINGARGUMENT( "BLOCKEND", &tmp_string, 2, 0, aRequest, request_reply );

		STRNCPY_NULL_TERMINATE( sarg_option.iOptionBlockEnd, tmp_string, X_MAXOPTIONTOKENSIZE );

		sarg_option.iOptionValue[0] = 0;

		// make the call and update the return value

		client_stub_error = iClientForeignAgent->removelistoption( sarg_option, &rv_result ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_result.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );

		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );

		break;

	// getstatus

	case 9:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );

		// make the call and update the return value

		client_stub_error = iClientForeignAgent->getstatus( sarg_integer, &rv_fastatus ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_fastatus.iCallResult.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_fastatus.iCallResult.iSubComponentResult );

		request_reply->NewField( "RESULT_DATA0", rv_fastatus.iCallResult.iData0 );

		request_reply->NewField( "RESULT_DATA1", rv_fastatus.iCallResult.iData1 );

		request_reply->NewField( "STATUS_ADVERTISEMENTS_SENT", rv_fastatus.iAdvertisementsSent );

		request_reply->NewField( "STATUS_DISCARDED_MALFORMED", rv_fastatus.iDiscardedMalformed );

		request_reply->NewField( "STATUS_DISCARDED_UNKNOWN_EXTENSION", rv_fastatus.iDiscardedUnknownExtension );

		request_reply->NewField( "STATUS_DISCARDED_VENDOR", rv_fastatus.iDiscardedVendor );

		request_reply->NewField( "STATUS_PENDING_REGISTRATION_REQUESTS", rv_fastatus.iPendingRegistrationRequests );

		request_reply->NewField( "STATUS_REPLYS_ACCEPTED", rv_fastatus.iReplysAccepted );

		request_reply->NewField( "STATUS_REPLYS_REJECTED", rv_fastatus.iReplysRejected );

		request_reply->NewField( "STATUS_REQUESTS_ACCEPTED", rv_fastatus.iRequestsAccepted );

		request_reply->NewField( "STATUS_REQUESTS_REJECTED", rv_fastatus.iRequestsRejected );

		request_reply->NewField( "STATUS_TUNNEL_COUNT", rv_fastatus.iTunnelCount );

		break;

	// destroytunnelid

	case 11:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &(sarg_tunnel_id.iAgentID), 1, 0, aRequest, request_reply );

		GETSTRINGARGUMENT( "MNADDR", &tmp_string, 2, 0, aRequest, request_reply );

		sarg_tunnel_id.iMobileNodeAddress = AddressToInt( tmp_string );

		// make the call

		client_stub_error = iClientForeignAgent->destroytunnelid( sarg_tunnel_id, &rv_result ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "RESULT", rv_result.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );

		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );

		request_reply->NewField( "RESULT_DATA1", rv_result.iData1 );

		break;

	// listtunnels

	case 12:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );

		//make the call and update the return value

		client_stub_error = iClientForeignAgent->listtunnels( sarg_integer, &rv_tunnel_list ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the return values

		request_reply->NewField( "TUNNEL_COUNT", rv_tunnel_list.TFaTunnelList_len );

		for( i = 0; i < (signed)(rv_tunnel_list.TFaTunnelList_len); i++ ) {

			tmp_tunnel_id = &((rv_tunnel_list.TFaTunnelList_val)[i]);

			AddIteratedIntegerFieldName( "TUNNEL_ID", i, tmp_tunnel_id->iID, request_reply );

			AddIteratedStringFieldName( "TUNNEL_MOBILE_NODE_HOME_ADDRESS", i, IntToAddress(tmp_tunnel_id->iMobileNodeAddress), request_reply );

			AddIteratedStringFieldName( "TUNNEL_HOME_AGENT_ADDRESS", i, IntToAddress(tmp_tunnel_id->iHomeAgentAddress), request_reply );

		}		

		// free the memory (if any was allocated)

		if( rv_tunnel_list.TFaTunnelList_len > 0 ) {

			XdrFree( (char**)&(rv_tunnel_list.TFaTunnelList_val), (int*)&(rv_tunnel_list.TFaTunnelList_len) );

		}

		break;

	// settimeout

	case 13:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &(sarg_timeout.iAgentID), 1, 0, aRequest, request_reply );

		GETINTEGERARGUMENT( "TIMEOUT", &(sarg_timeout.iTimeout), 2, 0, aRequest, request_reply );

		//make the call and update the return value

		client_stub_error = iClientForeignAgent->settimeout( sarg_timeout ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		break;

	// gettunnelinfo

	case 15:

		// extract the parameters

		GETINTEGERARGUMENT( "AGENTID", &(sarg_get_tunnel.iAgentID), 1, 0, aRequest, request_reply );

		GETSTRINGARGUMENT( "MOBILE_NODE_HOME_ADDRESS", &tmp_string, 2, 0, aRequest, request_reply );

		sarg_get_tunnel.iMobileNodeAddress = AddressToInt( tmp_string );

		//make the call and update the return value

		client_stub_error = iClientForeignAgent->gettunnelinfo( sarg_get_tunnel, &rv_tunnel_info ); 

		UpdateCompletionCode( request_reply, client_stub_error );

		if( client_stub_error != ERR_NONE ) {

			break;

		}

		// set the result

		request_reply->NewField( "RESULT", rv_tunnel_info.iCallResult.iServiceResult );

		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_tunnel_info.iCallResult.iSubComponentResult );

		request_reply->NewField( "RESULT_DATA0", rv_tunnel_info.iCallResult.iData0 );

		request_reply->NewField( "RESULT_DATA1", rv_tunnel_info.iCallResult.iData1 );

		request_reply->NewField( "MOBILE_NODE_ADDRESS", IntToAddress(rv_tunnel_info.iMobileNodeAddress) );

		request_reply->NewField( "CAREOF_ADDRESS", IntToAddress(rv_tunnel_info.iCareofAddress) );

		request_reply->NewField( "HOME_AGENT_ADDRESS", IntToAddress(rv_tunnel_info.iHomeAgentAddress) );

		request_reply->NewField( "CREATION_TIME", ctime((time_t*)&(rv_tunnel_info.iCreationTime)) );

		request_reply->NewField( "EXPIRATION_TIME", ctime((time_t*)&(rv_tunnel_info.iExpirationTime)) );

		request_reply->NewField( "REFRESH_TIME", ctime((time_t*)&(rv_tunnel_info.iRefreshTime)) );

		request_reply->NewField( "LAST_TIMESTAMP", ctime((time_t*)&(rv_tunnel_info.iLastTimestamp)) );

		request_reply->NewField( "HOME_AGENT_ID", rv_tunnel_info.iPrivateHomeAgentID );

		request_reply->NewField( "SPI", rv_tunnel_info.iSPI );

		request_reply->NewField( "TIMEOUT", rv_tunnel_info.iTimeout );

		break;

	// Any other method id results in an invalid method id result

	default:

		UpdateCompletionCode( request_reply, ERR_INVALID_METHOD );