#include "toonzqt/rasterimagedata.h"
#include "toonzqt/strokesdata.h"
#include "tpaletteutil.h"
#include "trasterimage.h"
#include "toonz/stage.h"
#include "toonz/tcenterlinevectorizer.h"
#include "toonz/ttileset.h"
#include "toonz/toonzimageutils.h"
#include "toonz/toonzscene.h"
#include "toonz/sceneproperties.h"
#include "toonz/fullcolorpalette.h"

#include <memory>

namespace
{
TVectorImageP vectorize(const TImageP &source, const TRectD &rect, const VectorizerConfiguration &config, TAffine transform)
{
	VectorizerCore vc;
	TVectorImageP vi = vc.vectorize(source.getPointer(), config, source->getPalette());
	assert(vi);
	vi->setPalette(source->getPalette());

	double dpiX, dpiY;
	TToonzImageP ti(source);
	TRasterImageP ri(source);
	if (ti)
		ti->getDpi(dpiX, dpiY);
	else if (ri)
		ri->getDpi(dpiX, dpiY);
	else
		return vi;

	TScale sc(dpiX / Stage::inch, dpiY / Stage::inch);
	TTranslation tr(rect.getP00());

	int i;
	for (i = 0; i < (int)vi->getStrokeCount(); i++) {
		TStroke *stroke = vi->getStroke(i);
		stroke->transform((sc.inv() * tr) * transform, true);
	}
	return vi;
}

} //namspace

//===================================================================
// RasterImageData
//-------------------------------------------------------------------

RasterImageData::RasterImageData()
	: m_dpiX(0), m_dpiY(0), m_transformation(), m_dim()
{
}

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

RasterImageData::~RasterImageData()
{
}

//===================================================================
// ToonzImageData
//-------------------------------------------------------------------

ToonzImageData::ToonzImageData()
	: RasterImageData(), m_copiedRaster(0), m_palette(new TPalette())
{
}

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

ToonzImageData::ToonzImageData(const ToonzImageData &src)
	: m_copiedRaster(src.m_copiedRaster), m_palette(src.m_palette), m_usedStyles(src.m_usedStyles)
{
	m_dpiX = src.m_dpiX;
	m_dpiY = src.m_dpiY;
	m_rects = src.m_rects;
	m_strokes = src.m_strokes;
	m_transformation = src.m_transformation;
	m_originalStrokes = src.m_originalStrokes;
	m_dim = src.m_dim;
	assert(m_palette);
}

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

ToonzImageData::~ToonzImageData()
{
}

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

void ToonzImageData::setData(const TRasterP &copiedRaster, const TPaletteP &palette, double dpiX, double dpiY, const TDimension &dim,
							 const std::vector<TRectD> &rects, const std::vector<TStroke> &strokes,
							 const std::vector<TStroke> &originalStrokes,
							 const TAffine &transformation)
{
	m_copiedRaster = copiedRaster;
	m_palette = palette;
	m_dpiX = dpiX;
	m_dpiY = dpiY;
	m_rects = rects;
	m_strokes = strokes;
	m_transformation = transformation;
	m_originalStrokes = originalStrokes;
	m_dim = dim;

	/*-- 使用されているStyleの一覧を作る --*/
	TToonzImageP ti(m_copiedRaster, m_copiedRaster->getBounds());
	ToonzImageUtils::getUsedStyles(m_usedStyles, ti);
}

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

void ToonzImageData::getData(TRasterP &copiedRaster, double &dpiX, double &dpiY,
							 std::vector<TRectD> &rects, std::vector<TStroke> &strokes, std::vector<TStroke> &originalStrokes,
							 TAffine &transformation, TPalette *targetPalette) const
{
	if (!m_copiedRaster || (m_rects.empty() && m_strokes.empty()))
		return;
	copiedRaster = m_copiedRaster->clone();
	dpiX = m_dpiX;
	dpiY = m_dpiY;
	assert(m_palette);
	int i;
	for (i = 0; i < (int)m_rects.size(); i++)
		rects.push_back(m_rects[i]);
	for (i = 0; i < (int)m_strokes.size(); i++)
		strokes.push_back(m_strokes[i]);
	for (i = 0; i < (int)m_originalStrokes.size(); i++)
		originalStrokes.push_back(m_originalStrokes[i]);

	transformation = m_transformation;
	TRasterCM32P cmRas = copiedRaster;

	if (!targetPalette)
		targetPalette = new TPalette();

	if (!cmRas)
		return;
	std::set<int> usedStyles(m_usedStyles);
	TToonzImageP ti(cmRas, cmRas->getBounds());
	if (usedStyles.size() == 0)
		ToonzImageUtils::getUsedStyles(usedStyles, ti);
	std::map<int, int> indexTable;
	mergePalette(targetPalette, indexTable, m_palette, usedStyles);
	ToonzImageUtils::scrambleStyles(ti, indexTable);
	ti->setPalette(m_palette.getPointer());
}

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

StrokesData *ToonzImageData::toStrokesData(ToonzScene *scene) const
{
	assert(scene);
	TRectD rect;
	if (!m_rects.empty())
		rect = m_rects[0];
	else if (!m_strokes.empty())
		rect = m_strokes[0].getBBox();
	unsigned int i;
	for (i = 0; i < m_rects.size(); i++)
		rect += m_rects[i];
	for (i = 0; i < m_strokes.size(); i++)
		rect += m_strokes[i].getBBox();
	TToonzImageP image(m_copiedRaster, m_copiedRaster->getBounds());
	image->setPalette(m_palette.getPointer());
	image->setDpi(m_dpiX, m_dpiY);

	const VectorizerParameters &vParams = *scene->getProperties()->getVectorizerParameters();

	CenterlineConfiguration cConf = vParams.getCenterlineConfiguration(0.0);
	NewOutlineConfiguration oConf = vParams.getOutlineConfiguration(0.0);

	const VectorizerConfiguration &config = vParams.m_isOutline ? static_cast<const VectorizerConfiguration &>(oConf) : static_cast<const VectorizerConfiguration &>(cConf);

	TVectorImageP vi = vectorize(image, rect, config, m_transformation);

	StrokesData *sd = new StrokesData();

	std::set<int> indexes;
	for (i = 0; i < vi->getStrokeCount(); i++)
		indexes.insert(i);

	sd->setImage(vi, indexes);
	return sd;
}

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

int ToonzImageData::getMemorySize() const
{
	int i, size = 0;
	for (i = 0; i < (int)m_strokes.size(); i++)
		size += m_strokes[i].getControlPointCount() * sizeof(TThickPoint) + 100;
	for (i = 0; i < (int)m_originalStrokes.size(); i++)
		size += m_originalStrokes[i].getControlPointCount() * sizeof(TThickPoint) + 100;
	return size + sizeof(*(m_copiedRaster.getPointer())) +
		   sizeof(*(m_palette.getPointer())) +
		   sizeof(*this);
}

//===================================================================
// FullColorImageData
//-------------------------------------------------------------------

FullColorImageData::FullColorImageData()
	: RasterImageData(), m_copiedRaster(0), m_palette(new TPalette())
{
}

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

FullColorImageData::FullColorImageData(const FullColorImageData &src)
	: m_copiedRaster(src.m_copiedRaster), m_palette(src.m_palette)
{
	m_dpiX = src.m_dpiX;
	m_dpiY = src.m_dpiY;
	m_rects = src.m_rects;
	m_strokes = src.m_strokes;
	m_transformation = src.m_transformation;
	m_originalStrokes = src.m_originalStrokes;
	m_dim = src.m_dim;
}

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

FullColorImageData::~FullColorImageData()
{
}

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

void FullColorImageData::setData(const TRasterP &copiedRaster, const TPaletteP &palette, double dpiX, double dpiY, const TDimension &dim,
								 const std::vector<TRectD> &rects, const std::vector<TStroke> &strokes,
								 const std::vector<TStroke> &originalStrokes,
								 const TAffine &transformation)
{
	m_copiedRaster = copiedRaster;
	m_palette = palette;
	m_dpiX = dpiX;
	m_dpiY = dpiY;
	m_rects = rects;
	m_strokes = strokes;
	m_originalStrokes = originalStrokes;
	m_transformation = transformation;
	m_dim = dim;
}

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

void FullColorImageData::getData(TRasterP &copiedRaster, double &dpiX, double &dpiY,
								 std::vector<TRectD> &rects, std::vector<TStroke> &strokes, std::vector<TStroke> &originalStrokes,
								 TAffine &transformation, TPalette *targetPalette) const
{
	if (!m_copiedRaster || (m_rects.empty() && m_strokes.empty()))
		return;
	copiedRaster = m_copiedRaster->clone();
	dpiX = m_dpiX;
	dpiY = m_dpiY;
	int i;
	for (i = 0; i < (int)m_rects.size(); i++)
		rects.push_back(m_rects[i]);
	for (i = 0; i < (int)m_strokes.size(); i++)
		strokes.push_back(m_strokes[i]);
	for (i = 0; i < (int)m_originalStrokes.size(); i++)
		originalStrokes.push_back(m_originalStrokes[i]);
	transformation = m_transformation;

	TRasterP ras = copiedRaster;
	if (!ras)
		return;
	if (!m_palette)
		return;
	if (!targetPalette)
		targetPalette = new TPalette();
	std::set<int> usedStyles;
	TRasterImageP ri(ras);

	for (i = 0; i < m_palette->getPageCount(); i++) {
		TPalette::Page *page = m_palette->getPage(i);
		int j;
		for (j = 0; j < page->getStyleCount(); j++)
			usedStyles.insert(page->getStyleId(j));
	}
	std::map<int, int> indexTable;
	mergePalette(targetPalette, indexTable, m_palette, usedStyles);
	ri->setPalette(m_palette.getPointer());
}

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

StrokesData *FullColorImageData::toStrokesData(ToonzScene *scene) const
{
	assert(scene);
	TRectD rect;
	if (!m_rects.empty())
		rect = m_rects[0];
	else if (!m_strokes.empty())
		rect = m_strokes[0].getBBox();
	unsigned int i;
	for (i = 0; i < m_rects.size(); i++)
		rect += m_rects[i];
	for (i = 0; i < m_strokes.size(); i++)
		rect += m_strokes[i].getBBox();
	TRasterImageP image(m_copiedRaster);
	image->setPalette(FullColorPalette::instance()->getPalette(scene));
	image->setDpi(m_dpiX, m_dpiY);

	const VectorizerParameters *vParams = scene->getProperties()->getVectorizerParameters();
	assert(vParams);

	std::auto_ptr<VectorizerConfiguration> config(vParams->getCurrentConfiguration(0.0));
	TVectorImageP vi = vectorize(image, rect, *config, m_transformation);

	StrokesData *sd = new StrokesData();

	std::set<int> indexes;
	for (i = 0; i < vi->getStrokeCount(); i++)
		indexes.insert(i);

	sd->setImage(vi, indexes);
	return sd;
}

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

int FullColorImageData::getMemorySize() const
{
	int i, size = 0;
	for (i = 0; i < (int)m_strokes.size(); i++)
		size += m_strokes[i].getControlPointCount() * sizeof(TThickPoint) + 100;
	for (i = 0; i < (int)m_originalStrokes.size(); i++)
		size += m_originalStrokes[i].getControlPointCount() * sizeof(TThickPoint) + 100;
	return size + sizeof(*(m_copiedRaster.getPointer())) +
		   sizeof(*(m_palette.getPointer())) +
		   sizeof(*this);
}