#!/bin/sh
in=$1

if [ ! -c /dev/term/$in ] ; then
   echo /dev/term/$in does not exist
   exit 1
fi

KillProcs()
{
    Dev=$1
    procs=`ps -t $Dev | tail +2 | awk '{print $1}'`
    if [ -n "$procs" ] ; then
	kill -1 $procs
	sleep 5
    fi
}

if [ "$in" = "a" -o "$in" = "b" ] ; then
    out=$in
elif [ -c /dev/term/17 ] ; then
    out=`expr $in + 16`
elif [ -c /dev/term/9 ] ; then
    out=`expr $in + 9`
else 
    out=`expr $in + 3`
fi

pmadm -d -p stsmon -s $in
sleep 5
KillProcs term/$in
KillProcs cua/$out
/opt/dp/modem/setmodem -v /opt/dp/modem/telebit.com /dev/cua/$out 38400
sleep 2
pmadm -e -p stsmon -s $in
