/*  XMMS2 - X Music Multiplexer System
 *  Copyright (C) 2003-2007 XMMS2 Team
 *
 *  PLUGINS ARE NOT CONSIDERED TO BE DERIVED WORK !!!
 *
 *  This library is free software; you can redistribute it and/or
 *  modify it under the terms of the GNU Lesser General Public
 *  License as published by the Free Software Foundation; either
 *  version 2.1 of the License, or (at your option) any later version.
 *
 *  This library 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
 *  Lesser General Public License for more details.
 */

#include "cmd_config.h"
#include "common.h"

typedef struct volume_channel_St {
	const gchar *name;
	guint volume;
} volume_channel_t;

void
cmd_config (xmmsc_connection_t *conn, gint argc, gchar **argv)
{
	xmmsc_result_t *res;
	gchar *key, *value;

	if (argc < 4) {
		print_error ("You need to specify a configkey and a value");
	}

	key = argv[2];

	if (g_strcasecmp(argv[3], "=") == 0) {
		value = argv[4];
	} else {
		value = argv[3];
	}

	if (!value) {
		print_error ("You need to specify a configkey and a value");
	}

	res = xmmsc_configval_set (conn, key, value);
	xmmsc_result_wait (res);

	if (xmmsc_result_iserror (res)) {
		print_error ("Couldn't set config value: %s",
		             xmmsc_result_get_error (res));
	}
	xmmsc_result_unref (res);

	print_info ("Config value %s set to %s", key, value);
}

/** TODO: doesn't show parameters **/

void
cmd_config_list (xmmsc_connection_t *conn, gint argc, gchar **argv)
{
	xmmsc_result_t *res;

	res = xmmsc_configval_list (conn);
	xmmsc_result_wait (res);

	if (xmmsc_result_iserror (res)) {
		print_error ("%s", xmmsc_result_get_error (res));
	}

	xmmsc_result_dict_foreach (res, print_hash, NULL);
	xmmsc_result_unref (res);
}

void
get_keys (const void *key, xmmsc_result_value_type_t type, const void *value, void *user_data)
{
	GList **l = user_data;
	volume_channel_t *chan;

	g_return_if_fail (l);

	chan = g_new (volume_channel_t, 1);
	chan->name = g_strdup ((const gchar *)key);
	chan->volume = (guint)value;

	*l = g_list_prepend (*l, chan);
}

guint
volume_get (xmmsc_connection_t *conn, const gchar *name)
{
	xmmsc_result_t *res;
	guint ret;

	res = xmmsc_playback_volume_get (conn);
	xmmsc_result_wait (res);

	if (xmmsc_result_iserror (res)) {
		print_error ("Failed to get volume: %s",
		             xmmsc_result_get_error (res));
	}

	if (!xmmsc_result_get_dict_entry_uint (res, name, &ret)) {
		ret = 0;
	}

	xmmsc_result_unref (res);

	return ret;
}

void
cmd_volume (xmmsc_connection_t *conn, gint argc, gchar **argv)
{
	xmmsc_result_t *res;
	int i;
	GList *channels, *cur;
	gchar *end = NULL;
	gint vol;
	gboolean vol_rel = FALSE;

	if (argc < 3) {
		print_error ("You must specify a volume level.");
	}

	vol = strtol (argv[argc - 1], &end, 10);
	if (end == argv[argc - 1]) {
		print_error ("Please specify a number from 0-100.");
	}

	if (*argv[argc - 1] == '+' || *argv[argc - 1] == '-') {
		vol_rel = TRUE;
	}

	channels = NULL;
	for (i = 2; i < argc - 1; i++) {
		volume_channel_t *chan = g_new (volume_channel_t, 1);
		chan->name = argv[i];
		chan->volume = volume_get (conn, argv[i]);
		channels = g_list_prepend (channels, chan);
	}

	if (!channels) {
		res = xmmsc_playback_volume_get (conn);
		xmmsc_result_wait (res);

		if (xmmsc_result_iserror (res)) {
			print_error ("Failed to get channel information: %s",
			             xmmsc_result_get_error (res));
		}

		xmmsc_result_dict_foreach (res, get_keys, &channels);

		xmmsc_result_unref (res);
	}

	for (cur = channels; cur; cur = g_list_next (cur)) {
		volume_channel_t *chan = cur->data;

		if (vol_rel) {
			chan->volume += vol;
		} else {
			chan->volume = vol;
		}

		res = xmmsc_playback_volume_set (conn, chan->name, chan->volume);
		xmmsc_result_wait (res);

		if (xmmsc_result_iserror (res)) {
			print_error ("Failed to set volume: %s",
			             xmmsc_result_get_error (res));
		}

		xmmsc_result_unref (res);
	}

	g_list_free (channels);
}


void
cmd_volume_list (xmmsc_connection_t *conn, gint argc, gchar **argv)
{
	xmmsc_result_t *res;

	res = xmmsc_playback_volume_get (conn);
	xmmsc_result_wait (res);

	if (xmmsc_result_iserror (res)) {
		print_error ("Failed to get volume: %s",
		             xmmsc_result_get_error (res));
	}
	xmmsc_result_dict_foreach (res, print_hash, NULL);

	xmmsc_result_unref (res);
}