From 40f0d54ea89b701afbbc1cfa2ade8913c4d137eb Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Sat, 25 Mar 2023 22:31:56 +0100
Subject: dhcp-to-dns: add cname if host name appears for existing record

---
 dhcp-to-dns.rsc | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'dhcp-to-dns.rsc')

diff --git a/dhcp-to-dns.rsc b/dhcp-to-dns.rsc
index 75b3fbf..b925fdb 100644
--- a/dhcp-to-dns.rsc
+++ b/dhcp-to-dns.rsc
@@ -83,6 +83,10 @@ $ScriptLock $0 false 10;
       }
 
       :local Cname [ /ip/dns/static/find where type=CNAME cname=($MacDash . "." . $Domain) comment=$Comment ];
+      :if ([ :len $Cname ] = 0 && [ :len $HostName ] > 0) do={
+        $LogPrintExit2 info $0 ("Host name appeared, adding CNAME " . ($HostName . "." . $Domain) . " pointing to " . ($MacDash . "." . $Domain) . ".") false;
+        /ip/dns/static/add name=($HostName . "." . $Domain) type=CNAME cname=($MacDash . "." . $Domain) ttl=$Ttl comment=$Comment place-before=$PlaceBefore;
+      }
       :if ([ :len $Cname ] > 0 && [ /ip/dns/static/get $Cname name ] != ($HostName . "." . $Domain)) do={
         $LogPrintExit2 info $0 ("Host name changed, updating CNAME (pointing to " . ($MacDash . "." . $Domain) . ") to " . ($HostName . "." . $Domain) . ".") false;
         /ip/dns/static/set name=($HostName . "." . $Domain) $Cname;
-- 
cgit v1.2.3-54-g00ecf