From 4cd5d52c04f0ff7ab8563e24ec1b5c6eb6614351 Mon Sep 17 00:00:00 2001
From: Randy Barlow <randy@electronsweatshop.com>
Date: Sun, 29 Jul 2018 20:22:25 -0400
Subject: [PATCH] Remove a failing test.
https://github.com/processone/stun/issues/21
Signed-off-by: Randy Barlow <randy@electronsweatshop.com>
---
src/stun_test.erl | 20 --------------------
1 file changed, 20 deletions(-)
diff --git a/src/stun_test.erl b/src/stun_test.erl
index 4767f8b..e0cc1ff 100644
--- a/src/stun_test.erl
+++ b/src/stun_test.erl
@@ -93,26 +93,6 @@ bind_tcp_test() ->
recv(Socket, <<>>, false)),
?assertEqual(ok, gen_tcp:close(Socket)).
-bind_tls_test() ->
- TrID = mk_trid(),
- Msg = #stun{method = ?STUN_METHOD_BINDING,
- class = request,
- trid = TrID},
- {ok, Socket} = gen_tcp:connect({127,0,0,1}, ?STUNS_PORT,
- [binary, {active, true}]),
- {ok, TLSSocket} = fast_tls:tcp_to_tls(
- Socket, [{certfile, <<"certfile.pem">>}, connect]),
- ?assertEqual({ok, <<>>}, fast_tls:recv_data(TLSSocket, <<>>)),
- {ok, Addr} = fast_tls:sockname(TLSSocket),
- Pkt = stun_codec:encode(Msg),
- recv(TLSSocket, <<>>, true),
- ?assertEqual(ok, fast_tls:send(TLSSocket, Pkt)),
- ?assertMatch(
- {ok, #stun{trid = TrID,
- 'XOR-MAPPED-ADDRESS' = Addr}},
- recv(TLSSocket, <<>>, true)),
- ?assertEqual(ok, gen_tcp:close(Socket)).
-
del_tcp_listener_test() ->
?assertEqual(ok, stun_listener:del_listener(?STUN_PORT, tcp)).
--
2.18.0