diff options
Diffstat (limited to 'lib/ssl/test/ssl_bench_test_lib.erl')
-rw-r--r-- | lib/ssl/test/ssl_bench_test_lib.erl | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/lib/ssl/test/ssl_bench_test_lib.erl b/lib/ssl/test/ssl_bench_test_lib.erl index 648b42fb03..474a69fe17 100644 --- a/lib/ssl/test/ssl_bench_test_lib.erl +++ b/lib/ssl/test/ssl_bench_test_lib.erl @@ -71,43 +71,6 @@ find_executable(Prog) -> P -> P end. --ifdef(undefined). -setup(Name) -> - Host = case os:getenv(?remote_host) of - false -> - {ok, This} = inet:gethostname(), - This; - RemHost -> - RemHost - end, - Node = list_to_atom(atom_to_list(Name) ++ "@" ++ Host), - SlaveArgs = case init:get_argument(pa) of - {ok, PaPaths} -> - lists:append([" -pa " ++ P || [P] <- PaPaths]); - _ -> [] - end, - %% ct:pal("Slave args: ~p~n",[SlaveArgs]), - Prog = - case os:find_executable("erl") of - false -> "erl"; - P -> P - end, - ct:pal("Prog = ~p~n", [Prog]), - - case net_adm:ping(Node) of - pong -> ok; - pang -> - {ok, Node} = - slave:start(Host, Name, SlaveArgs, no_link, Prog) - end, - Path = code:get_path(), - true = rpc:call(Node, code, set_path, [Path]), - ok = rpc:call(Node, ?MODULE, setup_server, [node()]), - ct:pal("Client (~p) using ~ts~n",[node(), code:which(ssl)]), - (Node =:= node()) andalso restrict_schedulers(client), - Node. --endif. - setup_server(ClientNode) -> (ClientNode =:= node()) andalso restrict_schedulers(server), ct:pal("Server (~p) using ~ts~n",[node(), code:which(ssl)]), |