/* -*-  Mode: C++; c-file-style: "gnu"; indent-tabs-mode:nil; -*- */

/*

 * Copyright (c) 2011 University of Kansas

 *

 * This program is free software; you can redistribute it and/or modify

 * it under the terms of the GNU General Public License version 2 as

 * published by the Free Software Foundation;

 *

 * This program is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

 * GNU General Public License for more details.

 *

 * You should have received a copy of the GNU General Public License

 * along with this program; if not, write to the Free Software

 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

 *

 * Author: Justin Rohrer <rohrej@ittc.ku.edu>

 *

 * James P.G. Sterbenz <jpgs@ittc.ku.edu>, director

 * ResiliNets Research Group  http://wiki.ittc.ku.edu/resilinets

 * Information and Telecommunication Technology Center (ITTC)

 * and Department of Electrical Engineering and Computer Science

 * The University of Kansas Lawrence, KS USA.

 *

 * Work supported in part by NSF FIND (Future Internet Design) Program

 * under grant CNS-0626918 (Postmodern Internet Architecture),

 * NSF grant CNS-1050226 (Multilayer Network Resilience Analysis and Experimentation on GENI),

 * US Department of Defense (DoD), and ITTC at The University of Kansas.

 */

/*

 * This example program allows one to run ns-3 DSDV, AODV, or OLSR under

 * a typical random waypoint mobility model.

 *

 * By default, the simulation runs for 200 simulated seconds, of which

 * the first 50 are used for start-up time.  The number of nodes is 50.

 * Nodes move according to RandomWaypointMobilityModel with a speed of

 * 20 m/s and no pause time within a 300x1500 m region.  The WiFi is

 * in ad hoc mode with a 2 Mb/s rate (802.11b) and a Friis loss model.

 * The transmit power is set to 7.5 dBm.

 *

 * It is possible to change the mobility and density of the network by

 * directly modifying the speed and the number of nodes.  It is also

 * possible to change the characteristics of the network by changing

 * the transmit power (as power increases, the impact of mobility

 * decreases and the effective density increases).

 *

 * By default, OLSR is used, but specifying a value of 2 for the protocol

 * will cause AODV to be used, and specifying a value of 3 will cause

 * DSDV to be used.

 *

 * By default, there are 10 source/sink data pairs sending UDP data

 * at an application rate of 2.048 Kb/s each.    This is typically done

 * at a rate of 4 64-byte packets per second.  Application data is

 * started at a random time between 50 and 51 seconds and continues

 * to the end of the simulation.

 *

 * The program outputs a few items:

 * - packet receptions are notified to stdout such as:

 *   <timestamp> <node-id> received one packet from <src-address>

 * - each second, the data reception statistics are tabulated and output

 *   to a comma-separated value (csv) file

 * - some tracing and flow monitor configuration that used to work is

 *   left commented inline in the program

 */

#include <fstream>

#include <iostream>

#include "ns3/core-module.h"

#include "ns3/network-module.h"

#include "ns3/internet-module.h"

#include "ns3/mobility-module.h"

#include "ns3/wifi-module.h"

#include "ns3/aodv-module.h"

#include "ns3/olsr-module.h"

#include "ns3/dsdv-module.h"

#include "ns3/applications-module.h"

using namespace ns3;

NS_LOG_COMPONENT_DEFINE ("manet-routing-compare");

class RoutingExperiment

{

public:

  RoutingExperiment ();

  void Run (int nSinks, int protocol, double txp, std::string CSVfileName);

  //static void SetMACParam (ns3::NetDeviceContainer & devices,

  //                                 int slotDistance);

  std::string CommandSetup (int argc, char **argv);

private:

  Ptr<Socket> SetupPacketReceive (Ipv4Address addr, Ptr<Node> node);

  void ReceivePacket (Ptr<Socket> socket);

  void CheckThroughput ();

  uint32_t port;

  uint32_t bytesTotal;

  uint32_t packetsReceived;

  std::string m_CSVfileName;

  int m_nSinks;

  std::string m_protocolName;

  double m_txp;

};

RoutingExperiment::RoutingExperiment ()

  : port (9),

    bytesTotal (0),

    packetsReceived (0),

    m_CSVfileName ("manet-routing.output.csv")

{

}

void

RoutingExperiment::ReceivePacket (Ptr<Socket> socket)

{

  Ptr<Packet> packet;

  while (packet = socket->Recv ())

    {

      bytesTotal += packet->GetSize ();

      packetsReceived += 1;

      SocketAddressTag tag;

      bool found;

      found = packet->PeekPacketTag (tag);

      if (found)

        {

          InetSocketAddress addr = InetSocketAddress::ConvertFrom (tag.GetAddress ());

          NS_LOG_UNCOND (Simulator::Now ().GetSeconds () <<  " " << socket->GetNode ()->GetId ()

                                                         << " received one packet from " << addr.GetIpv4 ());

        }

      else

        {

          NS_LOG_UNCOND (Simulator::Now ().GetSeconds () << " " << socket->GetNode ()->GetId ()

                                                         << " received one packet!");

        }

    }

}

void

RoutingExperiment::CheckThroughput ()

{

  double kbs = (bytesTotal * 8.0) / 1000;

  bytesTotal = 0;

  std::ofstream out (m_CSVfileName.c_str (), std::ios::app);

  out << (Simulator::Now ()).GetSeconds () << ","

      << kbs << ","

      << packetsReceived << ","

      << m_nSinks << ","

      << m_protocolName << ","

      << m_txp << ""

      << std::endl;

  out.close ();

  packetsReceived = 0;

  Simulator::Schedule (Seconds (1.0), &RoutingExperiment::CheckThroughput, this);

}

Ptr<Socket>

RoutingExperiment::SetupPacketReceive (Ipv4Address addr, Ptr<Node> node)

{

  TypeId tid = TypeId::LookupByName ("ns3::UdpSocketFactory");

  Ptr<Socket> sink = Socket::CreateSocket (node, tid);

  InetSocketAddress local = InetSocketAddress (addr, port);

  sink->Bind (local);

  sink->SetRecvCallback (MakeCallback (&RoutingExperiment::ReceivePacket, this));

  return sink;

}

std::string

RoutingExperiment::CommandSetup (int argc, char **argv)

{

  CommandLine cmd;

  cmd.AddValue ("CSVfileName", "The name of the CSV output file name", m_CSVfileName);

  cmd.Parse (argc, argv);

  return m_CSVfileName;

}

int

main (int argc, char *argv[])

{

  RoutingExperiment experiment;

  std::string CSVfileName = experiment.CommandSetup (argc,argv);

  //blank out the last output file and write the column headers

  std::ofstream out (CSVfileName.c_str ());

  out << "SimulationSecond," <<

  "ReceiveRate," <<

  "PacketsReceived," <<

  "NumberOfSinks," <<

  "RoutingProtocol," <<

  "TransmissionPower" <<

  std::endl;

  out.close ();

  int nSinks = 10;

  int protocol = 2;

  double txp = 7.5;

  experiment = RoutingExperiment ();

  experiment.Run (nSinks, protocol, txp, CSVfileName);

}

void

RoutingExperiment::Run (int nSinks, int protocol, double txp, std::string CSVfileName)

{

  Packet::EnablePrinting ();

  m_nSinks = nSinks;

  m_txp = txp;

  m_CSVfileName = CSVfileName;

  int nWifis = 50;

  double TotalTime = 200.0;

  std::string rate ("2048bps");

  std::string phyMode ("DsssRate11Mbps");

  std::string tr_name ("Brock");

  int nodeSpeed = 20; //in m/s

  int nodePause = 0; //in s

  m_protocolName = "protocol";

  Config::SetDefault  ("ns3::OnOffApplication::PacketSize",StringValue ("64"));

  Config::SetDefault ("ns3::OnOffApplication::DataRate",  StringValue (rate));

  //Set Non-unicastMode rate to unicast mode

  Config::SetDefault ("ns3::WifiRemoteStationManager::NonUnicastMode",StringValue (phyMode));

  NodeContainer adhocNodes;

  adhocNodes.Create (nWifis);

  // setting up wifi phy and channel using helpers

  WifiHelper wifi;

  wifi.SetStandard (WIFI_PHY_STANDARD_80211b);

  YansWifiPhyHelper wifiPhy =  YansWifiPhyHelper::Default ();

  YansWifiChannelHelper wifiChannel;

  wifiChannel.SetPropagationDelay ("ns3::ConstantSpeedPropagationDelayModel");

  wifiChannel.AddPropagationLoss ("ns3::FriisPropagationLossModel");

  wifiPhy.SetChannel (wifiChannel.Create ());

  // Add a non-QoS upper mac, and disable rate control

  NqosWifiMacHelper wifiMac = NqosWifiMacHelper::Default ();

  wifi.SetRemoteStationManager ("ns3::ConstantRateWifiManager",

                                "DataMode",StringValue (phyMode),

                                "ControlMode",StringValue (phyMode));

  wifiPhy.Set ("TxPowerStart",DoubleValue (txp));

  wifiPhy.Set ("TxPowerEnd", DoubleValue (txp));

  wifiMac.SetType ("ns3::AdhocWifiMac");

  NetDeviceContainer adhocDevices = wifi.Install (wifiPhy, wifiMac, adhocNodes);

  AodvHelper aodv;

  OlsrHelper olsr;

  DsdvHelper dsdv;

  Ipv4ListRoutingHelper list;

  switch (protocol)

    {

    case 1:

      list.Add (olsr, 100);

      m_protocolName = "OLSR";

      break;

    case 2:

      list.Add (aodv, 100);

      m_protocolName = "AODV";

      break;

    case 3:

      list.Add (dsdv, 100);

      m_protocolName = "DSDV";

      break;

    default:

      NS_FATAL_ERROR ("No such protocol:" << protocol);

    }

  InternetStackHelper internet;

  internet.SetRoutingHelper (list);

  internet.Install (adhocNodes);

  NS_LOG_INFO ("assigning ip address");

  Ipv4AddressHelper addressAdhoc;

  addressAdhoc.SetBase ("10.1.1.0", "255.255.255.0");

  Ipv4InterfaceContainer adhocInterfaces;

  adhocInterfaces = addressAdhoc.Assign (adhocDevices);

  MobilityHelper mobilityAdhoc;

  ObjectFactory pos;

  pos.SetTypeId ("ns3::RandomRectanglePositionAllocator");

  pos.Set ("X", RandomVariableValue (UniformVariable (0.0, 300.0)));

  pos.Set ("Y", RandomVariableValue (UniformVariable (0.0, 1500.0)));

  Ptr<PositionAllocator> taPositionAlloc = pos.Create ()->GetObject<PositionAllocator> ();

  mobilityAdhoc.SetMobilityModel ("ns3::RandomWaypointMobilityModel",

                                  "Speed", RandomVariableValue (UniformVariable (0.0, nodeSpeed)),

                                  "Pause", RandomVariableValue (ConstantVariable (nodePause)),

                                  "PositionAllocator", PointerValue (taPositionAlloc));

  mobilityAdhoc.SetPositionAllocator (taPositionAlloc);

  mobilityAdhoc.Install (adhocNodes);

  OnOffHelper onoff1 ("ns3::UdpSocketFactory",Address ());

  onoff1.SetAttribute ("OnTime", RandomVariableValue (ConstantVariable  (1)));

  onoff1.SetAttribute ("OffTime", RandomVariableValue (ConstantVariable (0)));

  for (int i = 0; i <= nSinks - 1; i++)

    {

      Ptr<Socket> sink = SetupPacketReceive (adhocInterfaces.GetAddress (i), adhocNodes.Get (i));

      AddressValue remoteAddress (InetSocketAddress (adhocInterfaces.GetAddress (i), port));

      onoff1.SetAttribute ("Remote", remoteAddress);

      UniformVariable var;

      ApplicationContainer temp = onoff1.Install (adhocNodes.Get (i + nSinks));

      temp.Start (Seconds (var.GetValue (50.0,51.0)));

      temp.Stop (Seconds (TotalTime));

    }

  std::stringstream ss;

  ss << nWifis;

  std::string nodes = ss.str ();

  std::stringstream ss2;

  ss2 << nodeSpeed;

  std::string sNodeSpeed = ss2.str ();

  std::stringstream ss3;

  ss3 << nodePause;

  std::string sNodePause = ss3.str ();

  std::stringstream ss4;

  ss4 << rate;

  std::string sRate = ss4.str ();

  //NS_LOG_INFO ("Configure Tracing.");

  //tr_name = tr_name + "_" + m_protocolName +"_" + nodes + "nodes_" + sNodeSpeed + "speed_" + sNodePause + "pause_" + sRate + "rate";

  //std::ofstream ascii;

  //ascii.open ((tr_name+".tr").c_str());

  //YansWifiPhyHelper::EnableAsciiAll (ascii);

  //MobilityHelper::EnableAsciiAll (ascii);

  //Ptr<FlowMonitor> flowmon;

  //FlowMonitorHelper flowmonHelper;

  //flowmon = flowmonHelper.InstallAll ();

  NS_LOG_INFO ("Run Simulation.");

  CheckThroughput ();

  Simulator::Stop (Seconds (TotalTime));

  Simulator::Run ();

  //flowmon->SerializeToXmlFile ((tr_name + ".flowmon").c_str(), false, false);

  Simulator::Destroy ();

}

    obj = bld.create_ns3_program('manet-routing-compare',

                                 ['wifi', 'dsdv', 'aodv', 'olsr', 'internet', 'applications'])

    obj.source = 'manet-routing-compare.cc'