: #set -x # Globals # LKPERM=/etc/perms/inst PATH=/bin:/usr/bin:/etc tmp=/tmp/tcp$$ pkg="TCPRT" # permlist package name set="SCO TCP Runtime" # appears in prompts objs="" # driver objs dlk_objs="../inet/dlink/dlink.o ../inet/dlink/dlinkiv.o" ROOT= CONF=${ROOT}/usr/sys/conf DEVDIR=${ROOT}/dev ETC=${ROOT}/etc TCP_CONF=${ROOT}/usr/lib/tcp TCP_IF=${TCP_CONF}/if.conf TCPPERM=${ETC}/perms/tcprt # permlist of this product INET=${ROOT}/usr/sys/inet # function definitions # # usage: safemv file1 file2 # move file1 to file2 without chance of interruption safemv() { trap "" 1 2 3 15 mv $1 $2 trap 1 2 3 15 } # usage: safecopy file1 file2 # copies file1 to file2 without chance of interruption safecopy() { trap "" 1 2 3 15 cp $1 $2 trap 1 2 3 15 } # Check existence of a driver via configure, and set $maj (major dev number) # configure (and confchk) returns value of 0 if driver is present, or 1 if not confchk() { maj=`./configure -j $pref` || { maj=`./configure -j NEXTMAJOR` return 1 } return 0 } # Check for driver already there, only add if not there # Arguments are driver routine prefix, driver functions, # driver type (c, b, s), interrupt priority level (optional), # and interrupt vector (optional). adddriver() { IPL= IV= pref=$1 fns=$2 typ=$3 ipl=$4 iv=$5 confchk || { [ "$ipl" ] && IPL="-l $ipl" [ "$iv" ] && IV="-v $iv" ############### NEXT LINE IS FOR DEBUG ONLY ########### ###### echo $fns $typ $maj $IPL $IV echo "$pref:\n" > conflog ./configure -a $fns -$typ -m $maj $IPL $IV >> conflog 2>&1 || { echo " Error: configure failed to update system configuration. Check /usr/sys/conf/conflog for details." >&2 return 1 } rm -f conflog } return 0 } # Prompt for yes or no answer with message passed as argument - # returns non-zero for no getyn() { while echo "\n$* (y/n/q) \c">&2 do read yn rest case $yn in [yY]) return 0 ;; [nN]|[qQ]) return 1 ;; *) echo "Please answer y,n or q" >&2 ;; esac done } # print a prompt # p() { set -f /bin/echo $* set +f return $? } # Remove temp files and exit with the status passed as argument cleanup() { trap '' 1 2 3 15 [ "$tmp" ] && rm -f $tmp* exit $1 } # Test to see if link kit is installed chklinkkit() { until fixperm -i -d LINK $LKPERM do case $? in 4) echo "The Link Kit is not installed." >&2 ;; 5) echo "The Link Kit is only partially installed." >&2 ;; *) echo "Error testing for Link Kit. Exiting."; cleanup 1 ;; esac # Not fully installed. Do so here while echo "Do you wish to install it now? (y/n) \c" do read ANSWER case $ANSWER in Y|y) custom -o -i LINK break ;; N|n) echo "Drivers cannot be installed without the Link Kit." cleanup 1 ;; *) echo "Please answer 'y' or 'n'. \c" ;; esac done done } chktcp() { fixperm -i -d ${pkg} ${TCPPERM} if [ $? = "0" ] then if [ ! -d ${DEVDIR}/inet ] then echo "Drivers cannot be installed without the TCPRT package." cleanup 1 fi else echo "Drivers cannot be installed without the TCPRT package." cleanup 1 fi } # Re-link new kernel relink() { [ "$_RELINK" ] && return 0 cd /usr/sys/conf echo "\nRe-linking the kernel ... \c" >&2 ./link_xenix > kmakelog 2>&1 || { echo "\nError: Kernel link failed. Check /usr/sys/conf/kmakelog for details." >&2 cleanup 1 } rm -f kmakelog return 0 } installkernel() { echo "\n\nKernel with driver modifications is in /usr/sys/conf/xenix">&2 getyn "Do you want this kernel to boot by default?" || { # selected no. echo " Changes will not be reflected unless /usr/sys/conf/xenix is copied to /xenix, or the pathname of the kernel with the changes is entered explicitly at the 'Boot: ' prompt">&2 return 0 } # Yes, install kernel ./hdinstall > hdinstlog 2>&1 || { echo "\nError: hdinstall failed to install new kernel in /xenix. Check /usr/sys/conf/hdinstlog for details." >&2 return 0 } rm -f hdinstlog echo "\nThe new kernel is installed in /xenix. Reboot your system to activate it." >&2 } # D-LINK driver banner message dlkprompt() { /bin/cat - << EOF D-LINK SETUP Welcome to D-LINK XENIX TCP/IP ! EOF } # main() cd / # check to see if the drivers can be installed # chklinkkit # # check to see if TCP/IP is installed # #chktcp # # check on the existance of the configuration file for # the "mkdev tcp" script # if [ ! -d ${TCP_CONF} ] then mkdir ${TCP_CONF} fi # Add drivers via configure # cd $CONF # Get the major device number of the clone driver # clonemaj=`./configure -j CLONE` || { echo "\nError: clone driver missing from /usr/sys/conf/master. Restore the clone driver and resume this installation." >&2 cleanup 1 } while echo "Do you wish to install or delete the dlink driver (i/d/q) \c" do read ANSWER case $ANSWER in I|i) break ;; D|d) /usr/lib/mkdev/rmdlk cleanup $? ;; Q|q) cleanup 0 ;; *) echo "Please answer 'i', 'd' or 'q'." ;; esac done # # # # dlkprompt getyn "Do you want to continue?" if [ $? = "1" ] then p "You can rerun mkdev at a later time" exit 0 fi # # # Deal with the Ethernet driver # #while p "Which driver will be installed (1.DE100 2.DE200) [1]: \c" #do read board # case "$board" in # "") # board=1; # break 2; # ;; # 1|2) # break 2; # ;; # *) # p "enter 1 or 2 only." # esac #done borad=4 proto=0 while p "Interrupt vector number ( 3, 5, 7, 9, 10, 11, 12,15 ) [9]: \c" do read vect case "$vect" in "") vect=25; break 2; ;; 9|10|11|12|15) vect=`expr $vect - 8 + 24`; break 2; ;; "3|5|7") break 2; ;; *) p "Vector number must be ( 3, 5, 7, 9, 10, 11, 12, 15 ) !" ;; esac done echo "vector=${vect}" while p "Slot number (in hexadecimal) : \c" do read slotno case "$slotno" in [0-9,a-f,A-F]*) break 2; ;; *) p "Slot number must be hexadecimal digit" ;; esac done iobase="$slotno"000 echo "iobase=${iobase}" #memsize=2000 #while p "Memory base address (in hexadecimal) [d0000]: \c" #do read membase # case "$membase" in # "") # membase=d0000 # break 2; # ;; # # [0-9,a-f,A-F]*) # break 2; # ;; # *) p "Address must be hexadecimal digits" # ;; # esac #done if adddriver dlk "dlkinit dlkinfo" c 5 ${vect} then if [ -c ${DEVDIR}/dlink0 ] then rm -f ${DEVDIR}/dlink0 fi mknod ${DEVDIR}/dlink0 c ${clonemaj} ${maj} sed -e 's/# DLINK/ /' ${ETC}/strcf > $tmp.strcf safecopy $tmp.strcf ${ETC}/strcf rm -f $tmp.strcf if [ -f $TCP_IF ] then cp $TCP_IF $tmp.if sed -e "/IF_DLINK/d" -e "/dlk_objs/d" $tmp.if > $TCP_IF fi echo "IF_DLINK=dlink" >> $TCP_IF cd $INET/dlink sed -e "s/__IRQ__/${vect}/" -e "s/__RAMBASE__/${membase}/" \ -e "s/__IOBASE__/${iobase}/" -e "s/__PROTO__/${proto}/" \ < ${INET}/dlink/dlinkiv.S > ${INET}/dlink/dlinkiv.s fi cd $INET/dlink cp de400z.o dlink.o /usr/lib/storel ${INET}/dlink/dlinkiv.s cd $CONF objs=${objs}${dlk_objs} # First remove $objs if they are already (or partially) there cp link_xenix link_xenix.00 || { echo "\n\nError: cannot backup link_xenix." >&2 cleanup 1 } trap "mv link_xenix.00 link_xenix; cleanup 1" 1 2 3 15 for i in $objs do while grep -s $i link_xenix > /dev/null do sed "s! $i!!" link_xenix > $tmp.link safecopy $tmp.link link_xenix && rm -f $tmp.link done done # add $objs to link line sed "s!c\.o!& $objs!" link_xenix > $tmp.link || { echo "\n\nError: Cannot edit link_xenix." >&2 mv link_xenix.00 link_xenix cleanup 1 } # # record the object list for later removal # echo "dlk_objs=\"${dlk_objs}\"" >> $TCP_IF safecopy $tmp.link link_xenix && rm -f $tmp.link trap 1 2 3 15 chmod 700 link_xenix # Relink the kernel with the new driver information if getyn "\nDo you wish to relink the kernel now?" then eval $_RELINK relink else echo "\n$set will not work until the kernel is relinked." >&2 cleanup 0 fi # install if requested # installkernel