/*
 * Copyright (C) 2003-2013 The Music Player Daemon Project
 * http://www.musicpd.org
 *
 * 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 "config.h"
#include "PlayerControl.hxx"
#include "Idle.hxx"
#include "song.h"
#include "DecoderControl.hxx"
#include "Main.hxx"

#include <cmath>

#include <assert.h>
#include <stdio.h>

static void
pc_enqueue_song_locked(struct player_control *pc, struct song *song);

player_control::player_control(unsigned _buffer_chunks,
			       unsigned _buffered_before_play)
	:buffer_chunks(_buffer_chunks),
	 buffered_before_play(_buffered_before_play),
	 thread(nullptr),
	 command(PLAYER_COMMAND_NONE),
	 state(PLAYER_STATE_STOP),
	 error_type(PLAYER_ERROR_NONE),
	 error(nullptr),
	 next_song(nullptr),
	 cross_fade_seconds(0),
	 mixramp_db(0),
	 mixramp_delay_seconds(std::nanf("")),
	 total_play_time(0),
	 border_pause(false)
{
}

player_control::~player_control()
{
	if (next_song != nullptr)
		song_free(next_song);
}

static void
player_command_wait_locked(struct player_control *pc)
{
	while (pc->command != PLAYER_COMMAND_NONE)
		pc->cond.wait(pc->mutex);
}

static void
player_command_locked(struct player_control *pc, enum player_command cmd)
{
	assert(pc->command == PLAYER_COMMAND_NONE);

	pc->command = cmd;
	pc->Signal();
	player_command_wait_locked(pc);
}

static void
player_command(struct player_control *pc, enum player_command cmd)
{
	pc->Lock();
	player_command_locked(pc, cmd);
	pc->Unlock();
}

void
player_control::Play(struct song *song)
{
	assert(song != NULL);

	Lock();

	if (state != PLAYER_STATE_STOP)
		player_command_locked(this, PLAYER_COMMAND_STOP);

	assert(next_song == nullptr);

	pc_enqueue_song_locked(this, song);

	assert(next_song == nullptr);

	Unlock();

	idle_add(IDLE_PLAYER);
}

void
player_control::Cancel()
{
	player_command(this, PLAYER_COMMAND_CANCEL);
	assert(next_song == NULL);
}

void
player_control::Stop()
{
	player_command(this, PLAYER_COMMAND_CLOSE_AUDIO);
	assert(next_song == nullptr);

	idle_add(IDLE_PLAYER);
}

void
player_control::UpdateAudio()
{
	player_command(this, PLAYER_COMMAND_UPDATE_AUDIO);
}

void
player_control::Kill()
{
	assert(thread != NULL);

	player_command(this, PLAYER_COMMAND_EXIT);
	g_thread_join(thread);
	thread = NULL;

	idle_add(IDLE_PLAYER);
}

void
player_control::Pause()
{
	Lock();

	if (state != PLAYER_STATE_STOP) {
		player_command_locked(this, PLAYER_COMMAND_PAUSE);
		idle_add(IDLE_PLAYER);
	}

	Unlock();
}

static void
pc_pause_locked(struct player_control *pc)
{
	if (pc->state != PLAYER_STATE_STOP) {
		player_command_locked(pc, PLAYER_COMMAND_PAUSE);
		idle_add(IDLE_PLAYER);
	}
}

void
player_control::SetPause(bool pause_flag)
{
	Lock();

	switch (state) {
	case PLAYER_STATE_STOP:
		break;

	case PLAYER_STATE_PLAY:
		if (pause_flag)
			pc_pause_locked(this);
		break;

	case PLAYER_STATE_PAUSE:
		if (!pause_flag)
			pc_pause_locked(this);
		break;
	}

	Unlock();
}

void
player_control::SetBorderPause(bool _border_pause)
{
	Lock();
	border_pause = _border_pause;
	Unlock();
}

player_status
player_control::GetStatus()
{
	player_status status;

	Lock();
	player_command_locked(this, PLAYER_COMMAND_REFRESH);

	status.state = state;

	if (state != PLAYER_STATE_STOP) {
		status.bit_rate = bit_rate;
		status.audio_format = audio_format;
		status.total_time = total_time;
		status.elapsed_time = elapsed_time;
	}

	Unlock();

	return status;
}

void
player_control::SetError(player_error type, GError *_error)
{
	assert(type != PLAYER_ERROR_NONE);
	assert(_error != NULL);

	if (error_type != PLAYER_ERROR_NONE)
	    g_error_free(error);

	error_type = type;
	error = _error;
}

void
player_control::ClearError()
{
	Lock();

	if (error_type != PLAYER_ERROR_NONE) {
	    error_type = PLAYER_ERROR_NONE;
	    g_error_free(error);
	}

	Unlock();
}

char *
player_control::GetErrorMessage() const
{
	Lock();
	char *message = error_type != PLAYER_ERROR_NONE
		? g_strdup(error->message)
		: NULL;
	Unlock();
	return message;
}

static void
pc_enqueue_song_locked(struct player_control *pc, struct song *song)
{
	assert(song != NULL);
	assert(pc->next_song == NULL);

	pc->next_song = song;
	player_command_locked(pc, PLAYER_COMMAND_QUEUE);
}

void
player_control::EnqueueSong(struct song *song)
{
	assert(song != NULL);

	Lock();
	pc_enqueue_song_locked(this, song);
	Unlock();
}

bool
player_control::Seek(struct song *song, float seek_time)
{
	assert(song != NULL);

	Lock();

	if (next_song != nullptr)
		song_free(next_song);

	next_song = song;
	seek_where = seek_time;
	player_command_locked(this, PLAYER_COMMAND_SEEK);
	Unlock();

	assert(next_song == nullptr);

	idle_add(IDLE_PLAYER);

	return true;
}

void
player_control::SetCrossFade(float _cross_fade_seconds)
{
	if (_cross_fade_seconds < 0)
		_cross_fade_seconds = 0;
	cross_fade_seconds = _cross_fade_seconds;

	idle_add(IDLE_OPTIONS);
}

void
player_control::SetMixRampDb(float _mixramp_db)
{
	mixramp_db = _mixramp_db;

	idle_add(IDLE_OPTIONS);
}

void
player_control::SetMixRampDelay(float _mixramp_delay_seconds)
{
	mixramp_delay_seconds = _mixramp_delay_seconds;

	idle_add(IDLE_OPTIONS);
}
