#!/bin/sh -u
#
# Run a logged script session attached to the specified serial port.
#	- Cameron Simpson <cs@zip.com.au> 17may2002
#

: ${TAP_DEV:=/dev/ttyS0}

trace=set-x
dolog=1
doscr=1

cmd=`basename "$0"`
usage="Usage: $cmd [ttydev]"

badopts=

[ $# -gt 0 ] && { TAP_DEV=$1; shift; }
[ $# = 0 ] || { echo "$cmd: extra arguments after ttydev $TAP_DEV: $*" >&2
                badopts=1
              }

[ $badopts ] && { echo "$usage" >&2; exit 2; }

case "$TAP_DEV" in /*) ;; *) TAP_DEV=/dev/$TAP_DEV ;; esac

speed=9600
parity=none

dev_=`echo "$TAP_DEV" | tr -s / _`

lock=tap$dev_
session=$lock

set -- screen "$TAP_DEV" "$speed,cs8,-ixoff"
[ $dolog ] && set -- logscript -M "$session" "$@"
[ $doscr ] && set -- scr "screen-$TAP_DEV" "$@"

exec $trace "$@"