Linuxer
人生的乐趣有多种:爱、享受、冒险等等,还有发现和创造。能享受后两种乐趣的人并不多。做事应该带着发现的心态而不是争强好胜的心态。

导航

 

实验名称:简单的多对一传输仿真

实验目的:
1。研究怎么实现多对一传输。

实验步骤:

1。写c++代码并注册报文头。


先说一下多对一传输的方式。最开始,接收端发送控制报文给所有的发送端,告诉他们要发送多少报文。

发送端按要求的数量发送完报文后,给接收端一个ack信息。

接收端收到所有发送端的ack报文后,则重新发送控制报文给所有的发送端。这样周而复始。

接收端为了和多个发送端通信,需要有多个agent,而每个app只能连接到一个agent上。如此,接收端上就有多个app,那么这多个app怎么通信呢?怎么知道彼此的状态?直觉上,接收端应该只有一个app在运行,多个app也让我们心理上不爽。这里我想到一个小技巧,也是在开发p2p点播时受到的提示。那就是,每个结点上除了一个总控的app,还要维持很多connection。connection负责和别的结点的连接。这些connection其实也是特殊的app,控制底层进行数据传输的agent。它们同时又向总控的app报告自己的情况,由总控的app对他们进行调度。说到这,你可能已经明白了,在这次仿真中,我要用两层app,顶层是一个总控的app,下层的app控制它们连接的agent。
为此,我定义了两个继承自application的类:SimpleApp和SimpleConnection。SimpleConnection就是底层控制agent的类,定义如下:

class SimpleConnection : public Application
{
public:
SimpleConnection();

//从agent接收报文,并进行处理。如果是控制报文,则按要求的数量发送报文。
//如果是ack报文,则向顶层的app报告。
//这个接口原来是Application没有的,为此要修改app.h,加上这个接口。
virtual void recv_msg(int nbytes, const char *msg = 0)end_ctrl(); R/> //发送控制报文,参数表示要求对方发送的报文数。
void send_ctrl(int);

//发送数据报文,每发送一个,需要发送的报文数减1,减到0时,向对方发送ack信息。
void send_data_pkt( );
//是否已经完成发送报文的任务
inline int done();

//设置指向上层app的指针
inline void App( SimpleApp *);
protected:
double next_send_time(); //计算发送下一个数据报文的时间
void send_ack(); //向对方发送ack信息
SimpleApp * app_; //指向上层app的指针
int done_; //是否已经完成任务
int tosend_; //要发送的报文数
SendTimer timer_; //一个计时器,用于发送报文的调度
int pktsize_; //数据报文的大小
double rate_; //连接速度,即每秒多少bit
};

 

SimpleApp是上层进行调度的类,是真正的应用,定义如下:

//=====================================================
// app: control multi connections
//=====================================================
class SimpleApp : public Application
{
public:
SimpleApp();

//检查是否所有的发送端都已经完成了任务,
//如果是,向他们发送新的控制报文。
void is_all_done();

protected:
void start(); //开始运转,置running_为真,并向所有的发送端发送控制报文
void stop(); //置running_为false

//把一个新的connection加入连接链表中
void add_connection(SimpleConnection *);

void send_ctrl(); //向所有发送端发送控制报文

//定义在tcl中能够调用的命令,这里实现了add-connection命令
virtual int command(int argc, const char*const* argv);
private:
vector cons_; //存放所有connection指针的链表
bool running_; //运行状态
};

  

另外,为了方便对agent进行控制,我们也定义了自己的agent。主要是重新实现了sendmsg和recv两个函数,方便我们对报文进行处理。
最初,我也想用原来的UdpAgent。却发现它的sendmsg和recv都是对报文中的AppData进行处理,让我没办法处理自己定义的消息头。
通过读ns-process.h中AppData的定义代码,发现AppData只有一个数据成员,就是数据类型,不可能含有报文头等信息。而实际上,报文头信息在Packet的数据成员bits_中。
“一怒之下”,我重写了自己的agent。

下面是我自己定义的报文头的定义:

//=============================================
// new packet header
//=============================================
struct hdr_simple
{
int type; //0-normal,1-ctrl,2-ack
int pkt_num; //the number of packets to send

static int offset_;
inline static int& offset() { return offset_; }
inline static hdr_simple* access(const Packet* p) {
return (hdr_simple*) p->access(offset_);
}
};

 

定义了自己的报文头,别忘了在packet.h和ns-packet.tcl中注册一下自己的报文头,当然,也不要忘了在.cc文件中定义一个linkage。具体怎么做,请参考《ns by example》吧,那讲的很详细。

2。重新编译ns。
上面的工作做完后,把代码文件放在一个目录中,然后改一下makefile。例如:我所有类的定义和实现都写在simple.h和simple.cc中,并且我把它们放在了apps目录下,我这样改makefile:

...
common/ivs.o \
common/messpass.o common/tp.o common/tpm.o apps/worm.o apps/simple.o \
tcp/tcp.o tcp/tcp-sink.o tcp/tcp-reno.o \
...

只有红色的部分是我加的,很简单吧。保存makefile,重新编译吧,如果没报错,就是编译成功了。

3。写tcl脚本。
其实,我不是在扩充完ns2之后才写的tcl脚本,而是之前写的。这样,我在写脚本的时候,我就知道我需要哪些功能,需要定义哪些tcl能够调用的命令了,相当于是个分析用户需求的部分。我的tcl代码如下:

 1 # by jiqing 2007-6-6 
 2 set ns [new Simulator] 
 3 #color 
 4 $ns color 1 Blue 
 5 $ns color 2 Red
 6 $ns color 3 Green
 7 
 8 #open a nam trace file 
 9 set nf [open out.nam w] 
10 $ns namtrace-all $nf 
11 
12 #open a trace file 
13 set tf [open out.tr w] 
14 $ns trace-all $tf
15 
16 #finish procedure
17 
18 proc finish {} {
19 global ns nf tf 
20 $ns flush-trace
21 close $nf
22 close $tf
23 exec ./nam out.nam & exit 0
24 } 
25 
26 #create nodes 
27 set node_(s1) [$ns node] 
28 set node_(s2) [$ns node] 
29 set node_(s3) [$ns node] 
30 set node_(r) [$ns node]
31 
32 #create links
33 $ns duplex-link $node_(s1) $node_(r) 1Mb 10ms DropTail 
34 $ns duplex-link $node_(s2) $node_(r) 1.5Mb 10ms DropTail 
35 $ns duplex-link $node_(s3) $node_(r) 1Mb 10ms DropTail
36 
37 #relayout 
38 $ns duplex-link-op $node_(s1) $node_(r) orient right-down 
39 $ns duplex-link-op $node_(s2) $node_(r) orient right 
40 $ns duplex-link-op $node_(s3) $node_(r) orient right-up 
41 
42 #add udp agents 
43 set udp_(s1) [new Agent/JiqingUDP] 
44 $ns attach-agent $node_(s1) $udp_(s1) 
45 set udp_(r1) [new Agent/JiqingUDP] 
46 $ns attach-agent $node_(r) $udp_(r1) 
47 $ns connect $udp_(s1) $udp_(r1) $udp_(s1) set fid_ 1 $udp_(r1) set fid_ 1 
48 set udp_(s2) [new Agent/JiqingUDP] 
49 $ns attach-agent $node_(s2) $udp_(s2) set udp_(r2) [new Agent/JiqingUDP] $ns attach-agent $node_(r) $udp_(r2) $ns connect $udp_(s2) $udp_(r2) $udp_(s2) set fid_ 2 $udp_(r2) set fid_ 2 set udp_(s3) [new Agent/JiqingUDP] $ns attach-agent $node_(s3) $udp_(s3) set udp_(r3) [new Agent/JiqingUDP] $ns attach-agent $node_(r) $udp_(r3) $ns connect $udp_(s3) $udp_(r3) $udp_(s3) set fid_ 3 $udp_(r3) set fid_ 3 #add simpleconnections set app_(s1) [new Application/SimpleCon] $app_(s1) attach-agent $udp_(s1) set app_(s2) [new Application/SimpleCon] $app_(s2) attach-agent $udp_(s2) set app_(s3) [new Application/SimpleCon] $app_(s3) attach-agent $udp_(s3) set app_(r1) [new Application/SimpleCon] $app_(r1) attach-agent $udp_(r1) set app_(r2) [new Application/SimpleCon] $app_(r2) attach-agent $udp_(r2) set app_(r3) [new Application/SimpleCon] $app_(r3) attach-agent $udp_(r3) set app_(global1) [new SIMPLE_APP] $app_(global1) add-connection $app_(s1) set app_(global2) [new SIMPLE_APP] $app_(global2) add-connection $app_(s2) set app_(global3) [new SIMPLE_APP] $app_(global3) add-connection $app_(s3) set app_(global4) [new SIMPLE_APP] $app_(global4) add-connection $app_(r1) $app_(global4) add-connection $app_(r2) $app_(global4) add-connection $app_(r3) 

#schedule...
$ns at 0.1 "$app_(global4) start"
$ns at 4.0 "$app_(global4) stop"
$ns at 4.5 "finish"
$ns run

 

这个脚本定义了三个发送端,一个接收端,每个peer上都运行了一个SimpleApp,而每个agent上都连接有一个SimpleConnection,然后通过add-connection把app和connection连接起来。 

 简单的多对一传输ns2仿真

4。仿真。
这一步没什么说的,./ns XXX.tcl就行了。

5。用awk处理数据。
这就看你想算什么了。我很无聊,只是想算每个时间各个发送端发送的报文数。

 BEGIN{
 sended1 = 0;
 sended2 = 0;
 sended3 = 0;
 i = 0;
}

{
 action = $1;
 time = $2;
 sender = $3;

 #you may use digital or character
 if(action=="r" &&( sender==0 ||sender==1 || sender==2) )
 {
  if(sender == 0)
   sended1++;
  else if( sender == 1)
   sended2++;
  else
   sended3++;

  #don't begin with digital
  _1send[i] = sended1;
  _2send[i] = sended2;
  _3send[i] = sended3;
  time_point[i] = time;

  i++;
 }
}

END{
 printf("%.2f\t%.2f\t%.2f\t%.2f\n",0,0,0,0);
 for(j=0;j
  printf("%.2f\t%.2f\t%.2f\t%.2f\n",time_point[j],_1send[j],_2send[j],_3send[j]);
 }
}

 

写好代码,保存为measure_pkts.awk。
在命令行下执行:
awk -f measure_pkts.awk > results.txt
就会把分析的结果写入results.txt。

6。用gnuplot画图。
最后,就是看见结果的时候了。进入gnuplot:
plot "results.txt" using 2, "results.txt" using 3, "results.txt" using 4
就可以看见结果了。
 

实验结果:

没什么好讲的了,目的已经达到。

参考文献:
1。Jae Chung,Mark Claypool. Ns by Example.
2。柯志亨博士的"增加和修改模块.htm"。
3。bittorrent仿真的源码。
4。ns2的源代码。

posted on 2014-10-22 13:56  JollyWing  阅读(1385)  评论(0编辑  收藏  举报