move monitor to tcp/ip port
authorDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 31 Jul 2009 16:47:15 +0000 (16:47 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Fri, 31 Jul 2009 16:47:15 +0000 (16:47 +0000)
lib/PXElator/kvm.pm

index c05d4bc..ba9ad11 100644 (file)
@@ -37,6 +37,13 @@ if ( grep /tap0/, read_file '/proc/net/dev' ) {
 
 our $memory_size = 512;
 our $mac = 'AC:DE:48:00:00:01'; # AC = private, AD = multicast, AE = local
+our $monitor = 'tcp:' . $server::ip . ':10000,server,nowait';
+
+sub start_options { qw/monitor/ }
+
+sub monitor {
+       exec "xterm -e nc $server::ip 10000";
+}
 
 sub start {
 
@@ -44,13 +51,10 @@ sub start {
                vdeq kvm -m $memory_size -net nic,vlan=1,macaddr=$mac
                -net vde,vlan=1,sock=/var/run/vde2/tap0.ctl
                -boot n
-               -monitor stdio
+               -monitor $monitor
        |;
-
-
-       $kvm = "xterm -e $kvm" if $ENV{DISPLAY};
-
        $kvm =~ s{\s+}{ }gs;
+
        warn $kvm;
        exec $kvm;