def decompress(data: bytes):
rdr = BinaryReader(data)
wtr = BinaryWriter()
type = rdr.read_uint8()
if type != 0x30:
raise Exception("Tried to decompress commands that isn't RLE")
ds = rdr.read_uint24()
if ds == 0:
rdr.read_uint32()
while True:
flag = rdr.read_uint8()
if flag is None:
break # we've hit the end
compressed = (flag & 0x80) > 0
lenght = flag & 0x7f
lenght += 3 if compressed else 1
if compressed:
next = rdr.read_uint8()
for i in range(lenght):
wtr.write_uint8(next)
else:
wtr.write(rdr.read(lenght))
return wtr.data
def read_stream(self, stream):
if not isinstance(stream, BinaryReader):
rdr = BinaryReader(stream)
else:
rdr = stream
self.original_header = rdr.read(0x100)
rdr.seek(0)
self.chunk_id = rdr.read(4)
if self.chunk_id != b"sadl":
raise ValueError("SADL does not start with magic value")
rdr.seek(0x31)
self.loop_flag = rdr.read_uint8()
self.channels = rdr.read_uint8()
coding = rdr.read_uint8()
if coding & 0x06 == 4:
self.sample_rate = 32728
elif coding & 0x06 == 2:
self.sample_rate = 16364
self.coding = coding & 0xf0
rdr.seek(0x40)
self.file_size = rdr.read_uint32()
if self.coding == Coding.INT_IMA:
self.num_samples = int(
(self.file_size - 0x100) / self.channels * 2)
elif self.coding == Coding.NDS_PROCYON:
self.num_samples = int(
(self.file_size - 0x100) / self.channels / 16 * 30)
else:
raise NotImplementedError()
rdr.seek(0x54)
if self.loop_flag != 0:
if self.coding == Coding.INT_IMA:
self.loop_offset = int(
(rdr.read_uint32() - 0x100) / self.channels * 2)
elif self.coding == Coding.NDS_PROCYON:
self.loop_offset = int(
(rdr.read_uint32() - 0x100) / self.channels / 16 * 30)
rdr.seek(0x100)
buffer = rdr.read(self.file_size - 0x100)
buffer = np.frombuffer(buffer, dtype=np.uint8)
buffer = buffer.reshape(
((self.file_size - 0x100) // 0x10 // self.channels, self.channels,
0x10))
buffer = buffer.swapaxes(0, 1)
self.buffer = buffer.reshape(
(buffer.shape[0], buffer.shape[1] * buffer.shape[2]))
self.offset = [0] * self.channels
self.ima_decoders = []
self.procyon_decoders = []
for i in range(self.channels):
self.ima_decoders.append(ima_adpcm.ImaAdpcm())
self.procyon_decoders.append(procyon.Procyon())
self.blocks_done = 0
def decompress(data: bytes) -> bytes:
rdr = BinaryReader(data)
wtr = BinaryWriter()
compression_type = rdr.read_uint8()
if compression_type == 0x24:
blocksize = 4
elif compression_type == 0x28:
blocksize = 8
else:
raise Exception(
"Tried to decompress something as huffman that isn't huffman")
ds = rdr.read_uint24()
if ds == 0:
rdr.read_uint32()
# Read the tree
treesize = (rdr.read_uint8() + 1) * 2
tree_end = (rdr.c - 1) + treesize
rootNode = HuffTreeNode.from_rdr(rdr, False, 5, tree_end)
rdr.c = tree_end
# Decompress with the tree
bitsleft = 0 # amount of bits left to read from {commands}
current_size = 0
currentNode = rootNode
cashedbyte = -1
while current_size < ds:
# Find next refrence to commands node
while not currentNode.is_data:
if bitsleft == 0:
data = rdr.read_uint32()
bitsleft = 32
bitsleft -= 1
nextIsOne = (data & (1 << bitsleft)) != 0
if nextIsOne:
currentNode = currentNode.child1
else:
currentNode = currentNode.child0
if blocksize == 8:
current_size += 1
wtr.write_uint8(currentNode.data)
elif blocksize == 4:
if cashedbyte < 0:
cashedbyte = currentNode.data
else:
cashedbyte |= currentNode.data << 4
wtr.write_uint8(cashedbyte)
current_size += 1
cashedbyte = -1
currentNode = rootNode
return wtr.data
def read(self, rdr: BinaryReader):
self.chunk_id = rdr.read(4)[::-1]
if self.chunk_id != b"FINF":
raise ValueError("FINFChunk does not start with magic value")
self.chunk_size = rdr.read_uint32()
rdr.read(1)
self.height = rdr.read_uint8()
self.unk0 = rdr.read_uint8()
rdr.read(2)
self.width = rdr.read_uint8()
rdr.read(1) # Width bis
self.encoding = rdr.read_uint8()
self.offset_to_cglp_chunk = rdr.read_uint32() - 8
self.offset_to_cwdh_chunk = rdr.read_uint32() - 8
self.offset_to_cmap_chunk = rdr.read_uint32() - 8
rdr.read(self.chunk_size - 0x1C)
def read(self, rdr: BinaryReader, tile_count: int):
self.chunk_id = rdr.read(4)[::-1]
if self.chunk_id != b"CWDH":
raise ValueError("CWDHChunk does not start with magic value")
self.chunk_size = rdr.read_uint32()
self.first_tile_no = rdr.read_uint16()
self.last_tile_no = rdr.read_uint16()
rdr.read(4)
self.left_spacing = []
self.width = []
self.total_width = []
for i in range(tile_count):
left_spacing = rdr.read_uint8()
width = rdr.read_uint8()
total_width = rdr.read_uint8()
self.left_spacing.append(left_spacing)
self.width.append(width)
self.total_width.append(total_width)
def read(self, br: BinaryReader):
br.seek(0x40, io.SEEK_SET)
self.label = br.read(4)
if self.label != b"song":
raise ValueError("SongChunk does not start with magic value")
self.unk1 = br.read_uint32()
br.read_uint32() # 0xFF10
br.read_uint32() # 0xFFFFFFB0
br.read_uint16() # 0x1
self.tpqn = br.read_uint16()
br.read_uint16() # 0xFF10
self.num_tracks = br.read_uint8()
self.num_channels = br.read_uint8()
br.read_uint32() # 0x0F000000
br.read_uint32() # 0xFFFFFFFF
br.read_uint32() # 0x40000000
br.read_uint32() # 0x00404000
br.read_uint16() # 0x0200
br.read_uint16() # 0x0800
br.read_uint32() # 0xFFFFFF00
br.read(16) # 16 0xFF Padding
def read(self, br: BinaryReader):
br.seek(0, io.SEEK_SET)
self.magic = br.read(4)
if self.magic != b"smdl":
raise ValueError("SMDHeader does not start with magic value")
br.read_uint32() # 0
self.file_length = br.read_uint32()
self.version = br.read_uint16()
self.unk1 = br.read_uint8()
self.unk2 = br.read_uint8()
# 8 bytes of 0
br.read_uint32()
br.read_uint32()
self.year = br.read_uint16()
self.month = br.read_uint8()
self.day = br.read_uint8()
self.hour = br.read_uint8()
self.minute = br.read_uint8()
self.second = br.read_uint8()
self.centisecond = br.read_uint8()
self.file_name = br.read_string(16, encoding=None, pad=b"\xFF")
br.read_uint32() # 0x1
br.read_uint32() # 0x1
br.read_uint32() # 0xFFFFFFFF
br.read_uint32() # 0xFFFFFFFF
def read(self, br: BinaryReader):
br.seek(0)
self.magic = br.read(4)
if self.magic != b"swdl":
raise ValueError("SWDHeader does not start with magic value")
br.read_uint32() # 0
self.file_length = br.read_uint32()
self.version = br.read_uint16()
if self.version != 0x415:
raise ValueError("SMDHeader does not have correct version")
self.is_sample_bank = br.read_bool()
self.group = br.read_uint8()
# 8 bytes of 0
br.read_uint32()
br.read_uint32()
self.year = br.read_uint16()
self.month = br.read_uint8()
self.day = br.read_uint8()
self.hour = br.read_uint8()
self.minute = br.read_uint8()
self.second = br.read_uint8()
self.centisecond = br.read_uint8()
self.file_name = br.read_string(16, encoding=None, pad=b"\xAA")
self.unk10 = br.read_uint32()
# 8 bytes of 0
br.read_uint32()
br.read_uint32()
self.unk13 = br.read_uint32()
self.pcmdlen = br.read_uint32()
self.unk14 = br.read_uint32()
self.wavi_slot_count = br.read_uint16()
self.prgi_slot_count = br.read_uint16()
self.unk17 = br.read_uint16()
self.wavi_len = br.read_uint32()
def load(self, rdr):
if not isinstance(rdr, BinaryReader):
rdr = BinaryReader(rdr)
rdr: BinaryReader
self.original = rdr.read()
rdr.seek(0)
self.number = rdr.read_uint16()
rdr.read_uint16() # 112
self.title = rdr.read_string(encoding=self.encoding)
rdr.seek(0x34)
self.tutorial_id = rdr.read_uint8()
for i in range(3):
self.picarat_decay[i] = rdr.read_uint8()
print(rdr.tell())
self._flags = rdr.read_uint8()
self.location_id = rdr.read_uint8()
self.type = rdr.read_uint8()
self.bg_btm_id = rdr.read_uint8()
rdr.read_uint16()
self.bg_top_id = rdr.read_uint8()
self.reward_id = rdr.read_uint8()
print(rdr.tell())
puzzle_text_offset = 0x70 + rdr.read_uint32()
puzzle_correct_answer_offset = 0x70 + rdr.read_uint32()
puzzle_incorrect_answer_offset = 0x70 + rdr.read_uint32()
puzzle_hint1_offset = 0x70 + rdr.read_uint32()
puzzle_hint2_offset = 0x70 + rdr.read_uint32()
puzzle_hint3_offset = 0x70 + rdr.read_uint32()
rdr.seek(puzzle_text_offset)
self.text = subs.replace_substitutions(
rdr.read_string(encoding=self.encoding), True)
rdr.seek(puzzle_correct_answer_offset)
self.correct_answer = subs.replace_substitutions(
rdr.read_string(encoding=self.encoding), True)
rdr.seek(puzzle_incorrect_answer_offset)
self.incorrect_answer = subs.replace_substitutions(
rdr.read_string(encoding=self.encoding), True)
rdr.seek(puzzle_hint1_offset)
self.hint1 = subs.replace_substitutions(
rdr.read_string(encoding=self.encoding), True)
rdr.seek(puzzle_hint2_offset)
self.hint2 = subs.replace_substitutions(
rdr.read_string(encoding=self.encoding), True)
rdr.seek(puzzle_hint3_offset)
self.hint3 = subs.replace_substitutions(
rdr.read_string(encoding=self.encoding), True)
def read(self, rdr: BinaryReader):
self.chunk_id = rdr.read(4)[::-1]
if self.chunk_id != b"CGLP":
raise ValueError("CGLPChunk does not start with magic value")
self.chunk_size = rdr.read_uint32()
self.tile_width = rdr.read_uint8()
self.tile_height = rdr.read_uint8()
self.tile_bytes = rdr.read_uint16()
bitmap_items = self.tile_width * self.tile_height
self.underline_location = rdr.read_uint8()
self.max_proportional_width = rdr.read_uint8()
self.tile_depth = rdr.read_uint8()
self.tile_rotation = rdr.read_uint8()
self.tile_bitmaps = []
tile_bytes = self.tile_bytes
tile_width = self.tile_width
tile_height = self.tile_height
tile_depth = self.tile_depth
# To avoid byte boundaries efficiently
# If bit depth is 2, we can read in blocks of 2
# If bit depth is 1, we can only read in blocks of 1
bit_steps = get_bit_steps(self.tile_depth)
bit_mask = ((1 << bit_steps) - 1)
for _ in range((self.chunk_size - 0x10) // tile_bytes):
buffer = rdr.read(tile_bytes)
bitmap = np.zeros(bitmap_items, dtype=np.uint8)
current_bit = 0
for i in range(bitmap_items):
# Get value from bytes to bit depth
v = 0
for _ in range(tile_depth // bit_steps):
# Shift the value bit steps
v <<= bit_steps
# Get the bit index and the byte index
bit_i = current_bit % 8
byte_i = (current_bit - bit_i) // 8
# Read <bit steps> bits from byte (bit 7 is the MSB)
byte = buffer[byte_i]
bit = (byte >> (7 - bit_i)) & bit_mask
# Add the value and change the current bit
v += bit
current_bit += bit_steps
bitmap[i] = v
bitmap.shape = tile_height, tile_width
self.tile_bitmaps.append(bitmap)
def from_rdr(cls,
rdr: BinaryReader,
is_data: bool,
relative_offset,
max_stream_pos,
parent=None):
self = cls(is_data, parent=parent)
if rdr.c >= max_stream_pos:
return
self.data = rdr.read_uint8()
if not is_data:
offset = self.data & 0x3F
zeroIsData = (self.data & 0x80) > 0
oneIsData = (self.data & 0x40) > 0
# off AND NOT == off XOR (off AND 1)
zeroRelOffset = (relative_offset ^
(relative_offset & 1)) + offset * 2 + 2
currStreamPos = rdr.c
rdr.c += (zeroRelOffset - relative_offset) - 1
# Node after 0
self.child0 = HuffTreeNode.from_rdr(rdr,
zeroIsData,
zeroRelOffset,
max_stream_pos,
parent=self)
# Node after 1 directly located after the node after 0
self.child1 = HuffTreeNode.from_rdr(rdr,
oneIsData,
zeroRelOffset + 1,
max_stream_pos,
parent=self)
# reset stream
rdr.c = currStreamPos
return self
def compress(data: bytes):
rdr = BinaryReader(data)
wtr = BinaryWriter()
wtr.write_uint8(0x30) # rle identifier
wtr.write_uint24(len(data) if len(data) < 0xffffff else 0)
if len(data) > 0xffffff:
wtr.write_uint32(len(data))
repCount = 1
currentBlockLenght = 0
dataBlock = [0 for _ in range(130)]
while rdr.c < len(rdr.data):
foundRepetition = False
while (currentBlockLenght < 130 and rdr.c < len(rdr.data)):
nextByte = rdr.read_uint8()
dataBlock[currentBlockLenght] = nextByte
currentBlockLenght += 1
if (currentBlockLenght > 1):
if nextByte == dataBlock[currentBlockLenght - 2]:
repCount += 1
else:
repCount = 1
foundRepetition = repCount > 2
if foundRepetition:
break
if foundRepetition:
numUncompToCopy = currentBlockLenght - 3
else:
numUncompToCopy = min(currentBlockLenght, 130 - 2)
if numUncompToCopy > 0:
flag = numUncompToCopy - 1
wtr.write_uint8(flag)
for i in range(numUncompToCopy):
wtr.write_uint8(dataBlock[i])
for i in range(numUncompToCopy, currentBlockLenght):
dataBlock[i - numUncompToCopy] = dataBlock[i]
currentBlockLenght -= numUncompToCopy
if foundRepetition:
while currentBlockLenght < 130 and rdr.c < len(rdr.data):
nextByte = rdr.read_uint8()
dataBlock[currentBlockLenght] = nextByte
currentBlockLenght += 1
if nextByte != dataBlock[0]:
break
else:
repCount += 1
flag = 0x80 | (repCount - 3)
wtr.write_uint8(flag)
wtr.write_uint8(dataBlock[0])
if (repCount != currentBlockLenght):
dataBlock[0] = dataBlock[currentBlockLenght - 1]
currentBlockLenght -= repCount
if currentBlockLenght > 0:
flag = currentBlockLenght - 1
wtr.write_uint8(flag)
for i in range(currentBlockLenght):
wtr.write_uint8(dataBlock[i])
currentBlockLenght = 0
return wtr.data
def read_stream(self, stream: BinaryIO):
if isinstance(stream, BinaryReader):
rdr = stream
else:
rdr = BinaryReader(stream)
n_images = rdr.read_uint16()
self.colordepth = 4 if rdr.read_uint16() == 3 else 8
# import the images
self.images = []
for img_i in range(n_images):
img_w = rdr.read_uint16()
img_h = rdr.read_uint16()
n_parts = rdr.read_uint16()
img = np.zeros((img_h, img_w), np.uint8)
rdr.seek(2, SEEK_CUR)
for part_i in range(n_parts):
part_x = rdr.read_uint16()
part_y = rdr.read_uint16()
part_w = 2**(3 + rdr.read_uint16())
part_h = 2**(3 + rdr.read_uint16())
part: np.ndarray
if self.colordepth == 8:
part = np.frombuffer(rdr.read(part_h * part_w), np.uint8)
part = part.reshape((part_h, part_w))
else:
bufpart = np.frombuffer(rdr.read(part_h * part_w // 2),
np.uint8)
part = np.zeros((part_w * part_h), np.uint8)
part[0::2] = bufpart & 0xf
part[1::2] = bufpart >> 4
part = part.reshape((part_h, part_w))
if (part_x + part_w) > img_w:
part_w = img_w - part_x
if (part_y + part_h) > img_h:
part_h = img_h - part_y
img[part_y:part_y + part_h,
part_x:part_x + part_w] = part[:part_h, :part_w]
self.images.append(img)
self.palette = np.zeros((256, 4), np.uint8)
palette_length = rdr.read_uint32()
for color_i in range(palette_length):
self.palette[color_i] = ndspy.color.unpack255(rdr.read_uint16())
if color_i:
self.palette[color_i, 3] = 255
rdr.seek(0x1E, SEEK_CUR)
n_animations = rdr.read_uint32()
animation_names = rdr.read_string_array(n_animations, 0x1e)
animation_frame_sets = []
for i in range(n_animations):
n_frames = rdr.read_uint32()
frame_indexes = rdr.read_uint32_array(n_frames)
frame_durations = rdr.read_uint32_array(n_frames)
image_indexes = rdr.read_uint32_array(n_frames)
animation_frame_sets.append([
AnimationFrame(index=frame_indexes[i],
duration=frame_durations[i],
image_index=image_indexes[i])
for i in range(n_frames)
])
self.animations = [
Animation(name=animation_names[i], frames=animation_frame_sets[i])
for i in range(n_animations)
]
if rdr.read_uint16() != 0x1234:
return # We hit end of stream
variable_labels = rdr.read_string_array(16, 16)
variable_data = [[] for _ in range(16)]
for _ in range(8):
for var_i in range(16):
variable_data[var_i].append(rdr.read_int16())
self.variables = {
variable_labels[i]: variable_data[i]
for i in range(16)
}
for anim in self.animations:
anim.child_image_x = rdr.read_uint16()
for anim in self.animations:
anim.child_image_y = rdr.read_uint16()
for anim in self.animations:
anim.child_image_animation_index = rdr.read_uint8()
self.child_image = rdr.read_string(128)
def read(self, br: BinaryReader):
self.track_id = br.read_uint8()
self.channel_id = br.read_uint8()
self.unk1 = br.read_uint8()
self.unk2 = br.read_uint8()
def compress(data: bytes):
rdr = BinaryReader(data)
wtr = BinaryWriter()
wtr.write_uint8(0x30) # rle identifier
wtr.write_uint24(len(data) if len(data) < 0xffffff else 0)
if len(data) > 0xffffff:
wtr.write_uint32(len(data))
rep_count = 1
current_block_length = 0
data_block = [0 for _ in range(130)]
while rdr.c < len(rdr.data):
found_repetition = False
while current_block_length < 130 and rdr.c < len(rdr.data):
next_byte = rdr.read_uint8()
data_block[current_block_length] = next_byte
current_block_length += 1
if current_block_length > 1:
if next_byte == data_block[current_block_length - 2]:
rep_count += 1
else:
rep_count = 1
found_repetition = rep_count > 2
if found_repetition:
break
if found_repetition:
num_uncomp_to_copy = current_block_length - 3
else:
num_uncomp_to_copy = min(current_block_length, 130 - 2)
if num_uncomp_to_copy > 0:
flag = num_uncomp_to_copy - 1
wtr.write_uint8(flag)
for i in range(num_uncomp_to_copy):
wtr.write_uint8(data_block[i])
for i in range(num_uncomp_to_copy, current_block_length):
data_block[i - num_uncomp_to_copy] = data_block[i]
current_block_length -= num_uncomp_to_copy
if found_repetition:
while current_block_length < 130 and rdr.c < len(rdr.data):
next_byte = rdr.read_uint8()
data_block[current_block_length] = next_byte
current_block_length += 1
if next_byte != data_block[0]:
break
else:
rep_count += 1
flag = 0x80 | (rep_count - 3)
wtr.write_uint8(flag)
wtr.write_uint8(data_block[0])
if rep_count != current_block_length:
data_block[0] = data_block[current_block_length - 1]
current_block_length -= rep_count
if current_block_length > 0:
flag = current_block_length - 1
wtr.write_uint8(flag)
for i in range(current_block_length):
wtr.write_uint8(data_block[i])
return wtr.data