Checkpoint.

perf/get_put.erl

@@ -24,7 +24,7 @@ confirm() ->
         rt_bench:config(
           max,
           rt_config:get(perf_duration),
-          HostList,
+          [{Host, 10017} || Host <- HostList],
           {int_to_bin_bigendian, {truncated_pareto_int, SetSize}},
           rt_bench:valgen(rt_config:get(perf_bin_type), BinSize),
           %% 4:1 get/put

priv/reporting/summarize1.gpl

@@ -2,7 +2,7 @@
 unset multiplot 
 reset
 
-# set terminal png font "/usr/share/fonts/truetype/liberation/LiberationSans-Regular.ttf,9" size 850,1100
+set terminal png font "/Library/Fonts/Arial.ttf" 8
 set output outfilename
 
 #set term x11 size 850, 1100

src/rtperf.erl

@@ -556,12 +556,28 @@ deploy_nodes(NodeConfig, Hosts) ->
         orddict:from_list(
             orddict:to_list(rt_config:get(rt_versions, orddict:new())) ++ VersionMap)),
 
+    rt:pmap(fun({Node, _}) ->
+                {ok,
+                 {_, _, _, _, _, [IP0|_]}} = inet:gethostbyname(
+                        rtssh:node_to_host(Node)),
+                IP = inet:ntoa(IP0),
+                Config = [{"listener.protobuf.internal",
+                            IP++":10017"},
+                           {"listener.http.internal",
+                            IP++":10018"}],
+                rtssh:set_conf(Node, Config)
+        end, lists:zip(Nodes, Configs)),
+    timer:sleep(500),
+
     rt:pmap(fun({_, default}) ->
-                    ok;
+                lager:info("Default configuration detected!"),
+                ok;
                ({Node, {cuttlefish, Config}}) ->
-                    rtssh:set_conf(Node, Config);
+                lager:info("Cuttlefish configuration detected!"),
+                rtssh:set_conf(Node, Config);
                ({Node, Config}) ->
-                    rtssh:update_app_config(Node, Config)
+                lager:info("Legacy configuration detected!"),
+                rtssh:update_app_config(Node, Config)
             end,
             lists:zip(Nodes, Configs)),
     timer:sleep(500),