diff --git a/src/httpSocket/utSocket.erl b/src/httpSocket/utSocket.erl
index c0d2373..39fdaa7 100644
--- a/src/httpSocket/utSocket.erl
+++ b/src/httpSocket/utSocket.erl
@@ -2,6 +2,7 @@
 
 -export([
    socketToIpStr/1
+   , socketToIpTuple/1
    , socket2port/1
    , str2ip/1
 ]).
diff --git a/src/testCase/utTestPerformance.erl b/src/testCase/utTestPerformance.erl
index 9e866a1..c9382b7 100644
--- a/src/testCase/utTestPerformance.erl
+++ b/src/testCase/utTestPerformance.erl
@@ -486,6 +486,21 @@ tsTuple(0, _, SceneId, LineId, ExtraArgs) ->
 tsTuple(N, _, SceneId, LineId, ExtraArgs) ->
    tsList(N - 1, {SceneId, LineId, ExtraArgs}, SceneId, LineId, ExtraArgs).
 
+bslT(0, A, B, _) ->
+   A * 1000000 + B;
+bslT(N,  A, B, _) ->
+   bslT(N -1, A, B, A * 1000000 + B).
+
+xxxT(0, A, B, _) ->
+   A bsl 20 + B;
+xxxT(N, A, B, _) ->
+   xxxT(N -1, A, B, A bsl 20 + B).
+
+tttT(0, A, B, _) ->
+   {A, B};
+tttT(N, A, B, _) ->
+   tttT(N -1, A, B, {A, B}).
+