-kinit -k host/sipb-vm-58.mit.edu
-#echo remctl black-mesa remote ${0##*-} "$@"
-remctl black-mesa remote ${0##*-} "$@"
+klist -s || kinit -k host/remote.mit.edu
+
+TYPE="${0##*-}"
+case "$TYPE" in
+ control )
+ SERVICE="$2" ;;
+ * )
+ SERVICE="$1" ;;
+esac
+
+case "$TYPE/$SERVICE" in
+ web/listvms )
+ shift; sipb-xen-remote-listvms "$@" ;;
+ * )
+ remctl black-mesa remote "$TYPE" "$@" ;;
+esac