/*
 *  dolmetschctl
 *
 *
 *  Copyright (C) 2015 Christian Pointner <equinox@spreadspace.org>
 *
 *  This file is part of dolmetschctl.
 *
 *  dolmetschctl 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 3 of the License, or
 *  any later version.
 *
 *  dolmetschctl 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 dolmetschctl. If not, see <http://www.gnu.org/licenses/>.
 */

#include "config.h"

#include <stdio.h>
#include <error.h>

#include "mixer.h"
#include "midi.h"
#include "osc.h"


void print_version()
{
  printf("%s\n", VERSION_STRING_0);
#if defined(__clang__)
  printf("%s, using CLANG %s\n", VERSION_STRING_1, __clang_version__);
#elif defined(__GNUC__)
  printf("%s, using GCC %d.%d.%d\n", VERSION_STRING_1, __GNUC__, __GNUC_MINOR__, __GNUC_PATCHLEVEL__);
#else
  printf("%s\n", VERSION_STRING_1);
#endif
}

int main_loop(mixer_t* x, midi_t* m, osc_t* o)
{
  int ret = 0;

  printf("main_loop just started\n");

  int mixer_npfds_offset = 0;
  int mixer_npfds = mixer_get_poll_fd_count(x);
  assert(mixer_npfds > 0);

  int midi_npfds_offset = mixer_npfds_offset + mixer_npfds;
  int midi_npfds = midi_get_poll_fd_count(m);
  assert(midi_npfds > 0);

  int osc_npfds_offset = midi_npfds_offset + midi_npfds;
  int osc_npfds = osc_get_poll_fd_count(o);
  assert(osc_npfds > 0);

  int npfds = midi_npfds + osc_npfds + mixer_npfds;
  struct pollfd *pfds = alloca(npfds * sizeof(struct pollfd));


  mixer_get_poll_fds(x, &(pfds[mixer_npfds_offset]), mixer_npfds);
  midi_get_poll_fds(m, &(pfds[midi_npfds_offset]), midi_npfds);
  osc_get_poll_fds(o, &(pfds[osc_npfds_offset]), osc_npfds);

  printf("main_loop running...\n");
  for (;;) {
    int err = poll(pfds, npfds, 200);
    if(err < 0 && errno != EINTR) {
      error(0, errno, "poll failed");
      break;
    }
    if(err <= 0) {
          // timeout or EINTR
      continue;
    }

    ret = mixer_handle_revents(x, &(pfds[mixer_npfds_offset]), mixer_npfds);
    if(ret)
      break;

    ret = midi_handle_revents(m, &(pfds[midi_npfds_offset]), midi_npfds);
    if(ret)
      break;

    ret = osc_handle_revents(o, &(pfds[osc_npfds_offset]), osc_npfds);
    if(ret)
      break;
  }

  return ret;
}

int main(int argc, char* argv[])
{
  mixer_t x;
  if(mixer_init(&x, "qu24", "hw:1,0,0"))
    return -1;

  midi_t m;
  if(midi_init(&m, "hw:1,0,0"))
    return -1;

  osc_t o;
  if(osc_init(&o, "1200"))
    return -1;

  int ret = main_loop(&x, &m, &o);

  return ret;
}