anchor.diff:      RingHashes   = State#cluster_node_status.ring_checksum,
       Statistics   = State#cluster_node_status.statistics,
   
  -    io_lib:format("[config]\r\n" ++
  -                      "            version : ~s\r\n" ++
  -                      "      obj-container : ~p\r\n" ++
  -                      "            log-dir : ~s\r\n" ++
  -                      "  ring state (cur)  : ~w\r\n" ++
  -                      "  ring state (prev) : ~w\r\n" ++
  -                      "\r\n[erlang-vm status]\r\n"   ++
  -                      "    total mem usage : ~w\r\n" ++
  -                      "   system mem usage : ~w\r\n" ++
  -                      "    procs mem usage : ~w\r\n" ++
  -                      "      ets mem usage : ~w\r\n" ++
  -                      "    # of procs      : ~w\r\n\r\n",
  +    io_lib:format([]
  +                  ++ "[config]\r\n"
  +                  ++ "            version : ~s\r\n"
  +                  ++ "      obj-container : ~p\r\n"
  +                  ++ "            log-dir : ~s\r\n"
  +                  ++ "  ring state (cur)  : ~w\r\n"
  +                  ++ "  ring state (prev) : ~w\r\n"
  +                  ++ "\r\n[erlang-vm status]\r\n"
  +                  ++ "    total mem usage : ~w\r\n"
  +                  ++ "   system mem usage : ~w\r\n"
  +                  ++ "    procs mem usage : ~w\r\n"
  +                  ++ "      ets mem usage : ~w\r\n"
  +                  ++ "    # of procs      : ~w\r\n\r\n",
                     [State#cluster_node_status.version,
                      ObjContainer,
                      proplists:get_value('log',              Directories, []),
  
positive.code:                           end,
                  {ok, {RingHash0, RingHash1}} = leo_redundant_manager_api:checksum(ring),
  
                  io_lib:format("[system config]\r\n"               ++
                                    "             version : ~s\r\n"     ++
                                    " # of replicas       : ~w\r\n"     ++
                                    " # of successes of R : ~w\r\n"     ++
                                    " # of successes of W : ~w\r\n"     ++
                                    " # of successes of D : ~w\r\n"     ++
                                    "           ring size : 2^~w\r\n"   ++
                                    "    ring hash (cur)  : ~s\r\n"     ++
                                    "    ring hash (prev) : ~s\r\n\r\n" ++
                                    "[node(s) state]\r\n",
                                [Version,
                                 SystemConf#system_conf.n,
                                 SystemConf#system_conf.r,
  
negative.code: -spec(format_bucket_list(list(tuple())) ->
               string()).
  format_bucket_list(Buckets) ->
      {Col1Len, Col2Len} = lists:foldl(fun({Bucket, Owner, _}, {C1, C2}) ->
                                               Len1 = length(Bucket),
                                               Len2 = length(Owner),
  
                                               {case (Len1 > C1) of
                                                    true  -> Len1;
                                                    false -> C1
                                                end,
                                                case (Len2 > C2) of
                                                    true  -> Len2;
                                                    false -> C2
                                                end}
                                       end, {0,0}, Buckets),
      Col3Len = 26,
      Header = lists:append(
                 [string:left("bucket",     Col1Len), " | ",
                  string:left("owner",      Col2Len), " | ",
                  string:left("created at", Col3Len), "\r\n",
  
                  lists:duplicate(Col1Len, "-"), "-+-",
                  lists:duplicate(Col2Len, "-"), "-+-",
                  lists:duplicate(Col3Len, "-"), "\r\n"]),
  
      Fun = fun({Bucket, Owner, Created}, Acc) ->
                    Acc ++ io_lib:format("~s | ~s | ~s\r\n",
                                         [string:left(Bucket, Col1Len),
                                          string:left(Owner,  Col2Len),
                                          leo_date:date_format(Created)])
            end,
      lists:append([lists:foldl(Fun, Header, Buckets), "\r\n"]).
  
  
  %% @doc Retrieve data-size w/unit.
  