morkt f1d66206bc (IResource.CanWrite): new property.
(ArchiveFormat.CanCreate): renamed to CanWrite.
2016-10-11 00:05:22 +04:00

261 lines
10 KiB
C#

//! \file ArcBOX.cs
//! \date Sun Jan 17 14:45:34 2016
//! \brief Aoi engine event script 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.Collections.Generic;
using System.ComponentModel.Composition;
using System.IO;
using System.Security.Cryptography;
using System.Text;
using GameRes.Utility;
namespace GameRes.Formats.Aoi
{
internal class BoxArchive : ArcFile
{
public readonly byte Key;
public BoxArchive (ArcView arc, ArchiveFormat impl, ICollection<Entry> dir, byte key)
: base (arc, impl, dir)
{
Key = key;
}
}
[Export(typeof(ArchiveFormat))]
public class BoxOpener : ArchiveFormat
{
public override string Tag { get { return "BOX"; } }
public override string Description { get { return "Aoi engine script archive"; } }
public override uint Signature { get { return 0x42494F41; } } // 'AOIB'
public override bool IsHierarchic { get { return false; } }
public override bool CanWrite { get { return false; } }
static readonly Dictionary<int, byte> VersionKeyMap = new Dictionary<int, byte> {
{ 5, 0xAD },
{ 6, 0xB4 },
{ 7, 0xB4 },
{ 10, 0xB2 },
{ 12, 0xA5 },
};
public override ArcFile TryOpen (ArcView file)
{
int version;
if (file.View.AsciiEqual (4, "X10"))
version = 10;
else if (file.View.AsciiEqual (4, "X12"))
version = 12;
else if (file.View.AsciiEqual (4, "OX7\0"))
version = 7;
else if (file.View.AsciiEqual (4, "OX6\0"))
version = 6;
else if (file.View.AsciiEqual (4, "OX5 "))
version = 5;
else
return null;
int count = file.View.ReadInt32 (8);
if (!IsSaneCount (count))
return null;
List<Entry> dir;
if (version > 5)
dir = ReadIndexV6 (file, count);
else
dir = ReadIndexV5 (file, count);
if (null == dir)
return null;
return new BoxArchive (file, this, dir, VersionKeyMap[version]);
}
List<Entry> ReadIndexV6 (ArcView file, int count)
{
int index_offset = 0x10;
var dir = new List<Entry> (count);
for (int i = 0; i < count; ++i)
{
var entry = new Entry {
Name = file.View.ReadString (index_offset, 0x10),
Type = "script",
Offset = file.View.ReadUInt32 (index_offset+0x10),
Size = file.View.ReadUInt32 (index_offset+0x14),
};
if (!entry.CheckPlacement (file.MaxOffset))
return null;
dir.Add (entry);
index_offset += 0x18;
}
return dir;
}
List<Entry> ReadIndexV5 (ArcView file, int count)
{
var base_name = Path.GetFileNameWithoutExtension (file.Name);
int index_offset = 0xC;
uint next_offset = file.View.ReadUInt32 (index_offset);
var dir = new List<Entry> (count);
for (int i = 0; i < count; ++i)
{
index_offset += 4;
var entry = new Entry {
Name = string.Format ("{0}#{1:D2}.evt", base_name, i),
Type = "script",
Offset = next_offset,
};
next_offset = i+1 == count ? (uint)file.MaxOffset : file.View.ReadUInt32 (index_offset);
entry.Size = next_offset - (uint)entry.Offset;
if (!entry.CheckPlacement (file.MaxOffset))
return null;
dir.Add (entry);
}
return dir;
}
public override Stream OpenEntry (ArcFile arc, Entry entry)
{
var input = arc.File.CreateStream (entry.Offset, entry.Size);
var barc = arc as BoxArchive;
if (null == barc)
return input;
return new CryptoStream (input, new XorTransform (barc.Key), CryptoStreamMode.Read);
}
}
[Export(typeof(ArchiveFormat))]
public class AoiMyOpener : ArchiveFormat
{
public override string Tag { get { return "AOIMY"; } }
public override string Description { get { return "Aoi engine script archive"; } }
public override uint Signature { get { return 0x4D494F41; } } // 'AOIM'
public override bool IsHierarchic { get { return false; } }
public override bool CanWrite { get { return false; } }
public AoiMyOpener ()
{
Extensions = new string[] { "box" };
}
public override ArcFile TryOpen (ArcView file)
{
if (!file.View.AsciiEqual (4, "Y01\0"))
return null;
int count = Binary.BigEndian (file.View.ReadInt32 (8));
if (!IsSaneCount (count))
return null;
int index_offset = 0x10;
var dir = new List<Entry> (count);
for (int i = 0; i < count; ++i)
{
var entry = new Entry {
Name = file.View.ReadString (index_offset, 0x10),
Type = "script",
Offset = Binary.BigEndian (file.View.ReadUInt32 (index_offset+0x10)),
Size = Binary.BigEndian (file.View.ReadUInt32 (index_offset+0x14)),
};
if (!entry.CheckPlacement (file.MaxOffset))
return null;
dir.Add (entry);
index_offset += 0x18;
}
return new ArcFile (file, this, dir);
}
public override Stream OpenEntry (ArcFile arc, Entry entry)
{
var data = arc.File.View.ReadBytes (entry.Offset, entry.Size);
uint offset = (uint)entry.Offset;
for (int i = 0; i < data.Length; ++i)
{
data[i] ^= KeyFromOffset (offset++);
}
return new MemoryStream (data);
}
static byte KeyFromOffset (uint offset)
{
uint v1 = offset - 0x5CC8E9D7u + (0xA3371629u >> (int)((offset & 0xF) + 1)) - (0x5CC8E9D7u << (int)(31 - (offset & 0xF)));
uint v3 = v1 << (int)(31 - ((offset >> 4) & 0xF));
uint v4 = v1 >> (int)(((offset >> 4) & 0xF) + 1);
uint v5 = offset - 0x5CC8E9D7
+ ((offset - 0x5CC8E9D7u + v3 + v4) << (int)(31 - ((offset >> 8) & 0xF)))
+ ((offset - 0x5CC8E9D7u + v3 + v4) >> (int)(((offset >> 8) & 0xF) + 1));
uint v6 = offset - 0x5CC8E9D7u
+ (v5 << (int)(31 - ((offset >> 12) & 0xF))) + (v5 >> (int)(((offset >> 12) & 0xF) + 1));
uint v7 = offset - 0x5CC8E9D7u
+ (v6 << (int)(31 - ((offset >> 16) & 0xF))) + (v6 >> (int)(((offset >> 16) & 0xF) + 1));
int v8 = (int)(offset >> 20) & 0xF;
uint v9 = offset - 0x5CC8E9D7u
+ ((offset - 0x5CC8E9D7u + (v7 << (31 - v8)) + (v7 >> (v8 + 1))) << (int)(31 - ((offset >> 24) & 0xF)))
+ ((offset - 0x5CC8E9D7u + (v7 << (31 - v8)) + (v7 >> (v8 + 1))) >> (int)(((offset >> 24) & 0xF) + 1));
uint key = (offset - 0x5CC8E9D7 + (v9 << (int)(31 - (offset >> 28))) + (v9 >> (int)((offset >> 28) + 1))) >> (int)(offset & 0xF);
return (byte)key;
}
}
[Export(typeof(ArchiveFormat))]
public class AoiMyUnicodeOpener : AoiMyOpener
{
public override string Tag { get { return "AOIMY/UNICODE"; } }
public override string Description { get { return "Aoi engine script archive"; } }
public override uint Signature { get { return 0x004F0041; } } // 'A O '
public override bool IsHierarchic { get { return false; } }
public override bool CanWrite { get { return false; } }
public override ArcFile TryOpen (ArcView file)
{
var name_buffer = new byte[0x20];
file.View.Read (0, name_buffer, 0, 0x16);
if ("AOIMY01\0" != Encoding.Unicode.GetString (name_buffer, 0, 0x10))
return null;
int count = Binary.BigEndian (file.View.ReadInt32 (0x10));
if (!IsSaneCount (count))
return null;
int index_offset = 0x18;
var dir = new List<Entry> (count);
for (int i = 0; i < count; ++i)
{
if (0x20 != file.View.Read (index_offset, name_buffer, 0, 0x20))
return null;
int n;
for (n = 0; n < name_buffer.Length; n += 2)
if (0 == name_buffer[n] && 0 == name_buffer[n+1])
break;
if (0 == n)
return null;
var entry = new Entry {
Name = Encoding.Unicode.GetString (name_buffer, 0, n),
Type = "script",
Offset = Binary.BigEndian (file.View.ReadUInt32 (index_offset+0x20)),
Size = Binary.BigEndian (file.View.ReadUInt32 (index_offset+0x24)),
};
if (!entry.CheckPlacement (file.MaxOffset))
return null;
dir.Add (entry);
index_offset += 0x28;
}
return new ArcFile (file, this, dir);
}
}
}