// Copyright 2010 Dolphin Emulator Project
// Licensed under GPLv2+
// Refer to the license.txt file included.

#include <algorithm>
#include <cstdio>
#include <memory>

#include "Common/CommonTypes.h"
#include "Common/FileUtil.h"
#include "DiscIO/CISOBlob.h"

namespace DiscIO
{

static const char CISO_MAGIC[] = "CISO";

CISOFileReader::CISOFileReader(std::FILE* file)
	: m_file(file)
{
	m_size = m_file.GetSize();

	CISOHeader header;
	m_file.ReadArray(&header, 1);

	m_block_size = header.block_size;

	MapType count = 0;
	for (u32 idx = 0; idx < CISO_MAP_SIZE; ++idx)
		m_ciso_map[idx] = (1 == header.map[idx]) ? count++ : UNUSED_BLOCK_ID;
}

std::unique_ptr<CISOFileReader> CISOFileReader::Create(const std::string& filename)
{
	if (IsCISOBlob(filename))
	{
		File::IOFile f(filename, "rb");
		return std::unique_ptr<CISOFileReader>(new CISOFileReader(f.ReleaseHandle()));
	}

	return nullptr;
}

u64 CISOFileReader::GetDataSize() const
{
	return CISO_MAP_SIZE * m_block_size;
}

u64 CISOFileReader::GetRawSize() const
{
	return m_size;
}

bool CISOFileReader::Read(u64 offset, u64 nbytes, u8* out_ptr)
{
	while (nbytes != 0)
	{
		u64 const block = offset / m_block_size;
		u64 const data_offset = offset % m_block_size;
		u64 const bytes_to_read = std::min(m_block_size - data_offset, nbytes);

		if (block < CISO_MAP_SIZE && UNUSED_BLOCK_ID != m_ciso_map[block])
		{
			// calculate the base address
			u64 const file_off = CISO_HEADER_SIZE + m_ciso_map[block] * (u64)m_block_size + data_offset;

			if (!(m_file.Seek(file_off, SEEK_SET) && m_file.ReadArray(out_ptr, bytes_to_read)))
			{
				m_file.Clear();
				return false;
			}
		}
		else
		{
			std::fill_n(out_ptr, bytes_to_read, 0);
		}

		out_ptr += bytes_to_read;
		offset  += bytes_to_read;
		nbytes  -= bytes_to_read;
	}

	return true;
}

bool IsCISOBlob(const std::string& filename)
{
	File::IOFile f(filename, "rb");

	CISOHeader header;
	return (f.ReadArray(&header, 1) &&
		std::equal(header.magic, header.magic + sizeof(header.magic), CISO_MAGIC));
}

}  // namespace
