/*
 * Copyright 2003-2018 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 "Dop.hxx"
#include "PcmBuffer.hxx"
#include "AudioFormat.hxx"
#include "util/ConstBuffer.hxx"

#include <assert.h>

static constexpr uint32_t
pcm_two_dsd_to_dop_marker1(uint8_t a, uint8_t b) noexcept
{
	return 0xff050000 | (a << 8) | b;
}

static constexpr uint32_t
pcm_two_dsd_to_dop_marker2(uint8_t a, uint8_t b) noexcept
{
	return 0xfffa0000 | (a << 8) | b;
}

/**
 * @param num_dop_quads the number of "quad" bytes per channel in the
 * source buffer; each "quad" will be converted to two 24 bit samples
 * in the destination buffer, one for each marker
 */
static void
DsdToDop(uint32_t *dest, const uint8_t *src,
	 size_t num_dop_quads, unsigned channels) noexcept
{
	for (size_t i = num_dop_quads; i > 0; --i) {
		for (unsigned c = channels; c > 0; --c) {
			/* each 24 bit sample has 16 DSD sample bits
			   plus the magic 0x05 marker */

			*dest++ = pcm_two_dsd_to_dop_marker1(src[0], src[channels]);

			/* seek the source pointer to the next
			   channel */
			++src;
		}

		/* skip the second byte of each channel, because we
		   have already copied it */
		src += channels;

		for (unsigned c = channels; c > 0; --c) {
			/* each 24 bit sample has 16 DSD sample bits
			   plus the magic 0xfa marker */

			*dest++ = pcm_two_dsd_to_dop_marker2(src[0], src[channels]);

			/* seek the source pointer to the next
			   channel */
			++src;
		}

		/* skip the second byte of each channel, because we
		   have already copied it */
		src += channels;
	}
}

ConstBuffer<uint32_t>
pcm_dsd_to_dop(PcmBuffer &buffer, unsigned channels,
	       ConstBuffer<uint8_t> src) noexcept
{
	assert(audio_valid_channel_count(channels));
	assert(src.size % channels == 0);

	const size_t num_src_samples = src.size;
	const size_t num_src_frames = num_src_samples / channels;

	/* this rounds down and discards up to 3 odd frames; not
	   elegant, but good enough for now */
	const size_t num_dop_quads = num_src_frames / 4;
	const size_t num_frames = num_dop_quads * 2;
	const size_t num_samples = num_frames * channels;

	uint32_t *const dest = (uint32_t *)buffer.GetT<uint32_t>(num_samples);
	DsdToDop(dest, src.data, num_dop_quads, channels);
	return { dest, num_samples };
}