/[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 515 by dpavlin, Wed Jul 21 18:33:37 2010 UTC revision 518 by dpavlin, Wed Jul 21 19:01:46 2010 UTC
# Line 50  sub start { Line 50  sub start {
50          my $mac = sprintf('AC:DE:48:00:00:%02x', $nr);          my $mac = sprintf('AC:DE:48:00:00:%02x', $nr);
51          my $mon = port(10000,':');          my $mon = port(10000,':');
52          my $ser = port(11000,':');          my $ser = port(11000,':');
53            my $ip = client::ip_from_mac $mac;
54    
55            my $bridge = client::conf( $ip, 'kvm.bridge', default => 'virtual' );
56            $bridge = $ENV{DEV} if $ENV{DEV};
57    
58          my $ifname = 'kvm' . $nr;          my $ifname = 'kvm' . $nr;
59    
60          warn "# kvm start $nr $mac $mon $ser $ifname";          warn "# kvm $ip start $nr $mac $mon $ser $ifname $bridge";
61    
62  #       system "ifconfig $ifname down";  #       system "ifconfig $ifname down";
63  #       system "brctl delif virtual $ifname";  #       system "brctl delif virtual $ifname";
# Line 66  sub start { Line 70  sub start {
70                  unless $ifconfig =~ m{$ifname};                  unless $ifconfig =~ m{$ifname};
71          system "ifconfig $ifname up"          system "ifconfig $ifname up"
72                  unless $ifconfig =~ m{UP};                  unless $ifconfig =~ m{UP};
73          system "brctl addif virtual $ifname"          system "brctl addif $bridge $ifname"
74                  unless `brctl show` =~ m{$ifname};                  unless `brctl show` =~ m{$ifname};
75    
         my $ip = client::ip_from_mac $mac;  
   
76          my $name = client::conf( $ip, 'hostname' );          my $name = client::conf( $ip, 'hostname' );
77          $name ||= $nr;          $name ||= $nr;
78    
Legend:
Removed from v.515  
changed lines
  Added in v.518
  ViewVC Help
Powered by ViewVC 1.1.26