From 8eda0a5460df9fa28e01dcaf2c40e2e82d583365 Mon Sep 17 00:00:00 2001
From: Ali Sabil <ali.sabil@soundrop.com>
Date: Thu, 13 Jun 2013 11:38:40 +0200
Subject: Add get_loopback_mtu/0

---
 src/ct_helper.erl | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/src/ct_helper.erl b/src/ct_helper.erl
index 2092d8b..475f088 100644
--- a/src/ct_helper.erl
+++ b/src/ct_helper.erl
@@ -17,6 +17,7 @@
 
 -export([create_static_dir/1]).
 -export([delete_static_dir/1]).
+-export([get_loopback_mtu/0]).
 -export([make_certs/0]).
 
 -type der_encoded() :: binary().
@@ -43,6 +44,15 @@ delete_static_dir(Path) ->
 	ok = file:del_dir(Path),
 	ok.
 
+get_loopback_mtu() ->
+	{ok, Interfaces} = inet:getiflist(),
+	[LocalInterface | _ ] = lists:filter(fun(Interface) ->
+		{ok, [{flags, Flags}]} = inet:ifget(Interface, [flags]),
+		lists:member(loopback, Flags)
+	end, Interfaces),
+	{ok, [{mtu, MTU}]} = inet:ifget(LocalInterface, [mtu]),
+	MTU.
+
 %% @doc Create a set of certificates.
 -spec make_certs()
 	-> {CaCert::der_encoded(), Cert::der_encoded(), Key::key()}.
-- 
cgit v1.2.3