#include "toonz/ttilesaver.h"
#include "toonz/ttileset.h"

#define TILE_BIT_SIZE 6
#define TILE_SIZE_MINUS_1 63

//divisione per tileSize approssimata per eccesso
inline int divSup(int x)
{
	// return (x & TILE_SIZE_MINUS_1)? (x>>TILE_BIT_SIZE)+1 : (x>>TILE_BIT_SIZE);
	return ((x + TILE_SIZE_MINUS_1) >> TILE_BIT_SIZE);
}

//------------------------------------------------------------------------

TTileSaverCM32::TTileSaverCM32(const TRasterCM32P &raster, TTileSetCM32 *tileSet)
	: m_raster(raster), m_tileSet(tileSet), m_rowSize(divSup(raster->getLx())), m_savedTiles(m_rowSize * divSup(raster->getLy()), 0)
{
}

//------------------------------------------------------------------------

void TTileSaverCM32::saveTile(int row, int col)
{
	UINT index = m_rowSize * row + col;
	assert(index < m_savedTiles.size());
	if (m_savedTiles[index])
		return;
	m_savedTiles[index] = 1;
	int x = col << TILE_BIT_SIZE;
	int y = row << TILE_BIT_SIZE;
	TRect tileBounds(x, y, x + TILE_SIZE_MINUS_1, y + TILE_SIZE_MINUS_1);
	m_tileSet->add(m_raster, tileBounds);
}

//------------------------------------------------------------------------

void TTileSaverCM32::save(TRect rect)
{
	if (!m_raster->getBounds().overlaps(rect))
		return;
	rect = rect * m_raster->getBounds();

	TPoint p0 = rect.getP00();
	TPoint p1 = rect.getP11();

	int col0 = p0.x >> TILE_BIT_SIZE;
	int row0 = p0.y >> TILE_BIT_SIZE;
	int col1 = p1.x >> TILE_BIT_SIZE;
	int row1 = p1.y >> TILE_BIT_SIZE;

	for (int row = row0; row <= row1; ++row)
		for (int col = col0; col <= col1; ++col)
			saveTile(row, col);
}

//------------------------------------------------------------------------

void TTileSaverCM32::save(TPoint point)
{
	if (m_raster->getBounds().contains(point))
		saveTile(point.y >> TILE_BIT_SIZE, point.x >> TILE_BIT_SIZE);
}

//------------------------------------------------------------------------

TTileSetCM32 *TTileSaverCM32::getTileSet() const
{
	return m_tileSet;
}

//********************************************************************************

TTileSaverFullColor::TTileSaverFullColor(const TRasterP &raster, TTileSetFullColor *tileSet)
	: m_raster(raster), m_tileSet(tileSet), m_rowSize(divSup(raster->getLx())), m_savedTiles(m_rowSize * divSup(raster->getLy()), 0)
{
}

//------------------------------------------------------------------------

void TTileSaverFullColor::saveTile(int row, int col)
{
	UINT index = m_rowSize * row + col;
	assert(index < m_savedTiles.size());
	if (m_savedTiles[index])
		return;
	m_savedTiles[index] = 1;
	int x = col << TILE_BIT_SIZE;
	int y = row << TILE_BIT_SIZE;
	TRect tileBounds(x, y, x + TILE_SIZE_MINUS_1, y + TILE_SIZE_MINUS_1);
	m_tileSet->add(m_raster, tileBounds);
}

//------------------------------------------------------------------------

void TTileSaverFullColor::save(TRect rect)
{
	if (!m_raster->getBounds().overlaps(rect))
		return;
	rect = rect * m_raster->getBounds();

	TPoint p0 = rect.getP00();
	TPoint p1 = rect.getP11();

	int col0 = p0.x >> TILE_BIT_SIZE;
	int row0 = p0.y >> TILE_BIT_SIZE;
	int col1 = p1.x >> TILE_BIT_SIZE;
	int row1 = p1.y >> TILE_BIT_SIZE;

	for (int row = row0; row <= row1; ++row)
		for (int col = col0; col <= col1; ++col)
			saveTile(row, col);
}

//------------------------------------------------------------------------

void TTileSaverFullColor::save(TPoint point)
{
	if (m_raster->getBounds().contains(point))
		saveTile(point.y >> TILE_BIT_SIZE, point.x >> TILE_BIT_SIZE);
}

//------------------------------------------------------------------------

TTileSetFullColor *TTileSaverFullColor::getTileSet() const
{
	return m_tileSet;
}