#!/usr/bin/ksh
#
#  Take data from enter_node_data and generate commands
#  to enter node data.
#
set -x

#
#  Set initial parameter values
#
NodeNumber=0
Ztype=none
addr=none
type=bnc
duplex=half
speed=0
netmask=255.255.255.0
route=default
adapter=none
format=short
aix=aix433
pssp=PSSP-3.2
image=bos.obj.ssp.433
disks=hdisk0,hdisk1


#
#   Subroutines
#

adapter () {

case $adapter in
        en*)    enter_ethernet;;
        css*)   enter_switch;;
        tr*)    enter_token_ring
esac
}

enter_ethernet () {

if [[ $adapter = en0 ]]
then
 echo spethernt -s no -t $type -f $speed -d $duplex -l $NodeNumber $addr $netmask $route >> $script_out
else
 echo spadaptrs -s no -t $type -f $speed -d $duplex -l $NodeNumber $adapter $addr $netmask >> $script_out
fi

}

enter_switch () {

echo spadaptrs -s no -a yes -n no -l $NodeNumber $adapter $addr $netmask >> $script_out

}

enter_token_ring () {

echo spadaptrs -s no -r $speed -l $NodeNumber $adapter $netmask >> $script_out

}

host_name () {

echo sphostnam -a $adapter -f $format -l $NodeNumber >> $script_out

}

install_options () {

echo spchvgobj -r rootvg -v $aix -p $pssp -h $disks -i $image -l $NodeNumber >> $script_out

echo spbootins -s no -r install -l $NodeNumber

}



#
#   Main routine
#

NodeNumber=$1
Ztype=$2

shift 2
until [[ $# -eq 0 ]]
do
 eval $1
 shift
done

case $Ztype in
        adapter)        adapter
                        ;;
        hostname)       host_name
                        ;;
        install)        install_options
                        ;;
        *)              echo Invalid stanza type $Ztype
                        exit 1
esac