From 8a79aa4b17413ecb40941281ec65b5d65857f63f Mon Sep 17 00:00:00 2001
From: morkt <muvluv.ru@gmail.com>
Date: Tue, 26 Dec 2017 20:06:07 +0400
Subject: [PATCH] implemented ScenePlayer PMA archives.

---
 ArcFormats/ScenePlayer/ArcPMA.cs | 86 ++++++++++++++++++++++++++++++++
 ArcFormats/ScenePlayer/ArcPMX.cs | 13 +++--
 2 files changed, 95 insertions(+), 4 deletions(-)
 create mode 100644 ArcFormats/ScenePlayer/ArcPMA.cs

diff --git a/ArcFormats/ScenePlayer/ArcPMA.cs b/ArcFormats/ScenePlayer/ArcPMA.cs
new file mode 100644
index 00000000..0c0369aa
--- /dev/null
+++ b/ArcFormats/ScenePlayer/ArcPMA.cs
@@ -0,0 +1,86 @@
+//! \file       ArcPMA.cs
+//! \date       2017 Dec 26
+//! \brief      ScenePlayer animation resource.
+//
+// Copyright (C) 2017 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.Collections.Generic;
+using System.ComponentModel.Composition;
+using System.IO;
+
+namespace GameRes.Formats.ScenePlayer
+{
+    [Export(typeof(ArchiveFormat))]
+    public class PmaOpener : PmxOpener
+    {
+        public override string         Tag { get { return "PMA"; } }
+        public override string Description { get { return "ScenePlayer animation resource"; } }
+        public override uint     Signature { get { return 0; } }
+        public override bool  IsHierarchic { get { return false; } }
+        public override bool      CanWrite { get { return false; } }
+
+        public override ArcFile TryOpen (ArcView file)
+        {
+            if (!file.Name.HasExtension (".pma")
+                || file.View.ReadByte (0) != (0x78^0x21))
+                return null;
+
+            var base_name = Path.GetFileNameWithoutExtension (file.Name);
+            var input = CreatePmxStream (file);
+            bool index_complete = false;
+            try
+            {
+                using (var index = new BinaryStream (input, file.Name, true))
+                {
+                    int count = index.ReadInt32();
+                    if (!IsSaneCount (count))
+                        return null;
+                    var dir = new List<Entry> (count);
+                    for (int i = 0; i < count; ++i)
+                    {
+                        index.ReadByte();
+                        var offset = index.Position;
+                        if (index.ReadUInt16() != 0x4D42) // 'BM'
+                            return null;
+                        uint size = index.ReadUInt32();
+                        var entry = new Entry {
+                            Name = string.Format ("{0}#{1}.bmp", base_name, i),
+                            Type = "image",
+                            Offset = offset,
+                            Size =  size,
+                        };
+                        dir.Add (entry);
+                        index.Position = offset + size;
+                    }
+                    index_complete = true;
+                    return new PmxArchive (file, this, dir, input);
+                }
+            }
+            finally
+            {
+                if (!index_complete)
+                    input.Dispose();
+            }
+        }
+    }
+}
diff --git a/ArcFormats/ScenePlayer/ArcPMX.cs b/ArcFormats/ScenePlayer/ArcPMX.cs
index c5bad500..e6def004 100644
--- a/ArcFormats/ScenePlayer/ArcPMX.cs
+++ b/ArcFormats/ScenePlayer/ArcPMX.cs
@@ -45,10 +45,7 @@ namespace GameRes.Formats.ScenePlayer
                 || file.View.ReadByte (0) != (0x78^0x21))
                 return null;
 
-            Stream input = file.CreateStream();
-            input = new XoredStream (input, 0x21);
-            input = new ZLibStream (input, CompressionMode.Decompress);
-            input = new SeekableStream (input);
+            var input = CreatePmxStream (file);
             bool index_complete = false;
             try
             {
@@ -91,6 +88,14 @@ namespace GameRes.Formats.ScenePlayer
             var parc = (PmxArchive)arc;
             return new StreamRegion (parc.BaseStream, entry.Offset, entry.Size, true);
         }
+
+        internal Stream CreatePmxStream (ArcView file)
+        {
+            Stream input = file.CreateStream();
+            input = new XoredStream (input, 0x21);
+            input = new ZLibStream (input, CompressionMode.Decompress);
+            return new SeekableStream (input);
+        }
     }
 
     internal class PmxArchive : ArcFile