rabbitmq-server/deps/rabbitmq_cli/lib/list_vhosts_command.ex

76 lines
2.1 KiB
Elixir

## The contents of this file are subject to the Mozilla Public License
## Version 1.1 (the "License"); you may not use this file except in
## compliance with the License. You may obtain a copy of the License
## at http://www.mozilla.org/MPL/
##
## Software distributed under the License is distributed on an "AS IS"
## basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
## the License for the specific language governing rights and
## limitations under the License.
##
## The Original Code is RabbitMQ.
##
## The Initial Developer of the Original Code is GoPivotal, Inc.
## Copyright (c) 2007-2016 Pivotal Software, Inc. All rights reserved.
defmodule ListVhostsCommand do
@behaviour CommandBehaviour
@flags []
@info_keys ~w(name tracing)a
def switches(), do: []
def validate(args, _) do
case InfoKeys.validate_info_keys(args, @info_keys) do
{:ok, _} -> :ok
err -> err
end
end
def merge_defaults([], opts), do: {["name"], opts}
def merge_defaults(args, opts), do: {args, opts}
def run([_|_] = args, %{node: node_name, timeout: time_out}) do
node_name
|> Helpers.parse_node
|> :rabbit_misc.rpc_call(:rabbit_vhost, :info_all, [], time_out)
|> filter_by_arg(args)
end
def usage, do: "list_vhosts [<vhostinfoitem> ...]"
def usage_additional() do
"<vhostinfoitem> must be a member of the list [name, tracing]."
end
defp filter_by_arg(vhosts, _) when is_tuple(vhosts) do
vhosts
end
defp filter_by_arg(vhosts, [_|_] = args) do
case bad_args = Enum.filter(args, fn arg -> invalid_arg?(arg) end) do
[_|_] -> {:error, {:bad_info_key, bad_args}}
[] ->
symbol_args = args |> Enum.map(&(String.to_atom(&1))) |> Enum.uniq
vhosts
|> Enum.map(
fn(vhost) ->
Enum.filter_map(
symbol_args,
fn(arg) -> vhost[arg] != nil end,
fn(arg) -> {arg, vhost[arg]} end
)
end
)
end
end
defp invalid_arg?("name"), do: false
defp invalid_arg?("tracing"), do: false
defp invalid_arg?(_), do: true
def banner(_,_), do: "Listing vhosts ..."
def flags, do: @flags
end