/[pxelator]/lib/PXElator/network.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/network.pm

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

revision 84 by dpavlin, Fri Jul 31 17:35:20 2009 UTC revision 229 by dpavlin, Sun Aug 16 21:35:23 2009 UTC
# Line 12  sub ifconfig { Line 12  sub ifconfig {
12          `/sbin/ifconfig $dev`          `/sbin/ifconfig $dev`
13  }  }
14    
15    sub setup {
16    
17            if ( my $dev = $ENV{DEV} ) {
18                    warn "W: running under device $dev, not configuring network\n";
19                    return;
20            }
21    
22            my $ifconfig = ifconfig('virtual');
23            if ( $ifconfig !~ m{UP} ) {
24                    system "brctl addbr virtual";
25                    system "brctl setfd virtual 0";
26                    system("/sbin/ifconfig virtual $server::ip netmask $server::netmask") == 0 || warn "W: $!";
27            } else {
28                    warn "OK $ifconfig\n";
29            }
30    }
31    
32  sub tap {  sub tap {
33    
34            if ( my $dev = $ENV{DEV} ) {
35                    warn "W: running under device $dev, not configuring tap0\n";
36                    return;
37            }
38    
39            if ( $server::ip !~ m{^172} ) {
40                    warn "W: server ip mismetch, not configuring tap0\n";
41                    return;
42            }
43    
44          my $interfaces = read_file '/etc/network/interfaces';          my $interfaces = read_file '/etc/network/interfaces';
45    
46          if ( $interfaces !~ m{tap0.*$server::ip}s ) {          if ( $interfaces !~ m{tap0}s ) {
47    
48                  system "sudo apt-get install vde2";                  system "sudo apt-get install -y vde2";
49    
50                  $interfaces .= qq{                  write_file '/tmp/interfaces', qq{
51    
52          iface tap0 inet static  # added by PXElator
53            address $server::ip  iface tap0 inet static
54            netmask $server::netmask          address $server::ip
55            vde2-switch -          netmask $server::netmask
56            vde2-switch -
57            # setup NAT for vde network
58            post-up sysctl -w net.ipv4.ip_forward=1
59            post-up iptables -t nat -A POSTROUTING -s $server::ip/$server::netmask -o wlan0 -j MASQUERADE
60    
61                  };                  };
62    
63                  write_file '/etc/network/interfaces', $interfaces;                  system q|sudo sh -c 'cat /tmp/interfaces >> /etc/network/interfaces'|;
64                    system q|sudo sh -c 'usermod -G vde2-net -a $SUDO_USER'|;
65    
66          }          }
67    
# Line 38  sub tap { Line 70  sub tap {
70                   $ifconfig =~ m{$server::ip}s && return 'up';                   $ifconfig =~ m{$server::ip}s && return 'up';
71                  system("sudo /sbin/ifconfig tap0 $server::ip netmask $server::netmask") == 0 && return "ip changed $server::ip";                  system("sudo /sbin/ifconfig tap0 $server::ip netmask $server::netmask") == 0 && return "ip changed $server::ip";
72                  die "can't change IP address of tap0 to $server::ip";                  die "can't change IP address of tap0 to $server::ip";
73            } else {
74                    die "bring interface up with: sudo ifup tap0\n";
75          }          }
         system("sudo ifup tap0") == 0                           &&      return 'started';  
         die "can't start tap0: $!";  
76  }  }
77    
78  1;  1;
Legend:
Removed from v.84  
changed lines
  Added in v.229
  ViewVC Help
Powered by ViewVC 1.1.26