anchor.diff:  handle_call(_Socket, <<?START, _/binary>> = Command, State) ->
       Reply = case leo_manager_console_commons:start(Command) of
                   ok ->
  -                    gen_json({[{result, <<"OK">>}]});
  +                    ?output_ok();
                   {error, {bad_nodes, BadNodes}} ->
                       Cause = lists:foldl(fun(Node, [] ) ->        io_lib:format("~w",  [Node]);
                                              (Node, Acc) -> Acc ++ io_lib:format(",~w", [Node])
                                           end, [], BadNodes),
  -                    gen_json({[{error, list_to_binary(Cause)}]});
  -                {error, Cause} ->
  -                    gen_json({[{error, list_to_binary(Cause)}]})
  +                    ?output_error_1(Cause);
  +                {error, Cause} ->
  +                    ?output_error_1(Cause)
               end,
       {reply, Reply, State};
   
  
positive.code: %%----------------------------------------------------------------------
  %% Operation-2
  %%----------------------------------------------------------------------
  %% @TODO
  %% Command: "du ${NODE_NAME}"
  %%
  handle_call(_Socket, <<?STORAGE_STATS, _Option/binary>> = _Command, State) ->
      {reply, [], State};
  
  
  %% @TODO
  %% Command: "compact ${NODE_NAME}"
  %%
  handle_call(_Socket, <<?COMPACT, _Option/binary>> = _Command, State) ->
      {reply, [], State};
  
  
  %%----------------------------------------------------------------------
  
negative.code:             <<Result/binary, ?CRLF>>
      end.
  
  
  %% @doc Format s stats-list
  %% @private
  -spec(format_stats_list(summary | detail, {integer(), integer()} | list()) ->
               string()).
  format_stats_list(summary, {FileSize, Total}) ->
      gen_json({[{<<"file_size">>, FileSize},{<<"total_of_objects">>, Total}]});
  
  format_stats_list(detail, StatsList) when is_list(StatsList) ->
      JSON = lists:map(fun({ok, #storage_stats{file_path   = FilePath,
                                               total_sizes = FileSize,
                                               total_num   = ObjTotal}}) ->
                               {[{<<"file_path">>,        list_to_binary(FilePath)},
                                 {<<"file_size">>,        FileSize},
                                 {<<"total_of_objects">>, ObjTotal}
                                ]};
                          (_) ->
                               []
                       end, StatsList),
      gen_json(JSON);
  format_stats_list(_, _) ->
      [].
  