examples/wifi-wired-bridging.cc
author Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
Tue, 28 Oct 2008 11:26:58 +0100
changeset 3906 01acc159ffb1
parent 3810 ca47c7015ea4
child 3909 4e7e594b0b7e
permissions -rw-r--r--
merge with HEAD
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
3616
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     1
/* -*- Mode:C++; c-file-style:"gnu"; indent-tabs-mode:nil; -*- */
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     2
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     3
#include "ns3/core-module.h"
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     4
#include "ns3/simulator-module.h"
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     5
#include "ns3/mobility-module.h"
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     6
#include "ns3/helper-module.h"
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     7
#include "ns3/wifi-module.h"
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     8
#include "ns3/node-module.h"
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
     9
#include "ns3/global-route-manager.h"
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    10
#include <vector>
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    11
#include <stdint.h>
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    12
#include <sstream>
3810
ca47c7015ea4 remove uneeded includes.
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 3656
diff changeset
    13
#include <fstream>
3616
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    14
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    15
using namespace ns3;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    16
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    17
Ptr<WifiChannel>
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    18
CreateChannel (void)
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    19
{
3906
01acc159ffb1 merge with HEAD
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 3810
diff changeset
    20
  Ptr<YansWifiChannel> channel = CreateObject<YansWifiChannel> ();
3616
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    21
  channel->SetPropagationDelayModel (CreateObject<ConstantSpeedPropagationDelayModel> ());
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    22
  Ptr<LogDistancePropagationLossModel> log = CreateObject<LogDistancePropagationLossModel> ();
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    23
  log->SetReferenceModel (CreateObject<FriisPropagationLossModel> ());
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    24
  channel->SetPropagationLossModel (log);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    25
  return channel;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    26
}
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    27
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    28
int main (int argc, char *argv[])
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    29
{
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    30
  uint32_t nWifis = 2;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    31
  uint32_t nStas = 2;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    32
  bool sendIp = true;
3617
1fec65ceb523 add wifi+wired bridge example
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 3616
diff changeset
    33
1fec65ceb523 add wifi+wired bridge example
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 3616
diff changeset
    34
  RandomVariable::UseGlobalSeed (1, 1, 2, 3, 5, 8);
1fec65ceb523 add wifi+wired bridge example
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 3616
diff changeset
    35
3616
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    36
  CommandLine cmd;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    37
  cmd.AddValue ("nWifis", "Number of wifi networks", nWifis);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    38
  cmd.AddValue ("nStas", "Number of stations per wifi network", nStas);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    39
  cmd.AddValue ("SendIp", "Send Ipv4 or raw packets", sendIp);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    40
  cmd.Parse (argc, argv);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    41
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    42
  NodeContainer backboneNodes;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    43
  NetDeviceContainer backboneDevices;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    44
  Ipv4InterfaceContainer backboneInterfaces;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    45
  std::vector<NodeContainer> staNodes;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    46
  std::vector<NetDeviceContainer> staDevices;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    47
  std::vector<NetDeviceContainer> apDevices;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    48
  std::vector<Ipv4InterfaceContainer> staInterfaces;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    49
  std::vector<Ipv4InterfaceContainer> apInterfaces;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    50
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    51
  InternetStackHelper stack;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    52
  CsmaHelper csma;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    53
  Ipv4AddressHelper ip;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    54
  ip.SetBase ("192.168.0.0", "255.255.255.0");
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    55
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    56
  backboneNodes.Create (nWifis);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    57
  stack.Install (backboneNodes);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    58
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    59
  backboneDevices = csma.Install (backboneNodes);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    60
  backboneInterfaces = ip.Assign (backboneDevices);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    61
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    62
  double wifiX = 0.0;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    63
  for (uint32_t i = 0; i < nWifis; ++i)
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    64
    {
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    65
      // calculate ssid for wifi subnetwork
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    66
      std::ostringstream oss;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    67
      oss << "wifi-default-" << i;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    68
      Ssid ssid = Ssid (oss.str ());
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    69
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    70
      NodeContainer sta;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    71
      NetDeviceContainer staDev;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    72
      NetDeviceContainer apDev;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    73
      Ipv4InterfaceContainer staInterface;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    74
      Ipv4InterfaceContainer apInterface;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    75
      MobilityHelper mobility;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    76
      BridgeHelper bridge;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    77
      WifiHelper wifi;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    78
      Ptr<WifiChannel> channel;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    79
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    80
      sta.Create (nStas);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    81
      channel = CreateChannel ();
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    82
      ip.NewNetwork ();
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    83
      mobility.SetPositionAllocator ("ns3::GridPositionAllocator",
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    84
				     "MinX", DoubleValue (wifiX),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    85
				     "MinY", DoubleValue (0.0),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    86
				     "DeltaX", DoubleValue (5.0),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    87
				     "DeltaY", DoubleValue (5.0),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    88
				     "GridWidth", UintegerValue (1),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    89
				     "LayoutType", StringValue ("RowFirst"));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    90
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    91
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    92
      // setup the AP.
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    93
      mobility.SetMobilityModel ("ns3::StaticMobilityModel");
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    94
      mobility.Install (backboneNodes.Get (i));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    95
      wifi.SetMac ("ns3::NqapWifiMac",
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    96
		   "Ssid", SsidValue (ssid),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    97
		   "BeaconGeneration", BooleanValue (true),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    98
		   "BeaconInterval", TimeValue (Seconds (2.5)));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
    99
      apDev = wifi.Install (backboneNodes.Get (i), channel);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   100
      apInterface = ip.Assign (apDev);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   101
      bridge.Install (backboneNodes.Get (i), NetDeviceContainer (apDev, backboneDevices.Get (i)));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   102
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   103
      // setup the STAs
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   104
      stack.Install (sta);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   105
      mobility.SetMobilityModel ("ns3::RandomWalk2dMobilityModel",
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   106
				 "Mode", StringValue ("Time"),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   107
				 "Time", StringValue ("2s"),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   108
				 "Speed", StringValue ("Constant:1.0"),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   109
				 "Bounds", RectangleValue (Rectangle (wifiX, wifiX+5.0,0.0, (nStas+1)*5.0)));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   110
      mobility.Install (sta);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   111
      wifi.SetMac ("ns3::NqstaWifiMac",
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   112
		   "Ssid", SsidValue (ssid),
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   113
		   "ActiveProbing", BooleanValue (false));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   114
      staDev = wifi.Install (sta, channel);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   115
      staInterface = ip.Assign (staDev);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   116
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   117
      // save everything in containers.
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   118
      staNodes.push_back (sta);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   119
      apDevices.push_back (apDev);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   120
      apInterfaces.push_back (apInterface);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   121
      staDevices.push_back (staDev);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   122
      staInterfaces.push_back (staInterface);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   123
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   124
      wifiX += 20.0;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   125
    }
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   126
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   127
  GlobalRouteManager::PopulateRoutingTables ();
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   128
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   129
  Address dest;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   130
  std::string protocol;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   131
  if (sendIp)
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   132
    {
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   133
      dest = InetSocketAddress (staInterfaces[1].GetAddress (1), 1025);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   134
      protocol = "ns3::UdpSocketFactory";
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   135
    }
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   136
  else
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   137
    {
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   138
      PacketSocketAddress tmp;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   139
      tmp.SetSingleDevice (staDevices[0].Get (0)->GetIfIndex ());
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   140
      tmp.SetPhysicalAddress (staDevices[1].Get (0)->GetAddress ());
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   141
      tmp.SetProtocol (0x807);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   142
      dest = tmp;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   143
      protocol = "ns3::PacketSocketFactory";
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   144
    }
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   145
  OnOffHelper onoff = OnOffHelper (protocol, dest);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   146
  onoff.SetAttribute ("OnTime", RandomVariableValue (ConstantVariable (1)));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   147
  onoff.SetAttribute ("OffTime", RandomVariableValue (ConstantVariable (0)));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   148
  ApplicationContainer apps = onoff.Install (staNodes[0].Get (0));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   149
  apps.Start (Seconds (0.5));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   150
  apps.Stop (Seconds (3.0));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   151
  
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   152
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   153
  WifiHelper::EnablePcap ("wifi-wire-bridging", staNodes[1].Get (1));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   154
  WifiHelper::EnablePcap ("wifi-wire-bridging", staNodes[0].Get (0));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   155
  std::ofstream os;
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   156
  os.open ("wifi-wire-bridging.mob");
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   157
  MobilityHelper::EnableAsciiAll (os);
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   158
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   159
  Simulator::Stop (Seconds (100.0));
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   160
  Simulator::Run ();
3656
bf33e34f8cd0 make sure to destroy all left-over memory before exit
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents: 3617
diff changeset
   161
  Simulator::Destroy ();
3616
660d3a0c40cd testcase for wifi bridging
Mathieu Lacage <mathieu.lacage@sophia.inria.fr>
parents:
diff changeset
   162
}