Add a `web vnccert` remctl to invirt-remote-server

svn path=/trunk/packages/invirt-remote-server/; revision=1402

diff --git a/debian/changelog b/debian/changelog
index 55192ec..3c6630b 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+invirt-remote-server (0.0.9) unstable; urgency=low
+
+  * Add support for a `web vnccert` remctl call
+
+ -- Evan Broder <broder@mit.edu>  Tue, 28 Oct 2008 22:45:29 -0400
+

 invirt-remote-server (0.0.8) unstable; urgency=low
 
   * sipb-xen-base -> invirt-base
 invirt-remote-server (0.0.8) unstable; urgency=low
 
   * sipb-xen-base -> invirt-base

diff --git a/files/usr/sbin/invirt-remote-proxy b/files/usr/sbin/invirt-remote-proxy
index c4bb562..091b980 100755 (executable)
--- a/files/usr/sbin/invirt-remote-proxy
+++ b/files/usr/sbin/invirt-remote-proxy
@@ -14,6 +14,8 @@ esac
 case "$TYPE/$SERVICE" in
     web/listvms )
        invirt-remote-listvms "$@" ;;
 case "$TYPE/$SERVICE" in
     web/listvms )
        invirt-remote-listvms "$@" ;;

+    web/vnccert )
+        invirt-remote-vnccert "$@" ;;

     control/create|control/install )
        invirt-remote-create "$SERVICE" "$MACHINE" "$@" ;;
     control/listhost|control/list-host )
     control/create|control/install )
        invirt-remote-create "$SERVICE" "$MACHINE" "$@" ;;
     control/listhost|control/list-host )

diff --git a/files/usr/sbin/invirt-remote-vnccert b/files/usr/sbin/invirt-remote-vnccert
new file mode 100755 (executable)
index 0000000..acf2816
--- /dev/null
+++ b/files/usr/sbin/invirt-remote-vnccert
@@ -0,0 +1,6 @@
+#!/bin/bash
+# Get the VNC cert for the host passed as the first argument
+
+klist -s || kinit -k
+
+exec remctl "$1" remote web vnccert