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 an action skbedit priority. The 6# new priority should be taken into account when classifying traffic on the PRIO 7# qdisc at $swp2. The test verifies that for different priority values, the 8# traffic ends up in expected PRIO band. 9# 10# +----------------------+ +----------------------+ 11# | H1 | | H2 | 12# | + $h1 | | $h2 + | 13# | | 192.0.2.1/28 | | 192.0.2.2/28 | | 14# +----|-----------------+ +----------------|-----+ 15# | | 16# +----|----------------------------------------------------------------|-----+ 17# | SW | | | 18# | +-|----------------------------------------------------------------|-+ | 19# | | + $swp1 BR $swp2 + | | 20# | | PRIO | | 21# | +--------------------------------------------------------------------+ | 22# +---------------------------------------------------------------------------+ 23 24ALL_TESTS=" 25 ping_ipv4 26 test_ingress 27 test_egress 28" 29 30NUM_NETIFS=4 31source lib.sh 32 33: ${HIT_TIMEOUT:=2000} # ms 34 35h1_create() 36{ 37 simple_if_init $h1 192.0.2.1/28 38} 39 40h1_destroy() 41{ 42 simple_if_fini $h1 192.0.2.1/28 43} 44 45h2_create() 46{ 47 simple_if_init $h2 192.0.2.2/28 48} 49 50h2_destroy() 51{ 52 simple_if_fini $h2 192.0.2.2/28 53} 54 55switch_create() 56{ 57 ip link add name br1 type bridge vlan_filtering 1 58 ip link set dev br1 addrgenmode none 59 ip link set dev br1 up 60 ip link set dev $swp1 master br1 61 ip link set dev $swp1 up 62 ip link set dev $swp2 master br1 63 ip link set dev $swp2 up 64 65 tc qdisc add dev $swp1 clsact 66 tc qdisc add dev $swp2 clsact 67 tc qdisc add dev $swp2 root handle 10: \ 68 prio bands 8 priomap 7 6 5 4 3 2 1 0 69} 70 71switch_destroy() 72{ 73 tc qdisc del dev $swp2 root 74 tc qdisc del dev $swp2 clsact 75 tc qdisc del dev $swp1 clsact 76 77 ip link set dev $swp2 down 78 ip link set dev $swp2 nomaster 79 ip link set dev $swp1 down 80 ip link set dev $swp1 nomaster 81 ip link del dev br1 82} 83 84setup_prepare() 85{ 86 h1=${NETIFS[p1]} 87 swp1=${NETIFS[p2]} 88 89 swp2=${NETIFS[p3]} 90 h2=${NETIFS[p4]} 91 92 h2mac=$(mac_get $h2) 93 94 vrf_prepare 95 h1_create 96 h2_create 97 switch_create 98} 99 100cleanup() 101{ 102 pre_cleanup 103 104 switch_destroy 105 h2_destroy 106 h1_destroy 107 vrf_cleanup 108} 109 110ping_ipv4() 111{ 112 ping_test $h1 192.0.2.2 113} 114 115test_skbedit_priority_one() 116{ 117 local locus=$1; shift 118 local prio=$1; shift 119 local classid=$1; shift 120 121 RET=0 122 123 tc filter add $locus handle 101 pref 1 \ 124 flower action skbedit priority $prio 125 126 local pkt0=$(qdisc_parent_stats_get $swp2 $classid .packets) 127 local pkt2=$(tc_rule_handle_stats_get "$locus" 101) 128 $MZ $h1 -t udp "sp=54321,dp=12345" -c 10 -d 20msec -p 100 \ 129 -a own -b $h2mac -A 192.0.2.1 -B 192.0.2.2 -q 130 131 local pkt1 132 pkt1=$(busywait "$HIT_TIMEOUT" until_counter_is ">= $((pkt0 + 10))" \ 133 qdisc_parent_stats_get $swp2 $classid .packets) 134 check_err $? "Expected to get 10 packets on class $classid, but got $((pkt1 - pkt0))." 135 136 local pkt3=$(tc_rule_handle_stats_get "$locus" 101) 137 ((pkt3 >= pkt2 + 10)) 138 check_err $? "Expected to get 10 packets on skbedit rule but got $((pkt3 - pkt2))." 139 140 log_test "$locus skbedit priority $prio -> classid $classid" 141 142 tc filter del $locus pref 1 143} 144 145test_ingress() 146{ 147 local prio 148 149 for prio in {0..7}; do 150 test_skbedit_priority_one "dev $swp1 ingress" \ 151 $prio 10:$((8 - prio)) 152 done 153} 154 155test_egress() 156{ 157 local prio 158 159 for prio in {0..7}; do 160 test_skbedit_priority_one "dev $swp2 egress" \ 161 $prio 10:$((8 - prio)) 162 done 163} 164 165trap cleanup EXIT 166 167setup_prepare 168setup_wait 169 170tests_run 171 172exit $EXIT_STATUS 173