/* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
/* vim: set et sw=2 ts=2: */
/***************************************************************************
 *            soundplayer.cc
 *
 *  Fri Sep  5 17:31:28 CEST 2014
 *  Copyright 2014 Bent Bisballe Nyeng
 *  deva@aasimon.org
 ****************************************************************************/

/*
 *  This file is part of Kaiman.
 *
 *  Kaiman 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.
 *
 *  Kaiman 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 Kaiman; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA.
 */
#include "soundplayer.h"

#include <ao/ao.h>
#include <sndfile.h>

#define BUFSZ 512

SoundPlayer::SoundPlayer()
{
  start();
}

SoundPlayer::~SoundPlayer()
{
  running = false;
  wait();
}

void SoundPlayer::run()
{

  printf("SoundPlayer running\n");

  ao_initialize();

  ao_sample_format sf;
  memset(&sf, 0, sizeof(sf));
  sf.bits = 16;
  sf.rate = 44100;
  sf.channels = 2;
  sf.byte_format = AO_FMT_NATIVE;

  ao_device *dev = ao_open_live(ao_default_driver_id(), &sf, 0);

  running = true;

  short s[BUFSZ];
  while(running) {

    { // Check for new Selection.
      QMutexLocker lock(&mutex);
      while(queue.size()) {
        printf(" - New sound\n");
        active.append(queue.front());
        queue.pop_front();
      }
    }

    memset(s, 0, BUFSZ * sizeof(short));
    
    QList<QueueItem>::iterator it = active.begin();
    while(it != active.end()) {
      QueueItem &item = *it;

      for(size_t i = 0; i < BUFSZ; i++) {
        if(item.pos >= item.size) {
          it = active.erase(it);
          goto nextitem;
        }
        s[i] += item.samples[item.pos] * 32536;
        item.pos++;
      }

      it++;

    nextitem:
      int a = 1;(void)a;
    }

    ao_play(dev, (char*)s, BUFSZ * sizeof(short));
  }

  ao_close(dev);
  ao_shutdown();
}

void SoundPlayer::playFile(QString file)
{

  printf(" - playFile(%s)\n", file.toStdString().c_str());

  SNDFILE *fh;
  SF_INFO sf_info;

  fh = sf_open(file.toStdString().c_str(), SFM_READ, &sf_info);
  if(!fh) {
    printf("Load error '%s'\n", file.toStdString().c_str());
    return;
  }
  
  size_t size = sf_info.frames * sf_info.channels;
  float *data = new float[size];
  sf_read_float(fh, data, size); 

  sf_close(fh);

  QueueItem qi;
  qi.samples = data;
  qi.pos = 0;
  qi.size = size;

  {
    QMutexLocker lock(&mutex);
    queue.append(qi);
  }

}