]>
Commit | Line | Data |
---|---|---|
8a04b6c7 DM |
1 | #!/usr/bin/perl |
2 | ||
3 | use strict; | |
4 | use warnings; | |
5 | ||
6 | use PVE::LXC; | |
7 | use PVE::Tools qw(run_command); | |
8 | use PVE::Network; | |
9 | use PVE::ProcFSTools; | |
10 | ||
11 | die "got unexpected argument count\n" if scalar(@ARGV) != 5; | |
12 | ||
13 | my ($vmid, $arg2, $arg3, $type, $iface) = @ARGV; | |
14 | ||
15 | die "got unexpected argument ($arg2 != net)\n" if $arg2 ne 'net'; | |
16 | die "got unexpected argument ($arg3 != up)\n" if $arg3 ne 'up'; | |
17 | ||
18 | die "got unexpected argument ($type != veth)\n" if $type ne 'veth'; | |
19 | ||
20 | die "got unexpected environment" if $vmid ne $ENV{LXC_NAME}; | |
21 | ||
22 | die "missing vmid parameter\n" if !$vmid; | |
23 | die "missing iface parameter\n" if !$iface; | |
24 | ||
25 | my $conf = PVE::LXC::load_config($vmid); | |
26 | ||
27916659 | 27 | my $netconf; |
18862537 | 28 | if ($iface =~ m/^veth(\d+)i(\d+)$/) { |
27916659 DM |
29 | die "got unexpected interface name '$iface'\n" if $1 ne $vmid; |
30 | $netconf = $conf->{"net$2"}; | |
8a04b6c7 DM |
31 | } |
32 | ||
33 | die "unable to find network definition for interface '$iface'\n" | |
27916659 DM |
34 | if !defined($netconf); |
35 | ||
36 | my $net = PVE::LXC::parse_lxc_network($netconf); | |
8a04b6c7 DM |
37 | |
38 | my $tag = $net->{tag}; | |
39 | my $firewall = $net->{firewall}; | |
40 | my $bridge = $net->{bridge}; | |
41 | ||
42 | die "missing bridge configuration" if !$bridge; | |
43 | ||
44 | if (-d "/sys/class/net/$iface") { | |
45 | ||
46 | my $bridgemtu = PVE::Tools::file_read_firstline("/sys/class/net/$bridge/mtu"); | |
47 | die "bridge '$bridge' does not exist\n" if !$bridgemtu; | |
48 | #avoid insecure dependency; | |
49 | ($bridgemtu) = $bridgemtu =~ /(\d+)/; | |
50 | ||
51 | PVE::Tools::run_command("/sbin/ip link set dev $iface up mtu $bridgemtu"); | |
52 | PVE::Tools::run_command("/sbin/ip addr add 0.0.0.0/0 dev $iface"); | |
53 | PVE::ProcFSTools::write_proc_entry("/proc/sys/net/ipv4/conf/$iface/proxy_arp", "1"); | |
54 | PVE::ProcFSTools::write_proc_entry("/proc/sys/net/ipv4/conf/$iface/forwarding", "1"); | |
55 | PVE::Network::tap_plug($iface, $bridge, $tag, $firewall); | |
56 | } | |
57 | ||
58 | exit 0; |