7 |
|
|
8 |
use server; |
use server; |
9 |
|
|
10 |
|
sub ifconfig { |
11 |
|
my $dev = shift; |
12 |
|
`/sbin/ifconfig $dev` |
13 |
|
} |
14 |
|
|
15 |
sub tap { |
sub tap { |
16 |
|
|
17 |
|
if ( my $dev = $ENV{DEV} ) { |
18 |
|
warn "W: running under device $dev, not configuring tap0\n"; |
19 |
|
return; |
20 |
|
} |
21 |
|
|
22 |
|
if ( $server::ip !~ m{^172} ) { |
23 |
|
warn "W: server ip mismetch, not configuring tap0\n"; |
24 |
|
return; |
25 |
|
} |
26 |
|
|
27 |
my $interfaces = read_file '/etc/network/interfaces'; |
my $interfaces = read_file '/etc/network/interfaces'; |
28 |
|
|
29 |
if ( $interfaces !~ m{tap0.*$server::ip}s ) { |
if ( $interfaces !~ m{tap0}s ) { |
30 |
|
|
31 |
system "sudo apt-get install vde2"; |
system "sudo apt-get install -y vde2"; |
32 |
|
|
33 |
$interfaces .= qq{ |
write_file '/tmp/interfaces', qq{ |
34 |
|
|
35 |
iface tap0 inet static |
# added by PXElator |
36 |
address $server::ip |
iface tap0 inet static |
37 |
netmask $server::netmask |
address $server::ip |
38 |
vde2-switch - |
netmask $server::netmask |
39 |
|
vde2-switch - |
40 |
|
# setup NAT for vde network |
41 |
|
post-up sysctl -w net.ipv4.ip_forward=1 |
42 |
|
post-up iptables -t nat -A POSTROUTING -s $server::ip/$server::netmask -o wlan0 -j MASQUERADE |
43 |
|
|
44 |
}; |
}; |
45 |
|
|
46 |
write_file '/etc/network/interfaces', $interfaces; |
system q|sudo sh -c 'cat /tmp/interfaces >> /etc/network/interfaces'|; |
47 |
|
system q|sudo sh -c 'usermod -G vde2-net -a $SUDO_USER'|; |
48 |
|
|
49 |
} |
} |
50 |
|
|
51 |
`/sbin/ifconfig tap0 2>/dev/null` =~ m{UP} || system "sudo ifup tap0"; |
my $ifconfig = ifconfig('tap0'); |
52 |
|
if ( $ifconfig =~ m{UP} ) { |
53 |
1; |
$ifconfig =~ m{$server::ip}s && return 'up'; |
54 |
|
system("sudo /sbin/ifconfig tap0 $server::ip netmask $server::netmask") == 0 && return "ip changed $server::ip"; |
55 |
|
die "can't change IP address of tap0 to $server::ip"; |
56 |
|
} else { |
57 |
|
die "bring interface up with: sudo ifup tap0\n"; |
58 |
|
} |
59 |
} |
} |
60 |
|
|
61 |
1; |
1; |