#include "toonz/dpiscale.h"

#include "toonz/levelproperties.h"

#include "toonz/toonzscene.h"

#include "toonz/txsheet.h"

#include "toonz/txshcell.h"

#include "toonz/txshsimplelevel.h"

#include "toonz/tcamera.h"

#include "toonz/txshleveltypes.h"

#include "toonz/stage.h"

#include "timagecache.h"

#include "trasterimage.h"

#include "ttoonzimage.h"

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

TAffine getDpiAffine(TXshSimpleLevel *level,

					 const TFrameId &fid,

					 bool forceFullSampling)

{

	const double factor = Stage::inch;

	if (level->getType() == PLI_XSHLEVEL)

		return TAffine();

	LevelProperties *prop = level->getProperties();

	TAffine aff;

	std::string imageId = level->getImageId(fid);

	int frameStatus = level->getFrameStatus(fid);

	if (frameStatus & TXshSimpleLevel::CleanupPreview) {

		TRasterImageP ri = TImageCache::instance()->get(imageId, false);

		if (ri) {

			double dpix = 0, dpiy = 0;

			ri->getDpi(dpix, dpiy);

			if (dpix != 0.0 && dpiy != 0.0)

				return TScale(factor / dpix, factor / dpiy);

		}

	}

	int subs = prop->getSubsampling();

	if (level->getType() != PLI_XSHLEVEL) {

		TPointD dpi = level->getDpi(fid);

		if (dpi.x != 0 && dpi.y != 0)

			aff = TScale(factor / dpi.x, factor / dpi.y);

		if (!forceFullSampling)

			TImageCache::instance()->getSubsampling(imageId, subs);

	}

	if (subs != 1 && !forceFullSampling)

		aff = TScale(subs) * aff;

	return aff;

}

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

TAffine getDpiAffine(TCamera *camera)

{

	const double factor = Stage::inch;

	TDimensionD size = camera->getSize();

	TDimension res = camera->getRes();

	double sx = factor * size.lx / res.lx;

	double sy = factor * size.ly / res.ly;

	return TScale(sx, sy);

}

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

TPointD getCurrentDpiScale(TXshSimpleLevel *sl, const TFrameId &fid)

{

	TAffine aff = getDpiAffine(sl, fid);

	if ((sl->getType() == TZP_XSHLEVEL || sl->getType() == OVL_XSHLEVEL) && sl->getProperties()->getSubsampling() > 1) {

		int subs = sl->getProperties()->getSubsampling();

		TImageP img = TImageCache::instance()->get(sl->getImageId(fid), false);

		TToonzImageP ti(img);

		TRasterImageP ri(img);

		if (ti)

			subs = ti->getSubsampling();

		else if (ri)

			subs = ri->getSubsampling();

		double f = 1.0 / subs;

		return aff * TPointD(f, f);

	} else

		return aff * TPointD(1, 1);

}

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

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

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

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

#ifdef FORSE_OBSOLETO

double getCurrentCameraStandDpi()

{

	const double defaultDpi = 100;

	TApplication *app = TApplication::instance();

	if (app->isEditingLevelFrame()) {

		TXshSimpleLevel *sl = app->getCurrentLevel() ? app->getCurrentLevel()->getSimpleLevel() : 0;

		if (sl) {

			double dpi = sl->getDpi().x;

			return dpi > 0.0 ? dpi : defaultDpi;

			return sl->getDpi().x;

		} else

			return defaultDpi;

	} else {

		ToonzScene *scene = app->getCurrentScene();

		TCamera *camera = scene->getCurrentCamera();

		TDimensionD size = camera->getSize();

		TDimension res = camera->getRes();

		assert(size.lx > 0);

		if (size.lx > 0)

			return res.lx / size.lx;

		else

			return defaultDpi;

	}

}

#endif