anchor.diff:      call(Socket, controlling_process, {self(), Pid}).
   
   close(Socket) when is_port(Socket) ->
  +    lager:debug("Closing socket ~p", [Socket]),
       gen_udp:close(Socket);
   close(Socket) ->
       call(Socket, close, undefined).
  
positive.code:     {reply, Reply, State#state{state = closed}};
  
  handle_call({_, undefined, _Args}, _From, State = #state{state = closed}) ->
      {reply, ?ECLOSED, State};
  
  handle_call({_, undefined, _Args}, _From, State) ->
      {reply, ?ENOTCONN, State};
  
  %% ---------------------------------------------------------------------------
  
negative.code: 
  call_socket(Socket, Request, Timeout) ->
      try
          gen_server:call(Socket, Request, Timeout)
      catch
          exit:{noproc,_} -> ?ECLOSED
      end.
  
  capwap_socket(SslSocketId) ->
  