remote: proxy control requests on running VMs to right host
[invirt/packages/invirt-remote.git] / files / usr / sbin / sipb-xen-remote-proxy
1 #!/bin/sh
2 # invoke as sipb-xen-remote-proxy-$TYPE, with "TYPE" in the remctl sense.
3 klist -s || kinit -k host/remote.mit.edu
4
5 TYPE="${0##*-}"
6 case "$TYPE" in
7     control )
8         SERVICE="$2" ;;
9     * )
10         SERVICE="$1" ;;
11 esac
12
13 case "$TYPE/$SERVICE" in
14     web/listvms )
15         shift; sipb-xen-remote-listvms "$@" ;;
16     control/create )
17         remctl black-mesa remote "$TYPE" "$@" ;;
18     control/* )
19         # Everything but create must go where the VM is already running.
20         sipb-xen-remote-control "$@" ;;
21     * )
22         remctl black-mesa remote "$TYPE" "$@" ;;
23 esac