patch.tcl.lan

ns2网络仿真中超宽带的实现

diff -Naur --ignore-matching-lines='Version Date' --ignore-matching-lines=cvsroot --ignore-matching-lines=CVSROOT /home/rmerz/NS/ns-allinone-2.26/ns-2.26/tcl/lan/ns-mac.tcl tcl/lan/ns-mac.tcl
--- /home/rmerz/NS/ns-allinone-2.26/ns-2.26/tcl/lan/ns-mac.tcl	2003-02-26 23:09:37.000000000 +0100
+++ tcl/lan/ns-mac.tcl	2004-01-30 17:03:57.000000000 +0100
@@ -60,6 +60,42 @@
         Mac/802_11 set dataRate_ 1Mb   ;# both control and data pkts
 }
 
+# IEEE 802.11-IF MAC settings
+if [TclObject is-class Mac/802_11_if] {
+	Mac/802_11_if set delay_ 64us
+	Mac/802_11_if set ifs_ 16us
+	Mac/802_11_if set slotTime_ 16us
+	Mac/802_11_if set cwmin_ 16
+	Mac/802_11_if set cwmax_ 1024
+	Mac/802_11_if set rtxLimit_ 16
+	Mac/802_11_if set bssId_ -1
+	Mac/802_11_if set sifs_ 8us
+	Mac/802_11_if set pifs_ 12us
+	Mac/802_11_if set difs_ 16us
+	Mac/802_11_if set rtxAckLimit_ 1
+	Mac/802_11_if set rtxRtsLimit_ 3
+        Mac/802_11_if set basicRate_ 1Mb  ;# set this to 0 if want to use bandwidth_ for 
+        Mac/802_11_if set dataRate_ 1Mb   ;# both control and data pkts
+}
+
+# MAC IFControl settings
+if [TclObject is-class Mac/IFControl] {
+	Mac/IFControl set delay_ 64us
+	Mac/IFControl set ifs_ 16us
+	Mac/IFControl set slotTime_ 16us
+	Mac/IFControl set cwmin_ 16
+	Mac/IFControl set cwmax_ 1024
+	Mac/IFControl set rtxLimit_ 16
+	Mac/IFControl set bssId_ -1
+	Mac/IFControl set sifs_ 8us
+	Mac/IFControl set pifs_ 12us
+	Mac/IFControl set difs_ 16us
+	Mac/IFControl set rtxAckLimit_ 1
+	Mac/IFControl set rtxRtsLimit_ 3
+        Mac/IFControl set RTSThreshold 0
+        Mac/IFControl set fixed_code -1 ; # dynamic coding
+}
+
 # IEEE 802.14 MAC settings
 if [TclObject is-class Mac/Mcns] {
 	Mac/Mcns set bandwidth_ 10Mb