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

   1 ;;; Zone file for distorted.org.uk
   2
   3 (load "hosts" :verbose nil)
   4
   5 ;;;--------------------------------------------------------------------------
   6 ;;; Network allocations
   7 ;;; (RFC1918 addresses are allocated from Cambridge G-RIN.)
   8
   9 (defnet distorted.org.uk 172.29.198.0/23
  10   (untrusted 256)
  11   (trusted 256
  12     (fretwank 128
  13       (unsafe 32)
  14       (dhcp 32)
  15       (safe 32))
  16     (virtual 32)
  17     (its 4)))
  18
  19 ;;;--------------------------------------------------------------------------
  20 ;;; Host allocations
  21
  22 ;; External addresses.
  23 (defhost guvnor.demon 80.177.3.76)
  24
  25 ;; Unsafe network.
  26 (defhost guvnor (unsafe 1))
  27 (defhost metalzone (unsafe 2))
  28 ;;(defhost evolution.fretwank (unsafe 3))
  29 (defhost vampire (unsafe 4))
  30
  31 ;; Safe network.
  32 (defhost tubescreamer (safe 1))
  33 (defhost obsidian (safe 2))
  34
  35 ;; Wireless network.
  36 (defhost vampire.untrusted (untrusted 1))
  37 (defhost evolution (untrusted 2))
  38
  39 ;; Virtual private network.
  40 (defhost crybaby (virtual 1))
  41
  42 ;; Special network for ITS.
  43 ;; It doesn't understand point-to-point links, so we need a little net.
  44 (defhost gw (its 1))
  45 (defhost mz (its 2))
  46
  47 ;;;--------------------------------------------------------------------------
  48 ;;; Other definitions.
  49
  50 (setf *default-zone-admin* "hostmaster@distorted.org.uk")
  51
  52 (preferred-subnet-case
  53   (fretwank
  54    (setf *default-zone-source* 'vampire.distorted.org.uk.)
  55    (defhost www-frontend metalzone))
  56   (t
  57    (setf *default-zone-source* 'guvnor.distorted.org.uk.)
  58    (defhost www-frontend guvnor.demon)))
  59
  60 ;;;--------------------------------------------------------------------------
  61 ;;; Main zone definition.
  62
  63 (defzone distorted.org.uk
  64   ;;
  65   ;; Nameservers
  66   :ns #+subnet/fretwank ((metalzone.ns :ip metalzone)
  67                          (vampire.ns :ip vampire))
  68       #-subnet/fretwank ((boyle.ns :ip boyle.nsict.org)
  69                          (chiark.ns :ip chiark.greenend.org.uk)
  70                          (guvnor.ns :ip guvnor.demon))
  71   ;;
  72   ;; Mail servers
  73   ((@ mail lists bugs cryptomail)
  74    :mx mail
  75    :srv ((:smtp mail)))
  76   ;;
  77   ;; Other services
  78   :srv ((:http www)
  79         (:ftp ftp))
  80   ;;
  81   ;; Colocated services
  82   ;;((www ftp git) (inet :svc boyle.nsict.org) (fretwank :svc metalzone))
  83   ;;
  84   ;; Entry is via little port-forwarding box
  85   (guvnor (inet :a guvnor.demon) (fretwank :a guvnor))
  86   ;;
  87   ;; Wireless gateway
  88   (untrusted :net untrusted)
  89   (evolution (untrusted :a evolution))
  90   ;;
  91   ;; Local services
  92   (@ :svc www-frontend)
  93   ((www ftp wiki git bugs mail rawk)
  94    (inet :svc guvnor.demon)
  95    (fretwank :svc metalzone))
  96   ((db tor)
  97    (inet :svc guvnor.demon)
  98    (fretwank :svc vampire))
  99   (vox (inet :svc guvnor.demon) (fretwank :svc vampire))
 100   ;;
 101   ;; Internal services
 102   ((news ntp1) (fretwank :svc metalzone))
 103   ((www-cache wpad ntp) (fretwank :svc vampire))
 104   ;;
 105   ;; Wired ethernet
 106   (fretwank :net fretwank)
 107   (metalzone (inet :a guvnor.demon) (fretwank :a metalzone))
 108   (vampire (fretwank :a vampire) (untrusted :a vampire.untrusted))
 109   (obsidian (fretwank :a obsidian))
 110   ;;
 111   ;; Virtual network
 112   (virtual :net virtual)
 113   (crybaby (virtual :a crybaby))
 114   ;;
 115   ;; ITS
 116   (its :net its)
 117   (gw (its :a gw))
 118   (mz (its :a mz))
 119   ;;
 120   ;; Delegations
 121   #+subnet/fretwank (dhcp :ns (metalzone.ns vampire.ns)))
 122
 123 ;;;--------------------------------------------------------------------------
 124 ;;; Other subsidiary zones.
 125
 126 (defrevzone trusted
 127   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
 128   :reverse trusted
 129   #+subnet/fretwank (dhcp :ns (metalzone.ns vampire.ns))
 130   #+subnet/fretwank (@ :cidr-delegation
 131                        (dhcp
 132                         (dhcp 199.29.172.dhcp.199.29.172.in-addr.arpa))))
 133
 134 (defrevzone untrusted
 135   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
 136   :reverse untrusted)
 137
 138 (defzone dhcp.distorted.org.uk
 139   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
 140   :net dhcp)
 141
 142 (defzone dhcp.199.29.172.in-addr.arpa
 143   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire)))
 144
 145 ;;;----- That's all, folks --------------------------------------------------