/[pxelator]/lib/PXElator/kvm.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/PXElator/kvm.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 390 by dpavlin, Mon Sep 7 21:34:05 2009 UTC revision 406 by dpavlin, Wed Sep 9 09:04:04 2009 UTC
# Line 70  sub start { Line 70  sub start {
70          system "brctl addif virtual $ifname"          system "brctl addif virtual $ifname"
71                  unless `brctl show` =~ m{$ifname};                  unless `brctl show` =~ m{$ifname};
72    
73            my $name = client::conf( client::ip_from_mac $mac, 'hostname' );
74            $name ||= $nr;
75    
76          my $kvm = qq|          my $kvm = qq|
77                  kvm -m $memory_size -net nic,macaddr=$mac                  kvm
78                    -name "$name"
79                    -m $memory_size -net nic,macaddr=$mac
80                  -net tap,ifname=$ifname,script=no                  -net tap,ifname=$ifname,script=no
81                  -boot n                  -boot n
82                  -monitor tcp:$mon,server,nowait                  -monitor tcp:$mon,server,nowait
# Line 85  sub start { Line 90  sub start {
90    
91  }  }
92    
93    sub nr_from_mac {
94            my $mac = shift;
95            $mac =~ s{^.+:([0-9a-f]{2})$}{hex($1)}e;
96            $mac;
97    }
98    
99    sub next_nr {
100            my @kvms = glob "$server::conf/mac/AC:DE:48:00:00:*";
101            my $nr = nr_from_mac( pop @kvms );
102            return $nr + 1;
103    }
104    
105  warn 'loaded';  warn 'loaded';
106    
107  1;  1;
Legend:
Removed from v.390  
changed lines
  Added in v.406
  ViewVC Help
Powered by ViewVC 1.1.26