GARbro-mirror/ArcFormats/AdvSys/ImageGR2.cs
2016-10-16 09:22:53 +04:00

283 lines
9.7 KiB
C#

//! \file ImageGR2.cs
//! \date Tue Jul 21 03:54:51 2015
//! \brief AdvSys engine image format.
//
// Copyright (C) 2015 by morkt
//
// Permission is hereby granted, free of charge, to any person obtaining a copy
// of this software and associated documentation files (the "Software"), to
// deal in the Software without restriction, including without limitation the
// rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
// sell copies of the Software, and to permit persons to whom the Software is
// furnished to do so, subject to the following conditions:
//
// The above copyright notice and this permission notice shall be included in
// all copies or substantial portions of the Software.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
// FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
// IN THE SOFTWARE.
//
using System;
using System.ComponentModel.Composition;
using System.IO;
using System.Windows.Media;
using GameRes.Utility;
namespace GameRes.Formats.AdvSys
{
[Export(typeof(ImageFormat))]
public class Gr2Format : ImageFormat
{
public override string Tag { get { return "GR2"; } }
public override string Description { get { return "AdvSys engine image format"; } }
public override uint Signature { get { return 0x5F325247; } } // 'GR2_'
public override ImageMetaData ReadMetaData (IBinaryStream stream)
{
var header = stream.ReadHeader (0x10);
return new ImageMetaData
{
Width = header.ToUInt16 (4),
Height = header.ToUInt16 (6),
BPP = header.ToInt16 (12) * 8
};
}
public override ImageData Read (IBinaryStream stream, ImageMetaData info)
{
stream.Position = 0x10;
int stride = ((int)info.Width * info.BPP/8 + 3) & ~3;
var pixels = new byte[stride * info.Height];
if (pixels.Length != stream.Read (pixels, 0, pixels.Length))
throw new InvalidFormatException ("Unexpected end of file");
PixelFormat format;
switch (info.BPP)
{
case 32: format = PixelFormats.Bgra32; break;
case 24: format = PixelFormats.Bgr24; break;
case 16: format = PixelFormats.Bgr565; break;
default: throw new NotSupportedException ("Not supported image bitdepth");
}
return ImageData.Create (info, format, null, pixels, stride);
}
public override void Write (Stream file, ImageData image)
{
throw new System.NotImplementedException ("Gr2Format.Write not implemented");
}
}
internal class PolaMetaData : ImageMetaData
{
public int UnpackedSize;
}
[Export(typeof(ImageFormat))]
public class PolaFormat : Gr2Format
{
public override string Tag { get { return "GR2/Pola"; } }
public override string Description { get { return "AdvSys engine compressed image format"; } }
public override uint Signature { get { return 0x6C6F502A; } } // '*Pola*'
public PolaFormat ()
{
Extensions = new string[] { "gr2" };
}
public override ImageMetaData ReadMetaData (IBinaryStream stream)
{
var header = stream.ReadHeader (20);
if (!header.AsciiEqual ("*Pola* "))
return null;
int unpacked_size = header.ToInt32 (8);
using (var reader = new PolaReader (stream, 64))
{
reader.Unpack();
using (var temp = BinaryStream.FromArray (reader.Data, stream.Name))
{
var info = base.ReadMetaData (temp);
if (null == info)
return null;
return new PolaMetaData
{
Width = info.Width,
Height = info.Height,
BPP = info.BPP,
UnpackedSize = unpacked_size,
};
}
}
}
public override ImageData Read (IBinaryStream stream, ImageMetaData info)
{
var meta = (PolaMetaData)info;
stream.Position = 0x14;
using (var reader = new PolaReader (stream, meta.UnpackedSize))
{
reader.Unpack();
using (var temp = BinaryStream.FromArray (reader.Data, stream.Name))
return base.Read (temp, info);
}
}
public override void Write (Stream file, ImageData image)
{
throw new System.NotImplementedException ("PolaFormat.Write not implemented");
}
}
internal sealed class PolaReader : IDisposable
{
IBinaryStream m_input;
byte[] m_output;
public byte[] Data { get { return m_output; } }
public PolaReader (IBinaryStream input, int unpacked_size)
{
m_input = input;
m_output = new byte[unpacked_size+2];
}
public void Unpack ()
{
NextBit();
int dst = 0;
while (dst < m_output.Length-2)
{
if (0 != NextBit())
{
m_output[dst++] = m_input.ReadUInt8();
continue;
}
int offset, count = 0;
if (0 != NextBit())
{
offset = m_input.ReadUInt8() - 256;
if (0 == NextBit())
{
count += 256;
}
if (0 == NextBit())
{
offset -= 512;
if (0 == NextBit())
{
count *= 2;
if (0 == NextBit())
count += 256;
offset -= 512;
if (0 == NextBit())
{
count *= 2;
if (0 == NextBit())
count += 256;
offset -= 1024;
if (0 == NextBit())
{
offset -= 2048;
count *= 2;
if (0 == NextBit())
count += 256;
}
}
}
}
offset -= count;
if (0 != NextBit())
count = 3;
else if (0 != NextBit())
count = 4;
else if (0 != NextBit())
count = 5;
else if (0 != NextBit())
count = 6;
else if (0 != NextBit())
{
if (0 != NextBit())
count = 8;
else
count = 7;
}
else if (0 == NextBit())
{
count = 9;
if (0 != NextBit())
count += 4;
if (0 != NextBit())
count += 2;
if (0 != NextBit())
++count;
}
else
{
count = m_input.ReadUInt8() + 17;
}
if (dst + count > m_output.Length)
count = m_output.Length - dst;
Binary.CopyOverlapped (m_output, dst + offset, dst, count);
dst += count;
}
else
{
offset = m_input.ReadUInt8() - 256;
if (0 == NextBit())
{
if (offset != -1)
{
int src = dst + offset;
m_output[dst++] = m_output[src++];
m_output[dst++] = m_output[src++];
}
else if (0 == NextBit())
break;
}
else
{
offset -= 256;
if (0 == NextBit())
offset -= 1024;
if (0 == NextBit())
offset -= 512;
if (0 == NextBit())
offset -= 256;
int src = dst + offset;
m_output[dst++] = m_output[src++];
m_output[dst++] = m_output[src++];
}
}
}
}
int m_flag = 2;
int NextBit ()
{
int bit = m_flag & 1;
m_flag >>= 1;
if (1 == m_flag)
{
m_flag = m_input.ReadUInt16() | 0x10000;
}
return bit;
}
#region IDisposable Members
public void Dispose ()
{
}
#endregion
}
}