// Copyright Dirk Lemstra https://github.com/dlemstra/Magick.NET.
// Licensed under the Apache License, Version 2.0.

using System.IO;

#if Q8
using QuantumType = System.Byte;
#elif Q16
using QuantumType = System.UInt16;
#elif Q16HDRI
using QuantumType = System.Single;
#else
#error Not implemented!
#endif

namespace ImageMagick.ImageOptimizers;

/// <summary>
/// Class that can be used to optimize gif files.
/// </summary>
public sealed class GifOptimizer : IImageOptimizer
{
    /// <summary>
    /// Gets the format that the optimizer supports.
    /// </summary>
    public IMagickFormatInfo Format
        => MagickFormatInfo.Create(MagickFormat.Gif)!;

    /// <summary>
    /// Gets or sets a value indicating whether various compression types will be used to find
    /// the smallest file. This process will take extra time because the file has to be written
    /// multiple times.
    /// </summary>
    bool IImageOptimizer.OptimalCompression { get; set; }

    /// <summary>
    /// Performs compression on the specified file. With some formats the image will be decoded
    /// and encoded and this will result in a small quality reduction. If the new file size is not
    /// smaller the file won't be overwritten.
    /// </summary>
    /// <param name="file">The gif file to compress.</param>
    /// <returns>True when the image could be compressed otherwise false.</returns>
    public bool Compress(FileInfo file)
        => LosslessCompress(file);

    /// <summary>
    /// Performs compression on the specified file. With some formats the image will be decoded
    /// and encoded and this will result in a small quality reduction. If the new file size is not
    /// smaller the file won't be overwritten.
    /// </summary>
    /// <param name="fileName">The file name of the gif image to compress.</param>
    /// <returns>True when the image could be compressed otherwise false.</returns>
    public bool Compress(string fileName)
        => LosslessCompress(fileName);

    /// <summary>
    /// Performs compression on the specified stream. With some formats the image will be decoded
    /// and encoded and this will result in a small quality reduction. If the new size is not
    /// smaller the stream won't be overwritten.
    /// </summary>
    /// <param name="stream">The stream of the gif image to compress.</param>
    /// <returns>True when the image could be compressed otherwise false.</returns>
    public bool Compress(Stream stream)
        => LosslessCompress(stream);

    /// <summary>
    /// Performs lossless compression on the specified file. If the new file size is not smaller
    /// the file won't be overwritten.
    /// </summary>
    /// <param name="file">The gif file to compress.</param>
    /// <returns>True when the image could be compressed otherwise false.</returns>
    public bool LosslessCompress(FileInfo file)
    {
        Throw.IfNull(file);

        return DoLosslessCompress(file);
    }

    /// <summary>
    /// Performs lossless compression on the specified file. If the new file size is not smaller
    /// the file won't be overwritten.
    /// </summary>
    /// <param name="fileName">The file name of the gif image to compress.</param>
    /// <returns>True when the image could be compressed otherwise false.</returns>
    public bool LosslessCompress(string fileName)
    {
        var filePath = FileHelper.CheckForBaseDirectory(fileName);

        return DoLosslessCompress(new FileInfo(filePath));
    }

    /// <summary>
    /// Performs lossless compression on the specified stream. If the new stream size is not smaller
    /// the stream won't be overwritten.
    /// </summary>
    /// <param name="stream">The stream of the gif image to compress.</param>
    /// <returns>True when the image could be compressed otherwise false.</returns>
    public bool LosslessCompress(Stream stream)
    {
        ImageOptimizerHelper.CheckStream(stream);

        var isCompressed = false;
        var startPosition = stream.Position;

        using var images = new MagickImageCollection(stream);
        if (images.Count == 1)
            isCompressed = DoLosslessCompress(images[0], stream, startPosition);

        stream.Position = startPosition;
        return isCompressed;
    }

    private static bool DoLosslessCompress(FileInfo file)
    {
        using var images = new MagickImageCollection(file);
        if (images.Count == 1)
            return DoLosslessCompress(file, images[0]);

        return false;
    }

    private static bool DoLosslessCompress(FileInfo file, IMagickImage<QuantumType> image)
    {
        ImageOptimizerHelper.CheckFormat(image, MagickFormat.Gif);

        LosslessCompress(image);

        using var tempFile = new TemporaryFile();
        image.Write(tempFile.FullName);

        var isCompressed = tempFile.Length < file.Length;
        if (isCompressed)
            tempFile.CopyTo(file);

        return isCompressed;
    }

    private static void LosslessCompress(IMagickImage<QuantumType> image)
    {
        image.Strip();
        MagickImage.GetSettings(image).Interlace = Interlace.NoInterlace;
    }

    private static bool DoLosslessCompress(IMagickImage<QuantumType> image, Stream stream, long startPosition)
    {
        ImageOptimizerHelper.CheckFormat(image, MagickFormat.Gif);

        LosslessCompress(image);

        using var memStream = new MemoryStream();
        image.Write(memStream);

        var isCompressed = memStream.Length < (stream.Length - startPosition);
        if (isCompressed)
        {
            memStream.Position = 0;
            memStream.CopyTo(stream);
            stream.SetLength(startPosition + memStream.Length);
        }

        return isCompressed;
    }
}
