/*
 *  qlo10k1 - GUI frontend for ld10k1
 *
 *  Copyright (c) 2004 by Peter Zubaj
 *
 *   This program 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.
 *
 *   This program 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 program; if not, write to the Free Software
 *   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
 *
 */
 
#include <stdlib.h>
#include <lo10k1/lo10k1.h>

#include "strglobal.h"
#include "strparam.h"
#include "ld10k1file.h"

class CardParamPrivate
{
public:
	liblo10k1_connection_t card_conn;
	
	liblo10k1_connection_t *conn()
	{
		return &card_conn;
	}
};

CardParam::CardParam(void)
{
	prv = new CardParamPrivate();
	liblo10k1_connection_init(prv->conn());
	Structure = NULL;
}

CardParam::~CardParam(void)
{
	disconnect();
	if (Structure)
		delete Structure;
	delete prv;
}

StrGlobal *CardParam::getStructure()
{
	Structure = new StrGlobal(this);
	return Structure;
}

int CardParam::disconnect(void)
{
	if (liblo10k1_is_open(prv->conn()))
		return liblo10k1_disconnect(prv->conn());
	return 0;
}

int CardParam::isConnected(void)
{
	return liblo10k1_is_open(prv->conn());
}

int CardParam::clearDSP(void)
{
	return liblo10k1_dsp_init(prv->conn());
}

int CardParam::testConnection(void)
{
	int err = connect();
	if (err < 0)
		return err;
	disconnect();
	return 0;
}

int CardParam::connect(void)
{
	int err;

	if (liblo10k1_is_open(prv->conn()))
		disconnect();

	liblo10k1_param params;
	const char *tmp = NULL;

	tmp = CardSocket;

	params.wfc = 500; // FIXME - user selectable
	params.type = COMM_TYPE_LOCAL; // FIXME
	params.server = 0;
	params.name = (char *)tmp;
	params.port = 0;

	if ((err = liblo10k1_connect(&params, prv->conn())) < 0)
		return err;

	return liblo10k1_check_version(prv->conn());
}

int CardParam::load(LD10k1File *ld10k1file, int before, int *loaded, int *loaded_id)
{
	int err;
	liblo10k1_dsp_patch_t *patch = ld10k1file->getLD10k1Format();
	err = liblo10k1_patch_load(prv->conn(), patch, before, loaded, loaded_id);
	return err;
}

int CardParam::unload(int num)
{
	return liblo10k1_patch_unload(prv->conn(), num);
}

int CardParam::get(int patch_num, LD10k1File **ld10k1file)
{
	liblo10k1_dsp_patch_t *patch;
	int err;
	 
	if ((err = liblo10k1_patch_get(prv->conn(), patch_num, &patch)) < 0)
		return err;
		
	LD10k1File *tmp = new LD10k1File();
	tmp->setLD10k1Format(patch);
	*ld10k1file = tmp;
	
	return 0;
}

int CardParam::conAdd(bool multi, bool simple, int from_type, int from_patch, int from_io, int to_type,int to_patch, int to_io, int *id)
{
	return liblo10k1_con_add(prv->conn(), multi, simple, from_type, from_patch, from_io, to_type, to_patch, to_io, id);
}

int CardParam::conDel(int from_type, int from_patch, int from_io, int *id)
{
	return liblo10k1_con_del(prv->conn(), from_type, from_patch, from_io, id);
}

int CardParam::getPointsInfo(int **out, int *count)
{
	return liblo10k1_get_points_info(prv->conn(), out, count);
}

int CardParam::getPointInfo(int point_id, CardParamPointInfo *out)
{
	int err;
	
	liblo10k1_point_info_t pi;
	if ((err = liblo10k1_get_point_info(prv->conn(), point_id, &pi)) < 0)
		return err;
	
	out->id = pi.id;
	out->type = pi.type;
	out->io_idx = pi.io_idx;
	out->simple = pi.simple;
	out->multi = pi.multi;
	out->conn_count = pi.conn_count;
	
	for (int i = 0; i < POINTINFO_MAX_CONN_PER_POINT; i++)
	{
		out->io_type[i] = pi.io_type[i];
		out->patch[i] = pi.patch[i];
		out->io[i] = pi.io[i];
	}
	
	return 0;
}

QString CardParam::errorStr(int err)
{
	return QString(liblo10k1_error_str(err));
}

CardParam::CardParam(CardParam *from)
{
	prv = new CardParamPrivate();
	liblo10k1_connection_init(prv->conn());
	CardName = from->CardName;
	CardSocket = from->CardSocket;
};

int CardParam::getFXCount(int *cnt)
{
	return liblo10k1_get_fx_count(prv->conn(), cnt);
}

int CardParam::getInputCount(int *cnt)
{
	return liblo10k1_get_in_count(prv->conn(), cnt);
}

int CardParam::getOutputCount(int *cnt)
{
	return liblo10k1_get_out_count(prv->conn(), cnt);
}

int CardParam::getFX(int i, QString &name)
{
	liblo10k1_get_io_t ld_tmp;
	int err = 0;
	
	if ((err = liblo10k1_get_fx(prv->conn(), i, &ld_tmp)) < 0)
		return err;
	name = ld_tmp.name;
	return 0;
}

int CardParam::getInput(int i, QString &name)
{
	liblo10k1_get_io_t ld_tmp;
	int err = 0;
	
	if ((err = liblo10k1_get_in(prv->conn(), i, &ld_tmp)) < 0)
		return err;
	name = ld_tmp.name;
	return 0;
}

int CardParam::getOutput(int i, QString &name)
{
	liblo10k1_get_io_t ld_tmp;
	int err = 0;
	
	if ((err = liblo10k1_get_out(prv->conn(), i, &ld_tmp)) < 0)
		return err;
	name = ld_tmp.name;
	return 0;
}

int CardParam::getPInputCount(int pnum, int *cnt)
{
	return liblo10k1_get_pin_count(prv->conn(), pnum, cnt);
}

int CardParam::getPOutputCount(int pnum, int *cnt)
{
	return liblo10k1_get_pout_count(prv->conn(), pnum, cnt);
}

int CardParam::getPInput(int pnum, int i, QString &name)
{
	liblo10k1_get_io_t ld_tmp;
	int err = 0;
	
	if ((err = liblo10k1_get_pin(prv->conn(), pnum, i, &ld_tmp)) < 0)
		return err;
	name = ld_tmp.name;
	return 0;
}

int CardParam::getPOutput(int pnum, int i, QString &name)
{
	liblo10k1_get_io_t ld_tmp;
	int err = 0;
	
	if ((err = liblo10k1_get_pout(prv->conn(), pnum, i, &ld_tmp)) < 0)
		return err;
	name = ld_tmp.name;
	return 0;
}

int CardParam::getPatchesInfo(CardParamPatchInfo ***pi, int *cnt)
{
	liblo10k1_patches_info_t *ld_patches;
	int err;
	
	CardParamPatchInfo **tmppi = NULL;
	*pi = NULL;
	
	if ((err = liblo10k1_get_patches_info(prv->conn(), &ld_patches, cnt)) < 0)
		return err;
		
	tmppi = new CardParamPatchInfo *[*cnt];
	
	for (int i = 0; i < *cnt; i++)
	{
		tmppi[i] = new CardParamPatchInfo();
		tmppi[i]->patch_num = ld_patches[i].patch_num;
		tmppi[i]->id = ld_patches[i].id;
		tmppi[i]->patch_name = ld_patches[i].patch_name;
	}
	
	free(ld_patches);
	*pi = tmppi;
	return 0;
}

int CardParam::getDspConfig(LD10k1DspFile **dc)
{
	liblo10k1_file_dsp_setup_t *ds = NULL;
	int err;
	
	if ((err = liblo10k1lf_get_dsp_config(prv->conn(), &ds)) < 0)
		return err;
	
	LD10k1DspFile *ldc = new LD10k1DspFile();
	ldc->setLD10k1DspFormat(ds);
	*dc = ldc;
	return 0;
}
	
int CardParam::putDspConfig(LD10k1DspFile *dc)
{
	return liblo10k1lf_put_dsp_config(prv->conn(), dc->getLD10k1DspFormat());
}