mirror of
https://github.com/crskycode/GARbro.git
synced 2024-12-29 14:24:13 +08:00
401 lines
16 KiB
C#
401 lines
16 KiB
C#
//! \file ArcVAFS.cs
|
|
//! \date Sun Jan 10 04:19:47 2016
|
|
//! \brief Softpal 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 System.Text;
|
|
using GameRes.Utility;
|
|
|
|
namespace GameRes.Formats.Softpal
|
|
{
|
|
[Export(typeof(ArchiveFormat))]
|
|
public class VafsOpener : ArchiveFormat
|
|
{
|
|
public override string Tag { get { return "VAFS"; } }
|
|
public override string Description { get { return "Softpal engine resource archive"; } }
|
|
public override uint Signature { get { return 0x53464156; } } // 'VAFS'
|
|
public override bool IsHierarchic { get { return false; } }
|
|
public override bool CanWrite { get { return false; } }
|
|
|
|
public VafsOpener ()
|
|
{
|
|
Extensions = new string[] { "052", "055", "058" };
|
|
}
|
|
|
|
static readonly Lazy<ImageFormat> s_PicFormat = new Lazy<ImageFormat> (() => ImageFormat.FindByTag ("PIC/SOFTPAL"));
|
|
|
|
public override ArcFile TryOpen (ArcView file)
|
|
{
|
|
if ('H' != file.View.ReadByte (4))
|
|
return null;
|
|
uint index_offset = 0x10;
|
|
uint data_offset = file.View.ReadUInt32 (index_offset);
|
|
var base_name = Path.GetFileNameWithoutExtension (file.Name).ToUpperInvariant();
|
|
if (0 == data_offset && "TP" == base_name)
|
|
{
|
|
var ext = Path.GetExtension (file.Name).TrimStart ('.');
|
|
int version;
|
|
if (int.TryParse (ext, out version) && version >= 55)
|
|
return OpenTp055Arc (file);
|
|
else
|
|
return OpenTpArc (file);
|
|
}
|
|
if (data_offset < index_offset || data_offset >= file.MaxOffset)
|
|
return null;
|
|
int count = (int)(data_offset - index_offset) / 4;
|
|
if (!IsSaneCount (count))
|
|
return null;
|
|
|
|
uint next_offset = data_offset;
|
|
bool is_bgm = "BGM" == base_name;
|
|
bool is_pic = "PIC" == base_name;
|
|
var dir = new List<Entry> (count);
|
|
for (int i = 0; next_offset != file.MaxOffset && i < count; ++i)
|
|
{
|
|
index_offset += 4;
|
|
var name = string.Format("{0}#{1:D5}", base_name, i);
|
|
var offset = next_offset;
|
|
next_offset = index_offset == data_offset ? 0 : file.View.ReadUInt32 (index_offset);
|
|
if (uint.MaxValue == next_offset || next_offset < offset)
|
|
break;
|
|
uint size = next_offset - offset;
|
|
if (size < 4)
|
|
continue;
|
|
Entry entry;
|
|
if (is_pic)
|
|
entry = new Entry { Name = name, Type = "image" };
|
|
else if (is_bgm)
|
|
entry = new Entry { Name = name + ".wav", Type = "audio" };
|
|
else
|
|
entry = new AutoEntry (name, () => {
|
|
uint signature = file.View.ReadUInt32 (offset);
|
|
uint s16 = signature & 0xFFFF;
|
|
if (1 == s16 || 3 == s16 || 4 == s16)
|
|
return s_PicFormat.Value;
|
|
if (size > 0x200 && (size >> 9) == (signature >> 9))
|
|
return AudioFormat.Wav;
|
|
return AutoEntry.DetectFileType (signature);
|
|
});
|
|
|
|
entry.Offset = offset;
|
|
entry.Size = size;
|
|
if (!entry.CheckPlacement (file.MaxOffset))
|
|
return null;
|
|
dir.Add (entry);
|
|
}
|
|
if (0 == dir.Count)
|
|
return null;
|
|
return new ArcFile (file, this, dir);
|
|
}
|
|
|
|
ArcFile OpenTpArc (ArcView file)
|
|
{
|
|
uint index_offset = 0x20;
|
|
uint data_offset;
|
|
for (;;)
|
|
{
|
|
data_offset = file.View.ReadUInt32 (index_offset);
|
|
if (0 != data_offset)
|
|
break;
|
|
index_offset += 0x10;
|
|
if (0xA010 == index_offset)
|
|
return null;
|
|
}
|
|
if (data_offset >= file.MaxOffset)
|
|
return null;
|
|
var dir = new List<Entry>();
|
|
while (index_offset < data_offset)
|
|
{
|
|
var offset = file.View.ReadUInt32 (index_offset);
|
|
if (0 != offset)
|
|
{
|
|
var name = string.Format("TP#{0:D5}.wav", index_offset/0x10 - 1);
|
|
var entry = new Entry {
|
|
Name = name,
|
|
Type = "audio",
|
|
Offset = offset,
|
|
Size = 0x402 * file.View.ReadUInt32 (index_offset+4),
|
|
};
|
|
if (!entry.CheckPlacement (file.MaxOffset))
|
|
return null;
|
|
dir.Add (entry);
|
|
}
|
|
index_offset += 0x10;
|
|
}
|
|
return new TpArchive (file, this, dir);
|
|
}
|
|
|
|
ArcFile OpenTp055Arc (ArcView file)
|
|
{
|
|
uint index_offset = 0x20;
|
|
uint data_offset;
|
|
for (;;)
|
|
{
|
|
data_offset = file.View.ReadUInt32 (index_offset);
|
|
if (0 != data_offset)
|
|
break;
|
|
index_offset += 0x10;
|
|
if (0xA010 == index_offset)
|
|
return null;
|
|
}
|
|
if (data_offset >= file.MaxOffset)
|
|
return null;
|
|
var dir = new List<Entry>();
|
|
while (index_offset < data_offset)
|
|
{
|
|
var offset = file.View.ReadUInt32 (index_offset);
|
|
if (0 != offset)
|
|
{
|
|
if (offset >= file.MaxOffset)
|
|
return null;
|
|
var name = string.Format("TP#{0:D6}.wav", index_offset/0x10 - 1);
|
|
var entry = new Tp055Entry {
|
|
Name = name,
|
|
Offset = offset,
|
|
ChunkCount = file.View.ReadInt32 (index_offset+4),
|
|
};
|
|
dir.Add (entry);
|
|
}
|
|
index_offset += 0x10;
|
|
}
|
|
for (int i = 0; i < dir.Count-1; ++i)
|
|
{
|
|
dir[i].Size = (uint)(dir[i+1].Offset - dir[i].Offset);
|
|
}
|
|
dir[dir.Count-1].Size = (uint)(file.MaxOffset - dir[dir.Count-1].Offset);
|
|
return new TpArchive (file, this, dir);
|
|
}
|
|
|
|
public override Stream OpenEntry (ArcFile arc, Entry entry)
|
|
{
|
|
if (entry is Tp055Entry)
|
|
return OpenVoice055Entry (arc, entry as Tp055Entry);
|
|
else if (arc is TpArchive)
|
|
return OpenVoiceEntry (arc, entry);
|
|
else if ("audio" == entry.Type
|
|
&& AudioFormat.Wav.Signature != arc.File.View.ReadUInt32 (entry.Offset))
|
|
return OpenAudioEntry (arc, entry);
|
|
else
|
|
return base.OpenEntry (arc, entry);
|
|
}
|
|
|
|
Stream OpenAudioEntry (ArcFile arc, Entry entry)
|
|
{
|
|
var offset = entry.Offset;
|
|
int size = arc.File.View.ReadInt32 (offset);
|
|
offset += 4;
|
|
int chunk_count = size >> 9;
|
|
int pcm_size = chunk_count * 0x400;
|
|
var output = new MemoryStream (0x24 + pcm_size);
|
|
using (var wav = new BinaryWriter (output, Encoding.ASCII, true))
|
|
{
|
|
WriteWavHeader (wav, 2, 22050, pcm_size);
|
|
var buffer = new byte[0x204];
|
|
for (int chunk = 0; chunk < chunk_count; ++chunk)
|
|
{
|
|
arc.File.View.Read (offset, buffer, 0, 0x204);
|
|
offset += 0x204;
|
|
int src = 0;
|
|
var data_offset = wav.BaseStream.Position;
|
|
for (int channel = 0; channel < 2; ++channel)
|
|
{
|
|
int addend = buffer[src++] << 8;
|
|
int pcm = LittleEndian.ToInt16 (buffer, src);
|
|
src += 2;
|
|
wav.BaseStream.Position = data_offset + channel * 2;
|
|
wav.Write ((short)pcm);
|
|
for (int i = 0; i < 255; ++i)
|
|
{
|
|
byte v = buffer[src++];
|
|
int diff = v + addend;
|
|
pcm += WaveTable1.Value[diff];
|
|
if (pcm > 32767)
|
|
pcm = 32767;
|
|
else if (pcm < -32767)
|
|
pcm = -32767;
|
|
wav.BaseStream.Seek (2, SeekOrigin.Current);
|
|
wav.Write ((short)pcm);
|
|
addend += WaveTable2.Value[v];
|
|
if (addend < 0)
|
|
addend = 0;
|
|
else if (addend >= 16384)
|
|
addend = 16128;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
output.Position = 0;
|
|
return output;
|
|
}
|
|
|
|
Stream OpenVoiceEntry (ArcFile arc, Entry entry)
|
|
{
|
|
int remaining = (int)entry.Size;
|
|
int chunk_count = remaining / 0x402;
|
|
int pcm_size = chunk_count * 0x800;
|
|
var output = new MemoryStream (0x24 + pcm_size);
|
|
var offset = entry.Offset;
|
|
using (var wav = new BinaryWriter (output, Encoding.ASCII, true))
|
|
{
|
|
WriteWavHeader (wav, 1, 22050, pcm_size);
|
|
var buffer = new byte[0x402];
|
|
while (remaining > 0)
|
|
{
|
|
arc.File.View.Read (offset, buffer, 0, 0x402);
|
|
offset += 0x402;
|
|
remaining -= 0x402;
|
|
int pcm = LittleEndian.ToInt16 (buffer, 1);
|
|
int addend = buffer[0] << 8;
|
|
wav.Write ((short)pcm);
|
|
for (int src = 3; src < buffer.Length; ++src)
|
|
{
|
|
byte v = buffer[src];
|
|
int diff = v + addend;
|
|
pcm += WaveTable1.Value[diff];
|
|
if (pcm > 32767)
|
|
pcm = 32767;
|
|
else if (pcm < -32767)
|
|
pcm = -32767;
|
|
wav.Write ((short)pcm);
|
|
addend += WaveTable2.Value[v];
|
|
if (addend < 0)
|
|
addend = 0;
|
|
else if (addend >= 16384)
|
|
addend = 16128;
|
|
}
|
|
}
|
|
}
|
|
output.Position = 0;
|
|
return output;
|
|
}
|
|
|
|
Stream OpenVoice055Entry (ArcFile arc, Tp055Entry entry)
|
|
{
|
|
int pcm_size = entry.ChunkCount * 0x800;
|
|
var offset = entry.Offset;
|
|
var wav_mem = new MemoryStream (0x24 + pcm_size);
|
|
using (var wav = new BinaryWriter (wav_mem, Encoding.ASCII, true))
|
|
{
|
|
WriteWavHeader (wav, 1, 22050, pcm_size);
|
|
var buffer = new byte[0x402];
|
|
var output = new int[0x400];
|
|
for (int i = 0; i < entry.ChunkCount; ++i)
|
|
{
|
|
int ctl = arc.File.View.ReadByte (offset++) & 0x3F;
|
|
for (int j = 0; j < output.Length; ++j)
|
|
output[j] = 0;
|
|
for (; ctl != 0; ctl >>= 1)
|
|
{
|
|
if (0 == (ctl & 1))
|
|
continue;
|
|
arc.File.View.Read (offset, buffer, 0, 0x402);
|
|
offset += 0x402;
|
|
int pcm = LittleEndian.ToInt16 (buffer, 1);
|
|
int dst = 0;
|
|
int addend = buffer[0] << 8;
|
|
output[dst++] += pcm;
|
|
for (int src = 3; src < buffer.Length; ++src)
|
|
{
|
|
byte v = buffer[src];
|
|
int diff = v + addend;
|
|
pcm += WaveTable1.Value[diff];
|
|
output[dst++] += (short)pcm;
|
|
addend += WaveTable2.Value[v];
|
|
if (addend < 0)
|
|
addend = 0;
|
|
else if (addend >= 16384)
|
|
addend = 16128;
|
|
}
|
|
}
|
|
for (int j = 0; j < output.Length; ++j)
|
|
{
|
|
int pcm = output[j];
|
|
if (pcm > 32767)
|
|
pcm = 32767;
|
|
else if (pcm < -32767)
|
|
pcm = -32767;
|
|
wav.Write ((short)pcm);
|
|
}
|
|
}
|
|
}
|
|
wav_mem.Position = 0;
|
|
return wav_mem;
|
|
}
|
|
|
|
void WriteWavHeader (BinaryWriter wav, short channels, int freq, int pcm_size)
|
|
{
|
|
wav.Write ("RIFF".ToCharArray());
|
|
wav.Write (0x24 + pcm_size);
|
|
wav.Write ("WAVE".ToCharArray());
|
|
wav.Write ("fmt ".ToCharArray());
|
|
wav.Write (0x10);
|
|
wav.Write ((ushort)1);
|
|
wav.Write ((ushort)channels);
|
|
wav.Write (freq);
|
|
wav.Write (freq*channels*2);
|
|
wav.Write ((ushort)(channels*2));
|
|
wav.Write ((ushort)16);
|
|
wav.Write ("data".ToCharArray());
|
|
wav.Write (pcm_size);
|
|
}
|
|
|
|
static readonly Lazy<short[]> WaveTable1 = new Lazy<short[]> (() => LoadWaveTable ("WaveTable1"));
|
|
static readonly Lazy<short[]> WaveTable2 = new Lazy<short[]> (() => LoadWaveTable ("WaveTable2"));
|
|
|
|
static short[] LoadWaveTable (string name)
|
|
{
|
|
|
|
var assembly = typeof(VafsOpener).Assembly;
|
|
using (var stream = assembly.GetManifestResourceStream ("GameRes.Formats.Softpal."+name))
|
|
{
|
|
if (null == stream)
|
|
return null;
|
|
var src = new byte[stream.Length];
|
|
stream.Read (src, 0, src.Length);
|
|
var array = new short[src.Length/2];
|
|
Buffer.BlockCopy (src, 0, array, 0, src.Length);
|
|
return array;
|
|
}
|
|
}
|
|
}
|
|
|
|
internal class TpArchive : ArcFile
|
|
{
|
|
public TpArchive (ArcView arc, ArchiveFormat impl, ICollection<Entry> dir)
|
|
: base (arc, impl, dir)
|
|
{
|
|
}
|
|
}
|
|
|
|
internal class Tp055Entry : Entry
|
|
{
|
|
public int ChunkCount;
|
|
|
|
public override string Type { get { return "audio"; } }
|
|
}
|
|
}
|