//! \file ImagePGX.cs //! \date Tue Dec 08 02:50:45 2015 //! \brief Glib2 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 GameRes.Utility; using System; using System.Collections.Generic; using System.ComponentModel.Composition; using System.Diagnostics; using System.Drawing; using System.IO; using System.Linq; using System.Windows.Media; namespace GameRes.Formats.Glib2 { internal class PgxMetaData : ImageMetaData { public int PackedSize; } internal class StxLayerInfo { public string Path; public Rectangle? Rect; public string Effect; public int Blend; } [Export(typeof(ImageFormat))] public class PgxFormat : ImageFormat { public override string Tag { get { return "PGX"; } } public override string Description { get { return "Glib2 engine image format"; } } public override uint Signature { get { return 0x00584750; } } // 'PGX' static readonly InfoReader InfoCache = new InfoReader(); public override ImageMetaData ReadMetaData (Stream stream) { var header = new byte[0x18]; if (header.Length != stream.Read (header, 0, header.Length)) return null; return new PgxMetaData { Width = LittleEndian.ToUInt32 (header, 8), Height = LittleEndian.ToUInt32 (header, 12), BPP = LittleEndian.ToInt16 (header, 0x10) == 0 ? 24 : 32, PackedSize = LittleEndian.ToInt32 (header, 0x14), }; } public override ImageData Read (Stream stream, ImageMetaData info) { var meta = (PgxMetaData)info; PixelFormat format = 32 == meta.BPP ? PixelFormats.Bgra32 : PixelFormats.Bgr32; int stride = (int)meta.Width * 4; var pixels = new byte[stride * (int)meta.Height]; stream.Seek (-meta.PackedSize, SeekOrigin.End); LzssUnpack (stream, pixels); var layer = InfoCache.GetInfo (info.FileName); if (null != layer && null != layer.Rect) { info.OffsetX = layer.Rect.Value.X; info.OffsetY = layer.Rect.Value.Y; } return ImageData.Create (info, format, null, pixels); } public override void Write (Stream file, ImageData image) { throw new System.NotImplementedException ("PgxFormat.Write not implemented"); } static void LzssUnpack (Stream input, byte[] output) { var frame = new byte[0x1000]; int frame_pos = 0xFEE; using (var lz = new ArcView.Reader (input)) { int dst = 0; int bits = 1; while (dst < output.Length) { if (1 == bits) bits = lz.ReadByte() | 0x100; if (0 != (bits & 1)) { byte b = lz.ReadByte(); output[dst++] = b; frame[frame_pos++] = b; frame_pos &= 0xFFF; } else { byte lo = lz.ReadByte(); byte hi = lz.ReadByte(); int offset = (hi & 0xF0) << 4 | lo; int count = Math.Min ((~hi & 0xF) + 3, output.Length-dst); for (int i = 0; i < count; ++i) { byte b = frame[offset++ & 0xFFF]; output[dst++] = b; frame[frame_pos++] = b; frame_pos &= 0xFFF; } } bits >>= 1; } } } } internal class InfoReader { string m_last_info_dir; Dictionary m_layer_map; internal class StxEntry { public string FullName; public string Name; public int Attr; public uint InfoOffset; public uint InfoSize; } public StxLayerInfo GetInfo (string image_name) { try { var info_name = VFS.CombinePath (Path.GetDirectoryName (image_name), "info"); if (!VFS.FileExists (info_name)) return null; if (string.IsNullOrEmpty (m_last_info_dir) || string.Join (":", VFS.FullPath) != m_last_info_dir) ParseInfo (info_name); var layer_name = Path.GetFileName (image_name); return GetLayerInfo (layer_name); } catch (Exception X) { Trace.WriteLine (X.Message, "[Glib2] STX parse error"); return null; } } StxLayerInfo GetLayerInfo (string layer_name) { if (null == m_layer_map) return null; StxLayerInfo info; m_layer_map.TryGetValue (layer_name, out info); return info; } void ParseInfo (string info_name) { if (null == m_layer_map) m_layer_map = new Dictionary(); else m_layer_map.Clear(); using (var info = VFS.OpenView (info_name)) { if (!info.View.AsciiEqual (0, "CDBD")) return; int count = info.View.ReadInt32 (4); uint current_offset = 0x10; uint info_base = current_offset + info.View.ReadUInt32 (8); uint info_total_size = info.View.ReadUInt32 (12); info.View.Reserve (0, info_base+info_total_size); uint names_base = current_offset + (uint)count * 0x18; var dir = new List (count); for (int i = 0; i < count; ++i) { uint name_offset = names_base + info.View.ReadUInt32 (current_offset); int parent_dir = info.View.ReadInt32 (current_offset+8); int attr = info.View.ReadInt32 (current_offset+0xC); uint info_offset = info.View.ReadUInt32 (current_offset+0x10); uint info_size = info.View.ReadUInt32 (current_offset+0x14); var name = info.View.ReadString (name_offset, info_base-name_offset); string path_name = name; if (parent_dir != -1) path_name = Path.Combine (dir[parent_dir].FullName, path_name); if (attr != -1 && info_size != 0) info_offset += info_base; var entry = new StxEntry { FullName = path_name, Name = name, Attr = attr, InfoOffset = info_offset, InfoSize = info_size, }; if (name == "filename" && parent_dir != -1 && info_size != 0) { uint filename_length = info.View.ReadUInt32 (info_offset); var filename = info.View.ReadString (info_offset+4, filename_length); m_layer_map[filename] = new StxLayerInfo { Path = dir[parent_dir].FullName + Path.DirectorySeparatorChar, }; } dir.Add (entry); current_offset += 0x18; } foreach (var layer in m_layer_map.Values) { foreach (var field in dir.Where (e => e.Attr != -1 && e.FullName.StartsWith (layer.Path))) { if ("rect" == field.Name && 0x14 == field.InfoSize) { int left = info.View.ReadInt32 (field.InfoOffset+4); int top = info.View.ReadInt32 (field.InfoOffset+8); int right = info.View.ReadInt32 (field.InfoOffset+12); int bottom = info.View.ReadInt32 (field.InfoOffset+16); layer.Rect = new Rectangle (left, top, right-left, bottom-top); } else if ("effect" == field.Name && field.InfoSize > 4) { // "norm" uint effect_length = info.View.ReadUInt32 (field.InfoOffset); layer.Effect = info.View.ReadString (field.InfoOffset+4, effect_length); if (layer.Effect != "norm") Trace.WriteLine (string.Format ("{0}: {1}effect = {2}", info_name, layer.Path, layer.Effect), "[Glib2.STX]"); } else if ("blend" == field.Name && 4 == field.InfoSize) { // 0xFF -> opaque layer.Blend = info.View.ReadInt32 (field.InfoOffset); if (layer.Blend != 0xFF) Trace.WriteLine (string.Format ("{0}: {1}blend = {2}", info_name, layer.Path, layer.Blend), "[Glib2.STX]"); } } } } m_last_info_dir = string.Join (":", VFS.FullPath); } } }