mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-28 23:00:21 -04:00
bryanthaboi
101 lines
4.7 KiB
Lua
101 lines
4.7 KiB
Lua
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
|
|
local T = require("tests.harness")
|
|
local check, eq = T.check, T.eq
|
|
|
|
local Syms = require("src.import.gba.syms")
|
|
local S = Syms.of("emerald")
|
|
|
|
local SPOT = {
|
|
gSpeciesNames = 0x3185C8,
|
|
gSpeciesInfo = 0x3203CC,
|
|
gMoveNames = 0x31977C,
|
|
gItems = 0x5839A0,
|
|
gMapGroups = 0x486578,
|
|
gMapLayouts = 0x481DD4,
|
|
gStdScripts = 0x1DC2A0,
|
|
gFontNormalLatinGlyphs = 0x64C2E4,
|
|
gSpecials = 0x1DBA64,
|
|
gScriptCmdTable = 0x1DB67C,
|
|
gSongTable = 0x6B49F0,
|
|
gCryTable = 0x69DCF4,
|
|
}
|
|
for name, off in pairs(SPOT) do
|
|
eq(S.off(name), off, "syms " .. name)
|
|
end
|
|
eq(S.addr("gSpeciesNames"), 0x083185C8, "addr adds the ROM base")
|
|
eq(S.size("gSpeciesInfo"), 11536, "ELF size of gSpeciesInfo")
|
|
eq(S.sizeKind("gSpeciesInfo"), "elf", "gSpeciesInfo size comes from the ELF")
|
|
eq(S.sizeKind("gMapGroups"), "span", "gMapGroups is an asm label measured to the next symbol")
|
|
eq(S.count("gMapGroups", 4), 34, "34 map groups")
|
|
eq(S.obj("pokemon.o:sDeoxysBaseStats"), "pokemon.o", "statics carry their object file")
|
|
check(S.has("frontier_pass.o:sMapCursor_Gfx"), "object-qualified lookup")
|
|
check(not S.has("definitelyNotASymbol"), "has() is false for an unknown name")
|
|
check(not pcall(S.off, "definitelyNotASymbol"), "unknown name raises")
|
|
check(not pcall(S.count, "gSpeciesInfo", 5), "count raises on a non-multiple stride")
|
|
eq(S.funcAt(S.funcOff("AgbMain") + 0x08000001), "AgbMain", "funcAt takes a thumb pointer")
|
|
check(S.hasFunc("CB2_InitTitleScreen"), "function table resolves")
|
|
|
|
local collided
|
|
do
|
|
local src = require("src.import.gba.syms.emerald")
|
|
collided = src.collide:match("([^\n]+)")
|
|
package.loaded["src.import.gba.syms.emerald"] = nil
|
|
end
|
|
check(collided ~= nil, "the ELF has colliding statics")
|
|
if collided then
|
|
local ok, err = pcall(S.off, collided)
|
|
check(not ok and tostring(err):find("several objects", 1, true) ~= nil,
|
|
"a bare lookup of a colliding static raises")
|
|
end
|
|
|
|
local V = require("src.import.gba.games.emerald")
|
|
eq(V.SPECIES_NAMES, 0x3185C8, "SPECIES_NAMES")
|
|
eq(V.SPECIES_INFO, 0x3203CC, "SPECIES_INFO")
|
|
eq(V.MOVE_NAMES, 0x31977C, "MOVE_NAMES")
|
|
eq(V.ITEMS, 0x5839A0, "ITEMS")
|
|
eq(V.G_MAP_GROUPS, 0x486578, "G_MAP_GROUPS")
|
|
eq(V.G_MAP_LAYOUTS, 0x481DD4, "G_MAP_LAYOUTS")
|
|
eq(V.STD_SCRIPTS, 0x1DC2A0, "STD_SCRIPTS")
|
|
eq(V.FONT_LATIN_NORMAL, 0x64C2E4, "FONT_LATIN_NORMAL")
|
|
eq(V.NUM_SPECIES, 412, "pokeemerald/include/constants/species.h:420")
|
|
eq(V.MOVES_COUNT, 355, "pokeemerald/include/constants/moves.h:360")
|
|
eq(V.ABILITIES_COUNT, 78, "pokeemerald/include/constants/abilities.h:83")
|
|
eq(V.ITEMS_COUNT, 377, "gItems entries")
|
|
eq(V.NUM_OBJ_EVENT_GFX, 239, "pokeemerald/include/constants/event_objects.h:256")
|
|
eq(V.NUM_MAP_GROUPS, 34, "34 map groups")
|
|
eq(V.STD_SCRIPTS_COUNT, 11, "11 std scripts")
|
|
eq(V.SPECIALS_COUNT, 527, "527 specials")
|
|
eq(V.MULTICHOICE_COUNT, 114, "114 multichoice lists")
|
|
eq(V.NUM_HEAL_LOCATIONS, 22, "22 heal locations")
|
|
eq(V.TRAINERS_COUNT, 855, "855 trainers")
|
|
eq(V.BATTLE_STRINGS_COUNT, 369, "369 battle strings")
|
|
eq(V.POKEDEX_ENTRY_SIZE, 32, "Emerald dex entries are 32 bytes")
|
|
eq(V.NATIONAL_DEX_COUNT, 386, "386 national dex entries")
|
|
eq(V.AUDIO.cry_count, 388, "388 cries")
|
|
for _, key in ipairs({ "DEX_CATEGORIES", "GHOST_FRONT_PIC", "TRAINER_TOWER_HEADER", "TEACHY_TV_GFX",
|
|
"FAME_BG_GFX", "MAP_PREVIEW_SCREEN_DATA", "TM_CASE_BG_GFX", "BERRY_POUCH_BG_GFX", "INTRO",
|
|
"FRLG_MAP_TO_FR", "MAP_HEADERS", "TILESETS" }) do
|
|
eq(V[key], nil, "FRLG-only key " .. key .. " is absent")
|
|
end
|
|
check(type(V.CACHE_VERSION) == "number" and V.CACHE_VERSION >= 1, "Emerald has its own cache stamp")
|
|
check(V.lookup("f3ae088181bf583e55daf962a92bb46f4f1d07b7") ~= nil, "lookup knows the Emerald sha1")
|
|
check(V.lookup("41cb23d8dccc8ebd7c649cd8fbb58eeace6e2fdc") == nil, "lookup rejects FireRed")
|
|
check(not pcall(V.select, "41cb23d8dccc8ebd7c649cd8fbb58eeace6e2fdc"), "select rejects FireRed")
|
|
|
|
local Versions = require("src.import.gba.versions")
|
|
local Frlg = require("src.import.gba.versions_frlg")
|
|
local prev = Versions.active()
|
|
check(Versions.forGame("emerald") == V, "forGame hands out the Emerald module")
|
|
eq(Versions.active(), prev, "forGame leaves the active game alone")
|
|
eq(Versions["for"]("emerald").CACHE_VERSION, V.CACHE_VERSION, "Versions['for'] is forGame")
|
|
eq(Versions.select("f3ae088181bf583e55daf962a92bb46f4f1d07b7"), "emerald", "select by Emerald sha1")
|
|
eq(Versions.SPECIES_NAMES, 0x3185C8, "the facade forwards to Emerald")
|
|
eq(Frlg.SPECIES_NAMES, 0x245EE0, "FireRed keeps its offsets")
|
|
eq(Versions.select("leafgreen"), "leafgreen", "select leafgreen")
|
|
check(Versions.SPECIES_NAMES ~= 0x3185C8, "the facade leaves Emerald")
|
|
eq(Versions.select("firered"), "firered", "select firered")
|
|
eq(Versions.SPECIES_NAMES, 0x245EE0, "FireRed offsets restored")
|
|
|
|
T.finish("game3_emerald_offsets_test")
|