Scalaris Management Interface

out(Arg) -> {header, {cache_control, "no-cache"}}.

## Scalaris

Home
Ring
out(Arg) -> case whereis(mgmt_server) of undefined -> {html, ""}; _ -> {html, "
Indexed Ring
Vivaldi Map
" ++ case config:read(dc_clustering_enable) of true -> "
Datacenter Clusters Map
"; _ -> "" end ++ "
Benchmarks
"} end.
Gossip values
Client Monitor
Ring Monitor
Docu
Debug
Message Stats

## Benchmarks

Threads per VM: |
Iterations per Thread: |
Benchmark: |

| Reset

out(A) -> IsPost = webhelpers:isPost(A), if IsPost -> case {postvar(A, "tpm"),postvar(A, "iter")} of {{ok, TpmStr},{ok, IterStr}} -> try {erlang:list_to_integer(TpmStr), erlang:list_to_integer(IterStr)} of {Tpm, Iter} -> Result = case postvar(A,"bench") of {ok, "increment"} -> io_lib:format("~p", [bench:increment_o(Tpm, Iter, [])]); {ok, "quorum_read"} -> io_lib:format("~p", [bench:quorum_read_o(Tpm, Iter, [])]); {ok, "read_read"} -> io_lib:format("~p", [bench:read_read_o(Tpm, Iter, [])]); _ -> "
Please select a benchmark
" end, {ehtml, {pre, [], Result}} catch error:badarg -> {ehtml, {pre, [], "
Integer numbers required for 'Threads per VM' and 'Iterations'
"}} end; _ -> {ehtml, {pre, [], "
Missing required input: Need a 'Threads per VM' and 'Iterations'
"}} end; true -> {ehtml,{pre, [], ""}} end.

## Args

out(A) -> IsPost = webhelpers:isPost(A), case IsPost of true -> {ehtml, {pre, [], io_lib:format("GET:~p~nPOST:~p", [yaws_api:parse_query(A), yaws_api:parse_post(A)])}}; false -> {ehtml, {pre, [], io_lib:format("GET:~p", [yaws_api:parse_query(A)])}} end.

Last update: out(Arg) -> {Date, {Hour, Minute, Second}} = calendar:local_time(), {html, io_lib:format("~2..0B:~2..0B:~2..0B", [Hour, Minute, Second])}.