mirror of
https://github.com/crskycode/GARbro.git
synced 2024-12-25 12:24:12 +08:00
408 lines
15 KiB
C#
408 lines
15 KiB
C#
//! \file ArcNSA.cs
|
|
//! \date Sun Jul 27 11:25:46 2014
|
|
//! \brief ONScripter NSA/SAR archives implementation.
|
|
//
|
|
// Copyright (C) 2014 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.IO;
|
|
using System.Collections.Generic;
|
|
using System.ComponentModel.Composition;
|
|
using GameRes.Formats.Strings;
|
|
using GameRes.Utility;
|
|
|
|
namespace GameRes.Formats.ONScripter
|
|
{
|
|
public class NsaEntry : PackedEntry
|
|
{
|
|
public Compression CompressionType { get; set; }
|
|
}
|
|
|
|
public enum Compression
|
|
{
|
|
Unknown = 256,
|
|
None = 0,
|
|
Spb = 1,
|
|
Lzss = 2,
|
|
Nbz = 4,
|
|
}
|
|
|
|
[Export(typeof(ArchiveFormat))]
|
|
public class NsaOpener : ArchiveFormat
|
|
{
|
|
public override string Tag { get { return "NSA"; } }
|
|
public override string Description { get { return arcStrings.NSADescription; } }
|
|
public override uint Signature { get { return 0; } }
|
|
public override bool IsHierarchic { get { return true; } }
|
|
|
|
public override ArcFile TryOpen (ArcView file)
|
|
{
|
|
int num_of_files = Binary.BigEndian (file.View.ReadInt16 (0));
|
|
if (num_of_files <= 0)
|
|
return null;
|
|
uint base_offset = Binary.BigEndian (file.View.ReadUInt32 (2));
|
|
if (base_offset >= file.MaxOffset || base_offset < 15 * (uint)num_of_files)
|
|
return null;
|
|
|
|
uint cur_offset = 6;
|
|
var dir = new List<Entry>();
|
|
for (int i = 0; i < num_of_files; ++i)
|
|
{
|
|
if (base_offset - cur_offset < 15)
|
|
return null;
|
|
int name_len;
|
|
byte[] name_buffer = ReadName (file, cur_offset, base_offset-cur_offset, out name_len);
|
|
if (0 == name_len || base_offset-cur_offset == name_len)
|
|
return null;
|
|
cur_offset += (uint)(name_len + 1);
|
|
if (base_offset - cur_offset < 13)
|
|
return null;
|
|
|
|
var entry = new NsaEntry
|
|
{
|
|
Name = Encodings.cp932.GetString (name_buffer, 0, name_len),
|
|
};
|
|
byte compression_type = file.View.ReadByte (cur_offset);
|
|
entry.Type = FormatCatalog.Instance.GetTypeFromName (entry.Name);
|
|
entry.Offset = Binary.BigEndian (file.View.ReadUInt32 (cur_offset+1)) + (long)base_offset;
|
|
entry.Size = Binary.BigEndian (file.View.ReadUInt32 (cur_offset+5));
|
|
entry.UnpackedSize = Binary.BigEndian (file.View.ReadUInt32 (cur_offset+9));
|
|
entry.IsPacked = compression_type != 0;
|
|
switch (compression_type)
|
|
{
|
|
case 0: entry.CompressionType = Compression.None; break;
|
|
case 1: entry.CompressionType = Compression.Spb; break;
|
|
case 2: entry.CompressionType = Compression.Lzss; break;
|
|
case 4: entry.CompressionType = Compression.Nbz; break;
|
|
default: entry.CompressionType = Compression.Unknown; break;
|
|
}
|
|
cur_offset += 13;
|
|
dir.Add (entry);
|
|
}
|
|
return new ArcFile (file, this, dir);
|
|
}
|
|
|
|
public override Stream OpenEntry (ArcFile arc, Entry entry)
|
|
{
|
|
var nsa_entry = entry as NsaEntry;
|
|
if (null != nsa_entry &&
|
|
(Compression.Lzss == nsa_entry.CompressionType ||
|
|
Compression.Spb == nsa_entry.CompressionType))
|
|
{
|
|
using (var input = arc.File.CreateStream (nsa_entry.Offset, nsa_entry.Size))
|
|
{
|
|
var decoder = new Unpacker (input, nsa_entry.UnpackedSize);
|
|
switch (nsa_entry.CompressionType)
|
|
{
|
|
case Compression.Lzss: return decoder.LzssDecodedStream();
|
|
case Compression.Spb: return decoder.SpbDecodedStream();
|
|
}
|
|
}
|
|
}
|
|
return arc.File.CreateStream (entry.Offset, entry.Size);
|
|
}
|
|
|
|
protected static byte[] ReadName (ArcView file, uint offset, uint limit, out int name_len)
|
|
{
|
|
byte[] name_buffer = new byte[40];
|
|
for (name_len = 0; name_len < limit; ++name_len)
|
|
{
|
|
byte b = file.View.ReadByte (offset+name_len);
|
|
if (0 == b)
|
|
break;
|
|
if (name_buffer.Length == name_len)
|
|
{
|
|
byte[] new_buffer = new byte[checked(name_len/2*3)];
|
|
Array.Copy (name_buffer, new_buffer, name_len);
|
|
name_buffer = new_buffer;
|
|
}
|
|
name_buffer[name_len] = b;
|
|
}
|
|
return name_buffer;
|
|
}
|
|
}
|
|
|
|
[Export(typeof(ArchiveFormat))]
|
|
public class SarOpener : NsaOpener
|
|
{
|
|
public override string Tag { get { return "SAR"; } }
|
|
|
|
public override ArcFile TryOpen (ArcView file)
|
|
{
|
|
int num_of_files = Binary.BigEndian (file.View.ReadInt16 (0));
|
|
if (num_of_files <= 0)
|
|
return null;
|
|
uint base_offset = Binary.BigEndian (file.View.ReadUInt32 (2));
|
|
if (base_offset >= file.MaxOffset || base_offset < 10 * (uint)num_of_files)
|
|
return null;
|
|
|
|
uint cur_offset = 6;
|
|
var dir = new List<Entry>();
|
|
for (int i = 0; i < num_of_files; ++i)
|
|
{
|
|
if (base_offset - cur_offset < 10)
|
|
return null;
|
|
int name_len;
|
|
byte[] name_buffer = ReadName (file, cur_offset, base_offset-cur_offset, out name_len);
|
|
if (0 == name_len || base_offset-cur_offset == name_len)
|
|
return null;
|
|
cur_offset += (uint)(name_len + 1);
|
|
if (base_offset - cur_offset < 8)
|
|
return null;
|
|
|
|
var entry = new NsaEntry
|
|
{
|
|
Name = Encodings.cp932.GetString (name_buffer, 0, name_len),
|
|
};
|
|
entry.Type = FormatCatalog.Instance.GetTypeFromName (entry.Name);
|
|
entry.Offset = Binary.BigEndian (file.View.ReadUInt32 (cur_offset)) + (long)base_offset;
|
|
entry.Size = Binary.BigEndian (file.View.ReadUInt32 (cur_offset+4));
|
|
entry.UnpackedSize = entry.Size;
|
|
entry.CompressionType = Compression.None;
|
|
|
|
cur_offset += 8;
|
|
dir.Add (entry);
|
|
}
|
|
return new ArcFile (file, this, dir);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* ONScripter-EN decompression routines.
|
|
*
|
|
* Copyright (c) 2001-2010 Ogapee. All rights reserved.
|
|
* (original ONScripter, of which this is a fork).
|
|
*
|
|
* ogapee@aqua.dti2.ne.jp
|
|
*
|
|
* Copyright (c) 2007-2010 "Uncle" Mion Sonozaki
|
|
*
|
|
* UncleMion@gmail.com
|
|
*
|
|
*/
|
|
|
|
internal class Unpacker
|
|
{
|
|
private Stream m_input;
|
|
private byte[] m_output;
|
|
private byte[] m_read_buf = new byte[4096];
|
|
|
|
public Unpacker (Stream input, uint unpacked_size)
|
|
{
|
|
m_input = input;
|
|
m_output = new byte[unpacked_size];
|
|
}
|
|
|
|
public Stream LzssDecodedStream ()
|
|
{
|
|
uint size = DecodeLZSS();
|
|
if (size != m_output.Length)
|
|
System.Diagnostics.Trace.WriteLine ("Invalid compressed data", "LzssDecoder");
|
|
return new MemoryStream (m_output, false);
|
|
}
|
|
|
|
public Stream SpbDecodedStream ()
|
|
{
|
|
uint size = DecodeSPB();
|
|
return new MemoryStream (m_output, false);
|
|
}
|
|
|
|
const int EI = 8;
|
|
const int EJ = 4;
|
|
const int P = 1; /* If match length <= P then output one character */
|
|
const int N = (1 << EI); /* buffer size */
|
|
const int F = ((1 << EJ) + P); /* lookahead buffer size */
|
|
|
|
private int m_getbit_mask;
|
|
private int m_getbit_len;
|
|
private int m_getbit_count;
|
|
|
|
uint DecodeLZSS ()
|
|
{
|
|
uint count = 0;
|
|
|
|
m_getbit_mask = 0;
|
|
m_getbit_len = m_getbit_count = 0;
|
|
byte[] decomp_buffer = new byte[N*2];
|
|
int r = N - F;
|
|
int c;
|
|
while (count < m_output.Length)
|
|
{
|
|
if (0 != GetBits (1))
|
|
{
|
|
c = GetBits (8);
|
|
if (-1 == c)
|
|
break;
|
|
m_output[count++] = (byte)c;
|
|
decomp_buffer[r++] = (byte)c;
|
|
r &= (N - 1);
|
|
}
|
|
else
|
|
{
|
|
int i = GetBits (EI);
|
|
if (-1 == i)
|
|
break;
|
|
int j = GetBits (EJ);
|
|
if (-1 == j)
|
|
break;
|
|
for (int k = 0; k <= j + 1; k++)
|
|
{
|
|
c = decomp_buffer[(i + k) & (N - 1)];
|
|
m_output[count++] = (byte)c;
|
|
decomp_buffer[r++] = (byte)c;
|
|
r &= (N - 1);
|
|
}
|
|
}
|
|
}
|
|
return count;
|
|
}
|
|
|
|
uint DecodeSPB ()
|
|
{
|
|
m_getbit_mask = 0;
|
|
m_getbit_len = m_getbit_count = 0;
|
|
|
|
uint width = (uint)(m_input.ReadByte() << 8);
|
|
width |= (uint)m_input.ReadByte();
|
|
uint height = (uint)(m_input.ReadByte() << 8);
|
|
height |= (uint)m_input.ReadByte();
|
|
|
|
uint width_pad = (4 - width * 3 % 4) % 4;
|
|
int stride = (int)(width * 3 + width_pad);
|
|
uint total_size = (uint)stride * height + 54;
|
|
|
|
if ((uint)m_output.Length < total_size)
|
|
m_output = new byte[total_size];
|
|
|
|
/* ---------------------------------------- */
|
|
/* Write header */
|
|
m_output[0] = (byte)'B';
|
|
m_output[1] = (byte)'M';
|
|
m_output[2] = (byte)(total_size & 0xff);
|
|
m_output[3] = (byte)((total_size >> 8) & 0xff);
|
|
m_output[4] = (byte)((total_size >> 16) & 0xff);
|
|
m_output[5] = (byte)((total_size >> 24) & 0xff);
|
|
m_output[10] = 54; // offset to the body
|
|
m_output[14] = 40; // header size
|
|
m_output[18] = (byte)(width & 0xff);
|
|
m_output[19] = (byte)((width >> 8) & 0xff);
|
|
m_output[22] = (byte)(height & 0xff);
|
|
m_output[23] = (byte)((height >> 8) & 0xff);
|
|
m_output[26] = 1; // the number of the plane
|
|
m_output[28] = 24; // bpp
|
|
// m_output[34] = (byte)(total_size - 54); // size of the body
|
|
|
|
byte[] decomp_buffer = new byte[width*height*4];
|
|
|
|
for (int i = 0; i < 3; i++)
|
|
{
|
|
uint count = 0;
|
|
int c = GetBits (8);
|
|
if (-1 == c)
|
|
break;
|
|
decomp_buffer[count++] = (byte)c;
|
|
while (count < width * height)
|
|
{
|
|
int n = GetBits (3);
|
|
if (0 == n)
|
|
{
|
|
decomp_buffer[count++] = (byte)c;
|
|
decomp_buffer[count++] = (byte)c;
|
|
decomp_buffer[count++] = (byte)c;
|
|
decomp_buffer[count++] = (byte)c;
|
|
continue;
|
|
}
|
|
int m;
|
|
if (7 == n)
|
|
m = GetBits (1) + 1;
|
|
else
|
|
m = n + 2;
|
|
|
|
for (uint j = 0; j < 4; j++)
|
|
{
|
|
if (8 == m)
|
|
{
|
|
c = GetBits (8);
|
|
}
|
|
else
|
|
{
|
|
int k = GetBits (m);
|
|
if (0 != (k & 1))
|
|
c += (k>>1) + 1;
|
|
else
|
|
c -= (k>>1);
|
|
}
|
|
decomp_buffer[count++] = (byte)c;
|
|
}
|
|
}
|
|
|
|
int pbuf = stride * (int)(height-1) + i + 54; // in m_output
|
|
int psbuf = 0; // in decomp_buffer
|
|
|
|
for (uint j = 0; j < height; j++)
|
|
{
|
|
if (0 != (j & 1))
|
|
{
|
|
for (uint k = 0; k < width; k++, pbuf -= 3)
|
|
m_output[pbuf] = decomp_buffer[psbuf++];
|
|
pbuf -= stride - 3;
|
|
}
|
|
else
|
|
{
|
|
for (uint k = 0; k < width; k++, pbuf += 3)
|
|
m_output[pbuf] = decomp_buffer[psbuf++];
|
|
pbuf -= stride + 3;
|
|
}
|
|
}
|
|
}
|
|
return total_size;
|
|
}
|
|
|
|
private int m_getbit_buf = 0;
|
|
|
|
int GetBits (int n)
|
|
{
|
|
int x = 0;
|
|
for (int i = 0; i < n; i++)
|
|
{
|
|
if (0 == m_getbit_mask)
|
|
{
|
|
if (m_getbit_len == m_getbit_count)
|
|
{
|
|
m_getbit_len = m_input.Read (m_read_buf, 0, m_read_buf.Length);
|
|
if (0 == m_getbit_len)
|
|
return -1;
|
|
m_getbit_count = 0;
|
|
}
|
|
m_getbit_buf = m_read_buf[m_getbit_count++];
|
|
m_getbit_mask = 128;
|
|
}
|
|
x <<= 1;
|
|
if (0 != (m_getbit_buf & m_getbit_mask))
|
|
x |= 1;
|
|
m_getbit_mask >>= 1;
|
|
}
|
|
return x;
|
|
}
|
|
}
|
|
}
|