diff options
Diffstat (limited to 'ipv6-update')
-rw-r--r-- | ipv6-update | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/ipv6-update b/ipv6-update index e21e6bb..86bd827 100644 --- a/ipv6-update +++ b/ipv6-update @@ -29,13 +29,10 @@ if ($OldPrefix != $PdPrefix) do={ :local Comment [ $ParseKeyValueStore ($RecordVal->"comment") ]; :local Prefix [ / ipv6 address get [ find where interface=($Comment->"interface") from-pool=$Pool global ] address ]; - :set Prefix [ :pick $Prefix 0 [ :find $Prefix "::/64" ] ]; - :if ($Prefix~"^[0-9a-f]+:[0-9a-f]+:[0-9a-f]+:") do={ } else={ - :set Prefix ($Prefix . ":"); - } - - :log info ("Updating DNS record for " . ($RecordVal->"name") . ($RecordVal->"regexp") . \ - " to " . $Prefix . ":" . ($Comment->"suffix")); - / ip dns static set address=($Prefix . ":" . ($Comment->"suffix")) $Record; + :set Prefix [ :toip6 [ :pick $Prefix 0 [ :find $Prefix "/64" ] ] ]; + :local Address ($Prefix | ([ :toip6 ($RecordVal->"address") ] & ::ffff:ffff:ffff:ffff)); + + :log info ("Updating DNS record for " . ($RecordVal->"name") . ($RecordVal->"regexp") . " to " . $Address); + / ip dns static set address=$Address $Record; } } |