/* ========================================================================
 * PlantUML : a free UML diagram generator
 * ========================================================================
 *
 * (C) Copyright 2009-2024, Arnaud Roques
 *
 * Project Info:  https://plantuml.com
 * 
 * If you like this project or if you find it useful, you can support us at:
 * 
 * https://plantuml.com/patreon (only 1$ per month!)
 * https://plantuml.com/paypal
 * 
 * This file is part of PlantUML.
 *
 * PlantUML 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.
 *
 * PlantUML 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 library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301,
 * USA.
 *
 *
 * Original Author:  Arnaud Roques
 * 
 *
 */
package net.sourceforge.plantuml.png;

import java.awt.image.BufferedImage;
import java.io.IOException;
import java.io.OutputStream;

import net.sourceforge.plantuml.klimt.awt.PortableImage;
import net.sourceforge.plantuml.klimt.awt.PortableImageFactory;
import net.sourceforge.plantuml.klimt.color.ColorMapper;
import net.sourceforge.plantuml.png.quant.QuantUtils;
import net.sourceforge.plantuml.png.quant.Quantify555;
import net.sourceforge.plantuml.png.quant.QuantifyPacked28;
import net.sourceforge.plantuml.security.SFile;
import net.sourceforge.plantuml.security.SImageIO;
import net.sourceforge.plantuml.utils.Log;

public class PngIO {
	// ::remove folder when __HAXE__

	// ::comment when __TEAVM__
	private static final String copyleft = "Generated by https://plantuml.com";

	public static void write(PortableImage image, ColorMapper mapper, SFile file, String metadata, int dpi)
			throws IOException {
		try (OutputStream os = file.createBufferedOutputStream()) {
			write(image, mapper, os, metadata, dpi);
		}
		Log.debug(() -> "File is " + file);
		Log.debug(() -> "File size " + file.length());
		if (file.length() == 0) {
			Log.error("File size is zero: " + file);
			SImageIO.write(image, "png", file);
		}
	}

	public static void write(PortableImage image, ColorMapper mapper, OutputStream os, String metadata, int dpi)
			throws IOException {
		final BufferedImage bufferedImage = QuantUtils.toBufferedARGBorRGB(image.getBufferedImage());
		if (bufferedImage != null) {
			final int type = bufferedImage.getType();
			assert type == BufferedImage.TYPE_INT_ARGB || type == BufferedImage.TYPE_INT_RGB
					|| type == BufferedImage.TYPE_3BYTE_BGR || type == BufferedImage.TYPE_4BYTE_ABGR;

			final boolean hasAlpha = type == BufferedImage.TYPE_INT_ARGB || type == BufferedImage.TYPE_4BYTE_ABGR;
			Log.info(() -> "Trying to pack image. hasAlpha=" + hasAlpha);

			BufferedImage tmp = null;
			if (hasAlpha == false) {
				final long memBefore555 = getUsedMemoryMB();
				final long start555 = System.currentTimeMillis();
				tmp = Quantify555.packMeIfPossible(bufferedImage);
				final long duration555 = System.currentTimeMillis() - start555;
				final long memAfter555 = getUsedMemoryMB();
				final boolean success555 = tmp != null;
				Log.info(() -> "Quantify555: " + (success555 ? "SUCCESS" : "FAILED") + " in " + duration555
						+ " ms, memory " + memBefore555 + " -> " + memAfter555 + " MB (delta: "
						+ (memAfter555 - memBefore555) + " MB)");
			}
			if (tmp == null) {
				final long memBefore28 = getUsedMemoryMB();
				final long start28 = System.currentTimeMillis();
				tmp = QuantifyPacked28.packMeIfPossible(bufferedImage);
				final long duration28 = System.currentTimeMillis() - start28;
				final long memAfter28 = getUsedMemoryMB();
				final boolean success28 = tmp != null;
				Log.info(() -> "QuantifyPacked28: " + (success28 ? "SUCCESS" : "FAILED") + " in " + duration28
						+ " ms, memory " + memBefore28 + " -> " + memAfter28 + " MB (delta: "
						+ (memAfter28 - memBefore28) + " MB)");
			}

			if (tmp != null)
				image = PortableImageFactory.build(tmp);
		}

		PngIOMetadata.writeWithMetadata(image.getBufferedImage(), os, metadata, dpi, null, 7);
	}
	// ::done

	public static long getUsedMemoryMB() {
		final Runtime rt = Runtime.getRuntime();
		return (rt.totalMemory() - rt.freeMemory()) / (1024 * 1024);
	}

//	/** writes a BufferedImage of type TYPE_INT_ARGB to PNG using PNGJ */
//	public static void writeARGB(BufferedImage bi, OutputStream os, String metadata) {
//		// if (bi.getType() != BufferedImage.TYPE_INT_ARGB)
//		// throw new PngjException("This method expects  BufferedImage.TYPE_INT_ARGB");
//		ImageInfo imi = new ImageInfo(bi.getWidth(), bi.getHeight(), 8, false);
//		PngChunkTEXT chunkText = new PngChunkTEXT(imi, "copyleft", copyleft);
//		// PngChunkTEXT chunkTextDebug = new PngChunkTEXT(imi, "debug", "debugData");
//		PngChunkITXT meta = new PngChunkITXT(imi);
//		meta.setKeyVal("plantuml", metadata);
//		meta.setCompressed(true);
//
//		PngWriter pngw = new PngWriter(os, imi);
//		pngw.setCompLevel(9);// maximum compression, not critical usually
//		// pngw.setFilterType(FilterType.FILTER_ADAPTIVE_FAST); // see what you prefer here
//		// pngw.setFilterType(FilterType.FILTER_ADAPTIVE_MEDIUM); // see what you prefer here
//		pngw.setFilterType(FilterType.FILTER_ADAPTIVE_FULL); // see what you prefer here
//		pngw.queueChunk(chunkText);
//		// // pngw.queueChunk(chunkTextDebug);
//		pngw.queueChunk(meta);
//		DataBufferInt db = ((DataBufferInt) bi.getRaster().getDataBuffer());
//		SinglePixelPackedSampleModel samplemodel = (SinglePixelPackedSampleModel) bi.getSampleModel();
//		if (db.getNumBanks() != 1)
//			throw new PngjException("This method expects one bank");
//		ImageLineInt line = new ImageLineInt(imi);
//		for (int row = 0; row < imi.rows; row++) {
//			int elem = samplemodel.getOffset(0, row);
//			for (int col = 0, j = 0; col < imi.cols; col++) {
//				int sample = db.getElem(elem++);
//				line.scanline[j++] = (sample & 0xFF0000) >> 16; // R
//				line.scanline[j++] = (sample & 0xFF00) >> 8; // G
//				line.scanline[j++] = (sample & 0xFF); // B
//				// line.scanline[j++] = (((sample & 0xFF000000) >> 24) & 0xFF); // A
//			}
//			pngw.writeRow(line, row);
//		}
//		pngw.end();
//	}

}
