eric@sactoh0.SAC.CA.US (Eric J. Nihill) (11/26/90)
#! /bin/sh
# This is a shell archive, meaning:
# 1. Remove everything above the #! /bin/sh line.
# 2. Save the resulting text in a file.
# 3. Execute the file with /bin/sh (not csh) to create:
# backupfiles
# backupmain
# subsystem
# utilsmenu
# This archive created: Sun Nov 25 13:06:51 1990
export PATH; PATH=/bin:/usr/bin:$PATH
echo shar: "extracting 'backupfiles'" '(63 characters)'
if test -f 'backupfiles'
then
echo shar: "will not over-write existing file 'backupfiles'"
else
cat << \SHAR_EOF > 'backupfiles'
echo
echo "Backing up the files directories"
echo
tar cv files
SHAR_EOF
fi
echo shar: "extracting 'backupmain'" '(415 characters)'
if test -f 'backupmain'
then
echo shar: "will not over-write existing file 'backupmain'"
else
cat << \SHAR_EOF > 'backupmain'
#
mv citadel citadel.hold
cat >citadel <<!
echo "UNCENSORED! BBS is down for backup."
echo "Please call back in about 10 minutes."
exit
!
chmod 5755 citadel
tar cv \
usersupp quickroom registration \
MMstructure \
calllog calllog.pos \
eternal help hengenetdir \
messages network nightly mkgoodbye mkhello weekly \
userpurge.cron wtmpsupp rooms msgmain
#
mv citadel.hold citadel
chmod 5755 citadel
echo "finished"
SHAR_EOF
fi
echo shar: "extracting 'subsystem'" '(73 characters)'
if test -f 'subsystem'
then
echo shar: "will not over-write existing file 'subsystem'"
else
cat << \SHAR_EOF > 'subsystem'
echo
echo The program in `pwd`/subsystem is run when \* is pressed.
echo
SHAR_EOF
fi
echo shar: "extracting 'utilsmenu'" '(1138 characters)'
if test -f 'utilsmenu'
then
echo shar: "will not over-write existing file 'utilsmenu'"
else
cat << \SHAR_EOF > 'utilsmenu'
# Citadel/UX Utilities Menu (shell script)
# version 1.00 - March 1989
# see copyright.doc for copyright information
while true
do
clear
cat <<!!
Citadel/UX Utilities Menu
a. Citadel/UX login
b. Sysop utilities
c. Calling statistics
d. Message file statistics
e. User administration
f. User list with passwords
g. Mail utilities
h. Read call log
i. Last 20 users
j. Who is logged in
k. Change your password
q. Quit
!!
echo "Please enter your selection -> \c"
read x
case $x in
[a,A]) citadel
;;
[b,B]) sysoputil
;;
[c,C]) stats
read y
;;
[d,D]) clear
msgstats
echo "<press return to continue>"
read y
;;
[e,E]) useradmin
;;
[f,F]) clear
userlist password |more
read y
;;
[g,G]) clear
mailutil
read y
;;
[h,H]) clear
readlog |more
read y
;;
[i,I]) clear
readlog -t
echo "<press return to continue>"
read y
;;
[j,J]) clear
whobbs
echo "<press return to continue>"
read y
;;
[k,K]) clear
passwd
;;
[q,Q]) clear
break;;
*) echo "Selection $x is not available\007"
sleep 1
;;
esac
done
SHAR_EOF
fi
exit 0
# End of shell archive
--
Some do, some don't. | eric@sactoh0.SAC.CA.US
Some will, some won't. | ames!pacbell!sactoh0!eric
I might! | ucbvax!csusac!sactoh0!eric
| ( A Home For Unwanted 3B's )