// Copyright (c) 2014, Thomas Goyne <plorkyeran@aegisub.org>
//
// Permission to use, copy, modify, and distribute this software for any
// purpose with or without fee is hereby granted, provided that the above
// copyright notice and this permission notice appear in all copies.
//
// THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
// WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
// MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
// ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
// WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
// ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
// OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
//
// Aegisub Project http://www.aegisub.org/

#include "include/aegisub/audio_provider.h"

#include "audio_controller.h"
#include "options.h"

#include <libaegisub/file_mapping.h>
#include <libaegisub/format.h>
#include <libaegisub/fs.h>
#include <libaegisub/path.h>
#include <libaegisub/make_unique.h>

#include <boost/filesystem/path.hpp>
#include <boost/interprocess/detail/os_thread_functions.hpp>
#include <thread>

namespace {
class HDAudioProvider final : public AudioProviderWrapper {
	std::unique_ptr<agi::temp_file_mapping> file;
	std::atomic<bool> cancelled = {false};
	std::thread decoder;

	void FillBuffer(void *buf, int64_t start, int64_t count) const override {
		auto missing = std::min(count, start + count - decoded_samples);
		if (missing > 0) {
			memset(static_cast<int16_t*>(buf) + count - missing, 0, missing * bytes_per_sample);
			count -= missing;
		}

		if (count > 0) {
			start *= bytes_per_sample;
			count *= bytes_per_sample;
			memcpy(buf, file->read(start, count), count);
		}
	}

public:
	HDAudioProvider(std::unique_ptr<AudioProvider> src)
	: AudioProviderWrapper(std::move(src))
	{
		decoded_samples = 0;

		auto path = OPT_GET("Audio/Cache/HD/Location")->GetString();
		if (path == "default")
			path = "?temp";
		auto cache_dir = config::path->MakeAbsolute(config::path->Decode(path), "?temp");

		// Check free space
		if ((uint64_t)num_samples * bytes_per_sample > agi::fs::FreeSpace(cache_dir))
			throw agi::AudioCacheOpenError("Not enough free disk space in " + cache_dir.string() + " to cache the audio");

		auto filename = agi::format("audio-%lld-%lld", time(nullptr),
			boost::interprocess::ipcdetail::get_current_process_id());

		file = agi::make_unique<agi::temp_file_mapping>(cache_dir / filename, num_samples * bytes_per_sample);
		decoder = std::thread([&] {
			int64_t block = 65536;
			for (int64_t i = 0; i < num_samples; i += block) {
				if (cancelled) break;
				block = std::min(block, num_samples - i);
				source->GetAudio(file->write(i * bytes_per_sample, block * bytes_per_sample), i, block);
				decoded_samples += block;
			}
		});
	}

	~HDAudioProvider() {
		cancelled = true;
		decoder.join();
	}
};
}

std::unique_ptr<AudioProvider> CreateHDAudioProvider(std::unique_ptr<AudioProvider> src) {
	return agi::make_unique<HDAudioProvider>(std::move(src));
}