anchor.diff:  %% @hidden
   perform_get1(Address) ->
   	case ocs:find_client(Address) of
  -		{ok, Secret} ->
  +		{ok, DiscPort, Protocol, Secret} ->
   			Id = inet:ntoa(Address),
  -			RespObj = [{id, Id}, {href, "/ocs/v1/client/" ++ Id}, {secret, Secret}],
  +			RespObj = [{id, Id}, {href, "/ocs/v1/client/" ++ Id},
  +					{"disconnectPort", DiscPort},
  +					{protocol, string:to_upper(atom_to_list(Protocol))}, {secret, Secret}],
   			JsonObj  = {struct, RespObj},
   			Body = mochijson:encode(JsonObj),
   			{body, Body};
  
positive.code: 		{error, _Reason} ->
  			{error, 404}
  	end.
  
  -spec perform_delete(Ip :: list()) ->
  	ok .
  
negative.code: 	end.
  %% @hidden
  perform_get_all1(Clients) ->
  	F = fun(#radius_client{address= Address, disconnect_port = DiscPort,
  			protocol = Protocol, secret = Secret}, Acc) ->
  		Id = inet:ntoa(Address),
  		RespObj = [{struct, [{id, Id}, {href, "/ocs/v1/client/" ++ Id},
  			{"disconnectPort", DiscPort},
  			{protocol, string:to_upper(atom_to_list(Protocol))}, {secret, Secret}]}],
  		RespObj ++ Acc
  	end,
  	JsonObj = lists:foldl(F, [], Clients),
  