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

/*

 * Copyright (c) 2008 INRIA

 *

 * 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: Mathieu Lacage <mathieu.lacage@sophia.inria.fr>

 */

#include "command-line.h"

#include "log.h"

#include "config.h"

#include "global-value.h"

#include "type-id.h"

#include "string.h"

NS_LOG_COMPONENT_DEFINE ("CommandLine");

namespace ns3 {

CommandLine::CommandLine ()

{

}

CommandLine::CommandLine (const CommandLine &cmd)

{

  Copy (cmd);

}

CommandLine &

CommandLine::operator = (const CommandLine &cmd)

{

  Clear ();

  Copy (cmd);

  return *this;

}

CommandLine::~CommandLine ()

{

  Clear ();

}

void

CommandLine::Copy (const CommandLine &cmd)

{

  for (Items::const_iterator i = cmd.m_items.begin (); 

       i != cmd.m_items.end (); ++i)

    {

      m_items.push_back (*i);

    }

}

void

CommandLine::Clear (void)

{

  for (Items::const_iterator i = m_items.begin (); i != m_items.end (); ++i)

    {

      delete *i;

    }

  m_items.clear ();

}

CommandLine::Item::~Item ()

{

}

void

CommandLine::Parse (int iargc, char *argv[]) const

{

  int argc = iargc;

  for (argc--, argv++; argc > 0; argc--, argv++)

    {

      // remove "--" or "-" heading.

      std::string param = *argv;

      std::string::size_type cur = param.find ("--");

      if (cur == 0)

        {

          param = param.substr (2, param.size () - 2);

        }

      else

        {

          cur = param.find ("-");

          if (cur == 0)

            {

              param = param.substr (1, param.size () - 1);

            }

          else

            {

              // invalid argument. ignore.

              continue;

            }

        }

      cur = param.find ("=");

      std::string name, value;

      if (cur == std::string::npos)

        {

          name = param;

          value = "";

        }

      else

        {

          name = param.substr (0, cur);

          value = param.substr (cur + 1, param.size () - (cur+1));

        }

      HandleArgument (name, value);

    }

}

void

CommandLine::PrintHelp (void) const

{

  std::cout << "--PrintHelp: Print this help message." << std::endl;

  std::cout << "--PrintGroups: Print the list of groups." << std::endl;

  std::cout << "--PrintTypeIds: Print all TypeIds." << std::endl;

  std::cout << "--PrintGroup=[group]: Print all TypeIds of group." << std::endl;

  std::cout << "--PrintAttributes=[typeid]: Print all attributes of typeid." << std::endl;

  std::cout << "--PrintGlobals: Print the list of globals." << std::endl;

  if (!m_items.empty ())

    {

      std::cout << "User Arguments:" << std::endl;

      for (Items::const_iterator i = m_items.begin (); i != m_items.end (); ++i)

        {

          std::cout << "    --" << (*i)->m_name << ": " << (*i)->m_help << std::endl;

        }

    }

}

void

CommandLine::PrintGlobals (void) const

{

  for (GlobalValue::Iterator i = GlobalValue::Begin (); i != GlobalValue::End (); ++i)

    {

      std::cout << "    --" << (*i)->GetName () << "=[";

      Ptr<const AttributeChecker> checker = (*i)->GetChecker ();

      StringValue v;

      (*i)->GetValue (v);

      std::cout << v.Get () << "]:  "

                << (*i)->GetHelp () << std::endl;

    }

}

void

CommandLine::PrintAttributes (std::string type) const

{

  TypeId tid;

  if (!TypeId::LookupByNameFailSafe (type, &tid))

    {

      NS_FATAL_ERROR ("Unknown type="<<type<<" in --PrintAttributes");

    }

  for (uint32_t i = 0; i < tid.GetAttributeN (); ++i)

    {

      std::cout << "    --"<<tid.GetAttributeFullName (i)<<"=[";

      struct TypeId::AttributeInformation info = tid.GetAttribute (i);

      std::cout << info.initialValue->SerializeToString (info.checker) << "]:  "

                << info.help << std::endl;

    }

}

void

CommandLine::PrintGroup (std::string group) const

{

  for (uint32_t i = 0; i < TypeId::GetRegisteredN (); ++i)

    {

      TypeId tid = TypeId::GetRegistered (i);

      if (tid.GetGroupName () == group)

        {

          std::cout << "    --PrintAttributes=" <<tid.GetName ()<<std::endl;

        }

    }

}

void

CommandLine::PrintTypeIds (void) const

{

  for (uint32_t i = 0; i < TypeId::GetRegisteredN (); ++i)

    {

      TypeId tid = TypeId::GetRegistered (i);

      std::cout << "    --PrintAttributes=" <<tid.GetName ()<<std::endl;

    }

}

void

CommandLine::PrintGroups (void) const

{

  std::list<std::string> groups;

  for (uint32_t i = 0; i < TypeId::GetRegisteredN (); ++i)

    {

      TypeId tid = TypeId::GetRegistered (i);

      std::string group = tid.GetGroupName ();

      if (group == "")

        {

          continue;

        }

      bool found = false;

      for (std::list<std::string>::const_iterator j = groups.begin (); j != groups.end (); ++j)

        {

          if (*j == group)

            {

              found = true;

              break;

            }

        }

      if (!found)

        {

          groups.push_back (group);

        }

    }

  for (std::list<std::string>::const_iterator k = groups.begin (); k != groups.end (); ++k)

    {

      std::cout << "    --PrintGroup="<<*k<<std::endl;

    }

}

void

CommandLine::HandleArgument (std::string name, std::string value) const

{

  NS_LOG_DEBUG ("Handle arg name="<<name<<" value="<<value);

  if (name == "PrintHelp")

    {

      // method below never returns.

      PrintHelp ();

    } 

  else if (name == "PrintGroups")

    {

      // method below never returns.

      PrintGroups ();

    }

  else if (name == "PrintTypeIds")

    {

      // method below never returns.

      PrintTypeIds ();

    }

  else if (name == "PrintGlobals")

    {

      // method below never returns.

      PrintGlobals ();

    }

  else if (name == "PrintGroup")

    {

      // method below never returns.

      PrintGroup (value);

    }

  else if (name == "PrintAttributes")

    {

      // method below never returns.

      PrintAttributes (value);

    }

  else

    {

      for (Items::const_iterator i = m_items.begin (); i != m_items.end (); ++i)

        {

          if ((*i)->m_name == name)

            {

              if (!(*i)->Parse (value))

                {

                  std::cerr << "Invalid argument value: "<<name<<"="<<value << std::endl;

                }

              else

                {

                  return;

                }

            }

        }

    }

  if (!Config::SetGlobalFailSafe (name, StringValue (value))

      && !Config::SetDefaultFailSafe (name, StringValue (value)))

    {

      std::cerr << "Invalid command-line arguments: --"<<name<<"="<<value<<std::endl;

      PrintHelp ();

    }

}

bool

CommandLine::CallbackItem::Parse (std::string value)

{

  NS_LOG_DEBUG ("CommandLine::CallbackItem::Parse \"" << value << "\"");

  return m_callback (value);

}

void

CommandLine::AddValue (const std::string &name,

                       const std::string &help,

                       Callback<bool, std::string> callback)

{

  NS_LOG_FUNCTION (this << name << help << "callback");

  CallbackItem *item = new CallbackItem ();

  item->m_name = name;

  item->m_help = help;

  item->m_callback = callback;

  m_items.push_back (item);

}

} // namespace ns3