File 8451-kernel-Extend-cname_loop-test.patch of Package erlang

From cdb1bf3168ef1b4edb8f9356002ca833a6af77c8 Mon Sep 17 00:00:00 2001
From: Sergei Shuvatov <Yozhig@users.noreply.github.com>
Date: Thu, 13 Mar 2025 15:34:08 +0300
Subject: [PATCH 1/2] kernel: Extend cname_loop test

---
 lib/kernel/test/inet_SUITE.erl | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/lib/kernel/test/inet_SUITE.erl b/lib/kernel/test/inet_SUITE.erl
index 912e166cc2..bc12112fee 100644
--- a/lib/kernel/test/inet_SUITE.erl
+++ b/lib/kernel/test/inet_SUITE.erl
@@ -1214,6 +1214,14 @@ cname_loop(Config) when is_list(Config) ->
     ok = inet_db:add_rr("mydomain.com", in, ?S_CNAME, ttl, "mydomain.com"),
     {error,nxdomain} = inet_db:getbyname("mydomain.com", ?S_A),
     ok = inet_db:del_rr("mydomain.com", in, ?S_CNAME, "mydomain.com"),
+    %% deep loop
+    ok = inet_db:add_rr("rtest1.example.com", in, ?S_CNAME, ttl, "rtest2.example.com"),
+    ok = inet_db:add_rr("rtest2.example.com", in, ?S_CNAME, ttl, "rtest3.example.com"),
+    ok = inet_db:add_rr("rtest3.example.com", in, ?S_CNAME, ttl, "rtest1.example.com"),
+    {error,nxdomain} = inet_db:getbyname("rtest1.example.com", ?S_A),
+    ok = inet_db:del_rr("rtest1.example.com", in, ?S_CNAME, "rtest2.example.com"),
+    ok = inet_db:del_rr("rtest2.example.com", in, ?S_CNAME, "rtest3.example.com"),
+    ok = inet_db:del_rr("rtest3.example.com", in, ?S_CNAME, "rtest1.example.com"),
     %% res_hostent_by_domain
     RR = #dns_rr{domain = "mydomain.com",
 		 class = in,
@@ -2709,4 +2717,3 @@ pi(Item) ->
     {Item, Val} = process_info(self(), Item),
     Val.
     
-
-- 
2.43.0