make is_private_ip resolve hostnames and check all resolved ips

1 files changed, 7 insertions, 0 deletions

diff --git a/test/it.t b/test/it.t
index f4bf710..69b46b6 100755
--- a/test/it.t
+++ b/test/it.t
@@ -341,6 +341,13 @@ is(it::is_private_ip('fd12::1337:bab3:d00d'),           true,  "is_private_ip fc
 is(it::is_private_ip('81.6.43.252'),                    false, "is_private_ip dunstkreis.ch ipv4");
 is(it::is_private_ip('2a02:169:200:d::15'),             false, "is_private_ip dunstkreis.ch ipv6");
 is(it::is_private_ip('127.6.7.23'),                     true,  "is_private_ip loopback ipv4");
+is(it::is_private_ip('169.254.6.9'),                    true,  "is_private_ip 169.254/16 example");
+is(it::is_private_ip('gna.ch'),                         false, "is_private_ip gna.ch");
+is(it::is_private_ip('dunstkreis.ch'),                  false, "is_private_ip dunstkreis.ch");
+is(it::is_private_ip('loopback.gna.ch'),                true,  "is_private_ip loopback.gna.ch points to ::1");
+is(it::is_private_ip('cname.gna.ch'),                   true,  "is_private_ip cname.gna.ch points to loopback.gna.ch");
+is(it::is_private_ip('pub4.gna.ch'),                    true,  "is_private_ip pub4.gna.ch has public ipv4 but private ipv6");
+is(it::is_private_ip('pub6.gna.ch'),                    true,  "is_private_ip pub6.gna.ch has private ipv6 and public ipv6");
 
 # it::filter_keys tests