mdw@git.distorted.org.uk Git - zones/blob - binswood.lisp

   1 ;;; Zone file for binswood.org.uk
   2
   3 (load "hosts.lisp" :verbose nil)
   4 (setf *default-zone-admin* "hostmaster@distorted.org.uk")
   5 (setf *default-zone-source* 'radius.distorted.org.uk.)
   6
   7 ;; Binswood.  Address range retroactively claimed from Cambridge G-RIN.
   8 (defnet binswood.org.uk 10.165.27.0/24
   9   (binswood 256))
  10 (defhost binswrt.binswood (binswood 1))
  11 (defhost mango.binswood (binswood 3))
  12
  13 (defzone binswood.org.uk
  14
  15   ;; Nameservers
  16   :ns ((radius.ns :ip radius)
  17        (precision.ns :ip precision)
  18        (telecaster.ns :ip telecaster)
  19        (national.ns :ip national)
  20        (mythic-beasts-1.ns :ip mythic-ns1)
  21        (mythic-beasts-2.ns :ip mythic-ns2)
  22        (mythic-beasts-3.ns :ip mythic-ns3))
  23
  24   ;; Certification.
  25   :caa ((:issue "letsencrypt.org")
  26         (:issue "distorted.org.uk"))
  27
  28   ;; Internal hosts.
  29   (binswrt :a binswrt.binswood)
  30   (mango :a mango.binswood)
  31
  32   ;; External services.
  33   ((@ www) :svc stratocaster)
  34
  35   ;; Dynamic addresses.
  36   (dyn :ns ((radius.ns.dyn :ip radius)
  37             (vampire.ns.dyn :ip vampire)
  38             (precision.ns.dyn :ip precision)
  39             (telecaster.ns.dyn :ip telecaster)
  40             (national.ns.dyn :ip national)))
  41   (ext :cname ext.dyn))
  42
  43 (defzone dyn.binswood.org.uk
  44   :ns ((radius.ns :ip radius)
  45        (vampire.ns :ip vampire)
  46        (precision.ns :ip precision)
  47        (telecaster.ns :ip telecaster)
  48        (national.ns :ip national)))
  49
  50 (defrevzone binswood
  51   :ns ((radius.ns :ip radius)
  52        (precision.ns :ip precision))
  53   :reverse binswood)