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

/*

 * 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

 *

 * Authors: Sébastien Deronne <sebastien.deronne@gmail.com>

 */

#include "ns3/core-module.h"

#include "ns3/yans-error-rate-model.h"

#include "ns3/nist-error-rate-model.h"

#include "ns3/gnuplot.h"

#include <fstream>

#include <vector>

#include <cmath>

using namespace ns3;

int main (int argc, char *argv[])

{

  uint32_t FrameSize = 2000;

  std::ofstream yansfile ("yans-frame-success-rate-n.plt");

  std::ofstream nistfile ("nist-frame-success-rate-n.plt");

  std::vector <std::string> modes;

  modes.push_back ("OfdmRate6_5MbpsBW20MHz");

  modes.push_back ("OfdmRate13MbpsBW20MHz");

  modes.push_back ("OfdmRate19_5MbpsBW20MHz");

  modes.push_back ("OfdmRate26MbpsBW20MHz");

  modes.push_back ("OfdmRate39MbpsBW20MHz");

  modes.push_back ("OfdmRate52MbpsBW20MHz");

  modes.push_back ("OfdmRate58_5MbpsBW20MHz");

  modes.push_back ("OfdmRate65MbpsBW20MHz");

  CommandLine cmd;

  cmd.AddValue ("FrameSize", "The frame size", FrameSize);

  cmd.Parse (argc, argv);

  Gnuplot yansplot = Gnuplot ("yans-frame-success-rate-n.eps");

  Gnuplot nistplot = Gnuplot ("nist-frame-success-rate-n.eps");

  Ptr <YansErrorRateModel> yans = CreateObject<YansErrorRateModel> ();

  Ptr <NistErrorRateModel> nist = CreateObject<NistErrorRateModel> ();

  for (uint32_t i = 0; i < modes.size (); i++)

    {

      std::cout << modes[i] << std::endl;

      Gnuplot2dDataset yansdataset (modes[i]);

      Gnuplot2dDataset nistdataset (modes[i]);

      for (double snr = -5.0; snr <= 30.0; snr += 0.1)

        {

          double ps = yans->GetChunkSuccessRate (WifiMode (modes[i]), std::pow (10.0,snr/10.0), FrameSize*8);

          yansdataset.Add (snr, ps);

          ps = nist->GetChunkSuccessRate (WifiMode (modes[i]), std::pow (10.0,snr/10.0), FrameSize*8);

          nistdataset.Add (snr, ps);

        }

      yansplot.AddDataset (yansdataset);

      nistplot.AddDataset (nistdataset);

    }

  yansplot.SetTerminal ("postscript eps color enh \"Times-BoldItalic\"");

  yansplot.SetLegend ("SNR(dB)", "Frame Success Rate");

  yansplot.SetExtra  ("set xrange [-5:30]\n\

set yrange [0:1.2]\n\

set style line 1 linewidth 5\n\

set style line 2 linewidth 5\n\

set style line 3 linewidth 5\n\

set style line 4 linewidth 5\n\

set style line 5 linewidth 5\n\

set style line 6 linewidth 5\n\

set style line 7 linewidth 5\n\

set style line 8 linewidth 5\n\

set style increment user"                                                                                                                                                                                                                                                                                                                                   );

  yansplot.GenerateOutput (yansfile);

  yansfile.close ();

  nistplot.SetTerminal ("postscript eps color enh \"Times-BoldItalic\"");

  nistplot.SetLegend ("SNR(dB)", "Frame Success Rate");

  nistplot.SetExtra  ("set xrange [-5:30]\n\

set yrange [0:1.2]\n\

set style line 1 linewidth 5\n\

set style line 2 linewidth 5\n\

set style line 3 linewidth 5\n\

set style line 4 linewidth 5\n\

set style line 5 linewidth 5\n\

set style line 6 linewidth 5\n\

set style line 7 linewidth 5\n\

set style line 8 linewidth 5\n\

set style increment user"                                                                                                                                                                                                                                                                                                                                   );

  nistplot.GenerateOutput (nistfile);

  nistfile.close ();

}

.. [Haccoun] \D. Haccoun and G. Begin, *High-Rate Punctured Convolutional Codes for Viterbi Sequential Decoding*, IEEE Transactions on Communications, Vol. 32, Issue 3, pp.315-319.

.. [Frenger] \Pâl Frenger et al., "Multi-rate Convolutional Codes".

  else if (bValue == 5)

    {

      // code rate 5/6, use table V from D. Haccoun and G. Begin, "High-Rate Punctured Convolutional Codes 

      // for Viterbi Sequential Decoding", IEEE Transactions on Communications, Vol. 32, Issue 3, pp.315-319.

      pe = 1.0 / (2.0 * bValue) *

        ( 92.0 * std::pow (D, 4.0)

          + 528.0 * std::pow (D, 5.0)

          + 8694.0 * std::pow (D, 6.0)

          + 79453.0 * std::pow (D, 7.0)

          + 792114.0 * std::pow (D, 8.0)

          + 7375573.0 * std::pow (D, 9.0)

          + 67884974.0 * std::pow (D, 10.0)

          + 610875423.0 * std::pow (D, 11.0)

          + 5427275376.0 * std::pow (D, 12.0)

          + 47664215639.0 * std::pow (D, 13.0)

        );

    }

 *          Sébastien Deronne <sebastien.deronne@gmail.com>

          if (mode.GetCodeRate () == WIFI_CODE_RATE_5_6)

            {

              //Table B.32  in Pâl Frenger et al., "Multi-rate Convolutional Codes".

              return GetFecQamBer (snr,

                                   nbits,

                                   mode.GetBandwidth (), // signal spread

                                   mode.GetPhyRate (), // phy rate

                                   64, // m

                                   4,  // dFree

                                   14,  // adFree

                                   69  // adFreePlusOne

                                   );

            }