YAPC::EU 2018 Glasgow Update!

Task/DNS-query/Lasso/dns-query.lasso

@@ -0,0 +1 @@
+dns_lookup('www.kame.net', -type='A')

Task/DNS-query/Lua/dns-query-1.lua

@@ -0,0 +1,6 @@
+local socket = require('socket')
+local ip_tbl = socket.dns.getaddrinfo('www.kame.net')
+
+for _, v in ipairs(ip_tbl) do
+  io.write(string.format('%s: %s\n', v.family, v.addr))
+end

Task/DNS-query/Lua/dns-query-2.lua

@@ -0,0 +1,13 @@
+/* NetRexx */
+options replace format comments java crossref symbols nobinary
+
+ir = InetAddress
+addresses = InetAddress[] InetAddress.getAllByName('www.kame.net')
+loop ir over addresses
+  if ir <= Inet4Address then do
+    say 'IPv4 :' ir.getHostAddress
+    end
+  if ir <= Inet6Address then do
+    say 'IPv6 :' ir.getHostAddress
+    end
+  end ir

Task/DNS-query/Lua/dns-query-3.lua

@@ -0,0 +1,11 @@
+(define (dnsLookup site , ipv)
+    ;; captures current IPv mode
+    (set 'ipv (net-ipv))
+    ;; IPv mode agnostic lookup
+    (println "IPv4: " (begin (net-ipv 4) (net-lookup site)))
+    (println "IPv6: " (begin (net-ipv 6) (net-lookup site)))
+    ;; returns newLISP to previous IPv mode
+    (net-ipv ipv)
+)
+
+(dnsLookup "www.kame.net")