[pve-common.git] / test / etc_network_interfaces / t.create_network.pl

save('proc_net_dev', <<'/proc/net/dev');
eth0:
eth1:
eth2:
eth3:
/proc/net/dev

r(load('brbase'));

#
# Variables used for the various interfaces:
#

my $ip = '192.168.0.2/24';
my $gw = '192.168.0.1';
my $svcnodeip = '239.192.105.237';
my $physdev = 'eth0';
my $remoteip1 = '192.168.0.3';
my $remoteip2 = '192.168.0.4';

#
# Hunk for the default bridge of the 'brbase' configuration
#

my $vmbr0_part = <<"PART";
auto vmbr0
iface vmbr0 inet static
	address 10.0.0.2/24
	gateway 10.0.0.1
	bridge-ports eth0
	bridge-stp off
	bridge-fd 0
PART
chomp $vmbr0_part;

#
# Configure eth1 statically, store its expected interfaces hunk in $eth1_part
# and test!
#

$config->{ifaces}->{eth1} = {
    type => 'eth',
    method => 'static',
    address => $ip,
    gateway => $gw,
    families => ['inet'],
    autostart => 1
};

my $eth1_part = <<"PART";
auto eth1
iface eth1 inet static
	address $ip
	gateway $gw
PART
chomp $eth1_part;

expect load('loopback') . <<"CHECK";
source-directory interfaces.d

iface eth0 inet manual

$eth1_part

iface eth2 inet manual

iface eth3 inet manual

$vmbr0_part

CHECK

#
# Add a bond for eth2 & 3 and check the new output
#

$config->{ifaces}->{bond0} = {
    type => 'bond',
    mtu => 1400,
    slaves => 'eth2 eth3',
    bond_mode => '802.3ad',
    bond_xmit_hash_policy => 'layer3+4',
    bond_miimon => 100,
    method => 'manual',
    families => ['inet'],
    autostart => 1
};
my $bond0_part = <<"PART";
auto bond0
iface bond0 inet manual
	bond-slaves eth2 eth3
	bond-miimon 100
	bond-mode 802.3ad
	bond-xmit-hash-policy layer3+4
	mtu 1400
PART
chomp $bond0_part;

expect load('loopback') . <<"CHECK";
source-directory interfaces.d

iface eth0 inet manual

$eth1_part

iface eth2 inet manual

iface eth3 inet manual

$bond0_part

$vmbr0_part

CHECK

#
# Add vxlan1 and 2
#

$config->{ifaces}->{vxlan1} = {
    type => 'vxlan',
    method => 'manual',
    families => ['inet'],
    'vxlan-id' => 1,
    'vxlan-svcnodeip' => $svcnodeip,
    'vxlan-physdev' => $physdev,
    autostart => 1
};

$config->{ifaces}->{vxlan2} = {
    type => 'vxlan',
    method => 'manual',
    families => ['inet'],
    'vxlan-id' => 2,
    'vxlan-local-tunnelip' => $ip,
    autostart => 1
};

my $vxlan12_part = <<"PART";
auto vxlan1
iface vxlan1 inet manual
	vxlan-id 1
	vxlan-svcnodeip $svcnodeip
	vxlan-physdev $physdev

auto vxlan2
iface vxlan2 inet manual
	vxlan-id 2
	vxlan-local-tunnelip $ip
PART
chomp $vxlan12_part;

expect load('loopback') . <<"CHECK";
source-directory interfaces.d

iface eth0 inet manual

$eth1_part

iface eth2 inet manual

iface eth3 inet manual

$bond0_part

$vmbr0_part

$vxlan12_part

CHECK

#
# Add vxlan3 and 3 bridges using vxlan1..3
#

$config->{ifaces}->{vmbr1} = {
    mtu => 1400,
    type => 'bridge',
    method => 'manual',
    families => ['inet'],
    bridge_stp => 'off',
    bridge_fd => 0,
    bridge_ports => 'vxlan1',
    bridge_vlan_aware => 'yes',
    autostart => 1
};

$config->{ifaces}->{vmbr2} = {
    type => 'bridge',
    method => 'manual',
    families => ['inet'],
    bridge_stp => 'off',
    bridge_fd => 0,
    bridge_ports => 'vxlan2',
    autostart => 1
};

$config->{ifaces}->{vmbr3} = {
    type => 'bridge',
    method => 'manual',
    families => ['inet'],
    bridge_stp => 'off',
    bridge_fd => 0,
    bridge_ports => 'vxlan3',
    bridge_vlan_aware => 'yes',
    bridge_vids => '2-10',
    autostart => 1
};

my $vmbr123_part = <<"PART";
auto vmbr1
iface vmbr1 inet manual
	bridge-ports vxlan1
	bridge-stp off
	bridge-fd 0
	bridge-vlan-aware yes
	bridge-vids 2-4094
	mtu 1400

auto vmbr2
iface vmbr2 inet manual
	bridge-ports vxlan2
	bridge-stp off
	bridge-fd 0

auto vmbr3
iface vmbr3 inet manual
	bridge-ports vxlan3
	bridge-stp off
	bridge-fd 0
	bridge-vlan-aware yes
	bridge-vids 2-10
PART
chomp $vmbr123_part;

$config->{ifaces}->{vxlan3} = {
    type => 'vxlan',
    method => 'manual',
    families => ['inet'],
    'vxlan-id' => 3,
    'vxlan-remoteip' => [$remoteip1, $remoteip2],
    'bridge-access' => 3,
    autostart => 1
};

my $vx = $config->{ifaces}->{vxlan2};
$vx->{'bridge-learning'} = 'off';
$vx->{'bridge-arp-nd-suppress'} = 'on';
$vx->{'bridge-unicast-flood'} = 'off';
$vx->{'bridge-multicast-flood'} = 'off';
my $vxlan123_part = $vxlan12_part ."\n" . <<"PART";
	bridge-arp-nd-suppress on
	bridge-learning off
	bridge-multicast-flood off
	bridge-unicast-flood off

auto vxlan3
iface vxlan3 inet manual
	vxlan-id 3
	vxlan-remoteip $remoteip1
	vxlan-remoteip $remoteip2
	bridge-access 3
PART
chomp $vxlan123_part;

expect load('loopback') . <<"CHECK";
source-directory interfaces.d

iface eth0 inet manual

$eth1_part

iface eth2 inet manual

iface eth3 inet manual

$bond0_part

$vmbr0_part

$vmbr123_part

$vxlan123_part

CHECK

#
# Now add vlans on all types of interfaces: vmbr1, bond0 and eth1
#

$config->{ifaces}->{'vmbr1.100'} = {
    type => 'vlan',
    mtu => 1300,
    method => 'manual',
    families => ['inet'],
    autostart => 1
};

$config->{ifaces}->{'bond0.100'} = {
    type => 'vlan',
    mtu => 1300,
    method => 'manual',
    families => ['inet'],
    'vlan-protocol' => '802.1ad',
    autostart => 1
};

$config->{ifaces}->{'bond0.100.10'} = {
    type => 'vlan',
    mtu => 1300,
    method => 'manual',
    families => ['inet'],
    autostart => 1
};

$config->{ifaces}->{'eth1.100'} = {
    type => 'vlan',
    mtu => 1400,
    method => 'manual',
    families => ['inet'],
    autostart => 1
};

$config->{ifaces}->{'vmbr4'} = {
    mtu => 1200,
    type => 'bridge',
    method => 'manual',
    families => ['inet'],
    bridge_stp => 'off',
    bridge_fd => 0,
    bridge_ports => 'bond0.100',
    autostart => 1
};

$config->{ifaces}->{'vmbr5'} = {
    mtu => 1100,
    type => 'bridge',
    method => 'manual',
    families => ['inet'],
    bridge_stp => 'off',
    bridge_fd => 0,
    bridge_ports => 'vmbr4.99',
    autostart => 1
};

expect load('loopback') . <<"CHECK";
source-directory interfaces.d

iface eth0 inet manual

$eth1_part

iface eth2 inet manual

iface eth3 inet manual

auto eth1.100
iface eth1.100 inet manual
	mtu 1400

$bond0_part

auto bond0.100
iface bond0.100 inet manual
	mtu 1300
	vlan-protocol 802.1ad

auto bond0.100.10
iface bond0.100.10 inet manual
	mtu 1300

$vmbr0_part

$vmbr123_part

auto vmbr4
iface vmbr4 inet manual
	bridge-ports bond0.100
	bridge-stp off
	bridge-fd 0
	mtu 1200

auto vmbr5
iface vmbr5 inet manual
	bridge-ports vmbr4.99
	bridge-stp off
	bridge-fd 0
	mtu 1100

auto vmbr1.100
iface vmbr1.100 inet manual
	mtu 1300

$vxlan123_part

CHECK

#
# Now check the new config for idempotency:
#

save('if', w());
r(load('if'));
expect load('if');

#
# Check a brbase with an ipv6 address on eth1
#

r(load('brbase'));

my $ip = 'fc05::2';
my $nm = '112';
my $gw = 'fc05::1';

$config->{ifaces}->{eth1} = {
    type => 'eth',
    method6 => 'static',
    address6 => $ip,
    netmask6 => $nm,
    gateway6 => $gw,
    families => ['inet6'],
    autostart => 1
};

expect load('loopback') . <<"CHECK";
source-directory interfaces.d

iface eth0 inet manual

auto eth1
iface eth1 inet6 static
	address $ip
	gateway $gw

iface eth2 inet manual

iface eth3 inet manual

auto vmbr0
iface vmbr0 inet static
	address 10.0.0.2/24
	gateway 10.0.0.1
	bridge-ports eth0
	bridge-stp off
	bridge-fd 0

CHECK

save('if', w());
r(load('if'));
expect load('if');

1;
Commit	Line	Data
c7c4208a WB	1	save('proc_net_dev', <<'/proc/net/dev');
	2	eth0:
	3	eth1:
ec0f5151 WB	4	eth2:
ec0f5151 WB	5	eth3:
c7c4208a WB	6	/proc/net/dev
	7
	8	r(load('brbase'));
	9
ec0f5151 WB	10	#
	11	# Variables used for the various interfaces:
	12	#
	13
378c6656	14	my $ip = '192.168.0.2/24';
c7c4208a	15	my $gw = '192.168.0.1';
95aa8788 AD	16	my $svcnodeip = '239.192.105.237';
	17	my $physdev = 'eth0';
	18	my $remoteip1 = '192.168.0.3';
	19	my $remoteip2 = '192.168.0.4';
	20
ec0f5151 WB	21	#
	22	# Hunk for the default bridge of the 'brbase' configuration
	23	#
	24
	25	my $vmbr0_part = <<"PART";
	26	auto vmbr0
	27	iface vmbr0 inet static
beedabb4 AD	28	address 10.0.0.2/24
beedabb4 AD	29	gateway 10.0.0.1
ec0f5151 WB	30	bridge-ports eth0
	31	bridge-stp off
	32	bridge-fd 0
	33	PART
	34	chomp $vmbr0_part;
	35
	36	#
	37	# Configure eth1 statically, store its expected interfaces hunk in $eth1_part
	38	# and test!
	39	#
c7c4208a WB	40
	41	$config->{ifaces}->{eth1} = {
	42	type => 'eth',
	43	method => 'static',
	44	address => $ip,
c7c4208a WB	45	gateway => $gw,
	46	families => ['inet'],
	47	autostart => 1
	48	};
	49
ec0f5151 WB	50	my $eth1_part = <<"PART";
	51	auto eth1
	52	iface eth1 inet static
beedabb4 AD	53	address $ip
beedabb4 AD	54	gateway $gw
ec0f5151 WB	55	PART
	56	chomp $eth1_part;
	57
	58	expect load('loopback') . <<"CHECK";
	59	source-directory interfaces.d
	60
	61	iface eth0 inet manual
	62
	63	$eth1_part
	64
	65	iface eth2 inet manual
	66
	67	iface eth3 inet manual
	68
	69	$vmbr0_part
	70
	71	CHECK
	72
	73	#
	74	# Add a bond for eth2 & 3 and check the new output
	75	#
	76
	77	$config->{ifaces}->{bond0} = {
	78	type => 'bond',
	79	mtu => 1400,
	80	slaves => 'eth2 eth3',
	81	bond_mode => '802.3ad',
	82	bond_xmit_hash_policy => 'layer3+4',
	83	bond_miimon => 100,
0115696f AD	84	method => 'manual',
	85	families => ['inet'],
	86	autostart => 1
	87	};
ec0f5151 WB	88	my $bond0_part = <<"PART";
	89	auto bond0
	90	iface bond0 inet manual
	91	bond-slaves eth2 eth3
	92	bond-miimon 100
	93	bond-mode 802.3ad
	94	bond-xmit-hash-policy layer3+4
	95	mtu 1400
	96	PART
	97	chomp $bond0_part;
0115696f	98
ec0f5151 WB	99	expect load('loopback') . <<"CHECK";
	100	source-directory interfaces.d
	101
	102	iface eth0 inet manual
	103
	104	$eth1_part
	105
	106	iface eth2 inet manual
	107
	108	iface eth3 inet manual
	109
	110	$bond0_part
	111
	112	$vmbr0_part
	113
	114	CHECK
	115
	116	#
	117	# Add vxlan1 and 2
	118	#
	119
	120	$config->{ifaces}->{vxlan1} = {
	121	type => 'vxlan',
0115696f AD	122	method => 'manual',
0115696f AD	123	families => ['inet'],
ec0f5151 WB	124	'vxlan-id' => 1,
	125	'vxlan-svcnodeip' => $svcnodeip,
	126	'vxlan-physdev' => $physdev,
0115696f AD	127	autostart => 1
	128	};
	129
ec0f5151 WB	130	$config->{ifaces}->{vxlan2} = {
ec0f5151 WB	131	type => 'vxlan',
0115696f AD	132	method => 'manual',
0115696f AD	133	families => ['inet'],
ec0f5151 WB	134	'vxlan-id' => 2,
ec0f5151 WB	135	'vxlan-local-tunnelip' => $ip,
0115696f AD	136	autostart => 1
	137	};
	138
ec0f5151 WB	139	my $vxlan12_part = <<"PART";
	140	auto vxlan1
	141	iface vxlan1 inet manual
	142	vxlan-id 1
	143	vxlan-svcnodeip $svcnodeip
	144	vxlan-physdev $physdev
	145
	146	auto vxlan2
	147	iface vxlan2 inet manual
	148	vxlan-id 2
	149	vxlan-local-tunnelip $ip
	150	PART
	151	chomp $vxlan12_part;
	152
	153	expect load('loopback') . <<"CHECK";
	154	source-directory interfaces.d
	155
	156	iface eth0 inet manual
	157
	158	$eth1_part
	159
	160	iface eth2 inet manual
	161
	162	iface eth3 inet manual
	163
	164	$bond0_part
	165
	166	$vmbr0_part
	167
	168	$vxlan12_part
	169
	170	CHECK
	171
	172	#
	173	# Add vxlan3 and 3 bridges using vxlan1..3
	174	#
	175
9a052564	176	$config->{ifaces}->{vmbr1} = {
9b053d70	177	mtu => 1400,
9a052564 AD	178	type => 'bridge',
	179	method => 'manual',
	180	families => ['inet'],
ec0f5151	181	bridge_stp => 'off',
9a052564	182	bridge_fd => 0,
ec0f5151 WB	183	bridge_ports => 'vxlan1',
ec0f5151 WB	184	bridge_vlan_aware => 'yes',
9a052564 AD	185	autostart => 1
	186	};
	187
9a052564 AD	188	$config->{ifaces}->{vmbr2} = {
	189	type => 'bridge',
	190	method => 'manual',
	191	families => ['inet'],
ec0f5151	192	bridge_stp => 'off',
9a052564	193	bridge_fd => 0,
ec0f5151	194	bridge_ports => 'vxlan2',
9a052564 AD	195	autostart => 1
	196	};
	197
	198	$config->{ifaces}->{vmbr3} = {
	199	type => 'bridge',
	200	method => 'manual',
	201	families => ['inet'],
ec0f5151	202	bridge_stp => 'off',
9a052564	203	bridge_fd => 0,
a70e9925	204	bridge_ports => 'vxlan3',
ec0f5151	205	bridge_vlan_aware => 'yes',
9a052564 AD	206	bridge_vids => '2-10',
	207	autostart => 1
	208	};
	209
ec0f5151 WB	210	my $vmbr123_part = <<"PART";
	211	auto vmbr1
	212	iface vmbr1 inet manual
	213	bridge-ports vxlan1
	214	bridge-stp off
	215	bridge-fd 0
	216	bridge-vlan-aware yes
	217	bridge-vids 2-4094
	218	mtu 1400
95aa8788	219
ec0f5151 WB	220	auto vmbr2
	221	iface vmbr2 inet manual
	222	bridge-ports vxlan2
	223	bridge-stp off
	224	bridge-fd 0
	225
	226	auto vmbr3
	227	iface vmbr3 inet manual
a70e9925	228	bridge-ports vxlan3
ec0f5151 WB	229	bridge-stp off
	230	bridge-fd 0
	231	bridge-vlan-aware yes
	232	bridge-vids 2-10
	233	PART
	234	chomp $vmbr123_part;
95aa8788 AD	235
	236	$config->{ifaces}->{vxlan3} = {
	237	type => 'vxlan',
	238	method => 'manual',
	239	families => ['inet'],
	240	'vxlan-id' => 3,
	241	'vxlan-remoteip' => [$remoteip1, $remoteip2],
9a052564	242	'bridge-access' => 3,
95aa8788 AD	243	autostart => 1
	244	};
	245
ec0f5151 WB	246	my $vx = $config->{ifaces}->{vxlan2};
	247	$vx->{'bridge-learning'} = 'off';
	248	$vx->{'bridge-arp-nd-suppress'} = 'on';
	249	$vx->{'bridge-unicast-flood'} = 'off';
	250	$vx->{'bridge-multicast-flood'} = 'off';
	251	my $vxlan123_part = $vxlan12_part ."\n" . <<"PART";
	252	bridge-arp-nd-suppress on
	253	bridge-learning off
	254	bridge-multicast-flood off
	255	bridge-unicast-flood off
	256
	257	auto vxlan3
	258	iface vxlan3 inet manual
	259	vxlan-id 3
	260	vxlan-remoteip $remoteip1
	261	vxlan-remoteip $remoteip2
	262	bridge-access 3
	263	PART
	264	chomp $vxlan123_part;
	265
	266	expect load('loopback') . <<"CHECK";
	267	source-directory interfaces.d
	268
	269	iface eth0 inet manual
	270
	271	$eth1_part
	272
	273	iface eth2 inet manual
	274
	275	iface eth3 inet manual
	276
	277	$bond0_part
	278
	279	$vmbr0_part
	280
	281	$vmbr123_part
	282
	283	$vxlan123_part
	284
	285	CHECK
	286
	287	#
	288	# Now add vlans on all types of interfaces: vmbr1, bond0 and eth1
	289	#
	290
c4e56470 AD	291	$config->{ifaces}->{'vmbr1.100'} = {
c4e56470 AD	292	type => 'vlan',
9b053d70	293	mtu => 1300,
c4e56470 AD	294	method => 'manual',
	295	families => ['inet'],
	296	autostart => 1
	297	};
	298
	299	$config->{ifaces}->{'bond0.100'} = {
8f5d56bf AD	300	type => 'vlan',
	301	mtu => 1300,
	302	method => 'manual',
	303	families => ['inet'],
	304	'vlan-protocol' => '802.1ad',
	305	autostart => 1
	306	};
	307
	308	$config->{ifaces}->{'bond0.100.10'} = {
c4e56470	309	type => 'vlan',
9b053d70	310	mtu => 1300,
c4e56470 AD	311	method => 'manual',
	312	families => ['inet'],
	313	autostart => 1
	314	};
	315
	316	$config->{ifaces}->{'eth1.100'} = {
	317	type => 'vlan',
9b053d70	318	mtu => 1400,
c4e56470 AD	319	method => 'manual',
	320	families => ['inet'],
	321	autostart => 1
	322	};
95aa8788	323
968c90f1 AD	324	$config->{ifaces}->{'vmbr4'} = {
	325	mtu => 1200,
	326	type => 'bridge',
	327	method => 'manual',
	328	families => ['inet'],
	329	bridge_stp => 'off',
	330	bridge_fd => 0,
	331	bridge_ports => 'bond0.100',
	332	autostart => 1
	333	};
	334
a70e9925 AD	335	$config->{ifaces}->{'vmbr5'} = {
	336	mtu => 1100,
	337	type => 'bridge',
	338	method => 'manual',
	339	families => ['inet'],
	340	bridge_stp => 'off',
	341	bridge_fd => 0,
	342	bridge_ports => 'vmbr4.99',
	343	autostart => 1
	344	};
	345
c7c4208a WB	346	expect load('loopback') . <<"CHECK";
	347	source-directory interfaces.d
	348
	349	iface eth0 inet manual
	350
ec0f5151	351	$eth1_part
c7c4208a	352
0115696f AD	353	iface eth2 inet manual
0115696f AD	354
0115696f AD	355	iface eth3 inet manual
0115696f AD	356
c4e56470 AD	357	auto eth1.100
c4e56470 AD	358	iface eth1.100 inet manual
9b053d70	359	mtu 1400
c4e56470	360
ec0f5151	361	$bond0_part
0115696f	362
c4e56470 AD	363	auto bond0.100
c4e56470 AD	364	iface bond0.100 inet manual
9b053d70	365	mtu 1300
8f5d56bf AD	366	vlan-protocol 802.1ad
	367
	368	auto bond0.100.10
	369	iface bond0.100.10 inet manual
	370	mtu 1300
c4e56470	371
ec0f5151	372	$vmbr0_part
9a052564	373
ec0f5151	374	$vmbr123_part
9a052564	375
968c90f1 AD	376	auto vmbr4
	377	iface vmbr4 inet manual
	378	bridge-ports bond0.100
	379	bridge-stp off
	380	bridge-fd 0
	381	mtu 1200
	382
a70e9925 AD	383	auto vmbr5
	384	iface vmbr5 inet manual
	385	bridge-ports vmbr4.99
	386	bridge-stp off
	387	bridge-fd 0
	388	mtu 1100
	389
c4e56470 AD	390	auto vmbr1.100
c4e56470 AD	391	iface vmbr1.100 inet manual
9b053d70	392	mtu 1300
c4e56470	393
ec0f5151	394	$vxlan123_part
95aa8788	395
c7c4208a WB	396	CHECK
c7c4208a WB	397
ec0f5151 WB	398	#
	399	# Now check the new config for idempotency:
	400	#
	401
c7c4208a WB	402	save('if', w());
	403	r(load('if'));
	404	expect load('if');
	405
ec0f5151 WB	406	#
	407	# Check a brbase with an ipv6 address on eth1
	408	#
	409
c7c4208a WB	410	r(load('brbase'));
	411
	412	my $ip = 'fc05::2';
	413	my $nm = '112';
	414	my $gw = 'fc05::1';
	415
	416	$config->{ifaces}->{eth1} = {
	417	type => 'eth',
	418	method6 => 'static',
	419	address6 => $ip,
	420	netmask6 => $nm,
	421	gateway6 => $gw,
	422	families => ['inet6'],
	423	autostart => 1
	424	};
	425
c7c4208a WB	426	expect load('loopback') . <<"CHECK";
	427	source-directory interfaces.d
	428
	429	iface eth0 inet manual
	430
	431	auto eth1
	432	iface eth1 inet6 static
beedabb4 AD	433	address $ip
beedabb4 AD	434	gateway $gw
c7c4208a	435
ec0f5151 WB	436	iface eth2 inet manual
	437
	438	iface eth3 inet manual
	439
c7c4208a WB	440	auto vmbr0
c7c4208a WB	441	iface vmbr0 inet static
beedabb4 AD	442	address 10.0.0.2/24
beedabb4 AD	443	gateway 10.0.0.1
1accc6da AD	444	bridge-ports eth0
	445	bridge-stp off
	446	bridge-fd 0
c7c4208a WB	447
	448	CHECK
	449
	450	save('if', w());
	451	r(load('if'));
	452	expect load('if');
	453
	454	1;