mirror of
https://github.com/pmret/papermario.git
synced 2024-11-08 20:12:30 +01:00
321 lines
13 KiB
Python
Executable File
321 lines
13 KiB
Python
Executable File
#! /usr/bin/python3
|
|
|
|
import sys
|
|
|
|
_star_rod_lib = None
|
|
def star_rod_lib():
|
|
global _star_rod_lib
|
|
|
|
if not _star_rod_lib:
|
|
_star_rod_lib = {}
|
|
|
|
from pathlib import Path
|
|
from os import path
|
|
import re
|
|
|
|
LIB_LINE_RE = re.compile(r"\s+:\s+")
|
|
NAME_RE = re.compile(r"({[^}]*})?\s*([a-zA-Z0-9_]+)")
|
|
|
|
for filename in Path(path.dirname(__file__), "star-rod", "database").rglob("*.lib"):
|
|
with open(filename, "r") as file:
|
|
for line in file.readlines():
|
|
parts = LIB_LINE_RE.split(line)
|
|
|
|
if len(parts) >= 3:
|
|
try:
|
|
kind = parts[0]
|
|
vaddr = int(parts[1].split(", ")[0], 16)
|
|
if name := NAME_RE.match(parts[2]):
|
|
name = name.group(2)
|
|
|
|
_star_rod_lib[vaddr] = name
|
|
|
|
"""
|
|
if "map" in str(filename):
|
|
if kind == "api":
|
|
print(f"ApiStatus {name}(ScriptInstance* script, s32 isInitialCall);")
|
|
elif kind == "scr":
|
|
print(f"extern Script {name};")
|
|
"""
|
|
except:
|
|
pass
|
|
|
|
return _star_rod_lib
|
|
|
|
def disassemble(bytes, script_name = "script", symbol_map = {}):
|
|
out = ""
|
|
prefix = ""
|
|
|
|
indent = 1
|
|
indent_used = False
|
|
|
|
def write_line(line):
|
|
nonlocal out, indent, indent_used
|
|
if indent < 0: indent = 0
|
|
if indent > 1: indent_used = True
|
|
out += " " * indent
|
|
out += line
|
|
out += "\n"
|
|
def prefix_line(line):
|
|
nonlocal prefix
|
|
prefix += line
|
|
prefix += "\n"
|
|
|
|
def var(arg):
|
|
if arg in symbol_map:
|
|
return symbol_map[arg]
|
|
|
|
v = arg - 2**32 # convert to s32
|
|
if v > -250000000:
|
|
if v <= -220000000: return f"SI_FIXED({(v + 230000000) / 1024}f)"
|
|
elif v <= -200000000: return f"SI_ARRAY_FLAG({v + 210000000})"
|
|
elif v <= -180000000: return f"SI_ARRAY({v + 190000000})"
|
|
elif v <= -160000000: return f"SI_SAVE_VAR({v + 170000000})"
|
|
elif v <= -140000000: return f"SI_AREA_VAR({v + 150000000})"
|
|
elif v <= -120000000: return f"SI_SAVE_FLAG({v + 130000000})"
|
|
elif v <= -100000000: return f"SI_AREA_FLAG({v + 110000000})"
|
|
elif v <= -80000000: return f"SI_MAP_FLAG({v + 90000000})"
|
|
elif v <= -60000000: return f"SI_FLAG({v + 70000000})"
|
|
elif v <= -40000000: return f"SI_MAP_VAR({v + 50000000})"
|
|
elif v <= -20000000: return f"SI_VAR({v + 30000000})"
|
|
|
|
if arg == 0xFFFFFFFF:
|
|
return "-1"
|
|
elif ((arg & 0xFF000000) == 0x80000000) or arg > 10000:
|
|
return f"0x{arg:X}"
|
|
else:
|
|
return f"{arg}"
|
|
|
|
def addr_ref(addr):
|
|
if addr in symbol_map:
|
|
return symbol_map[addr]
|
|
return star_rod_lib().get(addr, f"0x{addr:08X}")
|
|
|
|
def trigger(trigger):
|
|
if trigger == 0x00000080: trigger = "TriggerFlag_FLOOR_TOUCH"
|
|
if trigger == 0x00800000: trigger = "TriggerFlag_FLOOR_ABOVE"
|
|
if trigger == 0x00000800: trigger = "TriggerFlag_FLOOR_INTERACT"
|
|
if trigger == 0x00000200: trigger = "TriggerFlag_FLOOR_JUMP"
|
|
if trigger == 0x00000400: trigger = "TriggerFlag_WALL_TOUCH"
|
|
if trigger == 0x00000040: trigger = "TriggerFlag_WALL_PUSH"
|
|
if trigger == 0x00000100: trigger = "TriggerFlag_WALL_INTERACT"
|
|
if trigger == 0x00001000: trigger = "TriggerFlag_WALL_HAMMER"
|
|
if trigger == 0x00040000: trigger = "TriggerFlag_CEILING_TOUCH"
|
|
if trigger == 0x00010000: trigger = "TriggerFlag_SAVE_FLAG_SET"
|
|
if trigger == 0x00020000: trigger = "TriggerFlag_AREA_FLAG_SET"
|
|
if trigger == 0x00100000: trigger = "TriggerFlag_BOMB"
|
|
return trigger
|
|
|
|
def read_word():
|
|
return int.from_bytes(bytes.read(4), byteorder="big")
|
|
|
|
while True:
|
|
opcode = read_word()
|
|
argc = read_word()
|
|
|
|
if opcode > 0xFF or argc > 0xFF:
|
|
return f"/* malformed script: {script_name} */\n"
|
|
|
|
argv = []
|
|
for i in range(0, argc):
|
|
argv.append(read_word())
|
|
|
|
if opcode == 0x01:
|
|
write_line("SI_END(),")
|
|
indent -= 1
|
|
|
|
if indent_used:
|
|
prefix_line("// *INDENT-OFF*")
|
|
prefix_line(f"Script {script_name} = {{")
|
|
write_line("};")
|
|
write_line("// *INDENT-ON*")
|
|
else:
|
|
prefix_line(f"Script {script_name} = {{")
|
|
write_line("};")
|
|
|
|
return prefix + out
|
|
elif opcode == 0x02: write_line(f"SI_RETURN(),")
|
|
elif opcode == 0x03: write_line(f"SI_LABEL({var(argv[0])}),")
|
|
elif opcode == 0x04: write_line(f"SI_GOTO({var(argv[0])}),")
|
|
elif opcode == 0x05:
|
|
write_line(f"SI_LOOP({var(argv[0])}),")
|
|
indent += 1
|
|
elif opcode == 0x06:
|
|
indent -= 1
|
|
write_line("SI_END_LOOP(),")
|
|
elif opcode == 0x07: write_line(f"SI_BREAK_LOOP(),")
|
|
elif opcode == 0x08: write_line(f"SI_WAIT_FRAMES({var(argv[0])}),")
|
|
elif opcode == 0x09: write_line(f"SI_WAIT_SECS({var(argv[0])}),")
|
|
elif opcode == 0x0A:
|
|
write_line(f"SI_IF_EQ({var(argv[0])}, {var(argv[1])}),")
|
|
indent += 1
|
|
elif opcode == 0x0B:
|
|
write_line(f"SI_IF_NE({var(argv[0])}, {var(argv[1])}),")
|
|
indent += 1
|
|
elif opcode == 0x0C:
|
|
write_line(f"SI_IF_LT({var(argv[0])}, {var(argv[1])}),")
|
|
indent += 1
|
|
elif opcode == 0x0D:
|
|
write_line(f"SI_IF_GT({var(argv[0])}, {var(argv[1])}),")
|
|
indent += 1
|
|
elif opcode == 0x0E:
|
|
write_line(f"SI_IF_LE({var(argv[0])}, {var(argv[1])}),")
|
|
indent += 1
|
|
elif opcode == 0x0F:
|
|
write_line(f"SI_IF_GE({var(argv[0])}, {var(argv[1])}),")
|
|
indent += 1
|
|
elif opcode == 0x10:
|
|
write_line(f"SI_IF_BITS_ON({var(argv[0])}, {var(argv[1])}),")
|
|
indent += 1
|
|
elif opcode == 0x11:
|
|
write_line(f"SI_IF_BITS_OFF({var(argv[0])}, {var(argv[1])}),")
|
|
indent += 1
|
|
elif opcode == 0x12: write_line(f"SI_ELSE(),")
|
|
elif opcode == 0x13:
|
|
indent -= 1
|
|
write_line(f"SI_END_IF(),")
|
|
elif opcode == 0x14:
|
|
write_line(f"SI_SWITCH({var(argv[0])}),")
|
|
indent += 2
|
|
elif opcode == 0x15:
|
|
write_line(f"SI_SWITCH_CONST(0x{argv[0]:X}),")
|
|
indent += 2
|
|
elif opcode == 0x16:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_EQ({var(argv[0])}),")
|
|
indent += 1
|
|
elif opcode == 0x17:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_NE({var(argv[0])}),")
|
|
indent += 1
|
|
elif opcode == 0x18:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_LT({var(argv[0])}),")
|
|
indent += 1
|
|
elif opcode == 0x19:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_GT({var(argv[0])}),")
|
|
indent += 1
|
|
elif opcode == 0x1A:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_LE({var(argv[0])}),")
|
|
indent += 1
|
|
elif opcode == 0x1B:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_GE({var(argv[0])}),")
|
|
indent += 1
|
|
elif opcode == 0x1C:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_DEFAULT(),")
|
|
indent += 1
|
|
elif opcode == 0x1D:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_OR_EQ({var(argv[0])}),")
|
|
indent += 1
|
|
# opcode 0x1E?
|
|
elif opcode == 0x1F:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_BITS_ON({var(argv[0])}),")
|
|
indent += 1
|
|
elif opcode == 0x20:
|
|
indent -= 1
|
|
write_line(f"SI_END_MULTI_CASE(),")
|
|
indent += 1
|
|
elif opcode == 0x21:
|
|
indent -= 1
|
|
write_line(f"SI_CASE_RANGE({var(argv[0])}, {var(argv[1])}),")
|
|
indent += 1
|
|
elif opcode == 0x22: write_line(f"SI_BREAK_CASE(),")
|
|
elif opcode == 0x23:
|
|
indent -= 2
|
|
write_line(f"SI_END_SWITCH(),")
|
|
elif opcode == 0x24: write_line(f"SI_SET({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x25: write_line(f"SI_SET_CONST({var(argv[0])}, 0x{argv[1]:X}),")
|
|
elif opcode == 0x26: write_line(f"SI_SET_F({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x27: write_line(f"SI_ADD({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x28: write_line(f"SI_SUB({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x29: write_line(f"SI_MUL({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x2A: write_line(f"SI_DIV({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x2B: write_line(f"SI_MOD({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x2C: write_line(f"SI_ADD_F({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x2D: write_line(f"SI_SUB_F({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x2E: write_line(f"SI_MUL_F({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x2F: write_line(f"SI_DIV_F({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x30: write_line(f"SI_USE_BUFFER({var(argv[0])}),")
|
|
# TODO: SI_BUF commands
|
|
elif opcode == 0x3C: write_line(f"SI_USE_ARRAY({var(argv[0])}),")
|
|
elif opcode == 0x3D: write_line(f"SI_NEW_ARRAY({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x3E: write_line(f"SI_USE_FLAGS({var(argv[0])}),")
|
|
elif opcode == 0x3F: write_line(f"SI_AND({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x40: write_line(f"SI_OR({var(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x41: write_line(f"SI_AND_CONST({var(argv[0])}, 0x{argv[1]:X})")
|
|
elif opcode == 0x42: write_line(f"SI_OR_CONST({var(argv[0])}, 0x{argv[1]:X})")
|
|
elif opcode == 0x43:
|
|
argv_str = ""
|
|
for arg in argv[1:]:
|
|
argv_str += ", "
|
|
argv_str += var(arg)
|
|
|
|
write_line(f"SI_CALL({addr_ref(argv[0])}{argv_str}),")
|
|
elif opcode == 0x44: write_line(f"SI_EXEC({addr_ref(argv[0])}),")
|
|
elif opcode == 0x45: write_line(f"SI_EXEC_GET_ID({addr_ref(argv[0])}, {var(argv[1])}),")
|
|
elif opcode == 0x46: write_line(f"SI_EXEC_WAIT({addr_ref(argv[0])}),")
|
|
elif opcode == 0x47:
|
|
if argv[3] != 1:
|
|
raise "BIND argv[3] != 1"
|
|
|
|
write_line(f"SI_BIND({addr_ref(argv[0])}, {trigger(argv[1])}, {var(argv[2])}, {'NULL' if argv[4] == 0 else var(argv[4])}),")
|
|
elif opcode == 0x48: write_line(f"SI_UNBIND_ME(),")
|
|
elif opcode == 0x49: write_line(f"SI_KILL({var(argv[0])}),")
|
|
elif opcode == 0x4A: write_line(f"SI_JUMP({var(argv[0])}),")
|
|
elif opcode == 0x4B: write_line(f"SI_PRIORITY({var(argv[0])}),")
|
|
elif opcode == 0x4C: write_line(f"SI_TIMESCALE({var(argv[0])}),")
|
|
elif opcode == 0x4D: write_line(f"SI_GROUP({var(argv[0])}),")
|
|
elif opcode == 0x4E:
|
|
if argv[4] != 0:
|
|
raise "BIND_PADLOCK argv[4] != NULL"
|
|
if argv[5] != 1:
|
|
raise "BIND_PADLOCK argv[5] != 1"
|
|
|
|
write_line(f"SI_BIND_PADLOCK({addr_ref(argv[0])}, {trigger(argv[1])}, {var(argv[2])}, {var(argv[3])}),")
|
|
elif opcode == 0x4F: write_line(f"SI_SUSPEND_GROUP({var(argv[0])}),")
|
|
elif opcode == 0x50: write_line(f"SI_RESUME_GROUP({var(argv[0])}),")
|
|
elif opcode == 0x51: write_line(f"SI_SUSPEND_GROUP_NOT_ME({var(argv[0])}),")
|
|
elif opcode == 0x52: write_line(f"SI_RESUME_GROUP_NOT_ME({var(argv[0])}),")
|
|
elif opcode == 0x53: write_line(f"SI_SUSPEND({var(argv[0])}),")
|
|
elif opcode == 0x54: write_line(f"SI_RESUME({var(argv[0])}),")
|
|
elif opcode == 0x55: write_line(f"SI_EXISTS({var(argv[0])}),")
|
|
elif opcode == 0x56:
|
|
write_line("SI_THREAD(),")
|
|
indent += 1
|
|
elif opcode == 0x57:
|
|
indent -= 1
|
|
write_line("SI_END_THREAD(),")
|
|
elif opcode == 0x58:
|
|
write_line("SI_CHILD_THREAD(),")
|
|
indent += 1
|
|
elif opcode == 0x59:
|
|
indent -= 1
|
|
write_line("SI_END_CHILD_THREAD(),")
|
|
else:
|
|
# unknown opcode
|
|
argv_str = ""
|
|
for arg in argv:
|
|
argv_str += ", "
|
|
argv_str += f"0x{arg:X}"
|
|
write_line(f"SI_CMD(0x{opcode:02X}{argv_str}),")
|
|
|
|
raise "Reached end of data before END command"
|
|
|
|
if __name__ == "__main__":
|
|
if len(sys.argv) <= 1:
|
|
print("usage: ./disasm_script.py <file> [offset]")
|
|
exit()
|
|
|
|
file = sys.argv[1]
|
|
offset = eval(sys.argv[2]) if len(sys.argv) >= 3 else 0
|
|
|
|
with open(file, "rb") as f:
|
|
f.seek(offset)
|
|
print(disassemble(f), end="")
|