testexecmgmt/ucc/Source/Uccs.v2/ServiceStubs/HomeAgent/CHomeAgentServiceStub.cpp
changeset 0 3da2a79470a7
equal deleted inserted replaced
-1:000000000000 0:3da2a79470a7
       
     1 /*
       
     2 * Copyright (c) 2005-2009 Nokia Corporation and/or its subsidiary(-ies).
       
     3 * All rights reserved.
       
     4 * This component and the accompanying materials are made available
       
     5 * under the terms of "Eclipse Public License v1.0"
       
     6 * which accompanies this distribution, and is available
       
     7 * at the URL "http://www.eclipse.org/legal/epl-v10.html".
       
     8 *
       
     9 * Initial Contributors:
       
    10 * Nokia Corporation - initial contribution.
       
    11 *
       
    12 * Contributors:
       
    13 *
       
    14 * Description:   
       
    15 * System Includes
       
    16 *
       
    17 */
       
    18 
       
    19 
       
    20 
       
    21 
       
    22 #include <assert.h>
       
    23 #include <time.h>
       
    24 
       
    25 
       
    26 /*******************************************************************************
       
    27  *
       
    28  * Local Includes
       
    29  *
       
    30  ******************************************************************************/
       
    31 #include "strncpynt.h"
       
    32 #include "CHomeAgentServiceStub.h"
       
    33 #include "CCHacontroller.h"
       
    34 #include "../../Core/UCCS_ServiceValues.h"
       
    35 #include "../../Core/UCCS_ErrorCodes.h"
       
    36 
       
    37 
       
    38 /*******************************************************************************
       
    39  *
       
    40  * Definitions
       
    41  *
       
    42  ******************************************************************************/
       
    43 #define MAXBUFFERSIZE	2048
       
    44 
       
    45 
       
    46 /*******************************************************************************
       
    47  *
       
    48  * Macro Functions
       
    49  *
       
    50  ******************************************************************************/
       
    51 																		
       
    52 /*******************************************************************************
       
    53  *
       
    54  * Constructor / Destructor
       
    55  *
       
    56  ******************************************************************************/
       
    57 CHomeAgentServiceStub::CHomeAgentServiceStub()
       
    58 {
       
    59 	iClientHomeAgent = new CCHacontroller();
       
    60 	assert( iClientHomeAgent != NULL );
       
    61 }
       
    62 
       
    63 
       
    64 CHomeAgentServiceStub::~CHomeAgentServiceStub()
       
    65 {
       
    66 	delete iClientHomeAgent;
       
    67 }
       
    68 
       
    69 
       
    70 /*******************************************************************************
       
    71  *
       
    72  * Startup / Shutdown
       
    73  *
       
    74  ******************************************************************************/
       
    75 int CHomeAgentServiceStub::StartUccsService( char *aHostName, int *aErrorCode, int *aUnused )
       
    76 {
       
    77 	int client_stub_error;
       
    78 	
       
    79 	// check params
       
    80 	assert( aHostName != NULL );
       
    81 	assert( aErrorCode != NULL );
       
    82 	*aErrorCode = 0;
       
    83 	
       
    84 	// connect to the remote service
       
    85 	client_stub_error = iClientHomeAgent->Connect( aHostName );
       
    86 
       
    87 	// return the result
       
    88 	return client_stub_error;
       
    89 }
       
    90 
       
    91 
       
    92 int CHomeAgentServiceStub::StopUccsService( int *aErrorCode, int *aUnused )
       
    93 {
       
    94 	int client_stub_error;
       
    95 
       
    96 	// check params
       
    97 	assert( aErrorCode != NULL );
       
    98 	*aErrorCode = 0;
       
    99 
       
   100 	// shutdown the stub -- force it to close
       
   101 	client_stub_error = iClientHomeAgent->Disconnect();
       
   102 	
       
   103 	// done
       
   104 	return client_stub_error;
       
   105 }
       
   106 
       
   107 
       
   108 /*******************************************************************************
       
   109  *
       
   110  * IssueCommand
       
   111  *
       
   112  ******************************************************************************/
       
   113 CDataRecord* CHomeAgentServiceStub::IssueCommand( CDataRecord* aRequest )
       
   114 {
       
   115 	int i, err, client_stub_error, method_id = -1, virtual_network_address;
       
   116 	char *tmp_string;
       
   117 	CDataRecord *request_reply;
       
   118 
       
   119 	TStartupInfo arg_startup_info;
       
   120 	int sarg_integer;
       
   121 	TOptionDesc sarg_option;
       
   122 	THaTunnelID sarg_tunnel_id;
       
   123 	TTimeoutRequest sarg_timeout;
       
   124 	TGetTunnelRequest sarg_get_tunnel;
       
   125 
       
   126 	THaStatus rv_hastatus;
       
   127 	TResult rv_result;
       
   128 	TComponentList rv_component_list;
       
   129 	int rv_integer;
       
   130 	THaTunnelList rv_tunnels;
       
   131 	THaTunnelInfo rv_tunnel_info;
       
   132  	
       
   133 	// check params
       
   134 	assert( aRequest != NULL );
       
   135 
       
   136 	// create a standard reply 
       
   137 	request_reply = CreateBaseReply( aRequest );
       
   138 	assert( request_reply != NULL );
       
   139 
       
   140 	// get and check the method_id
       
   141 	err = request_reply->GetFieldAsInt( "METHODID", &method_id );
       
   142 	if( method_id == -1 ) {
       
   143 		UpdateCompletionCode( request_reply, ERR_INVALID_METHOD );
       
   144 		return request_reply;
       
   145 	}
       
   146 
       
   147 	// now dispatch and call the appropriate method
       
   148 	switch( method_id ) {
       
   149 
       
   150 	// ss_startuprpcservice
       
   151 	case 1:
       
   152 
       
   153 		// extract the parameters
       
   154 		GETINTEGERARGUMENT( "BASEINTERFACE", &(arg_startup_info.iBaseInterfaceIndex), 1, 0, aRequest, request_reply );
       
   155 		GETINTEGERARGUMENT( "BASENETMASK", &(arg_startup_info.iBaseInterfaceNetworkMask), 2, 0, aRequest, request_reply );
       
   156 		GETINTEGERARGUMENT( "BASESTARTRANGE", &(arg_startup_info.iBaseInterfaceStartHostAddressRange), 3, 0, aRequest, request_reply );
       
   157 		GETINTEGERARGUMENT( "BASEENDRANGE", &(arg_startup_info.iBaseInterfaceStopHostAddressRange), 4, 0, aRequest, request_reply );
       
   158 		GETSTRINGARGUMENT( "VIRTUALNETWORKPREFIX", &tmp_string, 5, 0, aRequest, request_reply );
       
   159 		arg_startup_info.iVirtualNetworkPrefix = inet_addr( tmp_string );
       
   160 		GETINTEGERARGUMENT( "VIRTUALNETWORKMASK", &(arg_startup_info.iVirtualNetworkPrefixMask), 6, 0, aRequest, request_reply );
       
   161 		GETINTEGERARGUMENT( "VIRTUALNETWORKSIZE", &(arg_startup_info.iVirtualNetworkAllocSize), 7, 0, aRequest, request_reply );
       
   162 
       
   163 		// make the call and update the return value
       
   164 		client_stub_error = iClientHomeAgent->ss_startuprpcservice( arg_startup_info, &rv_integer );
       
   165 		UpdateCompletionCode( request_reply, client_stub_error );		
       
   166 		if( client_stub_error != ERR_NONE ) {
       
   167 			break;
       
   168 		}
       
   169 
       
   170 		// set any return information
       
   171 		request_reply->NewField( "RESULT", rv_integer );
       
   172 		break;
       
   173 	
       
   174 
       
   175 	// sc_shutdownrpcservice
       
   176 	case 2:
       
   177 				
       
   178 		// extract the parameters
       
   179 		GETINTEGERARGUMENT( "FORCE", &sarg_integer, 1, 1, aRequest, request_reply );
       
   180 		
       
   181 		// make the call and update the return value
       
   182 		client_stub_error = iClientHomeAgent->sc_shutdownrpcservice( sarg_integer, &rv_integer );
       
   183 		UpdateCompletionCode( request_reply, client_stub_error );
       
   184 		if( client_stub_error != ERR_NONE ) {
       
   185 			break;
       
   186 		}
       
   187 
       
   188 		// set the return values
       
   189 		request_reply->NewField( "RESULT", rv_integer );
       
   190 		break;
       
   191 
       
   192 
       
   193 	// list_devices
       
   194 	case 30:
       
   195 
       
   196 		// make the call and update the return value
       
   197 		client_stub_error = iClientHomeAgent->list_devices( &rv_component_list );
       
   198 		UpdateCompletionCode( request_reply, client_stub_error );
       
   199 		if( client_stub_error != ERR_NONE ) {
       
   200 			break;
       
   201 		}
       
   202 
       
   203 		// set the return values
       
   204 		request_reply->NewField( "AGENTCOUNT", rv_component_list.TComponentList_len );
       
   205 		for( i = 0; i < rv_component_list.TComponentList_len; i++ ) {
       
   206 			AddIteratedIntegerFieldName( "AGENTID", i, (rv_component_list.TComponentList_val)[i], request_reply );
       
   207 		}
       
   208 		break;		
       
   209 
       
   210 
       
   211 	// cstr_createagent
       
   212 	case 31:
       
   213 
       
   214 		//make the call and update the return value
       
   215 		client_stub_error = iClientHomeAgent->cstr_createagent( &rv_result ); 
       
   216 		UpdateCompletionCode( request_reply, client_stub_error );
       
   217 		if( client_stub_error != ERR_NONE ) {
       
   218 			break;
       
   219 		}
       
   220 
       
   221 		// set the return values
       
   222 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   223 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );
       
   224 		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );
       
   225 		break;
       
   226 
       
   227 
       
   228 	// dstr_removeagent
       
   229 	case 32:
       
   230 
       
   231 		// extract the parameters
       
   232 		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );
       
   233 
       
   234 		//make the call and update the return value
       
   235 		client_stub_error = iClientHomeAgent->dstr_removeagent( sarg_integer, &rv_result ); 
       
   236 		UpdateCompletionCode( request_reply, client_stub_error );
       
   237 		if( client_stub_error != ERR_NONE ) {
       
   238 			break;
       
   239 		}
       
   240 
       
   241 		// set the return values
       
   242 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   243 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );
       
   244 		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );
       
   245 		break;
       
   246 
       
   247 
       
   248 	// startmobileagent
       
   249 	case 3:
       
   250 
       
   251 		// extract the parameters
       
   252 		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );
       
   253 
       
   254 		//make the call and update the return value
       
   255 		client_stub_error = iClientHomeAgent->startmobileagent( sarg_integer, &rv_result ); 
       
   256 		UpdateCompletionCode( request_reply, client_stub_error );
       
   257 		if( client_stub_error != ERR_NONE ) {
       
   258 			break;
       
   259 		}
       
   260 
       
   261 		// set the return values
       
   262 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   263 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );
       
   264 		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );
       
   265 		break;
       
   266 
       
   267 
       
   268 	// stopmobileagent
       
   269 	case 4:
       
   270 
       
   271 		// extract the parameters
       
   272 		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );
       
   273 
       
   274 		//make the call and update the return value
       
   275 		client_stub_error = iClientHomeAgent->stopmobileagent( sarg_integer, &rv_result ); 
       
   276 		UpdateCompletionCode( request_reply, client_stub_error );
       
   277 		if( client_stub_error != ERR_NONE ) {
       
   278 			break;
       
   279 		}
       
   280 
       
   281 		// set the return values
       
   282 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   283 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );
       
   284 		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );
       
   285 		break;
       
   286 
       
   287 
       
   288 	// getmobileagentstatus
       
   289 	case 5:
       
   290 
       
   291 		// extract the parameters
       
   292 		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );
       
   293 
       
   294 		// make the call and update the return value
       
   295 		client_stub_error = iClientHomeAgent->getmobileagentstatus( sarg_integer, &rv_result ); 
       
   296 		UpdateCompletionCode( request_reply, client_stub_error );
       
   297 		if( client_stub_error != ERR_NONE ) {
       
   298 			break;
       
   299 		}
       
   300 
       
   301 		// set the return values
       
   302 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   303 		request_reply->NewField( "HOME_AGENT_PROCESS_STATUS", rv_result.iData0 );
       
   304 		break;
       
   305 
       
   306 
       
   307 	// setsingleoption
       
   308 	case 6:
       
   309 
       
   310 		// extract the parameters
       
   311 		GETINTEGERARGUMENT( "AGENTID", &(sarg_option.iAgentID), 1, 0, aRequest, request_reply );
       
   312 		GETSTRINGARGUMENT( "TOKEN", &tmp_string, 2, 0, aRequest, request_reply );
       
   313 		STRNCPY_NULL_TERMINATE( sarg_option.iOptionToken, tmp_string, X_MAXOPTIONTOKENSIZE );
       
   314 		GETSTRINGARGUMENT( "VALUE", &tmp_string, 3, 0, aRequest, request_reply );
       
   315 		STRNCPY_NULL_TERMINATE( sarg_option.iOptionValue, tmp_string, X_MAXOPTIONTOKENSIZE );
       
   316 		sarg_option.iOptionBlockStart[0] = sarg_option.iOptionBlockEnd[0] = 0;
       
   317 
       
   318 		// make the call and update the return value
       
   319 		client_stub_error = iClientHomeAgent->setsingleoption( sarg_option, &rv_result ); 
       
   320 		UpdateCompletionCode( request_reply, client_stub_error );
       
   321 		if( client_stub_error != ERR_NONE ) {
       
   322 			break;
       
   323 		}
       
   324 
       
   325 		// set the return values
       
   326 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   327 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );
       
   328 		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );
       
   329 		break;
       
   330 
       
   331 
       
   332 	// removesingleoption
       
   333 	case 33:
       
   334 
       
   335 		// extract the parameters
       
   336 		GETINTEGERARGUMENT( "AGENTID", &(sarg_option.iAgentID), 1, 0, aRequest, request_reply );
       
   337 		GETSTRINGARGUMENT( "TOKEN", &tmp_string, 2, 0, aRequest, request_reply );
       
   338 		STRNCPY_NULL_TERMINATE( sarg_option.iOptionToken, tmp_string, X_MAXOPTIONTOKENSIZE );
       
   339 		sarg_option.iOptionValue[0] = sarg_option.iOptionBlockStart[0] = sarg_option.iOptionBlockEnd[0] = 0;
       
   340 
       
   341 		// make the call and update the return value
       
   342 		client_stub_error = iClientHomeAgent->removesingleoption( sarg_option, &rv_result ); 
       
   343 		UpdateCompletionCode( request_reply, client_stub_error );
       
   344 		if( client_stub_error != ERR_NONE ) {
       
   345 			break;
       
   346 		}
       
   347 
       
   348 		// set the return values
       
   349 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   350 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );
       
   351 		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );
       
   352 		break;
       
   353 
       
   354 
       
   355 	// addlistoption
       
   356 	case 7:
       
   357 
       
   358 		// extract the parameters
       
   359 		GETINTEGERARGUMENT( "AGENTID", &(sarg_option.iAgentID), 1, 0, aRequest, request_reply );
       
   360 		GETSTRINGARGUMENT( "VALUE", &tmp_string, 2, 0, aRequest, request_reply );
       
   361 		STRNCPY_NULL_TERMINATE( sarg_option.iOptionValue, tmp_string, X_MAXOPTIONTOKENSIZE );
       
   362 		GETSTRINGARGUMENT( "BLOCKSTART", &tmp_string, 2, 0, aRequest, request_reply );
       
   363 		STRNCPY_NULL_TERMINATE( sarg_option.iOptionBlockStart, tmp_string, X_MAXOPTIONTOKENSIZE );
       
   364 		GETSTRINGARGUMENT( "BLOCKEND", &tmp_string, 2, 0, aRequest, request_reply );
       
   365 		STRNCPY_NULL_TERMINATE( sarg_option.iOptionBlockEnd, tmp_string, X_MAXOPTIONTOKENSIZE );
       
   366 		sarg_option.iOptionToken[0] = 0;
       
   367 	
       
   368 		// make the call and update the return value
       
   369 		client_stub_error = iClientHomeAgent->addlistoption( sarg_option, &rv_result ); 
       
   370 		UpdateCompletionCode( request_reply, client_stub_error );
       
   371 		if( client_stub_error != ERR_NONE ) {
       
   372 			break;
       
   373 		}
       
   374 
       
   375 		// set the return values
       
   376 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   377 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );
       
   378 		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );
       
   379 		break;
       
   380 
       
   381 
       
   382 	// removelistoption
       
   383 	case 8:
       
   384 
       
   385 		// extract the parameters
       
   386 		GETINTEGERARGUMENT( "AGENTID", &(sarg_option.iAgentID), 1, 0, aRequest, request_reply );
       
   387 		GETSTRINGARGUMENT( "TOKEN", &tmp_string, 2, 0, aRequest, request_reply );
       
   388 		STRNCPY_NULL_TERMINATE( sarg_option.iOptionToken, tmp_string, X_MAXOPTIONTOKENSIZE );
       
   389 		GETSTRINGARGUMENT( "BLOCKSTART", &tmp_string, 2, 0, aRequest, request_reply );
       
   390 		STRNCPY_NULL_TERMINATE( sarg_option.iOptionBlockStart, tmp_string, X_MAXOPTIONTOKENSIZE );
       
   391 		GETSTRINGARGUMENT( "BLOCKEND", &tmp_string, 2, 0, aRequest, request_reply );
       
   392 		STRNCPY_NULL_TERMINATE( sarg_option.iOptionBlockEnd, tmp_string, X_MAXOPTIONTOKENSIZE );
       
   393 		sarg_option.iOptionValue[0] = 0;
       
   394 	
       
   395 		// make the call and update the return value
       
   396 		client_stub_error = iClientHomeAgent->removelistoption( sarg_option, &rv_result ); 
       
   397 		UpdateCompletionCode( request_reply, client_stub_error );
       
   398 		if( client_stub_error != ERR_NONE ) {
       
   399 			break;
       
   400 		}
       
   401 
       
   402 		// set the return values
       
   403 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   404 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );
       
   405 		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );
       
   406 		break;
       
   407 
       
   408 
       
   409 	// getstatus
       
   410 	case 9:
       
   411 
       
   412 		// extract the parameters
       
   413 		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );
       
   414 
       
   415 		// make the call and update the return value
       
   416 		client_stub_error = iClientHomeAgent->getstatus( sarg_integer, &rv_hastatus ); 
       
   417 		UpdateCompletionCode( request_reply, client_stub_error );
       
   418 		if( client_stub_error != ERR_NONE ) {
       
   419 			break;
       
   420 		}
       
   421 
       
   422 		// set the return values
       
   423 		request_reply->NewField( "RESULT", rv_hastatus.iCallResult.iServiceResult );
       
   424 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_hastatus.iCallResult.iSubComponentResult );
       
   425 		request_reply->NewField( "RESULT_DATA0", rv_hastatus.iCallResult.iData0 );
       
   426 		request_reply->NewField( "RESULT_DATA1", rv_hastatus.iCallResult.iData1 );
       
   427 		request_reply->NewField( "STATUS_HOME_AGENT_ADDRESS", IntToAddress(rv_hastatus.iHomeAgentAddress) );
       
   428 		request_reply->NewField( "STATUS_VIRTUAL_NETWORK_SIZE", rv_hastatus.iVirtualNetworkSize );
       
   429 		for( i = 0; i < rv_hastatus.iVirtualNetworkSize; i++ ) {
       
   430 			virtual_network_address = ntohl( rv_hastatus.iVirtualNetworkStartAddress );
       
   431 			virtual_network_address |= i;
       
   432 			virtual_network_address = htonl( virtual_network_address );
       
   433 			AddIteratedStringFieldName( "VIRTUAL_NETWORK_ADDRESS", i, IntToAddress(virtual_network_address), request_reply );
       
   434 		}
       
   435 		request_reply->NewField( "STATUS_TUNNEL_COUNT", rv_hastatus.iTunnelCount );
       
   436 		request_reply->NewField( "STATUS_REQUESTS_ACCEPTED", rv_hastatus.iRequestsAccepted );
       
   437 		request_reply->NewField( "STATUS_REQUESTS_REJECTED", rv_hastatus.iRequestsRejected );
       
   438 		request_reply->NewField( "STATUS_DISCARDED_MALFORMED", rv_hastatus.iDiscardedMalformed );
       
   439 		request_reply->NewField( "STATUS_DISCARDED_UNKNOWN_EXTENSION", rv_hastatus.iDiscardedUnknownExtension );
       
   440 		request_reply->NewField( "STATUS_DISCARDED_VENDOR", rv_hastatus.iDiscardedVendor );
       
   441 		request_reply->NewField( "STATUS_ADVERTISEMENTS_SENT", rv_hastatus.iAdvertisementsSent );
       
   442 
       
   443 
       
   444 		break;
       
   445 		
       
   446 
       
   447 	// destroytunnelid
       
   448 	case 11:
       
   449 
       
   450 		// extract the parameters
       
   451 		GETINTEGERARGUMENT( "AGENTID", &(sarg_tunnel_id.iAgentID), 1, 0, aRequest, request_reply );
       
   452 		GETSTRINGARGUMENT( "MOBILE_NODE_ADDRESS", &tmp_string, 2, 0, aRequest, request_reply );
       
   453 		sarg_tunnel_id.iMobileNodeAddress = AddressToInt( tmp_string );
       
   454 
       
   455 		// make the call and update the return value
       
   456 		client_stub_error = iClientHomeAgent->destroytunnelid( sarg_tunnel_id, &rv_result ); 
       
   457 		UpdateCompletionCode( request_reply, client_stub_error );
       
   458 		if( client_stub_error != ERR_NONE ) {
       
   459 			break;
       
   460 		}
       
   461 
       
   462 		// set the return values
       
   463 		request_reply->NewField( "RESULT", rv_result.iServiceResult );
       
   464 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_result.iSubComponentResult );
       
   465 		request_reply->NewField( "RESULT_DATA0", rv_result.iData0 );
       
   466 		request_reply->NewField( "RESULT_DATA1", rv_result.iData1 );
       
   467 		break;
       
   468 
       
   469 
       
   470 	// listtunnels
       
   471 	case 12:
       
   472 
       
   473 		// extract the parameters
       
   474 		GETINTEGERARGUMENT( "AGENTID", &sarg_integer, 1, 0, aRequest, request_reply );
       
   475 
       
   476 		// make the call and update the return value
       
   477 		client_stub_error = iClientHomeAgent->listtunnels( sarg_integer, &rv_tunnels ); 
       
   478 		UpdateCompletionCode( request_reply, client_stub_error );
       
   479 		if( client_stub_error != ERR_NONE ) {
       
   480 			break;
       
   481 		}
       
   482 
       
   483 		// set the return values
       
   484 		request_reply->NewField( "TUNNEL_COUNT", rv_tunnels.THaTunnelList_len );
       
   485 		for( i = 0; i < (signed)(rv_tunnels.THaTunnelList_len); i++ ) {
       
   486 			AddIteratedIntegerFieldName( "TUNNEL_MOBILE_NODE_ADDRESS", i, ((rv_tunnels.THaTunnelList_val)[i]).iMobileNodeAddress, request_reply );
       
   487 		}		
       
   488 
       
   489 		// free the memory (if any was allocated)
       
   490 		if( rv_tunnels.THaTunnelList_len > 0 ) {
       
   491 			XdrFree( (char**)&(rv_tunnels.THaTunnelList_val), (int*)&(rv_tunnels.THaTunnelList_len) );
       
   492 		}
       
   493 		break;
       
   494 
       
   495 
       
   496 	// gettunnelinfo
       
   497 	case 14:
       
   498 
       
   499 		// extract the parameters
       
   500 		GETINTEGERARGUMENT( "AGENTID", &(sarg_get_tunnel.iAgentID), 1, 0, aRequest, request_reply );
       
   501 		GETSTRINGARGUMENT( "MOBILE_NODE_HOME_ADDRESS", &tmp_string, 2, 0, aRequest, request_reply );
       
   502 		sarg_get_tunnel.iMobileNodeAddress = AddressToInt( tmp_string );
       
   503 
       
   504 		// make the call and update the return value
       
   505 		client_stub_error = iClientHomeAgent->gettunnelinfo( sarg_get_tunnel, &rv_tunnel_info ); 
       
   506 		UpdateCompletionCode( request_reply, client_stub_error );
       
   507 		if( client_stub_error != ERR_NONE ) {
       
   508 			break;
       
   509 		}
       
   510 
       
   511 		// set the return values
       
   512 		request_reply->NewField( "RESULT", rv_tunnel_info.iCallResult.iServiceResult );
       
   513 		request_reply->NewField( "RESULT_SUB_COMPONENT", rv_tunnel_info.iCallResult.iSubComponentResult );
       
   514 		request_reply->NewField( "RESULT_DATA0", rv_tunnel_info.iCallResult.iData0 );
       
   515 		request_reply->NewField( "RESULT_DATA1", rv_tunnel_info.iCallResult.iData1 );
       
   516 		request_reply->NewField( "MOBILE_NODE_ADDRESS", IntToAddress(rv_tunnel_info.iMobileNodeAddress) );
       
   517 		request_reply->NewField( "CAREOF_ADDRESS", IntToAddress(rv_tunnel_info.iCareofAddress) );
       
   518 		request_reply->NewField( "HOME_AGENT_ADDRESS", IntToAddress(rv_tunnel_info.iHomeAgentAddress) );
       
   519 		request_reply->NewField( "CREATION_TIME", ctime((time_t*)&(rv_tunnel_info.iCreationTime)) );
       
   520 		request_reply->NewField( "EXPIRATION_TIME", ctime((time_t*)&(rv_tunnel_info.iExpirationTime)) );
       
   521 		request_reply->NewField( "REFRESH_TIME", ctime((time_t*)&(rv_tunnel_info.iRefreshTime)) );
       
   522 		request_reply->NewField( "LAST_TIMESTAMP", ctime((time_t*)&(rv_tunnel_info.iLastTimestamp)) );
       
   523 		request_reply->NewField( "SPI", rv_tunnel_info.iSPI );
       
   524 		request_reply->NewField( "TIMEOUT", rv_tunnel_info.iTimeout );
       
   525 		break;
       
   526 
       
   527 
       
   528 	// settimeout
       
   529 	case 13:
       
   530 
       
   531 		// extract the parameters
       
   532 		GETINTEGERARGUMENT( "AGENTID", &(sarg_timeout.iAgentID), 1, 0, aRequest, request_reply );
       
   533 		GETINTEGERARGUMENT( "TIMEOUT", &(sarg_timeout.iTimeout), 2, 0, aRequest, request_reply );
       
   534 
       
   535 		//make the call and update the return value
       
   536 		client_stub_error = iClientHomeAgent->settimeout( sarg_timeout ); 
       
   537 		UpdateCompletionCode( request_reply, client_stub_error );
       
   538 		if( client_stub_error != ERR_NONE ) {
       
   539 			break;
       
   540 		}
       
   541 		break;
       
   542 
       
   543 
       
   544 	// Any other method id results in an invalid method id result
       
   545 	default:
       
   546 		UpdateCompletionCode( request_reply, ERR_INVALID_METHOD );
       
   547 		break;
       
   548 	}
       
   549 
       
   550 	// everything should be handled above 
       
   551 	return request_reply;
       
   552 }
       
   553 
       
   554 
       
   555 /*******************************************************************************
       
   556  *
       
   557  * GetLastRPCError()
       
   558  *
       
   559  ******************************************************************************/
       
   560 char *CHomeAgentServiceStub::GetLastRPCError( int *aIntError )
       
   561 {
       
   562 	return iClientHomeAgent->GetLastRPCError( aIntError );
       
   563 }
       
   564 
       
   565 
       
   566 /*******************************************************************************
       
   567  *
       
   568  * GetStatus()
       
   569  *
       
   570  ******************************************************************************/
       
   571 int CHomeAgentServiceStub::GetStatus()
       
   572 {
       
   573 	assert( !"GetStatus() - is not implemented" );
       
   574 	return -1;
       
   575 }