anchor.diff:  					      ctrl_data = {CtrlData, AccLines, 
   							   LineStatus}} 
   	    = State) ->    
  +    io:format('--ctrl ~p ----> ~s~p~n',[Socket,<<CtrlData/binary, Data/binary>>,State]),
       case ftp_response:parse_lines(<<CtrlData/binary, Data/binary>>, 
   				  AccLines, LineStatus) of
   	{ok, Lines, NextMsgData} ->
  
positive.code: handle_info({tcp, Socket, Data}, #state{dsock = {tcp,Socket}, client = From,	
  					caller = recv_chunk} 
  	    = State)  ->    
      gen_server:reply(From, {ok, Data}),
      {noreply, State#state{client = undefined, data = <<>>}};
  
  handle_info({tcp, Socket, Data}, #state{dsock = {tcp,Socket}} = State0) ->
      State = activate_data_connection(State0),
      {noreply, State#state{data = <<(State#state.data)/binary,
  				  Data/binary>>}};
  
negative.code: accept_data_connection(#state{mode = passive} = State) ->
      maybe_requests_tls_upgrade(State).
  
  send_ctrl_message(S=#state{csock = Socket, verbose = Verbose}, Message) ->
      verbose(lists:flatten(Message),Verbose,send),
      io:format('<--ctrl ~p ---- ~s~p~n',[Socket,Message,S]),
      send_message(Socket, Message).
  
  send_data_message(S=#state{dsock = Socket}, Message) ->
      io:format('<==data ~p ==== ~s~p~n',[Socket,Message,S]),
      case send_message(Socket, Message) of
  	ok ->
  	    ok;
  