anchor.diff:  
   -export([messages/0, messages/1, messages/2, messages/3,
   	 auth/0,     auth/1,     auth/2,     auth/3,
  +	 hostkey/0,  hostkey/1,  hostkey/2,  hostkey/3,
   	 stop/0
   	]).
   
  
positive.code:     fmt("~n~s ~p ERL MSG RECEIVE~n ~p~n", [ts(TS),Pid,shrink_bin(ErlangMsg)], D);
  
  
  %% msg_formater(_, {trace_ts,_Pid,return_from,MFA,_Ret,_TS}=M, D) ->
  %%     case lists:member(MFA, [{ssh_auth,keyboard_interactive_msg,1},
  %%                             {ssh_auth,password_msg,1},
  %%                             {ssh_auth,publickey_msg,1}]) of
  %%         true ->
  %%             D;
  %%         false ->
  %%             fmt("~nDBG ~n~p~n", [shrink_bin(M)], D)
  %%     end;
  
  %% msg_formater(_, M, D) ->
  %%     fmt("~nDBG ~n~p~n", [shrink_bin(M)], D).
  
  msg_formater(_, _, D) -> 
       D.
  
  %%%----------------------------------------------------------------
  -record(data, {writer,
  
negative.code: msg_formater(msg, {trace_ts,Pid,return_from,{ssh_message,decode,1},Msg,TS}, D) -> 
      fmt("~n~s ~p RECV ~s~n", [ts(TS),Pid,wr_record(shrink_bin(Msg))], D);
  
  msg_formater(_auth, {trace_ts,Pid,return_from,{ssh_message,decode,1},#ssh_msg_userauth_failure{authentications=As},TS}, D) -> 
      fmt("~n~s ~p Client login FAILURE. Try ~s~n", [ts(TS),Pid,As], D);
  	
  msg_formater(_auth, {trace_ts,Pid,return_from,{ssh_message,decode,1},#ssh_msg_userauth_success{},TS}, D) -> 
      fmt("~n~s ~p Client login SUCCESS~n", [ts(TS),Pid], D);
  
  	
  