anchor.diff:  	    ?debug("    data_link_bert_rpc_rpc:setup_data_link(): ---------------"),
   	    ?debug("    data_link_bert_rpc_rpc:setup_data_link():    Sending ping()"),
   	    ?debug("    data_link_bert_rpc_rpc:setup_data_link(): ---------------"),
  -	    nice_bert_rpc_rpc:cast_host(RemoteAddress, RemotePort, 
  +	    nice_bert_rpc:cast_host(RemoteAddress, RemotePort, 
   				    [tcp], data_link, ping, 
   				    [{LocalAddress, LocalPort}, 
   				     {RemoteAddress, RemotePort}]),
  
positive.code: 	    ?debug("    data_link_bert_rpc_rpc:setup_data_link(): ---------------"),
  	    ?debug("    data_link_bert_rpc_rpc:setup_data_link(): Sending authorize()"),
  	    ?debug("    data_link_bert_rpc_rpc:setup_data_link(): ---------------"),
  	    nice_bert_rpc_rpc:cast_host(RemoteAddress, RemotePort, 
  				    [tcp], data_link, authorize, 
  				    [1, LocalAddress, LocalPort, bert_rpc_rpc, 
  				     {certificate, {}}, { signature, {}} ]),
  
negative.code: 		   {accept, data_link_bert_rpc_rpc}
  		  ]} | TmpBertOpts],
  	    ?debug("    data_link_bert_rpc_rpc:init(): Starting BERT-RPC with ~p", [ BertOpts ]),
  	    case supervisor:start_child(data_link_bert_rpc_sup, 
  					{ data_link_bert_rpc_rpc, 
  					  { bert_rpc_exec, start_link, [ BertOpts ] },
  					  permanent, 5000, worker, [bert_rpc_exec] }) of
  
  		{ ok, _ } ->
  		    ?notice("---- RVI Node External Address: ~s", 
  			    [ application:get_env(rvi, node_address, undefined)]),
  
  		    case rvi_common:get_component_config(data_link, exo_http_opts) of
  			{ ok, ExoHttpOpts } ->
  			    exoport_exo_http:instance(data_link_bert_rpc_sup, 
  						      data_link_bert_rpc_rpc,
  						      ExoHttpOpts),
  			    ok;
  