/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
/***************************************************************************
 *            networksender.cc
 *
 *  Mon Mar  6 20:14:35 CET 2006
 *  Copyright  2006 Bent Bisballe Nyeng
 *  deva@aasimon.org
 ****************************************************************************/

/*
 *  This file is part of MIaV.
 *
 *  MIaV is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  MIaV 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 MIaV; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA.
 */
#include "networksender.h"

#include "configuration.h"
#include "info.h"

#include <sys/time.h>

#include <util.h>

NetworkSender::NetworkSender(QString cpr)
{
  if(MIaV::config->get("server_addr", &ip))
    MIaV::info->error("Could not read the symbol [server_addr] from the conf file!");
  
  if(MIaV::config->get("server_port", &port))
    MIaV::info->error("Could not read the symbol [server_port] from the conf file!");

  // Connect
  socket = new TCPSocket(port, ip);
  if(socket->connect()) {
    MIaV::info->error("Could not connect to %s on port %d because: %s",
                      ip.c_str(), port, socket->error().c_str());
  }
  network = new Network(socket);

  fps = 0.0;

  running = true;

  gettimeofday(&oldtime, NULL);
  for(int cnt = 0; cnt < BUFFERSIZE; cnt++) {
    frametime[cnt] = 41660;
  }
  gettimeofday(&time, NULL);
  interval = 0;

  fprintf(stderr, "Connect [%p]\n", this);
}

NetworkSender::~NetworkSender()
{
  sleep(1); // FIXME: This is needed to prevent a crash!

  // Disconnect
  delete network;
  delete socket;

  fprintf(stderr, "Disconnect [%p]\n", this);
}

void NetworkSender::pushFrame(Frame* frame, bool freeze, bool snapshot)
{
  if(freeze || snapshot) printf("Freeze: %d Snapshot %d\n", freeze, snapshot);

  //  Frame *frame = new Frame((unsigned char*)framedata);
  frame->freeze = freeze;
  frame->shoot = snapshot;

  mutex.lock();
  framelist.push_back(frame);
  mutex.unlock();

  semaphore.release();
}

unsigned int NetworkSender::queueSize()
{
  unsigned int sz;

  mutex.lock();
  sz = framelist.size();
  mutex.unlock();

  return sz;
}

void NetworkSender::run()
{
  setPriority(QThread::IdlePriority);

  fprintf(stderr, "  Run %p\n", this);
  
  while(running) {
    if(queueSize()) semaphore.acquire();

    Frame *frame = NULL;
    mutex.lock();
    if(framelist.isEmpty() == false) frame = framelist.takeLast();
    mutex.unlock();

    if(frame) {
      // Send the frame over the network
      network->sendFrame(frame);
      if(frame->vframe) delete frame->vframe;
      if(frame->aframe) delete frame->aframe;
      delete frame;

      // Set status
      statusmutex.lock();
      checkPoint();
      statusmutex.unlock();
    }
  }
  terminatesemaphore.release(); // Signal the stop method that the thread has stopped running.

  fprintf(stderr, "  Stop %p\n", this);
}

void NetworkSender::stop()
{
  running = false;
  semaphore.release(); // Kick the thread active
  terminatesemaphore.acquire(); // Wait for the thread to stop
}

double NetworkSender::getfps()
{
  double f; 

  statusmutex.lock();
  f = fps;
  statusmutex.unlock();

  return f;
}

void NetworkSender::checkPoint()
{
  for(int cnt = BUFFERSIZE - 1; cnt > 0; cnt--) {
    frametime[cnt] = frametime[cnt-1];
  }
   
  frametime[0] = (1000000 * time.tv_sec + time.tv_usec) - (1000000 * oldtime.tv_sec + oldtime.tv_usec);

  oldtime.tv_sec = time.tv_sec;
  oldtime.tv_usec = time.tv_usec;

  gettimeofday(&time, NULL);

  double total = 0.0;
  for(int cnt = 0; cnt < BUFFERSIZE; cnt++) {
    total += (double)frametime[cnt];
  }
  fps = 1000000.0 / (total / (double)BUFFERSIZE);

}