internal static Bitmap GetImg(Clim bclim)
{
if (bclim.FileFormat == 7 && BitConverter.ToUInt16(bclim.Data, 0) == 2) // XY7
{
return(Bclim.GetIMG_XY7(bclim));
}
if (bclim.FileFormat == 10 || bclim.FileFormat == 11) // Use ETC1 to get image instead.
{
return(Bclim.GetIMG_ETC(bclim));
}
// New Image
int w = Bclim.Nlpo2(Bclim.Gcm(bclim.Width, 8));
int h = Bclim.Nlpo2(Bclim.Gcm(bclim.Height, 8));
int f = bclim.FileFormat;
int area = w * h;
if (f == 9 && area > bclim.Data.Length / 4)
{
w = Bclim.Gcm(bclim.Width, 8);
h = Bclim.Gcm(bclim.Height, 8);
}
// Build Image
return(Bclim.GetImg(w, h, bclim.Data, f));
}
public static Clim Analyze(string path)
{
Clim bclim = new Clim {
FileName = Path.GetFileNameWithoutExtension(path),
FilePath = Path.GetDirectoryName(path),
Extension = Path.GetExtension(path)
};
byte[] byteArray = File.ReadAllBytes(path);
using (BinaryReader br = new BinaryReader(new MemoryStream(byteArray)))
{
br.BaseStream.Seek(br.BaseStream.Length - 0x28, SeekOrigin.Begin);
bclim.Magic = br.ReadUInt32();
bclim.Bom = br.ReadUInt16();
bclim.ClimLength = br.ReadUInt32();
bclim.TileWidth = 2 << br.ReadByte();
bclim.TileHeight = 2 << br.ReadByte();
bclim.TotalLength = br.ReadUInt32();
bclim.Count = br.ReadUInt32();
bclim.Imag = br.ReadChars(4);
bclim.ImagLength = br.ReadUInt32();
bclim.Width = br.ReadUInt16();
bclim.Height = br.ReadUInt16();
bclim.FileFormat = br.ReadInt32();
bclim.DataLength = br.ReadUInt32();
bclim.BaseSize = Math.Max(Bclim.Nlpo2(bclim.Width), Bclim.Nlpo2(bclim.Height));
br.BaseStream.Seek(0, SeekOrigin.Begin);
bclim.Data = br.ReadBytes((int)bclim.DataLength);
return(bclim);
}
}
internal static byte[] GetPixelData(Bitmap img, int format, bool rectangle = true)
{
int w = img.Width;
int h = img.Height;
bool perfect = w == h && (w != 0) && ((w & (w - 1)) == 0);
if (!perfect) // Check if square power of two, else resize
{
// Square Format Checks
if (rectangle && Math.Min(img.Width, img.Height) < 32)
{
w = Bclim.Nlpo2(img.Width);
h = Bclim.Nlpo2(img.Height);
}
else
{
w = h = Math.Max(Bclim.Nlpo2(w), Bclim.Nlpo2(h)); // else resize
}
}
using (MemoryStream mz = new MemoryStream())
using (BinaryWriter bz = new BinaryWriter(mz))
{
int p = Bclim.Gcm(w, 8) / 8;
if (p == 0)
{
p = 1;
}
for (uint i = 0; i < w * h; i++)
{
Bclim.D2Xy(i % 64, out uint x, out uint y);
// Get Shift Tile
uint tile = i / 64;
// Shift Tile Coordinate into Tilemap
x += (uint)(tile % p) * 8;
y += (uint)(tile / p) * 8;
// Don't write data
Color c;
if (x >= img.Width || y >= img.Height)
{
c = Color.FromArgb(0, 0, 0, 0);
}
else
{
c = img.GetPixel((int)x, (int)y);
if (c.A == 0)
{
c = Color.FromArgb(0, 86, 86, 86);
}
}
switch (format)
{
case 0:
bz.Write(Bclim.GetL8(c));
break; // L8
case 1:
bz.Write(Bclim.GetA8(c));
break; // A8
case 2:
bz.Write(Bclim.GetLA4(c));
break; // LA4(4)
case 3:
bz.Write(Bclim.GetLA8(c));
break; // LA8(8)
case 4:
bz.Write(Bclim.GetHilo8(c));
break; // HILO8
case 5:
bz.Write(Bclim.GetRgb565(c));
break; // RGB565
case 6:
{
bz.Write(c.B);
bz.Write(c.G);
bz.Write(c.R);
break;
}
case 7:
bz.Write(Bclim.GetRgba5551(c));
break; // RGBA5551
case 8:
bz.Write(Bclim.GetRgba4444(c));
break; // RGBA4444
case 9:
bz.Write(Bclim.GetRgba8888(c));
break; // RGBA8
case 10: throw new Exception("ETC1 not supported.");
case 11: throw new Exception("ETC1A4 not supported.");
case 12:
{
byte val = (byte)(Bclim.GetL8(c) / 0x11); // First Pix // L4
{
c = img.GetPixel((int)x, (int)y);
if (c.A == 0)
{
c = Color.FromArgb(0, 0, 0, 0);
}
}
val |= (byte)((Bclim.GetL8(c) / 0x11) << 4);
i++;
bz.Write(val);
break;
}
case 13:
{
byte val = (byte)(Bclim.GetA8(c) / 0x11); // First Pix // L4
{
c = img.GetPixel((int)x, (int)y);
}
val |= (byte)((Bclim.GetA8(c) / 0x11) << 4);
i++;
bz.Write(val);
break;
}
}
}
if (!perfect)
{
while (mz.Length < Bclim.Nlpo2((int)mz.Length)) // pad
{
bz.Write((byte)0);
}
}
return(mz.ToArray());
}
}
// BCLIM Data Writing
internal static int Write16BitColorPalette(Bitmap img, ref MemoryStream ms)
{
using (Stream pixelcolors = new MemoryStream())
using (BinaryWriter bz = new BinaryWriter(pixelcolors))
{
// Set up our basis.
bool under16Colors = false;
int colors = Bclim.GetColorCount(img);
Color[] pcs = new Color[colors];
if (colors < 16)
{
under16Colors = true;
}
uint div = 1;
if (under16Colors)
{
div = 2;
}
if (colors > 70)
{
throw new Exception("Too many colors");
}
// Set up a new reverse image to build into.
int w = Bclim.Gcm(img.Width, 8);
int h = Bclim.Gcm(img.Height, 8);
w = Math.Max(Bclim.Nlpo2(w), Bclim.Nlpo2(h));
h = w;
byte[] pixelarray = new byte[w * h];
const int colorformat = 2;
int ctr = 1;
pcs[0] = Color.FromArgb(0, 0xFF, 0xFF, 0xFF);
int p = Bclim.Gcm(w, 8) / 8;
if (p == 0)
{
p = 1;
}
int d = 0;
for (uint i = 0; i < pixelarray.Length; i++)
{
d = (int)(i / div);
// Get Tile Coordinate
Bclim.D2Xy(i % 64, out uint x, out uint y);
// Get Shift Tile
uint tile = i / 64;
// Shift Tile Coordinate into Tilemap
x += (uint)(tile % p) * 8;
y += (uint)(tile / p) * 8;
if (x >= img.Width || y >= img.Height) // Don't try to access any pixel data outside of our bounds.
{
i++;
continue;
} // Goto next tile.
// Get Color of Pixel
Color c = img.GetPixel((int)x, (int)y);
// Color Table Building Logic
int index = Array.IndexOf(pcs, c);
if (c.A == 0)
{
index = 0;
}
if (index < 0) // If new color
{
pcs[ctr] = c;
index = ctr;
ctr++;
} // Add it to color list
// Add pixel to pixeldata
if (under16Colors)
{
index = index << 4;
}
pixelarray[i / div] = (byte)index;
if (!under16Colors)
{
continue;
}
c = img.GetPixel((int)x + 1, (int)y);
index = Array.IndexOf(pcs, c);
if (c.A == 0)
{
index = 0;
}
if (index < 0) // If new color
{
pcs[ctr] = c;
index = ctr;
ctr++;
}
pixelarray[i / div] |= (byte)index;
i++;
}
// Write Intro
bz.Write((ushort)colorformat);
bz.Write((ushort)ctr);
// Write Colors
for (int i = 0; i < ctr; i++)
{
bz.Write(Bclim.GetRgba5551(pcs[i])); // Write byte array.
}
// Write Pixel Data
for (uint i = 0; i < d; i++)
{
bz.Write(pixelarray[i]);
}
// Write Padding
while (pixelcolors.Length < Bclim.Nlpo2((int)pixelcolors.Length))
{
bz.Write((byte)0);
}
// Copy to main CLIM.
pixelcolors.Position = 0;
pixelcolors.CopyTo(ms);
}
return(7);
}
internal static Bitmap GetIMG_ETC(Clim bclim)
{
Bitmap img = new Bitmap(Math.Max(Bclim.Nlpo2(bclim.Width), 16), Math.Max(Bclim.Nlpo2(bclim.Height), 16));
try
{
/* http://jul.rustedlogic.net/thread.php?id=17312
* Much of this code is taken/modified from Tharsis. Thank you to Tharsis's creator, xdaniel.
* https://github.com/xdanieldzd/Tharsis
*/
/* Get compressed data & handle to it */
byte[] textureData = bclim.Data;
//textureData = switchEndianness(textureData, 0x10);
ushort[] input = new ushort[textureData.Length / sizeof(ushort)];
Buffer.BlockCopy(textureData, 0, input, 0, textureData.Length);
GCHandle pInput = GCHandle.Alloc(input, GCHandleType.Pinned);
/* Marshal data around, invoke ETC1.dll for conversion, etc */
uint size1 = 0;
ushort w = (ushort)img.Width, h = (ushort)img.Height;
Etc1.ConvertETC1(IntPtr.Zero, ref size1, IntPtr.Zero, w, h, bclim.FileFormat == 0xB); // true = etc1a4, false = etc1
// System.Diagnostics.Debug.WriteLine(size1);
uint[] output = new uint[size1];
GCHandle pOutput = GCHandle.Alloc(output, GCHandleType.Pinned);
Etc1.ConvertETC1(pOutput.AddrOfPinnedObject(), ref size1, pInput.AddrOfPinnedObject(), w, h, bclim.FileFormat == 0xB);
pOutput.Free();
pInput.Free();
/* Unscramble if needed // could probably be done in ETC1Lib.dll, it's probably pretty ugly, but whatever... */
/* Non-square code blocks could need some cleanup, verification, etc. as well... */
uint[] finalized = new uint[output.Length];
// Act if it's square because BCLIM swizzling is stupid
Buffer.BlockCopy(output, 0, finalized, 0, finalized.Length);
byte[] tmp = new byte[finalized.Length];
Buffer.BlockCopy(finalized, 0, tmp, 0, tmp.Length);
byte[] imgData = tmp;
for (int i = 0; i < w; i++)
{
for (int j = 0; j < h; j++)
{
int k = (j + i * img.Height) * 4;
img.SetPixel(i, j, Color.FromArgb(imgData[k + 3], imgData[k], imgData[k + 1], imgData[k + 2]));
}
}
// Image is 13 instead of 12
// 24 34
img.RotateFlip(RotateFlipType.Rotate90FlipX);
if (w > h)
{
// Image is now in appropriate order, but the shifting is messed up. Let's fix that.
Bitmap img2 = new Bitmap(Math.Max(Bclim.Nlpo2(bclim.Width), 16), Math.Max(Bclim.Nlpo2(bclim.Height), 16));
for (int y = 0; y < Math.Max(Bclim.Nlpo2(bclim.Width), 16); y += 8)
{
for (int x = 0; x < Math.Max(Bclim.Nlpo2(bclim.Height), 16); x++)
{
for (int j = 0; j < 8; j++)
// Treat every 8 vertical pixels as 1 pixel for purposes of calculation, add to offset later.
{
int x1 = (x + y / 8 * h) % img2.Width; // Reshift x
int y1 = (x + y / 8 * h) / img2.Width * 8; // Reshift y
img2.SetPixel(x1, y1 + j, img.GetPixel(x, y + j)); // Reswizzle
}
}
}
img = img2;
}
else if (h > w)
{
Bitmap img2 = new Bitmap(Math.Max(Bclim.Nlpo2(bclim.Width), 16), Math.Max(Bclim.Nlpo2(bclim.Height), 16));
for (int y = 0; y < Math.Max(Bclim.Nlpo2(bclim.Width), 16); y += 8)
{
for (int x = 0; x < Math.Max(Bclim.Nlpo2(bclim.Height), 16); x++)
{
for (int j = 0; j < 8; j++)
// Treat every 8 vertical pixels as 1 pixel for purposes of calculation, add to offset later.
{
int x1 = x % img2.Width; // Reshift x
int y1 = (x + y / 8 * h) / img2.Width * 8; // Reshift y
img2.SetPixel(x1, y1 + j, img.GetPixel(x, y + j)); // Reswizzle
}
}
}
img = img2;
}
}
catch
{
// ignored
}
return(img);
}