Software: nginx/1.23.4. PHP/5.6.40-65+ubuntu20.04.1+deb.sury.org+1 

uname -a: Linux foro-restaurado-2 5.15.0-1040-oracle #46-Ubuntu SMP Fri Jul 14 21:47:21 UTC 2023
aarch64 

uid=33(www-data) gid=33(www-data) groups=33(www-data) 

Safe-mode: OFF (not secure)

/usr/src/linux-oracle-headers-5.15.0-1040/tools/testing/selftests/drivers/net/mlxsw/   drwxr-xr-x
Free 83.4 GB of 96.73 GB (86.23%)
                            Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    

Viewing file:     tc_police_occ.sh (2.07 KB)      -rwxr-xr-x

#!/bin/bash
# SPDX-License-Identifier: GPL-2.0
#
# Test that policers shared by different tc filters are correctly reference
# counted by observing policers' occupancy via devlink-resource.

lib_dir=$(dirname $0)/../../../net/forwarding

ALL_TESTS="
	tc_police_occ_test
"
NUM_NETIFS=2
source $lib_dir/lib.sh
source $lib_dir/devlink_lib.sh

h1_create()
{
	simple_if_init $h1
}

h1_destroy()
{
	simple_if_fini $h1
}

switch_create()
{
	simple_if_init $swp1
	tc qdisc add dev $swp1 clsact
}

switch_destroy()
{
	tc qdisc del dev $swp1 clsact
	simple_if_fini $swp1
}

setup_prepare()
{
	h1=${NETIFS[p1]}
	swp1=${NETIFS[p2]}

	vrf_prepare

	h1_create
	switch_create
}

cleanup()
{
	pre_cleanup

	switch_destroy
	h1_destroy

	vrf_cleanup
}

tc_police_occ_get()
{
	devlink_resource_occ_get global_policers single_rate_policers
}

tc_police_occ_test()
{
	RET=0

	local occ=$(tc_police_occ_get)

	tc filter add dev $swp1 ingress pref 1 handle 101 proto ip \
		flower skip_sw \
		action police rate 100mbit burst 100k conform-exceed drop/ok
	(( occ + 1 == $(tc_police_occ_get) ))
	check_err $? "Got occupancy $(tc_police_occ_get), expected $((occ + 1))"

	tc filter del dev $swp1 ingress pref 1 handle 101 flower
	(( occ == $(tc_police_occ_get) ))
	check_err $? "Got occupancy $(tc_police_occ_get), expected $occ"

	tc filter add dev $swp1 ingress pref 1 handle 101 proto ip \
		flower skip_sw \
		action police rate 100mbit burst 100k conform-exceed drop/ok \
		index 10
	tc filter add dev $swp1 ingress pref 2 handle 102 proto ip \
		flower skip_sw action police index 10

	(( occ + 1 == $(tc_police_occ_get) ))
	check_err $? "Got occupancy $(tc_police_occ_get), expected $((occ + 1))"

	tc filter del dev $swp1 ingress pref 2 handle 102 flower
	(( occ + 1 == $(tc_police_occ_get) ))
	check_err $? "Got occupancy $(tc_police_occ_get), expected $((occ + 1))"

	tc filter del dev $swp1 ingress pref 1 handle 101 flower
	(( occ == $(tc_police_occ_get) ))
	check_err $? "Got occupancy $(tc_police_occ_get), expected $occ"

	log_test "tc police occupancy"
}

trap cleanup EXIT

setup_prepare
setup_wait

tests_run

exit $EXIT_STATUS