idc@cs.hw.ac.uk (Ian Crorie) (01/26/89)
#!/bin/sh
# to extract, remove the header and type "sh filename"
if `test ! -d ./Examples`
then
mkdir ./Examples
echo "mkdir ./Examples"
fi
if `test ! -s ./Examples/config.gateway`
then
echo "Writing ./Examples/config.gateway"
cat > ./Examples/config.gateway << '\Rogue\Monster\'
#basic settings
config=gateway
domain="cs.glasgow.ac.uk"
options=multihost,nrsformat
postmaster=mailer-daemon
install=-f
tabledir=tables
# domain tables
domain std file="cs-dept.ether.chn"
domain std file="glasgow.uk.dom" # generated by c-nrs
domain std file="glasgow.ac.dom" # generated by c-nrs
domain std file="glasgow.gla.dom" # generated by c-nrs
domain std file="glasgow.local.dom"
domain std file="glasgow.ukuucp.dom"
domain top file="glasgow.top.dom"
# channels
channel local file="cs-dept.local.chn",
showuucp,shownrs,showldomain
channel ether file="cs-dept.ether.chn"
channel ether file="cs-dept.uucp.chn"
channel news file="cs-dept.news.chn",relayed
channel janet file="gateway.janet.chn",auth
channel top file="glasgow.top.dom"
\Rogue\Monster\
else
echo "Will not over-write ./Examples/config.gateway"
fi
chmod 444 ./Examples/config.gateway
if [ `wc -c < ./Examples/config.gateway` -ne 744 ]
then
echo 'Got' `wc -c < ./Examples/config.gateway` ', Expected ' 744
fi
if `test ! -s ./Examples/config.slave`
then
echo "Writing ./Examples/config.slave"
cat > ./Examples/config.slave << '\Rogue\Monster\'
# basic settings
config=slave
domain="cs.glasgow.ac.uk"
options=multihost,nrsformat
postmaster=mailer-daemon
tabledir=tables
# domain tables
domain std file="cs-dept.ether.chn"
domain top file="slave.top.dom"
# channels
channel top file="slave.top.chn"
channel local file="cs-dept.local.chn",
showldomain,shownrs,showuucp
channel ether file="cs-dept.ether.chn"
channel ether file="cs-dept.uucp.chn"
channel news file="cs-dept.news.chn",relayed
\Rogue\Monster\
else
echo "Will not over-write ./Examples/config.slave"
fi
chmod 444 ./Examples/config.slave
if [ `wc -c < ./Examples/config.slave` -ne 448 ]
then
echo 'Got' `wc -c < ./Examples/config.slave` ', Expected ' 448
fi
if `test ! -s ./Examples/config.uurelay`
then
echo "Writing ./Examples/config.uurelay"
cat > ./Examples/config.uurelay << '\Rogue\Monster\'
config=uurelay
domain="cs.glasgow.ac.uk"
options=multihost,nrsformat
postmaster=mailer-daemon
install=-f
tabledir=tables
# domain tables
domain std file="cs-dept.ether.chn"
domain std file="glasgow.uk.dom" # generated by c-nrs
domain std file="glasgow.gla.dom" # generated by c-nrs
domain std file="glasgow.local.dom"
domain std file="glasgow.ukuucp.dom"
domain top file="glasgow.top.dom"
# channels
channel local file="cs-dept.local.chn",
shownrs,showuucp,showldomain
channel uucp file="uurelay.uucp.chn",
ldomain="glasgow.uucp",
sysname="glasgow",muucp
channel ether file="cs-dept.ether.chn"
channel news file="uurelay.news.chn"
channel top file="uurelay.top.chn"
\Rogue\Monster\
else
echo "Will not over-write ./Examples/config.uurelay"
fi
chmod 444 ./Examples/config.uurelay
if [ `wc -c < ./Examples/config.uurelay` -ne 674 ]
then
echo 'Got' `wc -c < ./Examples/config.uurelay` ', Expected ' 674
fi
if `test ! -s ./Examples/localise.sh`
then
echo "Writing ./Examples/localise.sh"
cat > ./Examples/localise.sh << '\Rogue\Monster\'
#!/bin/sh
chmod u+w base.m4
# if we wanted to change an existing option we could
ed base.m4 <<'EOF'
/^OX12$/s/12/80/p
/^Ox8$/s/8/60/p
w
q
EOF
# if we wanted to undefine an m4 macro we could
cat >> base.m4 <<'EOF'
undefine(`gcos')
EOF
\Rogue\Monster\
else
echo "Will not over-write ./Examples/localise.sh"
fi
chmod 444 ./Examples/localise.sh
if [ `wc -c < ./Examples/localise.sh` -ne 234 ]
then
echo 'Got' `wc -c < ./Examples/localise.sh` ', Expected ' 234
fi
if `test ! -d ./Examples/tables`
then
mkdir ./Examples/tables
echo "mkdir ./Examples/tables"
fi
if `test ! -s ./Examples/tables/cs-dept.ether.chn`
then
echo "Writing ./Examples/tables/cs-dept.ether.chn"
cat > ./Examples/tables/cs-dept.ether.chn << '\Rogue\Monster\'
# Only the following should ever appear in /usr/lib/aliases
gateway.cs.glasgow.ac.uk
uurelay.cs.glasgow.ac.uk
sunserver2.cs.glasgow.ac.uk
sunserver3.cs.glasgow.ac.uk
sunserver4.cs.glasgow.ac.uk
vax.cs.glasgow.ac.uk
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/cs-dept.ether.chn"
fi
chmod 444 ./Examples/tables/cs-dept.ether.chn
if [ `wc -c < ./Examples/tables/cs-dept.ether.chn` -ne 215 ]
then
echo 'Got' `wc -c < ./Examples/tables/cs-dept.ether.chn` ', Expected ' 215
fi
if `test ! -s ./Examples/tables/cs-dept.local.chn`
then
echo "Writing ./Examples/tables/cs-dept.local.chn"
cat > ./Examples/tables/cs-dept.local.chn << '\Rogue\Monster\'
cs.glasgow.ac.uk
cs.gla.ac.uk
glasgow.uucp
LHOST.cs.glasgow.ac.uk
LHOST.cs.gla.ac.uk
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/cs-dept.local.chn"
fi
chmod 444 ./Examples/tables/cs-dept.local.chn
if [ `wc -c < ./Examples/tables/cs-dept.local.chn` -ne 85 ]
then
echo 'Got' `wc -c < ./Examples/tables/cs-dept.local.chn` ', Expected ' 85
fi
if `test ! -s ./Examples/tables/cs-dept.news.chn`
then
echo "Writing ./Examples/tables/cs-dept.news.chn"
cat > ./Examples/tables/cs-dept.news.chn << '\Rogue\Monster\'
# used by all hosts OTHER THAN news host (uurelay)
#
# news.chn
#
# 1st coloumn is the local-part (user name field) matching a valid newsgroup
# hierarchy; second column is optional relay host for that newsgroup.
#
# Usenet
sci.%s uurelay
rec.%s uurelay
misc.%s uurelay
comp.%s uurelay
news.%s uurelay
soc.%s uurelay
talk.%s uurelay
# Other global newsnets
alt.%s uurelay
bionet.%s uurelay
usrgroup.%s uurelay
gnu.%s uurelay
# regional newsnets
dept.%s uurelay
gu.%s uurelay
west.%s uurelay
scot.%s uurelay
uk.%s uurelay
eunet.%s uurelay
to.%s uurelay
# mailing lists
mail.%s uurelay
local.%s uurelay
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/cs-dept.news.chn"
fi
chmod 444 ./Examples/tables/cs-dept.news.chn
if [ `wc -c < ./Examples/tables/cs-dept.news.chn` -ne 637 ]
then
echo 'Got' `wc -c < ./Examples/tables/cs-dept.news.chn` ', Expected ' 637
fi
if `test ! -s ./Examples/tables/cs-dept.uucp.chn`
then
echo "Writing ./Examples/tables/cs-dept.uucp.chn"
cat > ./Examples/tables/cs-dept.uucp.chn << '\Rogue\Monster\'
#send to uucp relay
psy.uucp uurelay
psy.glasgow.ac.uk uurelay
geology.glasgow.ac.uk uurelay
memex.uucp uurelay
memex.co.uk uurelay
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/cs-dept.uucp.chn"
fi
chmod 444 ./Examples/tables/cs-dept.uucp.chn
if [ `wc -c < ./Examples/tables/cs-dept.uucp.chn` -ne 135 ]
then
echo 'Got' `wc -c < ./Examples/tables/cs-dept.uucp.chn` ', Expected ' 135
fi
if `test ! -s ./Examples/tables/gateway.janet.chn`
then
echo "Writing ./Examples/tables/gateway.janet.chn"
cat > ./Examples/tables/gateway.janet.chn << '\Rogue\Monster\'
#
# Janet channel table
# The domain name on the LHS is routed to the "host" on the RHS.
# Note that the domain names on the LHS are in big-endian form.
#
# Domain Relay [if different]
uk.ac.glasgow uk.ac.edinburgh #alias for gla.vme
uk.ac.glasgow.vme uk.ac.edinburgh #VME is up the spout
uk.ac.glasgow.centre uk.ac.edinburgh #Isn't centre closing down?
uk.ac.ucl.cs.nss
uk.ac.ucl.cs.%s uk.ac.ucl.cs
uk.ac.warwick.%s uk.ac.warwick.cu
uk.ac.york uk.ac.york.minster
uk.ac.%s
uk.mod.%s
nz.ac.%s #New Zealand Unis over IPSS
cern.%s
desy.%s
uk.co.stc uk.ac.ukc
uk.co.stc.%s uk.ac.ukc
uk.co.cv.%s uk.ac.brunel.me
uk.co.%s
irl.hea.%s
irl.ucd.%s uk.ac.ean-relay
ie.ucd.csvax
ie.nihed.vax1
com.ccur.%s uk.co.concurrent
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/gateway.janet.chn"
fi
chmod 444 ./Examples/tables/gateway.janet.chn
if [ `wc -c < ./Examples/tables/gateway.janet.chn` -ne 731 ]
then
echo 'Got' `wc -c < ./Examples/tables/gateway.janet.chn` ', Expected ' 731
fi
if `test ! -s ./Examples/tables/glasgow.gla.dom`
then
echo "Writing ./Examples/tables/glasgow.gla.dom"
cat > ./Examples/tables/glasgow.gla.dom << '\Rogue\Monster\'
# RCSid[] = "@(#)$Header: hdr.file,v 2.2 86/06/27 14:30:49 pb Rel $"
#
##################################################
##################################################
##############
############## File gla.dom (Domain Table)
##############
############## Date Tue Nov 1 14:22:15 1988 (hawaii)
##############
############## NRS version 21:09 1/12/1988 format 2
##############
##################################################
##################################################
cms cms.glasgow.ac.uk
cs cs.glasgow.ac.uk
eng eng.glasgow.ac.uk
geology geology.glasgow.ac.uk
kelvin-laboratory kelvin-laboratory.glasgow.ac.uk
ekva ekva.gla.ac.uk
mrc mrc.glasgow.ac.uk
naval-architecture naval-architecture.glasgow.ac.uk
naval naval.gla.ac.uk
physics physics.glasgow.ac.uk
ph ph.gla.ac.uk
psy psy.glasgow.ac.uk
virology virology.glasgow.ac.uk
vir vir.gla.ac.uk
vme vme.glasgow.ac.uk
vms vms.glasgow.ac.uk
vms1 vms1.glasgow.ac.uk
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/glasgow.gla.dom"
fi
chmod 444 ./Examples/tables/glasgow.gla.dom
if [ `wc -c < ./Examples/tables/glasgow.gla.dom` -ne 1179 ]
then
echo 'Got' `wc -c < ./Examples/tables/glasgow.gla.dom` ', Expected ' 1179
fi
if `test ! -s ./Examples/tables/glasgow.top.dom`
then
echo "Writing ./Examples/tables/glasgow.top.dom"
cat > ./Examples/tables/glasgow.top.dom << '\Rogue\Monster\'
#00
#01 Top level domains (and top channel for janet relay)
#02
#10 If an address hasn't matched a domain name in any other table then
#11 it should match something here. The RHS if present is a domain which
#12 specifies where the message should be relayed for further routing.
#20
#21 Based on the table obtained by mailing information@ukc.ac.uk
#22 with a Subject: line containing top-domains with the additions
#23 of the uk and uucp domains
#24
aristote ean-relay.ac.uk #French Research
arpa nss.cs.ucl.ac.uk #US temporary domain
at ean-relay.ac.uk #Austria
au ean-relay.ac.uk #Australia
bitnet earn-relay.ac.uk
ca ean-relay.ac.uk #Canada
cdn ean-relay.ac.uk #CDNnet, Canada
ch ean-relay.ac.uk #Switzerland
chunet ean-relay.ac.uk #Swiss Univ.
com nss.cs.ucl.ac.uk #US commercial
csnet relay.cs.net
de ean-relay.ac.uk #W.Germany
dec decwrl.dec.com #Digital: now *.dec.com
dfn ukc.ac.uk #Now called *.dbp.de
dk ukc.ac.uk #denmark
dnet wessex.uucp #UKC claim this exists
dunet ean-relay.ac.uk #Danish Univ.
e nss.cs.ucl.ac.uk #Spain.
earn earn-relay.ac.uk #Bitnet/earn.
edu nss.cs.ucl.ac.uk #US education.
es ean-relay.ac.uk #Spain
fi ean-relay.ac.uk #finland
fr cs.ucl.ac.uk #France via X.400
funet ean-relay.ac.uk #Finnish Univ.
gov nss.cs.ucl.ac.uk #US government.
hasler ean-relay.ac.uk #Hasler Telecoms, Switzerland.
i nss.cs.ucl.ac.uk #Italy.
ie ean-relay.ac.uk #Eire.
il ukc.ac.uk #Israel.
iris ean-relay.ac.uk
irl ean-relay.ac.uk #Ireland.
is ukc.ac.uk #Iceland.
isanet ean-relay.ac.uk
jp ukc.ac.uk #Japan.
jpn ukc.ac.uk #Japan.
junet ukc.ac.uk #Japanese Univ.
kr ean-relay.ac.uk #South Korea.
mailnet multics.mit.edu
mil nss.cs.ucl.ac.uk #US military.
mis ukc.ac.uk #UKC claim this exists
my ukc.ac.uk #UKC claim this exists
net nss.cs.ucl.ac.uk #CSnet-relay, uunet.uu.net, etc.
netnorth ukc.ac.uk #UKC claim this - isnt it part of BITNET ?
nl ukc.ac.uk #Netherlands.
no ukc.ac.uk #norway
nz relay.cs.net #New zealand.
org nss.cs.ucl.ac.uk #US non-profit.
osiride ean-relay.ac.uk #
oz ukc.ac.uk #obs. - see au
pt ean-relay.ac.uk # Portugal
riup ean-relay.ac.uk #Portugese Research.
se ukc.ac.uk #Sweden.
sg earn-relay.ac.uk #Singapore.
sunet ean-relay.ac.uk #Swedish Univ.
surfnet ean-relay.ac.uk #Netherlands Univ.
th ukc.ac.uk #Thailand
uk ean-relay.ac.uk #United Kingdom.
uninett ean-relay.ac.uk #Norwegian Univ.
us nss.cs.ucl.ac.uk #USA other
uucp ukc.ac.uk #Usenet - via janet
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/glasgow.top.dom"
fi
chmod 444 ./Examples/tables/glasgow.top.dom
if [ `wc -c < ./Examples/tables/glasgow.top.dom` -ne 2459 ]
then
echo 'Got' `wc -c < ./Examples/tables/glasgow.top.dom` ', Expected ' 2459
fi
if `test ! -s ./Examples/tables/glasgow.uk.dom`
then
echo "Writing ./Examples/tables/glasgow.uk.dom"
cat > ./Examples/tables/glasgow.uk.dom << '\Rogue\Monster\'
# RCSid[] = "@(#)$Header: hdr.file,v 2.2 86/06/27 14:30:49 pb Rel $"
#
##################################################
##################################################
##############
############## File uk.dom (Domain Table)
##############
############## Date Tue Nov 1 14:23:11 1988 (hawaii)
##############
############## NRS version 21:09 1/12/1988 format 2
##############
##################################################
##################################################
alvey alvey.uk
alv alv.uk
mod mod.uk
# RCSid[] = "@(#)$Header: hdr.file,v 2.2 86/06/27 14:30:49 pb Rel $"
#
##################################################
##################################################
##############
############## File ac.dom (Domain Table)
##############
############## Date Tue Nov 1 14:21:47 1988 (hawaii)
##############
############## NRS version 21:09 1/12/1988 format 2
##############
##################################################
##################################################
aberdeen aberdeen.ac.uk
abdn abdn.ac.uk
aberystwyth aberystwyth.ac.uk
aber aber.ac.uk
afrc afrc.ac.uk
aston aston.ac.uk
bangor bangor.ac.uk
bath bath.ac.uk
bbk bbk.ac.uk
birmingham birmingham.ac.uk
bham bham.ac.uk
#Etc.......
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/glasgow.uk.dom"
fi
chmod 444 ./Examples/tables/glasgow.uk.dom
if [ `wc -c < ./Examples/tables/glasgow.uk.dom` -ne 1443 ]
then
echo 'Got' `wc -c < ./Examples/tables/glasgow.uk.dom` ', Expected ' 1443
fi
if `test ! -s ./Examples/tables/glasgow.ukuucp.dom`
then
echo "Writing ./Examples/tables/glasgow.ukuucp.dom"
cat > ./Examples/tables/glasgow.ukuucp.dom << '\Rogue\Monster\'
#0##########################################################################
#1# Glasgow University Computer Science Department
#2# Domain names: "Known" uk uucp sites (Nov 1986)
#3# For sites with whom we speak uucp, see ../chn/uucp.chn & luucp.chn
#4###########################################################################
#5#
#6# Some of these will be in the NRS derived domain table eventually
#7# and should be deleted from here when they show up there.
#90#
#91# [old] uucpname followed by domainised name in RFC822 form
#92# or
#93# full domain name in RFC822 form
abdn-cs.uucp
aber-cs.uucp
acorn.uucp
ai.co.uk
ail.uucp
aivru.uucp
alsys.uucp
anduk.uucp
aprl.uucp
astona.uucp
astonb.uucp
astonc.uucp
astonk.uucp
astonm.uucp
astons.uucp
auslon.co.uk
axion.uucp
azit.uucp
bath63.uucp
bbkcs.uucp
bhamcr.uucp
bhamcs.uucp
bleasdale.co.uk
bond.uucp
bpoly1.uucp
bprcsitu.uucp
bru-cc.uucp
bru-me.uucp
#Etc.......
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/glasgow.ukuucp.dom"
fi
chmod 444 ./Examples/tables/glasgow.ukuucp.dom
if [ `wc -c < ./Examples/tables/glasgow.ukuucp.dom` -ne 914 ]
then
echo 'Got' `wc -c < ./Examples/tables/glasgow.ukuucp.dom` ', Expected ' 914
fi
if `test ! -s ./Examples/tables/slave.top.chn`
then
echo "Writing ./Examples/tables/slave.top.chn"
cat > ./Examples/tables/slave.top.chn << '\Rogue\Monster\'
# Top Channel table for slave machines - gateway is the master
#
# Top level domains for subdomains of cs.glasgow.ac.uk
# If an address hasn't matched a domain name in any other table then
# it should match something here. The RHS is a domain which specifies
# where the message should be relayed for further routing.
# gateway is our WAN relay so if it isn't internal mail it goes there
ALL gateway.cs.glasgow.ac.uk #everything
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/slave.top.chn"
fi
chmod 444 ./Examples/tables/slave.top.chn
if [ `wc -c < ./Examples/tables/slave.top.chn` -ne 432 ]
then
echo 'Got' `wc -c < ./Examples/tables/slave.top.chn` ', Expected ' 432
fi
if `test ! -s ./Examples/tables/slave.top.dom`
then
echo "Writing ./Examples/tables/slave.top.dom"
cat > ./Examples/tables/slave.top.dom << '\Rogue\Monster\'
#slave machines - own top domain
uk
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/slave.top.dom"
fi
chmod 444 ./Examples/tables/slave.top.dom
if [ `wc -c < ./Examples/tables/slave.top.dom` -ne 38 ]
then
echo 'Got' `wc -c < ./Examples/tables/slave.top.dom` ', Expected ' 38
fi
if `test ! -s ./Examples/tables/uurelay.news.chn`
then
echo "Writing ./Examples/tables/uurelay.news.chn"
cat > ./Examples/tables/uurelay.news.chn << '\Rogue\Monster\'
# used only by news host (crete)
#
# news.chn
#
# 1st coloumn is the local-part (user name field) matching a valid newsgroup
# hierarchy; second column is optional relay host for that newsgroup.
#
dept.%s
local.%s
mail.%s
gu.%s
ed.%s
west.%s
scot.%s
uk.%s
eunet.%s
sci.%s
rec.%s
misc.%s
comp.%s
news.%s
soc.%s
talk.%s
alt.%s
usrgroup.%s
bionet.%s
gnu.%s
unix-pc.%s
to.%s
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/uurelay.news.chn"
fi
chmod 444 ./Examples/tables/uurelay.news.chn
if [ `wc -c < ./Examples/tables/uurelay.news.chn` -ne 375 ]
then
echo 'Got' `wc -c < ./Examples/tables/uurelay.news.chn` ', Expected ' 375
fi
if `test ! -s ./Examples/tables/uurelay.top.chn`
then
echo "Writing ./Examples/tables/uurelay.top.chn"
cat > ./Examples/tables/uurelay.top.chn << '\Rogue\Monster\'
# Top Channel table for slave machines - gateway is the master
#
# Top level domains for subdomains of cs.glasgow.ac.uk
# If an address hasn't matched a domain name in any other table then
# it should match something here. The RHS is a domain which specifies
# where the message should be relayed for further routing.
$=T gateway.cs.glasgow.ac.uk # all top level domains
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/uurelay.top.chn"
fi
chmod 444 ./Examples/tables/uurelay.top.chn
if [ `wc -c < ./Examples/tables/uurelay.top.chn` -ne 374 ]
then
echo 'Got' `wc -c < ./Examples/tables/uurelay.top.chn` ', Expected ' 374
fi
if `test ! -s ./Examples/tables/uurelay.uucp.chn`
then
echo "Writing ./Examples/tables/uurelay.uucp.chn"
cat > ./Examples/tables/uurelay.uucp.chn << '\Rogue\Monster\'
#10#############################################################################
#11# UUCP Channel Table
#12# The domain name on the LHS is mapped to a path on the RHS.
#13# If "%s" is included in the RHS then the user part goes here
#14# e.g. jim@hwcs.ac.uk -> hwcs!%s -> hwcs!jim
#15#############################################################################
#16#
#17# Domain name UUCP path in pathalias style
#18# ----------- ----------------------------
memex.uucp
memex.co.uk
geology.glasgow.ac.uk quinag!%s
psy.glasgow.ac.uk
psy.uucp
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/uurelay.uucp.chn"
fi
chmod 444 ./Examples/tables/uurelay.uucp.chn
if [ `wc -c < ./Examples/tables/uurelay.uucp.chn` -ne 555 ]
then
echo 'Got' `wc -c < ./Examples/tables/uurelay.uucp.chn` ', Expected ' 555
fi
if `test ! -s ./Examples/tables/glasgow.local.dom`
then
echo "Writing ./Examples/tables/glasgow.local.dom"
cat > ./Examples/tables/glasgow.local.dom << '\Rogue\Monster\'
# Some {parent|ancestor} - sibling domains not picked up by c-nrs
ac.uk
co.uk
# $D YP domain aliases - resolved on the YP server not the client.
# the client uses top.chn & ether.chn to get to the YP server
# so these entries should be in a table used by the server but not
# by clients.
coral vanuata.cs.glasgow.ac.uk
pacific hawaii.cs.glasgow.ac.uk
mediterranean crete.cs.glasgow.ac.uk
# Geology (colin@geology - Colin Farrow)
#
glgeol.uucp geology.glasgow.ac.uk
quinag.geology.glasgow.ac.uk
suilven.geology.glasgow.ac.uk
canisp.geology.glasgow.ac.uk
# Psychology (jim@psy - Jim Mullen)
#
glpsy.uucp psy.glasgow.ac.uk
merlin.psy.glasgow.ac.uk
kestrel.psy.glasgow.ac.uk
falcon.psy.glasgow.ac.uk
eagle.psy.glasgow.ac.uk
kite.psy.glasgow.ac.uk
# Yellow Pages
#We can't use this here because crete (4.3 BSD MIPS/1000) doesnt have
# the SUN Yellow Pages code in its sendmail
# $%y.cs.glasgow.ac.uk $2
\Rogue\Monster\
else
echo "Will not over-write ./Examples/tables/glasgow.local.dom"
fi
chmod 444 ./Examples/tables/glasgow.local.dom
if [ `wc -c < ./Examples/tables/glasgow.local.dom` -ne 906 ]
then
echo 'Got' `wc -c < ./Examples/tables/glasgow.local.dom` ', Expected ' 906
fi
echo "Finished archive 4 of 4"
exit