New -list-devices option

This will make it possible for the Debian package to fetch the list of
supported firewall/router devices and prompt the user to choose one
upon installation.
This commit is contained in:
Richard Hansen 2020-08-02 16:57:25 -04:00
parent 346b7196df
commit 5e6a50559d

View file

@ -816,6 +816,10 @@ my %opt = ();
my $deprecated_handler = sub { warning("'-$_[0]' is deprecated and does nothing"); };
$opt{'fw-banlocal'} = $deprecated_handler;
$opt{'if-skip'} = $deprecated_handler;
$opt{'list-devices'} = sub {
printf("%s %s\n", $_, $builtinfw{$_}{name}) for sort(keys(%builtinfw));
exit(0);
};
$opt{'list-protocols'} = sub {
printf("%s\n", $_) for sort(keys(%services));
exit(0);
@ -857,6 +861,7 @@ my @opt = (
["fw-skip", "=s", "-fw-skip <pattern> : skip any IP addresses before <pattern> in the text returned from the device"],
["fw-login", "=s", "-fw-login <login> : use <login> when getting the IP from the device"],
["fw-password", "=s", "-fw-password <secret> : use password <secret> when getting the IP from the device"],
["list-devices", "", "-list-devices : print a machine-readable list of supported firewall/router devices and exit. Format: one device per line, each line has the form '<device> <description>'"],
"",
" Options that apply to 'use=cmd':",
["cmd", "=s", "-cmd <command> : obtain IP address from the output of <command>"],