freebsd-skq/release/bininst
Jordan K. Hubbard 70201e1003 11th hour fixes to get the install just right. Fix some bugs
in how ftp transfers were done, make sure all output goes to /dev/ttyv1
for debugging, add in the parallel-IP support so Poul will stop
squeaking (for the moment, anyway).
1994-11-08 11:14:45 +00:00

441 lines
12 KiB
Bash
Executable File

#!/stand/sh
#
# bininst - perform the last stage of installation by somehow getting
# a bindist onto the user's disk and unpacking it. The name bininst
# is actually something of a misnomer, since this utility will install
# more than just the bindist set.
#
# November 11th, 1994
# Copyright (C) 1994 by Jordan K. Hubbard
#
# Permission to copy or use this software for any purpose is granted
# provided that this message stay intact, and at this location (no putting
# your name on top after doing something trivial like reindenting it, just
# to make it look like you wrote it!).
#
# Some useful constants.
PATH=/usr/bin:/usr/sbin:/bin:/sbin:/stand
export PATH
TAR=tar
TAR_FLAGS=xvf
TMP=/tmp
IFCONFIG=ifconfig
HOME=/
export HOME
# Set the initial state of the system.
set_defaults() {
media_type="" ;
media_device="" ;
ipaddr="" ;
hostname="" ;
ether_intr="" ;
domain="" ;
netmask="0xffffff00" ;
ifconfig_flags="" ;
remote_hostip="" ;
tmp_dir="/usr/tmp" ;
ftp_path="ftp://ftp.freebsd.org/pub/FreeBSD/2.0-ALPHA/bindist"
installing=1 ;
mkdir -p ${TMP}
cp /stand/etc/* /etc
}
# Handle the return value from a dialog, doing some pre-processing
# so that each client doesn't have to.
handle_rval() {
case $1 in
0)
return 0
;;
255)
PS1="subshell# " /stand/sh
;;
*)
return 1
;;
esac
}
# A simple user-confirmation dialog.
confirm() {
dialog --title "Please Confirm" --msgbox "$*" 6 72
}
# A simple error dialog.
error() {
dialog --title "Error!" --msgbox "$*" 10 72
}
# Something isn't supported yet! :-(
not_supported() {
dialog --title "Sorry!" \
--msgbox "This feature is not supported in the current version of the \
installation tools. Barring some sort of fatal accident, we do \
expect it to be in the release. Please press RETURN to go on." 10 60
}
# Print welcome banner.
welcome() {
dialog --title "Welcome to FreeBSD" --clear \
--msgbox " We're now ready to install one or more packed distribution
sets onto your machine. At the minimum, you need a bindist
installation though a secrdist is also useful if you want your
system to use the same DES and/or Kerberos security model used
by other commercial systems (the FreeBSD model is md5 based,
and not bad in and of itself though). The secrdist is also a
bit of a special case since it cannot be legally obtained from
the U.S. due to export restrictions, but non-U.S. versions are
also available. See the release notes for more information on
obtaining a secrdist for your part of the world." 15 72
if ! handle_rval $?; then return 1; fi
}
# Get values into $media_type and $media_device. Call network initialization
# if necessary.
choose_media() {
while [ "$media_device" = "" ]; do
dialog --clear --title "Chose installation media" \
--menu "Before we begin the installation, we need to chose and possibly \n\
configure your method of installation. Please pick from one of \n\
the following options. If your option isn't listed here, your \n\
best bet may be to simply hit ESC twice to get a subshell and proceed \n\
manually on your own. If you are finished installing, select cancel.\n\n\
Please choose one of the following:" 20 72 5 \
"Tape" "Load installation from SCSI or QIC tape" \
"CDROM" "Load installation from SCSI or Mitsumi CDROM" \
"DOS" "Load from DOS floppies or a DOS hard disk partition" \
"FTP" "Load the distribution over ftp" \
"NFS" "Load the distribution over NFS" 2> ${TMP}/menu.tmp.$$
retval=$?
choice=`cat ${TMP}/menu.tmp.$$`
rm -f ${TMP}/menu.tmp.$$
if ! handle_rval $retval; then return 1; fi
case $choice in
Tape)
dialog --clear --title "Chose tape type" \
--menu "Which type of tape drive do you have attached to your \n\
system? FreeBSD supports the following types:\n\n\
Choose one of the following:" 20 72 2 \
"SCSI" "SCSI tape drive attached to supported SCSI controller" \
"QIC" "QIC tape drive (Colorado Jumbo, etc)" \
2> ${TMP}/menu.tmp.$$
retval=$?
choice=`cat ${TMP}/menu.tmp.$$`
rm -f ${TMP}/menu.tmp.$$
if ! handle_rval $retval; then continue; fi
media_type=tape;
case $choice in
SCSI)
media_device=/dev/rst0
;;
QIC)
media_device=/dev/rwt0
;;
esac
;;
CDROM)
dialog --clear --title "Chose CDROM type" \
--menu "Which type of CDROM drive do you have attached to your \n\
system? FreeBSD supports the following types:\n\n\
Choose one of the following:" 15 72 2 \
"SCSI" "SCSI CDROM drive attached to supported SCSI controller" \
"Mitsumi" "Mitsumi CDROM drive" \
2> ${TMP}/menu.tmp.$$
retval=$?
choice=`cat ${TMP}/menu.tmp.$$`
rm -f ${TMP}/menu.tmp.$$
if ! handle_rval $retval; then continue; fi
media_type=cdrom;
case $choice in
SCSI)
media_device=/dev/cd0d
;;
Mitsumi)
media_device=/dev/mcd0d
;;
esac
;;
DOS)
not_supported
;;
FTP)
if ! setup_network; then continue; fi
dialog --title "FTP Installation Information" --clear \
--inputbox "Please specify the machine and directory location of the
distribution you wish to load. This should be either a \"URL style\"
specification (e.g. something like ftp://ftp.freeBSD.org/pub/...) or
simply the name of a host to connect to. If only a host name is
specified, the installation assumes that you will properly connect
and \"mget\" the files yourself.\n\n" \
16 72 "$ftp_path" 2> ${TMP}/inputbox.tmp.$$
if ! handle_rval $?; then continue; fi
media_type=ftp
media_device=`cat ${TMP}/inputbox.tmp.$$`
ftp_path=$media_device
rm -f ${TMP}/inputbox.tmp.$$
;;
NFS)
setup_network
not_supported
;;
esac
done
}
# Set the location of our temporary unpacking directory.
set_tmpdir()
{
dialog --title "Chose temporary directory" --clear \
--inputbox "Please specify the name of a directory containing enough
free space to hold the temporary files for this distribution.
At minimum, a binary distribution will require around 10MB.
At maximum, a srcdist may take 60MB or more. If the directory
you specify does not exist, it will be created for you.\n\n" \
16 72 "/usr/tmp" 2> ${TMP}/inputbox.tmp.$$
if ! handle_rval $?; then return 1; fi
tmp_dir=`cat ${TMP}/inputbox.tmp.$$`
rm -f ${TMP}/inputbox.tmp.$$
mkdir -p $tmp_dir
return 0
}
cd_tmpdir()
{
if ! cd $tmp_dir; then
error "No such file or directory for ${tmp_dir}, sorry! Please fix this and try again."
return 1
fi
}
rm_tmpdir()
{
if dialog --title "Delete contents?" --clear \
--yesno "Do you wish to delete the contents of ${tmp_dir}?" 5 72; then
rm -rf $tmp_dir/*
fi
}
setup_network_ether()
{
dialog --clear --title "Ethernet Interface Name" \
--menu "Please select the type of ethernet device you have:\n\n" \
20 76 6 \
"ed0" "WD80x3, SMC, Novell NE[21]000 or 3C503 generic NIC at 0x280/5" \
"ed1" "Same as above, but at address 0x300 and IRQ 5" \
"ed2" "Same as above, but at address 0x300 and IRQ 10" \
"ie0" "AT&T StarLan and EN100 family at 0x360 and IRQ 7" \
"is0" "Isolan 4141-0 or Isolink 4110 at 0x280 and IRQ 7" \
"ze0" "PCMCIA IBM or National card at 0x300 and IRQ 5" \
2> ${TMP}/menu.tmp.$$
retval=$?
interface=`cat ${TMP}/menu.tmp.$$`
rm -f ${TMP}/menu.tmp.$$
if ! handle_rval $retval; then return 1; fi
}
setup_network_slip()
{
not_supported
}
setup_network_ppp()
{
not_supported
}
setup_network_plip()
{
default_value=""
if ! network_dialog "What is the ip number for the remote host"; then return 1; fi
remote_hostip=$answer
}
network_dialog()
{
dialog --title "Network Information" --clear \
--inputbox "$*" 10 60 "$default_value" 2> ${TMP}/inputbox.tmp.$$
if ! handle_rval $?; then return 1; fi
answer=`cat ${TMP}/inputbox.tmp.$$`
rm -f ${TMP}/inputbox.tmp.$$
}
setup_network()
{
done=0
while [ "$interface" = "" ]; do
dialog --clear --title "Set up network interface" \
--menu "Please select the type of network connection you have:\n\n" \
20 72 4 \
"ether" "A supported ethernet card" \
"SLIP" "A point-to-point SLIP (Serial Line IP) connection" \
"PPP" "A point-to-point protocol link" \
"PLIP" "A Parallel-Line IP setup (sort of like lap-link)" \
2> ${TMP}/menu.tmp.$$
retval=$?
choice=`cat ${TMP}/menu.tmp.$$`
rm -f ${TMP}/menu.tmp.$$
if ! handle_rval $retval; then return 1; fi
case $choice in
ether)
if ! setup_network_ether; then continue; fi
;;
SLIP)
if ! setup_network_slip; then continue; fi
;;
PPP)
if ! setup_network_ppp; then continue; fi
;;
PLIP)
if ! setup_network_plip; then continue; fi
;;
esac
if [ "$interface" = "" ]; then continue; fi
default_value=""
if ! network_dialog "What is the fully qualified name of this host"; then return 1; fi
hostname=$answer
echo $hostname > /etc/myname
hostname $hostname
default_value=`echo $hostname | sed -e 's/[^.]*\.//'`
if network_dialog "What is the domain name of this host (Internet, not YP/NIS)"; then
domain=$answer
fi
default_value=""
if ! network_dialog "What is the IP address of this host"; then return 1; fi
ipaddr=$answer
echo "$ipaddr $hostname `echo $hostname | sed -e s/\.$domain//`" \
>> /etc/hosts
default_value="$netmask"
if network_dialog "Please specify the netmask"; then
netmask=$answer
fi
default_value=""
if network_dialog "Any extra flags to ifconfig?" ; then
ifconfig_flags=$answer
fi
echo "Progress <$IFCONFIG $interface $ipaddr $remote_hostip netmask $netmask $ifconfig_flags>" >/dev/ttyv1
if ! $IFCONFIG $interface $ipaddr $remote_hostip netmask $netmask $ifconfig_flags 2>&1 > /dev/ttyv1 ; then
error "Unable to configure interface $interface"
ipaddr=""; interface=""
continue
fi
rm -f ${TMP}/inputbox.tmp.$$
echo "$ipaddr $remote_hostip netmask $netmask $ifconfig_flags" > /etc/hostname.$interface
default_value=""
if network_dialog "If you have a gateway, enter its IP address (otherwise cancel)"; then
gateway=$answer
echo "Progress <route add default $gateway>" > /dev/ttyv1
route add default $gateway 2>&1 > /dev/ttyv1
fi
default_value=""
if network_dialog "If you have a name server, enter its IP address (otherwise cancel)"; then
nameserver=$answer
echo "nameserver $nameserver" > /etc/resolv.conf
fi
done
}
install_set()
{
case $media_type in
tape)
if ! set_tmpdir; then return; fi
if ! cd_tmpdir; then return; fi
confirm "Please mount tape for ${media_device}."
dialog --title "Results of tape extract" --clear \
--prgbox "$TAR $TAR_FLAGS $media_device" 10 72
if [ -f extract.sh ]; then
sh ./extract.sh 2>&1 > /dev/ttyv1
else
error "This isn't a proper distribution. No installation script found."
fi
rm_tmpdir
;;
cdrom)
not_supported
return
;;
dos)
if ! set_tmpdir; then return; fi
if ! cd_tmpdir; then return; fi
not_supported
return
;;
ftp)
if ! set_tmpdir; then return; fi
if ! cd_tmpdir; then return; fi
if ! echo $media_device | grep -v 'ftp://'; then
if ! ncftp $media_device/* 2>&1 > /dev/ttyv1; then
error "Couldn't fetch distribution from ${media_device}!"
else
if [ -f extract.sh ]; then
sh ./extract.sh 2>&1 > /dev/ttyv1
else
error "This isn't a proper distribution. No installation script found."
fi
fi
else
ftp $media_device
if [ -f extract.sh ]; then
sh ./extract.sh 2>&1 > /dev/ttyv1
else
error "No installation script found. Please grab the right bits."
fi
fi
rm_tmpdir
return
;;
nfs)
not_supported
return
;;
esac
}
do_last_config()
{
dialog --title "Aufwiedersehen!" \
--msgbox "We now come to the end of the installation. At this point in
time, there's nothing fancy here, but for the release we plan to
ask some additional questions about time zone setup, what sort of
mail client this host is, etc. We just ran out of time for ALPHA!
At the very least, you may wish to check out the 'tzsetup' command;
it will at least handle the first checklist item for you. Thanks!
\nAny install-related comments to jkh, phk or paul (@freebsd.org)." 15 72
}
welcome
set_defaults
while [ $installing -eq 1 ]; do
if choose_media; then
install_set
media_device=""; media_type=""
else
do_last_config
installing=0
fi
done
echo; echo "Exiting to shell"
echo "Progress <installation completed>" > /dev/ttyv1
exec /stand/sh