1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
## This Source Code Form is subject to the terms of the Mozilla Public
## License, v. 2.0. If a copy of the MPL was not distributed with this
## file, You can obtain one at https://mozilla.org/MPL/2.0/.
##
## Copyright (c) 2007-2022 VMware, Inc. or its affiliates. All rights reserved.
defmodule RabbitMQ.CLI.Ctl.Commands.EvalCommand do
alias RabbitMQ.CLI.Core.{DocGuide, ErlEval, ExitCodes, Input}
@behaviour RabbitMQ.CLI.CommandBehaviour
use RabbitMQ.CLI.Core.MergesNoDefaults
def validate([], _) do
# value will be provided via standard input
:ok
end
def validate(["" | _], _) do
{:validation_failure, "Expression must not be blank"}
end
def validate([expr | _], _) do
case ErlEval.parse_expr(expr) do
{:ok, _} -> :ok
{:error, err} -> {:validation_failure, err}
end
end
def run([], %{node: node_name} = opts) do
case Input.consume_multiline_string() do
:eof -> {:error, :not_enough_args}
expr ->
case ErlEval.parse_expr(expr) do
{:ok, parsed} ->
bindings = make_bindings([], opts)
case :rabbit_misc.rpc_call(node_name, :erl_eval, :exprs, [parsed, bindings]) do
{:value, value, _} -> {:ok, value}
err -> err
end
{:error, msg} -> {:error, msg}
end
end
end
def run([expr | arguments], %{node: node_name} = opts) do
case ErlEval.parse_expr(expr) do
{:ok, parsed} ->
bindings = make_bindings(arguments, opts)
case :rabbit_misc.rpc_call(node_name, :erl_eval, :exprs, [parsed, bindings]) do
{:value, value, _} -> {:ok, value}
err -> err
end
{:error, msg} -> {:error, msg}
end
end
def output({:error, :not_enough_args}, _) do
{:error, ExitCodes.exit_dataerr(), "Expression to evaluate is not provided via argument or stdin"}
end
def output({:error, msg}, _) do
{:error, ExitCodes.exit_dataerr(), "Evaluation failed: #{msg}"}
end
use RabbitMQ.CLI.DefaultOutput
def formatter(), do: RabbitMQ.CLI.Formatters.Erlang
def usage, do: "eval <expression>"
def usage_additional() do
[
["<expression>", "Expression to evaluate"]
]
end
def usage_doc_guides() do
[
DocGuide.cli(),
DocGuide.monitoring(),
DocGuide.troubleshooting()
]
end
def help_section(), do: :operations
def description(), do: "Evaluates a snippet of Erlang code on the target node"
def banner(_, _), do: nil
#
# Implementation
#
defp make_bindings(args, opts) do
Enum.with_index(args, 1)
|> Enum.map(fn {val, index} -> {String.to_atom("_#{index}"), val} end)
|> Enum.concat(option_bindings(opts))
end
defp option_bindings(opts) do
Enum.to_list(opts)
|> Enum.map(fn {key, val} -> {String.to_atom("_#{key}"), val} end)
end
end
|
