distorted.org.uk: Dynamically allocate IP addresses and use names.

[zones] / distorted.org.uk.lisp

;;; Zone file for distorted.org.uk

(load "hosts" :verbose nil)

;; Network allocations
;; (RFC1918 addresses are allocated from Cambridge G-RIN.)
(defnet distorted.org.uk 172.29.198.0/23
  (untrusted 256
    (wireless 64))
  (trusted 256
    (fretwank 128
      (unsafe 32)
      (dhcp 32)
      (safe 32))
    (virtual 32)))

;; Host allocations
(defhost guvnor (unsafe))
(defhost guvnor.demon 83.105.60.35)
(defhost metalzone (unsafe))
(defhost tubescreamer (safe))
(defhost evolution (unsafe))
(defhost evolution.wireless (wireless))
(defhost fuzzface (virtual))
(defhost mz (virtual))

(setf *default-zone-admin* "hostmaster@distorted.org.uk")
(setf *default-zone-source* 'guvnor.distorted.org.uk.)

(defzone distorted.org.uk
  ;;
  ;; Nameservers
  :ns ((boyle.ns :ip boyle.nsict.org)
       (chiark.ns :ip chiark.greenend.org.uk)
       (guvnor.ns :ip guvnor.demon))
  ;;
  ;; Mail servers
  ((@ lists bugs cryptomail) :mx guvnor)
  ;;
  ;; Colocated services
  ((www ftp wiki) :a boyle.nsict.org)
  ;;
  ;; Entry is via little port-forwarding box
  (guvnor (demon :a guvnor.demon)
	  (fretwank :a guvnor))
  ;;
  ;; Wireless gateway
  (evolution (fretwank :a evolution)
	     (wireless :a evolution.wireless))
  ;;
  ;; Local services
  (bugs :a guvnor.demon)
  ;;
  ;; Wired ethernet
  (metalzone (fretwank :a metalzone))
  (tubescreamer (fretwank :a tubescreamer))
  (fuzzface (virtual :a fuzzface))
  (mz (virtual :a mz))
  ;;
  ;; Networks
  (fretwank :net fretwank)
  (dhcp :net dhcp)
  (wireless :net wireless)
  (virtual :net virtual))

(defrevzone trusted
  :ns ((metalzone.ns :ip metalzone))
  :reverse trusted)
(defrevzone untrusted
  :ns ((metalzone.ns :ip metalzone))
  :reverse untrusted)