using System;

using BCnEncoder.Shared;

namespace BCnEncoder.Encoder

{

internal class Bc2BlockEncoder : BaseBcLdrBlockEncoder<Bc2Block>

{

public override Bc2Block EncodeBlock(RawBlock4X4Rgba32 block, CompressionQuality quality)

{

switch (quality)

{

case CompressionQuality.Fast:

return Bc2BlockEncoderFast.EncodeBlock(block);

case CompressionQuality.Balanced:

return Bc2BlockEncoderBalanced.EncodeBlock(block);

case CompressionQuality.BestQuality:

return Bc2BlockEncoderSlow.EncodeBlock(block);

default:

throw new ArgumentOutOfRangeException(nameof(quality), quality, null);

}

}

/// <inheritdoc />

public override CompressionFormat EncodedFormat => CompressionFormat.Bc2;

#region Encoding private stuff

private static Bc2Block TryColors(RawBlock4X4Rgba32 rawBlock, ColorRgb565 color0, ColorRgb565 color1, out float error, float rWeight = 0.3f, float gWeight = 0.6f, float bWeight = 0.1f)

{

var output = new Bc2Block();

var pixels = rawBlock.AsSpan;

output.color0 = color0;

output.color1 = color1;

var c0 = color0.ToColorRgb24();

var c1 = color1.ToColorRgb24();

ReadOnlySpan<ColorRgb24> colors = stackalloc ColorRgb24[] {

c0,

c1,

c0.InterpolateThird(c1, 1),

c0.InterpolateThird(c1, 2)

};

error = 0;

for (var i = 0; i < 16; i++)

{

var color = pixels[i];

output.SetAlpha(i, color.a);

output[i] = ColorChooser.ChooseClosestColor4(colors, color, rWeight, gWeight, bWeight, out var e);

error += e;

}

return output;

}

#endregion

#region Encoders

private static class Bc2BlockEncoderFast

{

internal static Bc2Block EncodeBlock(RawBlock4X4Rgba32 rawBlock)

{

var pixels = rawBlock.AsSpan;

PcaVectors.Create(pixels, out var mean, out var principalAxis);

PcaVectors.GetMinMaxColor565(pixels, mean, principalAxis, out var min, out var max);

var c0 = max;

var c1 = min;

var output = TryColors(rawBlock, c0, c1, out var _);

return output;

}

}

private static class Bc2BlockEncoderBalanced

{

private const int MaxTries = 24 * 2;

private const float ErrorThreshold = 0.05f;

internal static Bc2Block EncodeBlock(RawBlock4X4Rgba32 rawBlock)

{

var pixels = rawBlock.AsSpan;

PcaVectors.Create(pixels, out var mean, out var pa);

PcaVectors.GetMinMaxColor565(pixels, mean, pa, out var min, out var max);

var c0 = max;

var c1 = min;

var best = TryColors(rawBlock, c0, c1, out var bestError);

for (var i = 0; i < MaxTries; i++)

{

var (newC0, newC1) = ColorVariationGenerator.Variate565(c0, c1, i);

var block = TryColors(rawBlock, newC0, newC1, out var error);

if (error < bestError)

{

best = block;

bestError = error;

c0 = newC0;

c1 = newC1;

}

if (bestError < ErrorThreshold)

{

break;

}

}

return best;

}

}

private static class Bc2BlockEncoderSlow

{

private const int MaxTries = 9999;

private const float ErrorThreshold = 0.01f;

internal static Bc2Block EncodeBlock(RawBlock4X4Rgba32 rawBlock)

{

var pixels = rawBlock.AsSpan;

PcaVectors.Create(pixels, out var mean, out var pa);

PcaVectors.GetMinMaxColor565(pixels, mean, pa, out var min, out var max);

var c0 = max;

var c1 = min;

if (c0.data < c1.data)

{

var c = c0;

c0 = c1;

c1 = c;

}

var best = TryColors(rawBlock, c0, c1, out var bestError);

var lastChanged = 0;

for (var i = 0; i < MaxTries; i++)

{

var (newC0, newC1) = ColorVariationGenerator.Variate565(c0, c1, i);

if (newC0.data < newC1.data)

{

var c = newC0;

newC0 = newC1;

newC1 = c;

}

var block = TryColors(rawBlock, newC0, newC1, out var error);

lastChanged++;

if (error < bestError)

{

best = block;

bestError = error;

c0 = newC0;

c1 = newC1;

lastChanged = 0;

}

if (bestError < ErrorThreshold || lastChanged > ColorVariationGenerator.VarPatternCount)

{

break;

}

}

return best;

}

}

#endregion

}

}