chiark - git - mdw - zones/blob - distorted.lisp

   1 ;;; Zone file for distorted.org.uk
   2
   3 (load "hosts" :verbose nil)
   4
   5 ;; Network allocations
   6 ;; (RFC1918 addresses are allocated from Cambridge G-RIN.)
   7 (defnet distorted.org.uk 172.29.198.0/23
   8   (untrusted 256
   9     (wireless 64))
  10   (trusted 256
  11     (fretwank 128
  12       (unsafe 32)
  13       (dhcp 32)
  14       (safe 32))
  15     (virtual 32)))
  16
  17 ;; Host allocations
  18 (defhost guvnor.demon 80.177.3.76)
  19
  20 (defhost guvnor (unsafe 1))
  21 (defhost metalzone (unsafe 2))
  22 (defhost evolution (unsafe 3))
  23 (defhost vampire (unsafe 4))
  24
  25 (defhost tubescreamer (safe 1))
  26 (defhost obsidian (safe 2))
  27
  28 (defhost evolution.wireless (wireless 1))
  29
  30 (defhost fuzzface (virtual 1))
  31 (defhost mz (virtual 2))
  32
  33 (setf *default-zone-admin* "hostmaster@distorted.org.uk")
  34
  35 (preferred-subnet-case
  36   (fretwank
  37    (setf *default-zone-source* 'metalzone.distorted.org.uk.)
  38    (defhost www-frontend metalzone))
  39   (t
  40    (setf *default-zone-source* 'guvnor.distorted.org.uk.)
  41    (defhost www-frontend guvnor.demon)))
  42
  43 (defzone distorted.org.uk
  44   ;;
  45   ;; Nameservers
  46   :ns #+subnet/fretwank
  47       ((metalzone.ns :ip metalzone)
  48        (vampire.ns :ip vampire))
  49       #-subnet/fretwank
  50       ((boyle.ns :ip boyle.nsict.org)
  51        (chiark.ns :ip chiark.greenend.org.uk)
  52        (guvnor.ns :ip guvnor.demon))
  53   ;;
  54   ;; Mail servers
  55   ((@ mail lists bugs cryptomail) :mx mail)
  56   ;;
  57   ;; Colocated services
  58   ;;((www ftp git) (inet :svc boyle.nsict.org) (fretwank :svc metalzone))
  59   ;;
  60   ;; Entry is via little port-forwarding box
  61   (guvnor (inet :a guvnor.demon) (fretwank :a guvnor))
  62   ;;
  63   ;; Wireless gateway
  64   (evolution (fretwank :a evolution) (wireless :a evolution.wireless))
  65   ;;
  66   ;; Local services
  67   (@ :svc www-frontend)
  68   ((www ftp git bugs mail rawk)
  69    (inet :svc guvnor.demon)
  70    (fretwank :svc metalzone))
  71   ;;
  72   ;; Internal services
  73   (news (fretwank :svc metalzone))
  74   (www-cache (fretwank :svc vampire))
  75   ;;
  76   ;; Wired ethernet
  77   (metalzone (inet :a guvnor.demon) (fretwank :a metalzone))
  78   (vampire (fretwank :a vampire))
  79   (tubescreamer (fretwank :a tubescreamer))
  80   (obsidian (fretwank :a obsidian))
  81   (fuzzface (virtual :a fuzzface))
  82   (mz (virtual :a mz))
  83   ;;
  84   ;; Delegations
  85   #+subnet/fretwank (dhcp :ns (metalzone.ns vampire.ns))
  86   ;;
  87   ;; Networks
  88   (fretwank :net fretwank)
  89   (wireless :net wireless)
  90   (virtual :net virtual))
  91
  92 (defrevzone trusted
  93   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
  94   :reverse trusted
  95   #+subnet/fretwank (dhcp :ns (metalzone.ns vampire.ns))
  96   #+subnet/fretwank (@ :cidr-delegation
  97                        (dhcp
  98                         (dhcp 199.29.172.dhcp.199.29.172.in-addr.arpa))))
  99
 100 (defrevzone untrusted
 101   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
 102   :reverse untrusted)
 103
 104 (defzone dhcp.distorted.org.uk
 105   :ns (metalzone.ns.distorted.org.uk.
 106        vampire.ns.distorted.org.uk.)
 107   :net dhcp)
 108
 109 (defzone dhcp.199.29.172.in-addr.arpa
 110   :ns (metalzone.ns.199.29.172.in-addr.arpa.
 111        vampire.ns.199.29.172.in-addr.arpa.))