//driver_jack.c:

/*
 *      Copyright (C) Philipp 'ph3-der-loewe' Schafft - 2009-2011
 *      Copyright (C) Nedko Arnaudov <nedko@arnaudov.name> - 2010
 *
 *  This file is part of roard a part of RoarAudio,
 *  a cross-platform sound system for both, home and professional use.
 *  See README for details.
 *
 *  This file is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License version 3
 *  as published by the Free Software Foundation.
 *
 *  RoarAudio 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 software; see the file COPYING.  If not, write to
 *  the Free Software Foundation, 51 Franklin Street, Fifth Floor,
 *  Boston, MA 02110-1301, USA.
 *
 */

#include "roard.h"

#ifdef ROAR_HAVE_LIBJACK

static void unregister_ports(struct driver_jack * self) {
 while(self->channels--) {
  if ( self->ports_in != NULL )
   if ( self->ports_in [self->channels] != NULL )
    jack_port_unregister(self->client, self->ports_in [self->channels]);
  if ( self->ports_out[self->channels] != NULL )
   jack_port_unregister(self->client, self->ports_out[self->channels]);
 }
}

int driver_jack_open_vio  (struct roar_vio_calls * inst,
                           char * device,
                           struct roar_audio_info * info,
                           int fh,
                           struct roar_stream_server * sstream) {
 struct driver_jack * self;
 char port_name[128];
 jack_nframes_t new_rate;
 int autoconfig            = 0;
 int recsource             = 0;

 // we are not FH Safe, return error if fh != -1:
 if ( fh != -1 )
  return -1;

 if ( sstream != NULL ) {
  autoconfig = streams_get_flag(ROAR_STREAM(sstream)->id, ROAR_FLAG_AUTOCONF);
  recsource  = streams_get_flag(ROAR_STREAM(sstream)->id, ROAR_FLAG_RECSOURCE);
 }

 // set up VIO:
 memset(inst, 0, sizeof(struct roar_vio_calls));

 inst->read     = driver_jack_read;
 inst->write    = driver_jack_write;
 inst->lseek    = NULL; // no seeking on this device
 inst->sync     = driver_jack_sync;
 inst->ctl      = driver_jack_ctl;
 inst->close    = driver_jack_close;

 // set up internal struct:
 if ( (self = roar_mm_malloc(sizeof(struct driver_jack))) == NULL )
  return -1;

 memset(self, 0, sizeof(struct driver_jack));

 inst->inst     = self;

 if ( (self->client = jack_client_open("roard", JackNullOption, NULL)) == NULL ) {
  roar_mm_free(self);
  return -1;
 }

 new_rate = jack_get_sample_rate(self->client);

 // need to check if we need to change stream's parameters:
 if ( info->rate != new_rate || info->bits != 32 || info->codec != ROAR_CODEC_DEFAULT ) {
  if ( autoconfig ) {
   // we are allowed to change the parameters
   info->rate  = new_rate;
   info->bits  = 32;
   info->codec = ROAR_CODEC_DEFAULT;
  } else {
   // we are not allowed to change the parameters
   ROAR_WARN("driver_jack_open_vio(*): Can not open jack driver with given parameters, try -oO ...,autoconf");
   goto free_close;
  }
 }

 if ( recsource )
  if ( (self->ports_in = roar_mm_malloc(sizeof(jack_port_t *) * info->channels)) == NULL )
   goto free_close;

 if ( (self->ports_out = roar_mm_malloc(sizeof(jack_port_t *) * info->channels)) == NULL )
  goto free_ins;

 // NULL ports so we do not segfaul if something goes wrong.
 if ( self->ports_in != NULL )
  memset(self->ports_in, 0, sizeof(jack_port_t *) * info->channels);
 memset(self->ports_in, 0, sizeof(jack_port_t *) * info->channels);

 for (self->channels = 0; self->channels < info->channels; self->channels++) {
  if ( recsource ) {
   snprintf(port_name, sizeof(port_name), "in_%03u", self->channels);
   if ( (self->ports_in [self->channels] = jack_port_register(self->client, port_name,
                                                              JACK_DEFAULT_AUDIO_TYPE, JackPortIsInput, 0)) == NULL )
    goto unregister_ports;
  }

  snprintf(port_name, sizeof(port_name), "out_%03u", self->channels);
  if ( (self->ports_out[self->channels] = jack_port_register(self->client, port_name,
                                                             JACK_DEFAULT_AUDIO_TYPE, JackPortIsOutput, 0)) == NULL ) {
   jack_port_unregister(self->client, self->ports_in[self->channels]);
   goto unregister_ports;
  }
 }

 if (jack_activate(self->client) != 0)
  goto unregister_ports;

 return 0;

unregister_ports:
 unregister_ports(self);
free_ins:
 if ( self->ports_in != NULL )
  roar_mm_free(self->ports_in);
free_close:
 jack_client_close(self->client);
 roar_mm_free(self);
 return -1; // error
}

ssize_t driver_jack_read    (struct roar_vio_calls * vio, void *buf, size_t count) {
 struct driver_jack * self = vio->inst;
 // read up to count bytes into buf.
 // return the number of bits read.
 return -1;
}

ssize_t driver_jack_write   (struct roar_vio_calls * vio, void *buf, size_t count) {
 struct driver_jack * self = vio->inst;
 // write up to count bytes from buf.
 // return the number of written bytes.
 return -1;
}

int     driver_jack_sync    (struct roar_vio_calls * vio) {
 struct driver_jack * self = vio->inst;
 // init to sync data to device.
 // sync does not need to be complet when this function returns.
 return 0;
}

int     driver_jack_ctl     (struct roar_vio_calls * vio, roar_vio_ctl_t cmd, void * data) {
 struct driver_jack * self = vio->inst;
 // function for a lot control features.

 switch (cmd) {
  case ROAR_VIO_CTL_GET_NAME:
    if ( data == NULL )
     return -1;

    *(char**)data = "driver_jack";
    return 0;
   break;
  case ROAR_VIO_CTL_GET_FH:
  case ROAR_VIO_CTL_GET_READ_FH:
  case ROAR_VIO_CTL_GET_WRITE_FH:
  case ROAR_VIO_CTL_GET_SELECT_FH:
  case ROAR_VIO_CTL_GET_SELECT_READ_FH:
  case ROAR_VIO_CTL_GET_SELECT_WRITE_FH:
/* Return FH if possible:
    *(int*)data = FH...;
*/
    roar_err_set(ROAR_ERROR_NOTSUP);
    return -1;
   break;
  case ROAR_VIO_CTL_SET_NOSYNC:
    vio->sync = NULL;
    return 0;
   break;
  case ROAR_VIO_CTL_NONBLOCK:
    // control if read and write calls should block untill all data is read or written.
    // state is in *(int*)data and could be:
    //  ROAR_SOCKET_BLOCK    - Block untill the data is read or written
    //  ROAR_SOCKET_NONBLOCK - Return as soon as possible
    roar_err_set(ROAR_ERROR_NOTSUP);
    return -1;
   break;
  case ROAR_VIO_CTL_GET_AUINFO:
  case ROAR_VIO_CTL_SET_AUINFO:
    // get or set audio info, data is a struct roar_audio_info*.
    roar_err_set(ROAR_ERROR_NOTSUP);
    return -1;
   break;
  case ROAR_VIO_CTL_GET_DBLKSIZE:
  case ROAR_VIO_CTL_SET_DBLKSIZE:
    // get or set block size used, data is uint_least32_t*, number of bytes.
    roar_err_set(ROAR_ERROR_NOTSUP);
    return -1;
   break;
  case ROAR_VIO_CTL_GET_DBLOCKS:
  case ROAR_VIO_CTL_SET_DBLOCKS:
    // get or set number of blocks used, data is uint_least32_t*.
    roar_err_set(ROAR_ERROR_NOTSUP);
    return -1;
   break;
  case ROAR_VIO_CTL_SET_SSTREAM:
    // set server stream object for this stream, data is struct roar_stream_server*
    roar_err_set(ROAR_ERROR_NOTSUP);
    return -1;
   break;
  case ROAR_VIO_CTL_SET_SSTREAMID:
    // set stream ID for this stream, data is int*
    roar_err_set(ROAR_ERROR_NOTSUP);
    return -1;
   break;
  case ROAR_VIO_CTL_SET_VOLUME:
    // set volume for this device, data is struct roar_mixer_settings*
    roar_err_set(ROAR_ERROR_NOTSUP);
    return -1;
   break;
  case ROAR_VIO_CTL_GET_DELAY:
    // get delay of this stream, data is uint_least32_t*, in bytes
    // there is more about delay. please ask.
    roar_err_set(ROAR_ERROR_NOTSUP);
    return -1;
   break;
 }

 roar_err_set(ROAR_ERROR_BADRQC);
 return -1;
}

int     driver_jack_close   (struct roar_vio_calls * vio) {
 struct driver_jack * self = vio->inst;
 // close and free everything in here...

 jack_deactivate(self->client);
 unregister_ports(self);
 jack_client_close(self->client);

 roar_mm_free(self);

 return 0;
}

#endif

//ll