HNU计网实验：实验三 TCP Tahoe与Reno 运行机制对比分析

胡言乱语

“它能放吗？放不了，没这个能力知道吗？这样下去要拖五一了，清明拖完拖五一，再拖端午，接下来没假拖了。务实一点，你说它补到暑假能行吗？不行啊，还有小学期呢”
刚想吐槽输麻了的时候
诶？中南也不放了
我们通知还比他们早一点，这就直接赢麻了啊hhh

说些什么

之后的实验等结束了再补充吧，毕竟是核心课，不同班的验收进度也不同，所以现在写出来肯定有些不太合适
但是为什么要先写实验三嘞，大概就是早点写出来可以让更多的小伙伴少踩点雷吧
这里特别鸣谢一下我的大长腿室友

实验

前言

ubuntu的话还是用16.04那个版本比较好一点

配置

Oh my god！我亲爱的小伙伴们，难度你们还在按照前辈们的博客，痛苦地安装着各种依赖包，然后去下载安装包，再配置环境变量，然后为各种报错秃头，逐渐失去你的仪态你良好的品质你的头发嘛？
拜托，这样子超机车的好嘛？
事实证明，朴素的程序员往往习惯用朴素的指令来完成项目要求

sudo apt install ns2 gnuplot

如果这句话一下子解决了你所有的烦恼，答应我，请务必把它放到仅此于“奇变偶不变，符号看象限”的高度，好嘛？
于是我们成功完成了相关包的安装和配置

正式实验

老师给出的那个.tcl文件其实问题挺大的，至少它跑不通，比如什么puts后面没加空格，什么r0达成了n0，所以按照惯例贴出来一份正确的

if {$argc != 1} {
	puts "Usage: ns lab11.tcl TCPversion"
	puts "Example:ns lab11.tcl Tahoe or ns lab11.tcl Reno"
	exit
}

set par1 [lindex $argv 0]

#产生一个仿真的对象
set ns [new Simulator]

#打开一个trace file, 用来记录封包传送的过程
set nd [open out-$par1.tr w]
$ns trace-all $nd

#打开一个文件用来记录cwnd 变化情况
set f0 [open cwnd-$par1.tr w]

#定义一个结束的程序
proc finish {} {
	global ns nd f0 tcp
	#显示最后的平均吞吐量
	puts [format "average throughput:%1.f Kbps"\
		[expr [$tcp set ack_]* ([$tcp set packetSize_]) *8/1000.0/10]]
	$ns flush-trace
	#关闭文件
	close $nd 
	close $f0
	exit 0
}

#定义一个记录的程序
#每格0.01s就去记录当时的cwnd
proc record {} {
	global ns tcp f0

	set now [$ns now]
	puts $f0 "$now [$tcp set cwnd_]"
	$ns at [expr $now+0.01] "record"
}

#产生传送结点，路由器r1,r2和接收结点
set n0 [$ns node]
set r0 [$ns node]
set r1 [$ns node]
set n1 [$ns node]

#建立链路
$ns duplex-link $n0 $r0 10Mb 1ms DropTail
$ns duplex-link $r0 $r1 1Mb 4ms DropTail
$ns duplex-link $r1 $n1 10Mb 1ms DropTail

#设置队列长度为18个封包大小
set queue 18
$ns queue-limit $r0 $r1 $queue

#根据用户的设置，指定TCP版本
if {$par1 == "Tahoe"} {
	set tcp [new Agent/TCP]
} else {
	set tcp [new Agent/TCP/Reno]
}
$ns attach-agent $n0 $tcp

set tcpsink [new Agent/TCPSink]
$ns attach-agent $n1 $tcpsink

$ns connect $tcp $tcpsink

#建立FTP应用程序
set ftp [new Application/FTP]
$ftp attach-agent $tcp

#在0.0s时，开始传送
$ns at 0.0 "$ftp start"

#在10.0s时，结束传送
$ns at 10.0 "$ftp stop"

#在0.0s时调用record来记录TCP的cwnd变化情况
$ns at 0.0 "record"

#在第10.0s时调用finish来结束模拟
$ns at 10.0 "finish"

#执行模拟
$ns run

然后把这个复制到你的文件里，命名成lab3.tcl就行
执行命令

ns lab3.tcl Tahoe

会生成两个文件，其中cwnd-Tahoe.tr是这次实验需要用到的
注意！这里需要大写T！如果阅读它那个.tcl文件，就会看到如果输入的不是Tahoe的话，就生成的全是Reno的.tr文件。不要问我为什么知道，问就是爱过，被伤害过

然后使用gnuplot

gnuplot

在这个画图软件里依次输入指令

set title “Tahoe”

设置图像的标题

set xlabel “time”

设置横坐标为时间

set ylabel “cwnd”

设置纵坐标为拥塞窗口大小

set terminal gif

设置输出为gif格式

set output “cwnd-Tahoe.gif”

设置输出的文件名

plot “cwnd-Tahoe.tr” with linespoints

画图，引号内为上一步仿真结果的文件名
这样就可以得到图像了

同理换成Reno就可以执行得到Reno的图像了

分析什么的就不赘述了，课本讲得挺清晰的
不行，我必须要吐槽一句它中文版翻译的真的好有问题啊，明明应该是先修改阈值再修改拥塞窗口，结果他翻译顺序反了就搞得我当时困扰了好久好伐

问题

A.这个实验中只对cwnd的测量，没有对ACK帧的测量，能够能体现出“快重传”（不管在Tahoe还是在Reno中都有快重传这一特性的）这一特性吗？

Tahoe没有体现出快重传这一特性，从图片可以看出来不管是发生超时指示的丢包事件，还是发生3个冗余ACK指示的丢包事件，都是将cwnd减至1个MSS。
Reno体现出来了快重传这一特性，从图片中可以看出来TCP将cwnd设为出现数据包丢失时的值的1/2。因为发送端在收到冗余ACK后采用快速重传，而发生超时是采用慢启动策略，所以能体现。

B.为什么Reno版本在出现封包丢失后选择将ssthresh和cwnd都设为出现数据包丢失时的Windows值的1/2，而不是其它值呢？比如1/3,2/3？

如果在慢启动的第N个传输回合发生了丢包事件，那么我们可以知道最大的不产生丢包的拥塞窗口是在第N-1个传输回合，而由于慢启动是以指数增长，所以第n-1个传输回合的拥塞窗口是当前Windows值的1/2.
在查阅资料的过程中也有其他的发现，即ssthresh=max(FlightSize/2，2MSS)，可以看出来ssthresh虽然是出现数据包丢失时的Windows值的1/2，但是也有最小值界限即2MSS。

C.本实验也没有详细对这两个版本的运行机制进行对比，例如分别在1、2、3和4个packet miss的情况下对协议进行分析，更真实的进行模拟，更能体现出Tahoe和Reno版本的平均吞吐率的差别。

这个不是在陈述这个实验的不足之处嘛？？？为什么需要修改.tcl代码实现啊？？？