# SPDX-License-Identifier: GPL-2.0 mirror_install() { local from_dev=$1; shift local direction=$1; shift local to_dev=$1; shift local filter=$1; shift tc filter add dev $from_dev $direction \ pref 1000 $filter \ action mirred egress mirror dev $to_dev } mirror_uninstall() { local from_dev=$1; shift local direction=$1; shift tc filter del dev $swp1 $direction pref 1000 } mirror_test() { local vrf_name=$1; shift local sip=$1; shift local dip=$1; shift local dev=$1; shift local pref=$1; shift local expect=$1; shift local t0=$(tc_rule_stats_get $dev $pref) ip vrf exec $vrf_name \ ${PING} ${sip:+-I $sip} $dip -c 10 -i 0.1 -w 2 &> /dev/null local t1=$(tc_rule_stats_get $dev $pref) local delta=$((t1 - t0)) # Tolerate a couple stray extra packets. ((expect <= delta && delta <= expect + 2)) check_err $? "Expected to capture $expect packets, got $delta." } do_test_span_dir_ips() { local expect=$1; shift local dev=$1; shift local direction=$1; shift local ip1=$1; shift local ip2=$1; shift icmp_capture_install $dev mirror_test v$h1 $ip1 $ip2 $dev 100 $expect mirror_test v$h2 $ip2 $ip1 $dev 100 $expect icmp_capture_uninstall $dev } quick_test_span_dir_ips() { do_test_span_dir_ips 10 "$@" } fail_test_span_dir_ips() { do_test_span_dir_ips 0 "$@" } test_span_dir_ips() { local dev=$1; shift local direction=$1; shift local forward_type=$1; shift local backward_type=$1; shift local ip1=$1; shift local ip2=$1; shift quick_test_span_dir_ips "$dev" "$direction" "$ip1" "$ip2" icmp_capture_install $dev "type $forward_type" mirror_test v$h1 $ip1 $ip2 $dev 100 10 icmp_capture_uninstall $dev icmp_capture_install $dev "type $backward_type" mirror_test v$h2 $ip2 $ip1 $dev 100 10 icmp_capture_uninstall $dev } fail_test_span_dir() { fail_test_span_dir_ips "$@" 192.0.2.1 192.0.2.2 } test_span_dir() { test_span_dir_ips "$@" 192.0.2.1 192.0.2.2 } do_test_span_vlan_dir_ips() { local expect=$1; shift local dev=$1; shift local vid=$1; shift local direction=$1; shift local ip1=$1; shift local ip2=$1; shift # Install the capture as skip_hw to avoid double-counting of packets. # The traffic is meant for local box anyway, so will be trapped to # kernel. vlan_capture_install $dev "skip_hw vlan_id $vid vlan_ethtype ip" mirror_test v$h1 $ip1 $ip2 $dev 100 $expect mirror_test v$h2 $ip2 $ip1 $dev 100 $expect vlan_capture_uninstall $dev } quick_test_span_vlan_dir_ips() { do_test_span_vlan_dir_ips 10 "$@" } fail_test_span_vlan_dir_ips() { do_test_span_vlan_dir_ips 0 "$@" } quick_test_span_vlan_dir() { quick_test_span_vlan_dir_ips "$@" 192.0.2.1 192.0.2.2 } fail_test_span_vlan_dir() { fail_test_span_vlan_dir_ips "$@" 192.0.2.1 192.0.2.2 }