267 lines
11 KiB
C#

using System.Numerics;
namespace BlurHash;
public static class Core
{
/// <summary>
/// Encodes a 2-dimensional array of pixels into a BlurHash string
/// </summary>
/// <param name="pixels">The 2-dimensional array of pixels to encode</param>
/// <param name="componentsX">The number of components used on the X-Axis for the DCT</param>
/// <param name="componentsY">The number of components used on the Y-Axis for the DCT</param>
/// <param name="progressCallback">An optional progress handler to receive progress updates</param>
/// <returns>The resulting BlurHash string</returns>
public static ReadOnlySpan<char> Encode(Pixel[,] pixels, int componentsX, int componentsY, IProgress<int>? progressCallback = null)
{
Span<char> results = new char[4 + 2 * componentsX * componentsY];
if (componentsX < 1)
throw new ArgumentException("componentsX needs to be at least 1");
if (componentsX > 9)
throw new ArgumentException("componentsX needs to be at most 9");
if (componentsY < 1)
throw new ArgumentException("componentsY needs to be at least 1");
if (componentsY > 9)
throw new ArgumentException("componentsY needs to be at most 9");
Span<Pixel> factors = stackalloc Pixel[componentsX * componentsY];
Span<char> resultBuffer = stackalloc char[4 + 2 * componentsX * componentsY];
int factorCount = componentsX * componentsY;
int processedFactors = 0;
int width = pixels.GetLength(0);
int height = pixels.GetLength(1);
double[] xCosines = new double[width];
double[] yCosines = new double[height];
for (int yComponent = 0; yComponent < componentsY; yComponent++)
for (int xComponent = 0; xComponent < componentsX; xComponent++)
{
double r = 0, g = 0, b = 0;
double normalization = (xComponent == 0 && yComponent == 0) ? 1 : 2;
for (int xPixel = 0; xPixel < width; xPixel++)
{
xCosines[xPixel] = Math.Cos(Math.PI * xComponent * xPixel / width);
}
for (int yPixel = 0; yPixel < height; yPixel++)
{
yCosines[yPixel] = Math.Cos(Math.PI * yComponent * yPixel / height);
}
for (int xPixel = 0; xPixel < width; xPixel++)
for (int yPixel = 0; yPixel < height; yPixel++)
{
double basis = xCosines[xPixel] * yCosines[yPixel];
Pixel pixel = pixels[xPixel, yPixel];
r += basis * pixel.Red;
g += basis * pixel.Green;
b += basis * pixel.Blue;
}
double scale = normalization / (width * height);
factors[componentsX * yComponent + xComponent].Red = r * scale;
factors[componentsX * yComponent + xComponent].Green = g * scale;
factors[componentsX * yComponent + xComponent].Blue = b * scale;
progressCallback?.Report(processedFactors * 100 / factorCount);
processedFactors++;
}
Pixel dc = factors[0];
int acCount = componentsX * componentsY - 1;
int sizeFlag = componentsX - 1 + (componentsY - 1) * 9;
sizeFlag.EncodeBase83(resultBuffer[..1]);
float maximumValue;
if (acCount > 0)
{
// Get maximum absolute value of all AC components
double actualMaximumValue = 0.0;
for (int yComponent = 0; yComponent < componentsY; yComponent++)
for (int xComponent = 0; xComponent < componentsX; xComponent++)
{
// Ignore DC component
if (xComponent == 0 && yComponent == 0)
continue;
int factorIndex = componentsX * yComponent + xComponent;
actualMaximumValue = Math.Max(Math.Abs(factors[factorIndex].Red), actualMaximumValue);
actualMaximumValue = Math.Max(Math.Abs(factors[factorIndex].Green), actualMaximumValue);
actualMaximumValue = Math.Max(Math.Abs(factors[factorIndex].Blue), actualMaximumValue);
}
int quantizedMaximumValue = (int)Math.Max(0.0, Math.Min(82.0, Math.Floor(actualMaximumValue * 166 - 0.5)));
maximumValue = ((float)quantizedMaximumValue + 1) / 166;
quantizedMaximumValue.EncodeBase83(resultBuffer.Slice(1, 1));
}
else
{
maximumValue = 1;
resultBuffer[1] = '0';
}
EncodeDc(dc.Red, dc.Green, dc.Blue).EncodeBase83(resultBuffer.Slice(2, 4));
for (int yComponent = 0; yComponent < componentsY; yComponent++)
for (int xComponent = 0; xComponent < componentsX; xComponent++)
{
// Ignore DC component
if (xComponent == 0 && yComponent == 0)
continue;
int factorIndex = componentsX * yComponent + xComponent;
EncodeAc(factors[factorIndex].Red, factors[factorIndex].Green, factors[factorIndex].Blue, maximumValue).EncodeBase83(resultBuffer.Slice(6 + (factorIndex - 1) * 2, 2));
}
resultBuffer.CopyTo(results);
return results;
}
/// <summary>
/// Decodes a BlurHash string into a 2-dimensional array of pixels
/// </summary>
/// <param name="blurHash">The blurHash string to decode</param>
/// <param name="pixels">
/// A two-dimensional array that will be filled with the pixel data.<br />
/// First dimension is the width, second dimension is the height
/// </param>
/// <param name="punch">A value that affects the contrast of the decoded image. 1 means normal, smaller values will make the effect more subtle, and larger values will make it stronger.</param>
/// <param name="progressCallback">An optional progress handler to receive progress updates</param>
/// <returns>A 2-dimensional array of <see cref="Pixel"/>s </returns>
public static void Decode(ReadOnlySpan<char> blurHash, Pixel[,] pixels, double punch = 1.0, IProgress<int>? progressCallback = null)
{
if (blurHash.Length < 6)
{
throw new ArgumentException("BlurHash value needs to be at least 6 characters", nameof(blurHash));
}
int outputWidth = pixels.GetLength(0);
int outputHeight = pixels.GetLength(1);
int sizeFlag = blurHash[..1].DecodeBase83();
int componentsY = sizeFlag / 9 + 1;
int componentsX = sizeFlag % 9 + 1;
int componentCount = componentsX * componentsY;
if (blurHash.Length != 4 + 2 * componentsX * componentsY)
{
throw new ArgumentException("BlurHash value is missing data", nameof(blurHash));
}
double quantizedMaximumValue = blurHash.Slice(1, 1).DecodeBase83();
double maximumValue = (quantizedMaximumValue + 1.0) / 166.0;
Pixel[,] coefficients = new Pixel[componentsX, componentsY];
int componentIndex = 0;
for (int yComponent = 0; yComponent < componentsY; yComponent++)
for (int xComponent = 0; xComponent < componentsX; xComponent++)
{
if (xComponent == 0 && yComponent == 0)
{
int value = blurHash.Slice(2, 4).DecodeBase83();
coefficients[xComponent, yComponent] = DecodeDc(value);
}
else
{
int value = blurHash.Slice(4 + componentIndex * 2, 2).DecodeBase83();
coefficients[xComponent, yComponent] = DecodeAc(value, maximumValue * punch);
}
componentIndex++;
}
for (int xPixel = 0; xPixel < outputWidth; xPixel++)
for (int yPixel = 0; yPixel < outputHeight; yPixel++)
{
ref Pixel result = ref pixels[xPixel, yPixel];
result.Red = 0.0;
result.Green = 0.0;
result.Blue = 0.0;
}
double[] xCosines = new double[outputWidth];
double[] yCosines = new double[outputHeight];
componentIndex = 1;
for (int componentX = 0; componentX < componentsX; componentX++)
for (int componentY = 0; componentY < componentsY; componentY++)
{
for (int xPixel = 0; xPixel < outputWidth; xPixel++)
{
xCosines[xPixel] = Math.Cos(Math.PI * xPixel * componentX / outputWidth);
}
for (int yPixel = 0; yPixel < outputHeight; yPixel++)
{
yCosines[yPixel] = Math.Cos(Math.PI * yPixel * componentY / outputHeight);
}
Pixel coefficient = coefficients[componentX, componentY];
for (int xPixel = 0; xPixel < outputWidth; xPixel++)
for (int yPixel = 0; yPixel < outputHeight; yPixel++)
{
ref Pixel result = ref pixels[xPixel, yPixel];
double basis = xCosines[xPixel] * yCosines[yPixel];
result.Red += coefficient.Red * basis;
result.Green += coefficient.Green * basis;
result.Blue += coefficient.Blue * basis;
}
progressCallback?.Report(componentIndex * 100 / componentCount);
componentIndex++;
}
}
private static int EncodeAc(double r, double g, double b, double maximumValue)
{
int quantizedR = (int)Math.Max(0, Math.Min(18, Math.Floor(MathUtils.SignPow(r / maximumValue, 0.5) * 9 + 9.5)));
int quantizedG = (int)Math.Max(0, Math.Min(18, Math.Floor(MathUtils.SignPow(g / maximumValue, 0.5) * 9 + 9.5)));
int quantizedB = (int)Math.Max(0, Math.Min(18, Math.Floor(MathUtils.SignPow(b / maximumValue, 0.5) * 9 + 9.5)));
return quantizedR * 19 * 19 + quantizedG * 19 + quantizedB;
}
private static int EncodeDc(double r, double g, double b)
{
int roundedR = MathUtils.LinearTosRgb(r);
int roundedG = MathUtils.LinearTosRgb(g);
int roundedB = MathUtils.LinearTosRgb(b);
return (roundedR << 16) + (roundedG << 8) + roundedB;
}
private static Pixel DecodeDc(BigInteger value)
{
int intR = (int)value >> 16;
int intG = (int)(value >> 8) & 255;
int intB = (int)value & 255;
return new Pixel(MathUtils.SRgbToLinear(intR), MathUtils.SRgbToLinear(intG), MathUtils.SRgbToLinear(intB));
}
private static Pixel DecodeAc(BigInteger value, double maximumValue)
{
double quantizedR = (double)(value / (19 * 19));
double quantizedG = (double)(value / 19 % 19);
double quantizedB = (double)(value % 19);
Pixel result = new(
MathUtils.SignPow((quantizedR - 9.0) / 9.0, 2.0) * maximumValue,
MathUtils.SignPow((quantizedG - 9.0) / 9.0, 2.0) * maximumValue,
MathUtils.SignPow((quantizedB - 9.0) / 9.0, 2.0) * maximumValue
);
return result;
}
}