#include "ccnx-discovery.h"
#include "simple-interval-generator.h"
#include "task.h"
#include "periodic-task.h"
#include <sstream>
#include <boost/make_shared.hpp>
#include <boost/bind.hpp>

using namespace Ccnx;
using namespace std;

const string
TaggedFunction::CHAR_SET = string("abcdefghijklmnopqtrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789");

TaggedFunction::TaggedFunction(const Callback &callback, const string &tag)
                   : m_callback(callback)
                   , m_tag(tag)
{
}

string
TaggedFunction::GetRandomTag()
{
  //boost::random::random_device rng;
  boost::random::uniform_int_distribution<> dist(0, CHAR_SET.size() - 1);
  ostringstream oss;
  for (int i = 0; i < DEFAULT_TAG_SIZE; i++)
  {
    //oss << CHAR_SET[dist(rng)];
  }
  return oss.str();
}

void
TaggedFunction::operator()(const Name &name)
{
  if (!m_callback.empty())
  {
    m_callback(name);
  }
}

const double
CcnxDiscovery::INTERVAL = 15.0;

CcnxDiscovery *
CcnxDiscovery::instance = NULL;

boost::mutex
CcnxDiscovery::mutex;

CcnxDiscovery::CcnxDiscovery()
              : m_scheduler(new Scheduler())
              , m_localPrefix("/")
{
  m_scheduler->start();
  IntervalGeneratorPtr generator = boost::make_shared<SimpleIntervalGenerator>(INTERVAL);
  TaskPtr task = boost::make_shared<PeriodicTask>(boost::bind(&CcnxDiscovery::poll, this), "Local-Prefix-Check", m_scheduler, generator);
  m_scheduler->addTask(task);
}

CcnxDiscovery::~CcnxDiscovery()
{
  m_scheduler->shutdown();
}

void
CcnxDiscovery::addCallback(const TaggedFunction &callback)
{
  m_callbacks.push_back(callback);
}

int
CcnxDiscovery::deleteCallback(const TaggedFunction &callback)
{
  List::iterator it = m_callbacks.begin();
  while (it != m_callbacks.end())
  {
    if ((*it) == callback)
    {
      it = m_callbacks.erase(it);
    }
    else
    {
      ++it;
    }
  }
  return m_callbacks.size();
}

void
CcnxDiscovery::poll()
{
  Name localPrefix = CcnxWrapper::getLocalPrefix();
  if (localPrefix != m_localPrefix)
  {
    Lock lock(mutex);
    for (List::iterator it = m_callbacks.begin(); it != m_callbacks.end(); ++it)
    {
      (*it)(localPrefix);
    }
    m_localPrefix = localPrefix;
  }
}

void
CcnxDiscovery::registerCallback(const TaggedFunction &callback)
{
  Lock lock(mutex);
  if (instance == NULL)
  {
    instance = new CcnxDiscovery();
  }

  instance->addCallback(callback);
}

void
CcnxDiscovery::deregisterCallback(const TaggedFunction &callback)
{
  Lock lock(mutex);
  if (instance == NULL)
  {
    cerr << "CcnxDiscovery::deregisterCallback called without instance" << endl;
  }
  else
  {
    int size = instance->deleteCallback(callback);
    if (size == 0)
    {
      delete instance;
      instance = NULL;
    }
  }
}