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 www-cache)
  74    (fretwank :svc metalzone))
  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   ;; Networks
  85   (fretwank :net fretwank)
  86   (dhcp :net dhcp)
  87   (wireless :net wireless)
  88   (virtual :net virtual))
  89
  90 (defrevzone trusted
  91   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
  92   :reverse trusted)
  93 (defrevzone untrusted
  94   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
  95   :reverse untrusted)