implemented AFA and ALK archives.

ArcFormats/AliceSoft/ArcAFA.cs

@@ -0,0 +1,107 @@
+//! \file       ArcAFA.cs
+//! \date       Mon Apr 25 18:18:57 2016
+//! \brief      AliceSoft System 4 engine resource archive.
+//
+// Copyright (C) 2016 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;
+using GameRes.Compression;
+
+namespace GameRes.Formats.AliceSoft
+{
+    [Export(typeof(ArchiveFormat))]
+    public class AfaOpener : ArchiveFormat
+    {
+        public override string         Tag { get { return "AFA"; } }
+        public override string Description { get { return "AliceSoft System 4 resource archive"; } }
+        public override uint     Signature { get { return 0x48414641; } } // 'AFAH'
+        public override bool  IsHierarchic { get { return true; } }
+        public override bool     CanCreate { get { return false; } }
+
+        public override ArcFile TryOpen (ArcView file)
+        {
+            if (!file.View.AsciiEqual (8, "AlicArch"))
+                return null;
+            if (!file.View.AsciiEqual (0x1C, "INFO"))
+                return null;
+            long base_offset = file.View.ReadUInt32 (0x18);
+            uint packed_size = file.View.ReadUInt32 (0x20);
+            int unpacked_size = file.View.ReadInt32 (0x24);
+            int count = file.View.ReadInt32 (0x28);
+            if (!IsSaneCount (count))
+                return null;
+
+            var dir = new List<Entry> (count);
+            var name_buf = new byte[0x40];
+            using (var input = file.CreateStream (0x2C, packed_size))
+            using (var zstream = new ZLibStream (input, CompressionMode.Decompress))
+            using (var index = new BinaryReader (zstream))
+            {
+                for (int i = 0; i < count; ++i)
+                {
+                    int name_length = index.ReadInt32();
+                    int index_step = index.ReadInt32();
+                    if (name_length <= 0 || name_length > index_step || index_step > unpacked_size)
+                        return null;
+                    if (index_step > name_buf.Length)
+                        name_buf = new byte[index_step];
+                    if (index_step != index.Read (name_buf, 0, index_step))
+                        return null;
+                    var name = Encodings.cp932.GetString (name_buf, 0, name_length);
+                    var entry = FormatCatalog.Instance.Create<Entry> (name);
+                    index.ReadInt32();
+                    index.ReadInt32();
+                    index.ReadInt32();
+                    entry.Offset = index.ReadUInt32() + base_offset;
+                    entry.Size   = index.ReadUInt32();
+                    if (!entry.CheckPlacement (file.MaxOffset))
+                        return null;
+                    dir.Add (entry);
+                }
+                return new ArcFile (file, this, dir);
+            }
+        }
+
+        static readonly byte[] AffKey = {
+            0xC8, 0xBB, 0x8F, 0xB7, 0xED, 0x43, 0x99, 0x4A,
+            0xA2, 0x7E, 0x5B, 0xB0, 0x68, 0x18, 0xF8, 0x88
+        };
+
+        public override Stream OpenEntry (ArcFile arc, Entry entry)
+        {
+            if (entry.Size <= 0x10 || !arc.File.View.AsciiEqual (entry.Offset, "AFF\0"))
+                return base.OpenEntry (arc, entry);
+            uint data_size = entry.Size - 0x10u;
+            uint encrypted_length = Math.Min (0x40u, data_size);
+            var prefix = arc.File.View.ReadBytes (entry.Offset+0x10, encrypted_length);
+            for (int i = 0; i < prefix.Length; ++i)
+                prefix[i] ^= AffKey[i & 0xF];
+            if (data_size <= 0x40)
+                return new MemoryStream (prefix);
+            var rest = arc.File.CreateStream (entry.Offset+0x10+encrypted_length, data_size-encrypted_length);
+            return new PrefixStream (prefix, rest);
+        }
+    }
+}

ArcFormats/AliceSoft/ArcALK.cs

@@ -0,0 +1,68 @@
+//! \file       ArcALK.cs
+//! \date       Mon Apr 25 20:00:37 2016
+//! \brief      AliceSoft System 4 engine resource archive.
+//
+// Copyright (C) 2016 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.AliceSoft
+{
+    [Export(typeof(ArchiveFormat))]
+    public class AlkOpener : ArchiveFormat
+    {
+        public override string         Tag { get { return "ALK"; } }
+        public override string Description { get { return "AliceSoft System 4 resource archive"; } }
+        public override uint     Signature { get { return 0x304B4C41; } }
+        public override bool  IsHierarchic { get { return false; } }
+        public override bool     CanCreate { get { return false; } }
+
+        public override ArcFile TryOpen (ArcView file)
+        {
+            int count = file.View.ReadInt32 (4);
+            if (!IsSaneCount (count))
+                return null;
+            uint index_offset = 8;
+            var base_name = Path.GetFileNameWithoutExtension (file.Name);
+            var dir = new List<Entry> (count);
+            for (int i = 0; i < count; ++i)
+            {
+                var offset = file.View.ReadUInt32 (index_offset);
+                var size   = file.View.ReadUInt32 (index_offset+4);
+                if (0 != size)
+                {
+                    var name = string.Format ("{0}#{1:D4}", base_name, i);
+                    var entry = AutoEntry.Create (file, offset, name);
+                    entry.Size = size;
+                    if (!entry.CheckPlacement (file.MaxOffset))
+                        return null;
+                    dir.Add (entry);
+                }
+                index_offset += 8;
+            }
+            return new ArcFile (file, this, dir);
+        }
+    }
+}

ArcFormats/ArcFormats.csproj

@@ -65,6 +65,8 @@
     <Compile Include="Abel\ArcARC.cs" />
     <Compile Include="Abel\ImageGPS.cs" />
     <Compile Include="Actgs\ArcDAT.cs" />
+    <Compile Include="AliceSoft\ArcAFA.cs" />
+    <Compile Include="AliceSoft\ArcALK.cs" />
     <Compile Include="Ankh\ArcGRP.cs" />
     <Compile Include="ArcCG.cs" />
     <Compile Include="ArcZIP.cs" />

supported.html

@@ -264,7 +264,12 @@ Shoujo Senki Soul Eater<br/>
 <tr class="odd"><td>*.way</td><td><tt>WADY</tt></td><td>No</td></tr>
 <tr><td>*.dat</td><td>-</td><td>No</td><td rowspan="2">M no Violet</td><td rowspan="2">Nanase Ren</td></tr>
 <tr><td>*</td><td><tt>gra</tt><br/><tt>mas</tt><br/><tt>dif</tt></td><td>No</td></tr>
-<tr class="odd"><td>*.ald</td><td>-</td><td>No</td><td rowspan="2">Alice Soft</td><td rowspan="2">Tsuma Shibori</td></tr>
+<tr class="odd"><td>*.ald</td><td>-</td><td>No</td><td rowspan="4">Alice Soft</td><td rowspan="4">
+Shaman's Sanctuary -Miko no Seiiki-<br/>
+Tsuma Shibori<br/>
+</td></tr>
+<tr class="odd"><td>*.afa</td><td><tt>AFAH</tt></td><td>No</td></tr>
+<tr class="odd"><td>*.alk</td><td><tt>ALK0</tt></td><td>No</td></tr>
 <tr class="odd"><td>*.qnt</td><td><tt>QNT</tt></td><td>No</td></tr>
 <tr><td>*.pd<br/>*.pb</td><td>-</td><td>No</td><td>Discovery</td><td>Tsuma Tsuma</td></tr>
 <tr class="odd"><td>*.ifl</td><td><tt>IFLS</tt></td><td>No</td><td rowspan="3">Silky's</td><td rowspan="3">
@@ -492,6 +497,7 @@ Shitai o Arau<br/>
 <tr><td>*.gcc</td><td><tt>G24n</tt><br/><tt>G24m</tt><br/><tt>R24n</tt><br/><tt>R24m</tt></td><td>No</td></tr>
 <tr class="odd"><td>*.arc</td><td>-</td><td>No</td><td>RPM</td><td>
 Heartful Days ~Hi no Ataru Basho e~<br/>
+Hidamari<br/>
 Kimi no Koe ga Kikoeru<br/>
 Kimi no Omoi, Sono Negai<br/>
 Samurai Jupiter<br/>