Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
ns3: further cleanups
[simgrid.git] / src / surf / network_ns3.cpp
1 /* Copyright (c) 2007-2015. The SimGrid Team.
2  * All rights reserved.                                                     */
3
4 /* This program is free software; you can redistribute it and/or modify it
5  * under the terms of the license (GNU LGPL) which comes with this package. */
6
7 #include "ns3/core-module.h"
8 #include "ns3/node.h"
9
10 #include "ns3/ns3_interface.h"
11 #include "ns3/ns3_simulator.h"
12 #include "src/surf/network_ns3.hpp"
13
14 #include "src/surf/HostImpl.hpp"
15 #include "src/surf/surf_private.h"
16 #include "simgrid/sg_config.h"
17 #include "src/instr/instr_private.h" // TRACE_is_enabled(). FIXME: remove by subscribing tracing to the surf signals
18
19 #include "simgrid/s4u/As.hpp"
20
21 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(ns3, surf, "Logging specific to the SURF network NS3 module");
22
23 int NS3_EXTENSION_ID;
24
25 xbt_dynar_t IPV4addr = xbt_dynar_new(sizeof(char*),free);
26 static double time_to_next_flow_completion = -1;
27
28 /*****************
29  * Crude globals *
30  *****************/
31
32 extern xbt_dict_t flowFromSock;
33
34 static ns3::InternetStackHelper stack;
35 static ns3::NodeContainer nodes;
36 static ns3::NodeContainer Cluster_nodes;
37 static ns3::Ipv4InterfaceContainer interfaces;
38
39 static int number_of_nodes = 0;
40 static int number_of_clusters_nodes = 0;
41 static int number_of_links = 1;
42 static int number_of_networks = 1;
43 static int port_number = 1025; //Port number is limited from 1025 to 65 000
44
45 static NS3Sim* ns3_sim = 0;
46
47
48 /*************
49  * Callbacks *
50  *************/
51
52 static void simgrid_ns3_add_host(simgrid::s4u::Host& host)
53 {
54   const char* id = host.name().c_str();
55   XBT_DEBUG("NS3_ADD_HOST '%s'", id);
56
57   ns3_node_t ns3host  = xbt_new0(s_ns3_node_t,1);
58   ns3::Ptr<ns3::Node> node =  ns3::CreateObject<ns3::Node> (0);
59   stack.Install(node);
60   nodes.Add(node);
61   ns3host->node_num = number_of_nodes;
62   ns3host->type = NS3_NETWORK_ELEMENT_HOST;
63   number_of_nodes++;
64
65   host.extension_set(NS3_EXTENSION_ID, ns3host);
66 }
67
68 static void parse_ns3_add_link(sg_platf_link_cbarg_t link)
69 {
70   XBT_DEBUG("NS3_ADD_LINK '%s'",link->id);
71
72   Link *l = surf_network_model->createLink(link->id, link->bandwidth, link->latency, link->policy, link->properties);
73   if (link->bandwidth_trace)
74     l->setBandwidthTrace(link->latency_trace);
75   if (link->latency_trace)
76     l->setLatencyTrace(link->latency_trace);
77   if (link->state_trace)
78     l->setStateTrace(link->state_trace);
79 }
80 static void simgrid_ns3_add_router(simgrid::surf::NetCard* router)
81 {
82   const char* router_id = router->name();
83   XBT_DEBUG("NS3_ADD_ROUTER '%s'",router_id);
84   xbt_lib_set(as_router_lib,
85               router_id,
86               NS3_ASR_LEVEL,
87               ns3_add_router(router_id)
88     );
89 }
90
91 static void parse_ns3_add_AS(simgrid::s4u::As* as)
92 {
93   const char* as_id = as->name();
94   XBT_DEBUG("NS3_ADD_AS '%s'", as_id);
95   xbt_lib_set(as_router_lib, as_id, NS3_ASR_LEVEL, ns3_add_AS(as_id) );
96 }
97
98 #include "src/surf/xml/platf.hpp" // FIXME: move that back to the parsing area
99 static void parse_ns3_add_cluster(sg_platf_cluster_cbarg_t cluster)
100 {
101   const char *groups = NULL;
102
103   int start, end, i;
104   unsigned int iter;
105
106   xbt_dynar_t radical_elements;
107   xbt_dynar_t radical_ends;
108   xbt_dynar_t tab_elements_num = xbt_dynar_new(sizeof(int), NULL);
109
110   char *router_id,*host_id;
111
112   radical_elements = xbt_str_split(cluster->radical, ",");
113   xbt_dynar_foreach(radical_elements, iter, groups) {
114     radical_ends = xbt_str_split(groups, "-");
115
116     switch (xbt_dynar_length(radical_ends)) {
117     case 1:
118       start = surf_parse_get_int(xbt_dynar_get_as(radical_ends, 0, char *));
119       xbt_dynar_push_as(tab_elements_num, int, start);
120       router_id = bprintf("ns3_%s%d%s", cluster->prefix, start, cluster->suffix);
121       simgrid::s4u::Host::by_name_or_create(router_id)
122         ->extension_set(NS3_EXTENSION_ID, ns3_add_host_cluster(router_id));
123       XBT_DEBUG("NS3_ADD_ROUTER '%s'",router_id);
124       free(router_id);
125       break;
126
127     case 2:
128       start = surf_parse_get_int(xbt_dynar_get_as(radical_ends, 0, char *));
129       end = surf_parse_get_int(xbt_dynar_get_as(radical_ends, 1, char *));
130       for (i = start; i <= end; i++){
131         xbt_dynar_push_as(tab_elements_num, int, i);
132         router_id = bprintf("ns3_%s%d%s", cluster->prefix, i, cluster->suffix);
133         simgrid::s4u::Host::by_name_or_create(router_id)
134           ->extension_set(NS3_EXTENSION_ID, ns3_add_host_cluster(router_id));
135         XBT_DEBUG("NS3_ADD_ROUTER '%s'",router_id);
136         free(router_id);
137       }
138       break;
139
140     default:
141       XBT_DEBUG("Malformed radical");
142     }
143   }
144
145   //Create links
146   unsigned int cpt;
147   int elmts;
148   char * lat = bprintf("%fs", cluster->lat);
149   char * bw =  bprintf("%fBps", cluster->bw);
150
151   xbt_dynar_foreach(tab_elements_num,cpt,elmts)
152   {
153     host_id   = bprintf("%s%d%s", cluster->prefix, elmts, cluster->suffix);
154     router_id = bprintf("ns3_%s%d%s", cluster->prefix, elmts, cluster->suffix);
155     XBT_DEBUG("Create link from '%s' to '%s'",host_id,router_id);
156
157     ns3_node_t host_src = ns3_find_host(host_id);
158     ns3_node_t host_dst = ns3_find_host(router_id);
159
160     if(host_src && host_dst){}
161     else xbt_die("\tns3_add_link from %d to %d",host_src->node_num,host_dst->node_num);
162
163     ns3_add_link(host_src->node_num,host_src->type,
164                  host_dst->node_num,host_dst->type,
165                  bw,lat);
166
167     free(router_id);
168     free(host_id);
169   }
170   xbt_free(lat);
171   xbt_free(bw);
172   xbt_dynar_free(&tab_elements_num);
173
174
175   //Create link backbone
176   lat = bprintf("%fs", cluster->bb_lat);
177   bw =  bprintf("%fBps", cluster->bb_bw);
178   ns3_add_cluster(bw,lat,cluster->id);
179   xbt_free(lat);
180   xbt_free(bw);
181 }
182
183 /* Create the ns3 topology based on routing strategy */
184 static void create_ns3_topology(void)
185 {
186   XBT_DEBUG("Starting topology generation");
187
188   xbt_dynar_shrink(IPV4addr,0);
189
190   //get the onelinks from the parsed platform
191   xbt_dynar_t onelink_routes = routing_platf->getOneLinkRoutes();
192   if (!onelink_routes)
193     xbt_die("There is no routes!");
194   XBT_DEBUG("Have get_onelink_routes, found %ld routes",onelink_routes->used);
195   //save them in trace file
196   simgrid::surf::Onelink *onelink;
197   unsigned int iter;
198   xbt_dynar_foreach(onelink_routes, iter, onelink) {
199     char *src = onelink->src_->name();
200     char *dst = onelink->dst_->name();
201     simgrid::surf::LinkNS3 *link =
202       static_cast<simgrid::surf::LinkNS3 *>(onelink->link_);
203
204     if (strcmp(src,dst) && link->m_created){
205       XBT_DEBUG("Route from '%s' to '%s' with link '%s'", src, dst, link->getName());
206       char * link_bdw = bprintf("%fBps", link->getBandwidth());
207       char * link_lat = bprintf("%fs", link->getLatency());
208       link->m_created = 0;
209
210       //   XBT_DEBUG("src (%s), dst (%s), src_id = %d, dst_id = %d",src,dst, src_id, dst_id);
211       XBT_DEBUG("\tLink (%s) bdw:%s lat:%s", link->getName(), link_bdw, link_lat);
212
213       //create link ns3
214       ns3_node_t host_src = ns3_find_host(src);
215       if (!host_src)
216         host_src = static_cast<ns3_node_t>(xbt_lib_get_or_null(as_router_lib,src,NS3_ASR_LEVEL));
217       ns3_node_t host_dst = ns3_find_host(dst);
218       if(!host_dst)
219         host_dst = static_cast<ns3_node_t>(xbt_lib_get_or_null(as_router_lib,dst,NS3_ASR_LEVEL));
220
221       if (!host_src || !host_dst)
222           xbt_die("\tns3_add_link from %d to %d",host_src->node_num,host_dst->node_num);
223
224       ns3_add_link(host_src->node_num,host_src->type,host_dst->node_num,host_dst->type,link_bdw,link_lat);
225
226       xbt_free(link_bdw);
227       xbt_free(link_lat);
228     }
229   }
230 }
231
232 static void parse_ns3_end_platform(void)
233 {
234   ns3_end_platform();
235 }
236
237 static void define_callbacks_ns3(void)
238 {
239   simgrid::s4u::Host::onCreation.connect(simgrid_ns3_add_host);
240   simgrid::surf::netcardCreatedCallbacks.connect(simgrid_ns3_add_router);
241   simgrid::surf::on_link.connect (parse_ns3_add_link);
242   simgrid::surf::on_cluster.connect (&parse_ns3_add_cluster);
243   simgrid::surf::asCreatedCallbacks.connect(parse_ns3_add_AS);
244   simgrid::surf::on_postparse.connect(&create_ns3_topology); //get_one_link_routes
245   simgrid::surf::on_postparse.connect(&parse_ns3_end_platform); //InitializeRoutes
246 }
247
248 /*********
249  * Model *
250  *********/
251 static void free_ns3_link(void * elmts)
252 {
253   delete static_cast<simgrid::surf::LinkNS3*>(elmts);
254 }
255
256 static void free_ns3_host(void * elmts)
257 {
258   ns3_node_t host = static_cast<ns3_node_t>(elmts);
259   free(host);
260 }
261
262 void surf_network_model_init_NS3()
263 {
264   if (surf_network_model)
265     return;
266
267   surf_network_model = new simgrid::surf::NetworkNS3Model();
268
269   xbt_dynar_push(all_existing_models, &surf_network_model);
270 }
271
272 namespace simgrid {
273 namespace surf {
274
275 NetworkNS3Model::NetworkNS3Model() : NetworkModel() {
276   if (ns3_initialize(xbt_cfg_get_string(_sg_cfg_set, "ns3/TcpModel"))) {
277     xbt_die("Impossible to initialize NS3 interface");
278   }
279   routing_model_create(NULL);
280   define_callbacks_ns3();
281
282   NS3_EXTENSION_ID = simgrid::s4u::Host::extension_create(free_ns3_host);
283   NS3_ASR_LEVEL  = xbt_lib_add_level(as_router_lib, free_ns3_host);
284 }
285
286 NetworkNS3Model::~NetworkNS3Model() {
287   delete ns3_sim;
288   xbt_dynar_free_container(&IPV4addr);
289   xbt_dict_free(&flowFromSock);
290 }
291
292 Link* NetworkNS3Model::createLink(const char *name, double bandwidth, double latency, e_surf_link_sharing_policy_t policy,
293     xbt_dict_t properties){
294
295   return new LinkNS3(this, name, properties, bandwidth, latency);
296 }
297
298 Action *NetworkNS3Model::communicate(NetCard *src, NetCard *dst, double size, double rate)
299 {
300   XBT_DEBUG("Communicate from %s to %s", src->name(), dst->name());
301   NetworkNS3Action *action = new NetworkNS3Action(this, size, 0);
302
303   ns3_create_flow(src->name(), dst->name(), surf_get_clock(), size, action);
304
305   action->m_lastSent = 0;
306   action->p_srcElm = src;
307   action->p_dstElm = dst;
308   networkCommunicateCallbacks(action, src, dst, size, rate);
309
310   return (surf_action_t) action;
311 }
312
313 double NetworkNS3Model::next_occuring_event(double now)
314 {
315   XBT_DEBUG("ns3_next_occuring_event");
316
317   //get the first relevant value from the running_actions list
318   if (!getRunningActionSet()->size() || now == 0.0)
319     return -1.0;
320   else
321     do {
322       ns3_simulator(now);
323       time_to_next_flow_completion = ns3::Simulator::Now().GetSeconds() - surf_get_clock();//FIXME: use now instead ?
324     } while(double_equals(time_to_next_flow_completion, 0, sg_surf_precision));
325
326   XBT_DEBUG("min       : %f", now);
327   XBT_DEBUG("ns3  time : %f", ns3::Simulator::Now().GetSeconds());
328   XBT_DEBUG("surf time : %f", surf_get_clock());
329   XBT_DEBUG("Next completion %f :", time_to_next_flow_completion);
330
331   return time_to_next_flow_completion;
332 }
333
334 void NetworkNS3Model::updateActionsState(double now, double delta)
335 {
336   xbt_dict_cursor_t cursor = NULL;
337   char *key;
338   void *data;
339
340   static xbt_dynar_t socket_to_destroy = NULL;
341   if(!socket_to_destroy) socket_to_destroy = xbt_dynar_new(sizeof(char*),NULL);
342
343   /* If there are no running flows, just return */
344   if (!getRunningActionSet()->size()) {
345     while(double_positive(now-ns3::Simulator::Now().GetSeconds(), sg_surf_precision)) {
346       ns3_simulator(now-ns3::Simulator::Now().GetSeconds());
347     }
348     return;
349   }
350
351   NetworkNS3Action *action;
352   xbt_dict_foreach(flowFromSock,cursor,key,data){
353     action = static_cast<NetworkNS3Action*>(ns3_get_socket_action(data));
354     XBT_DEBUG("Processing socket %p (action %p)",data,action);
355     action->setRemains(action->getCost() - ns3_get_socket_sent(data));
356
357     if (TRACE_is_enabled() &&
358         action->getState() == Action::State::running){
359       double data_sent = ns3_get_socket_sent(data);
360       double data_delta_sent = data_sent - action->m_lastSent;
361
362       std::vector<Link*> *route = new std::vector<Link*>();
363
364       routing_platf->getRouteAndLatency (action->p_srcElm, action->p_dstElm, route, NULL);
365       for (auto link : *route)
366         TRACE_surf_link_set_utilization (link->getName(), action->getCategory(), (data_delta_sent)/delta, now-delta, delta);
367       delete route;
368
369       action->m_lastSent = data_sent;
370     }
371
372     if(ns3_get_socket_is_finished(data) == 1){
373       xbt_dynar_push(socket_to_destroy,&key);
374       XBT_DEBUG("Destroy socket %p of action %p", key, action);
375       action->finish();
376       action->setState(Action::State::done);
377     }
378   }
379
380   while (!xbt_dynar_is_empty(socket_to_destroy)){
381     xbt_dynar_pop(socket_to_destroy,&key);
382
383     void *data = xbt_dict_get (flowFromSock, key);
384     action = static_cast<NetworkNS3Action*>(ns3_get_socket_action(data));
385     XBT_DEBUG ("Removing socket %p of action %p", key, action);
386     xbt_dict_remove(flowFromSock, key);
387   }
388   return;
389 }
390
391 /************
392  * Resource *
393  ************/
394
395 LinkNS3::LinkNS3(NetworkNS3Model *model, const char *name, xbt_dict_t props, double bandwidth, double latency)
396  : Link(model, name, props)
397  , m_created(1)
398 {
399   m_bandwidth.peak = bandwidth;
400   m_latency.peak = latency;
401
402   Link::onCreation(this);
403 }
404
405 LinkNS3::~LinkNS3()
406 {
407 }
408
409 void LinkNS3::apply_event(tmgr_trace_iterator_t event, double value)
410 {
411   THROW_UNIMPLEMENTED;
412 }
413 void LinkNS3::setBandwidthTrace(tmgr_trace_t trace) {
414   xbt_die("The NS3 network model doesn't support latency state traces");
415 }
416 void LinkNS3::setLatencyTrace(tmgr_trace_t trace) {
417   xbt_die("The NS3 network model doesn't support latency state traces");
418 }
419
420 /**********
421  * Action *
422  **********/
423
424 NetworkNS3Action::NetworkNS3Action(Model *model, double cost, bool failed)
425 : NetworkAction(model, cost, failed)
426 {}
427
428 void NetworkNS3Action::suspend()
429 {
430   THROW_UNIMPLEMENTED;
431 }
432
433 void NetworkNS3Action::resume()
434 {
435   THROW_UNIMPLEMENTED;
436 }
437
438   /* Test whether a flow is suspended */
439 bool NetworkNS3Action::isSuspended()
440 {
441   return 0;
442 }
443
444 int NetworkNS3Action::unref()
445 {
446   m_refcount--;
447   if (!m_refcount) {
448   if (action_hook.is_linked())
449     p_stateSet->erase(p_stateSet->iterator_to(*this));
450     XBT_DEBUG ("Removing action %p", this);
451   delete this;
452     return 1;
453   }
454   return 0;
455 }
456
457 }
458 }
459
460
461
462
463
464 void ns3_simulator(double min){
465   ns3_sim->simulator_start(min);
466 }
467
468 simgrid::surf::NetworkNS3Action* ns3_get_socket_action(void *socket){
469   return ((SgFlow *)socket)->action_;
470 }
471
472 double ns3_get_socket_remains(void *socket){
473   return ((SgFlow *)socket)->remaining_;
474 }
475
476 double ns3_get_socket_sent(void *socket){
477   return ((SgFlow *)socket)->sentBytes_;
478 }
479
480 bool ns3_get_socket_is_finished(void *socket){
481   return ((SgFlow *)socket)->finished_;
482 }
483
484 int ns3_create_flow(const char* a,const char *b,double start,u_int32_t TotalBytes,simgrid::surf::NetworkNS3Action * action)
485 {
486   ns3_node_t node1 = ns3_find_host(a);
487   ns3_node_t node2 = ns3_find_host(b);
488
489   ns3::Ptr<ns3::Node> src_node = nodes.Get(node1->node_num);
490   ns3::Ptr<ns3::Node> dst_node = nodes.Get(node2->node_num);
491
492   char* addr = (char*)xbt_dynar_get_as(IPV4addr,node2->node_num,char*);
493
494   XBT_DEBUG("ns3_create_flow %d Bytes from %d to %d with Interface %s",TotalBytes, node1->node_num, node2->node_num,addr);
495   ns3_sim->create_flow_NS3(src_node, dst_node, port_number,
496       start,
497       addr,
498       TotalBytes,
499       action);
500
501   port_number++;
502   if(port_number >= 65001 ) xbt_die("Too many connections! Port number is saturated.");
503   return 0;
504 }
505
506 // initialize the NS3 interface and environment
507 int ns3_initialize(const char* TcpProtocol){
508   xbt_assert(!ns3_sim, "ns3 already initialized");
509   ns3_sim = new NS3Sim();
510
511 //  tcpModel are:
512 //  "ns3::TcpNewReno"
513 //  "ns3::TcpReno"
514 //  "ns3::TcpTahoe"
515
516   ns3::Config::SetDefault ("ns3::TcpSocket::SegmentSize", ns3::UintegerValue (1024)); // 1024-byte packet for easier reading
517   ns3::Config::SetDefault ("ns3::TcpSocket::DelAckCount", ns3::UintegerValue (1));
518
519   if(!strcmp(TcpProtocol,"default")){
520     return 0;
521   }
522   if(!strcmp(TcpProtocol,"Reno")){
523     XBT_INFO("Switching Tcp protocol to '%s'",TcpProtocol);
524     ns3::Config::SetDefault ("ns3::TcpL4Protocol::SocketType", ns3::StringValue("ns3::TcpReno"));
525     return 0;
526   }
527   if(!strcmp(TcpProtocol,"NewReno")){
528     XBT_INFO("Switching Tcp protocol to '%s'",TcpProtocol);
529     ns3::Config::SetDefault ("ns3::TcpL4Protocol::SocketType", ns3::StringValue("ns3::TcpNewReno"));
530     return 0;
531   }
532   if(!strcmp(TcpProtocol,"Tahoe")){
533     XBT_INFO("Switching Tcp protocol to '%s'",TcpProtocol);
534     ns3::Config::SetDefault ("ns3::TcpL4Protocol::SocketType", ns3::StringValue("ns3::TcpTahoe"));
535     return 0;
536   }
537
538   XBT_ERROR("The ns3/TcpModel must be : NewReno or Reno or Tahoe");
539   return 0;
540 }
541
542 void * ns3_add_host_cluster(const char * id)
543 {
544   ns3_node_t host  = xbt_new0(s_ns3_node_t,1);
545   XBT_DEBUG("Interface ns3 add host[%d] '%s'",number_of_nodes,id);
546   ns3::Ptr<ns3::Node> node =  ns3::CreateObject<ns3::Node> (0);
547   stack.Install(node);
548   Cluster_nodes.Add(node);
549   nodes.Add(node);
550   host->node_num = number_of_nodes;
551   host->type = NS3_NETWORK_ELEMENT_HOST;
552   number_of_nodes++;
553   return host;
554 }
555
556 void * ns3_add_router(const char * id)
557 {
558   ns3_node_t router  = xbt_new0(s_ns3_node_t,1);
559   XBT_DEBUG("Interface ns3 add router[%d] '%s'",number_of_nodes,id);
560   ns3::Ptr<ns3::Node> node =  ns3::CreateObject<ns3::Node> (0);
561   stack.Install(node);
562   nodes.Add(node);
563   router->node_num = number_of_nodes;
564   router->type = NS3_NETWORK_ELEMENT_ROUTER;
565   number_of_nodes++;
566   return router;
567 }
568
569 void ns3_add_cluster(char * bw,char * lat,const char *id)
570 {
571
572   XBT_DEBUG("cluster_id: %s",id);
573   XBT_DEBUG("bw: %s lat: %s",bw,lat);
574   XBT_DEBUG("Number of %s nodes: %d",id,Cluster_nodes.GetN() - number_of_clusters_nodes);
575
576   ns3::NodeContainer Nodes;
577
578   for(unsigned int i = number_of_clusters_nodes; i < Cluster_nodes.GetN() ; i++){
579     Nodes.Add(Cluster_nodes.Get(i));
580     XBT_DEBUG("Add node %d to cluster",i);
581   }
582   number_of_clusters_nodes = Cluster_nodes.GetN();
583
584   XBT_DEBUG("Add router %d to cluster",nodes.GetN()-Nodes.GetN()-1);
585   Nodes.Add(nodes.Get(nodes.GetN()-Nodes.GetN()-1));
586
587   if(Nodes.GetN() > 65000)
588     xbt_die("Cluster with NS3 is limited to 65000 nodes");
589   ns3::CsmaHelper csma;
590   csma.SetChannelAttribute ("DataRate", ns3::StringValue (bw));
591   csma.SetChannelAttribute ("Delay", ns3::StringValue (lat));
592   ns3::NetDeviceContainer devices = csma.Install (Nodes);
593   XBT_DEBUG("Create CSMA");
594
595   char * adr = bprintf("%d.%d.0.0",number_of_networks,number_of_links);
596   XBT_DEBUG("Assign IP Addresses %s to CSMA.",adr);
597   ns3::Ipv4AddressHelper ipv4;
598   ipv4.SetBase (adr, "255.255.0.0");
599   free(adr);
600   interfaces.Add(ipv4.Assign (devices));
601
602   if(number_of_links == 255){
603     if(number_of_networks == 255)
604       xbt_die("Number of links and networks exceed 255*255");
605     number_of_links = 1;
606     number_of_networks++;
607   }else{
608     number_of_links++;
609   }
610   XBT_DEBUG("Number of nodes in Cluster_nodes: %d",Cluster_nodes.GetN());
611 }
612
613 void * ns3_add_AS(const char * id)
614 {
615   XBT_DEBUG("Interface ns3 add AS '%s'",id);
616   return NULL;
617 }
618
619 static char* transformIpv4Address (ns3::Ipv4Address from){
620   std::stringstream sstream;
621     sstream << from ;
622     std::string s = sstream.str();
623     return bprintf("%s",s.c_str());
624 }
625
626 void ns3_add_link(int src, e_ns3_network_element_type_t type_src,
627           int dst, e_ns3_network_element_type_t type_dst,
628           char *bw, char *lat)
629 {
630   if(number_of_links == 1 ) {
631     LogComponentEnable("UdpEchoClientApplication", ns3::LOG_LEVEL_INFO);
632     LogComponentEnable("UdpEchoServerApplication", ns3::LOG_LEVEL_INFO);
633   }
634
635   ns3::MyPointToPointHelper pointToPoint;
636
637   ns3::NetDeviceContainer netA;
638   ns3::Ipv4AddressHelper address;
639
640   ns3::Ptr<ns3::Node> a = nodes.Get(src);
641   ns3::Ptr<ns3::Node> b = nodes.Get(dst);
642
643   XBT_DEBUG("\tAdd PTP from %d to %d bw:'%s' lat:'%s'",src,dst,bw,lat);
644   pointToPoint.SetDeviceAttribute ("DataRate", ns3::StringValue (bw));
645   pointToPoint.SetChannelAttribute ("Delay", ns3::StringValue (lat));
646   //pointToPoint.EnablePcapAll("test_ns3_trace"); //DEBUG
647
648   netA.Add(pointToPoint.Install (a, type_src, b, type_dst));
649
650   char * adr = bprintf("%d.%d.0.0",number_of_networks,number_of_links);
651   address.SetBase (adr, "255.255.0.0");
652   XBT_DEBUG("\tInterface stack '%s'",adr);
653   free(adr);
654   interfaces.Add(address.Assign (netA));
655
656   char *tmp = transformIpv4Address(interfaces.GetAddress(interfaces.GetN()-2));
657   xbt_dynar_set_as(IPV4addr,src,char*,tmp);
658   XBT_DEBUG("Have write '%s' for Node '%d'",(char*)xbt_dynar_get_as(IPV4addr,src,char*),src);
659
660   tmp = transformIpv4Address(interfaces.GetAddress(interfaces.GetN()-1));
661   xbt_dynar_set_as(IPV4addr,dst,char*,tmp);
662   XBT_DEBUG("Have write '%s' for Node '%d'",(char*)xbt_dynar_get_as(IPV4addr,dst,char*),dst);
663
664   if(number_of_links == 255){
665     if(number_of_networks == 255)
666       xbt_die("Number of links and networks exceed 255*255");
667     number_of_links = 1;
668     number_of_networks++;
669   }else{
670     number_of_links++;
671   }
672 }
673
674 void ns3_end_platform(void)
675 {
676   XBT_DEBUG("InitializeRoutes");
677   ns3::GlobalRouteManager::BuildGlobalRoutingDatabase();
678   ns3::GlobalRouteManager::InitializeRoutes();
679 }