korg/iproute2
0
0
Fork 0
mirror of https://git.kernel.org/pub/scm/network/iproute2/iproute2.git synced 2024-11-27 20:04:19 +08:00
Code Issues Packages Projects Releases Wiki Activity

testsuite: Add mpls packet matching tests for tc flower

Browse Source 
Match all MPLS fields using smallest and highest possible values.
Test the two ways of specifying MPLS header matching:

  * with the basic mpls_{label,tc,bos,ttl} keywords (match only on the
    first LSE),

  * with the more generic "lse" keyword (allows matching at different
    depth of the MPLS label stack).

This test file allows to find problems like the one fixed by
Linux commit 7fdd375e3830 ("net: sched: Fix dump of MPLS_OPT_LSE_LABEL
attribute in cls_flower").

Signed-off-by: Guillaume Nault <gnault@redhat.com>
Signed-off-by: David Ahern <dsahern@gmail.com>
This commit is contained in:
Guillaume Nault 2020-12-14 18:14:22 +01:00 committed by David Ahern
parent c01dec8475
commit cb0debfe2d
1 changed files with 82 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

82
testsuite/tests/tc/flower_mpls.t Executable file
View File

@ -0,0 +1,82 @@
#!/bin/sh
. lib/generic.sh
DEV="$(rand_dev)"
ts_ip "$0" "Add $DEV dummy interface" link add dev $DEV up type dummy
ts_tc "$0" "Add ingress qdisc" qdisc add dev $DEV ingress
reset_qdisc()
{
ts_tc "$0" "Remove ingress qdisc" qdisc del dev $DEV ingress
ts_tc "$0" "Add ingress qdisc" qdisc add dev $DEV ingress
}
ts_tc "$0" "Add MPLS filter matching first LSE with minimal values" \
filter add dev $DEV ingress protocol mpls_uc flower \
mpls_label 0 mpls_tc 0 mpls_bos 0 mpls_ttl 0 \
action drop
ts_tc "$0" "Show ingress filters" filter show dev $DEV ingress
test_on "mpls_label 0"
test_on "mpls_tc 0"
test_on "mpls_bos 0"
test_on "mpls_ttl 0"
reset_qdisc
ts_tc "$0" "Add MPLS filter matching first LSE with maximal values" \
filter add dev $DEV ingress protocol mpls_uc flower \
mpls_label 1048575 mpls_tc 7 mpls_bos 1 mpls_ttl 255 \
action drop
ts_tc "$0" "Show ingress filters" filter show dev $DEV ingress
test_on "mpls_label 1048575"
test_on "mpls_tc 7"
test_on "mpls_bos 1"
test_on "mpls_ttl 255"
reset_qdisc
ts_tc "$0" "Add MPLS filter matching second LSE with minimal values" \
filter add dev $DEV ingress protocol mpls_uc flower \
mpls lse depth 2 label 0 tc 0 bos 0 ttl 0 \
action drop
ts_tc "$0" "Show ingress filters" filter show dev $DEV ingress
test_on "mpls"
test_on "lse"
test_on "depth 2"
test_on "label 0"
test_on "tc 0"
test_on "bos 0"
test_on "ttl 0"
reset_qdisc
ts_tc "$0" "Add MPLS filter matching second LSE with maximal values" \
filter add dev $DEV ingress protocol mpls_uc flower \
mpls lse depth 2 label 1048575 tc 7 bos 1 ttl 255 \
action drop
ts_tc "$0" "Show ingress filters" filter show dev $DEV ingress
test_on "mpls"
test_on "lse"
test_on "depth 2"
test_on "label 1048575"
test_on "tc 7"
test_on "bos 1"
test_on "ttl 255"
reset_qdisc
ts_tc "$0" "Add MPLS filter matching two LSEs" \
filter add dev $DEV ingress protocol mpls_uc flower mpls \
lse depth 1 label 0 tc 0 bos 0 ttl 0 \
lse depth 2 label 1048575 tc 7 bos 1 ttl 255 \
action drop
ts_tc "$0" "Show ingress filters" filter show dev $DEV ingress
test_on "mpls"
test_on "lse"
test_on "depth 1"
test_on "label 0"
test_on "tc 0"
test_on "bos 0"
test_on "ttl 0"
test_on "depth 2"
test_on "label 1048575"
test_on "tc 7"
test_on "bos 1"
test_on "ttl 255"