/[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 83 by dpavlin, Fri Jul 31 17:12:52 2009 UTC revision 144 by dpavlin, Tue Aug 4 18:27:21 2009 UTC
# Line 16  sub tap { Line 16  sub tap {
16    
17          my $interfaces = read_file '/etc/network/interfaces';          my $interfaces = read_file '/etc/network/interfaces';
18    
19          if ( $interfaces !~ m{tap0.*$server::ip}s ) {          if ( $interfaces !~ m{tap0}s ) {
20    
21                  system "sudo apt-get install vde2";                  system "sudo apt-get install vde2";
22    
23                  $interfaces .= qq{                  write_file '/tmp/interfaces', qq{
24    
25          iface tap0 inet static  # added by PXElator
26            address $server::ip  iface tap0 inet static
27            netmask $server::netmask          address $server::ip
28            vde2-switch -          netmask $server::netmask
29            vde2-switch -
30            # setup NAT for vde network
31            post-up sysctl -w net.ipv4.ip_forward=1
32            post-up iptables -t nat -A POSTROUTING -s $server::ip/$server::netmask -o wlan0 -j MASQUERADE
33    
34                  };                  };
35    
36                  write_file '/etc/network/interfaces', $interfaces;                  system q|sudo sh -c 'cat /tmp/interfaces >> /etc/network/interfaces'|;
37                    system q|sudo sh -c 'usermod -G vde2-net -a $SUDO_USER'|;
38    
39          }          }
40    
41          ifconfig('tap0') =~ m{UP}               &&      return 'up';          my $ifconfig = ifconfig('tap0');
42          system("sudo ifup tap0") == 0   &&      return 'started';          if ( $ifconfig =~ m{UP} ) {
43                     $ifconfig =~ m{$server::ip}s && return 'up';
44                    system("sudo /sbin/ifconfig tap0 $server::ip netmask $server::netmask") == 0 && return "ip changed $server::ip";
45                    die "can't change IP address of tap0 to $server::ip";
46            } else {
47                    die "bring interface up with: sudo ifup tap0\n";
48            }
49  }  }
50    
51  1;  1;
Legend:
Removed from v.83  
changed lines
  Added in v.144
  ViewVC Help
Powered by ViewVC 1.1.26