extra/tools/dns/public/public.factor

   1 ! Copyright (C) 2013 Doug Coleman.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: kernel tools.dns ;
   4 IN: tools.dns.public
   5
   6 ! Example usage:
   7 ! yandex-dns-servers "downloads.factorcode.org" dns-host
   8 ! "downloads.factorcode.org" cloudflare-host
   9 ! "downloads.factorcode.org" google-host
  10
  11 CONSTANT: google-dns-servers { "8.8.8.8" "8.8.4.4" }
  12 : google-host ( domain -- ) [ google-dns-servers ] dip dns-host ;
  13
  14 CONSTANT: dnsvantage-dns-servers {
  15     "156.154.70.1"
  16     "156.154.71.1"
  17 }
  18 : dnsvantage-host ( domain -- ) [ dnsvantage-dns-servers ] dip dns-host ;
  19
  20 CONSTANT: opendns-dns-servers { "208.67.222.222" "208.67.220.220" }
  21 : opendns-host ( domain -- ) [ opendns-dns-servers ] dip dns-host ;
  22
  23 CONSTANT: norton-dns-servers { "198.153.192.1" "198.153.194.1" }
  24 : norton-host ( domain -- ) [ norton-dns-servers ] dip dns-host ;
  25
  26 CONSTANT: verizon-dns-servers {
  27     "4.2.2.1"
  28     "4.2.2.2"
  29     "4.2.2.3"
  30     "4.2.2.4"
  31     "4.2.2.5"
  32     "4.2.2.6"
  33 }
  34 : verizon-host ( domain -- ) [ verizon-dns-servers ] dip dns-host ;
  35
  36 CONSTANT: cloudflare-dns-servers { "1.1.1.1" "1.0.0.1" }
  37 : cloudflare-host ( domain -- ) [ cloudflare-dns-servers ] dip dns-host ;
  38
  39 CONSTANT: quad9-dns-servers { "9.9.9.9" "149.112.112.112" }
  40 CONSTANT: clean-browsing-servers { "185.228.168.9" "185.228.169.9" }
  41 CONSTANT: alternate-dns-servers { "76.76.19.19" "76.223.122.150" }
  42 CONSTANT: adguard-dns-servers { "94.140.14.14" "94.140.15.15" }
  43 CONSTANT: cyberghost-dns-servers { "38.132.106.139" "194.187.251.67" }
  44 CONSTANT: opennic-dns-servers { "192.71.245.208" "94.247.43.254" }
  45 CONSTANT: dns-watch-servers { "84.200.69.80" "84.200.70.40" }
  46 CONSTANT: yandex-dns-servers { "77.88.8.88" "77.88.8.2" }
  47 CONSTANT: neustar-dns-servers { "156.154.70.5" "156.154.71.5" }
  48 CONSTANT: comodo-secure-dns-servers { "8.26.56.26" "8.20.247.20" }
  49 CONSTANT: uncensored-dns-servers { "91.239.100.100" "89.233.43.71" }
  50 CONSTANT: free-dns-servers { "45.33.97.5" "37.235.1.177" }
  51 CONSTANT: verisign-dns-servers { "64.6.64.6" "64.6.65.6" }
  52 CONSTANT: safeserve-dns-servers { "198.54.117.10" "198.54.117.11" }
  53 CONSTANT: safe-dns-servers { "195.46.39.39" "195.46.39.40" }