[ircbot] / on-vc.sh

#!/bin/sh
# usage:
#    .../on-vc.sh VC SCRIPT
# must be invoked by full path to relevant directory
# where
#    ttyVC is the relevant tty which should have good permissions
#    ./SCRIPT is the startup script (`repeatedly.sh', `startup.sh', etc.)
#      (in the directory whose fullpathname we're invoked with)

set -e

fail () { echo 2>&1 "$0: $1"; exit 1; }

test $# = 2 || fail "usage: $0 VC SCRIPT"
vc="$1"
script="$2"

cd "$(dirname $0)"
test -L .tclshrc || fail "no .tclshrc symlink"
test -x "./$script" || fail "script not executable"

openvt -f -c "$vc" -w -- screen ./"$script"
Commit	Line	Data
22368e4c IJ	1	#!/bin/sh
22368e4c IJ	2	# usage:
4afd32f1	3	# .../on-vc.sh VC SCRIPT
22368e4c IJ	4	# must be invoked by full path to relevant directory
22368e4c IJ	5	# where
4afd32f1	6	# ttyVC is the relevant tty which should have good permissions
22368e4c IJ	7	# ./SCRIPT is the startup script (`repeatedly.sh', `startup.sh', etc.)
	8	# (in the directory whose fullpathname we're invoked with)
	9
	10	set -e
	11
8630943d	12	fail () { echo 2>&1 "$0: $1"; exit 1; }
22368e4c	13
4afd32f1	14	test $# = 2 \|\| fail "usage: $0 VC SCRIPT"
22368e4c	15	vc="$1"
4afd32f1	16	script="$2"
22368e4c IJ	17
	18	cd "$(dirname $0)"
	19	test -L .tclshrc \|\| fail "no .tclshrc symlink"
b0ef02f8	20	test -x "./$script" \|\| fail "script not executable"
22368e4c	21
4afd32f1	22	openvt -f -c "$vc" -w -- screen ./"$script"