anchor.diff:                                                                        cipher => aes_128_cbc,
                                                                         mac => sha,
                                                                         prf => default_prf}).
  -%%--------------------------------------------------------------------
  -honor_client_cipher_order_tls13() ->
  -    [{doc,"Test API honor server cipher order in TLS 1.3."}].
  -honor_client_cipher_order_tls13(Config) when is_list(Config) ->
  -    ClientCiphers = [#{key_exchange => any,
  -                       cipher => aes_256_gcm,
  -                       mac => aead,
  -                       prf => sha384},
  -                     #{key_exchange => any,
  -                       cipher => aes_128_gcm,
  -                       mac => aead,
  -                       prf => sha256}],
  -    ServerCiphers = [#{key_exchange => any,
  -                       cipher => aes_128_gcm,
  -                       mac => aead,
  -                       prf => sha256},
  -                     #{key_exchange => any,
  -                       cipher => aes_256_gcm,
  -                       mac => aead,
  -                       prf => sha384}],
  -    honor_cipher_order(Config, false, ServerCiphers, ClientCiphers, #{key_exchange => any,
  -                                                                      cipher => aes_256_gcm,
  -                                                                      mac => aead,
  -                                                                      prf => sha384}).
  +
   %%--------------------------------------------------------------------
   ipv6() ->
       [{require, ipv6_hosts},
  
positive.code: 
  groups() ->
      [
       %%{'tlsv1.3', [], gen_api_tests() ++ handshake_paus_tests()},
       {'tlsv1.3', [], ((gen_api_tests() ++ tls13_group() ++ handshake_paus_tests()) -- [dh_params, honor_server_cipher_order, honor_client_cipher_order,
                                          new_options_in_handshake])
        ++ (since_1_2() -- [conf_signature_algs])},
  
negative.code:     ServerOpts =  [{beast_mitigation, one_n_minus_one} | ssl_test_lib:ssl_options(server_rsa_opts, Config)],
      
      ssl_test_lib:basic_test(ClientOpts, ServerOpts, Config).
  
  supported_groups() ->
      [{doc,"Test the supported_groups option in TLS 1.3."}].
  
  supported_groups(Config) when is_list(Config) ->
      ClientOpts = ssl_test_lib:ssl_options(client_rsa_opts, Config),
      ServerOpts = ssl_test_lib:ssl_options(server_rsa_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_active, []}},
                                          {options, [{supported_groups, [x448, x25519]} | 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, [{supported_groups,[x448]} | ClientOpts]}]),
  
      ssl_test_lib:check_result(Server, ok, Client, ok),
  
      ssl_test_lib:close(Server),
      ssl_test_lib:close(Client).
  
  %%--------------------------------------------------------------------
  honor_client_cipher_order_tls13() ->
      [{doc,"Test API honor server cipher order in TLS 1.3."}].
  honor_client_cipher_order_tls13(Config) when is_list(Config) ->
      ClientCiphers = [#{key_exchange => any,
                         cipher => aes_256_gcm,
                         mac => aead,
                         prf => sha384},
                       #{key_exchange => any,
                         cipher => aes_128_gcm,
                         mac => aead,
                         prf => sha256}],
      ServerCiphers = [#{key_exchange => any,
                         cipher => aes_128_gcm,
                         mac => aead,
                         prf => sha256},
                       #{key_exchange => any,
                         cipher => aes_256_gcm,
                         mac => aead,
                         prf => sha384}],
      honor_cipher_order(Config, false, ServerCiphers, ClientCiphers, #{key_exchange => any,
                                                                        cipher => aes_256_gcm,
                                                                        mac => aead,
                                                                        prf => sha384}).
  
  %%--------------------------------------------------------------------
  honor_server_cipher_order_tls13() ->
      [{doc,"Test API honor server cipher order in TLS 1.3."}].
  honor_server_cipher_order_tls13(Config) when is_list(Config) ->
      ClientCiphers = [#{key_exchange => any,
                         cipher => aes_256_gcm,
                         mac => aead,
                         prf => sha384},
                       #{key_exchange => any,
                         cipher => aes_128_gcm,
                         mac => aead,
                         prf => sha256}],
      ServerCiphers = [#{key_exchange => any,
                         cipher => aes_128_gcm,
                         mac => aead,
                         prf => sha256},
                       #{key_exchange => any,
                         cipher => aes_256_gcm,
                         mac => aead,
                         prf => sha384}],
      honor_cipher_order(Config, true, ServerCiphers, ClientCiphers, #{key_exchange => any,
                                                                       cipher => aes_128_gcm,
                                                                       mac => aead,
                                                                       prf => sha256}).
  
  
  %%--------------------------------------------------------------------
  %% Internal functions ------------------------------------------------
  