NS2学习笔记(一)
NS2有两种运行方式:
1.“脚本方式”,输入命令: ns tclscripl.tcl,其中 tclscripl.tcl 是一个Tcl脚本的文件名;
2“命令行方式”,输入命令:ns,进入NS2的命令行环境,然后直接输入各种命令来交互式地运行NS2。(与Python类似)
运行NS2以后也有两种方法记录结果:
1.trace文件;
2.nam(动画演示程序)
Tcl脚本1:example1.tcl
set ns [new Simulator]#建立一个新的模拟对象simulator set tracef [open example1.tr w]#变量tracef指向example1.tr文件
#ns trace-all $tacef#记录模拟过程trace数据
set namtf [open example1.nam w]#变量namtf指向example1.nam文件
$ns namtrace-all $namtf#记录nam的trace数据 proc finish {} {关闭两个trace文件,在模拟结束后调用nam程序
global ns tracef namtf
$ns flush-trace
close $tracef
close $namtf
exec nam example1.nam &
exit
) set n0 [$ns node]#创建节点n0
set n1 [$ns node]#创建节点n1 $ns duplex-link $n0 $n1 1Mb 10ms DropTail#在n0和n1之间建立一条双向的链路,带宽1Mbit/s,时延10ms,队列类型为DropTail。 set udp0 [new Agent/UDP]#创建一个udp0 Agent
$ns attach-agent $no $udp0#将udp0绑定到n0上 set cbr0 [new Application/Traffic/CBR]#创建一个CBR流量发生器
$cbr0 set packetSize_ #分组大小为500B
$cbr0 set interval_ 0.005#发送间隔为5ms
$cbr0 attach-agent $udp0#将CBR绑定到udp0上 set null0 [new Agent/Null]#创建一个Null Agent作为数据接收器
$ns attach-agent $n1 $null0#绑定到n1上 $ns connect $udp0 $null0#将两个Agent连接起来 $ns at 0.5 "$cbr0 start"#.5s时启动cbr0
$ns at 4.5 "$cbr0 stop"#.5s时停止cbr0 $ns at 5.0 "finish"#.0s时调用finish过程
$ns run#开始模拟
Tcl调用成员方法的格式为:$对象名 方法名
Tcl脚本2(无线模型):wireless.tcl
set val(chan) Channel/WirelessChannel #channel type,val(chan)作为变量名是一个整体,下同
set val(proc) Propagation/TwoRayGround #radio-propagation model
set val(netif) Phy/WirelessPhy #network interface type
set val(mac) Mac/802_11 #MAC type
set val(ifq) Queue/DropTail/PriQueue #interface queue type
set val(ll) LL #link layer type
set val(ant) Antenna/OmniAntenna #antenna model
set val(ifqlen) #max packet in ifq
set val(nn) #number of mobilenodes
set val(rp) AODV #routing protocol
set val(x) #X dimension of the topography
set val(y) #Y dimension of the topography set ns [new Simulator] set tracefd [open wireless.tr w]
$ns trace-all $tracefd
set namtracefd [new wireless.nam w]
$ns namtrace-all-wireless $namtracefd $val(x) $val(y) set topo [new Topography]#建立一个Topography对象,该对象可以保证节点在拓扑边界范围内运动
$topo load_flatgrid $val(x) $val(y)#设定模拟所用场景的大小 create-god $val(nn) #建立一个God对象,主要用来对路由协议做性能评价;节点的MAC对象会调用God对象,因此即使我们在这里并不适用God对象,仍然需要建立一个God对象 $ns node-config -adhocRouting $val(rp)\ #配置节点参数
-llType $val(ll)\
-macType $val(mac)\
-ifqType $val(ifq)\
-ifqLen $val(ifqlen)\
-antType $val(ant)\
-propType $val(prop)\
-phyType $val(netif)\
-channelType $val(chan)\
-topoInstance $topo\
-agentTrace ON\
-routerTrace ON\
-macTrace OFF\
-movementTrace OFF for{set i } {$i < $val(nn)} {incr i} {
set node_($i) [$ns node]
$node_($i) random-motion #disable random motion 禁止节点随机移动,让节点按脚本规定的方式移动 $node_() set X_ 5.0 #设定节点初始坐标X,Y,Z
$node_() set Y_ 2.0
$node_() set Z_ 0.0 $node_() set X_ 390.0
$node_() set Y_ 385.0
$node_() set Z_ 0.0 $ns at 5.0 "$node_(1) setdest 25.0 20.0 15.0"#节点1在5s时以15m/s的速度向坐标(25.0,20.0)的点运动
$ns at 1.0 "$node_(0) setdest 20.0 18.0 1.0" $ns at "$node_(1) setdest 490.0 480.0 15.0" set tcp [new Agent/TCP]
$tcp set class_
set sink [new Agent/TCPSink]
$ns attach-agent $node_() $tcp
$ns attach-agent $node_() $sink
$ns connect $tcp $sink
set ftp [new Appication/FTP]
$ftp attach-agent $tcp $ns at 1.0 "$ftp start"
for {set i } {$i < $val(nn)} {incr i} {
$ns at 15.0 "$node_($i) reset"
}
$ns at 15.0 "stop" proc stop{} {
global ns tracefd nametracefd
$ns flush-trace
close $tracefd
close $nametracefd
exec nam wireless nam &
exit
} $ns run
在节点很多的情况下,可以通过文件配置这些节点的初始位置和运动方式。
source "path" #读取定义位置和运动方式的文件,path是文件的路径名,文件中的内容包括node的set方法设定初始坐标,和simulator的at方法设定运动方式。与上面直接写入脚本的方法一致。
还可以通过这种引用文件的方式来设定绑定节点的Agent。
NS2学习笔记(一)的更多相关文章
- NS2学习笔记(四)
这几天学习NS2,虽然国内很多人使用,但系统的教材资料不多,只能一边看中文教材,一边看英文手册,知识点也是零零散散.过段时间等能将所有知识点串上,再总结总结.现只讲一些零碎的点记录一下. 添加新的协议 ...
- NS2学习笔记(二)
Tcl语言 变量和变量赋值 set a "Hello World!" #将字符串赋值给变量a puts "NS2 say $a" #输出字符串的内容,其中$a表 ...
- NS2学习笔记(五)
对无线网络,生成nam文件要使用namtrace-all-wireless, 而不是namtrace-all: set nf [open test_1.nam w] $ns_ namtrace-all ...
- NS2学习笔记(三)
代理(Agents) 代理是网络层数据包产生和使用的端点,用于实现多层的协议.Agent类部分用OTcl实现,部分用C++实现.C++的代码在~ns/agent.cc和~ns/agent.h中,OTc ...
- NS2学习笔记
这两天在调一个仿真程序,比较奇怪的错误,就是一个节点广播消息,在它通信半径内的节点收不到消息,一直在通信上找问题,找了半天也没找到. 最后,用gdb调试,发现在一个操作指针处发生了段错误,引起的原因时 ...
- cocos2d-x实战 C++卷 学习笔记--第4章 字符串 __String类
前言: <cocos2d-x实战C++卷>学习笔记.(cocos2d-x 是3.0版本) 介绍 cocos2d-x 通用的字符串类 __String . 使用cocos2d::__Str ...
- WebService学习笔记系列(二)
soap(简单对象访问协议),它是在http基础之上传递xml格式数据的协议.soap协议分为两个版本,soap1.1和soap1.2. 在学习webservice时我们有一个必备工具叫做tcpmon ...
- HBASE学习笔记(四)
这两天把要前几天的知识点回顾一下,接下来我会用自己对知识点的理解来写一些东西 一.知识点回顾 1.hbase集群启动:$>start-hbase.sh ===>hbase-daemon.s ...
- js学习笔记:webpack基础入门(一)
之前听说过webpack,今天想正式的接触一下,先跟着webpack的官方用户指南走: 在这里有: 如何安装webpack 如何使用webpack 如何使用loader 如何使用webpack的开发者 ...
随机推荐
- db2 group by的疑惑。
按借据号分组,显示每组的条数:
- 文件内容差异对比-python
上次没精力时候,看了下python自动化运维,给print加了颜色,新鲜哒 今天来写写文件对比 step1:引入difflib库(无需安装,python自带) step2:将文件内容按行分割,spli ...
- 网络基础——UDP
UDP 1.UDP首部格式 源端口号(16) 目标端口号(16) UDP长度(16) UDP校验和(16) UDP长度:用来指出UDP的总长度 校验和:用来完成对UDP数据的差错检验,它是UDP协议提 ...
- 【BZOJ1014】火星人prefix(splay,Hash)
题意: . 思路: ; ..,..]of longint; sum,size,fa,a,b,id,mi:..]of longint; n,m,i,x,y,s,k,j,cnt,root:longint; ...
- zoj——1202 Divide and Count
Divide and Count Time Limit: 2 Seconds Memory Limit: 65536 KB Jack has several beautiful diamon ...
- [Vue +TS] Use Two-Way Binding in Vue Using @Model Decorator with TypeScript
Vue models, v-model, allow us to use two-way data binding, which is useful in some cases such as for ...
- POJ 1260-Pearls(DP)
Pearls Time Limit: 1000MS Memory Limit: 10000K Total Submissions: 7465 Accepted: 3695 Descriptio ...
- impex 语法
impex 语法 2016-01-14 16:23 588人阅读 评论(0) 收藏 举报 分类: hybris(8) 脱离java Model单纯的去看impex文件的代码是不能很好理解impex ...
- Java大数练习第二弹
hdu1250 水题 题目链接:pid=1250">http://acm.hdu.edu.cn/showproblem.php?pid=1250 import java.util.*; ...
- Java课程设计——人事管理系统
主界面代码: package PersonSystem; import java.awt.*; import java.awt.event.*; import javax.swing.*; impor ...