1#!/bin/bash
2# SPDX-License-Identifier: GPL-2.0
3
4# This test sends traffic from H1 to H2. Either on ingress of $swp1, or on
5# egress of $swp2, the traffic is acted upon by a pedit action. An ingress
6# filter installed on $h2 verifies that the packet looks like expected.
7#
8# +----------------------+                             +----------------------+
9# | H1                   |                             |                   H2 |
10# |    + $h1             |                             |            $h2 +     |
11# |    | 192.0.2.1/28    |                             |   192.0.2.2/28 |     |
12# +----|-----------------+                             +----------------|-----+
13#      |                                                                |
14# +----|----------------------------------------------------------------|-----+
15# | SW |                                                                |     |
16# |  +-|----------------------------------------------------------------|-+   |
17# |  | + $swp1                       BR                           $swp2 + |   |
18# |  +--------------------------------------------------------------------+   |
19# +---------------------------------------------------------------------------+
20
21ALL_TESTS="
22	ping_ipv4
23	ping_ipv6
24	test_ip4_src
25	test_ip4_dst
26	test_ip6_src
27	test_ip6_dst
28"
29
30NUM_NETIFS=4
31source lib.sh
32source tc_common.sh
33
34h1_create()
35{
36	simple_if_init $h1 192.0.2.1/28 2001:db8:1::1/64
37}
38
39h1_destroy()
40{
41	simple_if_fini $h1 192.0.2.1/28 2001:db8:1::1/64
42}
43
44h2_create()
45{
46	simple_if_init $h2 192.0.2.2/28 2001:db8:1::2/64
47	tc qdisc add dev $h2 clsact
48}
49
50h2_destroy()
51{
52	tc qdisc del dev $h2 clsact
53	simple_if_fini $h2 192.0.2.2/28 2001:db8:1::2/64
54}
55
56switch_create()
57{
58	ip link add name br1 up type bridge vlan_filtering 1
59	ip link set dev $swp1 master br1
60	ip link set dev $swp1 up
61	ip link set dev $swp2 master br1
62	ip link set dev $swp2 up
63
64	tc qdisc add dev $swp1 clsact
65	tc qdisc add dev $swp2 clsact
66}
67
68switch_destroy()
69{
70	tc qdisc del dev $swp2 clsact
71	tc qdisc del dev $swp1 clsact
72
73	ip link set dev $swp2 down
74	ip link set dev $swp2 nomaster
75	ip link set dev $swp1 down
76	ip link set dev $swp1 nomaster
77	ip link del dev br1
78}
79
80setup_prepare()
81{
82	h1=${NETIFS[p1]}
83	swp1=${NETIFS[p2]}
84
85	swp2=${NETIFS[p3]}
86	h2=${NETIFS[p4]}
87
88	h2mac=$(mac_get $h2)
89
90	vrf_prepare
91	h1_create
92	h2_create
93	switch_create
94}
95
96cleanup()
97{
98	pre_cleanup
99
100	switch_destroy
101	h2_destroy
102	h1_destroy
103	vrf_cleanup
104}
105
106ping_ipv4()
107{
108	ping_test $h1 192.0.2.2
109}
110
111ping_ipv6()
112{
113	ping6_test $h1 2001:db8:1::2
114}
115
116do_test_pedit_ip()
117{
118	local pedit_locus=$1; shift
119	local pedit_action=$1; shift
120	local match_prot=$1; shift
121	local match_flower=$1; shift
122	local mz_flags=$1; shift
123
124	tc filter add $pedit_locus handle 101 pref 1 \
125	   flower action pedit ex munge $pedit_action
126	tc filter add dev $h2 ingress handle 101 pref 1 prot $match_prot \
127	   flower skip_hw $match_flower action pass
128
129	RET=0
130
131	$MZ $mz_flags $h1 -c 10 -d 20msec -p 100 -a own -b $h2mac -q -t ip
132
133	local pkts
134	pkts=$(busywait "$TC_HIT_TIMEOUT" until_counter_is ">= 10" \
135			tc_rule_handle_stats_get "dev $h2 ingress" 101)
136	check_err $? "Expected to get 10 packets, but got $pkts."
137
138	pkts=$(tc_rule_handle_stats_get "$pedit_locus" 101)
139	((pkts >= 10))
140	check_err $? "Expected to get 10 packets on pedit rule, but got $pkts."
141
142	log_test "$pedit_locus pedit $pedit_action"
143
144	tc filter del dev $h2 ingress pref 1
145	tc filter del $pedit_locus pref 1
146}
147
148do_test_pedit_ip6()
149{
150	local locus=$1; shift
151	local pedit_addr=$1; shift
152	local flower_addr=$1; shift
153
154	do_test_pedit_ip "$locus" "$pedit_addr set 2001:db8:2::1" ipv6	\
155			 "$flower_addr 2001:db8:2::1"			\
156			 "-6 -A 2001:db8:1::1 -B 2001:db8:1::2"
157}
158
159do_test_pedit_ip4()
160{
161	local locus=$1; shift
162	local pedit_addr=$1; shift
163	local flower_addr=$1; shift
164
165	do_test_pedit_ip "$locus" "$pedit_addr set 198.51.100.1" ip	\
166			 "$flower_addr 198.51.100.1"			\
167			 "-A 192.0.2.1 -B 192.0.2.2"
168}
169
170test_ip4_src()
171{
172	do_test_pedit_ip4 "dev $swp1 ingress" "ip src" src_ip
173	do_test_pedit_ip4 "dev $swp2 egress"  "ip src" src_ip
174}
175
176test_ip4_dst()
177{
178	do_test_pedit_ip4 "dev $swp1 ingress" "ip dst" dst_ip
179	do_test_pedit_ip4 "dev $swp2 egress"  "ip dst" dst_ip
180}
181
182test_ip6_src()
183{
184	do_test_pedit_ip6 "dev $swp1 ingress" "ip6 src" src_ip
185	do_test_pedit_ip6 "dev $swp2 egress"  "ip6 src" src_ip
186}
187
188test_ip6_dst()
189{
190	do_test_pedit_ip6 "dev $swp1 ingress" "ip6 dst" dst_ip
191	do_test_pedit_ip6 "dev $swp2 egress"  "ip6 dst" dst_ip
192}
193
194trap cleanup EXIT
195
196setup_prepare
197setup_wait
198
199tests_run
200
201exit $EXIT_STATUS
202