net/forwarding/sch_red.sh

9 # to go to backlog.
164 	qdisc_stats_get $swp3 11: .backlog
190 # This sends traffic in an attempt to build a backlog of $size. Returns 0 on
192 # backlog size to stdout.
258 	local backlog
261 	# Build the below-the-limit backlog using UDP. We could use TCP just
266 	backlog=$(build_backlog $((2 * limit / 3)) udp)
267 	check_err $? "Could not build the requested backlog"
269 	check_err $? "backlog $backlog / $limit Got $pct% marked packets, expected == 0."
270 	log_test "$name backlog < limit"
273 	# backlog crosses the limit, and we want to make sure that the backlog
276 	backlog=$(build_backlog $((3 * limit / 2)) tcp tos=0x01)
277 	check_err $? "Could not build the requested backlog"
279 	check_err $? "backlog $backlog / $limit Got $pct% marked packets, expected >= 95."
280 	log_test "$name backlog > limit"
294 	# Up there we saw that UDP gets accepted when backlog is below the
295 	# limit. Now that it is above, it should all get dropped, and backlog
299 	check_fail $? "UDP traffic went into backlog instead of being early-dropped"
300 	log_test "$name backlog > limit: UDP early-dropped"
317 	# Up there we saw that UDP gets accepted when backlog is below the
319 	# backlog as well.
322 	check_err $? "UDP traffic was early-dropped instead of getting into backlog"
323 	log_test "$name backlog > limit: UDP not dropped"
332 	local backlog
342 	backlog=$(build_backlog $((2 * limit / 3)) tcp tos=0x01)
343 	check_err $? "Could not build the requested backlog"
345 	check_err $? "backlog $backlog / $limit Got $pct% marked packets, expected == 0."
346 	log_test "RED backlog < limit"
350 	backlog=$(build_backlog $((3 * limit / 2)) tcp tos=0x01)
351 	check_fail $? "Traffic went into backlog instead of being early-dropped"
353 	check_err $? "backlog $backlog / $limit Got $pct% marked packets, expected == 0."
354 	log_test "RED backlog > limit"
363 	local backlog
418 	backlog=$(build_backlog $((2 * limit / 3)) tcp tos=0x01)
419 	check_err $? "Could not build the requested backlog"
421 	check_err $? "backlog $backlog / $limit Got $pct% mirrored packets, expected == 0."
423 	backlog=$(build_backlog $((3 * limit / 2)) tcp tos=0x01)
424 	check_err $? "Could not build the requested backlog"
426 	check_err $? "backlog $backlog / $limit Got $pct% mirrored packets, expected >= 95."