anchor.diff:  
   %%--------------------------------------------------------------------
   
  -client_verify_none_passive() ->
  -    [{doc,"Test client option verify_none"}].
  -
  -client_verify_none_passive(Config) when is_list(Config) ->
  -    ClientOpts =  ?config(client_opts, Config),
  -    ServerOpts =  ?config(server_opts, Config),
  -    {ClientNode, ServerNode, Hostname} = ssl_test_lib:run_where(Config),
  -    Server = ssl_test_lib:start_server([{node, ServerNode}, {port, 0},
  -					{from, self()},
  -					{mfa, {ssl_test_lib, send_recv_result, []}},
  -					{options, [{active, false}
  -						   | ServerOpts]}]),
  -    Port  = ssl_test_lib:inet_port(Server),
  -
  -    Client = ssl_test_lib:start_client([{node, ClientNode}, {port, Port},
  -					{host, Hostname},
  -					{from, self()},
  -					{mfa, {ssl_test_lib, send_recv_result, []}},
  -					{options, [{active, false},
  -						   {verify, verify_none}
  -						   | ClientOpts]}]),
  -
  -    ssl_test_lib:check_result(Server, ok, Client, ok),
  -    ssl_test_lib:close(Server),
  -    ssl_test_lib:close(Client).
  -%%--------------------------------------------------------------------
   cert_expired() ->
       [{doc,"Test server with expired certificate"}].
   
  
positive.code: 
      Server = ssl_test_lib:start_server([{node, ServerNode}, {port, 0},
  					{from, self()},
  					{mfa, {ssl_test_lib, send_recv_result_active, []}},
  					{options, [{cacerts, [IntermidiateCA]},
  						   {partial_chain, PartialChain} |
  						   proplists:delete(cacertfile, ServerOpts)]}]),
      Port = ssl_test_lib:inet_port(Server),
      Client = ssl_test_lib:start_client([{node, ClientNode}, {port, Port},
  					{host, Hostname},
  					{from, self()},
  					{mfa, {ssl_test_lib, send_recv_result_active, []}},
  					{options, ClientOpts}]),
      ssl_test_lib:check_result(Server, ok, Client, ok),
      ssl_test_lib:close(Server),
      ssl_test_lib:close(Client).
  
negative.code: %% Test Cases --------------------------------------------------------
  %%--------------------------------------------------------------------
  
  verify_peer() ->
      [{doc,"Test option verify_peer"}].
  verify_peer(Config) when is_list(Config) ->
      ClientOpts = ?config(client_verification_opts, Config),
      ServerOpts = ?config(server_verification_opts, Config),
      Active = ?config(active, Config),
  