From 448b77a6629c68659e1360fbe9f9e1ecea078f9c Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 14 Apr 2021 14:18:10 -0600 Subject: [PATCH] adjust DNS test to use different hosts for reverse lookup The old one stopped working. Added two new ones, so we have a spare to discard if one stops working. --- pkgs/net-test/tests/net/dns.rkt | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/pkgs/net-test/tests/net/dns.rkt b/pkgs/net-test/tests/net/dns.rkt index d3e4df0e92..085c696111 100644 --- a/pkgs/net-test/tests/net/dns.rkt +++ b/pkgs/net-test/tests/net/dns.rkt @@ -85,9 +85,13 @@ (define *google-dns* "8.8.8.8") (define *google-dns-2* "8.8.4.4") (define *nwu-url* "eecs.northwestern.edu") -(define *nwu-ips* '("129.105.8.227" "129.105.5.15" "129.105.8.237")) +(define *nwu-ips* '("129.105.8.227" "129.105.5.15" "129.105.8.237")) (define *racket-host* "winooski.ccs.neu.edu") (define *racket-ip* "129.10.115.117") +(define *indiana-host* "hurin.soic.indiana.edu") ; a.k.a. drdr.racket-lang.org +(define *indiana-ip* "129.79.247.31") +(define *utah-host* "rains.cs.utah.edu") +(define *utah-ip* "155.98.68.106") (define *nwu-mx* '("cuda.eecs.northwestern.edu" "barra.eecs.northwestern.edu")) (define *kame-url* "www.kame.net") (define *kame-ip* "2001:200:dff:fff1:216:3eff:feb1:44d7") @@ -97,7 +101,8 @@ (check member (dns-get-address nameserver *nwu-url*) *nwu-ips*) (check-equal? (dns-get-address nameserver *racket-host*) *racket-ip*) (check-equal? (dns-get-address nameserver *kame-url* #:ipv6? #t) *kame-ip*) - (check-equal? (dns-get-name nameserver *racket-ip*) *racket-host*) + (check-equal? (dns-get-name nameserver *utah-ip*) *utah-host*) + (check-equal? (dns-get-name nameserver *indiana-ip*) *indiana-host*) (check member (dns-get-mail-exchanger nameserver *nwu-url*) *nwu-mx*) (check-equal? (dns-get-srv nameserver "racket-lang.org" "xmpp-client") (list *xmpp-client*)) (check-equal? (dns-get-srv nameserver "nonexistent-srv-record.racket-lang.org" "xmpp-client")