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   static xbt_dynar_t socket_to_destroy = xbt_dynar_new(sizeof(char*),NULL);
 337
 338   /* If there are no running flows, advance the NS3 simulator and return */
 339   if (getRunningActionSet()->empty()) {
 340
 341     while(double_positive(now - ns3::Simulator::Now().GetSeconds(), sg_surf_precision))
 342       ns3_simulator(now-ns3::Simulator::Now().GetSeconds());
 343
 344     return;
 345   }
 346
 347   xbt_dict_cursor_t cursor = NULL;
 348   char *ns3Socket;
 349   SgFlow *sgFlow;
 350   xbt_dict_foreach(flowFromSock,cursor,ns3Socket,sgFlow){
 351     NetworkNS3Action * action = sgFlow->action_;
 352     XBT_DEBUG("Processing socket %p (action %p)",sgFlow,action);
 353     action->setRemains(action->getCost() - sgFlow->sentBytes_);
 354
 355     if (TRACE_is_enabled() &&
 356         action->getState() == Action::State::running){
 357       double data_delta_sent = sgFlow->sentBytes_ - action->m_lastSent;
 358
 359       std::vector<Link*> *route = new std::vector<Link*>();
 360
 361       routing_platf->getRouteAndLatency (action->p_srcElm, action->p_dstElm, route, NULL);
 362       for (auto link : *route)
 363         TRACE_surf_link_set_utilization (link->getName(), action->getCategory(), (data_delta_sent)/delta, now-delta, delta);
 364       delete route;
 365
 366       action->m_lastSent = sgFlow->sentBytes_;
 367     }
 368
 369     if(sgFlow->finished_){
 370       xbt_dynar_push(socket_to_destroy,&ns3Socket);
 371       XBT_DEBUG("Destroy socket %p of action %p", ns3Socket, action);
 372       action->finish();
 373       action->setState(Action::State::done);
 374     }
 375   }
 376
 377   while (!xbt_dynar_is_empty(socket_to_destroy)){
 378     xbt_dynar_pop(socket_to_destroy,&ns3Socket);
 379
 380     if (XBT_LOG_ISENABLED(ns3, xbt_log_priority_debug)) {
 381       SgFlow *flow = (SgFlow*)xbt_dict_get (flowFromSock, ns3Socket);
 382       XBT_DEBUG ("Removing socket %p of action %p", ns3Socket, flow->action_);
 383     }
 384     xbt_dict_remove(flowFromSock, ns3Socket);
 385   }
 386   return;
 387 }
 388
 389 /************
 390  * Resource *
 391  ************/
 392
 393 LinkNS3::LinkNS3(NetworkNS3Model *model, const char *name, xbt_dict_t props, double bandwidth, double latency)
 394  : Link(model, name, props)
 395  , m_created(1)
 396 {
 397   m_bandwidth.peak = bandwidth;
 398   m_latency.peak = latency;
 399
 400   Link::onCreation(this);
 401 }
 402
 403 LinkNS3::~LinkNS3()
 404 {
 405 }
 406
 407 void LinkNS3::apply_event(tmgr_trace_iterator_t event, double value)
 408 {
 409   THROW_UNIMPLEMENTED;
 410 }
 411 void LinkNS3::setBandwidthTrace(tmgr_trace_t trace) {
 412   xbt_die("The NS3 network model doesn't support latency state traces");
 413 }
 414 void LinkNS3::setLatencyTrace(tmgr_trace_t trace) {
 415   xbt_die("The NS3 network model doesn't support latency state traces");
 416 }
 417
 418 /**********
 419  * Action *
 420  **********/
 421
 422 NetworkNS3Action::NetworkNS3Action(Model *model, double cost, bool failed)
 423 : NetworkAction(model, cost, failed)
 424 {}
 425
 426 void NetworkNS3Action::suspend()
 427 {
 428   THROW_UNIMPLEMENTED;
 429 }
 430
 431 void NetworkNS3Action::resume()
 432 {
 433   THROW_UNIMPLEMENTED;
 434 }
 435
 436   /* Test whether a flow is suspended */
 437 bool NetworkNS3Action::isSuspended()
 438 {
 439   return 0;
 440 }
 441
 442 int NetworkNS3Action::unref()
 443 {
 444   m_refcount--;
 445   if (!m_refcount) {
 446   if (action_hook.is_linked())
 447     p_stateSet->erase(p_stateSet->iterator_to(*this));
 448     XBT_DEBUG ("Removing action %p", this);
 449   delete this;
 450     return 1;
 451   }
 452   return 0;
 453 }
 454
 455 }
 456 }
 457
 458
 459
 460
 461
 462 void ns3_simulator(double min){
 463   ns3_sim->simulator_start(min);
 464 }
 465
 466 int ns3_create_flow(const char* a,const char *b,double start,u_int32_t TotalBytes,simgrid::surf::NetworkNS3Action * action)
 467 {
 468   ns3_node_t node1 = ns3_find_host(a);
 469   ns3_node_t node2 = ns3_find_host(b);
 470
 471   ns3::Ptr<ns3::Node> src_node = nodes.Get(node1->node_num);
 472   ns3::Ptr<ns3::Node> dst_node = nodes.Get(node2->node_num);
 473
 474   char* addr = (char*)xbt_dynar_get_as(IPV4addr,node2->node_num,char*);
 475
 476   XBT_DEBUG("ns3_create_flow %d Bytes from %d to %d with Interface %s",TotalBytes, node1->node_num, node2->node_num,addr);
 477   ns3_sim->create_flow_NS3(src_node, dst_node, port_number,
 478       start,
 479       addr,
 480       TotalBytes,
 481       action);
 482
 483   port_number++;
 484   if(port_number >= 65001 ) xbt_die("Too many connections! Port number is saturated.");
 485   return 0;
 486 }
 487
 488 // initialize the NS3 interface and environment
 489 int ns3_initialize(const char* TcpProtocol){
 490   xbt_assert(!ns3_sim, "ns3 already initialized");
 491   ns3_sim = new NS3Sim();
 492
 493 //  tcpModel are:
 494 //  "ns3::TcpNewReno"
 495 //  "ns3::TcpReno"
 496 //  "ns3::TcpTahoe"
 497
 498   ns3::Config::SetDefault ("ns3::TcpSocket::SegmentSize", ns3::UintegerValue (1024)); // 1024-byte packet for easier reading
 499   ns3::Config::SetDefault ("ns3::TcpSocket::DelAckCount", ns3::UintegerValue (1));
 500
 501   if(!strcmp(TcpProtocol,"default")){
 502     return 0;
 503   }
 504   if(!strcmp(TcpProtocol,"Reno")){
 505     XBT_INFO("Switching Tcp protocol to '%s'",TcpProtocol);
 506     ns3::Config::SetDefault ("ns3::TcpL4Protocol::SocketType", ns3::StringValue("ns3::TcpReno"));
 507     return 0;
 508   }
 509   if(!strcmp(TcpProtocol,"NewReno")){
 510     XBT_INFO("Switching Tcp protocol to '%s'",TcpProtocol);
 511     ns3::Config::SetDefault ("ns3::TcpL4Protocol::SocketType", ns3::StringValue("ns3::TcpNewReno"));
 512     return 0;
 513   }
 514   if(!strcmp(TcpProtocol,"Tahoe")){
 515     XBT_INFO("Switching Tcp protocol to '%s'",TcpProtocol);
 516     ns3::Config::SetDefault ("ns3::TcpL4Protocol::SocketType", ns3::StringValue("ns3::TcpTahoe"));
 517     return 0;
 518   }
 519
 520   XBT_ERROR("The ns3/TcpModel must be : NewReno or Reno or Tahoe");
 521   return 0;
 522 }
 523
 524 void * ns3_add_host_cluster(const char * id)
 525 {
 526   ns3_node_t host  = xbt_new0(s_ns3_node_t,1);
 527   XBT_DEBUG("Interface ns3 add host[%d] '%s'",number_of_nodes,id);
 528   ns3::Ptr<ns3::Node> node =  ns3::CreateObject<ns3::Node> (0);
 529   stack.Install(node);
 530   Cluster_nodes.Add(node);
 531   nodes.Add(node);
 532   host->node_num = number_of_nodes;
 533   host->type = NS3_NETWORK_ELEMENT_HOST;
 534   number_of_nodes++;
 535   return host;
 536 }
 537
 538 void * ns3_add_router(const char * id)
 539 {
 540   ns3_node_t router  = xbt_new0(s_ns3_node_t,1);
 541   XBT_DEBUG("Interface ns3 add router[%d] '%s'",number_of_nodes,id);
 542   ns3::Ptr<ns3::Node> node =  ns3::CreateObject<ns3::Node> (0);
 543   stack.Install(node);
 544   nodes.Add(node);
 545   router->node_num = number_of_nodes;
 546   router->type = NS3_NETWORK_ELEMENT_ROUTER;
 547   number_of_nodes++;
 548   return router;
 549 }
 550
 551 void ns3_add_cluster(char * bw,char * lat,const char *id)
 552 {
 553
 554   XBT_DEBUG("cluster_id: %s",id);
 555   XBT_DEBUG("bw: %s lat: %s",bw,lat);
 556   XBT_DEBUG("Number of %s nodes: %d",id,Cluster_nodes.GetN() - number_of_clusters_nodes);
 557
 558   ns3::NodeContainer Nodes;
 559
 560   for(unsigned int i = number_of_clusters_nodes; i < Cluster_nodes.GetN() ; i++){
 561     Nodes.Add(Cluster_nodes.Get(i));
 562     XBT_DEBUG("Add node %d to cluster",i);
 563   }
 564   number_of_clusters_nodes = Cluster_nodes.GetN();
 565
 566   XBT_DEBUG("Add router %d to cluster",nodes.GetN()-Nodes.GetN()-1);
 567   Nodes.Add(nodes.Get(nodes.GetN()-Nodes.GetN()-1));
 568
 569   if(Nodes.GetN() > 65000)
 570     xbt_die("Cluster with NS3 is limited to 65000 nodes");
 571   ns3::CsmaHelper csma;
 572   csma.SetChannelAttribute ("DataRate", ns3::StringValue (bw));
 573   csma.SetChannelAttribute ("Delay", ns3::StringValue (lat));
 574   ns3::NetDeviceContainer devices = csma.Install (Nodes);
 575   XBT_DEBUG("Create CSMA");
 576
 577   char * adr = bprintf("%d.%d.0.0",number_of_networks,number_of_links);
 578   XBT_DEBUG("Assign IP Addresses %s to CSMA.",adr);
 579   ns3::Ipv4AddressHelper ipv4;
 580   ipv4.SetBase (adr, "255.255.0.0");
 581   free(adr);
 582   interfaces.Add(ipv4.Assign (devices));
 583
 584   if(number_of_links == 255){
 585     if(number_of_networks == 255)
 586       xbt_die("Number of links and networks exceed 255*255");
 587     number_of_links = 1;
 588     number_of_networks++;
 589   }else{
 590     number_of_links++;
 591   }
 592   XBT_DEBUG("Number of nodes in Cluster_nodes: %d",Cluster_nodes.GetN());
 593 }
 594
 595 void * ns3_add_AS(const char * id)
 596 {
 597   XBT_DEBUG("Interface ns3 add AS '%s'",id);
 598   return NULL;
 599 }
 600
 601 static char* transformIpv4Address (ns3::Ipv4Address from){
 602   std::stringstream sstream;
 603     sstream << from ;
 604     std::string s = sstream.str();
 605     return bprintf("%s",s.c_str());
 606 }
 607
 608 void ns3_add_link(int src, e_ns3_network_element_type_t type_src,
 609           int dst, e_ns3_network_element_type_t type_dst,
 610           char *bw, char *lat)
 611 {
 612   if(number_of_links == 1 ) {
 613     LogComponentEnable("UdpEchoClientApplication", ns3::LOG_LEVEL_INFO);
 614     LogComponentEnable("UdpEchoServerApplication", ns3::LOG_LEVEL_INFO);
 615   }
 616
 617   ns3::MyPointToPointHelper pointToPoint;
 618
 619   ns3::NetDeviceContainer netA;
 620   ns3::Ipv4AddressHelper address;
 621
 622   ns3::Ptr<ns3::Node> a = nodes.Get(src);
 623   ns3::Ptr<ns3::Node> b = nodes.Get(dst);
 624
 625   XBT_DEBUG("\tAdd PTP from %d to %d bw:'%s' lat:'%s'",src,dst,bw,lat);
 626   pointToPoint.SetDeviceAttribute ("DataRate", ns3::StringValue (bw));
 627   pointToPoint.SetChannelAttribute ("Delay", ns3::StringValue (lat));
 628   //pointToPoint.EnablePcapAll("test_ns3_trace"); //DEBUG
 629
 630   netA.Add(pointToPoint.Install (a, type_src, b, type_dst));
 631
 632   char * adr = bprintf("%d.%d.0.0",number_of_networks,number_of_links);
 633   address.SetBase (adr, "255.255.0.0");
 634   XBT_DEBUG("\tInterface stack '%s'",adr);
 635   free(adr);
 636   interfaces.Add(address.Assign (netA));
 637
 638   char *tmp = transformIpv4Address(interfaces.GetAddress(interfaces.GetN()-2));
 639   xbt_dynar_set_as(IPV4addr,src,char*,tmp);
 640   XBT_DEBUG("Have write '%s' for Node '%d'",(char*)xbt_dynar_get_as(IPV4addr,src,char*),src);
 641
 642   tmp = transformIpv4Address(interfaces.GetAddress(interfaces.GetN()-1));
 643   xbt_dynar_set_as(IPV4addr,dst,char*,tmp);
 644   XBT_DEBUG("Have write '%s' for Node '%d'",(char*)xbt_dynar_get_as(IPV4addr,dst,char*),dst);
 645
 646   if(number_of_links == 255){
 647     if(number_of_networks == 255)
 648       xbt_die("Number of links and networks exceed 255*255");
 649     number_of_links = 1;
 650     number_of_networks++;
 651   }else{
 652     number_of_links++;
 653   }
 654 }
 655
 656 void ns3_end_platform(void)
 657 {
 658   XBT_DEBUG("InitializeRoutes");
 659   ns3::GlobalRouteManager::BuildGlobalRoutingDatabase();
 660   ns3::GlobalRouteManager::InitializeRoutes();
 661 }