/* ScummVM - Graphic Adventure Engine
 *
 * ScummVM is the legal property of its developers, whose names
 * are too numerous to list here. Please refer to the COPYRIGHT
 * file distributed with this source distribution.
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *
 */

#include "common/debug.h"

#include "image/png.h"
#include "graphics/surface.h"

#include "sludge/fileset.h"
#include "sludge/hsi.h"
#include "sludge/imgloader.h"
#include "sludge/sludge.h"

namespace Sludge {

bool ImgLoader::loadImage(int num, const char *fname, Common::SeekableReadStream *stream, Graphics::Surface *dest, int reserve) {
	debugC(3, kSludgeDebugGraphics, "Loading image at position: %d", (int)stream->pos());

	bool dumpPng = false;

	int32 start_ptr = stream->pos();
	if (!loadPNGImage(stream, dest)) {
		stream->seek(start_ptr);
		if (!loadHSIImage(stream, dest, reserve)) {
			return false;
		} else {
			if (num != -1) {
				g_sludge->_resMan->dumpFile(num, Common::String::format("%s%%04d.slx", fname).c_str());
				dumpPng = true;
			}
		}
	} else {
		if (num != -1)
			g_sludge->_resMan->dumpFile(num, Common::String::format("%s%%04d.png", fname).c_str());
	}

	if (!g_sludge->_dumpScripts)
		return true;

	if (dumpPng || (fname && num == -1)) {
		// Debug code to output light map image
		Common::DumpFile *outFile = new Common::DumpFile();
		Common::Path outName;

		if (dumpPng)
			outName = Common::Path(Common::String::format("dumps/%s%04d.png", fname, num));
		else
			outName = Common::Path(Common::String::format("dumps/%s.png", fname));

		outFile->open(outName);
		Image::writePNG(*outFile, *dest);
		outFile->finalize();
		outFile->close();
		delete outFile;
	}
	return true;
}

bool ImgLoader::loadPNGImage(Common::SeekableReadStream *stream, Graphics::Surface *dest, bool checkSig) {
	::Image::PNGDecoder png;

	// set skip signature
	if (!checkSig) {
		png.setSkipSignature(true);
	}

	if (!png.loadStream(*stream))
		return false;

	// set value back
	if (!checkSig) {
		png.setSkipSignature(false);
	}

	const Graphics::Surface *sourceSurface = png.getSurface();
	Graphics::Surface *pngSurface = sourceSurface->convertTo(*g_sludge->getScreenPixelFormat(), png.getPalette());
	dest->copyFrom(*pngSurface);
	pngSurface->free();
	delete pngSurface;
	return true;
}

bool ImgLoader::loadHSIImage(Common::SeekableReadStream *stream, Graphics::Surface *dest, int reserve) {
	HSIDecoder hsiDecoder;
	hsiDecoder.setReserve(reserve);
	if (!hsiDecoder.loadStream(*stream)) {
		return false;
	}
	dest->copyFrom(*(hsiDecoder.getSurface()));
	return true;
}

} // End of namespace Sludge