|
|
DataMuseum.dkPresents historical artifacts from the history of: Regnecentalen RC-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Regnecentalen RC-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T u
Length: 2381 (0x94d)
Types: TextFile
Names: »usr/admin/menu/softwaremgmt/installpkg «
└─⟦3d8f416b2⟧ Bits:30004042/core2.imd SW95705I 386/ix Multi-user Release 1.2
└─⟦this⟧ »usr/admin/menu/softwaremgmt/installpkg «
#ident "@(#)sadmin:admin/menu/softwaremgmt/installpkg 2.6"
#menu# install new software package onto built-in disk
#help#
#help# Installpkg copies files from removable media onto the built-in disk and
#help# performs additional work as necessary so you can run that software.
#help# From then on, you will have access to those commands.
flags="-qq -k$$"
trap 'exit 0' 1 2 15
dir=${0}.d
if [ -d ${dir} ]
then
patterns=`ls ${dir} 2>/dev/null`
else
patterns=
fi
ddrive=`selectdevice -b $$ /dev/SA ${patterns}`
ndrive=`drivename ${ddrive}`
if [ -n "${patterns}" ]
then
. ${dir}/`selpattern ${ddrive}`
fi
question="
Insert the removable medium for the package you want to install
into the ${ndrive}.
Press <RETURN> when ready. Type q to quit."
while true
do
fulllabel=`disklabel -q "${question}" $$ ${ddrive}`
fsname=
eval `labelfsname "${fulllabel}"`
case "${fsname}" in
instal | install )
trap ' trap "" 1 2
cd /; diskumount -n "${ndrive}" ${ddrive}' 0
/etc/umount ${ddrive} 2>/dev/null
chmod 700 /install
/etc/mount ${ddrive} /install -r || exit 1
;;
'' )
echo >&2 '
This removable medium is not labeled and will not work.
Try another.'
continue
;;
* )
echo >&2 "
This removable medium is labeled '${label}' and is not a package.
The file system name is '${fsname}'. It should be 'install'.
The full label is:
${fulllabel}
Try another."
continue
esac
if [ ! -r /install/install/INSTALL ]
then
admerr $0 'Improperly built software removable medium.'
exit 1
fi
trap ' trap "" 1 2
rm -f /tmp/$$*
cd / '"
diskumount -n '${ndrive}' ${ddrive}" 0
cd /tmp
cp /install/install/INSTALL $$INSTALL
chmod +x $$INSTALL
trap : 1 2
if [ -r /etc/coredirs -a ! -f $$installpkg ]
then
# A problem in cpio makes it change the modes and
# ownership of directories it did not create. This trick
# records and later restores the existing values. The
# directories to be protected are listed in /etc/coredirs.
cpio -o </etc/coredirs >$$installpkg 2>/dev/null
fi
/tmp/$$INSTALL ${ddrive} /install "${ndrive}" ||
echo 'WARNING: Installation may not have completed properly.'
trap '' 1 2
if [ -f $$installpkg ]
then
# Restore the directory modes and ownerships.
cpio -id <$$installpkg >/dev/null 2>&1
fi
rm -f $$INSTALL
diskumount -n "${ndrive}" ${ddrive}
trap 'rm -f /tmp/$$*' 0
trap exit 1 2
done