/*
 * 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 "MixerInternal.hxx"
#include "OutputAPI.hxx"
#include "output/WinmmOutputPlugin.hxx"
#include "util/Error.hxx"
#include "util/Domain.hxx"

#include <mmsystem.h>

#include <assert.h>
#include <math.h>
#include <windows.h>

struct WinmmMixer final : public Mixer {
	WinmmOutput *output;

	WinmmMixer(WinmmOutput *_output)
		:Mixer(winmm_mixer_plugin),
		output(_output) {
	}
};

static constexpr Domain winmm_mixer_domain("winmm_mixer");

static inline int
winmm_volume_decode(DWORD volume)
{
	return lround((volume & 0xFFFF) / 655.35);
}

static inline DWORD
winmm_volume_encode(int volume)
{
	int value = lround(volume * 655.35);
	return MAKELONG(value, value);
}

static Mixer *
winmm_mixer_init(void *ao, gcc_unused const config_param &param,
		 gcc_unused Error &error)
{
	assert(ao != nullptr);

	return new WinmmMixer((WinmmOutput *)ao);
}

static void
winmm_mixer_finish(Mixer *data)
{
	WinmmMixer *wm = (WinmmMixer *)data;

	delete wm;
}

static int
winmm_mixer_get_volume(Mixer *mixer, Error &error)
{
	WinmmMixer *wm = (WinmmMixer *) mixer;
	DWORD volume;
	HWAVEOUT handle = winmm_output_get_handle(wm->output);
	MMRESULT result = waveOutGetVolume(handle, &volume);

	if (result != MMSYSERR_NOERROR) {
		error.Set(winmm_mixer_domain, "Failed to get winmm volume");
		return -1;
	}

	return winmm_volume_decode(volume);
}

static bool
winmm_mixer_set_volume(Mixer *mixer, unsigned volume, Error &error)
{
	WinmmMixer *wm = (WinmmMixer *) mixer;
	DWORD value = winmm_volume_encode(volume);
	HWAVEOUT handle = winmm_output_get_handle(wm->output);
	MMRESULT result = waveOutSetVolume(handle, value);

	if (result != MMSYSERR_NOERROR) {
		error.Set(winmm_mixer_domain, "Failed to set winmm volume");
		return false;
	}

	return true;
}

const struct mixer_plugin winmm_mixer_plugin = {
	winmm_mixer_init,
	winmm_mixer_finish,
	nullptr,
	nullptr,
	winmm_mixer_get_volume,
	winmm_mixer_set_volume,
	false,
};