anchor.diff:      ok = ftp:close(proplists:get_value(ftp,Config)),
       Config.
   
  +ftp_start_service(Config, Options) ->
  +    Host = proplists:get_value(ftpd_host,Config),
  +    Port = proplists:get_value(ftpd_port,Config),
  +    ct:log("Host=~p, Port=~p",[Host,Port]),
  +    {ok,Pid} = ftp:start_service([{host, Host},{port,Port} | Options]),
  +    [{ftp,Pid}|Config].
  +
  +ftp_stop_service(Config) ->
  +    ok = ftp:stop_service(proplists:get_value(ftp,Config)),
  +    Config.
  +
   split(Cs) -> string:tokens(Cs, "\r\n").
   
   find_diff(Bin1, Bin2) -> 
  
positive.code: 	    ftps_active  -> ftp__open(Config0, TLS++ ACTIVE  ++ ExtraOpts);
  	    ftp_passive  -> ftp__open(Config0,      PASSIVE  ++ ExtraOpts);
  	    ftps_passive -> ftp__open(Config0, TLS++PASSIVE  ++ ExtraOpts);
  	    undefined    -> Config0
  	end,
      case Case of
  
negative.code:         _:_ ->
              {skip, "Crypto did not start"}
      end;
  init_per_group(ftp_sup, Config) ->
      try ftp:start() of
          ok ->
              Config
      catch
          _:_ ->
              {skip, "Ftp did not start"}
      end;
  init_per_group(_Group, Config) -> 
      Config.
  
  
  end_per_group(ftp_sup, Config) -> 
      ftp:stop(),
      Config;
  end_per_group(_Group, Config) -> 
      Config.
  
  