bridge-port-to-default: use $ParseKeyValueStore...

... and unbreak last commit removing delay (69352c90).
This requires a change in configuration syntax. Change this...

    comment="default:br-local, alt:br-guest"

to...

    comment="default=br-local, alt=br-guest"
This commit is contained in:
Christian Hesse 2020-03-03 13:32:00 +01:00
parent 4ccdec602e
commit 628ae1bd70
5 changed files with 8 additions and 7 deletions

View file

@ -7,12 +7,12 @@
:global BridgePortTo;
:global LogPrintExit;
:global ParseKeyValueStore;
:foreach BridgePort in=[ / interface bridge port find where comment!="" ] do={
:foreach BridgePort in=[ / interface bridge port find where comment~"." ] do={
:local BridgePortVal [ / interface bridge port get $BridgePort ];
:foreach Comment in=[ :toarray ($BridgePortVal->"comment") ] do={
:if ([ :pick $Comment 0 $Len ] = ($BridgePortTo . ":")) do={
:local BridgeDefault [ :pick $Comment $Len [ :len $Comment ] ];
:foreach Config,BridgeDefault in=[ $ParseKeyValueStore ($BridgePortVal->"comment") ] do={
:if ($Config = $BridgePortTo) do={
:if ($BridgeDefault = "dhcp-client") do={
:if ($BridgePortVal->"disabled" = false) do={
$LogPrintExit info ("Disabling bridge port for interface " . $BridgePortVal->"interface" . ", enabling dhcp client.") false;

View file

@ -6,7 +6,7 @@
# Make sure all configuration properties are up to date and this
# value is in sync with value in script 'global-functions'!
:global GlobalConfigVersion 12;
:global GlobalConfigVersion 13;
# This is used for DNS and backup file.
:global Domain "example.com";

View file

@ -7,7 +7,7 @@
# Make sure all configuration properties are up to date and this
# value is in sync with value in script 'global-functions'!
# Comment or remove to disable change notifications.
:global GlobalConfigVersion 12;
:global GlobalConfigVersion 13;
# The global-config script is updated by script-updates,
# global-config-overlay becomes an overlay for your changes.

View file

@ -15,4 +15,5 @@
10="make health threshold for voltage configurable";
11="introduced function '\$ScriptInstallUpdate' to install new and update existing scripts";
12="removed '\$ScriptUpdatesConfigChangesIgnore', comment '\$GlobalConfigVersion' in 'global-config-overlay' to disable change notifications";
13="configuration for script 'bridge-port-to-default' changed with new syntax in comment";
};

View file

@ -6,7 +6,7 @@
# global functions
# expected configuration version
:global ExpectedConfigVersion 12;
:global ExpectedConfigVersion 13;
# global variables not to be changed by user
:global Identity [ / system identity get name ];