【正文】 $10。 seqNum = $11。 pktId = $12。 if(fromNode ==1 amp。amp。 toNode ==2 amp。amp。 event ==+) { totalNum++。 記錄時間timeArr[i]=time。 計算丟包率lossrate[i]=(float)(dropNum/totalNum)。 i++。 }if(fid == 2 amp。amp。 event== d) dropNum ++。 } END{ printf(number of packet sent:%d,lost:%d\n,totalNum,dropNum)。 printf(lost rate of packets:%f\n,dropNum/totalNum)。 for(j=0。ji。j++) printf(%f\t%f\n,timeArr[j],lossrate[j])。 }退出文本編輯器調(diào)用命令查看結果 Gawk –f 5, 計算延遲用上述方法，新建一個awk文件，加入以下代碼：delay analyse BEGIN{ highestPktId=0。 } { event = $1。 time = $2。 fromNode = $3。 toNode = $4。pktType = $5。 pktSize = $6。 flags = $7。 fid = $8。 srcAddr = $9。 dstAddr = $10。 seqNum = $11。 pktId = $12。 判斷最大分組標識if(pktIdhighestPktId) highestPktId=pktId。 設置分組開始時間if(beginTime[pktId]==0) beginTime[pktId]=time。計算結束時間 if(fid==2 amp。amp。 event!=d){ if(event==r) endTime[pktId]=time。 } else{ endTime[pktId]=1。 } }END{ for(pktId=0。pktId=highestPktId。pktId++) { 計算延遲begin=beginTime[pktId]。 end=endTime[pktId]。 pktDuration=endbegin。 if(beginend) printf(%f\t%f\n,begin,pktDuration)。 } }用命令查看結果 Gawk –f 6， 計算吞吐量用文本編輯器新建一個awk文件加入以下代碼:throughput BEGIN{ flag=0。 i=0。 } { event = $1。 time = $2。 fromNode = $3。 toNode = $4。 pktType = $5。 pktSize = $6。 flags = $7。fid = $8。 srcAddr = $9。 dstAddr = $10。 seqNum = $11。 pktId = $12。 if(event==r amp。amp。 fromNode==2 amp。amp。 toNode==3 amp。amp。 fid==2) { 計算當前總流量pktSum[i+1]=pktSum[i]+pktSize。 if(flag==0) { beginTime=time。 flag=1。 } endTime[i]=time。 i++。 } } END{ printf(%.6f\t%.5f\n,endTime[0],0)。 for(j=1。ji。j++){ 計算并輸出網(wǎng)絡吞吐率throughput=(float)pktSum[j]/(endTime[j]beginTime)*8/1000。 printf(%.6f\t%.5f\n,endTime[j],throughput)。 }printf(%.6f\t%.5f\n,endTime[i1],0)。 }用命令查看結果 Gawk –f 大家發(fā)現(xiàn)，結果直接顯示在屏幕上了，如果要用XGRAPH查看圖形，需要將數(shù)據(jù)重定向到一個文件中，以丟包率為例，其他的參考丟包率 Gawk –f xgraph 六 實驗結果集數(shù)據(jù)分析網(wǎng)絡拓撲結構和數(shù)據(jù)傳輸圖：由實驗代碼可知：實驗通過NS模擬軟件建立了4個節(jié)點，各節(jié)點均采用全雙工形式，一條TCP連接一條UDP連接（數(shù)據(jù)發(fā)送方向如圖），01,，延遲10ms，DropTail隊列形式，,延遲20ms，RED隊列形式。udp數(shù)據(jù)包大小1000字節(jié)。具體流程截圖如圖：udp發(fā)送數(shù)據(jù)：tcp慢啟動，在n2節(jié)點流量過大，數(shù)據(jù)分組進行排隊：n2節(jié)點排隊隊列過長，產(chǎn)生丟包：tcp擁塞控制，乘性減：tcp加性增，n2節(jié)點產(chǎn)生排隊，甚至丟包：udp發(fā)送結束，tcp加性增，導致n2節(jié)點再次排隊甚至丟包：上述n2n3的平均隊列長度:上述n2n3的當前隊列長度:上述過程數(shù)據(jù)傳輸過程的丟包率：上述過程數(shù)據(jù)傳輸過程的延時：上述過程數(shù)據(jù)傳輸過程的吞吐量：根據(jù)流程分析和所得的網(wǎng)絡各參數(shù)的曲線圖可知：對于節(jié)點的隊列長度而言，其總是保持在一個范圍內(nèi)浮動，當隊列長度較大時，產(chǎn)生丟包；當隊列長度較小時，傳來的數(shù)據(jù)又會填補隊列空缺。當網(wǎng)絡吞吐量較大時，網(wǎng)絡的延時較低，網(wǎng)絡的丟包率也較低；當網(wǎng)絡吞吐量較小時，網(wǎng)絡的延時較高，網(wǎng)絡的丟包率也較高。以上的流程過程和網(wǎng)絡的曲線圖基本保持一致，說明了本實驗的正確性和有效性。七 新的發(fā)現(xiàn)TCP能通過其慢啟動，加性增，乘性減的方式來實現(xiàn)擁塞控制。當網(wǎng)絡情況較好時，TCP的傳輸速率會線性的增大，直到網(wǎng)絡產(chǎn)生丟包時，才減半，讓后根據(jù)網(wǎng)絡情況在適當?shù)倪M行線性增加或減半，通過這種機制，可以是TCP的傳輸效率的到很大的提高，也使TCP更加的適應現(xiàn)實生活中復雜的網(wǎng)絡世界。