计网实验datalinklayersimulation.docx

计网实验datalinklayersimulation.docx

《计网实验datalinklayersimulation.docx》由会员分享，可在线阅读，更多相关《计网实验datalinklayersimulation.docx（8页珍藏版）》请在冰豆网上搜索。

计网实验datalinklayersimulation

计网实验datａ-lｉnk－ｌａｙer-ｓimulatｉｏn

————————————————————————————————作者:

————————————————————————————————日期：

ﻩ

《计算机通信与网络实验》

　课程实验报告

实验二:

２．ｄata　ｌinklayerｓimulation

实验名称:

2.ｄａtalｉnｋlayersimulａtiｏn

1.实验内容

1.DｒawＦｉgurｅ7.12aｎd7.１3.

2.Sｉmulatｉonｏn　PeｒｆormancｅofDaｔaLiｎkCoｎtｒｏl　Protｏｃols　

Ｕsingtheｓaｍeａssｕmｐｔiｏｎsthatareused　ｆorFiguｒe7.13iｎAｐpeｎdｉｘ　7Ａ,plｏt　ｌineutiｌizaｔioｎasａfｕncｔｉoｎ　ofP，ｔhｅprobabilｉｔythatasiｎgle　ｆｒａmｅisinｅrｒorfｏｒｔhe　foｌｌoｗingerror-conｔroｌｔｅchnｉqueｓ:

a.Stop-ａnd-ｗaｉt

b.Go－back-Ｎwith　w=7

c.Gｏ-bａck-Nwｉth　w=127

d.　Seleｃtiverejeｃtwiｔhw＝7

e.Selectiveｒeｊｅｃt　wｉthw=１２７

Do　aｌloftｈｅｐrecｅｄingfｏr　tｈefｏｌlowingｖalueｓｏf　a:

0.１,　1,１0,100．Ｄrａwconｃｌuｓｉoｎs　ａboｕｔwhicｈtecｈniquｅis　ａpproｐrｉaｔefｏrvariｏuｓrangesofａ．

2．实验结果

A=0.１

A＝1

A＝10

A=1０0

a=0.1时，W＝７或者127都是大于2a+1；

ａ=1时，Ｗ=7或者1２7都是大于２a+1；

a＝10时，则选择拒绝和返回Ｎ都是一个分段函数.

a=100时,则选择拒绝和返回N都是一个分段函数。

3．实验程序

Fiｇure7.12

ａ＝０:

0.１：

1０00；

W　=　[1,7，１27］;

forｊ=1:

3

　　ｆｏrｉ　=1:

length（ａ）

　　iｆW（j）>＝2*a（i）+1

　　　　U（ｉ）=1；

eｌse

　　　　　　Ｕ（i）=Ｗ（j）／（2*a（i）+１）;

　　enｄ

　　end

　　ｉｆｊ＝＝１

　　　W１＝U;

　ｅnd

　　ifｊ==2

W7＝U;

　　end

　iｆj　=＝　３

W１0=Ｕ;

eｎｄ

end

plot（a，W1）;

hoｌdon;

plot（ａ，W7）;

pｌot（ａ,W10）;

set（gcａ,＇xscalｅ',＇lｏｇ＇）;

axiｓ（［0.１1０0001]）；

Figuｒe７.1３

a　=　0:

０.１:

１0０0;

W=[1,７,127，127];

Ｐ=10^（－３）；

forj=1：

４

　fori=１:

lengｔh（a）

　iｆW（j）　==１

　　　U（i）=（1－P）／（１+2*a（i））;

　　ｅｎd

　　　　ifW（ｊ）==7

　　if　W（２）＞=2*a（i）+1

　　　U（i）＝　1-P；

　　　　else

　　Ｕ（i）　＝　W（j）*（1-P）/（2*a（i）＋1）;

　　　　eｎｄ

end

　　ifＷ（j）==1２７

　　　ifW（j）>=2*a（i）+1

　　　U（i）=（1-Ｐ）/（１+2*a（i）＊P）；

　　　　Y（i）　=1-P;

　　eｌsｅ

U（i）=　W（j）＊（1-Ｐ）/（（2＊a（ｉ）＋1）*（1－P+Ｗ（j）*P））;

　　　Ｙ（ｉ）=　Ｗ（j）*（1－P）/（2＊a（i）+１）；

　　end

　end

　ｉfj==1

　　Ｗ１=U;

end

ifj=＝2

　Ｗ7=U;

end

　if　j==3

　　W10=　U;

　　end

　　ifj　＝=　4

　　W＝Y；

　end

end

ｅｎｄ

ｐｌoｔ（ａ，W1）；

hｏldon;

ploｔ（a,W7）;

pｌot（a,Ｗ10）;

ｐｌｏｔ（ａ,W）;

sｅt（ｇcａ,＇ｘscａle＇,'loｇ＇）;

axis（［0.１1000　０１]）；

2、Ｄrａw

ｆuncｔionU=stopａndwait（a,P）　　

U=（１-P）./（１+2*a）;

end

functionＵ＝selecｔｉvｅ＿rejecｔ（a，W,Ｐ）

U＝（1-P）.*（W>＝2*a+１）＋Ｗ.*（1－Ｐ）.／（2.*a＋1）.＊（Ｗ＜２＊a＋1）;

end

functiｏnU=gobackn（a,W,P）

U＝（１-Ｐ）．/（１＋2.＊a.*P）.*（W＞=2*ａ+１）+W.*（1－P）./（2．*a+1）．/（1－Ｐ+Ｗ．*P）．*（W<2*ａ＋1）;

ｅnd

funcｔionlab２＿draw（a）

P=0:

0.1:

1000；

Ｕ＝stopａnｄｗaiｔ（a,P）；

semilogx（Ｐ,U,'r'）；

hｏｌdｏn

Ｕ=selectiｖe_rｅject（a,7,Ｐ）；

ｓemｉloｇｘ（P，U,'g＇）;

holdｏｎ

Ｕ=gobackn（a,7,P）;

ｓemilogｘ（Ｐ,Ｕ，'b'）;　

holｄ　oｎ

U=ｓelｅcｔiｖe_rｅject（ａ,１27,P）;

semiｌoｇx（P,U,'k＇）；holｄon　

U=ｇobacｋｎ（a,１27,P）;

semilogx（P,U,'y'）;　

ylabel（'Utｉｌiｚａtion'）　;

xlabel（'Ｐ'）;

ｌegend（'Sｔoｐ-aｎｄ－ｗait＇,'Go-ｂack-Nwithw＝7　＇,'Go－back-Ｎ　withw＝１27＇，'Seｌｅｃtｉｖerejeｃtwiｔhｗ=7＇,'Ｓelectiverejｅctｗｉthｗ=12７　'，3）

eｎd