irc-summon: Share list of bot users with `irc-identpass'.
[ircbot] / on-vc.sh
... / ...
CommitLineData
1#!/bin/sh
2# usage:
3# .../on-vc.sh VC SCRIPT
4# must be invoked by full path to relevant directory
5# where
6# ttyVC is the relevant tty which should have good permissions
7# ./SCRIPT is the startup script (`repeatedly.sh', `startup.sh', etc.)
8# (in the directory whose fullpathname we're invoked with)
9
10set -e
11
12PATH=/usr/local/sbin:/usr/local/bin:/sbin:/bin:/usr/sbin:/usr/bin
13
14fail () { echo 2>&1 "$0: $1"; exit 1; }
15
16test $# -ge 2 || fail "usage: $0 VC SCRIPT [ARGS]"
17vc="$1"
18script="$2"
19shift; shift
20
21cd "$(dirname $0)"
22test -L .tclshrc || fail "no .tclshrc symlink"
23test -x "./$script" || fail "script not executable"
24
25openvt -f -c "$vc" -w -- screen ./"$script" "$@"