1#!/bin/bash
2# SPDX-License-Identifier: GPL-2.0
3
4time_start=$(date +%s)
5
6optstring="S:R:d:e:l:r:h4cm:f:t"
7ret=0
8sin=""
9sout=""
10cin=""
11cout=""
12ksft_skip=4
13capture=false
14timeout=30
15ipv6=true
16ethtool_random_on=true
17tc_delay="$((RANDOM%50))"
18tc_loss=$((RANDOM%101))
19testmode=""
20sndbuf=0
21rcvbuf=0
22options_log=true
23do_tcp=0
24filesize=0
25
26if [ $tc_loss -eq 100 ];then
27	tc_loss=1%
28elif [ $tc_loss -ge 10 ]; then
29	tc_loss=0.$tc_loss%
30elif [ $tc_loss -ge 1 ]; then
31	tc_loss=0.0$tc_loss%
32else
33	tc_loss=""
34fi
35
36usage() {
37	echo "Usage: $0 [ -a ]"
38	echo -e "\t-d: tc/netem delay in milliseconds, e.g. \"-d 10\" (default random)"
39	echo -e "\t-l: tc/netem loss percentage, e.g. \"-l 0.02\" (default random)"
40	echo -e "\t-r: tc/netem reorder mode, e.g. \"-r 25% 50% gap 5\", use "-r 0" to disable reordering (default random)"
41	echo -e "\t-e: ethtool features to disable, e.g.: \"-e tso -e gso\" (default: randomly disable any of tso/gso/gro)"
42	echo -e "\t-4: IPv4 only: disable IPv6 tests (default: test both IPv4 and IPv6)"
43	echo -e "\t-c: capture packets for each test using tcpdump (default: no capture)"
44	echo -e "\t-f: size of file to transfer in bytes (default random)"
45	echo -e "\t-S: set sndbuf value (default: use kernel default)"
46	echo -e "\t-R: set rcvbuf value (default: use kernel default)"
47	echo -e "\t-m: test mode (poll, sendfile; default: poll)"
48	echo -e "\t-t: also run tests with TCP (use twice to non-fallback tcp)"
49}
50
51while getopts "$optstring" option;do
52	case "$option" in
53	"h")
54		usage $0
55		exit 0
56		;;
57	"d")
58		if [ $OPTARG -ge 0 ];then
59			tc_delay="$OPTARG"
60		else
61			echo "-d requires numeric argument, got \"$OPTARG\"" 1>&2
62			exit 1
63		fi
64		;;
65	"e")
66		ethtool_args="$ethtool_args $OPTARG off"
67		ethtool_random_on=false
68		;;
69	"l")
70		tc_loss="$OPTARG"
71		;;
72	"r")
73		tc_reorder="$OPTARG"
74		;;
75	"4")
76		ipv6=false
77		;;
78	"c")
79		capture=true
80		;;
81	"S")
82		if [ $OPTARG -ge 0 ];then
83			sndbuf="$OPTARG"
84		else
85			echo "-S requires numeric argument, got \"$OPTARG\"" 1>&2
86			exit 1
87		fi
88		;;
89	"R")
90		if [ $OPTARG -ge 0 ];then
91			rcvbuf="$OPTARG"
92		else
93			echo "-R requires numeric argument, got \"$OPTARG\"" 1>&2
94			exit 1
95		fi
96		;;
97	"m")
98		testmode="$OPTARG"
99		;;
100	"f")
101		filesize="$OPTARG"
102		;;
103	"t")
104		do_tcp=$((do_tcp+1))
105		;;
106	"?")
107		usage $0
108		exit 1
109		;;
110	esac
111done
112
113sec=$(date +%s)
114rndh=$(printf %x $sec)-$(mktemp -u XXXXXX)
115ns1="ns1-$rndh"
116ns2="ns2-$rndh"
117ns3="ns3-$rndh"
118ns4="ns4-$rndh"
119
120TEST_COUNT=0
121
122cleanup()
123{
124	rm -f "$cin" "$cout"
125	rm -f "$sin" "$sout"
126	rm -f "$capout"
127
128	local netns
129	for netns in "$ns1" "$ns2" "$ns3" "$ns4";do
130		ip netns del $netns
131		rm -f /tmp/$netns.{nstat,out}
132	done
133}
134
135ip -Version > /dev/null 2>&1
136if [ $? -ne 0 ];then
137	echo "SKIP: Could not run test without ip tool"
138	exit $ksft_skip
139fi
140
141sin=$(mktemp)
142sout=$(mktemp)
143cin=$(mktemp)
144cout=$(mktemp)
145capout=$(mktemp)
146trap cleanup EXIT
147
148for i in "$ns1" "$ns2" "$ns3" "$ns4";do
149	ip netns add $i || exit $ksft_skip
150	ip -net $i link set lo up
151done
152
153#  "$ns1"              ns2                    ns3                     ns4
154# ns1eth2    ns2eth1   ns2eth3      ns3eth2   ns3eth4       ns4eth3
155#                           - drop 1% ->            reorder 25%
156#                           <- TSO off -
157
158ip link add ns1eth2 netns "$ns1" type veth peer name ns2eth1 netns "$ns2"
159ip link add ns2eth3 netns "$ns2" type veth peer name ns3eth2 netns "$ns3"
160ip link add ns3eth4 netns "$ns3" type veth peer name ns4eth3 netns "$ns4"
161
162ip -net "$ns1" addr add 10.0.1.1/24 dev ns1eth2
163ip -net "$ns1" addr add dead:beef:1::1/64 dev ns1eth2 nodad
164
165ip -net "$ns1" link set ns1eth2 up
166ip -net "$ns1" route add default via 10.0.1.2
167ip -net "$ns1" route add default via dead:beef:1::2
168
169ip -net "$ns2" addr add 10.0.1.2/24 dev ns2eth1
170ip -net "$ns2" addr add dead:beef:1::2/64 dev ns2eth1 nodad
171ip -net "$ns2" link set ns2eth1 up
172
173ip -net "$ns2" addr add 10.0.2.1/24 dev ns2eth3
174ip -net "$ns2" addr add dead:beef:2::1/64 dev ns2eth3 nodad
175ip -net "$ns2" link set ns2eth3 up
176ip -net "$ns2" route add default via 10.0.2.2
177ip -net "$ns2" route add default via dead:beef:2::2
178ip netns exec "$ns2" sysctl -q net.ipv4.ip_forward=1
179ip netns exec "$ns2" sysctl -q net.ipv6.conf.all.forwarding=1
180
181ip -net "$ns3" addr add 10.0.2.2/24 dev ns3eth2
182ip -net "$ns3" addr add dead:beef:2::2/64 dev ns3eth2 nodad
183ip -net "$ns3" link set ns3eth2 up
184
185ip -net "$ns3" addr add 10.0.3.2/24 dev ns3eth4
186ip -net "$ns3" addr add dead:beef:3::2/64 dev ns3eth4 nodad
187ip -net "$ns3" link set ns3eth4 up
188ip -net "$ns3" route add default via 10.0.2.1
189ip -net "$ns3" route add default via dead:beef:2::1
190ip netns exec "$ns3" sysctl -q net.ipv4.ip_forward=1
191ip netns exec "$ns3" sysctl -q net.ipv6.conf.all.forwarding=1
192
193ip -net "$ns4" addr add 10.0.3.1/24 dev ns4eth3
194ip -net "$ns4" addr add dead:beef:3::1/64 dev ns4eth3 nodad
195ip -net "$ns4" link set ns4eth3 up
196ip -net "$ns4" route add default via 10.0.3.2
197ip -net "$ns4" route add default via dead:beef:3::2
198
199# use TCP syn cookies, even if no flooding was detected.
200ip netns exec "$ns2" sysctl -q net.ipv4.tcp_syncookies=2
201
202set_ethtool_flags() {
203	local ns="$1"
204	local dev="$2"
205	local flags="$3"
206
207	ip netns exec $ns ethtool -K $dev $flags 2>/dev/null
208	[ $? -eq 0 ] && echo "INFO: set $ns dev $dev: ethtool -K $flags"
209}
210
211set_random_ethtool_flags() {
212	local flags=""
213	local r=$RANDOM
214
215	local pick1=$((r & 1))
216	local pick2=$((r & 2))
217	local pick3=$((r & 4))
218
219	[ $pick1 -ne 0 ] && flags="tso off"
220	[ $pick2 -ne 0 ] && flags="$flags gso off"
221	[ $pick3 -ne 0 ] && flags="$flags gro off"
222
223	[ -z "$flags" ] && return
224
225	set_ethtool_flags "$1" "$2" "$flags"
226}
227
228if $ethtool_random_on;then
229	set_random_ethtool_flags "$ns3" ns3eth2
230	set_random_ethtool_flags "$ns4" ns4eth3
231else
232	set_ethtool_flags "$ns3" ns3eth2 "$ethtool_args"
233	set_ethtool_flags "$ns4" ns4eth3 "$ethtool_args"
234fi
235
236print_file_err()
237{
238	ls -l "$1" 1>&2
239	echo "Trailing bytes are: "
240	tail -c 27 "$1"
241}
242
243check_transfer()
244{
245	local in=$1
246	local out=$2
247	local what=$3
248
249	cmp "$in" "$out" > /dev/null 2>&1
250	if [ $? -ne 0 ] ;then
251		echo "[ FAIL ] $what does not match (in, out):"
252		print_file_err "$in"
253		print_file_err "$out"
254
255		return 1
256	fi
257
258	return 0
259}
260
261check_mptcp_disabled()
262{
263	local disabled_ns
264	disabled_ns="ns_disabled-$sech-$(mktemp -u XXXXXX)"
265	ip netns add ${disabled_ns} || exit $ksft_skip
266
267	# net.mptcp.enabled should be enabled by default
268	if [ "$(ip netns exec ${disabled_ns} sysctl net.mptcp.enabled | awk '{ print $3 }')" -ne 1 ]; then
269		echo -e "net.mptcp.enabled sysctl is not 1 by default\t\t[ FAIL ]"
270		ret=1
271		return 1
272	fi
273	ip netns exec ${disabled_ns} sysctl -q net.mptcp.enabled=0
274
275	local err=0
276	LANG=C ip netns exec ${disabled_ns} ./mptcp_connect -t $timeout -p 10000 -s MPTCP 127.0.0.1 < "$cin" 2>&1 | \
277		grep -q "^socket: Protocol not available$" && err=1
278	ip netns delete ${disabled_ns}
279
280	if [ ${err} -eq 0 ]; then
281		echo -e "New MPTCP socket cannot be blocked via sysctl\t\t[ FAIL ]"
282		ret=1
283		return 1
284	fi
285
286	echo -e "New MPTCP socket can be blocked via sysctl\t\t[ OK ]"
287	return 0
288}
289
290check_mptcp_ulp_setsockopt()
291{
292	local t retval
293	t="ns_ulp-$sech-$(mktemp -u XXXXXX)"
294
295	ip netns add ${t} || exit $ksft_skip
296	if ! ip netns exec ${t} ./mptcp_connect -u -p 10000 -s TCP 127.0.0.1 2>&1; then
297		printf "setsockopt(..., TCP_ULP, \"mptcp\", ...) allowed\t[ FAIL ]\n"
298		retval=1
299		ret=$retval
300	else
301		printf "setsockopt(..., TCP_ULP, \"mptcp\", ...) blocked\t[ OK ]\n"
302		retval=0
303	fi
304	ip netns del ${t}
305	return $retval
306}
307
308# $1: IP address
309is_v6()
310{
311	[ -z "${1##*:*}" ]
312}
313
314do_ping()
315{
316	local listener_ns="$1"
317	local connector_ns="$2"
318	local connect_addr="$3"
319	local ping_args="-q -c 1"
320
321	if is_v6 "${connect_addr}"; then
322		$ipv6 || return 0
323		ping_args="${ping_args} -6"
324	fi
325
326	ip netns exec ${connector_ns} ping ${ping_args} $connect_addr >/dev/null
327	if [ $? -ne 0 ] ; then
328		echo "$listener_ns -> $connect_addr connectivity [ FAIL ]" 1>&2
329		ret=1
330
331		return 1
332	fi
333
334	return 0
335}
336
337# $1: ns, $2: MIB counter
338get_mib_counter()
339{
340	local listener_ns="${1}"
341	local mib="${2}"
342
343	# strip the header
344	ip netns exec "${listener_ns}" \
345		nstat -z -a "${mib}" | \
346			tail -n+2 | \
347			while read a count c rest; do
348				echo $count
349			done
350}
351
352# $1: ns, $2: port
353wait_local_port_listen()
354{
355	local listener_ns="${1}"
356	local port="${2}"
357
358	local port_hex i
359
360	port_hex="$(printf "%04X" "${port}")"
361	for i in $(seq 10); do
362		ip netns exec "${listener_ns}" cat /proc/net/tcp* | \
363			awk "BEGIN {rc=1} {if (\$2 ~ /:${port_hex}\$/ && \$4 ~ /0A/) {rc=0; exit}} END {exit rc}" &&
364			break
365		sleep 0.1
366	done
367}
368
369do_transfer()
370{
371	local listener_ns="$1"
372	local connector_ns="$2"
373	local cl_proto="$3"
374	local srv_proto="$4"
375	local connect_addr="$5"
376	local local_addr="$6"
377	local extra_args=""
378
379	local port
380	port=$((10000+$TEST_COUNT))
381	TEST_COUNT=$((TEST_COUNT+1))
382
383	if [ "$rcvbuf" -gt 0 ]; then
384		extra_args="$extra_args -R $rcvbuf"
385	fi
386
387	if [ "$sndbuf" -gt 0 ]; then
388		extra_args="$extra_args -S $sndbuf"
389	fi
390
391	if [ -n "$testmode" ]; then
392		extra_args="$extra_args -m $testmode"
393	fi
394
395	if [ -n "$extra_args" ] && $options_log; then
396		options_log=false
397		echo "INFO: extra options: $extra_args"
398	fi
399
400	:> "$cout"
401	:> "$sout"
402	:> "$capout"
403
404	local addr_port
405	addr_port=$(printf "%s:%d" ${connect_addr} ${port})
406	printf "%.3s %-5s -> %.3s (%-20s) %-5s\t" ${connector_ns} ${cl_proto} ${listener_ns} ${addr_port} ${srv_proto}
407
408	if $capture; then
409		local capuser
410		if [ -z $SUDO_USER ] ; then
411			capuser=""
412		else
413			capuser="-Z $SUDO_USER"
414		fi
415
416		local capfile="${rndh}-${connector_ns:0:3}-${listener_ns:0:3}-${cl_proto}-${srv_proto}-${connect_addr}-${port}"
417		local capopt="-i any -s 65535 -B 32768 ${capuser}"
418
419		ip netns exec ${listener_ns}  tcpdump ${capopt} -w "${capfile}-listener.pcap"  >> "${capout}" 2>&1 &
420		local cappid_listener=$!
421
422		ip netns exec ${connector_ns} tcpdump ${capopt} -w "${capfile}-connector.pcap" >> "${capout}" 2>&1 &
423		local cappid_connector=$!
424
425		sleep 1
426	fi
427
428	local stat_synrx_last_l=$(get_mib_counter "${listener_ns}" "MPTcpExtMPCapableSYNRX")
429	local stat_ackrx_last_l=$(get_mib_counter "${listener_ns}" "MPTcpExtMPCapableACKRX")
430	local stat_cookietx_last=$(get_mib_counter "${listener_ns}" "TcpExtSyncookiesSent")
431	local stat_cookierx_last=$(get_mib_counter "${listener_ns}" "TcpExtSyncookiesRecv")
432
433	ip netns exec ${listener_ns} ./mptcp_connect -t $timeout -l -p $port -s ${srv_proto} $extra_args $local_addr < "$sin" > "$sout" &
434	local spid=$!
435
436	wait_local_port_listen "${listener_ns}" "${port}"
437
438	local start
439	start=$(date +%s%3N)
440	ip netns exec ${connector_ns} ./mptcp_connect -t $timeout -p $port -s ${cl_proto} $extra_args $connect_addr < "$cin" > "$cout" &
441	local cpid=$!
442
443	wait $cpid
444	local retc=$?
445	wait $spid
446	local rets=$?
447
448	local stop
449	stop=$(date +%s%3N)
450
451	if $capture; then
452		sleep 1
453		kill ${cappid_listener}
454		kill ${cappid_connector}
455	fi
456
457	NSTAT_HISTORY=/tmp/${listener_ns}.nstat ip netns exec ${listener_ns} \
458		nstat | grep Tcp > /tmp/${listener_ns}.out
459	if [ ${listener_ns} != ${connector_ns} ]; then
460		NSTAT_HISTORY=/tmp/${connector_ns}.nstat ip netns exec ${connector_ns} \
461			nstat | grep Tcp > /tmp/${connector_ns}.out
462	fi
463
464	local duration
465	duration=$((stop-start))
466	printf "(duration %05sms) " "${duration}"
467	if [ ${rets} -ne 0 ] || [ ${retc} -ne 0 ]; then
468		echo "[ FAIL ] client exit code $retc, server $rets" 1>&2
469		echo -e "\nnetns ${listener_ns} socket stat for ${port}:" 1>&2
470		ip netns exec ${listener_ns} ss -Menita 1>&2 -o "sport = :$port"
471		cat /tmp/${listener_ns}.out
472		echo -e "\nnetns ${connector_ns} socket stat for ${port}:" 1>&2
473		ip netns exec ${connector_ns} ss -Menita 1>&2 -o "dport = :$port"
474		[ ${listener_ns} != ${connector_ns} ] && cat /tmp/${connector_ns}.out
475
476		echo
477		cat "$capout"
478		return 1
479	fi
480
481	check_transfer $sin $cout "file received by client"
482	retc=$?
483	check_transfer $cin $sout "file received by server"
484	rets=$?
485
486	local stat_synrx_now_l=$(get_mib_counter "${listener_ns}" "MPTcpExtMPCapableSYNRX")
487	local stat_ackrx_now_l=$(get_mib_counter "${listener_ns}" "MPTcpExtMPCapableACKRX")
488	local stat_cookietx_now=$(get_mib_counter "${listener_ns}" "TcpExtSyncookiesSent")
489	local stat_cookierx_now=$(get_mib_counter "${listener_ns}" "TcpExtSyncookiesRecv")
490
491	expect_synrx=$((stat_synrx_last_l))
492	expect_ackrx=$((stat_ackrx_last_l))
493
494	cookies=$(ip netns exec ${listener_ns} sysctl net.ipv4.tcp_syncookies)
495	cookies=${cookies##*=}
496
497	if [ ${cl_proto} = "MPTCP" ] && [ ${srv_proto} = "MPTCP" ]; then
498		expect_synrx=$((stat_synrx_last_l+1))
499		expect_ackrx=$((stat_ackrx_last_l+1))
500	fi
501
502	if [ ${stat_synrx_now_l} -lt ${expect_synrx} ]; then
503		printf "[ FAIL ] lower MPC SYN rx (%d) than expected (%d)\n" \
504			"${stat_synrx_now_l}" "${expect_synrx}" 1>&2
505		retc=1
506	fi
507	if [ ${stat_ackrx_now_l} -lt ${expect_ackrx} ]; then
508		printf "[ FAIL ] lower MPC ACK rx (%d) than expected (%d)\n" \
509			"${stat_ackrx_now_l}" "${expect_ackrx}" 1>&2
510		rets=1
511	fi
512
513	if [ $retc -eq 0 ] && [ $rets -eq 0 ]; then
514		printf "[ OK ]"
515	fi
516
517	if [ $cookies -eq 2 ];then
518		if [ $stat_cookietx_last -ge $stat_cookietx_now ] ;then
519			printf " WARN: CookieSent: did not advance"
520		fi
521		if [ $stat_cookierx_last -ge $stat_cookierx_now ] ;then
522			printf " WARN: CookieRecv: did not advance"
523		fi
524	else
525		if [ $stat_cookietx_last -ne $stat_cookietx_now ] ;then
526			printf " WARN: CookieSent: changed"
527		fi
528		if [ $stat_cookierx_last -ne $stat_cookierx_now ] ;then
529			printf " WARN: CookieRecv: changed"
530		fi
531	fi
532
533	if [ ${stat_synrx_now_l} -gt ${expect_synrx} ]; then
534		printf " WARN: SYNRX: expect %d, got %d (probably retransmissions)" \
535			"${expect_synrx}" "${stat_synrx_now_l}"
536	fi
537	if [ ${stat_ackrx_now_l} -gt ${expect_ackrx} ]; then
538		printf " WARN: ACKRX: expect %d, got %d (probably retransmissions)" \
539			"${expect_ackrx}" "${stat_ackrx_now_l}"
540	fi
541
542	echo
543	cat "$capout"
544	[ $retc -eq 0 ] && [ $rets -eq 0 ]
545}
546
547make_file()
548{
549	local name=$1
550	local who=$2
551	local SIZE=$filesize
552	local ksize
553	local rem
554
555	if [ $SIZE -eq 0 ]; then
556		local MAXSIZE=$((1024 * 1024 * 8))
557		local MINSIZE=$((1024 * 256))
558
559		SIZE=$(((RANDOM * RANDOM + MINSIZE) % MAXSIZE))
560	fi
561
562	ksize=$((SIZE / 1024))
563	rem=$((SIZE - (ksize * 1024)))
564
565	dd if=/dev/urandom of="$name" bs=1024 count=$ksize 2> /dev/null
566	dd if=/dev/urandom conv=notrunc of="$name" bs=1 count=$rem 2> /dev/null
567	echo -e "\nMPTCP_TEST_FILE_END_MARKER" >> "$name"
568
569	echo "Created $name (size $(du -b "$name")) containing data sent by $who"
570}
571
572run_tests_lo()
573{
574	local listener_ns="$1"
575	local connector_ns="$2"
576	local connect_addr="$3"
577	local loopback="$4"
578	local lret=0
579
580	# skip if test programs are running inside same netns for subsequent runs.
581	if [ $loopback -eq 0 ] && [ ${listener_ns} = ${connector_ns} ]; then
582		return 0
583	fi
584
585	# skip if we don't want v6
586	if ! $ipv6 && is_v6 "${connect_addr}"; then
587		return 0
588	fi
589
590	local local_addr
591	if is_v6 "${connect_addr}"; then
592		local_addr="::"
593	else
594		local_addr="0.0.0.0"
595	fi
596
597	do_transfer ${listener_ns} ${connector_ns} MPTCP MPTCP ${connect_addr} ${local_addr}
598	lret=$?
599	if [ $lret -ne 0 ]; then
600		ret=$lret
601		return 1
602	fi
603
604	if [ $do_tcp -eq 0 ]; then
605		# don't bother testing fallback tcp except for loopback case.
606		if [ ${listener_ns} != ${connector_ns} ]; then
607			return 0
608		fi
609	fi
610
611	do_transfer ${listener_ns} ${connector_ns} MPTCP TCP ${connect_addr} ${local_addr}
612	lret=$?
613	if [ $lret -ne 0 ]; then
614		ret=$lret
615		return 1
616	fi
617
618	do_transfer ${listener_ns} ${connector_ns} TCP MPTCP ${connect_addr} ${local_addr}
619	lret=$?
620	if [ $lret -ne 0 ]; then
621		ret=$lret
622		return 1
623	fi
624
625	if [ $do_tcp -gt 1 ] ;then
626		do_transfer ${listener_ns} ${connector_ns} TCP TCP ${connect_addr} ${local_addr}
627		lret=$?
628		if [ $lret -ne 0 ]; then
629			ret=$lret
630			return 1
631		fi
632	fi
633
634	return 0
635}
636
637run_tests()
638{
639	run_tests_lo $1 $2 $3 0
640}
641
642make_file "$cin" "client"
643make_file "$sin" "server"
644
645check_mptcp_disabled
646
647check_mptcp_ulp_setsockopt
648
649echo "INFO: validating network environment with pings"
650for sender in "$ns1" "$ns2" "$ns3" "$ns4";do
651	do_ping "$ns1" $sender 10.0.1.1
652	do_ping "$ns1" $sender dead:beef:1::1
653
654	do_ping "$ns2" $sender 10.0.1.2
655	do_ping "$ns2" $sender dead:beef:1::2
656	do_ping "$ns2" $sender 10.0.2.1
657	do_ping "$ns2" $sender dead:beef:2::1
658
659	do_ping "$ns3" $sender 10.0.2.2
660	do_ping "$ns3" $sender dead:beef:2::2
661	do_ping "$ns3" $sender 10.0.3.2
662	do_ping "$ns3" $sender dead:beef:3::2
663
664	do_ping "$ns4" $sender 10.0.3.1
665	do_ping "$ns4" $sender dead:beef:3::1
666done
667
668[ -n "$tc_loss" ] && tc -net "$ns2" qdisc add dev ns2eth3 root netem loss random $tc_loss delay ${tc_delay}ms
669echo -n "INFO: Using loss of $tc_loss "
670test "$tc_delay" -gt 0 && echo -n "delay $tc_delay ms "
671
672reorder_delay=$(($tc_delay / 4))
673
674if [ -z "${tc_reorder}" ]; then
675	reorder1=$((RANDOM%10))
676	reorder1=$((100 - reorder1))
677	reorder2=$((RANDOM%100))
678
679	if [ $reorder_delay -gt 0 ] && [ $reorder1 -lt 100 ] && [ $reorder2 -gt 0 ]; then
680		tc_reorder="reorder ${reorder1}% ${reorder2}%"
681		echo -n "$tc_reorder with delay ${reorder_delay}ms "
682	fi
683elif [ "$tc_reorder" = "0" ];then
684	tc_reorder=""
685elif [ "$reorder_delay" -gt 0 ];then
686	# reordering requires some delay
687	tc_reorder="reorder $tc_reorder"
688	echo -n "$tc_reorder with delay ${reorder_delay}ms "
689fi
690
691echo "on ns3eth4"
692
693tc -net "$ns3" qdisc add dev ns3eth4 root netem delay ${reorder_delay}ms $tc_reorder
694
695for sender in $ns1 $ns2 $ns3 $ns4;do
696	run_tests_lo "$ns1" "$sender" 10.0.1.1 1
697	if [ $ret -ne 0 ] ;then
698		echo "FAIL: Could not even run loopback test" 1>&2
699		exit $ret
700	fi
701	run_tests_lo "$ns1" $sender dead:beef:1::1 1
702	if [ $ret -ne 0 ] ;then
703		echo "FAIL: Could not even run loopback v6 test" 2>&1
704		exit $ret
705	fi
706
707	run_tests "$ns2" $sender 10.0.1.2
708	run_tests "$ns2" $sender dead:beef:1::2
709	run_tests "$ns2" $sender 10.0.2.1
710	run_tests "$ns2" $sender dead:beef:2::1
711
712	run_tests "$ns3" $sender 10.0.2.2
713	run_tests "$ns3" $sender dead:beef:2::2
714	run_tests "$ns3" $sender 10.0.3.2
715	run_tests "$ns3" $sender dead:beef:3::2
716
717	run_tests "$ns4" $sender 10.0.3.1
718	run_tests "$ns4" $sender dead:beef:3::1
719done
720
721time_end=$(date +%s)
722time_run=$((time_end-time_start))
723
724echo "Time: ${time_run} seconds"
725
726exit $ret
727