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
|
## 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-2023 Broadcom. All Rights Reserved. The term “Broadcom” refers to Broadcom Inc. and/or its subsidiaries. All rights reserved.
defmodule RabbitMQ.CLI.Ctl.Commands.AddVhostCommand do
alias RabbitMQ.CLI.Core.{DocGuide, ExitCodes, Helpers, VirtualHosts}
@behaviour RabbitMQ.CLI.CommandBehaviour
def switches(), do: [description: :string, tags: :string, default_queue_type: :string]
def aliases(), do: [d: :description]
def merge_defaults(args, opts) do
{args, Map.merge(%{description: "", tags: ""}, opts)}
end
use RabbitMQ.CLI.Core.AcceptsOnePositionalArgument
use RabbitMQ.CLI.Core.RequiresRabbitAppRunning
def run([vhost], %{
node: node_name,
description: desc,
tags: tags,
default_queue_type: default_qt
}) do
meta = %{
description: desc,
tags: VirtualHosts.parse_tags(tags),
default_queue_type: default_qt
}
:rabbit_misc.rpc_call(node_name, :rabbit_vhost, :add, [
vhost,
meta,
Helpers.cli_acting_user()
])
end
def run([vhost], %{node: node_name, description: desc, tags: tags}) do
:rabbit_misc.rpc_call(node_name, :rabbit_vhost, :add, [
vhost,
desc,
VirtualHosts.parse_tags(tags),
Helpers.cli_acting_user()
])
end
def run([vhost], %{node: node_name}) do
:rabbit_misc.rpc_call(node_name, :rabbit_vhost, :add, [vhost, Helpers.cli_acting_user()])
end
def output({:error, :invalid_queue_type}, _opts) do
{:error, ExitCodes.exit_usage(), "Unsupported default queue type"}
end
def output({:badrpc, {:EXIT, {:vhost_limit_exceeded, msg}}}, _opts) do
{:error, ExitCodes.exit_usage(), msg}
end
use RabbitMQ.CLI.DefaultOutput
def usage,
do:
"add_vhost <vhost> [--description <description> --tags \"<tag1>,<tag2>,<...>\" --default-queue-type <quorum|classic|stream>]"
def usage_additional() do
[
["<vhost>", "Virtual host name"],
["--description <description>", "Virtual host description"],
["--tags <tag1,tag2>", "Comma-separated list of tags"],
[
"--default-queue-type <quorum|classic|stream>",
"Queue type to use if no type is explicitly provided by the client"
]
]
end
def usage_doc_guides() do
[
DocGuide.virtual_hosts()
]
end
def help_section(), do: :virtual_hosts
def description(), do: "Creates a virtual host"
def banner([vhost], _), do: "Adding vhost \"#{vhost}\" ..."
end
|
