1 ! Copyright (C) 2013 Doug Coleman.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: kernel tools.dns ;
6 CONSTANT: google-dns-servers { "8.8.8.8" "8.8.4.4" }
7 : google-host ( domain -- ) [ google-dns-servers ] dip dns-host ;
9 CONSTANT: dnsvantage-dns-servers {
13 : dnsvantage-host ( domain -- ) [ dnsvantage-dns-servers ] dip dns-host ;
16 CONSTANT: opendns-dns-servers { "208.67.222.222" "208.67.220.220" }
17 : opendns-host ( domain -- ) [ opendns-dns-servers ] dip dns-host ;
19 CONSTANT: norton-dns-servers { "198.153.192.1" "198.153.194.1" }
20 : norton-host ( domain -- ) [ norton-dns-servers ] dip dns-host ;
22 CONSTANT: verizon-dns-servers {
30 : verizon-host ( domain -- ) [ verizon-dns-servers ] dip dns-host ;