|
5 | 5 |
|
6 | 6 | -export([main/1, |
7 | 7 | merge_argparse_def/2, |
8 | | - translate_aliases/1, |
9 | | - handle_alias/1, |
10 | 8 | noop/1]). |
11 | 9 |
|
12 | 10 | main(Args) -> |
@@ -146,20 +144,9 @@ partial_parse(Args, ArgparseDef, Options, RemainingArgs) -> |
146 | 144 |
|
147 | 145 | get_final_argparse_def(#{argparse_def := PartialArgparseDef} = Context) -> |
148 | 146 | maybe |
149 | | - {ok, Aliases} ?= get_aliases(Context), |
150 | 147 | {ok, FullArgparseDef} ?= get_full_argparse_def(Context), |
151 | | - ArgparseDef1 = merge_argparse_def(PartialArgparseDef, Aliases), |
152 | | - ArgparseDef2 = merge_argparse_def(ArgparseDef1, FullArgparseDef), |
153 | | - {ok, ArgparseDef2} |
154 | | - end. |
155 | | - |
156 | | -get_aliases(#{config := Config}) -> |
157 | | - Aliases = maps:get(aliases, Config, #{}), |
158 | | - case Aliases =:= #{} of |
159 | | - true -> |
160 | | - {ok, #{}}; |
161 | | - false -> |
162 | | - {ok, #{commands => Aliases}} |
| 148 | + ArgparseDef1 = merge_argparse_def(PartialArgparseDef, FullArgparseDef), |
| 149 | + {ok, ArgparseDef1} |
163 | 150 | end. |
164 | 151 |
|
165 | 152 | get_full_argparse_def(#{connection := Connection}) -> |
@@ -247,38 +234,6 @@ get_config_filename(unix) -> |
247 | 234 | [XdgConfigHome, "rabbitmq", "rabbitmqctl.conf"]), |
248 | 235 | ConfigFilename. |
249 | 236 |
|
250 | | -%% ------------------------------------------------------------------- |
251 | | -%% Aliases handling. |
252 | | -%% ------------------------------------------------------------------- |
253 | | - |
254 | | -translate_aliases(Aliases) -> |
255 | | - Aliases1 = maps:from_list(Aliases), |
256 | | - Aliases2 = maps:map( |
257 | | - fun(_Alias, CommandStr) -> |
258 | | - Args = string:lexemes(CommandStr, " "), |
259 | | - #{alias => Args, |
260 | | - help => hidden, |
261 | | - handler => {?MODULE, handle_alias}} |
262 | | - end, Aliases1), |
263 | | - Aliases2. |
264 | | - |
265 | | -handle_alias( |
266 | | - #{progname := Progname, |
267 | | - argparse_def := ArgparseDef, |
268 | | - arg_map := ArgMap, |
269 | | - command := #{alias := Args}} = Context) -> |
270 | | - Options = #{progname => Progname}, |
271 | | - case argparse:parse(Args, ArgparseDef, Options) of |
272 | | - {ok, ArgMap1, CmdPath1, Command1} -> |
273 | | - ArgMap2 = maps:merge(ArgMap1, ArgMap), |
274 | | - Context1 = Context#{arg_map => ArgMap2, |
275 | | - cmd_path => CmdPath1, |
276 | | - command => Command1}, |
277 | | - rabbit_cli_commands:do_run_command(Context1); |
278 | | - {error, _} = Error -> |
279 | | - Error |
280 | | - end. |
281 | | - |
282 | 237 | %% ------------------------------------------------------------------- |
283 | 238 | %% Command execution. |
284 | 239 | %% ------------------------------------------------------------------- |
|
0 commit comments