From b742894b5571bef20e975de92198d86209954186 Mon Sep 17 00:00:00 2001 From: CrashOveride95 <40003130+CrashOveride95@users.noreply.github.com> Date: Sat, 23 Aug 2025 22:58:24 -0400 Subject: [PATCH] New and improved make build system and other cleanups (#13) * Remove unused C versions of gu functions which will conflict with ASM versions under the new build system This is a holdover from the decomp, as it must support older libultra versions which used these functions; as we're basing this project off of the final 2.0L, they gotta go * Comment out bugged unused debug code Will be removed completely by #12 soon enough anyway, but this will break CI if I don't remove this * C++ fix in ultra64.h * New build system Based off my personal "template" featuring makedepend and support for automatically building and installing all 3 library versions, along with colors Still needs cleanup to make sure I've brought over everything from the previous makefile * Fix clang_format * CI fixes to account for the non-decomp build system * Remove old makefile * Remove decomp tools * Accidentally removed format checker * Change VERSION to TARGET * Fix install target by removing unused files and bring back ZSort header * Fix CI typo * gzsort header removed, I will figure out how to add it in modsdk later * just copy the whole PR folder instead and remove install.mk, unnecessary * SDK installation shall be handled seperately * Remove RMON and a few leftover KMC things * Remove MODERN_CC, as everyone is gonna be building this on a modern compiler anyway --- .github/workflows/ci_gcc.yml | 12 +- Makefile | 232 +- include/PR/gtoff.h | 12 + include/PR/os_libc.h | 6 - include/PR/rmon.h | 1 - include/PR/sptaskoff.h | 17 + include/PRinternal/rmonint.h | 168 -- include/ultra64.h | 6 + src/error/kmcprintf.c | 245 -- src/gu/mtxcatf.c | 60 - src/gu/normalize.c | 22 - src/gu/scale.c | 30 - src/gu/translate.c | 29 - src/os/exceptasm.s | 2 - src/os/getfpccsr.s | 4 - src/os/initialize.c | 1 - src/os/setfpccsr.s | 6 +- src/rmon/rmonbrk.c | 424 ---- src/rmon/rmoncmds.c | 46 - src/rmon/rmonmain.c | 127 - src/rmon/rmonmem.c | 275 -- src/rmon/rmonmisc.c | 67 - src/rmon/rmonprint.c | 1 - src/rmon/rmonrcp.s | 60 - src/rmon/rmonregs.c | 403 --- src/rmon/rmonsio.c | 79 - src/rmon/rmontask.c | 337 --- tools/ar.py | 476 ---- tools/asm_differ/.gitignore | 2 - tools/asm_differ/.gitrepo | 12 - tools/asm_differ/.pre-commit-config.yaml | 6 - tools/asm_differ/LICENSE | 24 - tools/asm_differ/README.md | 56 - tools/asm_differ/diff-stylesheet.css | 67 - tools/asm_differ/diff.py | 2923 ---------------------- tools/asm_differ/diff_settings.py | 11 - tools/asm_differ/mypy.ini | 17 - tools/asm_differ/screenshot.png | Bin 99842 -> 0 bytes tools/disassemble_elf.py | 312 --- tools/fix_objfile.py | 68 - tools/libdiff.py | 150 -- tools/libelf.py | 1181 --------- tools/m2ctx.py | 76 - tools/mdebug.py | 938 ------- tools/mips_isa.py | 1309 ---------- tools/patch_ar_meta.py | 90 - tools/print_mdebug.py | 589 ----- tools/set_o32abi_bit.py | 25 - tools/strip_debug.sh | 10 - tools/util.py | 44 - 50 files changed, 193 insertions(+), 10865 deletions(-) create mode 100644 include/PR/gtoff.h create mode 100644 include/PR/sptaskoff.h delete mode 100644 include/PRinternal/rmonint.h delete mode 100644 src/error/kmcprintf.c delete mode 100644 src/gu/mtxcatf.c delete mode 100644 src/gu/normalize.c delete mode 100644 src/gu/scale.c delete mode 100644 src/gu/translate.c delete mode 100644 src/rmon/rmonbrk.c delete mode 100644 src/rmon/rmoncmds.c delete mode 100644 src/rmon/rmonmain.c delete mode 100644 src/rmon/rmonmem.c delete mode 100644 src/rmon/rmonmisc.c delete mode 100644 src/rmon/rmonprint.c delete mode 100644 src/rmon/rmonrcp.s delete mode 100644 src/rmon/rmonregs.c delete mode 100644 src/rmon/rmonsio.c delete mode 100644 src/rmon/rmontask.c delete mode 100755 tools/ar.py delete mode 100644 tools/asm_differ/.gitignore delete mode 100644 tools/asm_differ/.gitrepo delete mode 100644 tools/asm_differ/.pre-commit-config.yaml delete mode 100644 tools/asm_differ/LICENSE delete mode 100644 tools/asm_differ/README.md delete mode 100644 tools/asm_differ/diff-stylesheet.css delete mode 100755 tools/asm_differ/diff.py delete mode 100644 tools/asm_differ/diff_settings.py delete mode 100644 tools/asm_differ/mypy.ini delete mode 100644 tools/asm_differ/screenshot.png delete mode 100755 tools/disassemble_elf.py delete mode 100755 tools/fix_objfile.py delete mode 100755 tools/libdiff.py delete mode 100755 tools/libelf.py delete mode 100755 tools/m2ctx.py delete mode 100644 tools/mdebug.py delete mode 100644 tools/mips_isa.py delete mode 100755 tools/patch_ar_meta.py delete mode 100755 tools/print_mdebug.py delete mode 100755 tools/set_o32abi_bit.py delete mode 100755 tools/strip_debug.sh delete mode 100644 tools/util.py diff --git a/.github/workflows/ci_gcc.yml b/.github/workflows/ci_gcc.yml index 448b933..c6bbd48 100644 --- a/.github/workflows/ci_gcc.yml +++ b/.github/workflows/ci_gcc.yml @@ -1,6 +1,6 @@ # CI file for GCC builds -name: Build GCC libgultra +name: Build GCC libultra # Build on every branch push, tag push, and pull request change: on: [push, pull_request_target] @@ -13,8 +13,7 @@ jobs: strategy: fail-fast: false matrix: - version: [L] # [H, I, I_patch, J, K, L] - suffix: [~, _d, _rom] + version: [libultra, libultra_d, libultra_rom] steps: - name: Checkout repository @@ -28,11 +27,8 @@ jobs: - name: Verify formatting on all files run: python3 tools/check_format.py --verbose - - name: Setup - run: make setup -j $(nproc) TARGET=libgultra${{ matrix.suffix }} VERSION=${{ matrix.version }} - - - name: Build libgultra${{ matrix.suffix }} ${{ matrix.version }} - run: make -j $(nproc) TARGET=libgultra${{ matrix.suffix }} VERSION=${{ matrix.version }} + - name: Build ${{ matrix.version }} + run: make -j $(nproc) VERSION=${{ matrix.version }} - name: 'Upload Artifact' uses: actions/upload-artifact@v4 diff --git a/Makefile b/Makefile index 223f47c..32aea90 100644 --- a/Makefile +++ b/Makefile @@ -1,18 +1,41 @@ -# One of: -# libgultra_rom, libgultra_d, libgultra -TARGET ?= libgultra_rom -VERSION ?= L -VERBOSE ?= 0 - -# Use handwritten ASM implementations of select `gu` functions -MGU_ASM ?= 1 +# Makefile to build libultra include util.mk -ifeq ($(VERBOSE), 0) -V=@ -else -V= +# Preprocessor definitions + +WORKING_DIR := $(shell pwd) + +DEFINES := + +SRC_DIRS := + +# Whether to hide commands or not +VERBOSE ?= 0 +ifeq ($(VERBOSE),0) + V := @ +endif + +# Whether to colorize build messages +COLOR ?= 1 + +# TARGET - selects the version of the library to build +# libultra - standard library +# libultra_d - debug library +# libultra_rom - final ROM library +TARGET ?= libultra_rom +$(eval $(call validate-option,TARGET,libultra libultra_d libultra_rom)) + +ifeq ($(TARGET),libultra) + OPT_FLAGS := -Os -ggdb3 -ffast-math -fno-unsafe-math-optimizations + DEFINES += NDEBUG=1 +else ifeq ($(TARGET),libultra_d) + OPT_FLAGS := -Og -ggdb3 -ffast-math -fno-unsafe-math-optimizations + DEFINES += _DEBUG=1 +else ifeq ($(TARGET),libultra_rom) + OPT_FLAGS := -Os -ggdb3 -ffast-math -fno-unsafe-math-optimizations + DEFINES += NDEBUG=1 + DEFINES += _FINALROM=1 endif # detect prefix for MIPS toolchain @@ -36,98 +59,149 @@ else $(error Unable to detect a suitable MIPS toolchain installed) endif -BUILD_ROOT := build -BUILD_DIR := $(BUILD_ROOT)/ -BUILD_AR := $(BUILD_DIR)/$(TARGET).a - -WORKING_DIR := $(shell pwd) - -CPP := cpp -P -AR := $(CROSS)ar - -VERSION_DEFINE := -DBUILD_VERSION_STRING=\"2.0$(VERSION)\" - -ifeq ($(findstring _d,$(TARGET)),_d) -DEBUGFLAG := -D_DEBUG -else -DEBUGFLAG := -DNDEBUG +ifeq ($(filter clean,$(MAKECMDGOALS)),) + $(info ==== Build Options ====) + $(info Version: $(TARGET)) + $(info =======================) endif -AS := $(CROSS)gcc -x assembler-with-cpp -CC := $(CROSS)gcc +#==============================================================================# +# Target Executable and Sources # +#==============================================================================# +BUILD_DIR_BASE := build +# BUILD_DIR is the location where all build artifacts are placed +BUILD_DIR := $(BUILD_DIR_BASE)/$(TARGET) +LIB := $(BUILD_DIR)/$(TARGET).a + +# Directories containing source files +SRC_DIRS += $(shell find src -type d) + +C_FILES := $(foreach dir,$(SRC_DIRS),$(wildcard $(dir)/*.c)) +S_FILES := $(foreach dir,$(SRC_DIRS),$(wildcard $(dir)/*.s)) + +# Object files +O_FILES := $(foreach file,$(C_FILES),$(BUILD_DIR)/$(file:.c=.o)) \ + $(foreach file,$(S_FILES),$(BUILD_DIR)/$(file:.s=.o)) + +# Automatic dependency files +DEP_FILES := $(O_FILES:.o=.d) + +#==============================================================================# +# Compiler Options # +#==============================================================================# + +AS := $(CROSS)as +CC := $(CROSS)gcc +CPP := $(CROSS)cpp +LD := $(CROSS)ld +AR := $(CROSS)ar + +# Do NOT depend on system-installed headers! If you need to make a header change, +# test it in your source first! +INCLUDE_DIRS += $(WORKING_DIR)/include $(WORKING_DIR)/include/PR $(WORKING_DIR)/include/compiler/modern_gcc $(BUILD_DIR) $(BUILD_DIR)/include $(WORKING_DIR)/src $(WORKING_DIR) + +GBIDEFINE := -DF3DEX_GBI_2 + +C_DEFINES = $(foreach d,$(DEFINES),-D$(d)) +DEF_INC_CFLAGS = $(foreach i,$(INCLUDE_DIRS),-I$(i)) $(C_DEFINES) WARNINGS := -Wall -Wextra -Wno-format-security -Wno-unused-function -Wno-unused-parameter -Wno-unused-variable -Wno-builtin-declaration-mismatch WARNINGS += -Wno-int-conversion -Wno-incompatible-pointer-types -Wno-implicit-function-declaration # TODO: Try adjusting code to remove these -CFLAGS := -G 0 -c -nostdinc -march=vr4300 -mfix4300 -mabi=32 -mno-abicalls -mdivide-breaks -fno-PIC -fno-common -ffreestanding -fbuiltin -fno-builtin-sinf -fno-builtin-cosf -funsigned-char $(WARNINGS) +CFLAGS := -G 0 -c -nostdinc -march=vr4300 -mfix4300 -mabi=32 -mips3 -mno-abicalls -mdivide-breaks -fno-PIC -fno-common -ffreestanding -fbuiltin -fno-builtin-sinf -fno-builtin-cosf -funsigned-char $(WARNINGS) CFLAGS += -fno-strict-aliasing # TODO: Try adjusting code to remove this -ASFLAGS := -w -nostdinc -c -G 0 -march=vr4300 -mabi=32 -mgp32 -mfp32 -DMIPSEB -D_LANGUAGE_ASSEMBLY -D_MIPS_SIM=1 -D_ULTRA64 -CPPFLAGS = -DMODERN_CC -D_MIPS_SZLONG=32 -D__USE_ISOC99 $(GBIDEFINE) $(VERSION_DEFINE) $(DEBUGFLAG) -IINC = -I . -I $(WORKING_DIR)/include -I $(WORKING_DIR)/include/compiler/modern_gcc -I $(WORKING_DIR)/include/PR -MIPS_VERSION := -mips3 -ASOPTFLAGS := +CFLAGS += -D_MIPS_SZLONG=32 -D__USE_ISOC99 $(C_DEFINES) $(DEF_INC_CFLAGS) -ifeq ($(findstring _d,$(TARGET)),_d) -OPTFLAGS := -Og -ggdb3 -ffast-math -fno-unsafe-math-optimizations -else -OPTFLAGS := -Os -ggdb3 -ffast-math -fno-unsafe-math-optimizations +# C preprocessor flags +CPPFLAGS := -P -Wno-trigraphs $(DEF_INC_CFLAGS) + +# tools +PRINT = printf + +ifeq ($(COLOR),1) +NO_COL := \033[0m +RED := \033[0;31m +GREEN := \033[0;32m +BLUE := \033[0;34m +YELLOW := \033[0;33m +BLINK := \033[33;5m endif -ifeq ($(findstring _rom,$(TARGET)),_rom) -CPPFLAGS += -D_FINALROM -endif +# Common build print status function +define print + @$(PRINT) "$(GREEN)$(1) $(YELLOW)$(2)$(GREEN) -> $(BLUE)$(3)$(NO_COL)\n" +endef -SRC_DIRS := $(shell find src -type d) -C_FILES := $(foreach dir,$(SRC_DIRS),$(wildcard $(dir)/*.c)) -S_FILES := $(foreach dir,$(SRC_DIRS),$(wildcard $(dir)/*.s)) +#==============================================================================# +# Main Targets # +#==============================================================================# -# Versions J and below used the C matrix math implementations -MGU_MATRIX_FILES := mtxcatf normalize scale translate -ifeq ($(MGU_ASM), 1) -C_FILES := $(filter-out $(addprefix src/gu/,$(MGU_MATRIX_FILES:=.c)),$(C_FILES)) -else -S_FILES := $(filter-out $(addprefix src/mgu/,$(MGU_MATRIX_FILES:=.s)),$(S_FILES)) -endif - -C_O_FILES := $(foreach f,$(C_FILES:.c=.o),$(BUILD_DIR)/$f) -S_O_FILES := $(foreach f,$(S_FILES:.s=.o),$(BUILD_DIR)/$f) -O_FILES := $(S_O_FILES) $(C_O_FILES) - -$(shell mkdir -p src $(foreach dir,$(SRC_DIRS),$(BUILD_DIR)/$(dir))) - -.PHONY: all clean distclean setup -all: $(BUILD_AR) - -$(BUILD_AR): $(O_FILES) - @printf " [AR] $@\n" - $(V)$(AR) rcs $@ $^ +# Default target +default: $(LIB) clean: - $(RM) -rf $(BUILD_DIR) + $(RM) -r $(BUILD_DIR_BASE) -distclean: - $(RM) -rf extracted/ $(BUILD_ROOT) +ALL_DIRS := $(BUILD_DIR) $(addprefix $(BUILD_DIR)/,$(SRC_DIRS)) -GBIDEFINE := -DF3DEX_GBI +# Make sure build directory exists before compiling anything +$(shell mkdir -p $(ALL_DIRS)) +$(BUILD_DIR)/src/voice/%.o: CFLAGS += -I$(WORKING_DIR)/src/voice +$(BUILD_DIR)/src/voice/%.o: DEFINES += LANG_JAPANESE=1 $(BUILD_DIR)/src/gu/parse_gbi.o: GBIDEFINE := -DF3D_GBI $(BUILD_DIR)/src/gu/us2dex_emu.o: GBIDEFINE := $(BUILD_DIR)/src/gu/us2dex2_emu.o: GBIDEFINE := $(BUILD_DIR)/src/sp/sprite.o: GBIDEFINE := -DF3D_GBI $(BUILD_DIR)/src/sp/spriteex.o: GBIDEFINE := $(BUILD_DIR)/src/sp/spriteex2.o: GBIDEFINE := -$(BUILD_DIR)/src/voice/%.o: OPTFLAGS += -DLANG_JAPANESE -I$(WORKING_DIR)/src -I$(WORKING_DIR)/src/voice -$(BUILD_DIR)/src/voice/%.o: CC := $(WORKING_DIR)/tools/compile_sjis.py -D__CC=$(CC) -D__BUILD_DIR=$(BUILD_DIR) + +#==============================================================================# +# Compilation Recipes # +#==============================================================================# + +# Compile C code +$(BUILD_DIR)/src/voice/%.o: src/voice/%.c + $(call print,Compiling:,$<,$@) + $(V)tools/compile_sjis.py -D__CC=$(CC) -D__BUILD_DIR=$(BUILD_DIR) -c $(CFLAGS) -MMD -MP -o $@ $< $(BUILD_DIR)/%.o: %.c - @printf " [CC] $<\n" - $(V)$(CC) $(CFLAGS) $(MIPS_VERSION) $(CPPFLAGS) $(OPTFLAGS) $< $(IINC) -o $@ - $(V)tools/set_o32abi_bit.py $@ + $(call print,Compiling:,$<,$@) + $(V)$(CC) -c $(CFLAGS) $(GBIDEFINE) -MMD -MP -o $@ $< +$(BUILD_DIR)/%.o: $(BUILD_DIR)/%.c + $(call print,Compiling:,$<,$@) + $(V)$(CC) -c $(CFLAGS) $(GBIDEFINE) -MMD -MP -o $@ $< +# Assemble assembly code $(BUILD_DIR)/%.o: %.s - @printf " [AS] $<\n" - $(V)$(AS) $(ASFLAGS) $(MIPS_VERSION) $(CPPFLAGS) $(ASOPTFLAGS) $< $(IINC) -o $@ - $(V)tools/set_o32abi_bit.py $@ + $(call print,Assembling:,$<,$@) + $(V)$(CC) -c $(CFLAGS) $(foreach i,$(INCLUDE_DIRS),-Wa,-I$(i)) -x assembler-with-cpp -DMIPSEB -D_LANGUAGE_ASSEMBLY -D_ULTRA64 -MMD -MP -o $@ $< + +# Creating final library file +$(LIB): $(O_FILES) + @$(PRINT) "$(GREEN)Creating $(TARGET): $(BLUE)$@ $(NO_COL)\n" + $(V)$(AR) rcs -o $@ $(O_FILES) + +all: $(BUILD_DIR_BASE)/libultra.a $(BUILD_DIR_BASE)/libultra_d.a $(BUILD_DIR_BASE)/libultra_rom.a + +$(BUILD_DIR_BASE)/libultra.a: + $(V)$(MAKE) TARGET=libultra + $(V)cp $(BUILD_DIR_BASE)/libultra/libultra.a $(BUILD_DIR_BASE) + +$(BUILD_DIR_BASE)/libultra_d.a: + $(V)$(MAKE) TARGET=libultra_d + $(V)cp $(BUILD_DIR_BASE)/libultra_d/libultra_d.a $(BUILD_DIR_BASE) + +$(BUILD_DIR_BASE)/libultra_rom.a: + $(V)$(MAKE) TARGET=libultra_rom + $(V)cp $(BUILD_DIR_BASE)/libultra_rom/libultra_rom.a $(BUILD_DIR_BASE) + +.PHONY: clean default all install pkginstall +# with no prerequisites, .SECONDARY causes no intermediate target to be removed +.SECONDARY: + +# Remove built-in rules, to improve performance +MAKEFLAGS += --no-builtin-rules + +-include $(DEP_FILES) -# Disable built-in rules -.SUFFIXES: print-% : ; $(info $* is a $(flavor $*) variable set to [$($*)]) @true diff --git a/include/PR/gtoff.h b/include/PR/gtoff.h new file mode 100644 index 0000000..f8838ee --- /dev/null +++ b/include/PR/gtoff.h @@ -0,0 +1,12 @@ +/* GENERATED FILE, DO NOT EDIT! */ + +/* gtState_t structure offsets for assembly language: */ +#define GT_STATE_SIZE 88 +#define GT_STATE_OFF_RENDSTATE 0x00 +#define GT_STATE_OFF_TEXSTATE 0x04 +#define GT_STATE_OFF_VTXCOUNT 0x08 +#define GT_STATE_OFF_VTXV0 0x09 +#define GT_STATE_OFF_TRICOUNT 0x0a +#define GT_STATE_OFF_RDPCMDS 0x0c +#define GT_STATE_OFF_OTHERMODE 0x10 +#define GT_STATE_OFF_TRANSFORM 0x18 diff --git a/include/PR/os_libc.h b/include/PR/os_libc.h index ec0e89b..cb53cbf 100644 --- a/include/PR/os_libc.h +++ b/include/PR/os_libc.h @@ -76,15 +76,9 @@ extern "C" { /* byte string operations */ -#ifndef MODERN_CC -extern void bcopy(const void*, void*, int); -extern int bcmp(const void*, const void*, int); -extern void bzero(void*, int); -#else extern void bcopy(const void*, void*, size_t); extern int bcmp(const void*, const void*, size_t); extern void bzero(void*, size_t); -#endif /* Printf */ diff --git a/include/PR/rmon.h b/include/PR/rmon.h index 64f1640..def309f 100644 --- a/include/PR/rmon.h +++ b/include/PR/rmon.h @@ -29,7 +29,6 @@ extern "C" { #define RMON_DBG_BUF_SIZE 2048 #define RMON_STACKSIZE 0x1000 -extern void rmonMain(void*); extern void rmonPrintf(const char*, ...); #ifdef _LANGUAGE_C_PLUS_PLUS diff --git a/include/PR/sptaskoff.h b/include/PR/sptaskoff.h new file mode 100644 index 0000000..4ceace6 --- /dev/null +++ b/include/PR/sptaskoff.h @@ -0,0 +1,17 @@ +#define OS_TASK_SIZE 64 +#define OS_TASK_OFF_TYPE 0 +#define OS_TASK_OFF_FLAGS 4 +#define OS_TASK_OFF_UBOOT 8 +#define OS_TASK_OFF_UBOOT_SZ 12 +#define OS_TASK_OFF_UCODE 16 +#define OS_TASK_OFF_UCODE_SZ 20 +#define OS_TASK_OFF_UDATA 24 +#define OS_TASK_OFF_UDATA_SZ 28 +#define OS_TASK_OFF_STACK 32 +#define OS_TASK_OFF_STACK_SZ 36 +#define OS_TASK_OFF_OUTBUFF 40 +#define OS_TASK_OFF_OUTBUFF_SZ 44 +#define OS_TASK_OFF_DATA 48 +#define OS_TASK_OFF_DATA_SZ 52 +#define OS_TASK_OFF_YIELD 56 +#define OS_TASK_OFF_YIELD_SZ 60 diff --git a/include/PRinternal/rmonint.h b/include/PRinternal/rmonint.h deleted file mode 100644 index 66d8e2d..0000000 --- a/include/PRinternal/rmonint.h +++ /dev/null @@ -1,168 +0,0 @@ -#ifndef _RMONINT_H -#define _RMONINT_H - -#include "PRinternal/dbgproto.h" -#include "PR/os_internal.h" - -/* mips */ - -#define MIPS_LWC2_OPCODE 50 -#define MIPS_SWC2_OPCODE 58 - -#define MIPS_LW_OPCODE 35 -#define MIPS_SW_OPCODE 43 - -#define MIPS_BREAK_OPCODE 0xD -#define MIPS_BREAK_MASK 0xFC00003F - -#define MIPS_BREAK(code) ((((code) & 0xFFFFF) << 6) | MIPS_BREAK_OPCODE) - -/* R4300 General Purpose Register Indices */ -#define GREG_IDX_ZERO 0 -#define GREG_IDX_AT 1 -#define GREG_IDX_T9 25 -#define GREG_IDX_K0 26 -#define GREG_IDX_GP 28 -#define GREG_IDX_RA 31 -#define GREG_IDX_LO 32 -#define GREG_IDX_HI 33 -#define GREG_IDX_CAUSE 34 -#define GREG_IDX_PC 35 -#define GREG_IDX_SR 36 - -/* RSP Scalar Register Indices */ -#define SREG_IDX_ZERO 0 -#define SREG_IDX_RA 31 -#define SREG_IDX_DRAM_ADDR (32 + 0) -#define SREG_IDX_MEM_ADDR (32 + 1) -#define SREG_IDX_RD_LEN (32 + 2) -#define SREG_IDX_PC (32 + 3) -#define SREG_IDX_WR_LEN (32 + 4) -#define SREG_IDX_STATUS (32 + 5) -#define SREG_IDX_DMA_FULL (32 + 6) -#define SREG_IDX_DMA_BUSY (32 + 7) - -/* RSP Vector Register Properties */ -#define VREG_NUM 32 -#define VREG_SIZE 0x10 - -/* rmon */ - -#define RMON_MESG_CPU_BREAK 2 -#define RMON_MESG_SP_BREAK 4 -#define RMON_MESG_FAULT 8 - -#define RMON_CPU 0 -#define RMON_RSP 1 - -/* "thread id" for rsp */ -#define RMON_TID_RSP 1000 -/* "thread priority" for rsp */ -#define RMON_PRI_RSP 42 - -/* "thread id" for no thread running */ -#define RMON_TID_NOTHREAD 1003 - -#define RMON_PID_CPU 1002 -#define RMON_PID_RSP 1001 - -/* Largest serviceable read/write memory request */ -#define RMON_MAX_XFER_SIZE 1024 - -/* rmonmain */ - -void __rmonSendHeader(KKHeader* const block, u32 blockSize, u32 type); -void __rmonSendReply(KKHeader* const block, u32 blockSize, u32 replyType); -void __rmonSendData(char* const block, unsigned int blockSize); - -extern int __rmonActive; - -/* rmonmisc */ - -void __rmonInit(void); -void __rmonPanic(void); - -extern OSMesgQueue __rmonMQ; - -/* rmonmem */ - -void __rmonWriteWordTo(u32* addr, u32 val); -u32 __rmonReadWordAt(u32* addr); -void __rmonMemcpy(u8* dest, u8* srce, u32 count); -void __rmonCopyWords(u32* dest, u32* srce, u32 count); - -extern u8 __rmonUtilityBuffer[]; - -/* rmonsio */ - -void __rmonSendFault(OSThread* thread); -void __rmonIOflush(void); -void __rmonIOputw(u32 word); -void __rmonIOhandler(void); - -extern void* __osRdb_DbgRead_Buf; -extern u8 rmonRdbReadBuf[]; - -/* rmonrcp */ - -int __rmonRCPrunning(void); -void __rmonIdleRCP(void); -void __rmonStepRCP(void); -void __rmonRunRCP(void); - -/* rmonbrk */ - -u32 __rmonGetBranchTarget(int method, int thread, char* addr); -int __rmonSetSingleStep(int thread, u32* instptr); -void __rmonGetExceptionStatus(KKStatusEvent* reply); -void __rmonHitBreak(void); -void __rmonHitSpBreak(void); -void __rmonHitCpuFault(void); - -extern u8 __rmonRcpAtBreak; - -/* rmonregs */ - -u32 __rmonGetRegisterContents(int method, int threadNumber, int regNumber); - -/* rmontask */ - -void __rmonMaskIdleThreadInts(void); -OSThread* __rmonGetTCB(int threadNumber); -int __rmonStopUserThreads(int whichThread); -int __rmonGetThreadStatus(int method, int id, KKStatusEvent* reply); - -/* rmoncmds */ - -int __rmonExecute(KKHeader* request); - -/* commands */ - -typedef int (*FUNPTR)(); - -int __rmonLoadProgram(KKHeader* req); -int __rmonListProcesses(KKHeader* req); -int __rmonGetExeName(KKHeader* req); -int __rmonListThreads(KKHeader* req); -int __rmonThreadStatus(KKHeader* req); -int __rmonStopThread(KKHeader* req); -int __rmonRunThread(KKHeader* req); -int __rmonSetFault(KKHeader* req); -int __rmonGetRegionCount(KKHeader* req); -int __rmonGetRegions(KKHeader* req); -int __rmonGetGRegisters(KKHeader* req); -int __rmonSetGRegisters(KKHeader* req); -int __rmonGetFRegisters(KKHeader* req); -int __rmonSetFRegisters(KKHeader* req); -int __rmonReadMem(KKHeader* req); -int __rmonWriteMem(KKHeader* req); -int __rmonSetBreak(KKHeader* req); -int __rmonClearBreak(KKHeader* req); -int __rmonListBreak(KKHeader* req); -int __rmonSetComm(KKHeader* req); -int __rmonGetSRegs(KKHeader* req); -int __rmonSetSRegs(KKHeader* req); -int __rmonGetVRegs(KKHeader* req); -int __rmonSetVRegs(KKHeader* req); - -#endif diff --git a/include/ultra64.h b/include/ultra64.h index 053db38..6bcb680 100644 --- a/include/ultra64.h +++ b/include/ultra64.h @@ -22,6 +22,9 @@ #ifndef _ULTRA64_H_ #define _ULTRA64_H_ +#ifdef __cplusplus +extern "C" { +#endif #include #include #include @@ -36,5 +39,8 @@ #include #include #include +#ifdef __cplusplus +} +#endif #endif diff --git a/src/error/kmcprintf.c b/src/error/kmcprintf.c deleted file mode 100644 index efe165f..0000000 --- a/src/error/kmcprintf.c +++ /dev/null @@ -1,245 +0,0 @@ -// This file was added in 2.0J and removed in 2.0K -#include "stdarg.h" -#include "PR/os.h" -#include "PR/rcp.h" -#include "PR/rdb.h" -#include "ultraerror.h" -#include "../libc/xstdio.h" - -extern u32 __kmc_pt_mode; - -static void* proutSyncPrintf(void* str, const char* buf, size_t n) { - size_t sent = 0; - - while (sent < n) { - sent += __osRdbSend(buf + sent, n - sent, RDB_TYPE_GtoH_PRINT); - } - return 1; -} - -static volatile unsigned int* stat = (unsigned*)0xbff08004; -static volatile unsigned int* wport = (unsigned*)0xbff08000; -static volatile unsigned int* piok = (unsigned*)PHYS_TO_K1(PI_STATUS_REG); - -static void rmonPutchar(char c) { - while (*piok & (PI_STATUS_DMA_BUSY | PI_STATUS_IO_BUSY)) { - } - - while (!(*stat & 4)) { - } - - *wport = c; -} - -static void* kmc_proutSyncPrintf(void* str, const char* buf, int n) { - int i; - char c; - char* p; - char* q; - char xbuf[128]; - static int column = 0; - - p = &xbuf; - - for (i = 0; i < n; i++) { - c = *buf++; - - switch (c) { - case '\n': - *p++ = '\n'; - column = 0; - break; - case '\t': - do { - *p++ = ' '; - } while (++column % 8); - break; - default: - column++; - *p++ = c; - break; - } - - if (c == '\n' || (p - xbuf) > 100) { - rmonPutchar((p - xbuf) - 1); - - q = xbuf; - while (q != p) { - rmonPutchar(*q++); - } - p = xbuf; - } - } - if (p != xbuf) { - rmonPutchar((p - xbuf) - 1); - - q = xbuf; - while (q != p) { - rmonPutchar(*q++); - } - } - return (void*)1; -} - -char NULSTR[] = ""; - -const char* __os_error_message[] = { - NULSTR, - "osCreateThread: stack pointer not aligned to 8 bytes (0x%x)", - "osCreateThread: priority not in range [0-255] (%d)", - "osStartThread: thread has bad state (running/runnable/other)", - "osSetThreadPri: priority not in range [0-255] (%d)", - "osCreateMesgQueue: message count not > 0 (%d)", - "osSendMesg: flag not OS_MESG_NOBLOCK or OS_MESG_BLOCK (%d)", - "osJamMesg: flag not OS_MESG_NOBLOCK or OS_MESG_BLOCK (%d)", - "osRecvMesg: flag not OS_MESG_NOBLOCK or OS_MESG_BLOCK (%d)", - "osSetEventMesg: unknown event type (%d)", - "osMapTLB: index not in range [0-30] (%d)", - "osMapTLB: asid argument not -1 or in range [0-255] (%d)", - "osUnmapTLB: index not in range [0-30] (%d)", - "osSetTLBASID: asid not in range [0-255] (%d)", - "osAiSetFrequency: freq not in range [%d-%d] (%d)", - "osAiSetNextBuffer: address not aligned to 8 bytes (0x%x)", - "osAiSetNextBuffer: size not aligned to 8 bytes (0x%x)", - "osDpSetNextBuffer: address not aligned to 8 bytes (0x%x)", - "osDpSetNextBuffer: size not aligned to 8 bytes (0x%x)", - "osPiRawReadIo: address not aligned to 4 bytes (0x%x)", - "osPiRawWriteIo: address not aligned to 4 bytes (0x%x)", - "osPiRawStartDma: direction not OS_READ or OS_WRITE (%d)", - "osPiRawStartDma: device address not aligned to 2 bytes (0x%x)", - "osPiRawStartDma: DRAM address not aligned to 8 bytes (0x%x)", - "osPiRawStartDma: size not aligned to 2 bytes (%d)", - "osPiRawStartDma: size not in range [0,16777216] (%d)", - "osPiReadIo: address not aligned to 4 bytes (0x%x)", - "osPiWriteIo: address not aligned to 4 bytes (0x%x)", - "osPiStartDma: PI Manager not yet begun by osCreatePiManager", - "osPiStartDma: priority not OS_MESG_PRI_[NORMAL|HIGH] (%d)", - "osPiStartDma: direction not OS_READ or OS_WRITE (%d)", - "osPiStartDma: device address not aligned to 2 bytes (0x%x)", - "osPiStartDma: DRAM address not aligned to 8 bytes (0x%x)", - "osPiStartDma: size not aligned to 2 bytes (%d)", - "osPiStartDma: size not in range [0,16777216] (%d)", - "osCreatePiManager: priority not in range [0-255] (%d)", - "osViGetCurrentMode: VI Manager not yet begun", - "osViGetCurrentFramebuffer: VI Manager not yet begun", - "osViGetNextFramebuffer: VI Manager not yet begun", - "osViSetXScale: value not in range [0.25,1.0] (%f)", - "osViSetXScale: VI Manager not yet begun by osCreateViManager", - "osViSetYScale: value not in range [0.05,1.0] (%f)", - "osViSetYScale: VI Manager not yet begun by osCreateViManager", - "osViSetSpecialFeatures: not a known feature value (%d)", - "osViSetSpecialFeatures: VI Manager not yet begun", - "osViSetMode: VI Manager not yet begun by osCreateViManager", - "osViSetEvent: VI Manager not yet begun by osCreateViManager", - "osViSwapBuffer: frame buffer not aligned to 64 bytes (0x%x)", - "osViSwapBuffer: VI Manager not yet begun", - "osCreateViManager: priority not in range [0-255] (%d)", - "osCreateRegion: not a known alignment (%d)", - "osCreateRegion: length (%d) too small for buffer size (%d)", - "osMalloc: invalid or corrupt region (0x%x)", - "osFree: invalid or corrupt region (0x%x)", - "osFree: invalid address (0x%x) or\n corrupt region (0x%x)", - "osGetRegionBufCount: invalid or corrupt region (0x%x)", - "osGetRegionBufSize: invalid or corrupt region (0x%x)", - "osSpTaskLoad: dram_stack not aligned to 16 bytes (0x%x)", - "osSpTaskLoad: output_buff not aligned to 16 bytes (0x%x)", - "osSpTaskLoad: output_buff_size not aligned to 16 bytes (0x%x)", - "osSpTaskLoad: yield_data_ptr not aligned to 16 bytes (0x%x)", - "osProfileInit: profile counter is running, call osProfileStop before init", - "osProfileInit: profcnt is %d", - "osProfileInit: histo_base pointer must be 32-bit aligned (%x)", - "osProfileInit: text_start (%x) >= text_end (%x)", - "osProfileInit: histo_size is an illegal size (%d)", - "osProfileStart: microseconds is < PROF_MIN_INTERVAL (%d)", - "osProfileStart: profiling has already been started", - "osProfileStop: profiling has already been stopped", - "osProfileStop: no profile timer to stop", - "osReadHost: address not aligned to 8 bytes (0x%x)", - "osReadHost: size either 0 or not aligned to 4 bytes (0x%x)", - "osWriteHost: address not aligned to 8 bytes (0x%x)", - "osWriteHost: size either 0 or not aligned to 4 bytes (0x%x)", - "osGetTime: VI manager not yet begun by osCreateViManager", - "osSetTime: VI manager not yet begun by osCreateViManager", - "osSetTimer: VI manager not yet begun by osCreateViManager", - "osStopTimer: VI manager not yet begun by osCreateViManager", - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - NULSTR, - "_handleMIDIMsg: no sound mapped", - "_handleMIDIMsg: no free voices", - "_handleMIDIMsg: couldn't map voice", - "_handleMIDIMsg: note off - couldn't find voice", - "_handleMIDIMsg: poly pressure - couldn't find voice", - "_handleEvent: no free voices", - "Synthesizer: no free updates", - "alSndPDeallocate: attempt to deallocate a sound which is playing", - "alSndpDelete: attempt to delete player with playing sounds", - "alSndpPlay: attempt to play a sound which is playing", - "alSndpSetSound: sound id (%d) out of range (0 - %d)", - "alSndpSetPriority: sound id (%d) out of range (0 - %d)", - "alSndpSet Parameter: target (%d) out of range (0 - %d)", - "alBnkfNew: bank file out of date", - "alSeqNew: 0x%x is not a midi file", - "alSeqNew: 0x%x is not a type 0 midi file", - "alSeqNew: 0x%x has more than 1 track", - "alSeqNew: SMPTE delta times not supported", - "alSeqNew: Error parsing file 0x%x (no track header)", - "alSeqNextEvent: Unsupported system exclusive", - "alSeqNextEvent: Unsupported midi meta event 0x%x", - "_handleMIDIMsg: Invalid program change to %d, max instruments %d", - "_handleMIDIMsg: Unknown midi message 0x%x", - "_unmapVoice: Couldn't unmap voice 0x%x", - "alEvtqPostEvent: Out of free events", - "alHeapAlloc: Can't allocate %d bytes", - "alHeapCheck: Heap corrupt", - "alHeapCheck: Heap corrupt - first block is bad", - "alCSeqGetTrackEvent: Running status of zero on track %d", - "alCSeqGetTrackEvent: Note on velocity of zero on track %d", - "alCSPVoiceHandler: Stopping sequence but voice not free chan %d, key %d", - "alSeqNextEvent: Read past end of sequence", - "osAiSetNextBuffer: DMA buffer location may cause audio clicks (0x%x)", - "_loadOutputBuffer: Modulated delay greater than total delay by %d samples", - "osViExtendVStart: VI Manager not yet begun by osCreateViManager", - "osViExtendVStart: value not in range [0-48] %d", - NULSTR, -}; - -static void kmcErrorHandler(s16 code, s16 numArgs, ...); -OSErrorHandler __kmcErrorHandler = kmcErrorHandler; - -static void kmcErrorHandler(s16 code, s16 numArgs, ...) { - va_list ap; - const char* fmt; - - fmt = __os_error_message[code]; - va_start(ap, numArgs); - - if (__kmc_pt_mode) { - _Printf(kmc_proutSyncPrintf, NULL, fmt, ap); - } else { - _Printf(proutSyncPrintf, NULL, fmt, ap); - } - - osSyncPrintf("\n"); - - va_end(ap); -} diff --git a/src/gu/mtxcatf.c b/src/gu/mtxcatf.c deleted file mode 100644 index 77acfba..0000000 --- a/src/gu/mtxcatf.c +++ /dev/null @@ -1,60 +0,0 @@ - -/* - * Copyright 1995, Silicon Graphics, Inc. - * ALL RIGHTS RESERVED - * - * UNPUBLISHED -- Rights reserved under the copyright laws of the United - * States. Use of a copyright notice is precautionary only and does not - * imply publication or disclosure. - * - * U.S. GOVERNMENT RESTRICTED RIGHTS LEGEND: - * Use, duplication or disclosure by the Government is subject to restrictions - * as set forth in FAR 52.227.19(c)(2) or subparagraph (c)(1)(ii) of the Rights - * in Technical Data and Computer Software clause at DFARS 252.227-7013 and/or - * in similar or successor clauses in the FAR, or the DOD or NASA FAR - * Supplement. Contractor/manufacturer is Silicon Graphics, Inc., - * 2011 N. Shoreline Blvd. Mountain View, CA 94039-7311. - * - * THE CONTENT OF THIS WORK CONTAINS CONFIDENTIAL AND PROPRIETARY - * INFORMATION OF SILICON GRAPHICS, INC. ANY DUPLICATION, MODIFICATION, - * DISTRIBUTION, OR DISCLOSURE IN ANY FORM, IN WHOLE, OR IN PART, IS STRICTLY - * PROHIBITED WITHOUT THE PRIOR EXPRESS WRITTEN PERMISSION OF SILICON - * GRAPHICS, INC. - * - */ - -/* - * File: mtxcatf.c - * Creator: hsa@sgi.com - * Create Date: Thu Nov 2 13:03:02 PST 1995 - * - */ - -#include "guint.h" - -void guMtxCatF(float mf[4][4], float nf[4][4], float res[4][4]) { - int i, j, k; - float temp[4][4]; - - for (i = 0; i < 4; i++) { - for (j = 0; j < 4; j++) { - temp[i][j] = 0.0; - for (k = 0; k < 4; k++) { - temp[i][j] += mf[i][k] * nf[k][j]; - } - } - } - - /* make sure we handle case where result is an input */ - for (i = 0; i < 4; i++) { - for (j = 0; j < 4; j++) { - res[i][j] = temp[i][j]; - } - } -} - -void guMtxXFMF(float mf[4][4], float x, float y, float z, float* ox, float* oy, float* oz) { - *ox = mf[0][0] * x + mf[1][0] * y + mf[2][0] * z + mf[3][0]; - *oy = mf[0][1] * x + mf[1][1] * y + mf[2][1] * z + mf[3][1]; - *oz = mf[0][2] * x + mf[1][2] * y + mf[2][2] * z + mf[3][2]; -} diff --git a/src/gu/normalize.c b/src/gu/normalize.c deleted file mode 100644 index 82185a7..0000000 --- a/src/gu/normalize.c +++ /dev/null @@ -1,22 +0,0 @@ -/************************************************************************** - * * - * Copyright (C) 1994, Silicon Graphics, Inc. * - * * - * These coded instructions, statements, and computer programs contain * - * unpublished proprietary information of Silicon Graphics, Inc., and * - * are protected by Federal copyright law. They may not be disclosed * - * to third parties or copied or duplicated in any form, in whole or * - * in part, without the prior written consent of Silicon Graphics, Inc. * - * * - **************************************************************************/ - -#include "guint.h" - -void guNormalize(float* x, float* y, float* z) { - float m; - - m = 1 / sqrtf((*x) * (*x) + (*y) * (*y) + (*z) * (*z)); - *x *= m; - *y *= m; - *z *= m; -} diff --git a/src/gu/scale.c b/src/gu/scale.c deleted file mode 100644 index 594d043..0000000 --- a/src/gu/scale.c +++ /dev/null @@ -1,30 +0,0 @@ -/************************************************************************** - * * - * Copyright (C) 1994, Silicon Graphics, Inc. * - * * - * These coded instructions, statements, and computer programs contain * - * unpublished proprietary information of Silicon Graphics, Inc., and * - * are protected by Federal copyright law. They may not be disclosed * - * to third parties or copied or duplicated in any form, in whole or * - * in part, without the prior written consent of Silicon Graphics, Inc. * - * * - **************************************************************************/ - -#include "guint.h" - -void guScaleF(float mf[4][4], float x, float y, float z) { - guMtxIdentF(mf); - - mf[0][0] = x; - mf[1][1] = y; - mf[2][2] = z; - mf[3][3] = 1; -} - -void guScale(Mtx* m, float x, float y, float z) { - Matrix mf; - - guScaleF(mf, x, y, z); - - guMtxF2L(mf, m); -} diff --git a/src/gu/translate.c b/src/gu/translate.c deleted file mode 100644 index 8ae2538..0000000 --- a/src/gu/translate.c +++ /dev/null @@ -1,29 +0,0 @@ -/************************************************************************** - * * - * Copyright (C) 1994, Silicon Graphics, Inc. * - * * - * These coded instructions, statements, and computer programs contain * - * unpublished proprietary information of Silicon Graphics, Inc., and * - * are protected by Federal copyright law. They may not be disclosed * - * to third parties or copied or duplicated in any form, in whole or * - * in part, without the prior written consent of Silicon Graphics, Inc. * - * * - **************************************************************************/ - -#include "guint.h" - -void guTranslateF(float mf[4][4], float x, float y, float z) { - guMtxIdentF(mf); - - mf[3][0] = x; - mf[3][1] = y; - mf[3][2] = z; -} - -void guTranslate(Mtx* m, float x, float y, float z) { - Matrix mf; - - guTranslateF(mf, x, y, z); - - guMtxF2L(mf, m); -} diff --git a/src/os/exceptasm.s b/src/os/exceptasm.s index 919482e..9a7dbea 100644 --- a/src/os/exceptasm.s +++ b/src/os/exceptasm.s @@ -1,6 +1,4 @@ -#ifdef MODERN_CC .set gp=64 -#endif #include "PR/R4300.h" #include "sys/asm.h" diff --git a/src/os/getfpccsr.s b/src/os/getfpccsr.s index f51b1d0..75cf2ef 100644 --- a/src/os/getfpccsr.s +++ b/src/os/getfpccsr.s @@ -6,8 +6,4 @@ LEAF(__osGetFpcCsr) CFC1( v0, fcr31) jr ra -#ifndef MODERN_CC -END(__osGetSR) # @bug: Should be __osGetFpcCsr -#else END(__osGetFpcCsr) -#endif diff --git a/src/os/initialize.c b/src/os/initialize.c index fedb2fd..ef23337 100644 --- a/src/os/initialize.c +++ b/src/os/initialize.c @@ -21,7 +21,6 @@ u32 __OSGlobalIntMask = OS_IM_ALL; #ifdef _FINALROM u32 __osFinalrom; #else -u32 __kmc_pt_mode; void* __printfunc = NULL; #endif diff --git a/src/os/setfpccsr.s b/src/os/setfpccsr.s index f36e5b8..de51d00 100644 --- a/src/os/setfpccsr.s +++ b/src/os/setfpccsr.s @@ -7,8 +7,4 @@ LEAF(__osSetFpcCsr) CFC1( v0, fcr31) CTC1( a0, fcr31) jr ra -#ifndef MODERN_CC -END(__osSetSR) # @bug: Should be __osSetFpcCsr -#else -END(__osSetFpcCsr) -#endif +END(__osSetFpcCsr) \ No newline at end of file diff --git a/src/rmon/rmonbrk.c b/src/rmon/rmonbrk.c deleted file mode 100644 index 59959d6..0000000 --- a/src/rmon/rmonbrk.c +++ /dev/null @@ -1,424 +0,0 @@ -#ifndef _FINALROM - -#include "PR/os_internal.h" -#include "PRinternal/dbgproto.h" -#include "PR/rcp.h" -#include "PR/sptask.h" -#include "PRinternal/rmonint.h" - -#include "PRinternal/macros.h" - -// TODO: this comes from a header -#ident "$Revision: 1.4 $" - -#define TMP_BP 0 -#define NUM_BREAKPOINTS 16 - -typedef struct { - TVushort type; - TVushort response; - TVid threadID; - void* pc; -} TVExceptionReplyMsg; - -typedef struct { - u32* breakAddress; - u32 oldInstruction; -} BREAKINFO; - -/* first breakpoint is reserved for implementing single-stepping */ -static BREAKINFO breakpoints[NUM_BREAKPOINTS] ALIGNED(0x8); -/* breakpoint for alternate branch target */ -static BREAKINFO altBreak; - -static BREAKINFO RCPbreakpoints[NUM_BREAKPOINTS] ALIGNED(0x8); - -u8 __rmonRcpAtBreak; - -static void rmonFindFaultedThreads(void); - -static void SetTempBreakpoint(u32* addr1, u32* addr2) { - STUBBED_PRINTF(("Set temp BP at %08x", addr1)); - if (addr2 != NULL) { - STUBBED_PRINTF((" and %08x", addr2)); - } - STUBBED_PRINTF(("\n")); - - /* Save the word at the target address to be restored later */ - breakpoints[TMP_BP].oldInstruction = *addr1; - /* Install a break instruction at the target address */ - *addr1 = MIPS_BREAK(16); - osWritebackDCache(addr1, sizeof(*addr1)); - osInvalICache(addr1, sizeof(*addr1)); - breakpoints[TMP_BP].breakAddress = addr1; - - /* Also do so for an alt address if required */ - if (addr2 != NULL) { - altBreak.oldInstruction = *addr2; - *addr2 = MIPS_BREAK(16); - osWritebackDCache(addr2, sizeof(*addr2)); - osInvalICache(addr2, sizeof(*addr2)); - altBreak.breakAddress = addr2; - } -} - -static void ClearTempBreakpoint(void) { - u32 inst; - - if (breakpoints[TMP_BP].breakAddress != NULL) { - inst = *breakpoints[TMP_BP].breakAddress; - - if ((inst & MIPS_BREAK_MASK) == MIPS_BREAK_OPCODE) { - STUBBED_PRINTF(("ClearTempBreak @ %08x\n", breakpoints[TMP_BP].breakAddress)); - - /* After confirming that there is a break instruction with code at the target - address, restore the original contents of the word at the target address */ - *breakpoints[TMP_BP].breakAddress = breakpoints[TMP_BP].oldInstruction; - osWritebackDCache(breakpoints[TMP_BP].breakAddress, sizeof(*breakpoints[TMP_BP].breakAddress)); - osInvalICache(breakpoints[TMP_BP].breakAddress, sizeof(*breakpoints[TMP_BP].breakAddress)); - } - breakpoints[TMP_BP].breakAddress = NULL; - } - - /* Same as above for the alt breakpoint */ - if (altBreak.breakAddress != NULL) { - inst = *altBreak.breakAddress; - - if ((inst & MIPS_BREAK_MASK) == MIPS_BREAK_OPCODE) { - STUBBED_PRINTF(("ClearTempBreak @ %08x\n", altBreak.breakAddress)); - - *altBreak.breakAddress = altBreak.oldInstruction; - osWritebackDCache(altBreak.breakAddress, sizeof(*altBreak.breakAddress)); - osInvalICache(altBreak.breakAddress, sizeof(*altBreak.breakAddress)); - } - altBreak.breakAddress = NULL; - } -} - -int __rmonSetBreak(KKHeader* req) { - register KKSetBkptRequest* request = (KKSetBkptRequest*)req; - register BREAKINFO* breakBase; - register BREAKINFO* whichBreak; - register BREAKINFO* lastBreak; - KKBkptEvent reply; - - STUBBED_PRINTF(("SetBreak at %08x, method %d\n", request->addr, req->method)); - - /* Select breakpoint list */ - if (req->method == RMON_RSP) { - breakBase = RCPbreakpoints; - whichBreak = &RCPbreakpoints[1]; - lastBreak = &RCPbreakpoints[NUM_BREAKPOINTS]; - } else { - breakBase = breakpoints; - whichBreak = &breakpoints[1]; - lastBreak = &breakpoints[NUM_BREAKPOINTS]; - } - - /* Find breakpoint slot */ - for (; whichBreak < lastBreak; whichBreak++) { - if (whichBreak->breakAddress != NULL) { - if (whichBreak->breakAddress == (u32*)request->addr) { - /* Breakpoint already set here */ - break; - } - continue; - } else { - /* Empty slot */ - break; - } - } - - /* No breakpoints available */ - if (whichBreak == lastBreak) { - return TV_ERROR_NO_MORE_IDS; - } - - /* Set breakpoint if not already set */ - if (whichBreak->breakAddress == NULL) { - if (req->method == RMON_RSP) { - whichBreak->oldInstruction = __rmonReadWordAt((u32*)request->addr); - __rmonWriteWordTo((u32*)request->addr, MIPS_BREAK((whichBreak - breakBase) + NUM_BREAKPOINTS)); - } else { - whichBreak->oldInstruction = *(u32*)request->addr; - *(u32*)request->addr = MIPS_BREAK((whichBreak - breakBase) + NUM_BREAKPOINTS); - osWritebackDCache((void*)request->addr, sizeof(whichBreak->oldInstruction)); - osInvalICache((void*)request->addr, sizeof(whichBreak->oldInstruction)); - } - whichBreak->breakAddress = (u32*)request->addr; - STUBBED_PRINTF(("* (%08x) = %08x (was %08x)\n", whichBreak->breakAddress, *whichBreak->breakAddress, - whichBreak->oldInstruction)); - } - - /* Send reply */ - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - reply.object = request->object; - reply.bp = whichBreak - breakBase; - reply.instruction = whichBreak->oldInstruction; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -int __rmonListBreak(KKHeader* request UNUSED) { - STUBBED_PRINTF(("ListBreak\n")); - - return TV_ERROR_ILLEGAL_CALL; -} - -int __rmonClearBreak(KKHeader* req) { - register KKClrBkptRequest* request = (KKClrBkptRequest*)req; - register BREAKINFO* whichBreak; - KKBkptEvent reply; - u32 inst; - - STUBBED_PRINTF(("ClearBreak\n")); - - /* Check valid breakpoint index */ - if (request->bp >= NUM_BREAKPOINTS) { - return TV_ERROR_INVALID_ID; - } - - /* Clear the breakpoint, restore whatever was there before */ - if (req->method == RMON_RSP) { - whichBreak = &RCPbreakpoints[request->bp]; - - if (whichBreak->breakAddress == NULL) { - return TV_ERROR_INVALID_ID; - } - - inst = __rmonReadWordAt(whichBreak->breakAddress); - if ((inst & MIPS_BREAK_MASK) == MIPS_BREAK_OPCODE) { - __rmonWriteWordTo(whichBreak->breakAddress, whichBreak->oldInstruction); - } - } else { - whichBreak = &breakpoints[request->bp]; - - if (whichBreak->breakAddress == NULL) { - return TV_ERROR_INVALID_ID; - } - - inst = *whichBreak->breakAddress; - if ((inst & MIPS_BREAK_MASK) == MIPS_BREAK_OPCODE) { - *whichBreak->breakAddress = whichBreak->oldInstruction; - osWritebackDCache(whichBreak->breakAddress, sizeof(*whichBreak->breakAddress)); - osInvalICache(whichBreak->breakAddress, sizeof(*whichBreak->breakAddress)); - } - } - whichBreak->breakAddress = NULL; - - /* Send reply */ - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - reply.object = request->object; - reply.bp = request->bp; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -u32 __rmonGetBranchTarget(int method, int thread, char* addr) { - int inst; - - if (method == RMON_RSP) { - inst = __rmonReadWordAt((u32*)addr); - } else { - inst = *(u32*)addr; - } - - switch ((inst >> 26) & 0x3F) { - case 0: /* SPECIAL */ - if (((inst >> 5) & 0x7FFF) == 0 && (inst & 0x3F) == 8) { - /* JR */ - return __rmonGetRegisterContents(method, thread, (inst >> 21) & 0x1F); - } - if (((inst >> 16) & 0x1F) == 0 && (inst & 0x7FF) == 9) { - /* JALR */ - return __rmonGetRegisterContents(method, thread, (inst >> 21) & 0x1F); - } - break; - case 1: /* REGIMM */ - switch ((inst >> 16) & 0x1F) { - case 0: /* BLTZ */ - case 1: /* BGEZ */ - case 2: /* BLTZL */ - case 3: /* BGEZL */ - case 16: /* BLTZAL */ - case 17: /* BGEZAL */ - case 18: /* BLTZALL */ - case 19: /* BGEZALL */ - return (((inst << 0x10) >> 0xE) + addr + 4); - } - break; - case 2: /* J */ - case 3: /* JAL */ - return (((u32)inst << 6) >> 4) + (((s32)((u32)addr + 4) >> 0x1C) << 0x1C); - case 4: /* BEQ */ - case 5: /* BNE */ - case 20: /* BEQL */ - case 21: /* BNEL */ - return (((inst << 0x10) >> 0xE) + addr + 4); - case 6: /* BLEZ */ - case 7: /* BGTZ */ - case 22: /* BLEZL */ - case 23: /* BGTZL */ - if (((inst >> 16) & 0x1F) == 0) { - return (((inst << 0x10) >> 0xE) + addr + 4); - } - break; - case 16: /* COP0 */ - case 17: /* COP1 */ - case 18: /* COP2 */ - case 19: /* COP3 */ - if (((inst >> 21) & 0x1F) == 8) { - switch ((inst >> 16) & 0x1F) { - case 0: /* BCzF */ - case 1: /* BCzT */ - case 2: /* BCzFL */ - case 3: /* BCzTL */ - return (((inst << 0x10) >> 0xE) + addr + 4); - } - } - break; - } - return -1; -} - -static int IsJump(u32 inst) { - switch ((inst >> 26) & 0x3F) { - case 0: /* SPECIAL */ - if (((inst >> 5) & 0x7FFF) == 0 && (inst & 0x3F) == 8) { - /* JR */ - return TRUE; - } - if (((inst >> 16) & 0x1F) == 0 && (inst & 0x7FF) == 9) { - /* JALR */ - return TRUE; - } - break; - case 2: /* J */ - case 3: /* JAL */ - return TRUE; - } - return FALSE; -} - -int __rmonSetSingleStep(int thread, u32* instptr) { - u32 branchTarget = __rmonGetBranchTarget(RMON_CPU, thread, (void*)instptr); - - STUBBED_PRINTF(("SingleStep\n")); - - if ((branchTarget & 3) != 0) { - /* no branch target, set breakpoint at next pc */ - SetTempBreakpoint(instptr + 1, NULL); - } else if (branchTarget == (u32)instptr) { - /* branch target is this instruction, can't single step here */ - return FALSE; - } else if (IsJump(*instptr) || branchTarget == (u32)(instptr + 2)) { - /* unconditional branch, set at branch target */ - SetTempBreakpoint((u32*)branchTarget, NULL); - } else { - /* set two breakpoints for handling conditional branches */ - SetTempBreakpoint((u32*)branchTarget, instptr + 2); - } - return TRUE; -} - -void __rmonGetExceptionStatus(KKStatusEvent* reply) { - reply->status.flags = OS_STATE_STOPPED; - reply->status.why = 2; - reply->status.what = 0; - reply->status.rv = 0; - reply->status.info.major = 2; - reply->status.info.minor = 4; - reply->header.code = KK_CODE_THREAD_STATUS; - reply->header.error = TV_ERROR_NO_ERROR; - reply->header.length = sizeof(*reply); -} - -#define FAULT_BREAKNUM (NUM_BREAKPOINTS - 1) - -static void rmonSendBreakMessage(s32 whichThread, int breakNumber) { - KKStatusEvent reply; - - STUBBED_PRINTF(("Break %d in thread %d\n", breakNumber, whichThread)); - - /* Build thread exception status */ - __rmonGetThreadStatus(RMON_CPU, (whichThread != 0) ? whichThread : RMON_TID_NOTHREAD, &reply); - __rmonGetExceptionStatus(&reply); - - if (breakNumber == FAULT_BREAKNUM) { - /* Hit fault */ - reply.status.info.major = 1; - reply.status.info.minor = 2; - } - if (breakNumber < NUM_BREAKPOINTS) { - breakNumber = 0; - } else { - breakNumber -= NUM_BREAKPOINTS; - } - if (breakNumber != 0) { - /* Break not set by debugger, or set during single-step */ - reply.status.instr = MIPS_BREAK_OPCODE; - } - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_EXCEPTION); -} - -void __rmonHitBreak(void) { - STUBBED_PRINTF(("HitBreak\n")); - - /* Stop all user threads and report faulted threads */ - ClearTempBreakpoint(); - __rmonStopUserThreads(0); - rmonFindFaultedThreads(); -} - -void __rmonHitSpBreak(void) { - KKStatusEvent exceptionReply; - - STUBBED_PRINTF(("Hit SP Break\n")); - - /* Rewind RSP PC by one instruction to return to the location of the break instruction */ - __rmonWriteWordTo((u32*)SP_PC_REG, __rmonReadWordAt((u32*)SP_PC_REG) - 4); - - /* Report RSP break event */ - __rmonGetThreadStatus(RMON_RSP, RMON_TID_RSP, &exceptionReply); - __rmonGetExceptionStatus(&exceptionReply); - __rmonSendReply(&exceptionReply.header, sizeof(exceptionReply), KK_TYPE_EXCEPTION); - __rmonRcpAtBreak = TRUE; -} - -void __rmonHitCpuFault(void) { - STUBBED_PRINTF(("HitCpuFault\n")); - - /* Stop all user threads and report faulted threads */ - __rmonMaskIdleThreadInts(); - __rmonStopUserThreads(0); - rmonFindFaultedThreads(); -} - -static void rmonFindFaultedThreads(void) { - register OSThread* tptr = __osGetActiveQueue(); - - while (tptr->priority != -1) { - if (tptr->priority > OS_PRIORITY_IDLE && tptr->priority <= OS_PRIORITY_APPMAX) { - if (tptr->flags & OS_FLAG_CPU_BREAK) { - int inst = *(u32*)tptr->context.pc; - - STUBBED_PRINTF(("Brk in thread %d @ %08x, inst %08x\r\n", tptr->id, tptr->context.pc, inst)); - - if ((inst & MIPS_BREAK_MASK) == MIPS_BREAK_OPCODE) { - rmonSendBreakMessage(tptr->id, inst >> 6); - } else { - rmonSendBreakMessage(tptr->id, 0); - } - } - if (tptr->flags & OS_FLAG_FAULT) { - __rmonSendFault(tptr); - rmonSendBreakMessage(tptr->id, FAULT_BREAKNUM); - } - } - tptr = tptr->tlnext; - } -} - -#endif diff --git a/src/rmon/rmoncmds.c b/src/rmon/rmoncmds.c deleted file mode 100644 index 3992801..0000000 --- a/src/rmon/rmoncmds.c +++ /dev/null @@ -1,46 +0,0 @@ -#ifndef _FINALROM - -#include "PRinternal/dbgproto.h" -#include "PRinternal/rmonint.h" - -#include "PRinternal/macros.h" - -// TODO: this comes from a header -#ident "$Revision: 1.4 $" - -static int NotImplemented(KKHeader* dummy UNUSED) { - return TV_ERROR_ILLEGAL_CALL; -} - -static FUNPTR dispatchTable[] = { - __rmonLoadProgram, __rmonListProcesses, __rmonGetExeName, __rmonListThreads, __rmonThreadStatus, - NotImplemented, __rmonStopThread, __rmonRunThread, NotImplemented, NotImplemented, - __rmonSetFault, NotImplemented, __rmonGetRegionCount, __rmonGetRegions, __rmonGetGRegisters, - __rmonSetGRegisters, __rmonGetFRegisters, __rmonSetFRegisters, __rmonReadMem, __rmonWriteMem, - __rmonSetBreak, __rmonClearBreak, __rmonListBreak, NotImplemented, NotImplemented, - NotImplemented, NotImplemented, NotImplemented, NotImplemented, NotImplemented, - __rmonSetComm, NotImplemented, NotImplemented, NotImplemented, NotImplemented, - NotImplemented, NotImplemented, NotImplemented, NotImplemented, NotImplemented, - NotImplemented, NotImplemented, NotImplemented, NotImplemented, NotImplemented, - NotImplemented, NotImplemented, NotImplemented, NotImplemented, __rmonGetSRegs, - __rmonSetSRegs, __rmonGetVRegs, __rmonSetVRegs, NotImplemented, -}; - -int __rmonExecute(KKHeader* request) { - int retval; - KKHeader reply; - - if (request->code >= ARRLEN(dispatchTable) - 1) { - return TV_ERROR_ILLEGAL_CALL; - } - - retval = dispatchTable[(int)request->code](request); - if (retval < TV_ERROR_NO_ERROR) { - reply.code = request->code; - reply.error = retval; - __rmonSendReply(&reply, sizeof(reply), KK_TYPE_REPLY); - } - return retval; -} - -#endif diff --git a/src/rmon/rmonmain.c b/src/rmon/rmonmain.c deleted file mode 100644 index b286260..0000000 --- a/src/rmon/rmonmain.c +++ /dev/null @@ -1,127 +0,0 @@ -#include "PR/os_version.h" - -#ifndef _FINALROM - -#include "PRinternal/dbgproto.h" -#include "PR/os_internal.h" -#include "PRinternal/rmonint.h" -#include "PR/rcp.h" -#include "PR/sptask.h" -#include "PR/rdb.h" - -#include "PRinternal/macros.h" - -// TODO: this comes from a header -#ident "$Revision: 1.4 $" - -int __rmonActive = FALSE; - -static vu32 somethingToDo; -static u32 inbuffer[280] ALIGNED(0x10); -static u8 cmdinptr; -static u8 cmdoutptr; -static int state; -static char* inPointer; - -void __rmonSendHeader(KKHeader* const block, u32 blockSize, u32 type) { - int sent; - char* cPtr = (char*)block; - - block->rev = KK_REV; - block->type = type; - - sent = 0; - while (sent < blockSize) { - sent += __osRdbSend(cPtr + sent, blockSize - sent, RDB_TYPE_GtoH_DEBUG); - } -} - -void __rmonSendReply(KKHeader* const block, u32 blockSize, u32 replyType) { - char* cPtr; - int sent = 0; - - block->length = blockSize; - cPtr = (char*)&blockSize; - - /* send size */ - while (sent < (signed)sizeof(blockSize)) { - sent += __osRdbSend(cPtr + sent, sizeof(blockSize) - sent, RDB_TYPE_GtoH_DEBUG); - } - - /* send data */ - __rmonSendHeader(block, blockSize, replyType); - __rmonIOflush(); -} - -void __rmonSendData(char* const block, unsigned int blockSize) { - int* blockPointer = (int*)block; - unsigned int wordCount = (u32)(blockSize + 3) / 4; - u32 data; - union { - char bufBytes[4]; - u32 bufWord; - } buffer; - - if (((u32)block & 3) == 0) { - while (wordCount--) { - if ((u32)blockPointer >= SP_DMEM_START && (u32)blockPointer < 0x05000000) { - __osSpRawReadIo((u32)blockPointer++, &data); - __rmonIOputw(data); - } else { - __rmonIOputw(*(blockPointer++)); - } - } - } else - while (wordCount--) { - __rmonMemcpy((u8*)buffer.bufBytes, (u8*)blockPointer, sizeof(buffer)); - __rmonIOputw(buffer.bufWord); - blockPointer++; - } - __rmonIOflush(); -} - -void rmonMain(void) { - register int newChars UNUSED; - - STUBBED_PRINTF(("rmon: Thread %d created\n")); - STUBBED_PRINTF(("rmon: Thread %d destroyed\n")); - - somethingToDo = 0; - cmdoutptr = 0; - cmdinptr = 0; - - __rmonInit(); - __rmonActive = TRUE; - - state = 0, newChars = 0, inPointer = (void*)&inbuffer; - for (;;) { - OSMesg work; - - osRecvMesg(&__rmonMQ, &work, OS_MESG_BLOCK); - - somethingToDo |= (u32)work; - - if (somethingToDo & RMON_MESG_CPU_BREAK) { - somethingToDo &= ~RMON_MESG_CPU_BREAK; - __rmonHitBreak(); - } - if (somethingToDo & RMON_MESG_SP_BREAK) { - somethingToDo &= ~RMON_MESG_SP_BREAK; - __rmonHitSpBreak(); - } - if (somethingToDo & RMON_MESG_FAULT) { - somethingToDo &= ~RMON_MESG_FAULT; - __rmonHitCpuFault(); - } - if (somethingToDo & 0x10) { - somethingToDo; - somethingToDo &= (u8)~0x10; - } - if (somethingToDo & 0x20) { - somethingToDo; - somethingToDo &= (u8)~0x20; - } - } -} - -#endif diff --git a/src/rmon/rmonmem.c b/src/rmon/rmonmem.c deleted file mode 100644 index 6992a0c..0000000 --- a/src/rmon/rmonmem.c +++ /dev/null @@ -1,275 +0,0 @@ -#include "PR/os_version.h" - -#ifndef _FINALROM - -#include "PRinternal/dbgproto.h" -#include "PR/os_internal.h" -#include "PR/rcp.h" -#include "PR/sptask.h" -#include "PRinternal/rmonint.h" -#include "PR/rdb.h" - -#include "PRinternal/macros.h" - -// TODO: this comes from a header -#ident "$Revision: 1.4 $" - -u8 __rmonUtilityBuffer[256] ALIGNED(0x8); - -void __rmonWriteWordTo(u32* addr, u32 val) { - while (__osSpRawWriteIo((u32)addr, val) != 0) { - ; - } -} - -u32 __rmonReadWordAt(u32* addr) { - u32 data; - - if ((u32)addr >= SP_DMEM_START && (u32)addr < 0x05000000) { - __osSpRawReadIo((u32)addr, &data); - return data; - } - return 0; -} - -void __rmonMemcpy(u8* dest, u8* srce, u32 count) { - while (count--) { - *dest++ = *srce++; - } -} - -void __rmonCopyWords(u32* dest, u32* srce, u32 count) { - while (count--) { - *dest++ = *srce++; - } -} - -static void strcpy(char* dest, char* srce) { - while ((*dest++ = *srce++)) { - ; - } -} - -int __rmonReadMem(KKHeader* req) { - char* cPtr; - int sent; - int dataSize; - KKReadRequest* request = (KKReadRequest*)req; - KKBufferEvent* reply = (KKBufferEvent*)__rmonUtilityBuffer; - u8* blockStart; - - STUBBED_PRINTF(("ReadMem @ %08x for %d\n", request->addr, request->nbytes)); - - reply->header.code = request->header.code; - reply->object = request->object; - reply->header.error = TV_ERROR_NO_ERROR; - - if (request->addr == (u32)-1) { - return TV_ERROR_INVALID_ADDRESS; - } - if (request->nbytes > RMON_MAX_XFER_SIZE) { - return TV_ERROR_INVALID_CAPABILITY; - } - - if (req->method == RMON_RSP) { - if (!((request->addr < SP_IMEM_START || (request->addr + request->nbytes) > SP_IMEM_END) ? FALSE : TRUE) - && !((request->addr < SP_DMEM_START || (request->addr + request->nbytes) > SP_DMEM_END) ? FALSE : TRUE)) { - return TV_ERROR_INVALID_ADDRESS; - } - } else if (osVirtualToPhysical((void*)request->addr) == (u32)-1) { - return TV_ERROR_INVALID_ADDRESS; - } - - blockStart = (u8*)request->addr; - reply->header.length = request->nbytes + sizeof(reply->header) + sizeof(reply->object); - dataSize = request->nbytes + sizeof(reply->header) + sizeof(reply->object); - - cPtr = (char*)&dataSize; - sent = 0; - while (sent < (signed)sizeof(dataSize)) { - sent += __osRdbSend(cPtr + sent, sizeof(dataSize) - sent, RDB_TYPE_GtoH_DEBUG); - } - - __rmonSendHeader(&reply->header, sizeof(reply->header) + sizeof(reply->object), KK_TYPE_REPLY); - __rmonSendData(blockStart, request->nbytes); - return TV_ERROR_NO_ERROR; -} - -int __rmonWriteMem(KKHeader* req) { - register KKWriteRequest* request = (KKWriteRequest*)req; - KKObjectEvent reply; - - STUBBED_PRINTF(("WriteMem\n")); - - /* Bad virtual address, abort */ - if (req->method == RMON_CPU && osVirtualToPhysical((u32*)request->writeHeader.addr) == (u32)-1) { - return TV_ERROR_INVALID_ADDRESS; - } - - /* Transfer size too large, abort */ - if (request->writeHeader.nbytes > RMON_MAX_XFER_SIZE) { - return TV_ERROR_INVALID_CAPABILITY; - } - - if (((request->writeHeader.addr < SP_DMEM_START - || (request->writeHeader.addr + request->writeHeader.nbytes) > 0x04FFFFFF) - ? FALSE - : TRUE)) { - int align; - u32 word; - - if ((align = request->writeHeader.addr & 3) != 0) { - STUBBED_PRINTF(("Long unaligned write...\n")); - - if (request->writeHeader.nbytes != 1) { - return TV_ERROR_INVALID_ADDRESS; - } - - /* Unaligned write; read the word, substitute in the written byte, write it back */ - word = __rmonReadWordAt((u32*)(request->writeHeader.addr & ~3)); - if (align == 1) { - word = (word & ~0xFF0000) | (request->buffer[0] << 0x10); - } else if (align == 2) { - word = (word & ~0xFF00) | (request->buffer[0] << 8); - } else { - word = (word & ~0xFF) | (request->buffer[0] << 0); - } - __rmonWriteWordTo((u32*)(request->writeHeader.addr & ~3), word); - } else { - int wordCount = request->writeHeader.nbytes / sizeof(u32); - u32* wordPointer = (u32*)request->buffer; - - if (request->writeHeader.nbytes % sizeof(u32) != 0) { - STUBBED_PRINTF(("RCP write not an integral number of words\n")); - return TV_ERROR_INVALID_ADDRESS; - } - - while (wordCount--) { - __rmonWriteWordTo((u32*)request->writeHeader.addr, *(wordPointer++)); - request->writeHeader.addr += sizeof(*wordPointer); - } - } - } else { - __rmonMemcpy((u8*)request->writeHeader.addr, (u8*)request->buffer, request->writeHeader.nbytes); - } - - reply.header.code = request->writeHeader.header.code; - reply.header.error = TV_ERROR_NO_ERROR; - reply.object = request->writeHeader.object; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - - return TV_ERROR_NO_ERROR; -} - -int __rmonListProcesses(KKHeader* req) { - KKObjectRequest* request = (KKObjectRequest*)req; - KKObjsEvent reply; - - STUBBED_PRINTF(("ListProcesses\n")); - - reply.object = 0; - reply.objs.number = 1; - reply.objs.objects[0] = (req->method == RMON_RSP) ? RMON_PID_RSP : RMON_PID_CPU; - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -int __rmonLoadProgram(KKHeader* request UNUSED) { - STUBBED_PRINTF(("LoadProgram\n")); - - return TV_ERROR_ILLEGAL_CALL; -} - -int __rmonGetExeName(KKHeader* req) { - KKObjectRequest* request = (KKObjectRequest*)req; - KKBufferEvent* reply = (KKBufferEvent*)__rmonUtilityBuffer; - - STUBBED_PRINTF(("GetExeName\n")); - - reply->header.code = request->header.code; - reply->header.error = TV_ERROR_NO_ERROR; - reply->object = request->object; - - if (req->method == RMON_RSP) { - strcpy(reply->buffer, "imem"); - } else { - strcpy(reply->buffer, "rmon"); - } - __rmonSendReply(&reply->header, sizeof(reply->header) + sizeof(reply->object) + 8, KK_TYPE_REPLY); - - return TV_ERROR_NO_ERROR; -} - -int __rmonGetRegionCount(KKHeader* req) { - KKObjectRequest* request = (KKObjectRequest*)req; - KKNumberEvent reply; - - STUBBED_PRINTF(("GetRegionCount\n")); - - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - reply.object = request->object; - - reply.number = (req->method == RMON_RSP) ? 2 : 5; - - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - - return TV_ERROR_NO_ERROR; -} - -int __rmonGetRegions(KKHeader* req) { - KKObjectRequest* request = (KKObjectRequest*)req; - KKRegionEvent* reply = (KKRegionEvent*)__rmonUtilityBuffer; - int numRegions; - - STUBBED_PRINTF(("GetRegions\n")); - - numRegions = (req->method == RMON_RSP) ? 2 : 6; - - reply->header.length = numRegions * sizeof(reply->regions[0]) + sizeof(*reply); - reply->header.code = request->header.code; - reply->header.error = TV_ERROR_NO_ERROR; - reply->object = request->object; - reply->number = numRegions; - - reply->regions[1].vaddr = SP_IMEM_START; - reply->regions[1].size = SP_IMEM_END + 1 - SP_IMEM_START; - reply->regions[1].flags = 1 | 2 | 4; - reply->regions[1].paddr = SP_IMEM_START; - - reply->regions[0].vaddr = SP_DMEM_START; - reply->regions[0].size = SP_DMEM_END + 1 - SP_DMEM_START; - reply->regions[0].flags = 1 | 2; - reply->regions[0].paddr = SP_DMEM_START; - - if (numRegions > 2) { - reply->regions[2].vaddr = 0x88200000; - reply->regions[2].size = 0x6130; - reply->regions[2].flags = 1 | 4; - reply->regions[2].paddr = 0; - - reply->regions[3].vaddr = 4; - reply->regions[3].size = 0x200000; - reply->regions[3].flags = 1 | 2; - reply->regions[3].paddr = 0; - - reply->regions[4].vaddr = 0x4002000; - reply->regions[4].size = 0x800000; - reply->regions[4].flags = 1 | 2; - reply->regions[4].paddr = 0; - - reply->regions[5].vaddr = 0x88206130; - reply->regions[5].size = 0x9000; - reply->regions[5].flags = 1 | 2; - reply->regions[5].paddr = 0; - } - - __rmonSendReply(&reply->header, reply->header.length, KK_TYPE_REPLY); - - return TV_ERROR_NO_ERROR; -} - -#endif diff --git a/src/rmon/rmonmisc.c b/src/rmon/rmonmisc.c deleted file mode 100644 index 17c9a03..0000000 --- a/src/rmon/rmonmisc.c +++ /dev/null @@ -1,67 +0,0 @@ -#ifndef _FINALROM - -#include "PRinternal/dbgproto.h" -#include "PR/os_internal.h" -#include "PR/sptask.h" -#include "PRinternal/rmonint.h" - -#include "PRinternal/macros.h" - -// TODO: this comes from a header -#ident "$Revision: 1.4 $" - -int __rmonSetFault(KKHeader* req) { - KKFaultRequest* request = (KKFaultRequest*)req; - KKObjectEvent reply; - - STUBBED_PRINTF(("SetFault\n")); - - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - reply.object = request->tid; - - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -OSMesgQueue __rmonMQ ALIGNED(0x8); -static OSThread rmonIOThread ALIGNED(0x8); -static OSMesg rmonMsgs[8] ALIGNED(0x8); -static STACK(rmonIOStack, 0x4000) ALIGNED(0x10); -static OSMesg rmonPiMsgs[8] ALIGNED(0x8); -static OSMesgQueue rmonPiMQ ALIGNED(0x8); - -void __rmonInit(void) { - osCreateMesgQueue(&__rmonMQ, rmonMsgs, ARRLEN(rmonMsgs)); - osSetEventMesg(OS_EVENT_CPU_BREAK, &__rmonMQ, (OSMesg)RMON_MESG_CPU_BREAK); - osSetEventMesg(OS_EVENT_SP_BREAK, &__rmonMQ, (OSMesg)RMON_MESG_SP_BREAK); - osSetEventMesg(OS_EVENT_FAULT, &__rmonMQ, (OSMesg)RMON_MESG_FAULT); - osSetEventMesg(OS_EVENT_THREADSTATUS, &__rmonMQ, NULL); - osCreateThread(&rmonIOThread, 0, (void (*)(void*))__rmonIOhandler, NULL, STACK_START(rmonIOStack), OS_PRIORITY_MAX); - osCreatePiManager(OS_PRIORITY_PIMGR, &rmonPiMQ, rmonPiMsgs, ARRLEN(rmonPiMsgs)); - osStartThread(&rmonIOThread); -} - -void __rmonPanic(void) { - STUBBED_PRINTF(("PANIC!!\n")); - - for (;;) { - ; - } -} - -int __rmonSetComm(KKHeader* req) { - KKObjectEvent reply; - - STUBBED_PRINTF(("SetComm\n")); - - reply.header.code = req->code; - reply.object = 0; - reply.header.error = TV_ERROR_NO_ERROR; - - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - - return TV_ERROR_NO_ERROR; -} - -#endif diff --git a/src/rmon/rmonprint.c b/src/rmon/rmonprint.c deleted file mode 100644 index 8ac91a5..0000000 --- a/src/rmon/rmonprint.c +++ /dev/null @@ -1 +0,0 @@ -/* Empty file */ diff --git a/src/rmon/rmonrcp.s b/src/rmon/rmonrcp.s deleted file mode 100644 index bddc172..0000000 --- a/src/rmon/rmonrcp.s +++ /dev/null @@ -1,60 +0,0 @@ -#include "PR/os_version.h" -#if !defined(_FINALROM) || BUILD_VERSION < VERSION_J - -#include "sys/asm.h" -#include "sys/regdef.h" -#include "PR/rcp.h" -#include "PR/R4300.h" - -.text - -/* check if the rsp is currently running by polling HALT or BROKE bits in SP_STATUS */ -LEAF(__rmonRCPrunning) - move v0, zero - lw t0, PHYS_TO_K1(SP_STATUS_REG) - and t0, (SP_STATUS_HALT | SP_STATUS_BROKE) - bnez t0, isHalted - ori v0, 1 -isHalted: - jr ra -END(__rmonRCPrunning) - -/* stop the rsp, first wait for any ongoing dma to complete before setting HALT in SP_STATUS */ -LEAF(__rmonIdleRCP) - li a0, PHYS_TO_K1(SP_DMA_BUSY_REG) -wait4dma: - lw v0, (a0) - bnez v0, wait4dma - li a1, SP_CLR_INTR_BREAK | SP_SET_HALT - li a0, PHYS_TO_K1(SP_STATUS_REG) - sw a1, (a0) - -/* wait for the rsp to stop */ -awaitIdle: - li a0, PHYS_TO_K1(SP_STATUS_REG) - lw v0, (a0) - and v0, (SP_STATUS_HALT | SP_STATUS_BROKE) - beqz v0, awaitIdle - jr ra -END(__rmonIdleRCP) - -/* run the rsp in single-step mode to step one instruction */ -LEAF(__rmonStepRCP) - li a0, PHYS_TO_K1(SP_STATUS_REG) - li a1, (SP_CLR_INTR_BREAK | SP_SET_SSTEP | SP_CLR_BROKE | SP_CLR_HALT) - sw a1, (a0) - b awaitIdle -END(__rmonStepRCP) - -/* run the rsp normally */ -LEAF(__rmonRunRCP) - li a0, PHYS_TO_K1(MI_INTR_MASK_REG) - li a1, MI_INTR_MASK_SET_SP - sw a1, (a0) - li a0, PHYS_TO_K1(SP_STATUS_REG) - li a1, (SP_SET_INTR_BREAK | SP_CLR_SSTEP | SP_CLR_BROKE | SP_CLR_HALT) - sw a1, (a0) - jr ra -END(__rmonRunRCP) - -#endif diff --git a/src/rmon/rmonregs.c b/src/rmon/rmonregs.c deleted file mode 100644 index fcb39b3..0000000 --- a/src/rmon/rmonregs.c +++ /dev/null @@ -1,403 +0,0 @@ -#ifndef _FINALROM - -#include "PRinternal/dbgproto.h" -#include "PR/os_internal.h" -#include "PR/rcp.h" -#include "PR/sptask.h" -#include "PRinternal/rmonint.h" -#include "PR/rdb.h" -#include "PR/os_version.h" - -#include "PRinternal/macros.h" - -// TODO: these come from headers -#ident "$Revision: 1.4 $" -// This revision was bumped down at K for some reason -#ident "$Revision: 3.70 $" -#ident "$Revision: 1.5 $" -#ident "$Revision: 1.2 $" -#ident "$Revision: 1.4 $" - -static u32 RCPpc; -static u32 oldIMEMvalue; -static u32 DMEMbuffer[4] ALIGNED(0x8); - -typedef union { - u32 everything; - struct { - int opcode : 6; - int base : 5; - int rt : 5; - int offset : 16; - } scalarop; - struct { - int opcode : 6; - int base : 5; - int rt : 5; - int size : 5; - int element : 4; - int offset : 7; - } vectorop; -} INSTRUCTION; - -static void LoadStoreSU(int opcode, int regno) { - INSTRUCTION inst; - - /* Prepare a scalar load or store instruction at DMEM address 0 */ - inst.everything = 0; - inst.scalarop.opcode = opcode; - inst.scalarop.rt = regno; - __rmonWriteWordTo((u32*)SP_IMEM_START, inst.everything); - __rmonWriteWordTo((u32*)SP_PC_REG, 0); -} - -static void LoadStoreVU(int opcode, int regno) { - INSTRUCTION inst; - - /* Prepare a vector 128-bit load or store instruction at DMEM address 0 */ - inst.everything = 0; - inst.vectorop.opcode = opcode; - inst.vectorop.rt = regno; - inst.vectorop.size = 4; /* LQV / SQV */ - __rmonWriteWordTo((u32*)SP_IMEM_START, inst.everything); - __rmonWriteWordTo((u32*)SP_PC_REG, 0); -} - -static void SetUpForRCPop(int isVector) { - /* Save RSP data that would be overwritten when reading or writing registers */ - RCPpc = __rmonReadWordAt((u32*)SP_PC_REG); - oldIMEMvalue = __rmonReadWordAt((u32*)SP_IMEM_START); - DMEMbuffer[0] = __rmonReadWordAt((u32*)SP_DMEM_START); - if (isVector) { - DMEMbuffer[1] = __rmonReadWordAt((u32*)(SP_DMEM_START + 0x4)); - DMEMbuffer[2] = __rmonReadWordAt((u32*)(SP_DMEM_START + 0x8)); - DMEMbuffer[3] = __rmonReadWordAt((u32*)(SP_DMEM_START + 0xC)); - } -} - -static void CleanupFromRCPop(int isVector) { - /* Restore RSP data that was saved to read or write registers */ - __rmonWriteWordTo((u32*)SP_DMEM_START, DMEMbuffer[0]); - if (isVector) { - __rmonWriteWordTo((u32*)(SP_DMEM_START + 0x4), DMEMbuffer[1]); - __rmonWriteWordTo((u32*)(SP_DMEM_START + 0x8), DMEMbuffer[2]); - /* BUG: the last word is not restored properly */ - __rmonWriteWordTo((u32*)(SP_DMEM_START + 0xC), DMEMbuffer[2]); - } - __rmonWriteWordTo((u32*)SP_IMEM_START, oldIMEMvalue); - __rmonWriteWordTo((u32*)SP_PC_REG, RCPpc); -} - -int __rmonGetGRegisters(KKHeader* req) { - register KKObjectRequest* request = (KKObjectRequest*)req; - KKGregEvent reply; - - STUBBED_PRINTF(("GetGRegisters\n")); - - reply.tid = request->object; - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - - if (request->header.method == RMON_CPU) { - OSThread* tptr = __rmonGetTCB(request->object); - u64* tcbregptr; - register s32 i; - - if (tptr == NULL) { - return TV_ERROR_INVALID_ID; - } - - for (i = GREG_IDX_AT, tcbregptr = &tptr->context.at; i < GREG_IDX_K0; i++, tcbregptr++) { - reply.registers.gregs[i] = *tcbregptr; - } - for (i = GREG_IDX_GP, tcbregptr = &tptr->context.gp; i < GREG_IDX_CAUSE; i++, tcbregptr++) { - reply.registers.gregs[i] = *tcbregptr; - } - - reply.registers.gregs[GREG_IDX_CAUSE] = tptr->context.cause; - reply.registers.gregs[GREG_IDX_PC] = tptr->context.pc; - reply.registers.gregs[GREG_IDX_SR] = tptr->context.sr; - reply.registers.gregs[GREG_IDX_ZERO] = 0; - } else { - return TV_ERROR_INVALID_ID; - } - - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -int __rmonSetGRegisters(KKHeader* req) { - register KKGRegsetRequest* request = (KKGRegsetRequest*)req; - KKObjectEvent reply; - - STUBBED_PRINTF(("SetGRegisters\n")); - - if (request->header.method == RMON_CPU) { - OSThread* tptr = __rmonGetTCB(request->tid); - u64* tcbregptr; - register int i; - - if (tptr == NULL) { - return TV_ERROR_INVALID_ID; - } - - for (i = GREG_IDX_AT, tcbregptr = &tptr->context.at; i < GREG_IDX_K0; i++, tcbregptr++) { - *tcbregptr = (s32)request->registers.gregs[i]; - } - - for (i = GREG_IDX_GP, tcbregptr = &tptr->context.gp; i < GREG_IDX_CAUSE; i++, tcbregptr++) { - *tcbregptr = (s32)request->registers.gregs[i]; - } - - tptr->context.cause = request->registers.gregs[GREG_IDX_CAUSE]; - tptr->context.pc = request->registers.gregs[GREG_IDX_PC]; - tptr->context.sr = request->registers.gregs[GREG_IDX_SR]; - } else { - return TV_ERROR_INVALID_ID; - } - - reply.object = request->tid; - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -int __rmonGetFRegisters(KKHeader* req) { - register KKObjectRequest* request = (KKObjectRequest*)req; - KKFPregEvent reply; - OSThread* tptr; - volatile float f UNUSED; - - STUBBED_PRINTF(("GetFRegisters\n")); - - if (req->method != RMON_CPU) { - return TV_ERROR_INVALID_ID; - } - - /* touch fpu to ensure registers are saved to the context structure */ - f = 0.0f; - - tptr = __rmonGetTCB(request->object); - if (tptr == NULL) { - return TV_ERROR_INVALID_ID; - } - - __rmonCopyWords((u32*)reply.registers.fpregs.regs, (u32*)&tptr->context.fp0, ARRLEN(reply.registers.fpregs.regs)); - - reply.registers.fpcsr = tptr->context.fpcsr; - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - reply.tid = request->object; - - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -int __rmonSetFRegisters(KKHeader* req) { - register KKFPRegsetRequest* request = (KKFPRegsetRequest*)req; - KKObjectEvent reply; - OSThread* tptr; - volatile float f UNUSED; - - STUBBED_PRINTF(("SetFRegisters\n")); - - if (req->method != RMON_CPU) { - return TV_ERROR_INVALID_ID; - } - - /* touch fpu to ensure registers are saved to the context structure */ - f = 0.0f; - - tptr = __rmonGetTCB(request->tid); - if (tptr == NULL) { - return TV_ERROR_INVALID_ID; - } - - __rmonCopyWords((u32*)&tptr->context.fp0, (u32*)request->registers.fpregs.regs, - ARRLEN(request->registers.fpregs.regs)); - tptr->context.fpcsr = request->registers.fpcsr; - - reply.object = request->tid; - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -static u32 rmonGetRcpRegister(int regNumber) { - u32 contents; - - if (__rmonRCPrunning()) { - return 0; - } - - SetUpForRCPop(FALSE); - LoadStoreSU(MIPS_SW_OPCODE, regNumber); - __rmonStepRCP(); - contents = __rmonReadWordAt((u32*)SP_DMEM_START); - CleanupFromRCPop(FALSE); - - return contents; -} - -int __rmonGetSRegs(KKHeader* req) { - register KKObjectRequest* request = (KKObjectRequest*)req; - KKCpSregEvent reply; - register int i; - - STUBBED_PRINTF(("GetSRegisters\n")); - - if (__rmonRCPrunning()) { - return TV_ERROR_OPERATIONS_PROTECTED; - } - - reply.tid = request->object; - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - - SetUpForRCPop(FALSE); - for (i = SREG_IDX_ZERO; i <= SREG_IDX_RA; i++) { - LoadStoreSU(MIPS_SW_OPCODE, i); - __rmonStepRCP(); - reply.registers.sregs[i] = __rmonReadWordAt((u32*)SP_DMEM_START); - } - CleanupFromRCPop(FALSE); - - reply.registers.sregs[SREG_IDX_DRAM_ADDR] = __rmonReadWordAt((u32*)SP_DRAM_ADDR_REG); - reply.registers.sregs[SREG_IDX_MEM_ADDR] = __rmonReadWordAt((u32*)SP_MEM_ADDR_REG); - reply.registers.sregs[SREG_IDX_RD_LEN] = __rmonReadWordAt((u32*)SP_RD_LEN_REG); - reply.registers.sregs[SREG_IDX_PC] = __rmonReadWordAt((u32*)SP_PC_REG) + SP_IMEM_START; - reply.registers.sregs[SREG_IDX_WR_LEN] = __rmonReadWordAt((u32*)SP_WR_LEN_REG); - reply.registers.sregs[SREG_IDX_STATUS] = __rmonReadWordAt((u32*)SP_STATUS_REG); - reply.registers.sregs[SREG_IDX_DMA_FULL] = __rmonReadWordAt((u32*)SP_DMA_FULL_REG); - reply.registers.sregs[SREG_IDX_DMA_BUSY] = __rmonReadWordAt((u32*)SP_DMA_BUSY_REG); - - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -int __rmonSetSRegs(KKHeader* req) { - register KKCpScalarRegsetRequest* request = (KKCpScalarRegsetRequest*)req; - KKObjectEvent reply; - register int i; - - STUBBED_PRINTF(("SetSRegisters\n")); - - if (__rmonRCPrunning()) { - return TV_ERROR_OPERATIONS_PROTECTED; - } - - SetUpForRCPop(FALSE); - for (i = SREG_IDX_ZERO; i <= SREG_IDX_RA; i++) { - __rmonWriteWordTo((u32*)SP_DMEM_START, request->registers.sregs[i]); - LoadStoreSU(MIPS_LW_OPCODE, i); - __rmonStepRCP(); - } - CleanupFromRCPop(FALSE); - - __rmonWriteWordTo((u32*)SP_DRAM_ADDR_REG, request->registers.sregs[SREG_IDX_DRAM_ADDR]); - __rmonWriteWordTo((u32*)SP_MEM_ADDR_REG, request->registers.sregs[SREG_IDX_MEM_ADDR]); - __rmonWriteWordTo((u32*)SP_PC_REG, request->registers.sregs[SREG_IDX_PC] & 0xFFF); - __rmonWriteWordTo((u32*)SP_WR_LEN_REG, request->registers.sregs[SREG_IDX_WR_LEN]); - __rmonWriteWordTo((u32*)SP_STATUS_REG, request->registers.sregs[SREG_IDX_STATUS]); - - reply.object = request->tid; - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -int __rmonGetVRegs(KKHeader* req) { - char* cPtr; - int sent; - int dataSize; - register KKObjectRequest* request = (KKObjectRequest*)req; - KKCpVregEvent reply; - register int i; - - STUBBED_PRINTF(("GetVRegisters\n")); - - if (__rmonRCPrunning()) { - return TV_ERROR_OPERATIONS_PROTECTED; - } - - reply.tid = request->object; - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - reply.header.length = sizeof(reply); - - dataSize = sizeof(reply); - cPtr = (char*)&dataSize; - sent = 0; - while (sent < (signed)sizeof(dataSize)) { - sent += __osRdbSend(cPtr + sent, sizeof(dataSize) - sent, RDB_TYPE_GtoH_DEBUG); - } - - __rmonSendHeader(&reply.header, VREG_SIZE, KK_TYPE_REPLY); - - SetUpForRCPop(TRUE); - for (i = 0; i < VREG_NUM; i++) { - LoadStoreVU(MIPS_SWC2_OPCODE, i); - __rmonStepRCP(); - __rmonSendData((void*)SP_DMEM_START, VREG_SIZE); - } - CleanupFromRCPop(TRUE); - - return TV_ERROR_NO_ERROR; -} - -int __rmonSetVRegs(KKHeader* req) { - register KKCpVectorRegsetRequest* request = (KKCpVectorRegsetRequest*)req; - KKObjectEvent reply; - register int i; - - STUBBED_PRINTF(("SetVRegs\n")); - - if (__rmonRCPrunning()) { - return TV_ERROR_OPERATIONS_PROTECTED; - } - - SetUpForRCPop(TRUE); - for (i = 0; i < VREG_NUM; i++) { - __rmonCopyWords((u32*)SP_DMEM_START, (u32*)&request->registers.vregs[i], VREG_SIZE / sizeof(u32)); - LoadStoreVU(MIPS_LWC2_OPCODE, i); - __rmonStepRCP(); - } - CleanupFromRCPop(TRUE); - - reply.object = request->tid; - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -u32 __rmonGetRegisterContents(int method, int threadNumber, int regNumber) { - if (method == RMON_CPU) { - /* CPU register */ - u32* regPointer; - OSThread* tptr; - - if (regNumber >= GREG_IDX_AT && regNumber < GREG_IDX_K0) { - regNumber -= GREG_IDX_AT - GREG_IDX_ZERO; - } else if (regNumber >= GREG_IDX_GP && regNumber < GREG_IDX_LO) { - regNumber -= GREG_IDX_GP - GREG_IDX_T9; - } else { - return 0; - } - tptr = __rmonGetTCB(threadNumber); - if (tptr == NULL) { - return 0; - } - regPointer = (u32*)&tptr->context; - regPointer += regNumber; - return *regPointer; - } else { - /* RSP register */ - return rmonGetRcpRegister(regNumber); - } -} - -#endif diff --git a/src/rmon/rmonsio.c b/src/rmon/rmonsio.c deleted file mode 100644 index b539a53..0000000 --- a/src/rmon/rmonsio.c +++ /dev/null @@ -1,79 +0,0 @@ -#include "PR/os_version.h" - -#ifndef _FINALROM - -#include "PR/os_internal.h" -#include "PR/ultraerror.h" -#include "PR/ultralog.h" -#include "PR/sptask.h" -#include "PRinternal/dbgproto.h" -#include "PRinternal/rmonint.h" -#include "PR/ramrom.h" -#include "PR/rdb.h" -#include "PR/rmon.h" - -#include "PRinternal/macros.h" - -// TODO: this comes from a header -#ident "$Revision: 1.4 $" - -static OSMesgQueue IOmq ALIGNED(0x8); -static OSMesg IOmsgs; - -void* __osRdb_DbgRead_Buf; -u8 rmonRdbReadBuf[RMON_DBG_BUF_SIZE] ALIGNED(0x10); - -void __rmonSendFault(OSThread* thread) { - volatile float f UNUSED; - u8* tPtr; - u32 sent = 0; - - /* touch fpu to ensure registers are saved to the context structure */ - f = 0.0f; - - tPtr = (u8*)thread; - while (sent < sizeof(OSThread)) { - sent += __osRdbSend(tPtr + sent, sizeof(OSThread) - sent, RDB_TYPE_GtoH_FAULT); - } -} - -void __rmonIOflush(void) { - int sent = 0; - char tstr[4]; - - while (sent <= 0) { - sent += __osRdbSend(tstr, 1, RDB_TYPE_GtoH_DEBUG_DONE); - } -} - -void __rmonIOputw(u32 word) { - int sent = 0; - char* cPtr = (char*)&word; - - while (sent < 4) { - sent += __osRdbSend(cPtr + sent, sizeof(word) - sent, RDB_TYPE_GtoH_DEBUG); - } -} - -void __rmonIOhandler(void) { - int sent; - char tstr[4]; - - osCreateMesgQueue(&IOmq, &IOmsgs, 1); - osSetEventMesg(OS_EVENT_RDB_DBG_DONE, &IOmq, NULL); - __osRdb_DbgRead_Buf = rmonRdbReadBuf; - - while (TRUE) { - osRecvMesg(&IOmq, NULL, OS_MESG_BLOCK); - - __rmonExecute((KKHeader*)&rmonRdbReadBuf); - __osRdb_DbgRead_Buf = rmonRdbReadBuf; - - sent = 0; - while (sent <= 0) { - sent += __osRdbSend(tstr, 1, RDB_TYPE_GtoH_DEBUG_READY); - } - } -} - -#endif diff --git a/src/rmon/rmontask.c b/src/rmon/rmontask.c deleted file mode 100644 index 1ff026e..0000000 --- a/src/rmon/rmontask.c +++ /dev/null @@ -1,337 +0,0 @@ -#ifndef _FINALROM - -#include "PRinternal/dbgproto.h" -#include "PR/os_internal.h" -#include "PRinternal/rmonint.h" -#include "PR/rcp.h" -#include "PR/sptask.h" - -#include "PRinternal/macros.h" - -// TODO: this comes from a header -#ident "$Revision: 1.4 $" - -void __rmonMaskIdleThreadInts(void) { - register OSThread* tptr = __osGetActiveQueue(); - - while (tptr->priority != -1) { - if (tptr->priority == OS_PRIORITY_IDLE) { - tptr->context.sr &= ~OS_IM_CPU; - tptr->context.sr |= (OS_IM_RDBREAD | OS_IM_RDBWRITE | OS_IM_CART); - break; - } - tptr = tptr->tlnext; - } -} - -OSThread* __rmonGetTCB(int threadNumber) { - register OSThread* tptr = __osGetActiveQueue(); - - if (threadNumber < 1) { - return NULL; - } - - while (tptr->priority != -1) { - if (tptr->id == threadNumber) { - return tptr; - } - tptr = tptr->tlnext; - } - - return NULL; -} - -int __rmonStopUserThreads(int whichThread) { - register int whichOne = 0; - register OSThread* tptr = __osGetActiveQueue(); - - STUBBED_PRINTF(("StopThreads %d\n", whichThread)); - - if (whichThread != 0) { - /* Stop specified thread */ - - while (tptr->priority != -1) { - if (tptr->id == whichThread) { - break; - } - tptr = tptr->tlnext; - } - - if (tptr->priority == -1) { - return 0; - } - - if (tptr->priority > OS_PRIORITY_IDLE && tptr->priority <= OS_PRIORITY_APPMAX) { - osStopThread(tptr); - if (tptr->state != OS_STATE_STOPPED) { - STUBBED_PRINTF(("Couldn't stop thread %d\n", tptr->id)); - } - whichOne = whichThread; - } - } else { - /* Stop all threads */ - - while (tptr->priority != -1) { - if (tptr->priority > OS_PRIORITY_IDLE && tptr->priority <= OS_PRIORITY_APPMAX) { - osStopThread(tptr); - if (tptr->state != OS_STATE_STOPPED) { - STUBBED_PRINTF(("Couldn\'t stop thread %d\n", tptr->id)); - } - whichOne = -1; - } - tptr = tptr->tlnext; - } - } - return whichOne; -} - -int __rmonListThreads(KKHeader* req) { - register KKObjectRequest* request = (KKObjectRequest*)req; - KKObjsEvent* reply = (KKObjsEvent*)__rmonUtilityBuffer; - - STUBBED_PRINTF(("ListThreads\n")); - - reply->object = (request->object == -1) ? RMON_PID_CPU : request->object; - - if (req->method == RMON_RSP) { - reply->objs.number = 1; - reply->objs.objects[0] = RMON_TID_RSP; - } else { - register OSThread* tptr = __osGetActiveQueue(); - - reply->objs.number = 0; - - while (tptr->priority != -1) { - if (tptr->id != 0) { - reply->objs.objects[reply->objs.number] = tptr->id; - reply->objs.number++; - } - tptr = tptr->tlnext; - } - } - reply->header.code = request->header.code; - reply->header.error = TV_ERROR_NO_ERROR; - __rmonSendReply(&reply->header, sizeof(*reply) + sizeof(reply->objs.objects[0]) * (reply->objs.number - 1), - KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -int __rmonGetThreadStatus(int method, int id, KKStatusEvent* reply) { - u32 inst; - - STUBBED_PRINTF(("ThreadStatus %d method %d\n", id, method)); - - reply->status.tid = id; - reply->status.pid = (method == RMON_RSP) ? RMON_PID_RSP : RMON_PID_CPU; - reply->status.why = 1; - reply->status.what = 0; - reply->status.info.major = 0; - reply->status.info.minor = 0; - reply->status.rv = 0; - - if (method == RMON_RSP) { - reply->status.start = SP_IMEM_START; - reply->status.priority = RMON_PRI_RSP; - - if (__rmonRCPrunning()) { - reply->status.flags = OS_STATE_RUNNING; - /* Cannot read RSP PC or current instruction while the RSP is running */ - reply->status.info.addr = 0; - reply->status.instr = 0; - } else { - reply->status.flags = OS_STATE_STOPPED; - reply->status.info.addr = __rmonReadWordAt((u32*)SP_PC_REG) + SP_IMEM_START; - inst = __rmonReadWordAt((u32*)reply->status.info.addr); - if ((inst & MIPS_BREAK_MASK) == MIPS_BREAK_OPCODE) { - inst = MIPS_BREAK_OPCODE; - } - if (__rmonRcpAtBreak) { - /* Report RSP break */ - reply->status.why = 2; - reply->status.info.major = 2; - reply->status.info.minor = 4; - } - reply->status.instr = inst; - } - } else { - OSThread* tptr = __osGetActiveQueue(); - - while (tptr->priority != -1) { - if (tptr->id == id) { - break; - } - tptr = tptr->tlnext; - } - if (tptr->priority == -1) { - return TV_ERROR_INVALID_ID; - } - - reply->status.priority = tptr->priority; - reply->status.flags = (tptr->state != 0) ? tptr->state : OS_STATE_STOPPED; - reply->status.info.addr = tptr->context.pc; - - inst = *(u32*)(tptr->context.pc); - if ((inst & MIPS_BREAK_MASK) == MIPS_BREAK_OPCODE) { - inst = MIPS_BREAK_OPCODE; - } - - reply->status.instr = inst; - reply->status.start = (int)tptr; - - if (tptr->flags & OS_FLAG_CPU_BREAK) { - /* Report break */ - reply->status.why = 2; - reply->status.info.major = 2; - reply->status.info.minor = 4; - } else if (tptr->flags & OS_FLAG_FAULT) { - /* Report fault */ - reply->status.why = 2; - reply->status.info.major = 1; - reply->status.info.minor = 2; - } - } - - return TV_ERROR_NO_ERROR; -} - -int __rmonThreadStatus(KKHeader* req) { - KKObjectRequest* request = (KKObjectRequest*)req; - KKStatusEvent reply; - - if (__rmonGetThreadStatus(req->method, request->object, &reply) != TV_ERROR_NO_ERROR) { - return TV_ERROR_INVALID_ID; - } - - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - return TV_ERROR_NO_ERROR; -} - -int __rmonStopThread(KKHeader* req) { - KKObjectRequest* request = (KKObjectRequest*)req; - KKStatusEvent reply; - u32* pc; - - STUBBED_PRINTF(("StopThread %d\n", request->object)); - - switch (req->method) { - case RMON_CPU: - __rmonStopUserThreads(request->object); - break; - case RMON_RSP: - if (__rmonRCPrunning()) { - /* Stop the rsp */ - __rmonIdleRCP(); - pc = (u32*)__rmonReadWordAt((u32*)SP_PC_REG); - if (pc == NULL) { - break; - } - pc--; - /* Check if the RSP is stopped in a branch delay slot, if it is step out of it. The RSP - would otherwise lose information about whether the branch should or should not be - taken when reading registers. */ - if (__rmonGetBranchTarget(RMON_RSP, RMON_TID_RSP, (void*)((u32)pc + SP_IMEM_START)) % 4 == 0) { - __rmonStepRCP(); - } - } - break; - default: - return TV_ERROR_OPERATIONS_PROTECTED; - } - - if (__rmonGetThreadStatus(req->method, request->object, &reply) != TV_ERROR_NO_ERROR) { - return TV_ERROR_INVALID_ID; - } - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - if (reply.status.flags == OS_STATE_STOPPED) { - reply.header.code = KK_CODE_THREAD_STATUS; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_EXCEPTION); - } - return TV_ERROR_NO_ERROR; -} - -int __rmonRunThread(KKHeader* req) { - KKRunThreadRequest* request = (KKRunThreadRequest*)req; - KKObjectEvent reply; - KKStatusEvent exceptionReply; - register OSThread* tptr; - register int runNeeded = FALSE; - - STUBBED_PRINTF(("RunThread %d\n", request->tid)); - - switch (req->method) { - case RMON_CPU: - tptr = __osGetActiveQueue(); - while (tptr->priority != -1) { - if (tptr->id == request->tid) { - break; - } - tptr = tptr->tlnext; - } - - if (tptr->priority == -1) { - return TV_ERROR_INVALID_ID; - } - if (tptr->state != OS_STATE_STOPPED) { - return TV_ERROR_OPERATIONS_PROTECTED; - } - tptr->flags &= ~(OS_FLAG_CPU_BREAK | OS_FLAG_FAULT); - if (request->actions.flags & KK_RUN_SETPC) { - tptr->context.pc = request->actions.vaddr; - } - if ((request->actions.flags & KK_RUN_SSTEP) && !__rmonSetSingleStep(request->tid, (u32*)tptr->context.pc)) { - return TV_ERROR_OPERATIONS_PROTECTED; - } - runNeeded = TRUE; - break; - case RMON_RSP: - if (__rmonRCPrunning()) { - return TV_ERROR_OPERATIONS_PROTECTED; - } - if (request->actions.flags & KK_RUN_SETPC) { - __rmonWriteWordTo((u32*)SP_PC_REG, request->actions.vaddr - SP_IMEM_START); - } - if (request->actions.flags & KK_RUN_SSTEP) { - /* If the RSP is stopped at a branch step twice so as to not stop in a branch delay - * slot. */ - if (__rmonGetBranchTarget(RMON_RSP, RMON_TID_RSP, - (void*)(__rmonReadWordAt((u32*)SP_PC_REG) + SP_IMEM_START)) - % 4 - == 0) { - __rmonStepRCP(); - } - __rmonStepRCP(); - __rmonRcpAtBreak = TRUE; - } else { - __rmonRcpAtBreak = FALSE; - __rmonRunRCP(); - } - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - reply.object = request->tid; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - if (request->actions.flags & KK_RUN_SSTEP) { - __rmonGetThreadStatus(RMON_RSP, RMON_TID_RSP, &exceptionReply); - __rmonGetExceptionStatus(&exceptionReply); - __rmonSendReply(&exceptionReply.header, sizeof(exceptionReply), KK_TYPE_EXCEPTION); - } - return TV_ERROR_NO_ERROR; - default: - return TV_ERROR_OPERATIONS_PROTECTED; - } - - reply.header.code = request->header.code; - reply.header.error = TV_ERROR_NO_ERROR; - reply.object = request->tid; - __rmonSendReply(&reply.header, sizeof(reply), KK_TYPE_REPLY); - - if (runNeeded) { - osStartThread(tptr); - } - return 1; -} - -#endif diff --git a/tools/ar.py b/tools/ar.py deleted file mode 100755 index 0f3e574..0000000 --- a/tools/ar.py +++ /dev/null @@ -1,476 +0,0 @@ -#!/usr/bin/env python3 -# -# ar -# - -from genericpath import isfile -import os, struct, time -from dataclasses import dataclass -from libelf import ElfFile, SB_GLOBAL, SHN_UND - -class Archive: - @dataclass - class ArchiveFileRecord: - """ - AR file headers + data - - Offset Length Name Format - 0 16 File identifier ASCII - 16 12 File modification timestamp (in seconds) Decimal - 28 6 Owner ID Decimal - 34 6 Group ID Decimal - 40 8 File mode (type and permission) Octal - 48 10 File size in bytes Decimal - 58 2 Ending characters 0x60 0x0A - """ - name : str - time : int - uid : int - gid : int - mode : int - size : int - data : bytes - - def __init__(self): - self.files = [] # List[ArchiveFileRecord] - self.armap_entries = None - self.time = int(time.time()) - - def add_data(self, name, time, uid, gid, mode, size, data): - self.files.append(Archive.ArchiveFileRecord(name, time, uid, gid, mode, size, data)) - - def add_file(self, file_path): - if not os.path.isfile(file_path): - print(f"Error: No file named {file_path}") - return - - st = os.stat(file_path) - name = os.path.basename(file_path) - time = int(st.st_mtime) - uid = st.st_uid - gid = st.st_gid - mode = st.st_mode - size = st.st_size - - data = None - with open(file_path, "rb") as infile: - data = bytes(infile.read()) - - self.add_data(name, time, uid, gid, mode, size, data) - - def add_ar(self, file_path): - for file in Archive.from_file(file_path).files: - self.add_data(file) - - def build_image(self): - def add_bin(ba, bin): - for b in bin: - ba.append(b) - - def add_str(ba, s, pad_to_len=-1): - if pad_to_len != -1: - s = f"{s:{pad_to_len}}" - s = s.encode("ASCII") - for c in s: - ba.append(c) - - def add_pad(ba): - if len(ba) % 2 != 0: - ba.append(0) - - def add_ar_hdr(ba, name, time, uid, gid, mode, length): - add_str(ba, name, 16) - add_str(ba, str(time), 12) - add_str(ba, str(uid), 6) - add_str(ba, str(gid), 6) - add_str(ba, oct(mode)[2:], 8) - add_str(ba, str(length), 10) - add_str(ba, "`\n") - - b = bytearray() - - # MAGIC - - add_str(b, "!\n") - - # ARMAP - - armap_data= bytearray() - - armap_entries_files = [] - - num_entries = 0 - armap_size = 4 - armap_string_data = bytearray() - for i,file in enumerate(self.files): - elf = ElfFile(file.data) - if elf.symtab is not None: - for sym in elf.symtab.symbol_entries: - if sym.st_shndx != SHN_UND and sym.bind == SB_GLOBAL: - num_entries += 1 - armap_size += 4 + len(sym.name) + 1 - armap_string_data.extend(sym.name.encode("latin1") + b'\0') - armap_entries_files.append(i) - - armap_data.extend(struct.pack(">I", num_entries)) - armap_data.extend([0] * 4 * num_entries) # defer writing file positions until files are emplaced later - armap_data.extend(armap_string_data) - - if len(armap_data) % 4 != 0: - alsiz = (len(armap_data) + 3) & ~3 - armap_data.extend([0] * (alsiz - len(armap_data))) - - current_time = int(time.time()) - - add_ar_hdr(b, "/", current_time, 0, 0, 0, len(armap_data)) - armap_offsets_start = len(b) + 4 - add_bin(b, armap_data) - add_pad(b) - - # LONG STRINGS - - long_strings = "" - - file_names = [] - flag = False - for _,file in enumerate(self.files): - if len(file.name) >= 16: - fname = f"{file.name}/\n" - ind = len(long_strings) - long_strings += fname - else: - fname = f"{file.name}/" - ind = None - file_names.append((fname, ind)) - - # Weird hack - if len(long_strings) != 0 and not flag: - flag = True - long_strings += "/\n" - - long_strings += "/" - - add_ar_hdr(b, "//", current_time, 0, 0, 0, len(long_strings)) - add_str(b, long_strings) - add_pad(b) - - # FILES - - armap_pos = 0 - for i,(file,(fname,ind)) in enumerate(zip(self.files, file_names)): - file_pos = len(b) - add_ar_hdr(b, f"/{ind}" if ind is not None else fname, file.time, file.uid, file.gid, file.mode, file.size) - add_bin(b, file.data) - add_pad(b) - - # Patch the armap with file locations - while armap_pos < len(armap_entries_files) and armap_entries_files[armap_pos] == i: - b[armap_offsets_start+armap_pos*4:armap_offsets_start+armap_pos*4+4] = struct.pack(">I", file_pos) - armap_pos += 1 - - return b - - def write(self, file_path): - ar = self.build_image() - with open(file_path, "wb") as outfile: - outfile.write(ar) - - @staticmethod - def from_image(ar_data): - long_strings = None - ar = Archive() - - assert ar_data[:8].decode("ASCII") == "!\n" , "Not an archive file? Bad file magic value" - - i = 8 - while i < len(ar_data): - file_name = ar_data[i:][ 0:][:16].decode("ASCII").strip() - file_time = int(ar_data[i:][16:][:12].decode("ASCII").strip()) - file_uid = int(ar_data[i:][28:][: 6].decode("ASCII").strip()) - file_gid = int(ar_data[i:][34:][: 6].decode("ASCII").strip()) - file_mode = int(ar_data[i:][40:][: 8].decode("ASCII").strip(), 8) - file_size = int(ar_data[i:][48:][:10].decode("ASCII").strip()) - end = ar_data[i:][58:][:2].decode("ASCII") - assert end == "`\n" - - data = ar_data[i:][60:][:file_size] - assert len(data) == file_size - - if file_name == '/': - """ - "armap" - The special filename "/" denotes that this entry contains a symbol lookup table used by some libraries - to speed up file access. - The symbol table is comprised of three contiguous parts: - - A 32-bit Big Endian integer recording the number of symbol entries. - - A list of 32-bit Big Endian integers for each symbol entry, recording the position within the - archive of the header of the file containing the symbol. - - A list of null-terminated strings, the symbol names for each symbol entry. - - We rebuild this from scratch on write out. - """ - ar.time = file_time - assert file_uid == 0 - assert file_gid == 0 - assert file_mode == 0 - - # Code to interpret the armap, currently unused - """ - armap_n_syms = struct.unpack(">I", data[0:4])[0] - offsets = [i[0] for i in struct.iter_unpack(">I", data[4:4+4*armap_n_syms])] - - strings = [] - ofs = 4 + 4 * armap_n_syms - for _ in range(armap_n_syms): - to = data.find(b'\0', ofs) - assert to != -1 - string = data[ofs:to].decode('latin1') - strings.append(string) - ofs += len(string) + 1 - assert all([b == 0 for b in data[ofs:]]) - assert len(strings) == len(offsets) - - ar.armap_entries = list(zip(offsets, strings)) - """ - elif file_name == '//': - """ - Long string table. Strings larger than 16 are placed here and referenced from the header by /. - - We rebuild this from scratch on write out. - """ - assert file_time == ar.time - assert file_uid == 0 - assert file_gid == 0 - assert file_mode == 0 - long_strings = data.decode("ASCII") - else: - """ - Normal files. - """ - if file_name.startswith("/"): - assert long_strings is not None - # Fetch the name from the long string table - file_name = long_strings[int(file_name[1:]):].split("\n")[0] - # Add file - ar.add_data(file_name[:-1], file_time, file_uid, file_gid, file_mode, file_size, data) - - if file_size % 2 != 0: - file_size += 1 - i += 60 + file_size - - return ar - - @staticmethod - def from_file(file_path): - ar_file = None - with open(file_path, "rb") as infile: - ar_file = infile.read() - - return Archive.from_image(ar_file) - -def ar_usage(progname): - print(f"Usage: {progname} [-]{{dmpqrstx}}[abcDfilMNoOPsSTuvV] [member-name] [count] archive-file file...") - print(f" commands:") - print(f" d - delete file(s) from the archive") - print(f" m[ab] - move file(s) in the archive") - print(f" p - print file(s) found in the archive") - print(f" q[f] - quick append file(s) to the archive") - print(f" r[ab][f][u] - replace existing or insert new file(s) into the archive") - print(f" s - act as ranlib") - print(f" t[O][v] - display contents of the archive") - print(f" x[o] - extract file(s) from the archive") - print(f" command specific modifiers:") - print(f" [a] - put file(s) after [member-name]") - print(f" [b] - put file(s) before [member-name] (same as [i])") - print(f" [D] - use zero for timestamps and uids/gids (default)") - print(f" [U] - use actual timestamps and uids/gids") - print(f" [N] - use instance [count] of name") - print(f" [f] - truncate inserted file names") - print(f" [P] - use full path names when matching") - print(f" [o] - preserve original dates") - print(f" [O] - display offsets of files in the archive") - print(f" [u] - only replace files that are newer than current archive contents") - print(f" generic modifiers:") - print(f" [c] - do not warn if the library had to be created") - print(f" [s] - create an archive index (cf. ranlib)") - print(f" [S] - do not build a symbol table") - print(f" [v] - be verbose") - print(f" [V] - display the version number") - print(f" @ - read options from ") - print(f" --output=DIRNAME - specify the output directory for extraction operations") - return 1 - -def ar(argv): - if len(argv) < 2: - return ar_usage(argv[0]) - - progname = argv[0] - create_ok = False - make_ar_idx = False - no_symtab = False - verbose = False - - def verbose_print(msg): - if verbose: - print(msg) - - def dcmd(modifiers, args): - if modifiers != "": - print(f"{progname}: bad modifiers -- '{modifiers}'") - return ar_usage(progname) - - ar_file = args[0] - o_files = args[1:] - - ar = Archive.from_file(ar_file) - for file in ar.files: - if file.name in o_files: - ar.files.remove(file) - ar.write(ar_file) - return 0 - - def mcmd(modifiers, args): - print("") - return 1 - - def pcmd(modifiers, args): - if modifiers != "": - print(f"{progname}: bad modifiers -- '{modifiers}'") - return ar_usage(progname) - if len(args) != 1: - print(f"{progname} p: bad args") - return ar_usage(progname) - - ar_file = args[0] - - ar = Archive.from_file(ar_file) - for file in ar.files: - print(file.data) - return 0 - - def qcmd(modifiers, args): - print("") - return 1 - - def rcmd(modifiers, args): - if modifiers !="": - print("") - if len(args) < 2: - print(f"{progname} r: bad args") - return ar_usage(progname) - - ar_file = args[0] - o_files = args[1:] - - ar = Archive() - if os.path.isfile(ar_file): - ar = Archive.from_file(ar_file) - else: - if not create_ok: - print(f"Warning: Created file {ar_file}") - ar = Archive() - - for o_file in o_files: - ar.add_file(o_file) - - ar.write(ar_file) - - def scmd(modifiers, args): - print("") - return 1 - - def tcmd(modifiers, args): - # TODO modifiers - - if len(args) != 1: - print(f"{progname} t: bad args") - return ar_usage(progname) - - ar_file = args[0] - - ar = Archive.from_file(ar_file) - for file in ar.files: - print(file.name) - return 0 - - def xcmd(modifiers, args): - if modifiers not in ('', 'o'): - print(f"{progname}: bad modifiers -- '{modifiers}'") - return ar_usage(progname) - if len(args) not in (1, 3) or not (args[0].startswith("--output") or args[1].startswith("--output")): - print(f"{progname} t: bad args") - return ar_usage(progname) - - original_times = modifiers == 'o' - - if args[0].startswith("--output"): - out_dir = args[1] - ar_file = args[2] - elif args[1].startswith("--output"): - out_dir = args[2] - ar_file = args[0] - else: - ar_file = args[0] - out_dir = "" - - # Create dir if not exists - if not os.path.exists(out_dir): - os.makedirs(out_dir, exist_ok=True) - - if not os.path.isdir(out_dir): - print(f"Output directory {out_dir} is a file") - return ar_usage(progname) - - # Extract files to destination - ar = Archive.from_file(ar_file) - for file in ar.files: - opath =os.path.join(out_dir, file.name) - with open(opath, "wb") as ofile: - ofile.write(file.data) - - if not original_times: - t = time.time() - os.utime(opath, (t, t)) - # TODO patch with original dates etc. - - return 0 - - argtbl = { - 'd': dcmd, # delete file(s) from the archive - 'm': mcmd, # [ab] move file(s) in the archive - 'p': pcmd, # print file(s) found in the archive - 'q': qcmd, # [f] quick append file(s) to the archive - 'r': rcmd, # [ab][f][u] replace existing or insert new file(s) into the archive - 's': scmd, # act as ranlib - 't': tcmd, # [O][v] display contents of the archive - 'x': xcmd, # [o] extract file(s) from the archive - } - - arg1 = argv[1] - if arg1[0] == '-': - arg1 = arg1[1:] - cmd = arg1[0] - - if cmd not in argtbl: - print(f"{progname}: invalid option -- '{cmd}'") - return ar_usage(argv[0]) - - modifiers = arg1[1:] - - create_ok = "c" in modifiers - modifiers = modifiers.replace("c","") - make_ar_idx = "s" in modifiers - modifiers = modifiers.replace("s","") - no_symtab = "S" in modifiers - modifiers = modifiers.replace("S","") - verbose = "v" in modifiers - modifiers = modifiers.replace("v","") - - if "V" in modifiers: - print(f"{progname} v1.0") - - return argtbl[cmd](modifiers, argv[2:]) - -if __name__ == '__main__': - import sys - sys.exit(ar(sys.argv)) diff --git a/tools/asm_differ/.gitignore b/tools/asm_differ/.gitignore deleted file mode 100644 index eb176dc..0000000 --- a/tools/asm_differ/.gitignore +++ /dev/null @@ -1,2 +0,0 @@ -.mypy_cache/ -__pycache__/ diff --git a/tools/asm_differ/.gitrepo b/tools/asm_differ/.gitrepo deleted file mode 100644 index 2e999c8..0000000 --- a/tools/asm_differ/.gitrepo +++ /dev/null @@ -1,12 +0,0 @@ -; DO NOT EDIT (unless you know what you are doing) -; -; This subdirectory is a git "subrepo", and this file is maintained by the -; git-subrepo command. See https://github.com/git-commands/git-subrepo#readme -; -[subrepo] - remote = https://github.com/simonlindholm/asm-differ - branch = main - commit = 4b38c884c1efdc3bfa8b14f13015a69368a8d3a2 - parent = 32a1a8061de197c4f10d4904cd72a22dd7cf905c - method = merge - cmdver = 0.4.3 diff --git a/tools/asm_differ/.pre-commit-config.yaml b/tools/asm_differ/.pre-commit-config.yaml deleted file mode 100644 index 6695f71..0000000 --- a/tools/asm_differ/.pre-commit-config.yaml +++ /dev/null @@ -1,6 +0,0 @@ -repos: -- repo: https://github.com/psf/black - rev: 20.8b1 - hooks: - - id: black - language_version: python3.6 diff --git a/tools/asm_differ/LICENSE b/tools/asm_differ/LICENSE deleted file mode 100644 index cf1ab25..0000000 --- a/tools/asm_differ/LICENSE +++ /dev/null @@ -1,24 +0,0 @@ -This is free and unencumbered software released into the public domain. - -Anyone is free to copy, modify, publish, use, compile, sell, or -distribute this software, either in source code form or as a compiled -binary, for any purpose, commercial or non-commercial, and by any -means. - -In jurisdictions that recognize copyright laws, the author or authors -of this software dedicate any and all copyright interest in the -software to the public domain. We make this dedication for the benefit -of the public at large and to the detriment of our heirs and -successors. We intend this dedication to be an overt act of -relinquishment in perpetuity of all present and future rights to this -software under copyright law. - -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 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. - -For more information, please refer to diff --git a/tools/asm_differ/README.md b/tools/asm_differ/README.md deleted file mode 100644 index 4a7f329..0000000 --- a/tools/asm_differ/README.md +++ /dev/null @@ -1,56 +0,0 @@ -# asm-differ - -Nice differ for assembly code. Currently supports MIPS, PPC, AArch64, and ARM32; should be easy to hack to support other instruction sets. - -![](screenshot.png) - -## Dependencies - -- Python >= 3.6 -- `python3 -m pip install --user colorama watchdog python-Levenshtein` (also `dataclasses` if on 3.6) - -## Usage - -Create a file `diff_settings.sh` in some directory (see the one in this repo for an example). Then from that directory, run - -```bash -/path/to/diff.sh [flags] (function|rom addr) -``` - -Recommended flags are `-mwo` (automatically run `make` on source file changes, and include symbols in diff). See `--help` for more details. - -### Tab completion - -[argcomplete](https://kislyuk.github.io/argcomplete/) can be optionally installed (with `python3 -m pip install argcomplete`) to enable tab completion in a bash shell, completing options and symbol names using the linker map. It also requires a bit more setup: - -If invoking the script **exactly** as `./diff.py`, the following should be added to the `.bashrc` according to argcomplete's instructions: - -```bash -eval "$(register-python-argcomplete ./diff.py)" -``` - -If that doesn't work, run `register-python-argcomplete ./diff.py` in your terminal and copy the output to `.bashrc`. - -If setup correctly (don't forget to restart the shell), `complete | grep ./diff.py` should output: - -```bash -complete -o bashdefault -o default -o nospace -F _python_argcomplete ./diff.py -``` - -Note for developers or for general troubleshooting: run `export _ARC_DEBUG=` to enable debug output during tab-completion, it may show otherwise silenced errors. Use `unset _ARC_DEBUG` or restart the terminal to disable. - -### Contributing - -Contributions are very welcome! Some notes on workflow: - -`black` is used for code formatting. You can either run `black diff.py` manually, or set up a pre-commit hook: -```bash -pip install pre-commit black -pre-commit install -``` - -Type annotations are used for all Python code. `mypy` should pass without any errors. - -PRs that skip the above are still welcome, however. - -The targeted Python version is 3.6. There are currently no tests. diff --git a/tools/asm_differ/diff-stylesheet.css b/tools/asm_differ/diff-stylesheet.css deleted file mode 100644 index 79da120..0000000 --- a/tools/asm_differ/diff-stylesheet.css +++ /dev/null @@ -1,67 +0,0 @@ -table.diff { - border: none; - font-family: Monospace; - white-space: pre; -} -tr.data-ref { - background-color: gray; -} -.immediate { - color: lightblue; -} -.stack { - color: yellow; -} -.register { - color: yellow; -} -.delay-slot { - font-weight: bold; - color: gray; -} -.diff-change { - color: lightblue; -} -.diff-add { - color: green; -} -.diff-remove { - color: red; -} -.source-filename { - font-weight: bold; -} -.source-function { - font-weight: bold; - text-decoration: underline; -} -.source-other { - font-style: italic; -} -.rotation-0 { - color: magenta; -} -.rotation-1 { - color: cyan; -} -.rotation-2 { - color: green; -} -.rotation-3 { - color: red; -} -.rotation-4 { - color: yellow; -} -.rotation-5 { - color: pink; -} -.rotation-6 { - color: blue; -} -.rotation-7 { - color: lime; -} -.rotation-8 { - color: gray; -} diff --git a/tools/asm_differ/diff.py b/tools/asm_differ/diff.py deleted file mode 100755 index 8ed764f..0000000 --- a/tools/asm_differ/diff.py +++ /dev/null @@ -1,2923 +0,0 @@ -#!/usr/bin/env python3 -# PYTHON_ARGCOMPLETE_OK -import argparse -import sys -from typing import ( - Any, - Callable, - Dict, - Iterator, - List, - Match, - NoReturn, - Optional, - Pattern, - Set, - Tuple, - Type, - Union, -) - - -def fail(msg: str) -> NoReturn: - print(msg, file=sys.stderr) - sys.exit(1) - - -def static_assert_unreachable(x: NoReturn) -> NoReturn: - raise Exception("Unreachable! " + repr(x)) - - -# ==== COMMAND-LINE ==== - -if __name__ == "__main__": - # Prefer to use diff_settings.py from the current working directory - sys.path.insert(0, ".") - try: - import diff_settings - except ModuleNotFoundError: - fail("Unable to find diff_settings.py in the same directory.") - sys.path.pop(0) - - try: - import argcomplete - except ModuleNotFoundError: - argcomplete = None - - parser = argparse.ArgumentParser( - description="Diff MIPS, PPC, AArch64, or ARM32 assembly." - ) - - start_argument = parser.add_argument( - "start", - help="Function name or address to start diffing from.", - ) - - if argcomplete: - - def complete_symbol( - prefix: str, parsed_args: argparse.Namespace, **kwargs: object - ) -> List[str]: - if not prefix or prefix.startswith("-"): - # skip reading the map file, which would - # result in a lot of useless completions - return [] - config: Dict[str, Any] = {} - diff_settings.apply(config, parsed_args) # type: ignore - mapfile = config.get("mapfile") - if not mapfile: - return [] - completes = [] - with open(mapfile) as f: - data = f.read() - # assume symbols are prefixed by a space character - search = f" {prefix}" - pos = data.find(search) - while pos != -1: - # skip the space character in the search string - pos += 1 - # assume symbols are suffixed by either a space - # character or a (unix-style) line return - spacePos = data.find(" ", pos) - lineReturnPos = data.find("\n", pos) - if lineReturnPos == -1: - endPos = spacePos - elif spacePos == -1: - endPos = lineReturnPos - else: - endPos = min(spacePos, lineReturnPos) - if endPos == -1: - match = data[pos:] - pos = -1 - else: - match = data[pos:endPos] - pos = data.find(search, endPos) - completes.append(match) - return completes - - setattr(start_argument, "completer", complete_symbol) - - parser.add_argument( - "end", - nargs="?", - help="Address to end diff at.", - ) - parser.add_argument( - "-o", - dest="diff_obj", - action="store_true", - help="""Diff .o files rather than a whole binary. This makes it possible to - see symbol names. (Recommended)""", - ) - parser.add_argument( - "-e", - "--elf", - dest="diff_elf_symbol", - metavar="SYMBOL", - help="""Diff a given function in two ELFs, one being stripped and the other - one non-stripped. Requires objdump from binutils 2.33+.""", - ) - parser.add_argument( - "-c", - "--source", - dest="show_source", - action="store_true", - help="Show source code (if possible). Only works with -o or -e.", - ) - parser.add_argument( - "-C", - "--source-old-binutils", - dest="source_old_binutils", - action="store_true", - help="""Tweak --source handling to make it work with binutils < 2.33. - Implies --source.""", - ) - parser.add_argument( - "-j", - "--section", - dest="diff_section", - default=".text", - metavar="SECTION", - help="Diff restricted to a given output section.", - ) - parser.add_argument( - "-L", - "--line-numbers", - dest="show_line_numbers", - action="store_const", - const=True, - help="""Show source line numbers in output, when available. May be enabled by - default depending on diff_settings.py.""", - ) - parser.add_argument( - "--no-line-numbers", - dest="show_line_numbers", - action="store_const", - const=False, - help="Hide source line numbers in output.", - ) - parser.add_argument( - "--inlines", - dest="inlines", - action="store_true", - help="Show inline function calls (if possible). Only works with -o or -e.", - ) - parser.add_argument( - "--base-asm", - dest="base_asm", - metavar="FILE", - help="Read assembly from given file instead of configured base img.", - ) - parser.add_argument( - "--write-asm", - dest="write_asm", - metavar="FILE", - help="Write the current assembly output to file, e.g. for use with --base-asm.", - ) - parser.add_argument( - "-m", - "--make", - dest="make", - action="store_true", - help="Automatically run 'make' on the .o file or binary before diffing.", - ) - parser.add_argument( - "-l", - "--skip-lines", - dest="skip_lines", - metavar="LINES", - type=int, - default=0, - help="Skip the first LINES lines of output.", - ) - parser.add_argument( - "-s", - "--stop-jr-ra", - dest="stop_jrra", - action="store_true", - help="""Stop disassembling at the first 'jr ra'. Some functions have - multiple return points, so use with care!""", - ) - parser.add_argument( - "-i", - "--ignore-large-imms", - dest="ignore_large_imms", - action="store_true", - help="Pretend all large enough immediates are the same.", - ) - parser.add_argument( - "-I", - "--ignore-addr-diffs", - dest="ignore_addr_diffs", - action="store_true", - help="Ignore address differences. Currently only affects AArch64 and ARM32.", - ) - parser.add_argument( - "-B", - "--no-show-branches", - dest="show_branches", - action="store_false", - help="Don't visualize branches/branch targets.", - ) - parser.add_argument( - "-S", - "--base-shift", - dest="base_shift", - metavar="N", - type=str, - default="0", - help="""Diff position N in our img against position N + shift in the base img. - Arithmetic is allowed, so e.g. |-S "0x1234 - 0x4321"| is a reasonable - flag to pass if it is known that position 0x1234 in the base img syncs - up with position 0x4321 in our img. Not supported together with -o.""", - ) - parser.add_argument( - "-w", - "--watch", - dest="watch", - action="store_true", - help="""Automatically update when source/object files change. - Recommended in combination with -m.""", - ) - parser.add_argument( - "-3", - "--threeway=prev", - dest="threeway", - action="store_const", - const="prev", - help="""Show a three-way diff between target asm, current asm, and asm - prior to -w rebuild. Requires -w.""", - ) - parser.add_argument( - "-b", - "--threeway=base", - dest="threeway", - action="store_const", - const="base", - help="""Show a three-way diff between target asm, current asm, and asm - when diff.py was started. Requires -w.""", - ) - parser.add_argument( - "--width", - dest="column_width", - metavar="COLS", - type=int, - default=50, - help="Sets the width of the left and right view column.", - ) - parser.add_argument( - "--algorithm", - dest="algorithm", - default="levenshtein", - choices=["levenshtein", "difflib"], - help="""Diff algorithm to use. Levenshtein gives the minimum diff, while difflib - aims for long sections of equal opcodes. Defaults to %(default)s.""", - ) - parser.add_argument( - "--max-size", - "--max-lines", - metavar="LINES", - dest="max_lines", - type=int, - default=1024, - help="The maximum length of the diff, in lines.", - ) - parser.add_argument( - "--no-pager", - dest="no_pager", - action="store_true", - help="""Disable the pager; write output directly to stdout, then exit. - Incompatible with --watch.""", - ) - parser.add_argument( - "--format", - choices=("color", "plain", "html", "json"), - default="color", - help="Output format, default is color. --format=html or json implies --no-pager.", - ) - parser.add_argument( - "-U", - "--compress-matching", - metavar="N", - dest="compress_matching", - type=int, - help="""Compress streaks of matching lines, leaving N lines of context - around non-matching parts.""", - ) - parser.add_argument( - "-V", - "--compress-sameinstr", - metavar="N", - dest="compress_sameinstr", - type=int, - help="""Compress streaks of lines with same instructions (but possibly - different regalloc), leaving N lines of context around other parts.""", - ) - - # Project-specific flags, e.g. different versions/make arguments. - add_custom_arguments_fn = getattr(diff_settings, "add_custom_arguments", None) - if add_custom_arguments_fn: - add_custom_arguments_fn(parser) - - if argcomplete: - argcomplete.autocomplete(parser) - -# ==== IMPORTS ==== - -# (We do imports late to optimize auto-complete performance.) - -import abc -import ast -from collections import Counter, defaultdict -from dataclasses import asdict, dataclass, field, replace -import difflib -import enum -import html -import itertools -import json -import os -import queue -import re -import string -import struct -import subprocess -import threading -import time -import traceback - - -MISSING_PREREQUISITES = ( - "Missing prerequisite python module {}. " - "Run `python3 -m pip install --user colorama watchdog python-Levenshtein cxxfilt` to install prerequisites (cxxfilt only needed with --source)." -) - -try: - from colorama import Back, Fore, Style - import watchdog -except ModuleNotFoundError as e: - fail(MISSING_PREREQUISITES.format(e.name)) - -# ==== CONFIG ==== - - -@dataclass -class ProjectSettings: - arch_str: str - objdump_executable: str - build_command: List[str] - map_format: str - mw_build_dir: str - baseimg: Optional[str] - myimg: Optional[str] - mapfile: Optional[str] - source_directories: Optional[List[str]] - source_extensions: List[str] - show_line_numbers_default: bool - disassemble_all: bool - - -@dataclass -class Compress: - context: int - same_instr: bool - - -@dataclass -class Config: - arch: "ArchSettings" - - # Build/objdump options - diff_obj: bool - make: bool - source_old_binutils: bool - diff_section: str - inlines: bool - max_function_size_lines: int - max_function_size_bytes: int - - # Display options - formatter: "Formatter" - threeway: Optional[str] - base_shift: int - skip_lines: int - compress: Optional[Compress] - show_branches: bool - show_line_numbers: bool - show_source: bool - stop_jrra: bool - ignore_large_imms: bool - ignore_addr_diffs: bool - algorithm: str - - # Score options - score_stack_differences = True - penalty_stackdiff = 1 - penalty_regalloc = 5 - penalty_reordering = 60 - penalty_insertion = 100 - penalty_deletion = 100 - - -def create_project_settings(settings: Dict[str, Any]) -> ProjectSettings: - return ProjectSettings( - arch_str=settings.get("arch", "mips"), - baseimg=settings.get("baseimg"), - myimg=settings.get("myimg"), - mapfile=settings.get("mapfile"), - build_command=settings.get( - "make_command", ["make", *settings.get("makeflags", [])] - ), - source_directories=settings.get("source_directories"), - source_extensions=settings.get( - "source_extensions", [".c", ".h", ".cpp", ".hpp", ".s"] - ), - objdump_executable=get_objdump_executable(settings.get("objdump_executable")), - map_format=settings.get("map_format", "gnu"), - mw_build_dir=settings.get("mw_build_dir", "build/"), - show_line_numbers_default=settings.get("show_line_numbers_default", True), - disassemble_all=settings.get("disassemble_all", False) - ) - - -def create_config(args: argparse.Namespace, project: ProjectSettings) -> Config: - arch = get_arch(project.arch_str) - - formatter: Formatter - if args.format == "plain": - formatter = PlainFormatter(column_width=args.column_width) - elif args.format == "color": - formatter = AnsiFormatter(column_width=args.column_width) - elif args.format == "html": - formatter = HtmlFormatter() - elif args.format == "json": - formatter = JsonFormatter(arch_str=arch.name) - else: - raise ValueError(f"Unsupported --format: {args.format}") - - compress = None - if args.compress_matching is not None: - compress = Compress(args.compress_matching, False) - if args.compress_sameinstr is not None: - if compress is not None: - raise ValueError( - "Cannot pass both --compress-matching and --compress-sameinstr" - ) - compress = Compress(args.compress_sameinstr, True) - - show_line_numbers = args.show_line_numbers - if show_line_numbers is None: - show_line_numbers = project.show_line_numbers_default - - return Config( - arch=arch, - # Build/objdump options - diff_obj=args.diff_obj, - make=args.make, - source_old_binutils=args.source_old_binutils, - diff_section=args.diff_section, - inlines=args.inlines, - max_function_size_lines=args.max_lines, - max_function_size_bytes=args.max_lines * 4, - # Display options - formatter=formatter, - threeway=args.threeway, - base_shift=eval_int( - args.base_shift, "Failed to parse --base-shift (-S) argument as an integer." - ), - skip_lines=args.skip_lines, - compress=compress, - show_branches=args.show_branches, - show_line_numbers=show_line_numbers, - show_source=args.show_source or args.source_old_binutils, - stop_jrra=args.stop_jrra, - ignore_large_imms=args.ignore_large_imms, - ignore_addr_diffs=args.ignore_addr_diffs, - algorithm=args.algorithm, - ) - - -def get_objdump_executable(objdump_executable: Optional[str]) -> str: - if objdump_executable is not None: - return objdump_executable - - objdump_candidates = [ - "mips-linux-gnu-objdump", - "mips64-elf-objdump", - "mips-elf-objdump", - ] - for objdump_cand in objdump_candidates: - try: - subprocess.check_call( - [objdump_cand, "--version"], - stdout=subprocess.DEVNULL, - stderr=subprocess.DEVNULL, - ) - return objdump_cand - except subprocess.CalledProcessError: - pass - except FileNotFoundError: - pass - - return fail( - f"Missing binutils; please ensure {' or '.join(objdump_candidates)} exists, or configure objdump_executable." - ) - - -def get_arch(arch_str: str) -> "ArchSettings": - for settings in ARCH_SETTINGS: - if arch_str == settings.name: - return settings - raise ValueError(f"Unknown architecture: {arch_str}") - - -BUFFER_CMD: List[str] = ["tail", "-c", str(10 ** 9)] - -# -S truncates long lines instead of wrapping them -# -R interprets color escape sequences -# -i ignores case when searching -# -c something about how the screen gets redrawn; I don't remember the purpose -# -#6 makes left/right arrow keys scroll by 6 characters -LESS_CMD: List[str] = ["less", "-SRic", "-#6"] - -DEBOUNCE_DELAY: float = 0.1 - -# ==== FORMATTING ==== - - -@enum.unique -class BasicFormat(enum.Enum): - NONE = enum.auto() - IMMEDIATE = enum.auto() - STACK = enum.auto() - REGISTER = enum.auto() - DELAY_SLOT = enum.auto() - DIFF_CHANGE = enum.auto() - DIFF_ADD = enum.auto() - DIFF_REMOVE = enum.auto() - SOURCE_FILENAME = enum.auto() - SOURCE_FUNCTION = enum.auto() - SOURCE_LINE_NUM = enum.auto() - SOURCE_OTHER = enum.auto() - - -@dataclass(frozen=True) -class RotationFormat: - group: str - index: int - key: str - - -Format = Union[BasicFormat, RotationFormat] -FormatFunction = Callable[[str], Format] - - -class Text: - segments: List[Tuple[str, Format]] - - def __init__(self, line: str = "", f: Format = BasicFormat.NONE) -> None: - self.segments = [(line, f)] if line else [] - - def reformat(self, f: Format) -> "Text": - return Text(self.plain(), f) - - def plain(self) -> str: - return "".join(s for s, f in self.segments) - - def __repr__(self) -> str: - return f"" - - def __bool__(self) -> bool: - return any(s for s, f in self.segments) - - def __str__(self) -> str: - # Use Formatter.apply(...) instead - return NotImplemented - - def __eq__(self, other: object) -> bool: - return NotImplemented - - def __add__(self, other: Union["Text", str]) -> "Text": - if isinstance(other, str): - other = Text(other) - result = Text() - # If two adjacent segments have the same format, merge their lines - if ( - self.segments - and other.segments - and self.segments[-1][1] == other.segments[0][1] - ): - result.segments = ( - self.segments[:-1] - + [(self.segments[-1][0] + other.segments[0][0], self.segments[-1][1])] - + other.segments[1:] - ) - else: - result.segments = self.segments + other.segments - return result - - def __radd__(self, other: Union["Text", str]) -> "Text": - if isinstance(other, str): - other = Text(other) - return other + self - - def finditer(self, pat: Pattern[str]) -> Iterator[Match[str]]: - """Replacement for `pat.finditer(text)` that operates on the inner text, - and returns the exact same matches as `Text.sub(pat, ...)`.""" - for chunk, f in self.segments: - for match in pat.finditer(chunk): - yield match - - def sub(self, pat: Pattern[str], sub_fn: Callable[[Match[str]], "Text"]) -> "Text": - result = Text() - for chunk, f in self.segments: - i = 0 - for match in pat.finditer(chunk): - start, end = match.start(), match.end() - assert i <= start <= end <= len(chunk) - sub = sub_fn(match) - if i != start: - result.segments.append((chunk[i:start], f)) - result.segments.extend(sub.segments) - i = end - if chunk[i:]: - result.segments.append((chunk[i:], f)) - return result - - def ljust(self, column_width: int) -> "Text": - length = sum(len(x) for x, _ in self.segments) - return self + " " * max(column_width - length, 0) - - -@dataclass -class TableMetadata: - headers: Tuple[Text, ...] - current_score: int - max_score: int - previous_score: Optional[int] - - -class Formatter(abc.ABC): - @abc.abstractmethod - def apply_format(self, chunk: str, f: Format) -> str: - """Apply the formatting `f` to `chunk` and escape the contents.""" - ... - - @abc.abstractmethod - def table(self, meta: TableMetadata, lines: List[Tuple["OutputLine", ...]]) -> str: - """Format a multi-column table with metadata""" - ... - - def apply(self, text: Text) -> str: - return "".join(self.apply_format(chunk, f) for chunk, f in text.segments) - - @staticmethod - def outputline_texts(lines: Tuple["OutputLine", ...]) -> Tuple[Text, ...]: - return tuple([lines[0].base or Text()] + [line.fmt2 for line in lines[1:]]) - - -@dataclass -class PlainFormatter(Formatter): - column_width: int - - def apply_format(self, chunk: str, f: Format) -> str: - return chunk - - def table(self, meta: TableMetadata, lines: List[Tuple["OutputLine", ...]]) -> str: - rows = [meta.headers] + [self.outputline_texts(ls) for ls in lines] - return "\n".join( - "".join(self.apply(x.ljust(self.column_width)) for x in row) for row in rows - ) - - -@dataclass -class AnsiFormatter(Formatter): - # Additional ansi escape codes not in colorama. See: - # https://en.wikipedia.org/wiki/ANSI_escape_code#SGR_(Select_Graphic_Rendition)_parameters - STYLE_UNDERLINE = "\x1b[4m" - STYLE_NO_UNDERLINE = "\x1b[24m" - STYLE_INVERT = "\x1b[7m" - - BASIC_ANSI_CODES = { - BasicFormat.NONE: "", - BasicFormat.IMMEDIATE: Fore.LIGHTBLUE_EX, - BasicFormat.STACK: Fore.YELLOW, - BasicFormat.REGISTER: Fore.YELLOW, - BasicFormat.DELAY_SLOT: Fore.LIGHTBLACK_EX, - BasicFormat.DIFF_CHANGE: Fore.LIGHTBLUE_EX, - BasicFormat.DIFF_ADD: Fore.GREEN, - BasicFormat.DIFF_REMOVE: Fore.RED, - BasicFormat.SOURCE_FILENAME: Style.DIM + Style.BRIGHT, - BasicFormat.SOURCE_FUNCTION: Style.DIM + Style.BRIGHT + STYLE_UNDERLINE, - BasicFormat.SOURCE_LINE_NUM: Fore.LIGHTBLACK_EX, - BasicFormat.SOURCE_OTHER: Style.DIM, - } - - BASIC_ANSI_CODES_UNDO = { - BasicFormat.NONE: "", - BasicFormat.SOURCE_FILENAME: Style.NORMAL, - BasicFormat.SOURCE_FUNCTION: Style.NORMAL + STYLE_NO_UNDERLINE, - BasicFormat.SOURCE_OTHER: Style.NORMAL, - } - - ROTATION_ANSI_COLORS = [ - Fore.MAGENTA, - Fore.CYAN, - Fore.GREEN, - Fore.RED, - Fore.LIGHTYELLOW_EX, - Fore.LIGHTMAGENTA_EX, - Fore.LIGHTCYAN_EX, - Fore.LIGHTGREEN_EX, - Fore.LIGHTBLACK_EX, - ] - - column_width: int - - def apply_format(self, chunk: str, f: Format) -> str: - if f == BasicFormat.NONE: - return chunk - undo_ansi_code = Fore.RESET - if isinstance(f, BasicFormat): - ansi_code = self.BASIC_ANSI_CODES[f] - undo_ansi_code = self.BASIC_ANSI_CODES_UNDO.get(f, undo_ansi_code) - elif isinstance(f, RotationFormat): - ansi_code = self.ROTATION_ANSI_COLORS[ - f.index % len(self.ROTATION_ANSI_COLORS) - ] - else: - static_assert_unreachable(f) - return f"{ansi_code}{chunk}{undo_ansi_code}" - - def table(self, meta: TableMetadata, lines: List[Tuple["OutputLine", ...]]) -> str: - rows = [(meta.headers, False)] + [ - (self.outputline_texts(line), line[1].is_data_ref) for line in lines - ] - return "\n".join( - "".join( - (self.STYLE_INVERT if is_data_ref else "") - + self.apply(x.ljust(self.column_width)) - for x in row - ) - for (row, is_data_ref) in rows - ) - - -@dataclass -class HtmlFormatter(Formatter): - rotation_formats: int = 9 - - def apply_format(self, chunk: str, f: Format) -> str: - chunk = html.escape(chunk) - if f == BasicFormat.NONE: - return chunk - if isinstance(f, BasicFormat): - class_name = f.name.lower().replace("_", "-") - data_attr = "" - elif isinstance(f, RotationFormat): - class_name = f"rotation-{f.index % self.rotation_formats}" - rotation_key = html.escape(f"{f.group};{f.key}", quote=True) - data_attr = f'data-rotation="{rotation_key}"' - else: - static_assert_unreachable(f) - return f"{chunk}" - - def table(self, meta: TableMetadata, lines: List[Tuple["OutputLine", ...]]) -> str: - def table_row(line: Tuple[Text, ...], is_data_ref: bool, cell_el: str) -> str: - tr_attrs = " class='data-ref'" if is_data_ref else "" - output_row = f" " - for cell in line: - cell_html = self.apply(cell) - output_row += f"<{cell_el}>{cell_html}" - output_row += "\n" - return output_row - - output = "\n" - output += " \n" - output += table_row(meta.headers, False, "th") - output += " \n" - output += " \n" - output += "".join( - table_row(self.outputline_texts(line), line[1].is_data_ref, "td") - for line in lines - ) - output += " \n" - output += "
\n" - return output - - -@dataclass -class JsonFormatter(Formatter): - arch_str: str - - def apply_format(self, chunk: str, f: Format) -> str: - # This method is unused by this formatter - return NotImplemented - - def table(self, meta: TableMetadata, rows: List[Tuple["OutputLine", ...]]) -> str: - def serialize_format(s: str, f: Format) -> Dict[str, Any]: - if f == BasicFormat.NONE: - return {"text": s} - elif isinstance(f, BasicFormat): - return {"text": s, "format": f.name.lower()} - elif isinstance(f, RotationFormat): - attrs = asdict(f) - attrs.update( - { - "text": s, - "format": "rotation", - } - ) - return attrs - else: - static_assert_unreachable(f) - - def serialize(text: Optional[Text]) -> List[Dict[str, Any]]: - if text is None: - return [] - return [serialize_format(s, f) for s, f in text.segments] - - is_threeway = len(meta.headers) == 3 - - output: Dict[str, Any] = {} - output["arch_str"] = self.arch_str - output["header"] = { - name: serialize(h) - for h, name in zip(meta.headers, ("base", "current", "previous")) - } - output["current_score"] = meta.current_score - output["max_score"] = meta.max_score - if meta.previous_score is not None: - output["previous_score"] = meta.previous_score - output_rows: List[Dict[str, Any]] = [] - for row in rows: - output_row: Dict[str, Any] = {} - output_row["key"] = row[0].key2 - output_row["is_data_ref"] = row[1].is_data_ref - iters = [ - ("base", row[0].base, row[0].line1), - ("current", row[1].fmt2, row[1].line2), - ] - if is_threeway: - iters.append(("previous", row[2].fmt2, row[2].line2)) - if all(line is None for _, _, line in iters): - # Skip rows that were only for displaying source code - continue - for column_name, text, line in iters: - column: Dict[str, Any] = {} - column["text"] = serialize(text) - if line: - if line.line_num is not None: - column["line"] = line.line_num - if line.branch_target is not None: - column["branch"] = line.branch_target - if line.source_lines: - column["src"] = line.source_lines - if line.comment is not None: - column["src_comment"] = line.comment - if line.source_line_num is not None: - column["src_line"] = line.source_line_num - if line or column["text"]: - output_row[column_name] = column - output_rows.append(output_row) - output["rows"] = output_rows - return json.dumps(output) - - -def format_fields( - pat: Pattern[str], - out1: Text, - out2: Text, - color1: FormatFunction, - color2: Optional[FormatFunction] = None, -) -> Tuple[Text, Text]: - diffs = [ - of.group() != nf.group() - for (of, nf) in zip(out1.finditer(pat), out2.finditer(pat)) - ] - - it = iter(diffs) - - def maybe_color(color: FormatFunction, s: str) -> Text: - return Text(s, color(s)) if next(it, False) else Text(s) - - out1 = out1.sub(pat, lambda m: maybe_color(color1, m.group())) - it = iter(diffs) - out2 = out2.sub(pat, lambda m: maybe_color(color2 or color1, m.group())) - - return out1, out2 - - -def symbol_formatter(group: str, base_index: int) -> FormatFunction: - symbol_formats: Dict[str, Format] = {} - - def symbol_format(s: str) -> Format: - # TODO: it would be nice to use a unique Format for each symbol, so we could - # add extra UI elements in the HTML version - f = symbol_formats.get(s) - if f is None: - index = len(symbol_formats) + base_index - f = RotationFormat(key=s, index=index, group=group) - symbol_formats[s] = f - return f - - return symbol_format - - -# ==== LOGIC ==== - -ObjdumpCommand = Tuple[List[str], str, Optional[str]] - - -def maybe_eval_int(expr: str) -> Optional[int]: - try: - ret = ast.literal_eval(expr) - if not isinstance(ret, int): - raise Exception("not an integer") - return ret - except Exception: - return None - - -def eval_int(expr: str, emsg: str) -> int: - ret = maybe_eval_int(expr) - if ret is None: - fail(emsg) - return ret - - -def eval_line_num(expr: str) -> Optional[int]: - expr = expr.strip().replace(":", "") - if expr == "": - return None - return int(expr, 16) - - -def run_make(target: str, project: ProjectSettings) -> None: - subprocess.check_call(project.build_command + [target]) - - -def run_make_capture_output( - target: str, project: ProjectSettings -) -> "subprocess.CompletedProcess[bytes]": - return subprocess.run( - project.build_command + [target], - stderr=subprocess.PIPE, - stdout=subprocess.PIPE, - ) - - -def restrict_to_function(dump: str, fn_name: str) -> str: - try: - ind = dump.index("\n", dump.index(f"<{fn_name}>:")) - return dump[ind + 1 :] - except ValueError: - return "" - - -def serialize_data_references(references: List[Tuple[int, int, str]]) -> str: - return "".join( - f"DATAREF {text_offset} {from_offset} {from_section}\n" - for (text_offset, from_offset, from_section) in references - ) - - -def maybe_get_objdump_source_flags(config: Config) -> List[str]: - flags = [] - - if config.show_line_numbers or config.show_source: - flags.append("--line-numbers") - - if config.show_source: - flags.append("--source") - - if not config.source_old_binutils: - flags.append("--source-comment=│ ") - - if config.inlines: - flags.append("--inlines") - - return flags - - -def run_objdump(cmd: ObjdumpCommand, config: Config, project: ProjectSettings) -> str: - flags, target, restrict = cmd - try: - out = subprocess.run( - [project.objdump_executable] + config.arch.arch_flags + flags + [target], - check=True, - stdout=subprocess.PIPE, - stderr=subprocess.PIPE, - universal_newlines=True, - ).stdout - except subprocess.CalledProcessError as e: - print(e.stdout) - print(e.stderr) - if "unrecognized option '--source-comment" in e.stderr: - fail("** Try using --source-old-binutils instead of --source **") - raise e - - obj_data: Optional[bytes] = None - if config.diff_obj: - with open(target, "rb") as f: - obj_data = f.read() - - return preprocess_objdump_out(restrict, obj_data, out, config) - - -def preprocess_objdump_out( - restrict: Optional[str], obj_data: Optional[bytes], objdump_out: str, config: Config -) -> str: - """ - Preprocess the output of objdump into a format that `process()` expects. - This format is suitable for saving to disk with `--write-asm`. - - - Optionally filter the output to a single function (`restrict`) - - Otherwise, strip objdump header (7 lines) - - Prepend .data references ("DATAREF" lines) when working with object files - """ - out = objdump_out - - if restrict is not None: - out = restrict_to_function(out, restrict) - else: - for i in range(7): - out = out[out.find("\n") + 1 :] - out = out.rstrip("\n") - - if obj_data: - out = serialize_data_references(parse_elf_data_references(obj_data, config)) + out - - return out - - -def search_map_file( - fn_name: str, project: ProjectSettings, config: Config -) -> Tuple[Optional[str], Optional[int]]: - if not project.mapfile: - fail(f"No map file configured; cannot find function {fn_name}.") - - try: - with open(project.mapfile) as f: - contents = f.read() - except Exception: - fail(f"Failed to open map file {project.mapfile} for reading.") - - if project.map_format == "gnu": - lines = contents.split("\n") - - try: - cur_objfile = None - ram_to_rom = None - cands = [] - last_line = "" - for line in lines: - if line.startswith(" " + config.diff_section): - cur_objfile = line.split()[3] - if "load address" in line: - tokens = last_line.split() + line.split() - ram = int(tokens[1], 0) - rom = int(tokens[5], 0) - ram_to_rom = rom - ram - if line.endswith(" " + fn_name): - ram = int(line.split()[0], 0) - if cur_objfile is not None and ram_to_rom is not None: - cands.append((cur_objfile, ram + ram_to_rom)) - last_line = line - except Exception as e: - traceback.print_exc() - fail(f"Internal error while parsing map file") - - if len(cands) > 1: - fail(f"Found multiple occurrences of function {fn_name} in map file.") - if len(cands) == 1: - return cands[0] - elif project.map_format == "mw": - section_pattern = re.escape(config.diff_section) - find = re.findall( - re.compile( - # ram elf rom - r" \S+ \S+ (\S+) (\S+) . " - + fn_name - # object name - + r"(?: \(entry of " + section_pattern + r"\))? \t(\S+)" - ), - contents, - ) - if len(find) > 1: - fail(f"Found multiple occurrences of function {fn_name} in map file.") - if len(find) == 1: - rom = int(find[0][1], 16) - objname = find[0][2] - # The metrowerks linker map format does not contain the full object path, - # so we must complete it manually. - objfiles = [ - os.path.join(dirpath, f) - for dirpath, _, filenames in os.walk(project.mw_build_dir) - for f in filenames - if f == objname - ] - if len(objfiles) > 1: - all_objects = "\n".join(objfiles) - fail( - f"Found multiple objects of the same name {objname} in {project.mw_build_dir}, " - f"cannot determine which to diff against: \n{all_objects}" - ) - if len(objfiles) == 1: - objfile = objfiles[0] - # TODO Currently the ram-rom conversion only works for diffing ELF - # executables, but it would likely be more convenient to diff DOLs. - # At this time it is recommended to always use -o when running the diff - # script as this mode does not make use of the ram-rom conversion. - return objfile, rom - else: - fail(f"Linker map format {project.map_format} unrecognised.") - return None, None - - -def parse_elf_data_references(data: bytes, config: Config) -> List[Tuple[int, int, str]]: - e_ident = data[:16] - if e_ident[:4] != b"\x7FELF": - return [] - - SHT_SYMTAB = 2 - SHT_REL = 9 - SHT_RELA = 4 - - is_32bit = e_ident[4] == 1 - is_little_endian = e_ident[5] == 1 - str_end = "<" if is_little_endian else ">" - str_off = "I" if is_32bit else "Q" - sym_size = {"B": 1, "H": 2, "I": 4, "Q": 8} - - def read(spec: str, offset: int) -> Tuple[int, ...]: - spec = spec.replace("P", str_off) - size = struct.calcsize(spec) - return struct.unpack(str_end + spec, data[offset : offset + size]) - - ( - e_type, - e_machine, - e_version, - e_entry, - e_phoff, - e_shoff, - e_flags, - e_ehsize, - e_phentsize, - e_phnum, - e_shentsize, - e_shnum, - e_shstrndx, - ) = read("HHIPPPIHHHHHH", 16) - if e_type != 1: # relocatable - return [] - assert e_shoff != 0 - assert e_shnum != 0 # don't support > 0xFF00 sections - assert e_shstrndx != 0 - - @dataclass - class Section: - sh_name: int - sh_type: int - sh_flags: int - sh_addr: int - sh_offset: int - sh_size: int - sh_link: int - sh_info: int - sh_addralign: int - sh_entsize: int - - sections = [ - Section(*read("IIPPPPIIPP", e_shoff + i * e_shentsize)) for i in range(e_shnum) - ] - shstr = sections[e_shstrndx] - sec_name_offs = [shstr.sh_offset + s.sh_name for s in sections] - sec_names = [data[offset : data.index(b"\0", offset)] for offset in sec_name_offs] - - symtab_sections = [i for i in range(e_shnum) if sections[i].sh_type == SHT_SYMTAB] - assert len(symtab_sections) == 1 - symtab = sections[symtab_sections[0]] - - section_name = config.diff_section.encode("utf-8") - text_sections = [i for i in range(e_shnum) if sec_names[i] == section_name and sections[i].sh_size != 0] - if len(text_sections) != 1: - return [] - text_section = text_sections[0] - - ret: List[Tuple[int, int, str]] = [] - for s in sections: - if s.sh_type == SHT_REL or s.sh_type == SHT_RELA: - if s.sh_info == text_section: - # Skip section_name -> section_name references - continue - sec_name = sec_names[s.sh_info].decode("latin1") - if sec_name == ".mwcats.text": - # Skip Metrowerks CATS Utility section - continue - sec_base = sections[s.sh_info].sh_offset - for i in range(0, s.sh_size, s.sh_entsize): - if s.sh_type == SHT_REL: - r_offset, r_info = read("PP", s.sh_offset + i) - else: - r_offset, r_info, r_addend = read("PPP", s.sh_offset + i) - - if is_32bit: - r_sym = r_info >> 8 - r_type = r_info & 0xFF - sym_offset = symtab.sh_offset + symtab.sh_entsize * r_sym - st_name, st_value, st_size, st_info, st_other, st_shndx = read( - "IIIBBH", sym_offset - ) - else: - r_sym = r_info >> 32 - r_type = r_info & 0xFFFFFFFF - sym_offset = symtab.sh_offset + symtab.sh_entsize * r_sym - st_name, st_info, st_other, st_shndx, st_value, st_size = read( - "IBBHQQ", sym_offset - ) - if st_shndx == text_section: - if s.sh_type == SHT_REL: - if e_machine == 8 and r_type == 2: # R_MIPS_32 - (r_addend,) = read("I", sec_base + r_offset) - else: - continue - text_offset = (st_value + r_addend) & 0xFFFFFFFF - ret.append((text_offset, r_offset, sec_name)) - return ret - - -def dump_elf( - start: str, - end: Optional[str], - diff_elf_symbol: str, - config: Config, - project: ProjectSettings, -) -> Tuple[str, ObjdumpCommand, ObjdumpCommand]: - if not project.baseimg or not project.myimg: - fail("Missing myimg/baseimg in config.") - if config.base_shift: - fail("--base-shift not compatible with -e") - - start_addr = eval_int(start, "Start address must be an integer expression.") - - if end is not None: - end_addr = eval_int(end, "End address must be an integer expression.") - else: - end_addr = start_addr + config.max_function_size_bytes - - flags1 = [ - f"--start-address={start_addr}", - f"--stop-address={end_addr}", - ] - - if project.disassemble_all: - disassemble_flag = "-D" - else: - disassemble_flag = "-d" - - flags2 = [ - f"--disassemble={diff_elf_symbol}", - ] - - objdump_flags = [disassemble_flag, "-rz", "-j", config.diff_section] - return ( - project.myimg, - (objdump_flags + flags1, project.baseimg, None), - ( - objdump_flags + flags2 + maybe_get_objdump_source_flags(config), - project.myimg, - None, - ), - ) - - -def dump_objfile( - start: str, end: Optional[str], config: Config, project: ProjectSettings -) -> Tuple[str, ObjdumpCommand, ObjdumpCommand]: - if config.base_shift: - fail("--base-shift not compatible with -o") - if end is not None: - fail("end address not supported together with -o") - if start.startswith("0"): - fail("numerical start address not supported with -o; pass a function name") - - objfile, _ = search_map_file(start, project, config) - if not objfile: - fail("Not able to find .o file for function.") - - if config.make: - run_make(objfile, project) - - if not os.path.isfile(objfile): - fail(f"Not able to find .o file for function: {objfile} is not a file.") - - refobjfile = "expected/" + objfile - if not os.path.isfile(refobjfile): - fail(f'Please ensure an OK .o file exists at "{refobjfile}".') - - if project.disassemble_all: - disassemble_flag = "-D" - else: - disassemble_flag = "-d" - - objdump_flags = [disassemble_flag, "-rz", "-j", config.diff_section] - return ( - objfile, - (objdump_flags, refobjfile, start), - (objdump_flags + maybe_get_objdump_source_flags(config), objfile, start), - ) - - -def dump_binary( - start: str, end: Optional[str], config: Config, project: ProjectSettings -) -> Tuple[str, ObjdumpCommand, ObjdumpCommand]: - if not project.baseimg or not project.myimg: - fail("Missing myimg/baseimg in config.") - if config.make: - run_make(project.myimg, project) - start_addr = maybe_eval_int(start) - if start_addr is None: - _, start_addr = search_map_file(start, project, config) - if start_addr is None: - fail("Not able to find function in map file.") - if end is not None: - end_addr = eval_int(end, "End address must be an integer expression.") - else: - end_addr = start_addr + config.max_function_size_bytes - objdump_flags = ["-Dz", "-bbinary"] + ["-EB" if config.arch.big_endian else "-EL"] - flags1 = [ - f"--start-address={start_addr + config.base_shift}", - f"--stop-address={end_addr + config.base_shift}", - ] - flags2 = [f"--start-address={start_addr}", f"--stop-address={end_addr}"] - return ( - project.myimg, - (objdump_flags + flags1, project.baseimg, None), - (objdump_flags + flags2, project.myimg, None), - ) - -# Example: "ldr r4, [pc, #56] ; (4c )" -ARM32_LOAD_POOL_PATTERN = r"(ldr\s+r([0-9]|1[0-3]),\s+\[pc,.*;\s*)(\([a-fA-F0-9]+.*\))" - - -# The base class is a no-op. -class AsmProcessor: - def __init__(self, config: Config) -> None: - self.config = config - - def process_reloc(self, row: str, prev: str) -> str: - return prev - - def normalize(self, mnemonic: str, row: str) -> str: - """This should be called exactly once for each line.""" - arch = self.config.arch - row = self._normalize_arch_specific(mnemonic, row) - if self.config.ignore_large_imms and mnemonic not in arch.branch_instructions: - row = re.sub(self.config.arch.re_large_imm, "", row) - return row - - def _normalize_arch_specific(self, mnemonic: str, row: str) -> str: - return row - - def post_process(self, lines: List["Line"]) -> None: - return - - -class AsmProcessorMIPS(AsmProcessor): - def process_reloc(self, row: str, prev: str) -> str: - arch = self.config.arch - if "R_MIPS_NONE" in row: - # GNU as emits no-op relocations immediately after real ones when - # assembling with -mabi=64. Return without trying to parse 'imm' as an - # integer. - return prev - before, imm, after = parse_relocated_line(prev) - repl = row.split()[-1] - if imm != "0": - # MIPS uses relocations with addends embedded in the code as immediates. - # If there is an immediate, show it as part of the relocation. Ideally - # we'd show this addend in both %lo/%hi, but annoyingly objdump's output - # doesn't include enough information to pair up %lo's and %hi's... - # TODO: handle unambiguous cases where all addends for a symbol are the - # same, or show "+???". - mnemonic = prev.split()[0] - if ( - mnemonic in arch.instructions_with_address_immediates - and not imm.startswith("0x") - ): - imm = "0x" + imm - repl += "+" + imm if int(imm, 0) > 0 else imm - if "R_MIPS_LO16" in row: - repl = f"%lo({repl})" - elif "R_MIPS_HI16" in row: - # Ideally we'd pair up R_MIPS_LO16 and R_MIPS_HI16 to generate a - # correct addend for each, but objdump doesn't give us the order of - # the relocations, so we can't find the right LO16. :( - repl = f"%hi({repl})" - elif "R_MIPS_26" in row: - # Function calls - pass - elif "R_MIPS_PC16" in row: - # Branch to glabel. This gives confusing output, but there's not much - # we can do here. - pass - elif "R_MIPS_GPREL16" in row: - repl = f"%gp_rel({repl})" - else: - assert False, f"unknown relocation type '{row}' for line '{prev}'" - return before + repl + after - - -class AsmProcessorPPC(AsmProcessor): - def process_reloc(self, row: str, prev: str) -> str: - arch = self.config.arch - assert any( - r in row for r in ["R_PPC_REL24", "R_PPC_ADDR16", "R_PPC_EMB_SDA21"] - ), f"unknown relocation type '{row}' for line '{prev}'" - before, imm, after = parse_relocated_line(prev) - repl = row.split()[-1] - if "R_PPC_REL24" in row: - # function calls - pass - elif "R_PPC_ADDR16_HI" in row: - # absolute hi of addr - repl = f"{repl}@h" - elif "R_PPC_ADDR16_HA" in row: - # adjusted hi of addr - repl = f"{repl}@ha" - elif "R_PPC_ADDR16_LO" in row: - # lo of addr - repl = f"{repl}@l" - elif "R_PPC_ADDR16" in row: - # 16-bit absolute addr - if "+0x7" in repl: - # remove the very large addends as they are an artifact of (label-_SDA(2)_BASE_) - # computations and are unimportant in a diff setting. - if int(repl.split("+")[1], 16) > 0x70000000: - repl = repl.split("+")[0] - elif "R_PPC_EMB_SDA21" in row: - # small data area - pass - return before + repl + after - - -class AsmProcessorARM32(AsmProcessor): - def process_reloc(self, row: str, prev: str) -> str: - arch = self.config.arch - before, imm, after = parse_relocated_line(prev) - repl = row.split()[-1] - return before + repl + after - - def _normalize_arch_specific(self, mnemonic: str, row: str) -> str: - if self.config.ignore_addr_diffs: - row = self._normalize_bl(mnemonic, row) - row = self._normalize_data_pool(row) - return row - - def _normalize_bl(self, mnemonic: str, row: str) -> str: - if mnemonic != "bl": - return row - - row, _ = split_off_address(row) - return row + "" - - def _normalize_data_pool(self, row: str) -> str: - pool_match = re.search(ARM32_LOAD_POOL_PATTERN, row) - return pool_match.group(1) if pool_match else row - - def post_process(self, lines: List["Line"]) -> None: - lines_by_line_number = {} - for line in lines: - lines_by_line_number[line.line_num] = line - for line in lines: - if line.data_pool_addr is None: - continue - - # Add data symbol and its address to the line. - line_original = lines_by_line_number[line.data_pool_addr].original - value = line_original.split()[1] - addr = "{:x}".format(line.data_pool_addr) - line.original = line.normalized_original + f"={value} ({addr})" - - -class AsmProcessorAArch64(AsmProcessor): - def __init__(self, config: Config) -> None: - super().__init__(config) - self._adrp_pair_registers: Set[str] = set() - - def _normalize_arch_specific(self, mnemonic: str, row: str) -> str: - if self.config.ignore_addr_diffs: - row = self._normalize_adrp_differences(mnemonic, row) - row = self._normalize_bl(mnemonic, row) - return row - - def _normalize_bl(self, mnemonic: str, row: str) -> str: - if mnemonic != "bl": - return row - - row, _ = split_off_address(row) - return row + "" - - def _normalize_adrp_differences(self, mnemonic: str, row: str) -> str: - """Identifies ADRP + LDR/ADD pairs that are used to access the GOT and - suppresses any immediate differences. - - Whenever an ADRP is seen, the destination register is added to the set of registers - that are part of an ADRP + LDR/ADD pair. Registers are removed from the set as soon - as they are used for an LDR or ADD instruction which completes the pair. - - This method is somewhat crude but should manage to detect most such pairs. - """ - row_parts = row.split("\t", 1) - if mnemonic == "adrp": - self._adrp_pair_registers.add(row_parts[1].strip().split(",")[0]) - row, _ = split_off_address(row) - return row + "" - elif mnemonic == "ldr": - for reg in self._adrp_pair_registers: - # ldr xxx, [reg] - # ldr xxx, [reg, ] - if f", [{reg}" in row_parts[1]: - self._adrp_pair_registers.remove(reg) - return normalize_imms(row, AARCH64_SETTINGS) - elif mnemonic == "add": - for reg in self._adrp_pair_registers: - # add reg, reg, - if row_parts[1].startswith(f"{reg}, {reg}, "): - self._adrp_pair_registers.remove(reg) - return normalize_imms(row, AARCH64_SETTINGS) - - return row - - -@dataclass -class ArchSettings: - name: str - re_int: Pattern[str] - re_comment: Pattern[str] - re_reg: Pattern[str] - re_sprel: Pattern[str] - re_large_imm: Pattern[str] - re_imm: Pattern[str] - re_reloc: Pattern[str] - branch_instructions: Set[str] - instructions_with_address_immediates: Set[str] - forbidden: Set[str] = field(default_factory=lambda: set(string.ascii_letters + "_")) - arch_flags: List[str] = field(default_factory=list) - branch_likely_instructions: Set[str] = field(default_factory=set) - proc: Type[AsmProcessor] = AsmProcessor - big_endian: Optional[bool] = True - delay_slot_instructions: Set[str] = field(default_factory=set) - -MIPS_BRANCH_LIKELY_INSTRUCTIONS = { - "beql", - "bnel", - "beqzl", - "bnezl", - "bgezl", - "bgtzl", - "blezl", - "bltzl", - "bc1tl", - "bc1fl", -} -MIPS_BRANCH_INSTRUCTIONS = MIPS_BRANCH_LIKELY_INSTRUCTIONS.union( - { - "b", - "beq", - "bne", - "beqz", - "bnez", - "bgez", - "bgtz", - "blez", - "bltz", - "bc1t", - "bc1f", - } -) - -ARM32_PREFIXES = {"b", "bl"} -ARM32_CONDS = { - "", - "eq", - "ne", - "cs", - "cc", - "mi", - "pl", - "vs", - "vc", - "hi", - "ls", - "ge", - "lt", - "gt", - "le", - "al", -} -ARM32_SUFFIXES = {"", ".n", ".w"} -ARM32_BRANCH_INSTRUCTIONS = { - f"{prefix}{cond}{suffix}" - for prefix in ARM32_PREFIXES - for cond in ARM32_CONDS - for suffix in ARM32_SUFFIXES -} - -AARCH64_BRANCH_INSTRUCTIONS = { - "b", - "b.eq", - "b.ne", - "b.cs", - "b.hs", - "b.cc", - "b.lo", - "b.mi", - "b.pl", - "b.vs", - "b.vc", - "b.hi", - "b.ls", - "b.ge", - "b.lt", - "b.gt", - "b.le", - "cbz", - "cbnz", - "tbz", - "tbnz", -} - -PPC_BRANCH_INSTRUCTIONS = { - "b", - "beq", - "beq+", - "beq-", - "bne", - "bne+", - "bne-", - "blt", - "blt+", - "blt-", - "ble", - "ble+", - "ble-", - "bdnz", - "bdnz+", - "bdnz-", - "bge", - "bge+", - "bge-", - "bgt", - "bgt+", - "bgt-", -} - -MIPS_SETTINGS = ArchSettings( - name="mips", - re_int=re.compile(r"[0-9]+"), - re_comment=re.compile(r"<.*?>"), - re_reg=re.compile( - r"\$?\b(a[0-7]|t[0-9]|s[0-8]|at|v[01]|f[12]?[0-9]|f3[01]|kt?[01]|fp|ra|zero)\b" - ), - re_sprel=re.compile(r"(?<=,)([0-9]+|0x[0-9a-f]+)\(sp\)"), - re_large_imm=re.compile(r"-?[1-9][0-9]{2,}|-?0x[0-9a-f]{3,}"), - re_imm=re.compile(r"(\b|-)([0-9]+|0x[0-9a-fA-F]+)\b(?!\(sp)|%(lo|hi)\([^)]*\)"), - re_reloc=re.compile(r"R_MIPS_"), - arch_flags=["-m", "mips:4300"], - branch_likely_instructions=MIPS_BRANCH_LIKELY_INSTRUCTIONS, - branch_instructions=MIPS_BRANCH_INSTRUCTIONS, - instructions_with_address_immediates=MIPS_BRANCH_INSTRUCTIONS.union({"jal", "j"}), - delay_slot_instructions=MIPS_BRANCH_INSTRUCTIONS.union({"j", "jal", "jr", "jalr"}), - proc=AsmProcessorMIPS, -) - -MIPSEL_SETTINGS = replace(MIPS_SETTINGS, name="mipsel", big_endian=False) - -ARM32_SETTINGS = ArchSettings( - name="arm32", - re_int=re.compile(r"[0-9]+"), - re_comment=re.compile(r"(<.*?>|//.*$)"), - # Includes: - # - General purpose registers: r0..13 - # - Frame pointer registers: lr (r14), pc (r15) - # - VFP/NEON registers: s0..31, d0..31, q0..15, fpscr, fpexc, fpsid - # SP should not be in this list. - re_reg=re.compile( - r"\$?\b([rq][0-9]|[rq]1[0-5]|pc|lr|[ds][12]?[0-9]|[ds]3[01]|fp(scr|exc|sid))\b" - ), - re_sprel=re.compile(r"sp, #-?(0x[0-9a-fA-F]+|[0-9]+)\b"), - re_large_imm=re.compile(r"-?[1-9][0-9]{2,}|-?0x[0-9a-f]{3,}"), - re_imm=re.compile(r"(?|//.*$)"), - # GPRs and FP registers: X0-X30, W0-W30, [BHSDVQ]0..31 - # (FP registers may be followed by data width and number of elements, e.g. V0.4S) - # The zero registers and SP should not be in this list. - re_reg=re.compile(r"\$?\b([bhsdvq]([12]?[0-9]|3[01])(\.\d\d?[bhsdvq])?|[xw][12]?[0-9]|[xw]30)\b"), - re_sprel=re.compile(r"sp, #-?(0x[0-9a-fA-F]+|[0-9]+)\b"), - re_large_imm=re.compile(r"-?[1-9][0-9]{2,}|-?0x[0-9a-f]{3,}"), - re_imm=re.compile(r"(?|//.*$)"), - re_reg=re.compile(r"\$?\b([rf][0-9]+)\b"), - re_sprel=re.compile(r"(?<=,)(-?[0-9]+|-?0x[0-9a-f]+)\(r1\)"), - re_large_imm=re.compile(r"-?[1-9][0-9]{2,}|-?0x[0-9a-f]{3,}"), - re_imm=re.compile(r"(\b|-)([0-9]+|0x[0-9a-fA-F]+)\b(?!\(r1)|[^@]*@(ha|h|lo)"), - re_reloc=re.compile(r"R_PPC_"), - branch_instructions=PPC_BRANCH_INSTRUCTIONS, - instructions_with_address_immediates=PPC_BRANCH_INSTRUCTIONS.union({"bl"}), - proc=AsmProcessorPPC, -) - -ARCH_SETTINGS = [ - MIPS_SETTINGS, - MIPSEL_SETTINGS, - ARM32_SETTINGS, - ARMEL_SETTINGS, - AARCH64_SETTINGS, - PPC_SETTINGS, -] - - -def hexify_int(row: str, pat: Match[str], arch: ArchSettings) -> str: - full = pat.group(0) - if len(full) <= 1: - # leave one-digit ints alone - return full - start, end = pat.span() - if start and row[start - 1] in arch.forbidden: - return full - if end < len(row) and row[end] in arch.forbidden: - return full - return hex(int(full)) - - -def parse_relocated_line(line: str) -> Tuple[str, str, str]: - for c in ",\t ": - if c in line: - ind2 = line.rindex(c) - break - else: - raise Exception(f"failed to parse relocated line: {line}") - before = line[: ind2 + 1] - after = line[ind2 + 1 :] - ind2 = after.find("(") - if ind2 == -1: - imm, after = after, "" - else: - imm, after = after[:ind2], after[ind2:] - if imm == "0x0": - imm = "0" - return before, imm, after - - -def pad_mnemonic(line: str) -> str: - if "\t" not in line: - return line - mn, args = line.split("\t", 1) - return f"{mn:<7s} {args}" - - -@dataclass -class Line: - mnemonic: str - diff_row: str - original: str - normalized_original: str - scorable_line: str - line_num: Optional[int] = None - branch_target: Optional[int] = None - data_pool_addr: Optional[int] = None - source_filename: Optional[str] = None - source_line_num: Optional[int] = None - source_lines: List[str] = field(default_factory=list) - comment: Optional[str] = None - - -def process(dump: str, config: Config) -> List[Line]: - arch = config.arch - processor = arch.proc(config) - skip_next = False - source_lines = [] - source_filename = None - source_line_num = None - - i = 0 - num_instr = 0 - data_refs: Dict[int, Dict[str, List[int]]] = defaultdict(lambda: defaultdict(list)) - output: List[Line] = [] - stop_after_delay_slot = False - lines = dump.split("\n") - while i < len(lines): - row = lines[i] - i += 1 - - if not row: - continue - - if re.match(r"^[0-9a-f]+ <.*>:$", row): - continue - - if row.startswith("DATAREF"): - parts = row.split(" ", 3) - text_offset = int(parts[1]) - from_offset = int(parts[2]) - from_section = parts[3] - data_refs[text_offset][from_section].append(from_offset) - continue - - if config.diff_obj and num_instr >= config.max_function_size_lines: - output.append( - Line( - mnemonic="...", - diff_row="...", - original="...", - normalized_original="...", - scorable_line="...", - ) - ) - break - - if not re.match(r"^\s+[0-9a-f]+:\s+", row): - # This regex is conservative, and assumes the file path does not contain "weird" - # characters like colons, tabs, or angle brackets. - if re.match( - r"^[^ \t<>:][^\t<>:]*:[0-9]+( \(discriminator [0-9]+\))?$", row - ): - source_filename, _, tail = row.rpartition(":") - source_line_num = int(tail.partition(" ")[0]) - source_lines.append(row) - continue - - # If the instructions loads a data pool symbol, extract the address of - # the symbol. - data_pool_addr = None - pool_match = re.search(ARM32_LOAD_POOL_PATTERN, row) - if pool_match: - offset = pool_match.group(3).split(" ")[0][1:] - data_pool_addr = int(offset, 16) - - m_comment = re.search(arch.re_comment, row) - comment = m_comment[0] if m_comment else None - row = re.sub(arch.re_comment, "", row) - line_num_str = row.split(":")[0] - row = row.rstrip() - tabs = row.split("\t") - row = "\t".join(tabs[2:]) - line_num = eval_line_num(line_num_str.strip()) - - if line_num in data_refs: - refs = data_refs[line_num] - ref_str = "; ".join( - section_name + "+" + ",".join(hex(off) for off in offs) - for section_name, offs in refs.items() - ) - output.append( - Line( - mnemonic="", - diff_row="", - original=ref_str, - normalized_original=ref_str, - scorable_line="", - ) - ) - - if "\t" in row: - row_parts = row.split("\t", 1) - else: - # powerpc-eabi-objdump doesn't use tabs - row_parts = [part.lstrip() for part in row.split(" ", 1)] - mnemonic = row_parts[0].strip() - - if mnemonic not in arch.instructions_with_address_immediates: - row = re.sub(arch.re_int, lambda m: hexify_int(row, m, arch), row) - - # Let 'original' be 'row' with relocations applied, while we continue - # transforming 'row' into a coarser version that ignores registers and - # immediates. - original = row - - while i < len(lines): - reloc_row = lines[i] - if re.search(arch.re_reloc, reloc_row): - original = processor.process_reloc(reloc_row, original) - else: - break - i += 1 - - normalized_original = processor.normalize(mnemonic, original) - - scorable_line = normalized_original - if not config.score_stack_differences: - scorable_line = re.sub(arch.re_sprel, "addr(sp)", scorable_line) - if mnemonic in arch.branch_instructions: - # Replace the final argument with "" - scorable_line = re.sub(r"[^, \t]+$", "", scorable_line) - - if skip_next: - skip_next = False - row = "" - mnemonic = "" - scorable_line = "" - if mnemonic in arch.branch_likely_instructions: - skip_next = True - - row = re.sub(arch.re_reg, "", row) - row = re.sub(arch.re_sprel, "addr(sp)", row) - row_with_imm = row - if mnemonic in arch.instructions_with_address_immediates: - row = row.strip() - row, _ = split_off_address(row) - row += "" - else: - row = normalize_imms(row, arch) - - branch_target = None - if mnemonic in arch.branch_instructions: - branch_target = int(row_parts[1].strip().split(",")[-1], 16) - if mnemonic in arch.branch_likely_instructions: - branch_target -= 4 - - output.append( - Line( - mnemonic=mnemonic, - diff_row=row, - original=original, - normalized_original=normalized_original, - scorable_line=scorable_line, - line_num=line_num, - branch_target=branch_target, - data_pool_addr=data_pool_addr, - source_filename=source_filename, - source_line_num=source_line_num, - source_lines=source_lines, - comment=comment, - ) - ) - num_instr += 1 - source_lines = [] - - if config.stop_jrra and mnemonic == "jr" and row_parts[1].strip() == "ra": - stop_after_delay_slot = True - elif stop_after_delay_slot: - break - - processor.post_process(output) - return output - - -def normalize_imms(row: str, arch: ArchSettings) -> str: - return re.sub(arch.re_imm, "", row) - - -def normalize_stack(row: str, arch: ArchSettings) -> str: - return re.sub(arch.re_sprel, "addr(sp)", row) - - -def imm_matches_everything(row: str, arch: ArchSettings) -> bool: - # (this should probably be arch-specific) - return "(." in row - - -def split_off_address(line: str) -> Tuple[str, str]: - """Split e.g. 'beqz $r0,1f0' into 'beqz $r0,' and '1f0'.""" - parts = line.split(",") - if len(parts) < 2: - parts = line.split(None, 1) - off = len(line) - len(parts[-1]) - return line[:off], line[off:] - - -def diff_sequences_difflib( - seq1: List[str], seq2: List[str] -) -> List[Tuple[str, int, int, int, int]]: - differ = difflib.SequenceMatcher(a=seq1, b=seq2, autojunk=False) - return differ.get_opcodes() - - -def diff_sequences( - seq1: List[str], seq2: List[str], algorithm: str -) -> List[Tuple[str, int, int, int, int]]: - if ( - algorithm != "levenshtein" - or len(seq1) * len(seq2) > 4 * 10 ** 8 - or len(seq1) + len(seq2) >= 0x110000 - ): - return diff_sequences_difflib(seq1, seq2) - - # The Levenshtein library assumes that we compare strings, not lists. Convert. - # (Per the check above we know we have fewer than 0x110000 unique elements, so chr() works.) - remapping: Dict[str, str] = {} - - def remap(seq: List[str]) -> str: - seq = seq[:] - for i in range(len(seq)): - val = remapping.get(seq[i]) - if val is None: - val = chr(len(remapping)) - remapping[seq[i]] = val - seq[i] = val - return "".join(seq) - - rem1 = remap(seq1) - rem2 = remap(seq2) - import Levenshtein - - ret: List[Tuple[str, int, int, int, int]] = Levenshtein.opcodes(rem1, rem2) - return ret - - -def diff_lines( - lines1: List[Line], - lines2: List[Line], - algorithm: str, -) -> List[Tuple[Optional[Line], Optional[Line]]]: - ret = [] - for (tag, i1, i2, j1, j2) in diff_sequences( - [line.mnemonic for line in lines1], - [line.mnemonic for line in lines2], - algorithm, - ): - for line1, line2 in itertools.zip_longest(lines1[i1:i2], lines2[j1:j2]): - if tag == "replace": - if line1 is None: - tag = "insert" - elif line2 is None: - tag = "delete" - elif tag == "insert": - assert line1 is None - elif tag == "delete": - assert line2 is None - ret.append((line1, line2)) - - return ret - - -def score_diff_lines( - lines: List[Tuple[Optional[Line], Optional[Line]]], config: Config -) -> int: - # This logic is copied from `scorer.py` from the decomp permuter project - # https://github.com/simonlindholm/decomp-permuter/blob/main/src/scorer.py - score = 0 - deletions = [] - insertions = [] - - def lo_hi_match(old: str, new: str) -> bool: - # TODO: Make this arch-independent, like `imm_matches_everything()` - old_lo = old.find("%lo") - old_hi = old.find("%hi") - new_lo = new.find("%lo") - new_hi = new.find("%hi") - - if old_lo != -1 and new_lo != -1: - old_idx = old_lo - new_idx = new_lo - elif old_hi != -1 and new_hi != -1: - old_idx = old_hi - new_idx = new_hi - else: - return False - - if old[:old_idx] != new[:new_idx]: - return False - - old_inner = old[old_idx + 4 : -1] - new_inner = new[new_idx + 4 : -1] - return old_inner.startswith(".") or new_inner.startswith(".") - - def diff_sameline(old: str, new: str) -> None: - nonlocal score - if old == new: - return - - if lo_hi_match(old, new): - return - - ignore_last_field = False - if config.score_stack_differences: - oldsp = re.search(config.arch.re_sprel, old) - newsp = re.search(config.arch.re_sprel, new) - if oldsp and newsp: - oldrel = int(oldsp.group(1) or "0", 0) - newrel = int(newsp.group(1) or "0", 0) - score += abs(oldrel - newrel) * config.penalty_stackdiff - ignore_last_field = True - - # Probably regalloc difference, or signed vs unsigned - - # Compare each field in order - newfields, oldfields = new.split(","), old.split(",") - if ignore_last_field: - newfields = newfields[:-1] - oldfields = oldfields[:-1] - for nf, of in zip(newfields, oldfields): - if nf != of: - score += config.penalty_regalloc - # Penalize any extra fields - score += abs(len(newfields) - len(oldfields)) * config.penalty_regalloc - - def diff_insert(line: str) -> None: - # Reordering or totally different codegen. - # Defer this until later when we can tell. - insertions.append(line) - - def diff_delete(line: str) -> None: - deletions.append(line) - - # Find the end of the last long streak of matching mnemonics, if it looks - # like the objdump output was truncated. This is used to skip scoring - # misaligned lines at the end of the diff. - last_mismatch = -1 - max_index = None - lines_were_truncated = False - for index, (line1, line2) in enumerate(lines): - if (line1 and line1.original == "...") or (line2 and line2.original == "..."): - lines_were_truncated = True - if line1 and line2 and line1.mnemonic == line2.mnemonic: - if index - last_mismatch >= 50: - max_index = index - else: - last_mismatch = index - if not lines_were_truncated: - max_index = None - - for index, (line1, line2) in enumerate(lines): - if max_index is not None and index > max_index: - break - if line1 and line2 and line1.mnemonic == line2.mnemonic: - diff_sameline(line1.scorable_line, line2.scorable_line) - else: - if line1: - diff_delete(line1.scorable_line) - if line2: - diff_insert(line2.scorable_line) - - insertions_co = Counter(insertions) - deletions_co = Counter(deletions) - for item in insertions_co + deletions_co: - ins = insertions_co[item] - dels = deletions_co[item] - common = min(ins, dels) - score += ( - (ins - common) * config.penalty_insertion - + (dels - common) * config.penalty_deletion - + config.penalty_reordering * common - ) - - return score - - -@dataclass(frozen=True) -class OutputLine: - base: Optional[Text] = field(compare=False) - fmt2: Text = field(compare=False) - key2: Optional[str] - boring: bool = field(compare=False) - is_data_ref: bool = field(compare=False) - line1: Optional[Line] = field(compare=False) - line2: Optional[Line] = field(compare=False) - - -@dataclass(frozen=True) -class Diff: - lines: List[OutputLine] - score: int - max_score: int - - -def trim_nops(lines: List[Line], arch: ArchSettings) -> List[Line]: - lines = lines[:] - while lines and lines[-1].mnemonic == "nop" and (len(lines) == 1 or lines[-2].mnemonic not in arch.delay_slot_instructions): - lines.pop() - return lines - -def do_diff(lines1: List[Line], lines2: List[Line], config: Config) -> Diff: - if config.show_source: - import cxxfilt - arch = config.arch - fmt = config.formatter - output: List[OutputLine] = [] - - sc1 = symbol_formatter("base-reg", 0) - sc2 = symbol_formatter("my-reg", 0) - sc3 = symbol_formatter("base-stack", 4) - sc4 = symbol_formatter("my-stack", 4) - sc5 = symbol_formatter("base-branch", 0) - sc6 = symbol_formatter("my-branch", 0) - bts1: Set[int] = set() - bts2: Set[int] = set() - - if config.show_branches: - for (lines, btset, sc) in [ - (lines1, bts1, sc5), - (lines2, bts2, sc6), - ]: - for line in lines: - bt = line.branch_target - if bt is not None: - btset.add(bt) - sc(str(bt)) - - lines1 = trim_nops(lines1, arch) - lines2 = trim_nops(lines2, arch) - - diffed_lines = diff_lines(lines1, lines2, config.algorithm) - score = score_diff_lines(diffed_lines, config) - max_score = len(lines1) * config.penalty_deletion - - line_num_base = -1 - line_num_offset = 0 - line_num_2to1 = {} - for (line1, line2) in diffed_lines: - if line1 is not None and line1.line_num is not None: - line_num_base = line1.line_num - line_num_offset = 0 - else: - line_num_offset += 1 - if line2 is not None and line2.line_num is not None: - line_num_2to1[line2.line_num] = (line_num_base, line_num_offset) - - for (line1, line2) in diffed_lines: - line_color1 = line_color2 = sym_color = BasicFormat.NONE - line_prefix = " " - is_data_ref = False - out1 = Text() if not line1 else Text(pad_mnemonic(line1.original)) - out2 = Text() if not line2 else Text(pad_mnemonic(line2.original)) - if line1 and line2 and line1.diff_row == line2.diff_row: - if line1.diff_row == "": - if line1.normalized_original != line2.normalized_original: - line_prefix = "i" - sym_color = BasicFormat.DIFF_CHANGE - out1 = out1.reformat(sym_color) - out2 = out2.reformat(sym_color) - is_data_ref = True - elif ( - line1.normalized_original == line2.normalized_original - and line2.branch_target is None - ): - # Fast path: no coloring needed. We don't include branch instructions - # in this case because we need to check that their targets line up in - # the diff, and don't just happen to have the are the same address - # by accident. - pass - elif line1.diff_row == "": - # Don't draw attention to differing branch-likely delay slots: they - # typically mirror the branch destination - 1 so the real difference - # is elsewhere. Still, do mark them as different to avoid confusion. - # No need to consider branches because delay slots can't branch. - out1 = out1.reformat(BasicFormat.DELAY_SLOT) - out2 = out2.reformat(BasicFormat.DELAY_SLOT) - else: - mnemonic = line1.original.split()[0] - branchless1, address1 = out1.plain(), "" - branchless2, address2 = out2.plain(), "" - if mnemonic in arch.instructions_with_address_immediates: - branchless1, address1 = split_off_address(branchless1) - branchless2, address2 = split_off_address(branchless2) - - out1 = Text(branchless1) - out2 = Text(branchless2) - out1, out2 = format_fields( - arch.re_imm, out1, out2, lambda _: BasicFormat.IMMEDIATE - ) - - if line2.branch_target is not None: - target = line2.branch_target - line2_target = line_num_2to1.get(line2.branch_target) - if line2_target is None: - # If the target is outside the disassembly, extrapolate. - # This only matters near the bottom. - assert line2.line_num is not None - line2_line = line_num_2to1[line2.line_num] - line2_target = (line2_line[0] + (target - line2.line_num), 0) - - # Set the key for three-way diffing to a normalized version. - norm2, norm_branch2 = split_off_address(line2.normalized_original) - if norm_branch2 != "": - line2.normalized_original = norm2 + str(line2_target) - same_target = line2_target == (line1.branch_target, 0) - else: - # Do a naive comparison for non-branches (e.g. function calls). - same_target = address1 == address2 - - if normalize_imms(branchless1, arch) == normalize_imms( - branchless2, arch - ): - if imm_matches_everything(branchless2, arch): - # ignore differences due to %lo(.rodata + ...) vs symbol - out1 = out1.reformat(BasicFormat.NONE) - out2 = out2.reformat(BasicFormat.NONE) - elif line2.branch_target is not None and same_target: - # same-target branch, don't color - pass - else: - # must have an imm difference (or else we would have hit the - # fast path) - sym_color = BasicFormat.IMMEDIATE - line_prefix = "i" - else: - out1, out2 = format_fields(arch.re_sprel, out1, out2, sc3, sc4) - if normalize_stack(branchless1, arch) == normalize_stack( - branchless2, arch - ): - # only stack differences (luckily stack and imm - # differences can't be combined in MIPS, so we - # don't have to think about that case) - sym_color = BasicFormat.STACK - line_prefix = "s" - else: - # reg differences and maybe imm as well - out1, out2 = format_fields(arch.re_reg, out1, out2, sc1, sc2) - line_color1 = line_color2 = sym_color = BasicFormat.REGISTER - line_prefix = "r" - - if same_target: - address_imm_fmt = BasicFormat.NONE - else: - address_imm_fmt = BasicFormat.IMMEDIATE - out1 += Text(address1, address_imm_fmt) - out2 += Text(address2, address_imm_fmt) - elif line1 and line2: - line_prefix = "|" - line_color1 = line_color2 = sym_color = BasicFormat.DIFF_CHANGE - out1 = out1.reformat(line_color1) - out2 = out2.reformat(line_color2) - elif line1: - line_prefix = "<" - line_color1 = sym_color = BasicFormat.DIFF_REMOVE - out1 = out1.reformat(line_color1) - out2 = Text() - elif line2: - line_prefix = ">" - line_color2 = sym_color = BasicFormat.DIFF_ADD - out1 = Text() - out2 = out2.reformat(line_color2) - - if config.show_source and line2 and line2.comment: - out2 += f" {line2.comment}" - - def format_part( - out: Text, - line: Optional[Line], - line_color: Format, - btset: Set[int], - sc: FormatFunction, - ) -> Optional[Text]: - if line is None: - return None - if line.line_num is None: - return out - in_arrow = Text(" ") - out_arrow = Text() - if config.show_branches: - if line.line_num in btset: - in_arrow = Text("~>", sc(str(line.line_num))) - if line.branch_target is not None: - out_arrow = " " + Text("~>", sc(str(line.branch_target))) - formatted_line_num = Text(hex(line.line_num)[2:] + ":", line_color) - return formatted_line_num + " " + in_arrow + " " + out + out_arrow - - part1 = format_part(out1, line1, line_color1, bts1, sc5) - part2 = format_part(out2, line2, line_color2, bts2, sc6) - - if config.show_source and line2: - for source_line in line2.source_lines: - line_format = BasicFormat.SOURCE_OTHER - if config.source_old_binutils: - if source_line and re.fullmatch(".*\.c(?:pp)?:\d+", source_line): - line_format = BasicFormat.SOURCE_FILENAME - elif source_line and source_line.endswith("():"): - line_format = BasicFormat.SOURCE_FUNCTION - try: - source_line = cxxfilt.demangle( - source_line[:-3], external_only=False - ) - except: - pass - else: - # File names and function names - if source_line and source_line[0] != "│": - line_format = BasicFormat.SOURCE_FILENAME - # Function names - if source_line.endswith("():"): - line_format = BasicFormat.SOURCE_FUNCTION - try: - source_line = cxxfilt.demangle( - source_line[:-3], external_only=False - ) - except: - pass - padding = " " * 7 if config.show_line_numbers else " " * 2 - output.append( - OutputLine( - base=None, - fmt2=padding + Text(source_line, line_format), - key2=source_line, - boring=True, - is_data_ref=False, - line1=None, - line2=None, - ) - ) - - key2 = line2.normalized_original if line2 else None - boring = False - if line_prefix == " ": - boring = True - elif config.compress and config.compress.same_instr and line_prefix in "irs": - boring = True - - if config.show_line_numbers: - if line2 and line2.source_line_num is not None: - num_color = ( - BasicFormat.SOURCE_LINE_NUM - if sym_color == BasicFormat.NONE - else sym_color - ) - num2 = Text(f"{line2.source_line_num:5}", num_color) - else: - num2 = Text(" " * 5) - else: - num2 = Text() - - fmt2 = Text(line_prefix, sym_color) + num2 + " " + (part2 or Text()) - - output.append( - OutputLine( - base=part1, - fmt2=fmt2, - key2=key2, - boring=boring, - is_data_ref=is_data_ref, - line1=line1, - line2=line2, - ) - ) - - output = output[config.skip_lines :] - return Diff(lines=output, score=score, max_score=max_score) - - -def chunk_diff_lines( - diff: List[OutputLine], -) -> List[Union[List[OutputLine], OutputLine]]: - """Chunk a diff into an alternating list like A B A B ... A, where: - * A is a List[OutputLine] of insertions, - * B is a single non-insertion OutputLine, with .base != None.""" - cur_right: List[OutputLine] = [] - chunks: List[Union[List[OutputLine], OutputLine]] = [] - for output_line in diff: - if output_line.base is not None: - chunks.append(cur_right) - chunks.append(output_line) - cur_right = [] - else: - cur_right.append(output_line) - chunks.append(cur_right) - return chunks - - -def compress_matching( - li: List[Tuple[OutputLine, ...]], context: int -) -> List[Tuple[OutputLine, ...]]: - ret: List[Tuple[OutputLine, ...]] = [] - matching_streak: List[Tuple[OutputLine, ...]] = [] - context = max(context, 0) - - def flush_matching() -> None: - if len(matching_streak) <= 2 * context + 1: - ret.extend(matching_streak) - else: - ret.extend(matching_streak[:context]) - skipped = len(matching_streak) - 2 * context - filler = OutputLine( - base=Text(f"<{skipped} lines>", BasicFormat.SOURCE_OTHER), - fmt2=Text(), - key2=None, - boring=False, - is_data_ref=False, - line1=None, - line2=None, - ) - columns = len(matching_streak[0]) - ret.append(tuple([filler] * columns)) - if context > 0: - ret.extend(matching_streak[-context:]) - matching_streak.clear() - - for line in li: - if line[0].boring: - matching_streak.append(line) - else: - flush_matching() - ret.append(line) - - flush_matching() - return ret - - -def align_diffs( - old_diff: Diff, new_diff: Diff, config: Config -) -> Tuple[TableMetadata, List[Tuple[OutputLine, ...]]]: - meta: TableMetadata - diff_lines: List[Tuple[OutputLine, ...]] - padding = " " * 7 if config.show_line_numbers else " " * 2 - - if config.threeway: - meta = TableMetadata( - headers=( - Text("TARGET"), - Text(f"{padding}CURRENT ({new_diff.score})"), - Text(f"{padding}PREVIOUS ({old_diff.score})"), - ), - current_score=new_diff.score, - max_score=new_diff.max_score, - previous_score=old_diff.score, - ) - old_chunks = chunk_diff_lines(old_diff.lines) - new_chunks = chunk_diff_lines(new_diff.lines) - diff_lines = [] - empty = OutputLine(Text(), Text(), None, True, False, None, None) - assert len(old_chunks) == len(new_chunks), "same target" - for old_chunk, new_chunk in zip(old_chunks, new_chunks): - if isinstance(old_chunk, list): - assert isinstance(new_chunk, list) - if not old_chunk and not new_chunk: - # Most of the time lines sync up without insertions/deletions, - # and there's no interdiffing to be done. - continue - differ = difflib.SequenceMatcher( - a=old_chunk, b=new_chunk, autojunk=False - ) - for (tag, i1, i2, j1, j2) in differ.get_opcodes(): - if tag in ["equal", "replace"]: - for i, j in zip(range(i1, i2), range(j1, j2)): - diff_lines.append((empty, new_chunk[j], old_chunk[i])) - if tag in ["insert", "replace"]: - for j in range(j1 + i2 - i1, j2): - diff_lines.append((empty, new_chunk[j], empty)) - if tag in ["delete", "replace"]: - for i in range(i1 + j2 - j1, i2): - diff_lines.append((empty, empty, old_chunk[i])) - else: - assert isinstance(new_chunk, OutputLine) - # old_chunk.base and new_chunk.base have the same text since - # both diffs are based on the same target, but they might - # differ in color. Use the new version. - diff_lines.append((new_chunk, new_chunk, old_chunk)) - diff_lines = [ - (base, new, old if old != new else empty) for base, new, old in diff_lines - ] - else: - meta = TableMetadata( - headers=( - Text("TARGET"), - Text(f"{padding}CURRENT ({new_diff.score})"), - ), - current_score=new_diff.score, - max_score=new_diff.max_score, - previous_score=None, - ) - diff_lines = [(line, line) for line in new_diff.lines] - if config.compress: - diff_lines = compress_matching(diff_lines, config.compress.context) - return meta, diff_lines - - -def debounced_fs_watch( - targets: List[str], - outq: "queue.Queue[Optional[float]]", - config: Config, - project: ProjectSettings, -) -> None: - import watchdog.events - import watchdog.observers - - class WatchEventHandler(watchdog.events.FileSystemEventHandler): - def __init__( - self, queue: "queue.Queue[float]", file_targets: List[str] - ) -> None: - self.queue = queue - self.file_targets = file_targets - - def on_modified(self, ev: object) -> None: - if isinstance(ev, watchdog.events.FileModifiedEvent): - self.changed(ev.src_path) - - def on_moved(self, ev: object) -> None: - if isinstance(ev, watchdog.events.FileMovedEvent): - self.changed(ev.dest_path) - - def should_notify(self, path: str) -> bool: - for target in self.file_targets: - if os.path.normpath(path) == target: - return True - if config.make and any( - path.endswith(suffix) for suffix in project.source_extensions - ): - return True - return False - - def changed(self, path: str) -> None: - if self.should_notify(path): - self.queue.put(time.time()) - - def debounce_thread() -> NoReturn: - listenq: "queue.Queue[float]" = queue.Queue() - file_targets: List[str] = [] - event_handler = WatchEventHandler(listenq, file_targets) - observer = watchdog.observers.Observer() - observed = set() - for target in targets: - if os.path.isdir(target): - observer.schedule(event_handler, target, recursive=True) - else: - file_targets.append(os.path.normpath(target)) - target = os.path.dirname(target) or "." - if target not in observed: - observed.add(target) - observer.schedule(event_handler, target) - observer.start() - while True: - t = listenq.get() - more = True - while more: - delay = t + DEBOUNCE_DELAY - time.time() - if delay > 0: - time.sleep(delay) - # consume entire queue - more = False - try: - while True: - t = listenq.get(block=False) - more = True - except queue.Empty: - pass - outq.put(t) - - th = threading.Thread(target=debounce_thread, daemon=True) - th.start() - - -class Display: - basedump: str - mydump: str - last_refresh_key: object - config: Config - emsg: Optional[str] - last_diff_output: Optional[Diff] - pending_update: Optional[str] - ready_queue: "queue.Queue[None]" - watch_queue: "queue.Queue[Optional[float]]" - less_proc: "Optional[subprocess.Popen[bytes]]" - - def __init__(self, basedump: str, mydump: str, config: Config) -> None: - self.config = config - self.base_lines = process(basedump, config) - self.mydump = mydump - self.emsg = None - self.last_refresh_key = None - self.last_diff_output = None - - def run_diff(self) -> Tuple[str, object]: - if self.emsg is not None: - return (self.emsg, self.emsg) - - my_lines = process(self.mydump, self.config) - diff_output = do_diff(self.base_lines, my_lines, self.config) - last_diff_output = self.last_diff_output or diff_output - if self.config.threeway != "base" or not self.last_diff_output: - self.last_diff_output = diff_output - - meta, diff_lines = align_diffs(last_diff_output, diff_output, self.config) - output = self.config.formatter.table(meta, diff_lines) - refresh_key = ( - [line.key2 for line in diff_output.lines], - diff_output.score, - ) - return (output, refresh_key) - - def run_less( - self, output: str - ) -> "Tuple[subprocess.Popen[bytes], subprocess.Popen[bytes]]": - # Pipe the output through 'tail' and only then to less, to ensure the - # write call doesn't block. ('tail' has to buffer all its input before - # it starts writing.) This also means we don't have to deal with pipe - # closure errors. - buffer_proc = subprocess.Popen( - BUFFER_CMD, stdin=subprocess.PIPE, stdout=subprocess.PIPE - ) - less_proc = subprocess.Popen(LESS_CMD, stdin=buffer_proc.stdout) - assert buffer_proc.stdin - assert buffer_proc.stdout - buffer_proc.stdin.write(output.encode()) - buffer_proc.stdin.close() - buffer_proc.stdout.close() - return (buffer_proc, less_proc) - - def run_sync(self) -> None: - output, _ = self.run_diff() - proca, procb = self.run_less(output) - procb.wait() - proca.wait() - - def run_async(self, watch_queue: "queue.Queue[Optional[float]]") -> None: - self.watch_queue = watch_queue - self.ready_queue = queue.Queue() - self.pending_update = None - output, refresh_key = self.run_diff() - self.last_refresh_key = refresh_key - dthread = threading.Thread(target=self.display_thread, args=(output,)) - dthread.start() - self.ready_queue.get() - - def display_thread(self, initial_output: str) -> None: - proca, procb = self.run_less(initial_output) - self.less_proc = procb - self.ready_queue.put(None) - while True: - ret = procb.wait() - proca.wait() - self.less_proc = None - if ret != 0: - # fix the terminal - os.system("tput reset") - if ret != 0 and self.pending_update is not None: - # killed by program with the intent to refresh - output = self.pending_update - self.pending_update = None - proca, procb = self.run_less(output) - self.less_proc = procb - self.ready_queue.put(None) - else: - # terminated by user, or killed - self.watch_queue.put(None) - self.ready_queue.put(None) - break - - def progress(self, msg: str) -> None: - # Write message to top-left corner - sys.stdout.write("\x1b7\x1b[1;1f{}\x1b8".format(msg + " ")) - sys.stdout.flush() - - def update(self, text: str, error: bool) -> None: - if not error and not self.emsg and text == self.mydump: - self.progress("Unchanged. ") - return - if not error: - self.mydump = text - self.emsg = None - else: - self.emsg = text - output, refresh_key = self.run_diff() - if refresh_key == self.last_refresh_key: - self.progress("Unchanged. ") - return - self.last_refresh_key = refresh_key - self.pending_update = output - if not self.less_proc: - return - self.less_proc.kill() - self.ready_queue.get() - - def terminate(self) -> None: - if not self.less_proc: - return - self.less_proc.kill() - self.ready_queue.get() - - -def main() -> None: - args = parser.parse_args() - - # Apply project-specific configuration. - settings: Dict[str, Any] = {} - diff_settings.apply(settings, args) # type: ignore - project = create_project_settings(settings) - - try: - config = create_config(args, project) - except ValueError as e: - fail(str(e)) - - if config.algorithm == "levenshtein": - try: - import Levenshtein - except ModuleNotFoundError as e: - fail(MISSING_PREREQUISITES.format(e.name)) - - if config.show_source: - try: - import cxxfilt - except ModuleNotFoundError as e: - fail(MISSING_PREREQUISITES.format(e.name)) - - if config.threeway and not args.watch: - fail("Threeway diffing requires -w.") - - if args.diff_elf_symbol: - make_target, basecmd, mycmd = dump_elf( - args.start, args.end, args.diff_elf_symbol, config, project - ) - elif config.diff_obj: - make_target, basecmd, mycmd = dump_objfile( - args.start, args.end, config, project - ) - else: - make_target, basecmd, mycmd = dump_binary(args.start, args.end, config, project) - - map_build_target_fn = getattr(diff_settings, "map_build_target", None) - if map_build_target_fn: - make_target = map_build_target_fn(make_target=make_target) - - if args.write_asm is not None: - mydump = run_objdump(mycmd, config, project) - with open(args.write_asm, "w") as f: - f.write(mydump) - print(f"Wrote assembly to {args.write_asm}.") - sys.exit(0) - - if args.base_asm is not None: - with open(args.base_asm) as f: - basedump = f.read() - else: - basedump = run_objdump(basecmd, config, project) - - mydump = run_objdump(mycmd, config, project) - - display = Display(basedump, mydump, config) - - if args.no_pager or args.format in ("html", "json"): - print(display.run_diff()[0]) - elif not args.watch: - display.run_sync() - else: - if not args.make: - yn = input( - "Warning: watch-mode (-w) enabled without auto-make (-m). " - "You will have to run make manually. Ok? (Y/n) " - ) - if yn.lower() == "n": - return - if args.make: - watch_sources = None - watch_sources_for_target_fn = getattr( - diff_settings, "watch_sources_for_target", None - ) - if watch_sources_for_target_fn: - watch_sources = watch_sources_for_target_fn(make_target) - watch_sources = watch_sources or project.source_directories - if not watch_sources: - fail("Missing source_directories config, don't know what to watch.") - else: - watch_sources = [make_target] - q: "queue.Queue[Optional[float]]" = queue.Queue() - debounced_fs_watch(watch_sources, q, config, project) - display.run_async(q) - last_build = 0.0 - try: - while True: - t = q.get() - if t is None: - break - if t < last_build: - continue - last_build = time.time() - if args.make: - display.progress("Building...") - ret = run_make_capture_output(make_target, project) - if ret.returncode != 0: - display.update( - ret.stderr.decode("utf-8-sig", "replace") - or ret.stdout.decode("utf-8-sig", "replace"), - error=True, - ) - continue - mydump = run_objdump(mycmd, config, project) - display.update(mydump, error=False) - except KeyboardInterrupt: - display.terminate() - - -if __name__ == "__main__": - main() diff --git a/tools/asm_differ/diff_settings.py b/tools/asm_differ/diff_settings.py deleted file mode 100644 index 183b96b..0000000 --- a/tools/asm_differ/diff_settings.py +++ /dev/null @@ -1,11 +0,0 @@ -def apply(config, args): - config["baseimg"] = "target.bin" - config["myimg"] = "source.bin" - config["mapfile"] = "build.map" - config["source_directories"] = ["."] - # config["show_line_numbers_default"] = True - # config["arch"] = "mips" - # config["map_format"] = "gnu" # gnu or mw - # config["mw_build_dir"] = "build/" # only needed for mw map format - # config["makeflags"] = [] - # config["objdump_executable"] = "" diff --git a/tools/asm_differ/mypy.ini b/tools/asm_differ/mypy.ini deleted file mode 100644 index 138b939..0000000 --- a/tools/asm_differ/mypy.ini +++ /dev/null @@ -1,17 +0,0 @@ -[mypy] -check_untyped_defs = True -disallow_any_generics = True -disallow_incomplete_defs = True -disallow_untyped_calls = True -disallow_untyped_decorators = True -disallow_untyped_defs = True -no_implicit_optional = True -warn_redundant_casts = True -warn_return_any = True -warn_unused_ignores = True -ignore_missing_imports = True -python_version = 3.6 -files = diff.py - -[mypy-diff_settings] -ignore_errors = True diff --git a/tools/asm_differ/screenshot.png b/tools/asm_differ/screenshot.png deleted file mode 100644 index 3230555328cd9acdf388ce1626415ceb78760535..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 99842 zcmeAS@N?(olHy`uVBq!ia0y~yU^>LWz*NS;#=yW3>iJ|B0|NtRfk$L90|Va?5N4dJ z%_q&kpuphi;uumf=gr;9h|sJ5j(_}a_uN2va)T0E7uTa1lY)h2rq22tk!JZgWZBfH zq`vKQK9~CzYqft#Gxy$nX37~w({ve!^~NU@6q?Q`aLoDpn|Y2PA6LhRTHF5fi#OfK ze*3cc+`a0xTSfi-{Y4d91e`b&wIt47&T9a%S_J$LKdu+NX4C$?A@Iw$O>UKwjGQ06Q!f^FzPXg&qM?-hd|S`IKgm+Evpe2zGXDPF*q8TS+@?8=Ti@Hx z$t%q8%TIgb#V(@rddu?r4S5yj1qaV*OujLJ;ZL~!^X0)GJ=9ATPf4HrnLhE!o)sPQ z4v8mDZP}mp@t&yqro+uAHU6@7C|!uUer$KO{jaYT6JITpdh|(qiQ(ZxG3Q(5)jqtp z<*fX_a*|xN@%!gjD@r5krHgn#ot`{DUb(yzT{)3| z{$DH3+f$ooZ1@?qGCor4+184?l3pGWWm&@9B^uZKSK>=i z?i|@Q2G^Dg6@N6ieQjM*ae~b+qp0wQTXvL5o_?VAFlVl@^zMgsTh48tqdHaR%aJ%s z_lyiX`O04&+kB)>TzivK#K56oa8q)9rGD`F(9`c&c806Ccut<9KjX=sCwo@RC}GIT zGN`_;pHiN~B-tgp^%ig9k@nyd9UoGk-pmPDlWCg9_c+ey$@=$cn{A@nizoZ-3H?7$ zRWiWM_ulFK?emZMBzw>P`1wWfDed1CB^BT1A7fv;_{N4DEqCS17b9*welx}O$y^@~WpX=_@+MexF zrn3B->%E`ny$`CHWErwyCgsP@Xyf45nrNBvdiYQEMeCxdUxfp>er3p92SyCbQNB>aOlK2 zt>34=`DKrNo2{tU*pMGql=+*k9hEe6Y>T_4urOX#@ zm@IkypuBSLO6k67QkR7Dld`z3_x1)b^ma>|nr!@2`t6spzt~#F)Oo%$S=Pj#y7yAv zpg5NMU-^stfA_XF+cF9+5#O@tW+Ka+o`vsM%k9YeYxrhmK;|{p1&a@E2tD)i*#zs_ z4!gGd$M{ojzFcH`=#u;2bNk!=@M+Ajy0WzNK7Ymed^0so<;WtVzxy^V%ZvT_<#XZ= zmcR1zYs=dn?OCtbQegrPb8)w#xGCXQQ&yGCF%gbmKDp-q+vhAUOBQXcYy217erNBY za7TWPSxjl2CQHujZRP$kGmbxM?X?S~8ikR9)-&uMam=2zb)oO<@E6u=`QOL=XpA)e zclhNK_qE+zRiXi1ChoDB*H|rEa{h_We`kJfcW^=XjtT0OElVc}R`8YJ`zFC)E zNnau?tdpasrKO+uQ+jeCf6ctViq7t}-Vt-_crxSPUKBo|9lG-V0h5)O4su`CUn z?v?e#(vO`@NJPRT;DY6%OI;7``WJmjNEWr0Kju>_e*3TS%qmsQAfQIbW;JH+*(CrH;49 zIew+yH>nD%=TkU&fA<{H{>;*N@VduIqhtH#v43;h-r=+Bf8m66b?Izn!5lrOj=fx3 z{vzCb;$Gu#MUNZL7_PiNKk{;Q@Xs$nfA;;Dy!-BQug!YQlD7la&f+~bD=R{}@!ToS z>ryLImc=N4a%0nSyYlvj-q+1~1y8HAs*Kg8w!HUNZ-4#fM!8-7{nsDf7_;O*Rp{P! zJmF~+^XffEU*{hyG*#O=!`+cv@tv||Jjcn(la+yiFE6-nN`Wg& zH?5QAdIAD-=Y22Go_kr_KGAED{$K092b;I+UQAgkATM`h-ih1l>l9P-PAgViR=T#k z)}#OX@{4-fecrdlHa&OHSh>pUjQr=Bnbxxo&b3QAwp(q5q~;wC{-pXR!7nnG%vfZ) z%H{F7mPcAzs z9+?a;r#FcB`}|0>iCG4}AO1A@teqD(JMQu`!xdfjk8AfotO-1(GbJt7 zi9@l-^Bi}e-bw8T-ZR%laqs&6#xuP?rR?0@6Rko#Yc8$v=1_FeJ6WkXPxh1Rjwvg} z{B}spPrlnS^UcmL50uxXZ`V_75!k8nytSgt<2nbp!4Rk@nrr0*W-6ZI{Hde^X+@~~ zRQj_f@XW`GWQq6XUv=*B-Rm;_TFt*S+4u3Im@L6p=EwhjRqS~aw7sb;#(b$?c>J#F zu&OUDznnU{9E{s#B)1eMo*(IrmwgmpL5H0zoHN$fIg5%YfBR0HpH_Myn zy!=#~{Ht48Zzc8@2o{U$r4?PDCGk}E^0joK*ZX8Woj)(ya^phn!lOI8<>&87Jn}Ab z{)evzcPRB*>D_z${N&WF-|n2gu~S!m{k>D=i=}M#*nheBX4YTLZoeBBaxbZG(f?o} zyeLEEIj^$i{QaAztxjEQ`+d@!`fo2TEHALtVVx2pm16VqQHapLSx2kG=bYfZQd^!0g6-;Awk zH$Ftk%-BES@=Kd9dEecQbK*6o#;4v`@GIv3&*W+HefqzySRbwWBhtL-nw&#+tn~YL ze_vdG?7C`pR!4Qn!8aadb(Yg_bw4-ASi#?({?B*OnU_jk%};6!C(h9q-Whf6R`ZiT zo6l_MuJrZ27rCp)@44F3eR+ZhPPCt|o7?jCl%vm$8r~eMPe=LXA5X2WJiWGdzVsKj zIY$21I|8%!FPWYEZff-WqxF~A8Ky3ITes(PJ!1;6cG)a0|F)}^HM zeBVn`S&D=ndzfT;KK0tRMapQ>E%yCS4lno}AD?xlLgI9tRR7|oUPVVV%htr5`R<-{ zQt|u7iHX0RnzP&GDpKDjUpv*e$zaNGL7)8_X--}ckbu>W4ozE8}rtY%LXtZmzWT|fEjx`4d= zz@x|74U63$zRl@wHJiQUMX}6{4Rb=Rn|5X=!BkG$%C)!b%-mk_-aX`GBYCnC41aR1xG^tl<;m)w-#=WQk(rZeTo)JDF@^c2 z_>cE33vYu_2ij^&%|Ds_GCkiZ?2Rkm-%q-$ z|LRZ9yU;n?Imd_T>YeOl*=K#;&r17DKBPw6Ro3~X@L^%K=wK=L&-1M=8!9I<3h%yn z=hUD7?|zmcW=F)5yoFg;pIFyu%-svwYU0&#HoHyrp`~5mwN0&)#>hBwS z)zN^l;|IBVG1?CI|4|6^{zP6QhvhZV>tNPsGO056}8t?fmi4cHbXOmG^uTO=Z8_ z-Jn}i`!3S&so9>ZCueHEZr@x`Y+-qzGdNKqH2&c2{H+h4FUUP|{~lNR_DyBp_hNg6 z!!PVymlDuFJ+k^o`J)g8>q)`CmEP<84%)!kd&_5GoUQwm&4FyKowKA4{1cY!$^WWk zdM!@Hg55;VZcm7I@8bWqr{3}d$BUFWd3qN9&wjTf zYrEk5$>;S~UAL%KWAoh|wIf4OPuj$c_oda3*tq;xZHt$-eK|6F#;il7$;u)IId`w7 z^u4umx|Nc@=k7n}52`DE7D;ERyh#o{aMw0er_`3uwD*dMs4;i(%=-ZyMovZh5+;3i zRk4guli2Y$^h?!+tgUQQb?3{~Ze9K?W#U?`kWIVN^Bihru0Q@Faq~t(;1bIq5uMq5 ziBCQ^uCaRPCg1PyZ0~>5#IQPK3)~myQ5Q8eTnJc zlld*Le(ZVFcy5Q?+qmk!6|w*3?7Qr__QxwNqoX|B#;rYHN|rpIp6-I%U#gd$e;5_(993fC>3Tx^=ps($`}wD4E?sSr{;DJMhij9tUXkLVwpDy>H4b;L zzi9gI>L;Q2@WHD%>B)cUWF(J;u6hu8{a}ORnSQ&vBB%4hb7EWDdRG^w^KLn3k{8qZ z=7D$1)AH#I4&igv&W9`h{^aUZ%z(8=puL|r=D}%1v)ww5D_h1Zoc!tJaZX(NnG0GplcI z#qX^ZOqa9*r+VkuOStvTI&#uE{Y2G!-D7)ZpIP5n_(J>Y(YV8htpj|Ydljg7tv|Qt z_CvPzNjfW6?L4xr-f8~JxpRwkXIwCmj`}WpAoHxJ(AKGihJ0zS_h~e~pW*V43-~J@ zz9~8;=c}|hQby9O>_*1h4ck4H-nj{GPe}ajB=37*VgTE>im7Q~?Kl4)5OK)*lDAE+ zuKOeNa)YS-^O~=hgk*kTle60KFCdmx#@_s2+F|*u{-sPzrJ1jO2tiUjT@9U~P0~+TT=*6ErxH~s~7fb%roEWw) z*Ib#NPo4*wZcX0p&UtfN>wYVlqH62HnUw~!nb%Ff{X6fG=EOPr6F{RHPil@XE-fgSG4FS{ zZDF{Q;kOUVYPX-;bL*1q>LZu`6dQF#JKTC2%#xk;G3ofclJ~bJhDX`7OI6N$TwPvl z^y%KbUs{}s3s>Z=&Ah*rd;Qju<64F<&K1pzj0}wFGdaGulzms(+Y{QlS;>`;P1yZh z3%RFG;XZCL{i)Mxz5I*Y%h{!(+cwr-l=)X|^s@1|99N%Rv*eptS?zS$gVEmvCT&kV zBlX*8tH06eeLp%M@SNBwcXsWwzc21@RP~!^zp?6cYEUTmt8MQcFZa~{$c(>ta@|U| z({Z^gYwEOb``^D^zGg%1!bu`iTdTL5e>CGxdj65!`ptcnFF!PeWM_TK+8$Su^}4lN zPkL>$?#kn4AFuzcu0A4K@+U>G_>+RTX=%pgwfwgCDg?v-M%MidCU;J*T zvW{2tx+w0dZ`IS!o$a;wadrPs3NXgy&J)kuCVm!N}iu`V|zjGj^`6+C;4u5)4zPZ zT7YkA&xPg3g$v8%yX}7WF}q4iDse4W6PB);^0iL-M#(acU}a9lQ!*zjC+eU4Y2>-f z4ctrX;PQM{DCPuWi%zN$M6lLzh-AO|F6VW8)-lzPM$OV)zb@U~Jc&_w6SrcEM%kp# zPBvmcm16E`ZZoN_w=-tnvS`}m(331Pj)_e_mMdYEF1OEjt*T0^z#0Q3R zTE6)eMQ|#%D1y3`yPkOHEiO5i|G+$(!Sri?oqup*>XcLKjdB8N*ZsF?f7<@oyKL1o zNDsq)(q0LZE9}xcV-;EiSSQU9fAsP)qXy1#)7KehdCb9Y!VMEHnF+nOJ?(Sb;OFy; zOMKp+4nIEsRd%u0l%$s@rQd&hu+&Y?=6Oc<)}@A7ZcNLs*BzR2R`3NQu9kb`k(3}E zDZ`9Y2|D%jPYM0j^!ZjZ$4Dy1`pW_BZ28S*ac917UC#Qx++pLP><#kGaqD_FH;W$o z6_TVUmv;MBXbxY`^Ml_XuE=a$6JOpCuJ+~0)~w$*BsBBS2rgPP0Wlc6;PB@ECUzOJ zN83_^Ev07m9XlkKzFbGim?7lR<3|gp>4tHsNJR!;jdOMiVcNdt?S{a-0@Zyr^EtY5 zldVds1xtSyh1H0AI#uymaYs*CkzMZO-;F1*Fx5g&A zg`fW@-+ROPk7R$DKCau-@%eXuq#JTG-TTF%Z`KW(SEWrBrd`rM6IC%IWU-dXt1I&x zjh`pIHgB7{T)sxT&+F5}Sef0HGsVuz-q>R4rp6<_$Y;VF{T@(3ykbVlf}^*taRv1i zJxdV~pY-K`>$$nRVqN@mzLaj*eB5vGgcrtrsq&E<(mqsd3oSd~C-3~_>nGU>JB>JP zpPc`f+|RN5jfdac?meGThjk?-M7XBj?n_L$%ka;(%HBLg_gsG{+l5_^o-rj_H=R7S zechpNzhi&h;AWY_^GHmfM2SUAe_{Cj={HM`&2M23*D;>a{g6xlN{OR4&(rV!CJLMv zI$3!bGL-Dbj%#FfHG|g6>x(?MlpMNvNa%GKui>Q^8She0pPL=J(RYW}mOb4vy}r)7 z`0A!#pS|m0#!5xok7~=772LhS!OFwsadeevbNe;bjGr8R%b)z0Zkxh*;D$``T(7EI zXWg&F-l(f@d1JujckIIVQ2v;$|5R*dG-OGw%+yK~dv=L2w!_G|XrG10x#tt-h(GP% zQ_xOg|LiW47`)kROXg>;+T~v#-sQG8$UatYF?Y=*VM#ZU^N*igYkKun|HEZA-MM?C zAJwhXim`P{Id?g(ce&3>uj8J^A4{!He!pMm=is6x^;-OeeJRH_*NC3V&3r#@++H~I zhw?q)&thw@E(~ScR8s6bjc4AGeQK@KZ_2Gdw6^5ZW|24Akqaiw%l8o5cK`G8ra0Cq zf0zRd45k8{dGIB@cxf~JLCRj zpEPLOa{uUYd-p|Zt%B2DIP9JGc4b{1yLbKd!1SZ9znGOiI<_<5l2#SFBBZVMx02WX zE%#Yowz;N;+pj3Gruv13yc_^vT11%KzoS1#51Djnh|FXmHGC*K2U$k_`xy8gc-vgpjjIrTM@K9_@rV_n$Q zOx_rCtv@5o!WOTrdRpRlmD~;KyGllyw%bGeG^VeA@#5B@URz_nNdoIr!!H!reZBVK z{Imi~!JxPNv}fw(LP-s=t%U}s>hmNgSN)x7y4QTFzy8tp-S(a5yp>FC zr=9px?fq(l?^(yQUP{lhbXHa!m|(>4D}$-8#c0Fv)h3&*&ird%_lNh!`|a5)?$2zz zE5fvRQ(@Ih*Iz=A*RhjQ?qU-+y)d%Qsg^a25FeR@3=gwVdhgrd_tjE-dZhl)RXJ!?Ip)HNUF8 zOoLkKi<|e^&rW3hQyMBagEKJAz<2E-&hb*+IL?1_#fNrU1j0!g-dQXmGbz`@O^*&`!j3zr*}7%naFQ$ zIH@0-{By?n8)B-Ank_4KfGQia6AkBsmaV?l6zAM_@uu?3x!Pt$3tgViJ*oKVyXBeR z%5$eZer~v~H~Hiq`MAOdM>l@{P_5hjw)pwR*h7IFfsLRl@683#I2RH1tA{wn9~ZBg zZ7|t(`lre_A#X(03UW?XEIYEVHQOcV>& z)EGgHYggXePU$o4^@A9QT%fb z9Pzh%WP88-#V0T2RVgh6YATJ#=UN`$;TFD3FaFGrZI*vF|26U4-fpTjb;a#ko%z21 zTE4gM^KGA|w<5f0hs5^>JQJek?Dl*9dEe9<*2PTm^1A|^7Iy~kEc(DvSh~w-L%Hpv z@Bhy}4UuftY|%&u&t&aXE^p~><>YNYcW8aHr2F)rhG|>mwfUq!e{zpEShMnGvToq> zKWufI*#d(9C%n+K*!Pd~ztl&jm-V{O;*G^NYM<>+jITMA&G$Wiu{LZ(vXbvK|MBT> zO3ZIgeDkMBuU@6vFk=P3Sj=*)`qWhBv`+^zQAC=yp_$BMDqiJ^XrhGMF`HkI6 zg~J6VtXq6@2d~e@_@fP;w>|cJ*D=mL{A9lSWTU|!P;|8wEBUcSAv z587{@xjRq)q?U~ReCMyG!Y_ZeN$OC1(XG!1=gs^X$raQYUX z^i#I*N2fn`2Hg0@_@&S#{`8@JFS~clp8qswSJ%0fcJH>GjIoiAJ#szv)~`jTf&UJSS(}>$K>+#kAU#gR>4k zz8Q9t(YluB;`P(T4r1GC8NRYvPuE>^v1j9%f7|TX`Q0CWc*MQJ{_KO~lY!w|(4e)Vxz--3KRM@hwMe z%Jy3-x)e@=wdhuuOz=GLYw4TNTgJtAqn`Q8cr8ympIEp2eZSYQtrj0!#7=K~yW3*^nnka4SNttvpJkQB zyUufC*3kzGOF5&q&U&ob8k?M6ocT6_?Q4Di)&Hl}nP3B5HAk-QQhYr%ek*87_~43d z?CXB6oi)oXYgX6H)}18|;)~9J8=rsvUiCWH-Q~xzE4n?l)fDZM*9h zbL6f{v-}&HFNE_ZtcXfTPj6e~udHX*nsZcU_o=iMoF7&0?aM6Ip8G|I^|Y5*|D0#b zE_^*T9W+(^iQfS_B=x2J*ECMWd2-cE6VkSLdbz{fooza&gpf(SbhEd z7vbQ`dIf4v#Gdi-wZ_*z_q5+KBhb0sDCjQ#)de=ee? zA7#>&O)Jc@n^Nx;iJn%gsLa?=^-bpFcBGN3<1y=NG~tuSpMNKqlr7%2+N;9D<>Ie1 zoQhuap41#vdHz{z@*Hu|c0Qks8|fl(Gu1hG_PKdYGyL||W`p@I*OZ{R{mbVB=*3^W zxV2TfI!#7JG4Axb1rKXpt$jFO_u zqMZI$|62GjRPF08dl=6){*wM~BSn)MR7ZPJkN$DH*-wo^ignV{yxNnxuB{O2weDZKJ6W~oq{`D@qD=KO zPM*5Uxs!e8tW!(5!%vp+CjH)M67cZDw!e2W0-L#~%gF>ros-y9Th#RPWqkYs>5KEX zFRweB5p0{eF`VO$$>jXHU7rptRz{nv<$kMPra$#{{khatFE!l0{p@&|?|kSf^O`xE zrtDvLf47Wn;=kFJ_g*Xi+JARKgQ(-3?aO&0*WWfxiw@X+Tw+&i*2_2_)X{d|k~B&GQv|qObKmOBOTuxinix{9-HQVsghx4jpi@i!ho&u-XaQ9k$VAwj-3|7&Er`HxS(;}JjC_^sXVNgH{cfBb6J{NaB3ij`BxC(oj| zqPQvYMzv9f7g5)j$z^L=rp%U@SoTO=>~BG@4|jOfcgc?TA+6cX&k79QmRTmp-0Dw% zWl+B8|GmEdt8`;}dsTlmUeDHowPSuJPn(`%!Ia{@>GSEGSK@5i9i3|}Y(D1;Jr(li z2<(HjWZa2t$-J|F;d|QvKEB~ya_qzMRS(`WFF3mObOf6@XZq_oH*fHMU;H)s>XM@5 z`&rZO{QU0Olvnw{_-ya2J}JJqlY4)eeUoXpFQC1xPyXQgg){pjrm6T$s$)EQ8gT8v5qWTEP2%^5gA?-B!A+ zzBhNpJkj3sPqu#9Y_6#NO{u-^=d`Q;rhD%H%ebuYQR_5Q58F*`k5~ST-6Xv!ZdpkF zg_c>K`wg-mCIQ?#hXPE?T(Z zZSbEfTbgxbjc0KNi*0zgNBHmaGmHFll^H~gtKaB`D)r|i-#_`erDe|31K;C6zfRST z+M3&S^KGld?BsR9p8mUkc08y%^Ys*;@`Dr}x2?7XSD)Rk2)Z0{M(0ebmk_L^yzgEV z7os55u%<)yjQmHv#m{q|%(*mS-{pO&SEn;)WK6Bz_Qa)4&{cHKou~(~|C#J_E&6wt zd*4|d-n#ms%QKs+r5c5;x$~2jFB6omnrQ6)=jXfl&o}11^Zee&dx0^_PweI@C)L%} z&x)=bFSPaRpV-SQw*CL-Fsql5T+^oN$XT8}`*91tla+yqcWjSsp3GtSMS695 z{fP^K_l3fi%RAo+cV@h@#Nd#S?27A~ZNHv-|LFVu^5TPwW%tguD17Xtktw>cIe_u@ za+j4_tK>{(?TMW#=@=nmbA5x|we8y1ZQHX;c{49wRJnUk+%mDHrFnIAt`ApKUEp=^ zm0o|@LNBzl3eUUGzIdbb*4WTP&Pp23=g)SssaAQ;t!6nN)WlJ+GFX^6Kd>Too`S&- zDb2`ZH?Ds^aPNiKM9-HymliqgtZ{X}E|&LZX5oaE3f!(dGX1mg!G^cY z2|3PNv&${=wV!_bFT`*DrYELTf2^Hv^kB8{cOJEX4WGXpI(&>NR$E>w z;+=w(YQAQdq*$m;<=$-n7#ZD*_q>#Ted4T}^G{aV|1O`d?Zo|c2TdLa^1L*f$jaR7 zvAe3vKJDBS`{(c89$Bt_rr!8?b*;<)?b1RUlsbNYo6`82bph#(hkH8TMKlI#EaXdR zuuMha8=F6Ir;~o)smz&PAmS7P9*VGjB6@nM559)O#|PDKx>xt5BsuqQx|h#9``nZO zStpK*$uB*DGW!KcF%6@M`7*NHtg?X#wVLDSqo zwT+65Ki0>c^I!f*euZ~;@%5WJG7k^@JAZuRj}OiE`fgU~w`#wsCQG+{_{tvqp?})S z(iVZI;4yHGa@c^(yjrflx9Z0ACC*9PbdrxAQ(kiI)u9Hv($2e|%@tp^>MKs~%GA}j zxzzvR_ObgnDs^}sx6Q5GJXtt=+h1oFu?2X<3cUR_>g6ht8}G_x>ij@|Vau7MA3{uNZb+?@4(6FTjZFzpi3Sg&U-a zLBe23(B&<>lk4StPkq@}Q@Y0`ou_^k*FC!iJR={h(h`1J=HJ$)ot#@gU**L#cDu`W zR=iyC@PVl93+05#C=IPP=YvU#hg-R0c=y?OAoJQ|XM`>W1Xo%>h9 zb-FKpLrw#yeZ5t8!{@4~tE;=G3i&uqoFAHr+!*=Z(p#l2!zgm*?OVh1ok~W}=1E+$ z_~>+6YKdIr;g47TXzADNJuu}J@2mjhm*Q!;!>2Br%SS9j zpGt{^Or=0p>aQSYDn({OYp(o-8)3)XJRj%OsEPHiO3KY`TI|ZEo_ELPAJ_Zf)dw^hA6?_+ZGb8fkyXScs3OlFLj*%Xov6KYxb@f`$*sY>-ULc>ibl`VDUv z`|ogEl+`$Qu4I>8?~WTHn?#G>Xw6=zc4TtI6=}^Zsf`Q8EsKxLfB(<4|Lx0pCGT%2 zY{HE(4?Gvxs=XiC;=@{P~ zoXap=e3NY2UNph=cJhXzwT+?o)P}+U4J$_x?N=Sh;LN7y|x-sbA*z@?}KUZT!x z^kDOpm#elexIQ7Vh-urB3b2S%QwFo?tRJ7DTve_B2x&p!4$H5Jn)9K)P`Efr- z_PoQ@2Q;dxBkgx3?^8^5Il4F^c>nhRt7|58USDTF{`X73t!!nqqxH$zLCaU`-?h~~ zS*gjTW~nbX{mGwTHOu@J$Nwv>S$pzye(B<+-H{Vd&#<+hvvhw>isOB&^XC||qFQ(9 zMg<(-CBnDz(wfx_=(&pzE20vXSU$-=H`nD+RWBM^i?zDE#yt7r!t@8Ai zuQQMA%6GqXLFUSnzcr?(rcXSq{^5SoOqSs8VsU%B%EKLZH`_gY-CXD@RT=Z=ZKV-t zUAs|P-s$73w|~03f{lNE@~@1tv;U^Js^`2gdntTNykZXLM+=qbr=4OaefD3sX6y5~ zNuQ5C)_gMA>rnjWiuYZ@Hy<8MnNr8>)nTaj_PBBB4C{;a`N!+8imf|#Oz5wR{sR4# zyGkm`-uw49WY+u$4^Gps5?*iryy(ap)5C4oA07D9I>(RQ<6%_+TRXw1%h!G1kB7;7iuApAZhil`{eH^gl_#yer(b+| zM}@7XRO$QP*KT$--(IWag!3gGdX~M^x_;q0!Nu3=Jk5{aS-sM(`~MPt1})Fqe=DB< zXF9>wW6S=){7Bc@$L=4pGtwm2dw0*>Yw8&;bi%Vo`Qj4QsoFO$Wu5TIlK(S_zxfh( z{E^!3;sdYGKID0EWzMW^TAT;nZ|?gRU1uj(eO|iHWJlSH#_(%)X}No5{J-73<(o+@ zXnnld;j{O6jD&WI)ph=T{p|DKk4k5bW(HI{yuLX5e0ZHhY`U@0qVpfV|4LnRPxRDV z-K-0hfgIfPPp+B!IZ)cU|l;qaB_W(a+Bu%iAHpmOEqiEU^>6O4%z?o&4ig zZ|m=!XyjN|sb(3^aI%tFOx^Oo#-z{Z&14&9Nu9a(mHVdbY=^ca*R^HN5+5Im7%A06 zR+>qRWJmSRJiJ3(_~+~0H+A~2J-o9-IREPYbWgS^fs?;~djD{_;pH2b(*Eq(GkJf{ z>3s+4)p=5@=h~f_abwElVztehD&I{`d!Dv_IK^wrtGk`AA}{{%iSxFv7T%PkU-V*n ze&pNwnI+EW-vq7JZoe^uW!28>$E?oCPCxTnCiB7R4ZGYUzBn#;_?Gp+9Jj;I4Av&| zRbM}op1Y$>>MfhWgU>r7e)p!iCdA#ynp3ebl{ct=&BKbUI?)-IFO>6L-mM`Mvwgz< z7!Q`&;*tg%rF&z~{QOr@^l=+|z!u4vdz)tTPPDZ6`6c;5%gq_f`yc%0d)ijG@Odla zC4V^;gTu4Mqjqe3RWDxrec`d0Vr#P|6h3nIyL(1A-6Iyq;-V*R(R_-pj~o1`77cxU z?m=SfRzKCBAN2a}&hhDf#+P$TMtSm+>B*BmgG!l}CpC^L&*$gvj8)#GY`Inc)4BRM zF0+M!vo)`*e%?`J#w8QCuv%LB+oq>W&B9=~An>JZU*wN((bAHkFU6*$(lr%s0_i+CHc?wFN&6B@7xb@F% zt=y#lnO~x6YIIa-YVp76Q)PbV@OY~&El4_?H&6af>*H>>Vy(3q%R7R0^5&NoJv;U5 zq0Su{KfZ!TArfv^!#{kB&i!GTA^lMcJ`p(ee$ktnip{~LN_92;`t@8VcRQ!}ve$0k zecZor>+^467Q3fzjsEm5WbTfpbET@yReR3dI=o+adC-f>#1qqkf|+mBD>Z*y8@J@x zt!|d*4abhQPtRIf_+`KQ&d-sF1+g<*C~jO{=G}Ro=nVrV?DEjtEHvR_v^F!m$v5ypW*xCD=6~h8n3G@ppJl!7R_>8>=3~!hybif^Iqz9@ zO-6QA&~1%rw(5uHzfdtKxI_a~a3_^*zg{a8)^66fuapI>G3>nBIf*D%*^$QO#iszS#WY@;Q4_DLQmT zO6mEU+Fusyj=wbAwDI7g6U<%StMynMtFpROyhdj79PyAILT^of zbZufMe_7K1L;jXeggU$r1tt~u6{%dD&Bpk&-Z64RM2JW@^SbAvC&j{}-oIVsWbs*l z%R(1d*2G?0w?8je7e(8s3oR&gDW0RP(XFdFFPKH}rq+SRpM2R1Y@T0ky|~d?;M!yN z&drU=&s&wBG9HjQ{3(=^<(|=uxZ1Xh$Db>lo-S`&?Y<=H_o~ES1+&b=X{3S z-Fwr;{M5QkJy{qz2d zRd2ivFC^aT?lG!6aYw!{_{rtQg|S_c`>m#LQ?5?9{lVD!l7GDQt%5wehUom97CU2Z zDVIwt7xvyb67$B@Go|Y8k++NUl$NMW7y7RDMdrJ~_Y#eSqqn(#T5ru+G9#+v zFQ3)(p1KL0lednT(6;oZL!R^v$@@ymX6u)gys_`N_qJK{PGREjooha6rwFq63c@4&Pt-7(i+@8!(A!C*hXt>lHY@8LbQZ~QhrUZ$(I|HYs7 ziCpjQzJK^{pIKP_7iIQ!Cqx1kl@%=L1+9qjKIeVzy7MiD`sd<(Z!J5wMVd6b^(8&Y zJ^Vskwo&o7%5SsvY1wl)H%!=#E&udPq>pLFx!`8mrb z6)W+X{&CBbwd<)fcX^O`=k)#ElQkK+`rj*tUGACJ>|S{L!@(~v?+KW`G_bzDKC%3g zY1QvTlg@lpVHPy!OZfqol=;4e{ zf8XOS$kn)4&Dhe4=X`+d#{KJ_9{E{(CZ@G^ri)aG{_xV&TinteJ;-rhSC=*wNzFLC&Uqitr6 z{R#d2Y15v+(Of=hc8+4w5m}er@1Cxo`<(xVzEa+ExgN&3FRUMxwcWWi)6Giz7K1$3 zw*M#Qx1a9s*nQ@cMwE?{GDrU1sf~x*F8*KkjYZ_mvv%|6pM8C9dTV6ah0Yi6o3gw| zQ!x1g1Di|ArY~RlZ_bNdw@l{FbY;esyz-}CbI*S^@8RBzcMA^+$eo?=@Nh?2=fml1 zHJ@+ef6no)>XBWP+`k^y(|%VL?u(?@R>;&=iZ(_pB{9< zE6wk3hxX2hvsdqgU)|EeH~(}rf6K<=f605cnQgsv+{EjG$Fq7n$;W$k&)B?hS)8*V zgT}s+*&o@?-TnR~Xq`*QnvRn#4$IUgojOe*dQu#viy z`XtunS$<;NnX47E7sv%Nz4&=T+veW&LtX!8pXcIqSIn9Mv&-NmM||q4XoKD_?LR(! zv|M8w)*D)q^>d%hvS%Cq?wx5fyHLGX__S?M@E(rLdgF3ef29M5Id^N$KGG~5@!^Yj z&Z=+G8jFImMqv|8X$~UL88;Q(Y92b{V&B=_U!Ki;FR%2! zb$3PebJO`pe{)^DRCB3)Pp!Z3mZ$%>&pN$o`THkl-=^M={G8Zr=HPzx4*DUne-v z%zJcl)6DN5i({U8FJ9GZsPnH#xK>Wyb^iq3KND0Y*Kik_dYlV)15G4f3Aef+X!);F zZlB@I_xI}iay`{d^8U53MSEzm1)My0rY+5`LMx%<)1t=xZF8Q;c|F|GU&HFtn=sR(c3k(YXsh}2=v+e zJylMBSO4>{DeG1({^4R+;NpKpRQ|(5anC0+a$el2378ao`Wl=0g}Pfd^W<}q|2|*8 zQNz)B@;~7jA1)+LG70 zT*$kRE2HUUk+U$@wz_lYnz-HxM)ZF;`}q5&MMov#YBmY)er|iXU)^i}=CvDiHi+_9 z^~gERP;HGnuamT9zwxx5#eY6uK3=o!lf^P_v(=Nfr<&gGp0}`iJ40Q}EH&X;?!u#< z=feG9q4wzMW6qzqZ|twucQ1N-Adv5^1$W1;Z?f6H2 zV}#b7Ns`G$N9=&2B5SMGx;!??C3;6f6)oRO zoc!74ajtup4|{^=pXTfDZlCIpt-idwT>f2E9na&wKm9xP>yGZT5sePAIa#7$vBx?w zw{OD}YhCBX`3jE$m@T$WRcU88jorT`@o?prM!hG0EV}u(&)c83ooSm$*xpYv-v0Bd z4MMW*US74Z6R%%?;3LQ8=P8LHcRzeBb=~-U@=QjJc|U&bT=Xm@*`_vm`H_~Biypjx z*w(ailI;rdzcaHoCxnXbv9%4*;PrSjb4mKG!cX6h`93^!JgrMRZyncBH{sIXa+3wN zwm+%4s`6a_lkmyP!1lR&12#V^dNe=&$D66{JHI#fcjg;T)7;*+fFUc-=HoGjsQz73 zueFDNzMY?KacPtNVr#a^rAB>+cG>-KzuqDEf2LE)CG$NWpE7ox`@Qk)lf;`~JbUcXByDa~N0m&vVK(ooN`m_08X(!Pkz5+k9G) z7r-H9GyA49PtMOr^>6e)9=Ls5IzL~3&RSNHX)6Lsx=ft;^Q4Vi`1Y0QbZOt?opotf zwECZ3cTYW?+mphh+4!=X3*YkRc&>XOwNs8;)$2S=NJ&n)@v6ZfHQ&g9#XpYE{N zlpmaZglpf#xtTBDwyks5zqRYXqu0Ne8v;G!ziOS|X>;Ij^1rj(<<93m`qq4U{``5S$d*YngY6%EP~AIiwQ9+an0r+UJ##+69RMF+@OQ&7NS#K=b%8HXd z-_HM3eQ4>uje#facTKiCbm*T3hK@ZX#@vwkbxms|O` zd`64FBO}jq+=Wj)-G5juHF}%#l@Z~?vI5%}i zc*5bOjtnpF?>`w{t+#!T6Gz~8ud?8*TIWH7sXBL+W=a|(XwLt66Kn` zfjnDeOnTYd-KXhsMhQ`r|DpYS-N)VRx59q^&UXG~{CO?wo?q9jZH)J5`Y~wy z_)^uSZ@+JTS=+0evln+=5VFcK+stOUG3}ksy}NTF*P7R6Z~Ggw?^c*xKtaCYgqQkz z&rkQRPrtco{*Ri2!FO&R{C-DZ%kmAsrm9D5I6Yg?|Lmh{36&AbS$$7x&Q6-Me_K{` zrONa5`Bra!E;;_ZImqGmqtkcic%7SH{PX(Bgf*NSW4=9GryRBZnah2%X&aTRg`O=^ z+Jkxeeq6KVd7o!@ymR( zoPT})|FBv2=GFP{mbu;b=UtKe^kU0}@>>}DQ$>>Yft+CcyRd;1c-y?d6X9QN+1%d}MuU-Kfo|IyuU z$@O*)B`f&zqO^Bvw%_=2m%ZkfyN;_?!?a_Eg`j z+MFj5u^EU4^u?~%Ua$R^gPP(6;fMalF1+E9b;!`H?x$4z`!mHh0b3bM_9a^hx0Nhj z+3)4|#w<+d*Npe&X>&Fonz-$0M%=F_iBYY)g63?RU)p{D`R1#IbK;I{ezj}GtmyUW z5nn>Q|5fA|$;(>QnmamAt`__B?uE;e7xt%I*fH_Wm3^wb%(Wkit}hmQ zz9Ijj&b-)J9e3v)S?}+gGV^NGH`{W7$>Ltmf0|$3wQ-uM<@0-I1GtkT{ybItWn zrzrhH(K9SnC>+%B-ScG6lN#HQWdE&K_I%xASu4LzO1|p+obxkg-73&sAa-O^-N)!P zCr>Pl__!qUzvi9qFE)#)`#qi99CqMX=TYMsf3|k5>P`5x#rtM=Z_gGPC#6}BMdclp zi>;z>`=v&$UaM1K!FIV)eZOwDy0=)a%Gx87PY4F@e7-U=#drSEO(s`A?z+Ho`DvS) zNY39mb6G`~b~lyIzy{7VMw zcImB3yR~=bj7J%}O8B2&W_I^(_7?W~F6XOp@2hV0DKY1wl=v=x5oY%uZe~?32BvH>`?FbKX|;W4Zs0 ze_wd+Rcp&${l4$-Wue8>@cN^k0joa(>#yY4=Zr6t2-* zwLt7m!sB&GY2RLWPIh(g+}gM-P(Lp#?8LVGZH3RuTMz#>68?VP%Peob)q+w*<{5@- zrDxjPpFB0Cd&)JL(-&D<^?aols`lP8VDjT|00qw?mFMRt&Dp>2%JJ_qt9&2d?Rz-+ zxZ#3ei^g|SKF5?|ViaQEw=kKOsV-0ZbM}z?|FngV9Iw0IfBJ8)_s_S}!hhB*vyPOu ze>C;Gd8mb&?^#d9t4kJk_N#O4?3?bMe_%ndp{Q8skNhpZ%9-z`9K3axb9(8dEJQOu z{LD6$q@+s{_w}2O-Fli5UU6~Gse^wrGk%#bo+xIt)-*&sOYU}f{?ZRKGZr1*uk=mA zWbaOM-y*XQFZ(u^>t^k`7kjAv^AYdM8C$;ZxA}Xtu1ha!pA#2XXv|$6qx}m7p!uoh z?~?}~!#Cb`Tz%E*%S|iS%mWXWKQq`GY$$D4*Qx&hvxWZtzuNA4w|41Qx9=#Qb?C2b z(vOmGi{z+d2LBJ1cfL2AJ8`Xk+1;eWY0SMvb){i};;L#sVyxx-+q>?cy^wJ+>1fvO zKURBx?3SOJ8_l@Xq$^~_#a$YAHg@eVKJ?=1a#gEZ>0jToJwCmf`o`MWW3Afj*n<~d z>BY^lpZZ|!`VU94vpv?nG4FfSHG8$w#*-~QGQ#2gpfRJTpmy7SxvAEVbs}`Mx>hrW zvwEG{9(~orZ=LM+3jsA#-ll|9?VFNdwp!zz+z#ytwR@j0)throu=c?i+I!oA`WL7Tut{f5EBMi}Z3n&hcnC zCwR6{?QxTNU#{oJIgiAYqFEQn_^nmS)4x}jQ`p|Qm2W|82*)kwrTu3vv$J00<1t&>NB?!! zye7vZ{*~YP8hLYDMc@1_g0-h(dAehd9XyjHvi%v0#oY3@tG}zM9Fg9u#-gu&p_1+L z4o}8se?lg0>N?LU{`}hGnZFNZ{Q0Jv^6m6$3*#0KLjlv5iMwR}G`Mej8g$2Wa#DW$ zo~`?SR6n0IGxV%-L}=`d;2RrF`#P0>U%Fb%E&chNZSmD9raHHa)Q#2cPCI`)n&Wp> z@JgA0Zs~-&gZs2H?IU0Rc=!F{9-D8G|8jqJm2z_V{_1=F?n6r0nYeH%iPZLB;Tv7+ zWQ#RQ_?G=$u(2nvsOx^(dUf};Zm}Vu^DcEgJ@P63ruD0Mn?DnpDnG}BEuZH9HS5jl zAS)NPVAo^IWO>+2=RrP0pC@YMk*z!|k3~ zPu)d9iB0~S@;_&7J2th?^io^@)32@m#pgf7nS8&Hz|o&};zOd#?js*gUz<{--sqID z{-jSI-(lkr_c!aaEd$FEViqs^bZ3T*U2P@j#-j<|{tK7fjyT4@ukpbW)tYaw3%Nqf zqwZQw@;h3;ImP+r$#t9$+ivF{eE-2H?2Wd4*_u_m0#5pF6EJ+lwjs!T}p*%io)G-rO+t@^^~}@zCiQWAA#a zWbRCVbah(e;adqYznP;aX;&Or$|7W2CUbX|+2Z399`eZ6eLH_(L$FSC^_=2+#f5zj z)~UZ+{Pf}Zhz)OC_Rd-y8pAv3v*@Hb)8|Z|vwr)O6DK@&O6)u(;#{0pUuQSDDa@$& zm3z$X*1|0%YJ2SZM(yKdD)8Gx^JZPaerq33a~o6Gaub*rcEIJ#FmieH)= zn0(xD%WUD<_vnR?^oBmZlY z0Ay61I?E56Ntw(f-|ONB+EdFtef0%q=c|C)Sv zZe8@Gw0)Ml+Z{8p^Z)wfzlSGhsVKUvRkqaEQn8HJM(zWh!{`IayynnmQ)2UZ_%Cs7 zN(#TK3SQq|RnK>gdD7?W zGoIAsE(zSjZk+xze$AiFU(T;TfA36d`yFU^X2Kn(eaB>0uYZ+yrF|X$zGHJZZ8OB) zM6MNH^z2lyaqgQgnfa?7k%#U>p?bUMW8(Z<)_xORZ??qV_K=osX}Bb73QD2j@Ze-&s5M{L)%~ zY1^xU$|GMFe48tN-TdUw?A6<*x)=TXwd~+L|Ee09!otp!lb_V4`@Ft7XSTZCaqIVI z7v*>S6I!>X#O0pZJT>ckPhN&!dsup2wxo>h=x?`WzWK+NmG4iP&zZGrpUD1wKC`d1 zeR==<z($7mh#Q6PD!r zX#Ms0r{DLS^Vzjs{GO=EqSNd2S6vK~)#%^hcV*k>M^>tq@!q%mbG7@Q{3%@qdk5dwgTC3S=1&D?@B7{0|G#6Y z2kV7P6*rW9-px3$sdD`T>smAOuxkCNn!kHb*v@P|JEQaBPqywG@4mp+0{pS5d13gp zZdQKXT=(x`#ijDO40GSlIMi4ety8N>2<(URMv>*Ok7m%Z3`cOi8e@*ZD^04GOpY~J1rP8Z+>8*Np?X{$s?bS*4 zaQ{lyw*L|Rue0~pLv)+Ir(?c9c4+AJQee;`JRUzo^&f%ztN}Wk0{Tw-#^~l zZ%sM$LEA;QBlYj2?GckFI&XaBx%pr4j`tVSHT~wCQfFV=&@0@XZtyc(G*tTFlg#Ox z#HA%OEn8enj%(XBxjie{wr%dIEn(4-9}0MuWyvNmzg>Rz@y~;1*XsXCbqkr8ytHrR z)Zg26{Z0E1gJn87rUy%QF63m5wogxYbhS3PkoU?aPGZ@HpQpF~c-0}er`qV@NkJD= zqYq!t?U|*^AG&?xs@IFMmffA*soA&8`+I?%ZNV0k9VQD)-d}8a6nlTu@|=zG?%$ST zpVF|DRed$HfF;1-$M56~s*|ULT~u1GRT&+&dG8C!UFF;ljxWtjKfhM%^=q#!SG`Ut zzfu98?pk^B=dPM{^VdhoCcZwHs`IO~_NC~lb(3F6)gM|i(R_2p>HL&yPZy{8CY^6v zVq9-4_S)z7z4MoLl`5P%_~a7X;#Jdc7Oau^_fmM9y>0XNd8g8^muJ5)sFbi4w>dKJ z(5u|YkFU?pb#}7cSz(p0>wAFh%`M^n;2Z6CYSZ)g-QPVYNA!Z3+8)6p{{_33E_(ap z+oL|kM3uVV`f>3^Oxg{T#hKqKe^~kQ(;Pdl(5;5iF}mA`$@sprOb zPu}_=xPH(6lMCZrZmF&1xW06wmD{TiSlq<*tL50!#n1ySFc#F9r(=awDK!EkO$d4&rP2+XaB#L zVBo=no@T9vPZhj8RCNW~@sKK8VI%r?^{3o5Y_As; z9M}4HZl?EoJKac`^^5EGx2deJn_HXCw(@GqUTuk}yC*;E_aDtZtZno0UYe2iuhxQR zkJs(ksU;%qJI6R^^{QXHg1|BLwE=V@*kf?d+5M^2Au$~>(W6%zRx_!F&K2HeU{%I( zsOpbK;ndJ?U;V`WUUS$M-mgD5iMMbmugi1SsLm=^rl7*tCyuaNZ>)dF!}s&tG1Wxz zjh612GhX;^XV9IqGi`rG?afDg!r8J8yH^NoY4?&3T*#}crNxo`#_*B<_366vggGx* zF0wqAQtB@!L8z8J*v)g4g2U8MPL zmgmOp`uC#Z|LiS3c}DBHjrQvGYf5Xr|IUb$`>peTTg}m3EUjv_$BWA=jI`6%TUR&T zLhE|0^)OB4J-zMD$uphjKTW7LoE==svQ^f_TXxC(`Z;>rZBpAeUov}^K~hKJ`OCxc zQ%G@w4|^H;OyTNxP{ z^{4z>KKIOI&lk~d#jiUSe%Y(YYi}I?&Q9+t8Yq$TV3;zwwrcc-0rOH;p&TboSPMGW+@(S7kn#pSU)=W)La&{ z6+13B|7ffW46e-ck(O_I zI(4vCGcH%sVh!)Ht@ayKcQ&zmc_~~>K7Mg+rg0UIHKzJ}L41?$J5CSLb{V3i126^mdPV#j|B0b~8SjoYv;LlXdO- zRQ-N|MM}_yy5COgLyxj9w3eh_xlzdT_SunV+wVX5-qO7Ph02r%z0wldzNIcU~F#Z=bcrWc4ErMFGg=tKB{MXu6S+yCf?VJ!B)Ob}Y?(a@yQ3CDyC;wQ#3*8e)EARhGE; z%Jtb{a*8gMlRhs>n)G?=M4n#ol!(CBpxW8ykQF){4pxUCy@h#@8I!=(HwrUnyE=pv zs;=G|%XG9Y`+3fuKkKh{cv$P@ZsP1Px(=Epxl!16>X7x0e`n7G%#J-KblQnSaUFM? zjnne9gbUODh1!a_yfOOjU1#Zb*`RyF!k;(FStf6}yYtm|@cm3b> z>~!%~O|vhFtUuhv7yj0rafapXR=tT}F9d!U-8p&N4c6YI!;9-rrRqzsshIZQNs{x| ztqUFAzHhMb_;^}1BSNv&TPjI!*AH9oqq`dp2ukia#wxu3-qNW1@gL8rf4F8dhvD`^ zhM?pxD;ms{dfm)lc>KNAujFmI?Rh}#iWiG7ab&HY^uJo;rTVIyjH@4hE54Z(T^UfA zm33sjw_Tfpwv=nL=~;(&YW78wPRV9p?ff%UQKNY>r_7wbr?V4^ir2@kbk%&x!L8^L zyF6<{+DpfcNo(EIUnk|TH+h`cvLMYec)r{xt#xU4tR+6ajp&#>+3V}|69I)UCo~t= zFbnaE306%PJlyEO^|h7dPKeXNRSaET3#=Zq$*ki3&h)2REcvdams_dz!GOnapKrRl z?bCt&W0ABe{~9DM&SJZ~e< zLjkbUa+gLFX2-WkJ#W+e&b9y2!YL1`&ui`pYU+%B8&#Da813+3|D}un?sf$4F1`L< z`Q@sNE{++KdbYd2jQ?6b-=cW>#clR8Cf7>^1YUGceRTaq=bfpIFY>&OzZEK5TDm>) z^p!=kw%jNQE73E%lYi!rrCGy~;OEyi3QhBU{M+b)WwY+_seAVSJ!!X6+xFho72LJ6 zV|dKUgUaGkUbGzRTIelSm+Na$y&_=I(MgYe4%#!O91UOmxTebbt&fHDfmw+P@8#`_ z9+f_SXRa~*0_V&f6}LA&-!)E4EMcZ&=8jTe94u&^}j;G(53 z<_kBPdM?$)G3xObHAIg8 zn4BC^kTtRSeuIdKYT}Zk(@J-B&(*vk=1{j!%-Sp_D*f?&ebMSNXQN=5-LZN8C5KZq zk6hToqPp`9lf%Xb*VeF@9+bZPa;uZf&FKpz&T9z2`L3M2S$LaJz!x)vusf}nD#RXM zUB|J>#vpdd)o7NxM7^-pat^30V zK2p5b5^g>0%RX=8lYL0*-4dzTll`U(n3m;8x1EgKVY+2vwZrR**bJ|NZ>*mkYmb&U z-{tz4nZGclS|Zc>l-=U34^!K-co!AuAJ{&Z_474@OXbt^j!#+P{?WG8|2k8VU*$YW zuSLr$CW!`@eYbM#e>A-#zTIh)UqwvhNz?ZFzLds=eWb$sVhUiC<>gt4StQ z)SfI?er#=SwBhl!_acm*aT3w0ms1*KUmMy7UEdvQ^XK;HTS?%MVRiaoGG)PaOBPu4ASvthy$Z3S_#i zXI#x|AoBRGvGjR2Rg0Yscb7O`Yzz&bE0m>alXJjsi9mV1{F#>z?rdV%d$RY;kD}v? z+`fe#d*k-YJkg?ZT0+OEgZUv`e>qFJ$sYZK>L;dN`TsLmXkKgi zhok)Kve;cM-#-t%+8Ww?mn~{~x5>22w^!@_H9XpMeSydy=}e6u)*Zp#P9BkOJwK}M z5lQd=ykxnNH{$KEC@+sn}7w zY)jRK=^o~9q9$7(a^eV#&dk~2^5o%FJ^t?k*4u*LJ^3fSx?b?!`lqGoa-F5RIO`I+O5+6+jFh$ zYLsL9(oNrZ5=s@nHwe$m{akQ9=wm^#Vs-pZaW>PdH^NI-dfjY&>RPu>S9ViS(H|w} zup^<$vWbcmCb^Dll9ethMXqiUhy%rgN1)wp|U1NIC9VsP^6J|I&5OUTSJ?e0a~a zUFoRk>||DUN@Nn;oNq;bw>V8`m^@dH_YAx?v$L_5Qb}e1ENH0X4%m3BK*AWc|kM=e_ z`uwkQo%ONFZc<-7R0F;)R0uz+X(BJK8&i?IWzx6c2Y%o7#W?L=E|~FI(O!Cva`A_c zzZYA-kW0HGmAUctnjPED9z1@Y^YNuknMdAKbr~PrJ5}&KkAD}Jh{#^a*w(#M zPu(iMx$)+E*TCgIOurkXq+RNMR#vaxy8hIv18obF<@{LBMfh;NSi57(xr3);-QP{@ zN`H01MDKv_dmq0!C5P9U<~leW;J&^K)OgcMC|_i7tou)exXw}2kDsPBnO^4f4N#mH zSXp7F>lppS$?@iofa*5ww52TH%XU_jpE$gDC2P;Q8GSpGjk3<&?9+ATXH>JXo^#jl zUuvK6-e);}GkUf3&VK&bck1}!OwL({HXnEAG!QZ~SXK2Gcn zW=`%t_{i?> z+*#o&w(z=!hMd`(!nh|(=S9C4&$s8g=3?HZd2n;G-o0F3i`9A(|9MobKbBO6n%qm9 z)7z@1(^*Fck^8AZQepeQ=h&{ThC_cZhvSN$DV%;mjBCj12r!9V} z8T_c_tg-xhHmjccAAu1O|7?m1;@2Im*s6c5?8t1VWY*^klMXLUm5Y1(`NO*z{pp*N zN>tZ9S;wuid(q41C22M6X%8p8a{qPj_3uX;^#YWXm6!6h2sm}jT4Mg#Sclc#pWjdS z)8Zeq`VNL(bYCiP?RHaUsz#>!su@cU7*F5edGkh?ncCA8J&9`ryLh)pPvXdX=yGiP z!6&C=4qcyfXR^2xhho-*N4bY~FBV*{z+1U`&-y}j35SI$Y8@u`Q>1u2)H(!$`se)n zy8h7}E%Ef#a^0THdSZ91qzX07Cd|^9`#@@GMB)3{P667jcTyWKajsKcqO8**;B-Z0 zFYDfOt!w1>p77t@qT0KjL$~#{lgBypMd$Ux)sD8=tr58Y%<@G{h(WfdXQA@n^mwkW zb+MVRRYJQ}FFSk-$}gIf<-J?L$OPO|aJu6C>5ema#TDxMe#p5wdsRRMf`AifHP#wI zQ&;&@y^r4|=lth0`F3r>{4Mi)z3m=-w)YQES+C5cc;u^pQCx?Wd)Tzqg6Fo({wJpY zMgQUX*8C3-%d;)sU1_}-+$LO*VHq8)7x6ciL-9zdYf)UsE|2B8h1TcK?rJVO$mSLF z{j~bNRLp7h>=EA`;zSG}5tf_jCk*Sd3^zz54CRCCYw3yw{Y?OTTYF^0&m-U z(jUzU|2WgO+5g)~o)=CX#h&NFK~eZ?RY}i=yB>!o9?mJY>&cv;-pT%bbK_p0_m?LG zh+Dk5GuyhorKsp*$-Ssq4ZJtDs>?0kz`yhNxqCJH%PnuRTHn~Qdd5uKs!J&s1Cw$W zWM1i>Jxg@c+u6AyD;6NHN`F4B?cv19FQWeSAOHRBNd43EDOYy2T)|iaulZfjw0r-( zc!%HO@(-u>-`-H^ZNzB1dx2i%#QtqFv&!OA-$=UO*jTNvdf;BH`h&UOcl=#9`)A>Q zucEBGh9XWe#gjfyoiImy(LSs4YaN%>r!lS2(&Fk`v>^9VS3#`Q@1#lRinO^3%dTVH0$cI%yzkP43*g1$bEVVjPOm>5{^9l~(LdY%u&237 zU--fPC|vvb27}GXADymgZ#Q~=+I7#jCwqBb-V$gI`e)3wZr?(dooO3tk7n^bU%8^p zeAa!N34V=NBi$}etPMRNb-wRzriE#KWR$oQN1@@Q&!RBra$M~@yDsQr@#^mRi_`66 zb|j0|KR>fHeEu|@zUvqF$2(67-+#`oc<0(1K@ne173L{&Yo>Sf-v9BnJ=CYZ z+K%7v&Y5pN|37%qyhiJLsG{f_tpz7)Dx5k_K}IP%e!ZOY`Q)z0`|sHPsk}Dl`;_Bi zX?^P2nHJIf#Z#aH@Qh;~;Ne;y<_LD!oJkD_kzPB*x-!N-y z-}^fGv!|2iKfOO~eZ=$y7nZ!Qc*p0TcJxhY%KV)TTMLtZu74x@RbQ^o$GbHOuvAE!RsQGfjXZNH=~yBzD6=AYQH zFu9^)0>56FaAc?9pB?#XoUhP)s`1*P}Pr|J`WU?_lp>#gBG-^||=^}}qNz@uLZU|;-Q?BeEj%CdB-X4|tn z|Nhjdv93*dcBS7UW^Uz;sSa*?KB|6yw&&1`>DR8mJKp2O5$NxEj=QjSg6g#OMzJ2{ zdD5m`3w1yLczspgLaAGjQ_*FvlBNEUug+G7!e_n`^HKh*xUZ&$FT4MwvYukgifqtk zwYn3CWyd8g;HnXI*|AQGK(Mh)btMVC(#nmh2wxSrh(Q zw7V?0sJ)`qeZ!m|+}`^ZuRhPMc*Hctwx`lxsOwSNx}SF~Vqbr{lD00lAkUU1_ni3* zKb5$dZ#5V#Tzy^N$Nf9FR`m8nbIo%aj3yfU%op+JHeb6d?P{2;-*HsxyZE#{pRb*_ zJ9|NL`nK(hbR+!(lmv}%vQCBb!)TwWInVrH2gsLK*PTDgFCCu{BN#1+;1j%Q8V zBItCbD9dowN{OjSA+uA$TIWbD;C|N`?BQ(^_4Lwm*WwK8Dv`Oe)sM_)7;~NeH@_CO=DUBK-iev7+yNmK1}{Tt`z@4m5>SuZ!wY4NEg$DF1tKfKpkPw?)= z9Tv`oO50+%rS>n=_!hEeqkZtC;DBGAM}>1E;=l0DT38qq$eq0L$ohjxXSDxr{O=JH z-Ij3oyPay~^7*$lGo<_unwm&|{CBS-f494ZnfZiy>kDCB}=DHi{w0_X(F?!?x0LPhvxHi|a~nLL6F2KhWAX}a*XtX!t=1=)oO`EXC3}NwgX*9DM^DyVIv*0a z+^NIr*j{VBxp}UyU-d-I=`j81?{&#|)y|2lJ{`X(vpRLvsY;WKCiX?&&mAiIl0Idb zvff9(NsDh6I$m6LgM0FZ**cW-Za@FF za|^52{M(mW*Ct-K<=+Qe3&1Jxt=(Y~+a!w#0!|#Ay>pMu&N&^WlfAWM%bd5{&wf5W zQ8&_VQr+=ssW<0+f4y|iqvB_0&b&7_p8sCw{>;ohvkT_--~MM&=C$Bz&f%zH^Q80P z8{0RZaN(Y}U25+lF}GdC8@s)}tdcPLs5Fl~VNqwZCc!{qmm<$vqFw6p#0zgMpKYqa5>>jm!q68#PDFYMvjTqpV^=XjpHOO>63>jb}^ z6rqfgf%?Q&(!pT6~zUNN}H ztp4aD%q7t;=la4dNJP0uaEbNh-NGFgl6rQzdF<_)J};-R%W&F$UgfVMFBjja;^I1R{=F{@1zPxT&ZmQ;CQD{-1>AIv{{`vEmf#T~$`t=Pf6ep}y-XZIs%+KS;S+4r< zZ25xMOmocM*zP}KzjJ1gLelo+saq!9-O9g`uPaEyPx*gWPr{z(YDNG1j$Pa$c;}%f zZvfvT)wYFdeQIS7PnyL2SA6nHt!L5mjmI6j*E(+gp3L8SUQf()!OO%WtN4@G%$YNf zZ|0^$Rz06PcS?NTlq>Pnl*73pxmj<*EIZW&{r5i#td!%O`Sn8fc@xLR6_v&dqYA#; zc1@nQ#kFSLy~G7ZwwM2Ci*&V~H@J7g;L4Q+oK0K5H+@NGla20Rx%RVCY4hYWeRCTc z0&I^hy1jAMJErfBZ;rG$v*dB#yc_SxeSN|8*#6R^u^)aNwn&zf(B3E|{h`lh#|Cyq zuA`MHUhX%}ue>2y*6`%Q>WXjG7m^D-UP^4#`t$Gqq1kKdjT);TR9l?XT%=*lUBaGi znRdB)!=c<8x%LOV(+@y2Or8#w@``%PZ zR2!Uscc1&6EGX5sL1IFK>BXN)XQyr4+rMgV>H3}+VxFMh=kv?1+o$yL(p?{goHsn& zJ7a5i;jvo+qS=N{M>o7WEV24nGq>y!UYBipYP%ob-ch#CM6}DhJ=pq?v;TxDL;n>a z=KJbJt0GlCbJo^3N6Pw1%t@8yXM7;%Tcb+Yh=zVdNY5(rk8wy)j z9E&Mbu6o9LNw(5V;M`Sfo~UJ9t&bkLg!o>*xA)G2SpKJC?CSNRA@ymOH@3P7%(cJY zp%7bC=@nu5L*=Ec{oF5m+qONCb8@Xd@#g>69lyJr3NwXsF0bCpzC4}#;n8xTN&64@ zPP`o%P3V^TVQYVY9kc>nrVFd|j4^ zSngoXSClhWWB(8==k_M*%o9JG+l+g~ayPA>`sV1%tfLWy+6%WFkYru^PmCw(>@?~Z2%c6k`XQVUD`Lt_7>xIA8tH#Ve`Z8;#(gw4*+vc9>`3F|*mRh}y!%=MJs{@iZcRE-fYPQhr zSCCqNJf>27+QR1Pj<@bs%oNV{61w?YLh^5z6K}rS9*&evtkv%?SDq6P>$sHqB8@|9 z_Ql@tLjPZRt`}G9J9Ee;KYj13CBy&z!v4uGC6nLXOJq!46`-M4AoJ%U-=7;(TlDTv zDo&QL?%4Z1a?Zn**^lk&uKO2s-Rs!+XuIKG!9DZjAIr%*uw9z3V72W4$CA$uCB_T4 zUSBwO#vI=Ly&k#FFGZD2>y{Ad`Ls2D^l?6*|XdmzE@6Md_B?ZezWK;->T=vr+6I~2Anw;8M|@K zjPfbxv_-^OUZw5)skVn{b0T+Iq15)Ls;Yfltxkm-7nZ~=+>sC<`|#(n6%LnoZHTXD zDc5HU82_$Z{J|M+k-=<9Q9eUM;;M~7CA>h`2*?&tM-9to**-764wyZG}~SINrnxjtKd_|8zB_<8O` z)_%ssFSFLp@Y65*zVXk(Go>x&`&s`U`SbArzsI}#=J_*2K!(rzTv#(}g=72{&WqoS z{1$C6SoB8h(AjXM{<_&`F3zhw`7Uzt^o3K8CVaWDbAM^B-Q`)G#Yy+OFHFDhyuUmHBSo^;K8;mb#7)@$&I^tT$+{5h9D@vVPfz1l?ebw5O=O7z~o z@HX~_uDx@YSI<%Nq_t)ftoQY=em6Z_L*%){&ELwGP8NB5o%ept8QJ2cpFdBU))u#) zSNCJ>rP|(>^|!k2{nnVbPipl>vF{IrE94Hy+%A93wdS;#^6q_c73vaVabOQ{&g%2| z)0LCX)Fa_`m^b1qQ~mM&4{G-lG};UJ?Yg#o%Ug3SZO`A}^}*o>p7a%byxL-Zr%#Sk z(Rl8Tx&F!Dzlux5is;rUhutmO;vw=zZcp<01bJ(#f1gaZoPMXi$-?Yux#k_)|6XM$ ztamTB44-kfW!(-@+n^o+Iit(1)g{(``R|VuAHClaS|_voX?w@geEY-9vzm_yyS)&y zzu7wf)aBJvn=PvCx|RLU7;SlEDf%MZY_aIe2^JscmAd>?Thq4sg1467E|*)Jf7Z!Q zv@8>p)NgeXbU4niR%-D_vokk@Ozs|&_f}w;V-#;0Jww6!yR|bG-=Dc-Rz$Yi zmalI+ww<47X;#x0cgUneHDdO=qdZUF*<8C;ms9i1U#WVZ@2ddq;$@#dPn*`ZVbO^Y zp*Mj`wh1MQEHuB@WcI^i=H+$Q=IP#F`l37U zFh9S0@^ZbcodKLDSd5G>dboa#?lf83c0}8veg5Hc83S#BnU!WvT&<7p7_aVgy*T~8 z?+UHX+y9*3^z?=8liQq9q{4V;$L|yWmKkrKvggx0)(ul+7%F+5Z`FSwmalqei^%%} zFSHwOP9btM_%;&N<5}Ec#-q;gbuSm!I>QcjVMjVeuWZ{t5ld4#ad`-NLDx z<@lhl;J}{)Z)#^p-ah&Usn2ozzN>0gD9_A_!kTBc2~p2dXMA0~Aly*G4`H^XpYhA@<62$F`sv1YwVIYAN@tFlPN3w{?piK>&Fj78N79i_c~(y4%_mC4I(uUd ze3oARNXhv4#55^Q+mvq>b-!ZXddykBrRGnv{o&jy;fc#k?p@sbqF1_rzjkRsbvBMZ zN%*;a-C0{Se$>`pK61GyGQ6|?%juNocj(xPsMc#2 z=k5-&-XyhHqx*Vgg_3^b<)RPl<&V#8@yd(wtoSVZVi&`5-sxw?o(eepS#^gaXe zYjG9L?^0S&8@)QeObS=v>?xyR)t-O|gZ=+}hWM zH{+H@Uebd%^RzSS{FMFgr}@39mRkQ`pr};X?c(Pf$qSBNTX6ID#&)&6-8YbX^tzmy(U_I@HPMAo~N&E(kISyc@g&TWen4qw~UYugz#w_b^G&A+&t7fa#XhD zSZ;cq_~u}1-4b`q{zP)3@{QuAmK^cC*TEU0?+>rYJK*PY=0(?}Y|gbi`3yfO8?Dt{ zURv>V$$wCXVkU!?n(CQlS&oNToSrRlUtvA>8FOHra9E{uSvBv%qp~SwTNC5Hx}9lk zo?H|4oZ-IPFQ&wnMjN{mPRx5)Q_7y5+jn|l_{TTj7aV^y;gVre=#RhuTgyLvJy#m9 zgxMMS)Us7zmxC4Suhw{_C*g{Lt#NT|C*K8IZ>X@8z2dxFJm!_ezWA=Nln2ZE=l`1S z>DMBBb%u7H%lSPH+aA9-l*xa2;nfAAvw!S8|B$ETf%@+c?p4d;n=IrzY|fs@Iu=!H z`{;*q3g7&DoNBjw=Zj{9uKx5dW??{#3(Ligg}m3bm*u7D8JzK)b0>^dxoFqk37Sik z1s|SbHCSlCd7p9OYm*q0Oi6FU>H0_WYsKRATSLtE-R+&O=M*tHT`7Ij`@1`f^jFXM z;S)0Np8o{qADI`tvOYgoz1#0E8RhBu@4bH_-zVd#D{E&rz4^`alkvmt!m9qoN3SIx zF-wYw-C=uI`2PIM`;Kr{6>pJ~Dr^@&lIRd2t}xac^? zHn{)R3H1H}!;R{~UFL#uU-AweTVK%rYr?+Hjwwp)jhD?NWZsvJD`&-^zm?HhqG<-3yy=&F~ z)ywxij(mLa;;VJ;-*J3h?{R%!2#zT7$M!=iG*XO(j%CSG`b@yHU+ zJqn3xN=N+poDNs5*%cV`yk+kT_MnR9xhGPiIdwfB^7J^8Qw_1L`^J0g( z->az9H_letZmDb4vN`?!O1llsez}IWo?#iTFv7h_p7#?$uBrA z_GnA3RQ(SAz$-10`&l>FF{g#fBz}L)|L&l7@9+O2vF;Uj=SF-?GjV=$=(u^p3t5Zi z$>r5tE^pkNLZ^0Y=)1r7`4z#3Yd*SM(7OKg)T%n>w5v%i@;kDbX!wkKU%=dzgl`Gv(6!Ff89CHeRMlPcM( z{CsmYms#B+S;?p_$@@)_n?-y-3ocYjd6atR;>mqS(`U=~-u!LG`1bdjpOVL|`*`A8 zBaOPM3#{ka?p(;`b2_F+GQQHi2gu%b4flPo{Y=q4G}OmX3~nj z53KGSYu}}ciT-r5%2j}7!H9LEwGq##19esU1_}6o3Vck06G|wkB=`ITc=9Eu4 z7e7a1ZhVKtjMp6bb=DN8SNb>FFv?AbMr4@xAix>UVcd`m$z=d zf4&sGJA36B+fk8o&wiLJ{d_RMYQFr^&&AD`ezJBp?w5BXE%>YtaFkG zblJkPql3k0*Tf62)b?DD+BnxH%%eXsrc635M{w3VrQ>`Lx8&;QY)|{)<+R#NiQy)= ztNQRdqN{p-wq;lFW9}d^si;41Te3>;{JpPWZ4u_cWbpj!^PI?xpN`HUaqU+NEUOAF zol-s?=X>n8RvI**m>5y3zi^rLhw}Px+499Rtf!n~Pga{N?!Ce6ZnxyA;@;e6sz%n^ z9zW zNj>NIO;1GW#p(A-A%-2rKW3+F7W~q7d&9LmoV)jR3a?m{{o?EG3qtqR?_T%#v1;v$ zz5S0~uHGn>UC3`2IKx6{gU%Z54SLZ%Z+=xhe8h34^si;MSXAAF1ust=S%0ET?LbGO z$(@F)Iv>jaaJ-+=y`v4a>uM3MaZX_A=k)$J2XB5Cc=x1k!%m*;tEC+-(FZRv9GTE%0lIx=eMLeMc?ns z_$@Ot`LOuAprbiHGg&WydW&B)C)(auD_tSllR6{R^@r^J19B%~x4)2|k|BM+H88yW z@-lurhJ zzx@k^g5TNc@0<0Z?e;}w#gt{j+dpT%+4ryW{n<39@H<^{nrh)Y)r1-hv`*+H}XP>(h zbo5lU*s-9aF$(<;_k3f$^Js0$>}ii=fAIMg?Fp=W+#Ai^$nY{vt?v2P2TKoh91|#E z&)9>t@Avo1{oC#ZR^OEWazy<}TeHl1!hXs5wR}-xi=Ilen?YJQx#({{&P`(tO-Cb|?!>xb$%zN=r@5E--d^MRu)KUaw?yzLR#W8gO7-I<>u zR{INP?C#reM(J{-irJVcf4tP(m+U8AC)KlS^~LtO#`Nlr z0M%J~47LeYcKuS3KVQjsd9`%h7VXYx)MmRbdNDOP)_NQC@A> zwW(rmyZR>~3tjg50`qqlc=T`YnDpV9^@UPKKk0At;ve~Me|YlsQGd=ei?SRzmn1P3 zYQFxXIVDLauHEd{=gxD{3RBK8i!VPXt(Fq|PWqS;_&V{n>2GDpts_Ilnw-QV$X`G?#k`T}ke zCoTuHvQ_BF`2Q<9v+R39>+KD<>l&t?YuL!M`scAjX?hHnU$o}^mHQGQ6J+JKhHL-- z{U7}Nn9jyVS#CNJVjj0jTHlaG`d)YBZi)0Yy8aQ|3%Qp}_O}u3DsH{>Ga(~mz5Poh>gaESRni-T-9NPiTkQ{+v7|ySh^gwu7cPZh z4|kR@kr1tJyEIcTLeF zh|ATLiCd($Bnj{TZaJrs?@x;SKacY!dTho|*bn3%e`(t%7Tqs+yCbpm;WwXKS0VzU zT8;i4xGZV1mQ7ddTm4#XYOFvIO6tl$2{&s`w z%RfztmwF1=>`l2!UmIp0`>@AA%GTmIdxOZm1ofhuVNTvb7KaxnTv^;%)9fK_Z^^;? zdgCj%!nwj9zswi=)TDH|{k_;i{abB{w*O3gUhD^dFT!rI3c zzvrEM|2=e5?}u5dFSgBB+WY^i=X-;eeNW1ICNB5nUp7H>ae|n#i{T+3#ko#%Kc#7M zTeg_r=nt)DZ7UQg&x$jyE@WS?xaG;*mM7dhBxM74iNzicXvv4I1vv21%Fy}m#_tcl z;pg;8e1~SyY>h?E7S-S8MzuTfN<8&k64n=2ZJSmikbeHhN24MJ`=^OV)*bbE zcVx5dh3t!;{1VQF%xA3mb5FK{cYC6)aKWGU<@26L1VkAJ_T1aRr+d5k{f!0F7hjF( zmXtasd7?gG--?Llb>AQHh+1?6X{5Qn{L^!0*=L4pNn1LO*qeQJ7593suR8ZStaCbZ z&bjMabN2^aNZxqk{^Fg}Qa}6H~(%v>%ZFWmjqD@|Q@exp35!V|E{s-WgjnPQ9LVZLQ1cJsp?tcB{0+?UuZ2 z-(YNT?}jU@+u^4j7w7I+9`nGkI`TwMdt5#5u6q+dKeb|&w!hfNqkFU`|KOU)u4O+v z0tAgd8okT-c4f=5wf1sFKNRc=dwztSxivMTt)!Hq`onhd81EBYT*Z0F zx~cd@;hcxUvjZ>vI9%JYNbSro-5Fn{4OTzm*ezdQz#pfTQFrWPpYq}G#A!W`dZG7~)-K+$VW&p!L75kSI2TECuFX4Cy;k)0OruSLu&$GD zKD6sJv0cF|^_*$&%_+rw9f|Aq%CD~Yv}j*<`Gff$h*6Cttkqdiz4v zeg3=FPy7%XeX&~p=;iQa(`%39Y8GwqGhjS@XcyD#O-E0xTQ9B`aUkaU{LN_#pQam4 zEN#)h-=_BY?rz=_ig%j(7p>hZy?Uc${{MS6;kUI!#M#8>>(1bw%in?7Zz}F=zBR@2 znonx*Ge+*jA3x^aSGryQ=$TdLmgPFS8ncBu63$t}=GqiXUwFJTUOV%`we8Bc?A)K- z_|Uq$#(;a#FFz&UuRGS)@>M@MvLbeY?!JDH!wNU2%OCujZ6H1E;79q1x##b$eAoM{ z!#Dr%nzaYtawKt>w1~Pco0QP6v~?=SVvfBZ#kL$ge$vPG#-2B6O5yuOec5N`9nP&6 zsxJ6*?$d!(#S2;Hi+}$#rJhgdGoS1?PJ zn`uAy`Ieh;xo?jjOP5sL^!)Y`zO77VMQgGrEpxpXzSenrykhZ_0Ee~O7nYrw^MzUu1+mGbLvjz#@&#qw3-c{=Cy9DFCv8l&U*qo1EcyCJeog!-0ZpKQIv~O-?RP)Q}6k#cp`A~?%U=6@7Xn7-YEal z{lX*jWYfEif6kg08W~kYc5r<;B~kPua?hU0Q^Y_saF3a`KjwUMQDlbp##v?yU3EEh zq87&3l-lL}etbi-F>Et$_Sw4~w(&>h=9QH1dG?^(wsZ2gi>uZjj;RzsR6F6#gNi7m z1$=28&;@+WzBAdiE-%QOIX&^(`lfkrZ@g{xIM2SAkfBi z?)V+Ak&wEhT`MEB^pm_~{G*|+b{{phnZN~ivC-|zG7 zMTLZJm%jPLVOu z-QN_OWv)E>`e->zTA=9y7jHxNGhy?cvkj61_iS4~`RzH$*!+k^N5%cOd{;=+bBQ*{ zx8i?*Jc(Gf>~8;3iSFwQd;ire`YhJLlzYmDhMb?}@zod!mcYFNO;KX-q${P40w!*LGnK{{=Gz7c|UWIIC4a=+4UX zhJITZeWj23@`(IU2!7nTI8%AY;mJ}fk@|0skK^vYePJ>Z+2HeBNjF(FESdSFQkN{4mcRs^f?LG4c}Me^b?OtRnkP^5`~L6m$4{CWKD_&S zzpzR?%rsiWD93$#_dc1;FKr{9n&sW*Ke6YV!AxiC59bq@53fnJa?kAS+A6UysV7u^ z*^68Im%O;uFSJg(^^tT(&R%Zi^?H#Uu?l;cYJZ4yWpW10U)pl>+0&*L&Lf95Ykpq) z`QU{MNz)fw>h5TsY23H8V0KZP#_XbVxu>RtK)Q2z+jtgN?fT6+#dl_>=h_3OO;c=3 zcAYsXa%o~mK`H}h$ppIumuD_|;w*L6e(wvn+^Fig;l{I?d;9Y0N7c)@?UgTRP4lza ze6b@==Y#t$uI$gpg3dhk{un*~=yh+!tG)T)r_70dX_%^z4S%uRN?uZUSB>Ld6fCvpH^Ju$GaGPlJLXlbz0{p$j{j8!|jz_ z_2j|iCFM1ZU-JJI|9S77!hTHQtI^E6{tuqse!k%90$0_#Pde$oB3;5PE6=Y?-dPqU zINNTXLZY8h^FNW4;AfpbuT(OCrVAJNbay0%Oi^x+QY&4-rLw_yCNpoi+0!|a87Qmg=Uq(=Fvg@Zx~&a+}k5&T}um*j!x0;PH^ROlf+q>K2t&V;e3v+gT^fH*Eem zx%t8dxz%|h*DVG8|7R-d%b<0ej;mJ}?us%DyW^#yTj1undOvG(*rvUeHA}s=3C0zh z-ue){{DmAg+AH!fdq|4nYrJlz)Y`<@>En9N=ClATL9 z($DV;ejTuaaj{M3l~Wh9*B|fUd-O)q{*x=;gXK0oH@40=Ik#dPbCqt?JZZiDlWdw81d zT%R|$%T0m*%|TAOFutO`Sszh(ihj;1}@S;B8xL?Etn@i+9bBvRpsBtnfm^- zq-PtkgDTUV+cjTglwM!_`|gjMJTIPRY`vb;)>g>&>AG-gaGG2H(WLs>zvDZ7c$K_n z89b6U)PDS+D`XJ2_texLfVl$KiVOY>U{^ zjr@CN{66F7@O0~pQtgXI`j1M!D{(Hop6B+R{{c^rxkF&%#RAKu67_c{Qsf`rJnfWb z^W|6eg|B^c>aS|v_|aLGlA)Pa!<}|E$mFbhOV@4ol_moGET{rhnObT;hSJ^omW zcDbXLmA8A_I<76As&}|2|Hz8CrVo7&WU6G+f4KM?_1fQQ*T_1w=6+M;e#XsOeH(s% zWdHtPY11=xkD17mUl$UeGOaD*c3UC6ef#H<$19F*47=N9_DiSiyot1*$aJ-fX=}7T z^u5!*6K)bv`)$Hu-5;BT_Ld2U)f`rtd%t;lA#>?xQ^py`EZ`7Dw)R*hUvbHGp-ON|!31PZ!74C&m z@`ok8=E=p}oB~;+c`W+*B**oKbM~=oZ<+n&T>7~KE6%E-POix=U3j*|{9Z@SPoA5M zPxDQ-i!5HhV|qbo)0=niS4206EHAQK7ZEnc^7G2ir5L)w}fr*O_Cp z4ZAPzaF4S(-^BXharys_9DlLor`4RH)BS#(bLfuk4cyAJw?we&Y1Epj*B9(&|Hx(A z6Klx5^o902MUl@1QF6geO9Ns~oLPQOd-kFe-J3KW1CK91YwpH6>sssIU&=d@(+lkX zS}Jyy|41~tnSJ5X)XEoi=`$;XgOr%ypu8YH-t{7-h)Bnuf@9l~bmmDLfFr&=X}b=~cmf7X$)l)xBo^ zbMf}9=hqHKPbvJlyKcU@zO8?_L6^qrdlmBa1;<}`Un#Ubb87qD^VYMx#m=!ZbG1JD zv!LXk5~zpmB7BiW{^#b}KhNWz{ImPrCwOLahrymD{r`Xa^L-MJHWsPkpQXfcbj`lE z`wM^Hnic78II)!f!%g{``TxJKn`+$Mw<6)QeC@3L_5V$E`lpLsad7=P`{!@!8_Af`9_{*{x`=Zy{pL{5viadc&oVT03q zr`;DWu00xaal^b-Pq_cAd0*kUUFGH1?H}uFzwjk-xYhrv|8Zrpdx1d6oezd~pZ7W1 z{Z*g;eCvVPO{@=RsUGP*y+J%Yv0%c=>3@2bdmWaQf4q2q>Zi;7|M~y@4R2?`E3*ssq5%<{A_*C{jv7{?tYuSjsAaL@4ort$?^)#B3b#01WWyz zU-1>XtOwgCOj@}7f1|yP(DAnxK54sZ!tWkpulru~Yv1?fHTxV2Sq{iAU0*A5L?Ya0 z`iYuN7d|mBaMkGgCG+Fi{Lkm@tqZv)s$8{SI&DX6&j0298z0@bJNf?KKi)sD-p^NE zc&;Sy46E1k^Kvs6Y<+FHOU*wuYpco8*&QmsCAhDIL1*+9l>B2-n=!lZMA7m0au0c9 zyMLZu-c_XRSKGp0_e3J~yzcYM>t_h~eo(K!arWtBZ?AKWZ2z9LFO7NO&Mc)Gy+bw5 zG5z`FH@@>Fc5-^H%1eqqDzQKFuj$==3zpQ#u3o%&OZk2ujcqe`H3eTmyEHXFy|mxdzir#h&}g;t&mXSGJy>R6ufF}-|2gl= zSKe&$mKF3XKD@O#CuY*Zbyt?Es7&m0JpI}G$8}k;;xK2u#JTgWZtwoH$vTp+;fUNn z)!Wro9}7KG*=Ghk5-9!XrnUF*pH=(S_t(v9yHpuqwZ5b-(J=krE2G#`&hdRhLVD5n z?i`%`OzY9-p4qRS?O3B87SiRRevEbDj9ZU__JnXV+cl&-`LX%W7YhZg2wCgNQ*3@! zx37rb+O+9gsLsi6A1{f1|J-<0|Koc3TfSLdkH7c5f3Tb1)_;Ah*XP^spYN^z8rWz5 zAyDr9)Dsh*|9H+Gr@Sb%;PL#w%KL3&Cq>Qijh2?IeyRQDg!Np(r>B0~pS*uh@yFBa z|613}dpP{uy63}PQ`A_Qi-h8}sea)s{eT`d@h3<^G!QyZ=;h|3kUD=jZJmO};w*JKt?-I4!xo^4-Jwhs*yur?_aI z&fne7U-u;cM9IDL&DEdvx%^bW&W_(?U2HphUEHzh-?ltqiOPQPDqHI0n?Gi|kFkGn zyd)%=U3vNTde?tHKG!^49m})Sre_h?k&W{@`Mg%l*;LTBCC=3~P``7Db#vmxo`v2#{e~!oZ zZu)F(pL+NG-GhDgf0N5p{qvRnU7Y*p&GhvN%)4)UNB-Z+zN4yE^Z(b$iA(0EJjf7o znYD1{HQleLBet>Jnr}7dyQRxh-aWr{yI=hICjZI*e(u?`0y9(hoUFGNWwn{PV%Nm) zdzLmT^V=WTZ*!@U{mq@LeLG)p-}yUF`scmX{st9~bl=p@X_u3ofAvNs%i~S#Kkr)K zKj6H-s)vztN9>zlmDf-1;FseoyxLoTc$TSY$KK;iot-k(tC-USz_ByRWAK%lfQmvM5$c=8so0Dw>@fP(x(_! ztC@CQ2)OEDvAKWRMW=OaVOIQJ&x2 zyeV$Uu9{5`A1HfkdtI5ZWYWt$`!7y6+kEKF^Yr~MEmpg&GGCWA^Wtga-Tl5g{gttA z?%h58J1_QV>MvoQXSZ{et8e_S(!Z5^I&#tB2JWbzQ}?|6{_bh7^t8a>H50v-aJDZz zZzL%2=H^olef!TsC-?80_j-Em+{5gNFQxOA6ux*~^KxouWVfX!_lJJlWB>QPH*^r_ zTl;L+Zo4D$b#H`Q-2ONG|KU4twSMZPjZ0L5L_(iSYl(0R2xcuYe0BNqUAIjK?rY7R z-*l;R>F4J&54^uWeZfn{RYzPc_P<|t>*cqumHI0kghO@obk$5R9s5}PX-(53-tQmT zUzdGeI`{OCx6AJSc`X0e`t5a_19P*NNpG*HkjqHQDm*vI(c1NtpvZKQr}t+seEDL> zj^J|t`HYv(C!ZDB&Mr8`efSbWlWu2{HL{i*d+&S{@h7S{FRis5g0DLhZg z>s8MZg`mV>tJkOI94K>au~}3+=jP|O`~JT_XiU7c^oaNLiwpQK&GVQe9IeoG?Xz|L zmd5M$zg54rW^Tp4#z9sO$68+1LHD*<-e4u`aBMFW*`` zC2Cgqai*N4vI3dT4wp_J&No}%KHm_1dTRD-^>Z>;r6YE46Z`(b@z!$d>XQ*iewA+B z(H@oYnITy+J1la`-zVBN-=D89df}n1yIy{Y`Fo*fUw$$w?4GSY@6Cc|&&-Pt`<533 zAB~$=u_!gkZOMWyTrM3m%Uh#QM-#$tvDJQ6RG^+ zSlqJ}#$S6*3b=-G^eX8v&WdyKJaO=QP|wcgdKRtM_Vm~PxLqFj^;Y`N8~6YIe{;98 zM(pa|A0N-pto&wc?Wyp_T0%_F(IF(n!Es~U_G??WZ4F!f{hHpkt#9|Py|(oGwy)c+ z>D^j&{dLgV@6XqXiiS8a8op^#l)m}-&2OXgfBtbebui9z;9xxW`|GE#lb)oUoB7uI zzGd;VGtwsY`!o_4f7%soS^E0$oo|5?j`Z*e&8xA=vTL2EAbT%vo?cbYtXFPFrt3Y? z=H9!8&q`v+nvztvUbnY9dXxXA zRYx68E^+NKb+|45s_Rm~^~Oym1x zCt6>k?A+BD%SD~n-_>j{es|WE(OFaOc+bkZMbCo#B1=T4^W8q{UB2$XdgdtE`ByW} zSpMdk7P9}$wLX?Zc3q3)o_)2+sAjlu#Hk5lqFznech zXZqPG&-#zMOM50BRb;x-`u*%2g)2;-e61Mw|6jn_)AQNr+-ZyYnt<-EuDWYK_cuB0 z=1k6^bY!>|s>e)z5mF>5R-wru|cO=kL1t?ESA5ZUR}x zi>JHHFg|uY<(0F&Ngy9hiv8r9wKrt?$7V*EuSse*n)Ors zFZXG&vuPP+r{5dSgRKS7{{Q~^_fJRKY~PA%o%>|iGsB>{)q7gOyF0-eT{#bS#@|05 z99pgCR5fGn{3{Fk<{Vy>I(@^NN2)qAjM-+dZ}VL}?Q>%8y0EWbKmV1?broOgI7!G+Jec2tct3=aVKkm@Zbe|;}+ghi~S2d_# z`&yuA+W)ZYeSP!B+wxBjPA``&hzof6L@}rEnP0E)tuTkF|2^WTO)mVm;0wpXDU92T zH4fVxmdyE{aAnVyBa5nqYmORC*{H`I_uuc9F}qh{%ADziamRi>Zk4dF+p|aVW%?nr zF8#k>>egvj&b7|_BYeC6US zlg^cjSoWqQ+evL(_vE1b-(LPE=0#7{`D|UP-@4mWJ~y`6zf(L|*>jS~gA*3|Upn||rwNeg{hJ;~?&hLX>VOMi53 zn3QnL$9^g+`^;aD8B%pbbN@WqHn-;g7nZ$$+xo85x1<}E@BbyX{{QCB`^Dc|O;+a1 zRO*+!U)8XC{mi2$g2LDPUD%i1-~5qVKl$U7Ny=3!MIqb#>jOTmSTW~(`1`%{rI+ta zoiK&Z=h)B1?i(kj%eVZN$d{3P{(H6UU!P+?=g3Z$R^4pvIZ@SlmqIh6--`3xtClJH zXwCO>{K9-M^RwL5?N0qm^tQf<`S-QjTf<49?)Uy3?~h7d;`sFJ?#cZ1-##A5<=?FN zMQ;D!XJI*Ba_RqW>;Jqoar=xdy1L!__p|)RU8(r>x7K{GtnNGGkj>9<%3$4} zzlUS2SG`_2H|gu%>7U-8{(gpiR&Lr){r&x)7RMLf=HKsrcy0N|s?Bpw2fd0`Pn)xS z!iqWV<+n5@l?B{h{c%l14$O=|QGSN%9NbKbw6 ztESS{`>&L77@d>f*?3LP;n+{RG9RIb50(}ETWs6ir&1=Z`z~#r)l4=hu=oZ(l3_e9(A*gC?86vbB0VN{5!% z{rJ+WVbQ)m)_mf&{r{!;zZ+RFO?Z3zo6N?>YjO-nyY5bVdinofz5R8^_djp9+W0Nc z-E-N*?RBN{i~s$OTlf2w&9ys!^%yPdd#<$m?Xl25;bSp>TIJCh*Y}=Xkmlhtv%CD| zPYwUQ9maRs)hEa$gg@qz+Fh2arP`w_+iiNwO=bD2lsWH(nb+DXJg$*9X5fhKSgoI* z92Lj5TC3y7+L}L!hUar%2_5M1OgoqT^bn^ZmoL{nF<~~=n%L=O9Y%-59&DREd*+Vk zfdRiR7v=r7zy5Fj6A{m8G2w@2_B#JKIQ!cTlicfvsuv)U|?Cl>9X0}&8 zIh*y!((IVs`{Op>4sYD^bMEV(m#3Y#*IjDx<~0Au-QLnWzMn4tT&J^rS4*-@_r6U% zJD2yQdKAj#wR74&Ouw9b|M5C;sc$t**BUR+Te>$*dh1s9{##XBy42{HC*H@XrXEvo1C+_YO3t|IZ|)B}^(FEW{}@2!4t@T*$U-E5w$NCaycZQ+Q}PZ@0NP?RM9-XS5rb*B0}z!2Da-h zJ|1iHZ3XY<69u;(Rf&Cjy-IGL&l<_~ac&duwsx?8o3n(^OGaLT~Ji>)eF>h0RPQ^$G^#hSNurAW*B?V7m0_xA+${IyEgR%=h_4c=F#Zy&p6Qb zA0qZ1+EBdy;jH=h+kc;n{*iojUc%}rMXz2S?x^_@e(n2>xrxc2dcS|#tlAXX|G!P$ zj<+G*?E0SvN?O`Ef6o63xWA2EAgk$o+@Jh;*;h2?mWy7m`#$|f()|bf!^+u`ZG+Bs zsn;LA{kBf%(9sjc`46PG-*;W~(CyzQ)9vq<9y43BNXxK2IKA(|L|tnu<}E?z&O{#e zsQF_u|INlw+o{@EPI?qho9lD&4vKTABg)v<` zOKgFY-vb<-Wu;KU&W8J2G8)u~7Hx~5a;(5mNqt{aXpu*!n z2Q_%FMqFOp$*Zljf8|!=g`$;5+(Z;!T~G97{AMI1CwuxA+os8SN#Avp=hg4&TI;GF zW!0hcc4u$vwZCt2D!Q#sXQWLLyL@p^SM14i#{TDzRo_{@s#NFk+@@#G{69Y3b2$|n z>08b%6pR$Uz5TuPzu44sJkh#{x-E^77se(#omQsOdMP6q!Z|%|j@-pj7bgbmI|Bv<8 z{JpsS=U@KAHGj_B_Ssp-`C5KYtN)_C)~+rGYxMRnm@`X#|GE6Q74FP-|CaDQeqdkp z^y%lHzmJ7mAK$dnSu&8ZG(YV74mqWIx#_V6GuoEtKMOzq?$sMbqg|0R_IB*qmv{bo zbmHsNHs2m~or~-4&or}R`j(@&)t1WxR(Okvb z)1FL;{&!^Z{qW8!>z|)JF8}D`)Lz@~=TuhT4Ai$Mtzgw!`$X*9(tqk1f6g4<73==t zRCmv3_Gv2)U!1Tk_lQSOc9dayujGJSF(xowmZFPh7$~zZ*;pH zkmMfha8}dvs>ia!ORk7mMP7PoF!9R4MV(VWH6=y}-M%4sZms@~$vvMH9@jj7lrqO& zg1I57yYSi`zH<`OmK<0#xkGCP&jaHZ91fZu0qZ0puclZ$a9sE-;MtEUi%hRL?ON00 z_$-%2_(2KZv6ZG9b#Gm75B`63>Gu8Sok94}$)4Nw$9<*aA1vMc{_*;9ix2z0tJnQ( z=eKG;qPXJlF~dU_PJLRnthRsg7PnQaqIOmtlxSPE{?Ta$HEFYEKOL#}AAbb2_oq+U zIJeyFiu^^-S;5s+RoU+OiLal9O(}K{TIl4?CUQPyTHJrpbFeg1db;)noSmD z+$sCKs$=VEdzD|0Ezd}PWVvdc_+#d0$!GB=m0y4R8ui69)?wRA)qjuMrZY4y&5%it zDbzN<|I_=-!`VOnw#mu0z6w+dlwEySOMx5iltSK_b7_q z_H>N>enqLf@~m-4j@XKaIv+XRx2GPm=}FwCqkDF%OZCs~M(4_vAMfe;Y#Shu`Aj$W z!KFm5*Y|Xv+s~IdC4cY4;$^qr&f)8DE^&Jjl$L+6`NXRQE11>Kq$QP_Wb>VxQ>n42 zK~ax=V}S0x#TSnJTf@!LmuX&bd5V_Y&kC0RM%%i6@BeE3Dy?>Is&G+#|EB}H_joT3 zHcZNFJe>J{=blB2CMjP2`}XDG3BlD>zqBt(c9k#~b{w_eGh2GOYQ)dy^FKG&|JK|8 z<860Ml|;Uy+x5K%fB!pp#yVSv?Xt_cSc8^jPuFkGe6O%|-|B4nxh}uWru~2Teb2?P zGjl50XLtukY>Z~@j93%ie{<>Mo}SO`ORnS|l=~_m8QrvQnvmS|_K%m(Mtn=jQ4(`K z+LC78H1CLjpMpWzKWnkm8_g@~+vBPmZ(qGBxyia}$KBUP=iYx0H#+BiS3`r-jqg(C zt%xJ9Z|7dwK6_>EmIrT(b}!o+z4H2{9_eW|4@`u2PPyqm;Z%b`_KjWty}~(<9+)-# zkZFM0zSG-+#d(rTd6!=?Z7RCz9;;ALQswe%qh8|tQ(N!PI`*txE^+o!3GcsrtNvR5 z*mCgjf<@~V-@UZtvelui!?$whXKcN_^4t`Iottv*|FGCP=hP`7qpQ{{fB#t*vpPB4 zmPgi@tC&CcqSWgfzMPMbi$48u$WwmHa_hqh%ltGIKi}lbGCg3>#F^}KW#7N>d9gbu zp3f@VnEcrvI-v&}N(A zW{|bQ@9(-c;gl-vmF`C8&$^jP^Wottq?s_P)#N_j*(nJa}X`>CfB{ zBA_iOF?)9P{maX;Qw$RV_%|`ObPMgCTe4-PcyjY@U8iF|Ye5~bee7(T(q7$Wy{ukg zx%%wk^hDM~ze)F>{<)y67x(+f@%{7m&7SQds4d;Iqx*I$7He+qKlIK__|X*x zZ>`=Mq01UVVqtF#CLcX;ZLXOScTG*|w#KJl**0BcsccHFP+u&}_vX;-a<0kUtWhbt zyD#5;UTczUJ~MDbve1GRWpkdHMC!V!Z2s@8@VRC6&gbdVgEqWWeD~+5w8{JJE9zEx z-&nEdU6|k9Uk2N2MN|wIH@B$E_s{ZQsP56e{dC;r#U@uu7wGJ3&=&s@Azo_KF?Y|l zReWcE>z&_Iq`7~`E4_cFe_7sN<8GTc2n_;hf#;C z7yiBOnO`@1`t_J|ve)k&)xD`6c{OQ4$|a>^QVZU4?|#g2d$W3i#?i+!46piMi8-a& zz3$Pa#NCxI&x!shby)p)vsABTdi=pjucqI;HPPXQd*GGBd*-p{@-s;7j;o#6JN?d? zwc9x+t$vqS={^1Hd*4|0)Ra4q)*Bf9)ili&+;lBSZEiiQxX9Lz&rZFywdoSESav?W zZS5@aYg^|g^zT~w_k_j#W}Rocp%KgHc^aZSK{8wkj zyYy=>M1HKvx%Dn>cl^nXXP&bxG&8R9Y_Yuj=ZxIU1A?13@4MzA)v^6%hJfcXzmFRe zq8er@2S3=p>1nX}?LWseTD;AiPFYM*oMvIFJ3Hg`w+#1)V}{u;GJ8&HA79JG^USEN zsx5d`Nq}^3ndJ|bqo3D3|7F=+I8}N@-ACE7+C+|97uTOAFnm)wbG4DTyRY)Hjl~xK z7jauY2aVCpuBdkw*1WVOFXAX)s>x^lU*gkrXPv$9ChXt+_3xi{@*dR7y~t^{RI>PD z>Y0ssPu70D%l_v0%Gm#$jf*np6knXa(dMWd31byeEhU@OPyNI;vbj%-#_0q>H5yc$Lu%$)!29F=KNCGSzbRcRsT3^ z&c6BIzxN*wSnIOCeJY@OddL6u*M)a{=Xw`+^R%V@(q`eGbH2U(|Kxaabj6R`_K&X4 zV_K);+3tI+Qu2AfrR4MCBAYlNWEKYHS7LMYtBxk zwEN$@_f`ANy8iERUEJh@fs=ks>G^DQPQKXa+;bnbLw|j?PY+7Gb?ou|y|c^9zCF^m zV&1cE&da)M|Nim4%i2F@A#beQN>20C<#SGo7Oz`;B2z{B^TiFNs{H?6qqWTDzMEXw*i#|Z+~Xwtxe~=s&CErn^h{cWBNhywv+3$mlm##+}CmWx{KK97KL{+X7;UW z7C&1XpK;^4xnYJ<3$xyf7e}A&U*9J`@u-nugLT@X#jBR*pZ{81{cH9G1Kz#>3-!K- zOM|RlU3LE7TXN;3OT;9VmoDPv7k({abIGd{Rz z>{}t5ovT@@t+O|({vl^@O&y2wf?WMYOHZ}%tw@eqX>r%#^kvo~m-j}*`Tce}9&*#` zq{`e6+E2HsC!k_%OpP)Jg5oBo$9}yI94?ri~{iymXyZs&H$X&@1apFXBEM{!uCVFMLg#n!Ts?*Auyn-> zL(#Jn4klbInDg*xOsvb{cYnWclz5Z;!u*!u49CyWoO|Ot)*rjDb8q!VeIMcG8z$^$ zU-KK3IGs$ezUqB&iA36RKFz6H?)#*a3f|ilr*dw-etHqlW?rMWW=^ZQKU|mmwtl;c z$4^t)2%E@Fj@%FXxnAB#yA^&+Y~c?f{XQGsP{9mF9Qr)+!=NRv?+NrZ1i^RNeUMb}=d-2puj_esRm%8$|%091jjFDsi z=g_CEDl2LvI8DVxoNS2@JwEnw*HzUWS>{BaanKeAQp2@|<&YaM-QKj>hZ_+7= zj%n4JI$JM(oAQ<0bDrEwpBY9ob*5>?eG=b3v2syQLdTu&tscqp6P2PT`|I3%d@FhG zWuHjZxt;mlT-zjAyPG0Dm##QndUjL9bF*MG$wTrYkH5a0as2nm{VOED%0Jyw?)j-z z$sZ;5rH+NVIlha0@acu%v)w{l0F_|`L*!V2AK$~c9kZL3w0=+%KX|rm(#N{G?{VQLeuxS*oiY4B zC12hvqVo#3mz$g6TC>S#n0^Y*Y2~`epIdA3$9cky0Ed!7cF}Ipq}MVL>FphRZFf9Z zF-=g7$#rH=vg5t|HSUeGNmKNdJKtL;9h$>`a_zEt)y;1MKlyo1juJv=+nyJnGuSqFk)v7E z{GtgLOZje|>Y3TX|A{-8gXj3);Hi&i`n0HePGU1@yq2i`p>OViYRNUie?-n^9<@E{ z`*?BdktYm??G^~#%~P&+6md_KJ85Rn-2!%k*VHYdoZs{>MqMM zQ^PlVbY{+F-LhuGcbjh(X)1HsCfjb8XDo^!%$pE2qw?#(=#aJ0=+hPB^kg zisS9OO>@>vjA(BB^U>2sE2V1J;tRY-X7d=>b$T}Tu-y=FZkJ+n^=lT6d9og;SImFqF*ZspZ{wvD9?6y?bZ;2z>Q3tgT8@CTVGMXxE~d zVYB{U?|S`-&&E2Z#N_)Q^D42H7u!DaZ`C*Aisa>)rej-Y_2BbU-YGRcOA7U~mR-m_ z`n`@baDLZ@V<+}sxc<83>4e`~`d z9sA_(W~;4i-N@&sJnK8p#(+yV+EOmuKD)%EY98-m@0m;3R%otKwOaZ0=Z~@(R;O1; z&Gg~tJbkb)-QtT~XjR~K$CPr>p#Kq$*V__j-gGIPIQiN1yGN33|4h7PnWFmjCS%(g zkH2oH8n{`H69 zsBtLM?$8Y?h8^>)WLZy|Df{qGwD(k%I-ewx)^z-1aPchhP#z6S3zX;`>%!m;ouWqge;cXNBx%kUi^DOvx9GgS)yzrfq7Lu@_|D=j(VXeOu6)r-I)aEBDOb-r}48g}I(@M71KF* z>A#ujrjxC7k+H9k(dMn*Bf&-kRl_ec*2=u8xVJf%Z<~L0=yk^>JWFa~>lZ9mV@VOY zROj5Uzg^2&`G#-WpRGo`*4M5qTC`}s>}zlf$o7O(XV^~8>yaMnzaAa6a9nn{BS`3I zsN^A2n^vjq0ymBAOm63?Y6e-Tv48a8d?+)otzqU3KlY6co9-8FDH9esTHt$g`#H=1*IxP8C>Y>~!+2dkqrSM(%pYzPuL8Y_7yaf{%ZoBzLRJeH7e zU3__k+}xC@lb_7<36OlV^h?OpzVJ_0^-s$v$_q?HB6C=yYRYFmpXG@gC39C-I`03^I z>GiUocPKpT=`8VK^p^U4g<)Dt?=-fVEZ;RJ9xU`TR(;HJaC&#Dkd4C$P~*{a(yvLH zy(be6{@ydY;B{inr5`H-I`>7p1zR+nyuQ@e>9C1~*FOz=wr)PpsUe%^Zu@^)UC6#{ zt*zoqt(Sb#`^0U2NVA_RR6My*5ac`+&r6=3cHiOCqTuEPNW#wxiTNqj(sPmuXO7~j z{G8+4p3BNX+R5MMr)f_&I&PfIcKU%xRd?@_nn0gPeq0cZ3hx$t_2lllP%!Vd&%KA! zEc-f}6jZ$zxy+Y!GP-xTU6?0R#(3`&|BmEMPG$*;d-gHB7rQKO7kei?_Y+d{x4rQ4 z#G^(_n-{$dJY#lZ%Wcj*(H;w)evspkudG(dOqdAn0*D~X{^z)Q|KT&Xc_%FX-h1Ue^F{u?UY`--NzeHJY zd?2V6wM=E5W!xt>Rl}&#FH@SHm0$YS&y=)sU*@|)@6O;7XJNVY=k~tg?{3|`y*5{G z>9hG}C918p5p8F-CDmA4RXa_-S950ZtPN9_3YI>*Q|+EB*rosR(TU3eqK#q(!ja(~ z$M4Ncl?_g1XBBm8S}&eF<96HM4cD|gtE+g*#4c|-)yQ@v>Oe`Y^gK_^L#usX^l>z= z%Q+kr?sRzew{zziZ!ek>bF=H|<{+uCh?Cz!t5q@?z)2mfsUOr5 zUl=8PGtR#M+QvEeygq6u{}XNQU=uM&HQ34ea`L+L?d*}<`<`oYh_P!#ODKP<(roNI zw@|Pu=&et|X04YK4g?4u&Dk`;qw#~vh8v-ibdTNR74(?VSrg)7v1XF%VWWfY51Yg` z?Ncl<;dYo16YTd^%E2?p;Jd-~)6e1ghtc`~x&Ye`e!(ARc zVT-`MCrUeR-urBEjXB`0luFK#*K1WCF{BCcy03kDT(VKjVA58N7aW@ul{MqP=VmK> z$y2P10ul)J069#{-!6rGNG~@sakUP(i@j0e6%k1`Uzz*wa+_hW7d;9d!~oR_t`=@oHmyD{_95VD;g7x6cSF^;QQOx8`Z@`|jQGE2PEL?O*FYyZs8U4Vfi3NxZ3g z-rbkTz}u|MZ8+8EI-9ld4X)BnoQ;(wET7wIgoATOzPe? z*{zumRWcXA9IIA1SIlwk=L?^vOuRk>35DCPLPmMsc-SiT07NeyQuimx>M8H3{1o>{pgzf<@x^evph-~l4BVBcXwB~ zDEN5t++BZ+jdyXhvqol!Xp3p@N(V=ODG%2vGOvwY%vr9cMTX%l_EoGrQk zYT{Ejp373cpSk>Lee9B?3%~q&x?JCiT;o}`*6nR+waUwiMPj0&f8RuyJ55sYeC2q} zW6LSu9p{{^3RRNLHqX#nw8NkC;Y_h3#+qHa@e|f)E!lhO&RX^02`>#6O>rp?SV)o;WBq&E!v^&Y|&%ZWO_{IbyLpnxfMpe$zBb6P8#}nO7Ao8;;6FjS2sN2|I*SkDWC7q z{cDli-))|t%Qw+JPJQ1^H?`Zlzj<8x=+Yx^|8GZMG^qMBc`#$r6Wz>Z2cD*UPi9r= zdnVERZ;kgPKZBx-7SN#6SH*{&4`)gph+QO5b+|Z0_%c}51)RwyE!mgim24F8!S21< zomKNJN{fJ?tqVxuVxcG+h?w1-h-*&ve z<~^y;{FBCX70*daWF*wK1(v1Fd9zJvR-Bg7oUY)CLTSD9`0Go+wd>?fF5y!yeF)Kf zYif0l^{fcr+utTT{$KN+#3pxB8Eq6t`OWqXt{VG}bSwKihq6Q+@JWePl#Q*H;MJUy zUU5=h{&+@+$95?Ju9RJR&jV6jy8h_DKXy09>upi?bM@(0IhLAlU$`&+;5%OCFPn;2 zyj`qP=-+?vTvAk+<%Na_?iuUy4;yQ`R&3SWe%@QVuq!X)&}Q|MCb2ua_t@^gWHvqM zv%mDNNr&uooYSHW_sNQtD7-v-+-4PLbfi>Z`ni>QsU_Nn#nn0g)^fb{{arQJ*SI{` z@T|vaWmOlW+AVRDO6Eu{5Clcnp&7@FuDRd)!*{9FuPIc|X{*|%_Q^9<&bZiVDanML zT$DKT!Qui(?#TNBRyd_ndSs*u3}o#-;3&OoeVI-uZn#Wp`g`j`p=p zJSNfyB^C46xIJn%x@GrLM|?GVc52h!``V|Mp85Dn;I{h>BZ+_xcUG@TwyUd>O}G~c zvU-{DaAjEbMhRpvDo1uV^(jajP5M-Nzn{(Ny;xH0t%DD;g{mY}1 z4u`y!#03}`b!BdynId+g|A9_OM_q<8ckPb2NhLLqMoNR)1* zcE|D^nKfG`M6A18x{YPtO}iLT%^tB6$3$8fjoQxrbDcQ<&=Ls_Q`sMzK;_Og#ck*9 znx4EW$}(>h6N^xnoBK@Tn+e-wuad=+TV@?tm~Pn5n|wP>P3Y8DHV@TZcip}%^v<6I_8?w%}6kGkL zAIDO3awA`;8~Z{TcV+M58+KJ^9NKi)cJu9WQsY^WSdgN)Y|_iqaly`W{(NTc@Nc`Y z=~_o$_kk*P*XicLHmBX*@K&EQc2CKUby;-Q;<)O^pCvJmFD=d`;I8jMBR&?YtJ9we)!5y<51Y_YE0&5t}6bDfak|5?CyyM4w?7lu2BlU77q$7>xHIv&QfQp@}O za+A{;=}?OJlG?V~+ZLIM_Y@1PjWwF?9PdomVc9NG=*#u+!z+uoVl}gO z?a8@*{k5v+aY=BY#T$|(bUjn>iWR?ZzGdex{^DmHYdT%nEsn8%*s{CBo#oJ!BNx7M z36ws#EwQA=jeDt5f5KwMyHk!R+?a0iG>C0##8%eYx`szHwHohgMeLd`nNW1oF4Fkm z*RVU>d#23cYfRhV^ZC&Mx7*M3?}>B-*+2DWmXPAktU2nrE1J|g1?_@glM|M`1eoEW^_}q@p_Jal%9{)JzUWs}wo~OqbH(g=pP2ZX*_M_>Iaj{Mo z6+d39da6rpU9sXt`te<$zETkXCbvbQd522HE_KH3k@(K4b&^eZkwsUv*MvPQ73VCT zydqHeW0rd0dL|Ad-ZG&msoO^cDubOY+?NT~8E=&3OKOZc?Xc~xSJ09IAHGL3g$`NT z@G=^2ocsF}kIv2<`4ii2cdB2uSjKW`}Z-6W9|=Mn5=SFk9?{! z^JSQW@g$xX5pJy?L)r@Y{1>|Dy1eRrvCC`Gy%vqmM>7Q#>Z2sw6;;edFMXT%m3!~O z_BGn6F2${d{6+#5n;SAp{(t+HwpZn)i}JC4dHwt!psHu3{!HprbyZW+Bi^0grSg(R z1uwDHHaCXh9rlT>6&A@w6@(#5NNK1a96&fZHqGgA5gXF-ue6L_KLsr=l+l;%OT{@CpTt?~_=FVz$d0J@_S8u#KZ|BTi zr_ZZfoG?mw9d!EK)4uyQCu;Zq%&*&1V&TTXQu(>=#N+yXohQvMIKTgRJOADZ-}wJ} z{<-h%oPR$I(2OrqzaO3Qtzr0%QT6=$SQ;rFrGgg{xP* zs9KgjJM!P@_n#jem(%<8@VmwSkiH3%e% z%&nDG`@Kky`LX`KS&6Uf&i2>+)O)8Nf2_oq<2-cPYryFV-@f6=P&$jR6i*_X>nhjEvkCggu;FK5)3W6N3KraZm6r@ z94hMaC(Q2Oh8fSzBEPX3Bu|?8IcjHtQ;*Z+rtL>t92w)UFO^-?vw?NT+h=KN?<)PK z{o69<_P_J4yIvc)Oj5mmwIJ=WK;4IBb9ox19!YOEe;8*tiT#@7@2|I?-@MqpGTMUU z`sez^3toOsQ1O^sCc1n1PtD3Np>Jk7IbCi$l)gTAPZhgXLiR<^_-ebx&Q^)xS`9ypd=d~XfnPgecEDwHgCixn#xnb7T^*d^l*OW_p>L&e4jekCi+b_9dUf=#- z%5l|i&i|>cwZ3)FiOX4BFS)8p^}EgXW;y@ptrIe**UrrrJD=dPP*jL9>Q(utdyn}) z*uQq(`TqNyTgnwvpO+f5bE?bdw0pIm_-%IWDSL0IZ}a)bx7zzDewA`%rp_BG zrR8lt8}#pq^tCyD?8fuIGmh6;Of%nKY+HZpQ)PbBp$+=>N8an@KDeiU|LpILcU}qg zebo7N%IMiVqiKpqD|g7MeQBBR+h5ziJ1!&Py+5&Btg{Ea~>b|H2<`GE#V zus>fJJ`TY5J!Tn0^`Zc$NbEXFQ+15%-mcKJ@;&m(JSrT<0TenBK>!3`_ISsr9K`v;rV9c5`21JipLY<=eO^t`@Mbt z#sQL%-rXVSZ5dczU+dnUfyzUVKgNRSyf*Zm@LVZHk@>2 zR@j+Hg?f{TheW<@HPvXy+q`(E)&01SIe3oQZRZi{JkI^V$txQ{}1)UDMYe zJ#H$|_OJEzw7Dmfv*Q*yvm5o+Y}!=#ep7kaY|GStu|6{bdT!jB5^Qi$`E|wn$1LS% zW}V$|yewdCV~}D0PUXclU#_^n*&FsGCVbMZtLs1CyETt#%Yp}Q@{2F;DE;$m+V>By zw4T~dx#hoUmh9K2;P&tZmrfm!W>hZ~GO2r(cz2z0#Wu~ye;QTSxV&OjRbD(JY_?}w z;~$Q5POUH6x5eEp;F$x75o>Yv$A1n=Fo;C=Y<^Z+aBPDLtJqwZkb@}<^Bvt8yd0Z~ zj-FVhc9@Z$%e39-_;QwQZ%sA2-34`Hns@R}N+O;S>wY)S*Lh}oK44?yg0{^^ z)Oqgg`tt32<%@6MD?Kb`7XE&}Bl9u$o|131f4=gu-~0aWi2nZ%j_DIDSW0hLxJg7s z#$Da=zHrJlkI+!YAMMJNyZhq0_pR{WkyiLO{P@O?5A!$J&3PQT!oAa_bWPdpIU#>o zK%uh2W&7CPV}f$;>%6nYRi9=yi+LbIM)$#>WyxNK%}fl>4TQYrFq=nUL18fHf_T5P>%l7 zhkv}B9r10>N%*?X0|IOtNkGTr=RqO%4ZJK>B0#7|X36C*fr9Jv&CBytOqE7>TTI78z`GQqJHG@ak$5+x{=WNd~{QT<7oT=NVE|0sr z@x9E;&{%e{=)d=CKCiBSSH!cT=kKS#ckDjN{`>p<{6^gihr>*J6Rrfz{lzb3abej+ zKL(?7@=?c}3c3ZaFA?Bd-*-9h;P#U>B~|-=Z`6}~zIy^_tDv03iCHW2#eL>Kc)G@n ze}1cIi=}7Xbn|szI=Zjhef+q7`TJ*Tfk#fUDQ6Zp)f~LnJIi}!tw`DSnF7n%B7!oX zOrGI3al?kB_L(|t+um)N82R9__GVt4_2v_{s+|y)Icz->W2NQ6X}DHeT8E=ASbcqb zfgYai!g|%d{dhO}{@+~w{9|d%*T4Vc)2Hpux-TAmPyD9eoC;r=+ZG#}g`MXd@l{-M zLEu5)t_uvhf1>tHIaIzd-oyLnzYK5grJARwPwLHa_|~GL*7^8Gq|E#79M5ZITjTH6 zzB^O%e?rdbPm8jncTHMz{_{r;{+d#g=Vxwww@p7c$FlhP^&gAA8pq`Y_{9I`v@_d0 zbNT*HpH>RbxqPV4yua}K+t-ovw)d`mczOStywl!)s&2dgymUAIaq+qHm3yx)sJVFd zjIn~rm-UZ>ZW|X&*s|%T&i-AqS8Si8oxiW!dYSz5@c7EsJn;>$Eo-i%edR4LIz2Id z^LFJ%u5-(-*qpXF^79sRgYVs7|4rGa=YM)WKUgLHzja)W?3`EP0oN;cY%H7QS1oX7 zfkD#asJ&Zc^VN%viF-`kTq1j#*}Wpi{e{u)tGa&5mh%~1i^}ajs>)7@<$pJ^=vP&{ zh+)o|8tJ8xFRV27w=R!3>?^fIX*s|19Q)^+L#993^JLGHKO4SWn$(qVV)Em{soxQs zw{%NS|5osJ56i!f>CNq*ZeCr;+;#3(%&Rvd;V~D_wk^FIW3A2_TX*mN{PX|vbPpS; zYaCM4&#P>?>b)z{RNK){=ft^WIUNN#t_v$B#ngt1OHccaz?_PMhKXS$C{XdNVynWyPv;Y5B0e7K<_9&0FJG%XIcD0>a*1qHa$-~Rl zemuTVxP|llo~t=~z8+q)KTWUF_WkGG<+D5!FMd1sTIR~L4ezeqfBtQDxZ&BGr-kqT z6|=8iUVdTvxux50CcRrLpSZPNT>p)XRigd5jdR~$3f|T7b^AX#`CW;crfyPuw@f$@ zz5mJ2zs>u9PQM|ybaJ%q^qJh#iZAPKFL*plTeEl1VdeXK`{VbRZ>Z_NeSBeg|Dy9z zXU}fWfB5ZoUgF_bJ6U%1efsxW|I@RLKDUh(u6g+XWdHf#4xilbcKHus*B5L#wLx#{ z{*KvsksjysIcXhh?+uvKYrCqapYv3M>uJi0s znN$88O)NUYu-E`uKQFHLE{ZFPE2^tlwQXCNp1>v_*0j&n@%#Jzr`aE#Zui;Q z?Q^Q>%{AE-R##{L@B9B*J@`iD{rFGc_vhNa&y@&{ zbmOCY??0GlNB!Jhz5i6OBrQk`QCw)%#E3#9betWk5aofdNs@rpK9%_HyTKVvH ze?fu>v-a%L)MLwDhTng*Z`SW0ucp6ytbbSk<9Ge}J3=2Pp5vW8bEcJBak#3>R z?|bInH{16$uBPX9?aaWXYkvLt|LpW@-Fg4yzkl4)vRFXb3*@0Qp6AkitPVv!W7A&w z@y+Aq@&DBJ+mtg2>Qoo_O&Me^aUKinVneh5^3*YCJ$+LsgDDlmES zlRrCFct6!SwkEP|VtCUfojVz_VSl+JY$pb0Y!(ncKcl4O?l$!fcW#AiW@1|`I=0$ z`^OX(eS77(iD6BKf8EYpk}|Pv6@KZ+TdV)4Aoa}Z54!&aesxAy%k~T1-T(fJ*h-@_ ztL<8EeplFd*qwb_v=w)%B5W-{_xD-Rfye(%b@_Zjd{g?tg5&N}6T{B8oKyF>_Wm&I z8$0%`ImT&~k}uo1Ed*26>hZ4qq-Mi9H-cT>{p^lVv8iH@iqtIY{Z>6G`}28~$NvB8 zmmE_6=CaWDugJewdXw^P-EK+Fd~-G}c1LVP^}hb6^Hwb9yRGH2f03B(3g`1b@BLIe z^5nw(@1ENy<<-n8G3x4;Ut1$P?`E{ZH|L;QGXaPBUk&#h4ZQTVf3nw$4A$`EXMFcU z*itY3_Skp1BgnDGvb=C!WcuUN1;>xiX?j*%*mr%gmR-~SV@GcNwJ4k4Ju$p>k?!Y< z*VbHp`oQGRj0olhS|5G(pGa12nIWO_{QSwcmL0k0-Su_a3%viguj1IdLuC7N-W=%< zJwD&kHn01~og}DrZJwK>;RTV~j(JU_1++kSWQA&q(6*Df?YX8QM2;-E^|tcK^^R7G>RgHso?PizIpgxR1d%BVd04}^N?KRH{JWItX@-{1F8!K!x~V~F zi=^KDnDgX;$)A>p)oru4Ts(ceGS;c%q;t_fn@2a^wiiA>f0!drRg`gU31d{2{mOSw zCTyBMYwyi9*%KZF)o|xIeErwvQoGnjSm_7@Gnc{hT9N+u5-XGYla31~oH-J_JMV(% zKJMlJO3G$VIoZLjx8T_6-F8M6b}Kp7y>_kiDG=V_$zXr#F{5@BWB9w9YrHuOD?QHf zAAftVb?z^Xs!Y`*B|Vpt=6t)KFn@-lLDS9IXLm7#ywlplz0SGR#&OZR1#{F}BwU=e zolhGU-ikZ;D&s(BTfw2V7R}4~kIpKbWAo+ErQ&?e$wumte=kqt`9E{wt78Sa;!m}u zChpjqGE+u=HK+Q*3tZ`QvNjva+PXh%nQgTH)44Q=|LZFJY{R0}qh4N>Sn6$Ps_8i*_>zU&a7yFtM&ZqdUg3#u_mBBSE||WUcVB@2+oM^r zo%yF^f86L2eaE_&%eU|q_e{^3!O}-M%N)O6tl{-j-;3HSx^72J>|remSg;>UWeqx$VNt+h<~%^ACD$x%a%|{r%Fc z{hK1i8^l~bvpR?_GGTRNj8b5HIq%=jOs9_1%};9BWaey}d*iD4qnRrgeExX(`Nh7J zZ)t1wWY_+x;whbwlC7^5P_-&K_xnQ?Ve$GMEjxT(ELF9nA0A(Q)KfB zrZsGD<~6cgF8XRQB{^ixfi-)oE|h&sQr~pfvD^61N5(~^H_8Ovo^GA-wD`gst2NF3 zllypc*E>yJcQ`tx<wl-Y5Ok=5dI@2ij8uluOvm-Tpyp5l=gnm3&a z^i;OndPRlpllrgnymf}a6IrgC&t~^V?qxDo_xtr=_G0M>P>NM_u|HXBYk#Y z$1>B2xBg1JJdv?yeqGNiAt#QD{zY*eoX*SKKoyl!hiB#=oktqrn#@Ja(>($#>f+a6aU z+#-;4N#gC(%do=y;lw`o&Ug3Aziq0ri>lN7B71CR&ii{a&-~UqlA4hd*84$paSwym z1nw9;*+luMtGyMgpDn5s$@{_(c9%P%cJW7%_ZnA3Bf9c0x_!B#edK<%@3aSkNt-<1 ztN+Xs_F^?mtLOP#lgjM<@!b6Ozjd;j*^_j$=4`E<|KPcZqFRUHOyxJ*Y#smH{jX5> z<3dD;J(tL;8smME#s#iqIie8a6D8#`IQ3E!S)|dReP-Kl9E0uV&BJeZF5Mt$t@- z^NnvcUk(*kT)S+4tRjp7bPip+t$J zq2H@l)0+*mjosc@J~|$KAuaaBML{PY9;v9a?;q;EJGQF2BSneTO>fruV|yp;{+(xh z?YF(c++yB+mBt(RZ8}6{Z#2ltO`Vp0w&3|e!CT+gJpWVhJGJkLrE5p$^8Lzh%96`V z=Ks0SIqQY$_Qg-1I>wtA+tB~FC&l}JaDLhP?l8-#lg<5%G#{%KKK6_W+A*`w zp=WD}Y?(jT;tIVeXYc=aBLCO)Bna*P=uz)bQ52xnIeC-9eumUp8ix;gE>%!xUwYuI zisz})6A!vbijPHAWQ4ROt z#7ni$cfLBiv}o20_~L?8B4h@1pW3bRd1hCS|C;Dv?lbh@2wY4AMemh z=9~BO>J9h$7Tw_H)*WY-Zj_#<9=luc{wB*CbE`eKzd!Wu-IR;_gxjq7`)1_K3*OQ2 zSE>=@0v?S6bG`@K>`PwKXWJ#~-(V>0|8|$7@=iU2GfRH@oJu*uDjx7Sz2y>?icx~c z!?hq*|5Wlf`+`X<9~RrlZCE5;Vmf#2u8@aGJo$WQ_KGLJ>*OyD$o?2_JoU*rc8}#o z`P&7O=5)VT`gtyK%^_BarQ9E{#4*>dpLpl{D~@=c{{1}iacs{I3QpNu?8WxmwCTCN zqM8!(S{~iwM>4BeS1;cCKUnlY;e#h%lh#Nc-zl_rgUGLQhJ|+EdiL`r9(yi7`H2O| zJEnDi5?yFvWap+mr)teMzdxek$wz#6{Ds4^Pp_OG?Q6l=8fd{R`l|j0L$Xy>-=WOR zT^njo1jXiE-+ZKepUDeh-nGy4_8hcT`IbNZt6}R7nVp7n*2yl}RW{+%`Xl96zgC>O zuYT`}?TQI^@Bh5GH~raX&OX*t&6mz!@|EeAw438|u33Ff{(a-AYm2?qew$7Lc|w7C zJF|LP@|1OldiM3s-Q=L}E?r|d|5o?aT|)P#Sbx|ks(pvMN_3W#$fTK5EVnw&$q)~T z?_IvAf6G(n#iFY>%XTD|n?5?Xhb`ZiXZ3dep5k2fXyh8U@KUGa+QQo#X1y{<%Re9; z9#Oj>bnWp4eJRl|&YXR^?%?(W)u{KyN4~$8+7utT>NMZuIon*8w0T)SI8yjHQIb{Q z(WayY;rBb<$sF$c_P~lwYrW9YrG@8re4Tut^Q+_0t20ssbAG$nmGfu`9r9$qxO~mQ zfa3+Be6z$3z2Y#mGp>=CIfvcf;{85;Be^2G$$xiU*wwP*3>9niz|IU?zNZqR+6LO| z<+jY-d!y4(YSk9&!rJhpXWu5;ePJrg@>t^jdc#|#o>SR|r=KslSsKAUUrko}R$QxA zZ2R^d98WJ7Mtyt0Q+rQob}6scYSFa^K5Uzimo2kjT}M%EwS(@wqz(P=cXx>2`*DFQ z%TRlIVwmpnH4zPR1qD&_l&>0n;hWbj{o3j2yc5s8Hc0tDHEy`wJNd(c={j;JUT}Hz ze&(@XZ*h1&J3G(z_XmEQ{K@lO`|+-p9e-Bbx)t^EGfG8YSaSc-w6nWf1Qw@niQlN> zHtoqC0pUY8_9RsreLj0^OEL&Z|RWyhJ=8utkA4K=Ce-QDLm_no&q^&`va&)etxAH%P!oU6(1 z7jWwM=m_bfP7YPx^V8F-HgnA*6SjnYS7o<3{YM^cEzz6lYs69YTaYWRvh~lkBP}aV z8`m1g|GoA+;?~#Xe_x9KyEd;0)@s?oGClp=_h44RQ+c_^>(@;B6<)LW7t^ANYrKo% zI*fZg-FJNdoAuAVnrruE_o5$ zpX+ZOI@I_(zroPGK|EF~R)wR#O zdi}puu~}e!Fl*)hKZZxos_V@cT`5{#SmSB_^t-*QL9A27NfV1dJgNCIF6>Ne^{(BO zei<3zbZ*8`QT;ub8Gd9pI7gH(pQatoS&utlSgRtB9^oz0cY?1^V_kB!RzeHSN0n9&fj~te(ApF5@#ZXlzw}cq{v1e^h|nk!ud;pY%*UyDLECet~|yO+EYlzjwl{V&}ekSntVUs3zju&V3`W zob$Dj$GQ2@hy0f~2HI(NJ?GW;WY_4L5WPsS*0{h?T;}mAy_1!SZK(_yjS|<_zkRUl zrDs>IUgwIo;|+R;T^XYao3hS6`I`24&i2(`cux8Fa5DYwUz9t`cT0-&Jpq;H=Tt?l zT?+qR*crxmFPA@PbM(URmPf>U?(Yh@xAo5Fmp|Y9+J1ghvCDGaca>XC@BXO7#_Cmm)?M>A^@#h!&K)^dRW0?8eBjx_vRNx; z*7oV2&eY}q&y}?GO`kQHF?0Lx%nj8u?QJ_RKCym%dG*XGmaY@Mnm^rQX}EXLzNqw& z;Ro?$CxQ+1_AP$-_{rP1%knRZx>)flHHLAOxBJ;n5z9Y#eKCjs?5@r41O7icvrj7N zDOYj$=~mrqbC&K(%Ksx=|LJADd`MjSJ^4Gw#nb*y`~S~gJ~94$g~bP_4najr`#oFw z@7bzVb{~3Dvg-+3ZOPvEvU4ZC*MYd%L`I+YZPzK*xiR+E$F_W8xx9L^2yfM+Q@u|< ze%URzYMtdd`StIfp2{@LN>|kg5)Vr&*m~SqE~J!yyH4MR3_tzr=Y9EVB6+{baZOnF z?$P7bhjixL+CTS@VQuQf=JNB^Kh9Q`teMU0eot|Gc|e23+b4U2`HQbz+*TyFG4u0_ zdp{T#T?yW>{BcjH%pPvLgXMBnP4e}*%2U(dgqOW4N`7l%YIdpO)BeXTN@nY>df)z7 zrnG6_5`pRbCx7y2Oxpdqvs!6NtbD8T&o5v3G?Q-3II3xLRBRXDsr-kUeh*Jt8XKIS z|M})hNc!0!SNHpM7Sr|e4ga3Gz5B59#x%bz=a0XW%YDEV`uM?V(;9uLq|cAc{{4uO zK6~xuOP&pTUmw|;rk3g#V6rdt;QCWhH#a=AxW1J4)&12^&Njy-IXthP`bXi$v1zNL zetdo{6SKPB+Ip9J)w*k}FK)XZY?-RJ=^N9%)!^M-&Zw`@=Ur_v#Eoyr6y}B8X z)Z;Br@7mY3=+@FR+8jwSyQjHYp1)|c#mDTmkW;DCUcYTWNx=T3~&v{yhh)7-9l<=x)Y%732w^P%nX4-aUtg@J5_^wB$=(TA}` zJ#N;M7q!>9doMjFBn0hIjJuO8ybj1R9NQ5lD8oIs_I?3fk4uSJ3tJZElT5 z*8GiSZ(BhF(TXhsO275?DZf$Mv263~)svq`PW&yCTC-8$zD-5P`ckzE=Rd9nYj^5d zW*BLDC|gx?^W}(>CTw#yPWa*S%(Hdp?v1Ut=B%vQ`R9!5rQ^Y|2VMBLZ!O=fGjGX( zt1mvWRqos}C!U?R@)LL@VftRfmmJ@pg?|ps=eqq^*;0&Gf_2y2gvxOB?WJD>AMPsY z|Gg_HM*LO6zQ6;?Q&USOCq=qtmFD-*G%~^;)P9+6$?UN7@SV#NNtIf@2SUHh ztSb|l{?Vba|48Q~ze%BQbMM@eUVP@_ix1TX4d)Ib8YnhvW?EHVl z=eee=`_K8Ya{KIe&)RM>{nfiLJE5;1l1fEcbI)8 zDUjxO>8Yu6S}C`o-A<7szaug$D-6%K@3D8}P}G~p_~4b@Hqr18yD}#nNsG$wu+PX< zdN}taa~A{yW3Mer$76{RrchkpL~yi6Gx%rulxpW{_4**>h?CT zbQhZ4IdW%5>!<1iT$>H&JS(_q@^ABodY5m170$fxn`r;RTC3S;!NsQ^8KfR^ZYr3) zn*FBSl^;3r^1)s;SF|roN(@smxu<(h(Q3yVmQ~pr%2!V>cM{yyz3kH_%R|!QPBB{? zv<|I$CwJ|;o5saIIrzd+fo76PHO;+DtIMwD)JuwbCy0n`h^n zw5{L^DT>d0aHT{-@yLuzL397qmnvrU#K^6kb<*2XF6r?9SprTSJediF&c({*Zl?Ei zRzHiryzJxuaIqlsCHJ2m*pSVb9`vl`bLli$hw|h8-Pi{Z~lzkiGDTq6BM|L->HFOy6WO1e|ftFT^#<>eOToV@I(=gt`zUwW)A z-71i@$hbiGOy6!9eZ8mGE8}Ds%zfJ*J( z`gv`aOqJV0KE)$Pi%sSCuU+x*=_Zlxs@;+I@1DAT`*y~Ov(LA)w(b!#X@9a@z^Q|K z;q+K3cqI=q#0_KcN}EzDfQnpPhU{PWK#j!$C8taiQK{j+yh&3yPur9i{)Si~*y zd3HgncgPn^!qgSoF4`nfdljhO-W>mz2?6@kIVq)8EhcW4g7i zZ~gG_pQ4$`9{&3Nxo?-U|&+-cafF1cp6Zr{S99}nlO%&}dZKfiaEPTnf}L-I$?+01%5$LrnPD2Mw7?k*gL zWg^P|FRT%8@-YL=#cnb=J!SHPXODSnj%YooKdbZjgT}ejXVYTAWwLPR9($eBJs~ap zWu+Sx*KOXqszZ744MVteZ%NDMGo?WxyX)#K*Uq|LyV&}y^6XMhP}k4L1W{QCKlz&n zHqWU?=OqU>NV>z*)9R2?@u{?LT>{zO?%8I&{g$)s59e;(DY<`P0Eglcj!ARGC-;=J zxVBx=xfO6;d|h`ya6-RdLuTt0ow(!6_m|4gkDR2hsM#VAscNaOCck&fmM_xDcR38d zow=0v@6EjAnykj8=j#|IUaor;v~Nl0`S|3|*Mu+s_?h@vDQv-qi4ir-xwFkKZLG3< zDCxT5oLbF9$MydUlx1rF`dU59dG^j)?84TsseJBFBK;IwBsdq(|NJ+^vE@_0Szy$I z<=g8{JPMigIcd&B!NkV68;9lp*0BfQ*}Ok2@@dP@zov$}wuOH@FtMA{-L>kVThw(w z=iC26OKEjZohXLlcb)2Q-`ps7yUp>~2km{aM|| z>*b_A-HJ6nGyhMe^u^<8pD!<-{(67P^jW6vKVPkS@-m!v-MRO2GY|W}V*3_-^UN-* zBhQWoE)!o`sBBmER_FOb*?*J6@17D*f4fR=+BKCGC%h-WE-ln;ZjR3WanFyRuOV$? zL25_z`Yr?21sv^7dvSD_r&DTdE_ugN-utzMFwQE~Q{la@4jH#JLqF-K`saonilw;POpeEk@ zc;abO8Ag$_*2_M9-OGIac-oxV`MHTZr=Fj!&U`TO*ekYu6(k}BdD4--DVx+QpY?A&ru<{A z<&kC6gRb1Uc7I`L>yb3E#ZqMt{232w39;(!o7-#Ao%i&|RyEdsJJ$tQRih#sovnXm zMwfEtS5MsjsQ&ON(WQSrZ8WQt?3l5o?R>9~$GQ3QpZxh*bPu^tYZE4RFjDhQ8&lHC zf5|iMgq_`(+c0fO#n}Sh$#cXXH#1I<-l90~@WNjV?#T>xeOKmdEPCdKZpR$E)hFk3tSRYI%!iDv%k8|^RtFBawb{4iCl zdfwcl%+>7o9$b6myx!u-a&b3}n*9^jO}<~?difz!*_FAKL4lTudHb}Ee!QOkVX|zT zOhSIM_~sWHv%}gdmo03#$DOe~&7z{TJYh>{;!=|}j-J5*w@lD=m@&AET+l(^mP;}4xHbM8kU z__kQ?5p(>qivD)H_%5Y>-*ayyc0DUP+GCQxMCa2Yxm)e`+;{qj>SsOV7e6T7ANtYj z`pSmO-j98ZbBoMnAN`)q_P6QTqOTE8wAomn?0mVjaM>%hd=s8scVAZAxSz18GOoOpVo%$?5aM z*|2u!YqLBe+23ztUwL!wh2JudxX)exqcL$sx4p!K&NogmMkjyzc%GZT^{UHv_5wQ* z)#Xbjq;Tx{tW=TYX!S~8aUnPW7?$k*wDbQznR)Xi(_C})XXm|6D$X{vuUIpsxv*fD z?UtQ^UZ<5pd_I0WV-{hqerQV?_tmM+w^e4`S}a;x{QVcl!|lsHUJ(5IWkbM%82~Yr1&5lB|gKL5ZQb8mHo zh%A5E1s3zhi|h|x|1Z`ldzN9)@JaZKwvg?{z?sJCM^cn6?QKr}EPlSHSf}4(OY5DV zp1XF%e0mlg@%wZ~{3(NVPxeT#`>oA>^uk0=Z^_33MSro3sd($3}1G#hF#B5mz;1fKDLs-){`oFH zm6t1Jy5wr9ABQj5?ECK`=)QCAa<1D+|_LN+R+v7Fone-HOedF*D)!<6sW= zm~EzQKhD@ppPOH;|66b9c+zxdD4OH2bE?ZL^zFer%7S ze<^$Xp1qTs9*h2YEc|mzyo1tC&&k^^Upl91zwp4dmoJPu=iZq1I`O-p{&wBhPr2&( ztRJP{o&_GsSpSbf_O-~X6PKTSjOE><@p)Oywb+^-7=vA7S{?Uv#mUF zL6QGtrJ9*zi=|=Nal@;eZx3ZMJir#bMC}Z5(*Z+_IxmUgO z%NehtHE)aN-<+Iw@Qy^?+0>`YlGoV$+?jNL^X8xLcC+b8wa2f0X#KD(Z|APb{rcNJ z?vlDYmvNqT9K%DO{FY3aib}2jlQ;^0e-itr!|?E%%)FnelKyj_dOrHIisN!K-?29a z#e05knV-*hLp9@G=#hC(b?+4A_T1HHJtv{bxFBDim3`XfJqE51&nY{*RmS$%o)1c_ zX*jo3IwO{^>UUz-{F>G~`!*k$U(Oe8w^8iv+4mp*d_4X4i?)jyxX!6bvz+gY80j$V zTHRH>a@S_*^PP83@COESzl;r)slHfWl^$Lc*CPySsOlY2(|GFp;oxnl9k%-$e%FP# z-CdE|>HTw(+rCY9N9W!5d2Ii!?_AV$h80R-cYe$MOY_zKU-mw{a#bW#5Qkx<=Q(b} zU3%Y7|2aJ^P~u^8w)2|RS1SK5RqE@@>eIM&Z`~vJ_gOmob~aXLt-V-jzeg+e>ht%H zwWW3D{rgsHqx(>!WyTSe=dBX8RhgMD&5!L8e5CZmJtB7P=Ud!UZLSu4eBW|@j@ye2 zx%S-ICB=Hj7cCZ?Xtu8_$cevx`ux4Om5YzH2uz;+WRJjNKlnljPXr4-f^z9VbJ#vU z|J17y+g&*nkF1z5N8G7n^Th-0ab>(|b^jouJE!C*?#SXk=6d(|(&Rd!Jqb4-fY zNGr8Sa31^M>XKHI5o-Qu?X2!+fjcfTN0jO(e4YDM)K>ZMeu4K*{0qzfH$}ugev#uo zHA(Lu&%8MY)9;&nYkWT`!#_5rn#ud4?yZh_Rjog&*FQY*c$QN~r_u(I_kSvHyuUti zlV0J=^*QP51s?HS5|k6<3f(7pzlUqi$Wr^G z?#+&O-yf+-d79h#YhAJX;B5bEOY{ek>5KO;PI>m=Sl`5T^?f1NA58CMzo2#f;mR4U z&-fiyiSGXC8g%x!`Zw__YmV;DVBTfVzBK2Ki}1_G`UzXNetkb(>+qU+oOAsrthwLL zeWR8y>t@=SPezw`bCtuzrJ|ntR&ZHu&sf8%OE7fro4S~HIVi6hmiQrdC@JGV(*0T`&|}RnWg{Wj>?hL zS69BfZ7!HK?`W5GhU)dib328n{u4a8&LUya)3Yv{%O~Bb=a??D<<#qsXKwfWKKK8q z*N(rb%W8SzTYY!^%M6;RvMRxH-b?v|+5bCSqASjneVVj1+SA<5*Glr}(fj`|oP47z z@LO@Eo%9*a3_J1X6}GD$DgVg!S#!5P`TI_Z%2174M*9UM*6GR2X_FVuW(ZN8_fmX! zuwrOdJCf@mSVRFQ>w~P3Gfc-Hgq8+wMAbbWfW)r@Ua6ypr6d z->V5Gai!q5);ae#&D_fs z`YG|x=V#96`PL|}e-I%yqjiPL`&I<{-~GQ&@kpYFu`a6!X(!wY1b=&0A(|9}{~sZN>zj z#pi!1GqoM+l~uj_!DeOOI_?`CPE+%aOpbQ{bhmcLrmXn_$;#1|`ClJIFfe|(nQic8 z@se+QT5RW~yYSB5n|a4YeVyd-(%d^K>V7pM@%%PIH&-u9@QY`#Juh_s_qPR~FI>Es zu~9(ylI6Rk?@8^|3)k@YHr8(Qi&@2fo$c%g=0J|H#V_ry+^IHv#-p{o#N$bPM0&v< z!{teS(anJYZAKyynioXZE#udGfwXebee*gU&pp0L&u=#{<%=Gh(p&NDF6T@6iLX3) zf4^psDE{EH{+Qjb#UE>xM3RCe-_8kNvB|gMwBp|Po@*|?G3jeLZCJfG^hKQb^1}Z| zZ2xl^p3-}mxU(_;>Vxo!yKR^7+tj=&yLj@vuy93c1JjvG`J<1m-Co^TeB&dFgz?8K z>#VoF#;n~c^?~l%?e&j5BCF;+0 zAJv_o881mb+a;hhTTk)%U+<6S=Ct1aQXCY!@nYT!)m=85%O7m_|F>S?kx%-2j@3zD znrb?>rQB=mHGOOmzKE4~PT#bN*$*QwpSn=wGiO=&1}io>tw2T@cE3L12*g^82tMdq zi&HjDMk}+|tmL-W-4T0U=>E@33;a#C%-a2d?fZlq`)ePFtrAdL?PmNul=In}(iffA zJIs9=+L!99RLgQtVPBfQv%5y{ruQaR^_2!)&lfqpKe=LqKziXS>fwVtw&+ zwIOqCMD@2cxrCK_BXm!H@cqeQmn{AAoxr-}MSm)H#9D83uj1U8Q)pd~Wajo#>&%PW zH#E7w6m2E!u6AhEk2z_n1LiwhcRq^bd*&lQxIkHc`bvN^%r<#MlgLZuD%eO~gWt^(9 zE|Yk^<>?gDkXwxEebW5i7TgncBTrVgYV8*^*7y8XAp66MeI8dqVQ}n@mxUItN|)cT zdbAW=a{Qv1ZE(dfW@_`Y)(uu|DSsGp<-Y-%9xBjD(TPw7}9%=F~@_2Mi zYQv#?{|9{q;@1uy54aqjd~T<3|H9_E2Yk0CsQbyti*J7$uJVPqVzv3h*-Uv~6jts% zKR=Z>vGvsK&b+FHE5z>JaJ8ycEM;tbS|J|aUY68wV7p}f%Y%kO1Z+bTOzIW{Z`{>2F`QXL17lSvoK8W$i ztDf@FVue=Qgg2r|P7};er_RndOZ&=oW{$zYf}_v9tYA0M9fpR%h(!0F56H=@WZFD8Z8fJfiJ!)xFnx1^v`82Z!*<@wPilOx?DZk~y`arBjx zciRN@wI`RC7u!i(J-Ue8+@6S=vsbsk@zYrBo_TQ`eezh;-5xq0Spxz2*@*QaIrPHdjz zl+ya-Ppal_%lFC~f3V#$%UzQEwdjy>SHN7~A4<*l)RZjsk4f(QFn>)*SN6411O1t& z*Vh?Ot^Zf5S-q8G``v4&PCb~g$TG36-nVDn+fbW=Cy%TSdg(7%m7=-N{3Hu5XQI>uEmoul4A zWBSh%joxQxEv_jI{q$uuTln+x{xc8NOPTK{q#D0|B`{mueP-O0W4%9aY~4Jkz3hkO zN2kE2-J8oo#l5qILY^!=`E}QhX$KFkHLb~CzWl#MmKb+<+m5fRID(nF3N%ivjy_%S z>;{K?`t`&4^0SVf?vuKaH-UMhNVlC>T3F}lZ7)`)tlG7yyR}Tt{>HoGQkx`|%UNG* zb7$t%%-j1>SU2Q}Sp4}}hdAC}$z6Ul@QGN=(LWCIUv={z>c;vV{W(jlwtxQrFQ)7M ze-bkb*?UUacl!7J28!p@7vDLNVm;~eb4APgeRIm6~$;|stFHYPxbF0b`-PzGE zcJ6PRUVVJo$D0c??io&9|6X>7o!R3%HQC&!*Vf$2vHQ5SY{tf2jrwtGE8bq^nwN9= z#OjyN`uI>-QkXFLQb)_lks`tKLdGcAu)qSlxba$)OL+7XEhmVR9BPg zPp9{9jr|hBqo}s)VX?CCq|eXQK|y$3s{g_EX9Bb1yaJ1(>)XRbg=R%SFY zbN1QP*k7rC`7LD4GkckD#8d{eYuh-=)$Hi`+xc()>Vz5m`kQZjexoCI!@58xs^*1g z`;RY&I9lI}Un>2?pgD_Ae8b{*XQ~~w)X$s^UuyC17f;=$#r1vn?y>2oT?{l^%k$aC znNhq*?-CFD`geRWt=em*w3YVl*I2w^y8oK)3ww*T_P>_gGf^eDdtv4F{x3J{F6J#( z%_>HO?JZljwsdB3t!(|qln0yz z*Pk4XKl7;Zm~r#X=v!yg-*E)qj5ztf($pd813xeOe7=uM%KG*{7Rh}Wwq})<)}G%l zd>!)Mi4?s}`{t^zcuTQZw{L%*-WC~n`}DHgyKdZxI>Rrg{q%ul{N!~7G8e9-bhusU+O@N~ zw&g?g<%$<4CI~k%J+1n2cm1*tHOD6~Y%;adPk43tgst&{j5~p6%lUYEM0Rw&yD&5Q zdwAKW<>e(4suy&<-!sAc`-N@GOdpwv{K^qY=RaApW}aBJXz0#X8Lup#v!@ls?s-06 z`sZ>$T~nRwBK5MF=Y2(#tW}=3t6SE;n{)lucY&UJZYgn=t#hSnKXV)M+qCB=>~TK2 z=taebX0;uhJ$4N7|K}%fG_l!>YOPdFKU%X_14yoB}sF^q|sjk=6>d9iu$AL|C8}sbhcc1@TJXQFa z@b>Zvj_7&)(-6F7VQ%gC$Dyj;z(ymHpcvybkS2(m!2_x{=0VGd&~LH-z;C?o9&aH ztX*A^yXV4g?})iR#`hm39yeIOse4EtKel-0BUW93 zJ0?!gvz=em)qcI@AMUq<{sTwwf5GO*25oNxY)j_J1;+AD0^yGYk-f^ zy7WzFzcg{r6*u7vNpMhZQxtv>57 zuvEqV+I{5a{ac?8a*7&poqPZB(cdPWL%W`TXxT5A9oeYoe)_%m+yw_NH5#x!FWdTT z|I(Q)>`Om3iE(XubK_gHbo7}uDrGs5E!)>}hW=)Hx3Ns+^((!eSrd4+tAXzPT)Nmqw&JQ|2Ws9;>+t^>P}p9 z`|{z{%+t3`-tx+^quD3&Ufs6zlsHSBv|9dTwUz}IU+n5*M3~c<4xUvm*_YOGE_%^t zk$Fd7#t5vOd%Cc%WB01*;clhR%%fKPnkZ~B$n({t8dmXqht z`)53m?MjI~b%A{{M|nxoN%6dx9jQ@DkL4zundA6$&d;s9s~6=xoVREax9#%%=VyOk zzPad^bdIMelcoU2EIp^^tWD9~62iNk11-f3O;jfTlk?(xQ=s^7+N%ziV;iT{6goBj z?@(FxBlOO!&kt3@f1QgsH0PjbPVAnRwN5guOpd~CFZMVTybj#8YuCQo-E#%*F!Z^y zRBPS*znndKl2lSguw&XD=I6a`JS)Gch}`GuG)cOAXzH2w_77GIoA12gry#)buB7E0 zH_LVzLsKUO0S*?XMu!V3g2Bol28iz~6euVL7FG~2@pN(h;pcqmQsR-zdkjvkzm=)+ zb>ceZxyS8XGonjtmqoGvj;d+5JGnVg_VxFD?<8_|q+bb<`?7hzDR&49)4{pT7k=&* zS@^kEu=R<^sXw~)o8I=HI=`&)?~a*Di(Z=birVKr`1|p@$;FZu$4AU$*Y>alu<>|1OJ4|2lWRG*7E>+`qq-Sr>(t zu~~3U6uF}9^!&X^%Q^ENd)}T4KixXL^lqGPKkvFQ)Z+5{sjW68!6!X$?5KR0_}ruN zb=r!Kr>~3;zl&0-w(6^!mVWG>yLCEe?47#0n2(&Z7jf&xiLTDEY?+?k{;nIs4L$eIH6i^7kC?*}2)XE>rIIr6b#% zntnOHsIgTn*%$aCEBW(tBd6!@T|#DXo%GRRS=mwjx+tkPGNq(m=fTekejd-lXa37} zYELYXwwhgU|JeJ@cKMI*H($`Kk@DYfE&aFn{}cZ1b4NlRet*ESr+?qkGxkgoJ8EPa z_v=2J@XT)BylZ`by{8v?@lP{X)a`D)k|W^n|IX*x_w^e#^*!PU*#C36Tt?16h6Ts6 zZ|MB{xkW#7_qI*BSJm{=QYVHLT)k|zjKR83s?oEVr`^GSDub5fZljPSQo-y5bUTOZU zo7R_~pG?oJe_)$7?@D~()~Ww5*KDd2%PTWtJ*ocV@9F*@zXHVEwAy=hx?7vf4j<-R zbK`Imui>-gr8#~Fc4YeS@E%&elg;b1hksY<`&&zEWCIg+F3^hQlrit^RIa{sEz(WA ze8$>ryXU_<)@aY`-E=tO-p@y>R#jOVzSd{gmCpb0^c%~mRr{vTahkF3hh>xP+>N19 zC;Y8X|9c;{>D6}&FP)NOi)Osi-K=`^r{SZ{f_Lw4HD1d*XK`!gMDNl$QO2_?r6(IQ zX6^4hQ+cWJ?B;n7m$z(sy_2;eM&{(Mt-mEd+>&71e&=wT$i--d4270++;hdP^h@?} z2IXJg{iNw`jlo+HsaE5^>ADXe{_^@^w%ER|;l!ncsxO}sug;ut>d=}GOTy*zz4~iU zcM462vATHjvdfiU!Z%v?omLlK`}5ydR+(P2i_3%EWtLc!Y!!=Bj+C^D`nB!2;YIQF zn|%20T2EbWEtmAud*X}rzxEocH+{|iHYxC3!~GX4ZS2a;EH9^RwshWRBgVyF_2t{L z7ZmFIP!i2X*`>dw3`_<0;(SPwrb>>g2MF-C0pINx{_2upg?JFnV zUGVL|7lKOG_l%;d-e-V@p>Zxe4Ikx1w*rKcUhwJ~X5=q{v z(RcUtw2jK%?kk@->{j&ubmmOu6gB^+-5RIaGITpN#coZS^H-HSP#e0J^16I~D2%iBLco%?)!r}haEnLFnuPBMRa z_3~7Cv$PK0=d8VK3qLzOU*CVBa^dH4wXfUH9SrgLb~I^%*M+NhBz7&H(A~G`dxYlZ zUtf+^`|=dJ1yr;a)bCE>t1q6RBst~W*@8)3ou_mUZ_DPEkzHH3S@&s#A7@Z|nuVrA zcy@SW;|uxy4^Bv5{`vlnQ(x`&=DgrT9TESO)VtQ}DlO|iexve%##4usMa*}v`z;PH zXRo_Etv@GIXG-pek4;DJKVD(*dFvCQLpvs}_4xO#@?LcP!d2}jCO%wt(IWa61LMlb zdO69Lo_}^_>fD~uB4|;jB)B?k{-+npe}DdaB3AUjjw^6>mqJzu(+D6BY&O3JH5BMZN4|gJ zXYG{-hiWr8RJD>0=I5SZmAP5h@yNWH^V`p^9T6F~*W2IQWxK{|)&5sW%p0@Q3@SG_ z?ODUMi+A;d`PSB!i9{+^R8UP~`6%6@Ow)&K99U97efTZzNccV{LXTQRCmw0JTVq7BD za&GSVD-A*4YX0&4uXt*D?{9(dbDg-v+L^bKqT;uuB(t(b9=f;i*1n0$a*Q_nMp#-V zX1_b=A(dk)w6w}L>Di104+X6BOa46rlYUF0I#(@NTBJ&}M2Qo*e=^9RtI$v}za#4`T57yHCCFdu_ zmNQvv?2ss(wpzURT1(39xt{tg1yx72&fVIPI9bGbj$T{wNxv-xTc5Co&W%b+^m*bW zwB=)N|JI%BgN1f>Sl7wM>P8%?`THl?r$g=B13&Tq(_(fpFIE5d@14Y>B+otf3Kp#r zy}Ns7vW2{JlVHHl3n#;U4{f`;=6>;{&mYA*EM>jjcJ5@4ajt8NN{%v*HVv5Olccrf z-6hH6`~L=PUFNIJdNech$!u@Gx6Z%Kj6B6B=|ki?2X7@MdOd!zkVUPPU+Kg{h3fS|MV7hjv-#}~t?~R^adAr@ z^GmHe?`0j?MN{IESGWC{yt(^*o$Tq|{bwIP?OK0hs>(y#45t2HOE#6B(<@5VD^=CF zVkDV-fGW{}`p0KUES*R(k%pmxW)(KjKc>qD|ftb8bJ*N_At*{&alN zjB5wOd?gbPrdF)yfg*}k54PE4E5*YZe<9(!`-)w!|IoznEla*T zGiQqJow;`Ts`Ij|b;XQ+t`z;zC+EK5nM%D|jBVonmX;3TCp*~;GQK$X$VhZdKh<#Q z>dZyT_8;6!zDD|+KAq2H)F-dtR>=R?-QMR%$G$Cwt{*?McmH@*F?IhWp=$s58Y@;q z8=W4-@8w6gzOazCi#TLHF_fG4iBppQk;OUUXF5I@w%AJ?dyo*nW#`8^RvYFzb58q} z?C7JrMb+}&=?@#uJ$ZZQz`>AW<`|>a=Y0j+4t3il_8Zi_DfshN=;p3HpYE;y*}7H# zaeRFn-^KV%HJ@A6wz#iekSJgkuk7@^^&I!y{34IKy1GS%mkxN``eyUxnvmM={N!s_ z&Ufrvd)jqsMPJl`P0ynQH$DlS_ReShMtAoj{`8ZtG@s~7o&RHd-RHmf9UjzPm!b9! zrp5<;4lni`&~bV$Eqk@9g_XB)RjU3mn{O=qU$#6t&@TTW`x5UOh85u{T**ov1+UI0 zPjyvD5mHS*d%v-xv3mRf9l9;Wo# z;?w=eGpDOs%uZfyyQAVBRrdDyj|V4r+=@=T^n8-c*7m3QfBOHXrT^#7li1m?rseRO z*`HN+I&i-&xS>6`St^T^bRZo&g^WoZT^kk%ot$_s zdA`z?wZF`6UVmi$#d99->l-fW>uwjEU$N5WMSA|hW#3F3_Pl!0@1T(Jhhy&kvmA5t zdo)y*2RzIFIXSmJq|WT@>*KjvN=)24R6kCd!&#N6`C0wj!ny6vbGcmp{!DJa|Dmv@ zta$&*Yd2+Q&lf#c@$>uhm9E}1q#i^R^W-VTZ9gLKxcGUWuDGwr!q2=<{h5_Z_607Q z#Qp8l!{WdU(Q{v_Qx*B|=Jme|!Py~`T!p_w_Ek<_bzWle4BJCpvhVktI?i7FddsA( z8=uZU_UwGBipe}%NxLeGgN=1t3Oy6PUa|Z$EBNac-^`r&A68xF_mYp@xv8?>q(3+F z*|+I?c2=D?6&01q%6;ZL z9aZkMoqKlw{1=D+$KC(@jz4`fPUghr_vg|!tX`U{BU;Drci{I6_B|U5#QXaDl`lxC zEdO0m6=nUce$TYvsuk}mJkPRy{PN^nO5OgBspdg9q@qCthlPWKI%dL1HOfU)4HvB7k=(l`)^`a z&#>@wxt>^$-wKYZuk2>JJbS+}-u&|XY`mF)@`rbG-zH0cQj^|RdvwdWtM3CFzdzQ# zx#uHq)7FMd?GKZi6Yg_~t-pKj;^EsrvmUC;OlXoYKE%G%b=s62Cgm#j?(K&9vu$2K zGud3e?EDr`=Sq2>Rpjx@wNuuy*!^OYuls8}yY6qN>FMW2b{D>C#fxl_l=DkCD!1>R zK=Qwgkkn!(xw)q|tvB10`P$4Z_s_KRb~WvsjioZHHlC0VD3dsC9iQ{y`P%)T?oRKn z%$s0-?JBtY^zo&6&HhU1=xuq=X6sM?^k_p_#;XTCu7+DLOiOw0{$g`+Hyf zBo>@r-JO2+<1W$4t!ecv<@}JsNZjhaN$I^N>uD#?o?~@Smr-$e>(M>!TmH(z@ETk#?mmF0dVpG*Wxf3TD-e81`4?xj6t zoli2hbcW5f3bWfDWjJZ-!o^GTt7UHgd=xs(^XA^*%3Y5Y?IMLc_xbrc>Bi2FI}+W$ zP4Q*>(mj9A|Nl_DivRKb$TK1JZ=aqPk^A!Et?$K!b6rGc8ZQ9%rv6q~U#gEhw*TKp ztN&5kW((a{__KFQ+PeLo^$ebor+)g%e|$HaJF@)Lyo2j?pB%NDel$X_EBX7b)IYzs zzC2U$HTRm!Eu)NQHgexL|545L^wHg_YWdr^rX+sL#rvOMPTD@hINR)h%#KOC?w7UC zPoMtgrE!_cS}hrl%3|Kv^|wy!IxqhDQOCE8v(LC^HZ|Y247xNg&Ng;^4d+#%_0f~V zvp={Oh%1)FK^s27&vj3Ps%^Stba1Jq9#`j{3E@AVq(+DN&pbLUZQYI;Mjog4RI>)@ zS)ICZBvph zRXt>9JzT;N>&w2IIYHsqaea$V$4dTLZ=aBS|Lua?Qw)@*?LX1^Xcupf$Jt+>Pk8u0 zy6&5N^O#D{fsMkQ5nF#vahHF2{=5423EIr3%zjijK6+m`BXf(=&K85b6zxg-Yv+Bx z7Jq;t;pvHj%NcWC-=4pJzSEVoYdN=KZ*tj*^{+ZB?!))~_^jsr6Lgu|MEu@(?wnGV zGsiUc_xZ)a>gG#Ugmkw}(CN%vYCP?hmh!{(xo>Qfc3hirN<_RMEM2kDt%)n>c6v z0p$uI{c{lw+Y+?Azt6TTU8U1EL#0zLcW=O?gG)oQJFn}WUVZ&DJT!mK%H^E9KYHT= zC7s3o{>taiF`GwQ%ls}m=(TWB`U2znXRzcWp|+-WtpG0DSv&y)$d46VW9ZoZXG3mNTp+|<1Ad}=~6^UN%5l?^$1 zQ!#o^HYpFB4jtd}>Zj#ncD4mK_jhNrIX_M6>Pj`)c1ycGCks7jDi?nC4Sue>D?Zsv zY2}W`4=;B=IQKl_f2_&AgL^;bUS-l#n;4X>{o~xSA20IXT;8gb;=msA>Ku>comp4j z-nIz+nq=^@=)~mQ!orIRGrLZn(>kJ%S(v%Z@!Hc#;mi9(ICnRwS8j_|S>5;ZLqWU8 zv^^gTJ8PE--aGjzap7zJ+z{=kr&V7>h04Bdd$vAYBQWVe!k(YOJ9IxCzq1}szsl>? zJO5n6wffPUHZnEqB)$*Go$nTGHuI+1nmKben0`-C;oTQb?(?2dkpJQH{q)E(OwEgpGeQS&Bi5$th zt0xH0caU{2d1rG<>E@?sp*&`1PDz1d49_*T<#g`6QZ?=KIiabG4(PA2E(<;Hx9PQC z0z0et;&Vk`7hRk+A!oPo%T@-z^$|xSrOk6DC3RdrTA+8cQ*7PU6(N1^cdy$%z54n`@J=Jg-2Hlx5>($6r(3R; z{jKo7WwCv_)P3*- zyV)k&y-|Kf$2PugU+nSS{`ebpHh~+-4E_HfN4|T^Ar0zd{fsD|b>R2w`e*f@+a3n) z{oob#M}5Cb|B9(=tmgO^`k5{D)3eZw&3HG(zszszl&p^Fb2fLsuk&5{Hu-bK&xHb2 zEMJq~WPh%>qCR!){kN;;n6o8-J78P(vI(Z7Ep4B(t@$kb*OGZA{o?LlRX3z_EEIOT za4@Fbwe|-yxNo&r`)(C~@}oWVA6I;Lt^1p2ZY61;R%Cat7RbLIk_!7wr<31_Jt18JDg$c6G0N(EsAq=ZSfj--Jw682>l|H?XZV&f{`U;lIH z*7T3-?Va0S=tu7R$+R?lX=w2togMnGCWU8zb}x9YShCLz+Sh$j68Guz=j^Ph|8Ms# z$vy9!uba5(w^^F+-<}t@ci9AYK3~DAQ@u`9&^s>m<+(3X)paW03#P4^=X7t;$20eX zkK5|Ankw(SQ2gunp2~VF?dAIqifwL+-d=IHs-A_Z(X!XR}*dL7+M4f)^^O;Z!R$<=7mv}kbe(% z`jr&{Y+qhAP&#Y6;b>GBtvh)Qw-et9%yT26D z%gU8APM`bq^L1@|Z8@C-uhfLLd_47JzHw6J-g3=TxAgZHZ!k)@9M-?}S($Z``*B5n z!!!5SUJL74cH1QE&yL3L$L|Mket|Y$7E;8O`fr;3&2R2c(=YF-yEEg+t%v3{G7InC z$zN3(R{zh$fGd5^pWmOaEK>F1Ef7)CToK-KF1ll7(>GVwEqmWCZ|9hsFHtWg0qSK= zjY&Em{{M1u3&5QT>_M(zCSPd1et z^YV+_v%9mUcec1(S>KfHd2L-0pJx{>K4P51x7j^ncj15$K=oKq2cqQKg%t?yKZW2@Gt&7W>1CBNiYOU-4@^1_o(;#48wA> zllo_qqoXe0J|9?+Ent-|dCExke2k9DqF&vPY3JYU?b+pXyxa3-N$5_a?YYH4x?2@X z{w>SQ`NuJL|K>nN?UN_NnwC77*EQSU;Qti$|L3%h&q#Kje6ucK)d58dao>&1miu=n zOwii!dZzbh_Du$BG94GX{+_t{Lv;buJ@@-b&*T|(V(j`3+!rhMD31m6l z?5Af>Fxq7=_Mv7Ed)ty7ujh#0K_*@rx#A z^*zsjeq1a0X3e#~YL;ITF1_x5ELPa_n42)R+O2uzuRWx^6mw8 z0#@&8a_;`c2s2-IE#;gdo4-L(pZo9UYDdpG#WZi` z%&y1p%5-eASZ~>++01u)zKZWcSMj_vKTbAQUAS|*dlAcZ_29xy>;J6(b&=a5yf)S5 zt>Yj0sFa&sdwS!Z%wFQn6dV-PSe9crE6u32$~(lj)4SOH)8kT!&znwee&=gko&L+_ zr_NjcJ;%>X4!^c+?VtJ2CV$;ruz9kkhuy*V@pVV8w{J2CvdsDN?*Cq=gwTaL_doL` z-@lprY)>(3Zd#Kv}3>7+9?{2H@`4f3Rfotr;ou4}wxb7^wY&D~|1@$MoKdMmub znU4D=KRPjQOX;+WM`hDq&pQ9pPU&^mJ(bkHAvn3t(nwIsY1Uq@$k73&DmH9B? zz`ZE9bpe8#uXjHce3jjwzcP8Ppxo1_1Ai z^qv#trx!mhu>F-Q_arquEa$1w)6~WlVVrCMHzWgRgiH~SxV6O`)>9R({it>N$puJH zb=rQB&VQ?#QqFWH{GGKoWs3C!^D3?W^K*UAZMm6qZo)+Fvd;&%1ZRkx`!auPOZ)ot zpofnA_wI?vM)|r-v@E@NDfN}oJ-*2n8_Fc(=bmO>zR%~+@r*xvw}56>AMVY3`Rj|) zJucHt)n9|Isc3$XGn&}>Uguchx$YXN%E&*eshZEtYmc;vD9b7K8@}Ayn(_7ghxz-p zV7=NmCoTnQSzgFHG1Ddp22XSc>mI9T%nmw(mQkITN? z*gj`P)yBvq@1k$%KVIxR5gq>N<^P}yFMC(y%$*o?`D|D~&b!*4<-fFVTL1rVkzBUK zVcCNRWqnijc&?wf?#~9p#V7NM^j5fRx+*La&{A`$_iOdlC(}Jwtl?d-dDVWe4Xt;! zTIpy0xVc)^+Pk>IbnA@Ey3w1jE(_Y-%N4rSYfj^WEg@A=yFdFGOGhoaes#iyO3+lv zzQVwIZu3;uT`{H}TwL#dylZ^rA@O;Q!A*?`6AeTo0_Q~+KMgC=I`X#8woO=0Ha4k-p#x} z@3gy_=;Yds5=(?iOnalXZa;X;+PVMu%(oXO#yClsZxTIu-|l?%YyFUK9TApBcT9c- zt>2+apzHkmdvM3CGqZd{_evdq6u9+g)5(W_BZ@zWZ%REd;ZUco=JZQ_y_=V1|F0~0 z^`uQ?YSzRVCtTfcRU1J^KtnVEuW9TVld#h@p%44hIe=NS-ol`#h$?PqdJ^lKfqgL??!h&-`k{lM@ z@bX>t>sI>PIrGm6FWpx2@NEO%OtI2!$|Z6w=fc(0OZIKNU{Y?dvsGi(^UIG8##|AP z^}LxMyj)J&GFx6d?Ok$fivNW({gvOIxYbGSm~nOUn-e#GOLE)a^xwAg{>w`q*R?;C zl{qNg|1@oBRCk!_VtqZs-_pqa-k_!B?lmEjIsHC+?`%%;Q8Y4Y=4`IbTztoA-Oj6K z#7-v09GLjFU8Bx;M#B8{9o?J?i|21i~RM$4;iUa$bnz`$gw=U~J znN)OZO3_J)3FAz^TVqiw9G%KBcRv?siZ$O@%)Wjy57$!G$VHsr-)l!bxmc8=w~9M2 z=Fi=}E@`RlQ#No{OiJJFy6M#ne*W@~l#|@@lW(L;J)FDldY)mDNt4qqt2tX)7RU7O zb2@bH-nBoscv^*2*?5l4=706|_r@%*Xr`4xT`3GJSr-;RH#S``#diMw!}f8Nz2)|I zj_kBLdvW!WAJ}@{rJ0kW{@z^W;`y7A`GeMt^Yh!ev-^6M91K$qTy@?2$A#?+GL=jI z{o1}v^VIV6*2cJ%8*3zG&%Sz5eCAr{0-dvI|8}OZU0ErnS@N$do^!7F9XGw{7LkV% zSWcd5;f=9uQPS4D(0pvC3_E90cAwr;wh3!`GZ?$m*-XlKxKeyH)~x@$H&-w((Q3-Z zcT3(}N!sD)J23~^-<@$Ta=PUW6Q%e0ZIxa$XOofS$#Zhn#f8S8?k!X8 z?PT9;rrLeInw>Ez3U#uv6Bk|1o_L!}ODjdCSFD%i=~X>5H5cJ@2`};g(=^V9@y%TL z<;eZ}vd%F&o!4(ydtU8&clVCroPNcF94l&GJXx*w@b}d<_a_Hv%4xY9ok}%!uDJf4 zymcuDR>mKm!Te zXJ)yEJ4W?!wbsiizYjfJ&(g=hpuphi;uuo6>x@Tn&JE%0UQW@#jZr+!#g&WJcfIx0 z@|hJhNA=8>6p@%SA35dQGlG z_M=4dUj0v}=iGgfa$v@ZpB2gnnU4#LZJ)W~O_0j%Z#$x9zHDD{Ql6nF=EkPZ$;tDc zFBMlk#ix@{T~!*ozFC)hLd?6R#oEG#_VY~lXZ`*(6=^!N`1tGx+Z0Onsr7_iiwTk7 zICb*boHeTQ%=6Tww^>IdheS-QJGzqBsE>Szb{*Q<7KYpv<1tUG)`Wbq%-y6-e|pM=1(uKu9GQ|Iya~I$(nUl zuKtS@E=%3q+wp)wws!TU&J|wI`;KO~M$YT;{p~d85BJ9W=)Ofa+7_v3r=0AF)tB9N z_VmWrK@F4tKkZ-KJ?l@#>nzFGLuk{UQz@GEoP06X!{OV`{=~(HB<|c6Z{IWdjrF{! zP!F_T`=L5~z4lA_O4fF)rR@oAy>$(adut0%Scj&rZt8i=-Vu1m`Ts?JVY@~8xjun^ z{v1@=XBGE!{gNa1E{o6ibL8RYPCoHBwoupVTpRzi556f^o0xY_xFP&e<2I|YQVq{T z{x(C48{)ZnHp}^Po(D87{TH&(U+sLYhI8%an?LR?mpQri8`t&=)1Fl5A3kg~d3!N4 zd-e>0WuIh^Ejg$+=gtRP!AR2((KWS_|9=^mbo`t2bhds>d3=E5Wyed?3hKWLah)?$ z4l3W={j}xW^^PTKj=6`H8}uty{`{h=<-Gb*(UEI^YIlmg+;KkPFkiZEYq*+9N!*J+ zrR#;Q?(dlJ=g%LPjq}1}etclA^WF6@^5@qUpF|%PPQSmEIhQ!1mcM)M;8b|EJnNmLgx`eaVr%yr z>)v8D`gD@BB||yl`%%A1vmQ+h+Rk-y>ONz!&%Y9s_v`);zklyX7H^|N!E8Y*eS>b$ z+RhtxYa1u#+I|R{pZYfY^G(UtjcQUX#;@`3VH|F2hu-RWdf%}A)#hG1}_dgzfX_eEfBETUf>-3y8P0;GT2FhaC zjs2S;o&UxKo=QmF|C7DpElZ1-nv5l`U90$eIYnou+l4O^WM0~Q({#GMDtrI8X*ZCj zT2I2JTJ=vYU69stjyq3e;pgp=3qMaQdMujgs_D45MJK{N-Z0iCGPc1w0Ra&CIgOU$vk%P%u~e z(TeqLTSA$go=cya&*t`G&(S;6+9qvHmRx7XrZr14;Gk^bo&{HQbkyt*_tP} zbe0zAFNu6#^CoKA;t)-Pl*|+N@5{s%-Hm7DP4vE5#G!wl@33g+A=&?lAD2~VO(@`- zdAMD;DAFofbvYNxWbf6Ve(N@NrQeWA>)()c+;XQZ-k^zjK)zKJ8`2 zvm`~q+?>wqS7J&7roXH()SSCcEBx8ET)!;kEvhB|o`L)G>+AEpT`l0f_`|UqT^EKl zIv428N@6dnD?g|ZnsD8C`ZNBN#E8pHhko7Z-xHU!l2Aup1KLer+rBt|Nm_G7RZ+Up z{`%Ibr6TSOK3`v-_q}}MkKw%M$G4|#xcutVe3f=NpQ^uwca-`j#_UytOzB?!x7gLE zPOGK)bNNK|Z~cN-l*{Ly3wMs3cl`6on-!j2(fe4h_1+eOb>OdCYcY66A82tm;w&&* z5a=cH(nQAk$+5QJt1M?$^~5Pk+FbDTFW%ZTr^Hl?^+}lj+G*J;xpKzy{1+F89#1`L z>7VxJNx{>LQ-dTECqI5U{nD)ZKY7uWB1<+kq^B)=v}3odcYl=Wn|sw=LNW7wj-K52 zY5yyC{Rc5$r+(bR{;@t|VygBhv#N>tlk|RuA$9n<*;S>^OcR>^tnbP3*9Om0C#T8`wz$S|KxVZcCF3ntibL%_deRt*+ zXrA}>Q}l`dBXe-xxf@!%PnOS3{a>yf`L$X`Rm=)B<(>Vk?7{c&vu>WbJ)_6-+T_B2I+FF$ z(`8;-TTeN+YyOPSHx;?oeTsz4BlA?`@-#=kOLXpfp_|d;VW!&h<*e$3)l&z_XN)}Gvcsh<%+k_Gan{7pcu}iL!@GySUD|kLlIQuunvplG zwkP?za$SC1rRLOpQ^<-RG=FiukIO-C>%$N6x)u=&7Wo)Gx@tMO@Nlrk>92{-T`UqW z%~WP;?(^b%^YO{;8p-nYHf|MR{;R%aKM`WTRBXWQa(~VEKW)<1o?SHaQ_;e;VTP=*&i|FfG{5GXMmYQb`~311AT!kq-OAR-otmY> zde2$S=;Pd@7UwD_`YW$K5{BICXO7zC6MN)#q7eHvy~nGID<52$-uYjmcmMQh>y^1) zU6*$VnpRYI**(X@@R8sriOF%%9bx}@{{LJZ)bn(aMcMl3V|_ZZOD8eEZL>LPZ2UZM zmd#ZCMLO2{q4j?lCN4er<;By(tBeh&GOa}{X_B)DzF{9j{omf70I1|ND*8?pGSIvTrY5^2E35Ysu60Udg29?`|C_tJN(Q zaQs{%{rdZ=llqebBBdSDQwvokz}4@=^z~(Lbk07!dL_wkd(PRg*V7rmEbwoTJHG0^hgeMW8i(nt**qN&ir!`JmE=sGC#ojRY9zFbN&8fB z_PPQuzt$ah*B>u9)ZFyvSjK6bg8-%4N4_d1@M8kVz*u5Wthz`Iu`weX0F=a-Dv zt&@0kCf7P1R-RaNuXC|@Ued|#3qPeMXaua*G}AIv2+Uck7FzpubJ;on=bb^(`#zL8 zwEJ|s<$Axc;h4ML$L~dr?+ONyC|hQyO*_x;?nyHdT9#XqdS6aGl?E=g@K^hala#g41G(UmlV&IJqF;UZv6MjEU~2*-JH&?(Eoc zTI{gy8rJLmy71}nf6otd_q!YYZ+*=3?}O{1a`{J}ji-5D{puX2+XkKyKl?U!;)VFx ztRh}hBn%|-?cRy~Onw(0v{d9ILlC#q^KB|e8cOXJ%XqBpXXvebtR(e-`?D2oy97%e?Iq$xV_HQ`t^=KdlEr`@hIHs zIcxYrr$DdWVn!?5V{eM(#{Qfzg{_DuM#v+1TANC;o$TJz0ZVVp$UPZZbT(Dx6t6<0 z^hKudo)@RRxV|hX)I09DsA$Jh!-N2ZWT(X1x$kqk3%D;Y>?u`GT`qR`?2o$++f;79 z^Qls7xU9Xb_*yETndkA2%SSI*-RzvV&TEIrQKUhFHl4b zd7dYG7%*wcTm4++`J>MC^>>w!Y1~tlC7*7Rytr$hJ;M~&O;5M0wDobQs$87KcrLJJ zv+A=VNj!rH9dFmNn0H*LJRP91;y}wWpWKBW&!ijqCc{5L%P7f?F4DP+6+;32??f0U0hnLx#zKzFPx>iK!wjJDQb20qr zHx*GeU(Itu+qbGJi?7hsH%}5@ve@NPLWo3w_S%#Ep~}k1!ZW&Mqm2Al2ke*eQ4Se+#?Gi-LqnRijvH_E=;tsvY5X3 z=(jBj)7G*J89saSXm|YaPw$dHSL}SGU8d?;!9VN3V!M?&b2q>K#C>kcv5U@}K3wuH z6An9mi`%*-)bIAeXU+Wv*_UkMOx8Yj*v0j|+Wmqf>&)vckJbLJeB~9eqf}+Z?!KgK z{#|_)JsaB>j$T?dgy(>v~z0b4Egi3;LuQ{d@6ZL+ zUajY@cU{_A*}Z-8q?~{q;zjiddd^IrUtC@&;ycmQaAV(`Ghs|ZmYv^X45nRP+TC}s z(dyToV7{GFey-L+Yl9;y&ffPBNr_V4EiNdtU~&HLpf_K(xu~pI$>3$QRmD5C$ zyY*Nte#ZZ^*tOzh|F(70eyZGYT4tcSLzHix)+4jGPYzw(xq~q$^Uv~6=i9j>zP_t^ zYqxJ=SMZZe^JPi?e{7D$W`HQ-X0wmj`Ok^ zn%(S=oM>#USjnRiJ6F@{6LY;w`1F6Xzqkh_y?@#5zg(fMz18r^zjZsrWYZ6`d;d_| zly$H%#^X(A#gw;Al7e<^AJ`8|$h_$`GoKgCzO7i}U{L+43+j`f+f7-x?`BTT`{2GO zVbyn|GrWuTOn;a-_vG!Jjm@S$9Kk>Nk}oBQ`{n(Z*Re)wmFTs7J@tPjtz7C)emX0@ z?&V%V6F!w(&hO>=3m@bdE0vn>ity{aP{}>vipmP#A0p2TRrKfYb4|?%jq1Cx>a5`W)TP(KW&CW0voyw_8tuJTGESq@eaO9>cuFCFX#`XTS^SqQCiWWZq^1br& zzmhP&`et3zbz1~DSV}?rB7WZPyHMG^Ls$K@X=;dW^~VP@3~eqfY_J#4e{e@vWKG+a zR7tm>y2v9!>s9v{W^=ATwK-zf>-P(#OuzHUwE9;vt=uJ~^84Bs4*CB0hmK;d*Gi99 zIre(2`!aXqgzIdf8@}H6zM*v_Pysa6%{_PjTaLNgB?1NW5>lf1_gqPj{C%sY?AW!3 zB6HpHPA8?vy8pB8u8i!zptkeYgjr8KPOtkbA#WoYUajr(D`wK-ZyWyf{@-Z7Kd_?i zyMp+HsRc7ii}yWlzx=aTIi7>1To4po_sd$&Mfc2*QUt9WXmkKA#ojxW6}o%?b(5{g z0=I|vGYhHsquge*9OOz*QB-GkKbA^#=*jL@a@8%5;?#797~-a zS3s2{UGJzm%;tJpF=G1{*M-w2be|6_eCV&mm0#d3;hVn3y4PjpZ??a!Pqg<>j@kHW ze%GyazoaiVe7wUxC2gi~T(I!YifFrNLZQ18Xu?hlrOcp7{ z=zDm)Tf8CjHq+&!_ce4GQcpLoux?eH|3l6>QufNRRjgY5`y#f!X>ihvO+PJcI_Xr4 z=1=KUo4Qv2Q&XNk+p^!|GVknj-xp8F|NU$dQ=>xx`(=sJxINq~O|zdCx!zbOZpL^x zAZyJ;@5zQL{~asSu07ROt)4QkIbeH6`=Kb_V@W=$FC~QQ7uvjke{F+UtNZ^`*(OmM z{>NwRn)~TWcPMLYudFk70-goQk2;yONY&~oAB8vgDp#%QSK(E8 zqTB(c*pa8=x_HX8MaG>(muEMf3NqPS2wT9YW=@!!J+>4{#jg&pI!+> zU%v1ww#By2{@)`00A_vbQ&YQymqyQ6J9S3x+}vX~4@xxD-nbd?)hzC~$(+4?Itvy* zI-YReLUeC<{FJ=JpHc?e_D43WUr82oa^X4o)6X^UT>I-71(z>YKYm{RGh^!M54(N0 zEctk&EvA)A=ScK(wl^*6+<@9(s>IJ*CfT{vl(&}3U4sZSrK z*EGKT-mJ^`G?V9LMyr6JThYE?!P%b^EyXzm@AC1r%>MK-RFp{|XGPt%lrb}b`?r(ac%jpy_#&lX8JCelF-brT&NLM8Txz9su_tAg>g-ys&8vI?G8BA z{qnQ({E8`O+l>Cqu#?{rqrn;u~c_PZWy7H+t8iepNBSAKk~J7cTYK7s1> zL3^aRH(Euj`hPt>Z6-JG=>qX5@F8xZD_jh)j`5ADkr9e+W>6C10UxD($ zWo{mxj==&wXB{rj;xu_g-OL1Yi@tITHUXaoiuH~)9pCk)6y>fwtnqTP9EQ^C?D{^ zz>R-q|E?)Bo&O~B@9mWt7cDliC5G;6Tfc6t_3_`6H@q?z{_@wj zs>nX$vf(6Q!)$xCiUqUxiRqkf+;scEr-Vwzq<}K(AJP4f9WFEFt2SPGn!$NJQ6=?3 zwuZB6&yj*12`|=4I9qpV$zD-OI%mWAzRjGY;K6;(#R-ZmlRgVh`@C=p=gXK2Cm#tp zxlBICen?Bub|3$iG8?6$>q$m3Ys2+3>`wi;xXpIPvy~ZzY|r+sTD*P5qz$}w>~}Y_ zmH&KqLZWTv?hoPb)zxxE+-CD0j_a&{uUPvfJgG{=?T|x=@9*gv21XZSxi+u*^y7Qr z%ENVAUQK&=Z^Nev_cJn>*BukwE_#03SJ{4@)dqXHlnXUhrA@vgDyDSHG=_+qbp}y%Czl<)t_kYTlRP6F)@`sF5sEbb~wuUz~aSK{Vw4j z{@OCeGyYp;Xz|Y(C~c1jm@h*hEGf4v6F9)ewfdu`&V3I%A>XGekPXg zReN+sw)@%+neW@qwzIDgYk$_mIv=F@hsOui7^xW9(|*o5wmlfK8|Hw#~uXSv(zCi?I1 z@d_KQmJXjupN|V9TFP%LZWOq9mcc%)*fQ-Chs@#g8TEUvZeor- zc;@u{eUd3LOMLUw1G3G`^Ht;z&Rzfbo8O^%W@6P@GFVM2b zuC?gc0w43V*M2pvt3Q~RJeQo_8v5BT@4w^?W48op8@8p5PuCw`^Rwr`zuJj~;_e)R zOecR%a0!8w!6m_#mX`K;dmdZJK7UcXp=;j3-TrnZcNZ;BJiSwDce3!iKcbs<_X{k_ z_PpF7&2_JS&vDM(E43{DKlVJwEhy-8C-R(ww_I=9wWOc52`Y=0_dD~yIdEI!;SJq$ z2X7diJMgSXSR+dPp+?IKMV04=-HPHmIs_j%Sct9l=lgbKb6^|aL9sK>ax1v^DJV>S zyZg9@!)2|Hxs~%BPWRuLAIG71$gjvQN9B2IhlG7yRtw~UBSD{SGa)w{270nVt~yfE zI_UtuZ^+3-RT6rk#R`!}s{|K$uM$73x4SbkyeB=NY0yBGo z-nMKjlhZ%wUq1hM%fi0}E5lZGU;F&go4exwZnv9LoH;&zRc~f~s+#i|q`#1MZbDUoAck1C4e``dS=GtytTW~e`p^V9_H`_{Uew=Hs z`F2+Cjq)<1ztjI}M1K+$-SlRXz@v1>qPU{CKQfXGT4e&_XZCc)_n%kW+dsEqcjvAy z(KGx1SAMdx(>OKt@X_o4x;mGq6$g1S)y9&lsB8=tHi`(3$1Ftsz2NJi`7>w=Z4sl|K8t?-#*d_+ZW|z z&{FnD&Gv{kf7<3h>!g3&zQ+8!Fe@d_cz$Jg$cHDU#Xn9-&)eo?nP&Vl=Uw%;x=rSP zCR+d7GmVWqnkT%i{&i3y6MLLD#8C>YmeUFbaVRICGMLgW-R(xdb9Hu zlQ&19&ZN)B)j*-QXfh+4<#pRrx{tqqcvjrMVc#ZRUA@kpx;iaecJ5Uz6JttlMn=rn zdGK?(_R4(jq$8>ezP)*R!2Lj$=ELsm{|=qHRb{ivyjku4w8-uDJS6!K@E+;J!IOPFeDT>M7{238f&T7WC<1x*>h zzh#?Msu`r^i0S9)X7O9;Hg9}v^zq65gKp+4_C3thUXpxo`>aZT-sk6w-#uIRcKfII z^3@Xdzs=Ol_MWZnHoN$%xy&Rf$UpIvzWc)I`pM2qTNVr0Hb1EeS9z}b+_l8WVY$Ck zen#B+Y5C@x_g-Y_(ztUYvQXdpy57^%`F%oVjb3K!*8TZ+TvnCO&-Qs@QE_kpYqe6j zT%h>hOF}}O;cG>%RCZdM_S)6TEICqn;{JQLRCS^Cj^!h?bQOdEl+BugPk5?bin&w_UE6EHb&3*{3>GGy4a(u zL{I;;S>LoRPi>Z%eUo?oj%nO}rkS#f8qi;S-S-@JCh>yLq-p2dju z#vFLBe|pi2rICBWza8dG410b3%>Gid_sh}@pH0f%`R=6pgL~DLyCc;4IX_;WJm-Da zlRZ!Nbofa%>`$`vKfi0*P5*t)3#AT*_U}8;{lC&yxoY*gxcUiR$)}o&XH?E=zpDR- z{rmk&{(k$-Gu}?zceaY-uhHx8mlKX&+@8;KDkn8Q*O*b%`~DG$HNUK+c71%Z!Zcqp z{_6MiOFM5$e0%6)_h04Pnut^7_daa9I=5=elVFS71&-O-4QD!^8y>mo*&3$3)w=t} zraVpk{~tB&GEYDJq`CaWCKabI0+T);R{$sbYX?hPn0u$J`#Zt4e%IXky+2vYcz4da zA2-AAgkWaMMC&W(&Mnpdc@<@AXgAeV@;(m;U@W+iLxtLq?95Q)XrYa6KXmuuRF zFL!O0-77Qx9`>RpfWvbCu8ALO4sZ7MuK(~h&i!4f&Bq&}Ds|@b+2!Kht|l%NTT*f| z$;|(^?DjKZ75nR&M61_+*e)7mYsjK!gBv@?FL;G^d*MgL}i6YmwH0KbxGeK)_o zy{Ch#5|4Wq`%2D^n}7Jw)UONAe>c*O{PX1Tj=Vi>r{7mK&D67Y^yl{dy?t`{Rk4kq zk2$@b?s|69PMb%2X3k!>r}=oAL+wW?F*}?2{@HzRb}q_4m$B*bV}oP9k3_B)t(wKJ zpL})QgS%6WB}xOe-|yc#?eKq@b=!8WJ8t(TD{rSxUueJm@$0hjf$RQ%s*L+}l>3g| z>nyvwI~vyhlXw(VyyL;8OdgNIg} zdeUa?pp`cc{`qxr`48V$LGR}MG~XtB{PauVo6`iGI?5(}c5-2x`M9o0@@4YQnp-Bz z(#${Jyi(fkktl>=Bsg%yvk9hUoQv#&1q>d(-*mzt6B**DvIs679sH mcnef{Tc$v3)DExz?0Q?>LTBjeJz-#AVDNPHb6Mw<&;$SmCB6gz diff --git a/tools/disassemble_elf.py b/tools/disassemble_elf.py deleted file mode 100755 index 1fa58a8..0000000 --- a/tools/disassemble_elf.py +++ /dev/null @@ -1,312 +0,0 @@ -#!/usr/bin/env python3 -# -# ELF disassembler that attempts to be matching -# - -import argparse, struct, sys - -from libelf import * -from mdebug import * -from mips_isa import * -from util import * - -def debug_log(msg): - print(msg, file=sys.stderr) - -class MipsDisasm: - """ - """ - - def __init__(self, elf_file) -> None: - self.elf_file = elf_file - mdebug_section = elf_file.find_section_by_type(SHT_MIPS_DEBUG) - if mdebug_section is not None: - self.mdebug = mdebug_section - self.has_mdebug = True - else: - self.has_mdebug = False - self.cur_file = None - self.comment_section_pos = 1 - self.section_local_labels = {} - - def add_section_local_label(self, section, offset): - if section not in self.section_local_labels: - self.section_local_labels.update({section : set()}) - self.section_local_labels[section].add(offset) - - def advance_file(self): - seen_cur_file = False - for sym in self.elf_file.symtab.symbol_entries: - if sym.type == ST_FILE: - if seen_cur_file or self.cur_file is None: - self.cur_file = sym - break - elif self.cur_file == sym: - seen_cur_file = True - return self.cur_file is not None - - def disassemble_all_sections(self): - print(MipsDisasm.asm_prelude()) - - # debug_log("Name Type Addr Off Size ES Flg Lk Inf Al") - for section in self.elf_file.sections: - local_labels = self.section_local_labels.get(section.name, None) - # debug_log(section) - if section.name in ['', '.strtab', '.shstrtab', '.symtab', '.reginfo', '.comment', '.note', '.options', '.mdebug', '.gptab.data', '.gptab.bss'] or \ - (section.sh_type == SHT_REL or section.sh_type == SHT_RELA): - continue - if section.sh_size == 0: - continue - print("") - print(MipsDisasm.begin_section(section)) - if section.is_executable(): - self.disassemble_exec(section) - elif section.sh_type == SHT_PROGBITS: - # TODO kmc as doesn't support incbin, byte array this - # print(f".incbin \"libultra.a\", 0x{section.sh_offset:08X}, 0x{section.sh_size:X}") - first = True - for i,b in enumerate(section.data): - if local_labels is not None and i in local_labels: - if not first: - print("") - print(f".{section.name[1].upper()}_{i:08X}:") - print(" .byte ", end='') - first = True - elif first: - print(" .byte ", end='') - if not first: - print(", ", end='') - print(f"0x{int(b):02X}", end='') - first = False - print("") - elif section.sh_type == SHT_NOBITS: - print(f".skip 0x{section.sh_size:X}") - else: - assert False, f"Unhandled section: {section.name}" - # debug_log("/// UNHANDLED ///") - - def pass_section(self, section): - pass - - @staticmethod - def asm_prelude(): - return f""".include "macro.inc" -#include "regdef.h" - -// assembler directives -.set noat // allow manual use of $at -.set noreorder // don't insert nops after branches""" - - @staticmethod - def begin_section(section): - section_flags = section.flags_str().lower().replace(' ', '') - if section_flags != "": - section_flags = f", \"{section_flags}\"" - section_type = "" - if section.sh_type == SHT_PROGBITS: - section_type = ", @progbits" - elif section.sh_type == SHT_NOBITS: - section_type = ", @nobits" - if section_type != "" and section_flags == "": - section_flags = ", \"\"" - - return f""".section {section.name}{section_flags}{section_type} -.balign {section.sh_addralign} -""" - - def get_label_name(self, addr, pdr=None, optional=False): - if pdr is not None: - sym = pdr.lookup_sym(addr, EcoffSt.LABEL) - if sym is not None: - return sym.name - if not optional: - return f".L{addr:08X}" - else: - return None - - def get_comment_string(self, start): - comment_section = self.elf_file.find_section_by_name(".comment") - end = comment_section.data.find(b'\0', start) - if end == -1: - return None, None - comment = comment_section.data[start:end].decode("ASCII") - return comment, end + 1 - - def print_end(self, vaddr, eof): - ends = eof.get(vaddr, None) - if ends is not None: - for sym in ends: - print(f" .type {sym.name}, @{'function' if sym.type == ST_FUNC else 'object'}") - if sym.st_size != 0: - print(f" .size {sym.name}, . - {sym.name}") - print(f" .end {sym.name}\n") - - def disassemble_exec(self, section): - raw_insns = as_word_list(section.data) - insns = [decode_insn(raw, section.sh_addr + j * 4) for j,raw in enumerate(raw_insns)] - - # enumerate branch labels - branch_labels = set() - - for i,insn in enumerate(insns): - if insn.id in MIPS_BRANCH_INSNS or insn.id == MIPS_INS_J: - branch_labels.add(insn.target if insn.id == MIPS_INS_J else insn.offset) - - eof = {} # vaddr : name - def add_end(vaddr, sym): - if vaddr not in eof: - eof[vaddr] = set() - eof[vaddr].add(sym) - - cur_fdr = None - cur_pdr = None - for i,insn in enumerate(insns): - mnemonic = insn.mnemonic - op_str = insn.op_str - - # Update mdebug info - src_inf = "" - if self.has_mdebug: - # Get new fdr if there is one - fdr = self.mdebug.fdr_foraddr(i * 4, extensions=('.c', '.s')) - if fdr is not None: - # debug_log(fdr.name) - cur_fdr = fdr - - # Get new pdr if there is one - if cur_fdr is not None: - pdr = cur_fdr.pdr_foraddr(i * 4) - if pdr is not None: - # debug_log(pdr) - cur_pdr = pdr - - # Line numbers - if cur_pdr is not None: - asm_line = i - cur_pdr.addr//4 - if asm_line < len(cur_pdr.lines): - src_inf = f" {cur_pdr.lines[asm_line]:4}" - else: - src_inf = " PADDING" - - # Symbols for this address - syms = section.get_sym(i * 4) - # if len(syms) != 0: - # debug_log("\n".join([str(sym) for sym in syms])) - - # Print end - self.print_end(insn.vaddr, eof) - - # Print symbol - for sym in syms: - if sym.name == "gcc2_compiled.": - print(f"// compiler generated") - if self.cur_file is None: - print(f".version \"01.01\"") - if self.advance_file(): - print(f".file 1 \"{self.cur_file.name}\"") - - comment_string = None - while comment_string != "\"GCC: (GNU) 2.7.2\"": - comment_string, self.comment_section_pos = self.get_comment_string(self.comment_section_pos) - if comment_string is None: - break - print(f".ident \"{comment_string}\"") - - if sym.bind == SB_GLOBAL: - print(f"glabel {sym.name}") - else: - print(f"{sym.name}:") - - if sym.st_size != 0: - print(f" .ent {sym.name}") - add_end(insn.vaddr + sym.st_size, sym) - else: - print(f" .type {sym.name}, @{'function' if sym.type == ST_FUNC else 'object'}\n") - - # Print branch labels - lbl = self.get_label_name(insn.vaddr, pdr=cur_pdr, optional=not insn.vaddr in branch_labels) - if lbl is not None: - print(f"{lbl}:") - - # Relocations for this address - rels = section.get_rel(i * 4) - assert len(rels) < 2 # There should never be more than 1 relocation for a single address, right? - # if len(rels) != 0: - # debug_log("\n".join([str(rel) for rel in rels])) - - # Apply relocation - if len(rels) != 0: - rel = rels[0] - if rel.rel_type == R_MIPS_26: - if insn.id == MIPS_INS_JAL: - op_str = rel.relocated_symbol.name - if op_str == ".text" and cur_fdr is not None: - pdr = cur_fdr.pdr_foraddr(insn.target) - if pdr is not None: - op_str = pdr.name - elif insn.id != MIPS_INS_J: # Branch labels for j instructions are also R_MIPS_26 relocations - assert False , f"Got unexpected R_MIPS_26 relocation {insn.id}" - elif rel.rel_type == R_MIPS_HI16: - assert insn.id in [MIPS_INS_LUI] - rel_name = rel.relocated_symbol.name - if rel.relocated_symbol.type == ST_SECTION: - rel_name = f".{rel_name[1].upper()}_00000000" - if cur_fdr is not None: - pass - - op_str = f"{insn.abi.gpr_names[insn.rt]}, %hi({rel_name})" - elif rel.rel_type == R_MIPS_LO16: - # Ideally this should be in the elf code so the relocations don't look identical - addend = insn.imm - rel_name = rel.relocated_symbol.name - if rel.relocated_symbol.type == ST_SECTION: - rel_name = f".{rel_name[1].upper()}_{addend:08X}" - self.add_section_local_label(rel.relocated_symbol.name, addend) - addend = 0 - addend_str = f" + 0x{addend:X}" if addend != 0 else "" - - if insn.id == MIPS_INS_ADDIU: - op_str = f"{insn.abi.gpr_names[insn.rt]}, {insn.abi.gpr_names[insn.rs]}, %lo({rel_name}{addend_str})" - elif insn.id in MIPS_LOAD_STORE_INSNS: - if insn.id in MIPS_FP_LOAD_STORE_INSNS: - op_str = f"{insn.abi.cop1_names[insn.ft]}, " - else: - op_str = f"{insn.abi.gpr_names[insn.rt]}, " - op_str += f"%lo({rel_name}{addend_str})({insn.abi.gpr_names[insn.base]})" - else: - assert False - else: - assert False - - # Apply branch labels - if insn.id in MIPS_BRANCH_INSNS: - op_str_parts = [] - for field in insn.fields: - if field == 'offset': - op_str_parts.append(self.get_label_name(insn.offset, cur_pdr)) - else: - op_str_parts.append(insn.format_field(field)) - op_str = ", ".join(op_str_parts) - elif insn.id == MIPS_INS_J: - op_str = self.get_label_name(insn.target, cur_pdr) - - print(f"/* {section.sh_offset + i * 4:06X} {insn.vaddr:08X} {insn.raw:08X}{src_inf} */ {mnemonic:12}{op_str:35}".rstrip()) - self.print_end(section.sh_addr + section.sh_size, eof) - -def main(): - parser = argparse.ArgumentParser(description="Disassemble relocatable ELF object.") - parser.add_argument("filepath", help="path to the ELF file") - # TODO unimplemented optionals - parser.add_argument("--compiler", help="original compiler that produced the ELF (IDO or GCC, IDO default)", default="IDO") - parser.add_argument("--strenc", help="string encoding, default is EUC-JP for IDO and SJIS for GCC") - args = parser.parse_args() - - elf_file = None - with open(args.filepath, "rb") as elf: - elf_file = ElfFile(bytearray(elf.read())) - - disassembler = MipsDisasm(elf_file) - disassembler.disassemble_all_sections() - -if __name__ == '__main__': - main() diff --git a/tools/fix_objfile.py b/tools/fix_objfile.py deleted file mode 100755 index 52a79bc..0000000 --- a/tools/fix_objfile.py +++ /dev/null @@ -1,68 +0,0 @@ -#!/usr/bin/env python3 -# -# Fixes garbage data between sections and optionally rodata section flags -# - -import argparse -from libelf import * - -def fix_section_flags(elf): - for section in elf.sections: - # Unset Alloc flag in .rodata section - if section.name == ".rodata": - section.sh_flags &= ~SHF_ALLOC - -def fix_garbage(elf, original): - # Begin with the original data, and paste header and section data over it - result = original - if len(original) < len(elf.data): - result.extend([0]*(len(elf.data) - len(original))) - else: - result = result[:len(elf.data)] - - # NOTE: This only supports the elf header, program headers, section headers and section data at this time - - # emplace elf header - hdr = elf.elf_header.to_bin() - result[0:len(hdr)] = hdr - - # emplace program headers - for i,proghdr in enumerate(elf.progheaders): - offset = elf.elf_header.e_phoff + i * elf.elf_header.e_phentsize - result[offset:offset+elf.elf_header.e_phentsize] = proghdr.to_bin() - - # emplace section headers and section data - for i,section in enumerate(elf.sections): - offset = elf.elf_header.e_shoff + i * elf.elf_header.e_shentsize - section_header, section_data = section.to_bin() - result[offset:offset+elf.elf_header.e_shentsize] = section_header - if section_data is not None: - result[section.sh_offset:section.sh_offset+section.sh_size] = section_data - - return result - -def main(): - parser = argparse.ArgumentParser(description="Disassemble relocatable ELF object.") - parser.add_argument("compiled", help="path to the compiled ELF file") - parser.add_argument("original", help="path to the original ELF file") - parser.add_argument("--fix-section-flags", help="", action="store_true") - args = parser.parse_args() - - elf = None - with open(args.compiled, "rb") as elf_file: - elf = ElfFile(bytearray(elf_file.read())) - - original = None - with open(args.original, "rb") as original_file: - original = bytearray(original_file.read()) - - if args.fix_section_flags: - fix_section_flags(elf) - - result_data = fix_garbage(elf, original) - - with open(args.compiled, "wb") as elf_file: - elf_file.write(result_data) - -if __name__ == '__main__': - main() diff --git a/tools/libdiff.py b/tools/libdiff.py deleted file mode 100755 index ac6b139..0000000 --- a/tools/libdiff.py +++ /dev/null @@ -1,150 +0,0 @@ -#!/usr/bin/env python3 -from typing import Any, Dict, Optional -import json -import logging -import subprocess -import tempfile -import pathlib -import sys -import queue - -import asm_differ.diff as asm_differ - -MAX_FUNC_SIZE_LINES = 5000 - -class AsmDifferWrapper: - @staticmethod - def create_config(arch: asm_differ.ArchSettings) -> asm_differ.Config: - return asm_differ.Config( - arch=arch, - # Build/objdump options - diff_obj=True, - make=False, - source_old_binutils=True, - diff_section=".text", - inlines=False, - max_function_size_lines=MAX_FUNC_SIZE_LINES, - max_function_size_bytes=MAX_FUNC_SIZE_LINES * 4, - # Display options - formatter=asm_differ.AnsiFormatter(column_width=50), - threeway=None, - base_shift=0, - skip_lines=0, - compress=None, - show_branches=True, - show_line_numbers=False, - show_source=False, - stop_jrra=False, - ignore_large_imms=False, - ignore_addr_diffs=False, - algorithm="levenshtein", - ) - - @staticmethod - def run_objdump(target_data: bytes, config: asm_differ.Config, label: Optional[str]) -> Optional[str]: - flags = [ - "--disassemble", - "--disassemble-zeroes", - "--line-numbers", - "--reloc", - ] - - with tempfile.TemporaryDirectory() as tempdir: - target_path = pathlib.Path(tempdir) / "out.s" - target_path.write_bytes(target_data) - - start_addr = 0 - - if label: - nm_command = "mips-linux-gnu-nm" - - if nm_command: - try: - nm_proc = subprocess.run( - [nm_command] + [target_path], - capture_output=True, - universal_newlines=True - ) - except subprocess.CalledProcessError as e: - logger.error(f"Error running nm: {e}") - logger.error(e.stderr) - - if nm_proc.stdout: - for line in nm_proc.stdout.splitlines(): - if label in line: - start_addr = int(line.split()[0], 16) - break - else: - # logger.error(f"No nm command for {platform}") - return None - - flags.append(f"--start-address={start_addr}") - - objdump_command = "mips-linux-gnu-objdump" - cmds = [objdump_command] + config.arch.arch_flags + flags + [target_path] - - try: - objdump_proc = subprocess.run( - [objdump_command] + config.arch.arch_flags + flags + [target_path], - capture_output=True, - universal_newlines=True - ) - except subprocess.CalledProcessError as e: - # logger.error(e) - # logger.error(e.stderr) - return None - - out = objdump_proc.stdout - return out - - @staticmethod - def diff(target_elf: bytes, compiled_elf: bytes, diff_label:Optional[str]) -> Dict[str, Any]: - arch = asm_differ.get_arch("mips") - - config = AsmDifferWrapper.create_config(arch) - - # Base - if len(target_elf) == 0: - print("Base asm empty") - return - - basedump = AsmDifferWrapper.run_objdump(target_elf, config, diff_label) - if not basedump: - print("Error running asm-differ on basedump") - return - - if len(compiled_elf) == 0: - print("Creation of compilation elf_object failed") - return - - mydump = AsmDifferWrapper.run_objdump(compiled_elf, config, diff_label) - if not mydump: - print("Error running asm-differ") - return - - # Preprocess the dumps - basedump = asm_differ.preprocess_objdump_out(None, target_elf, basedump, config) - mydump = asm_differ.preprocess_objdump_out(None, compiled_elf, mydump, config) - - try: - display = asm_differ.Display(basedump, mydump, config) - except Exception: - print("Error running asm-differ") - return - - # Print the output - display.run_sync() - -if __name__ == "__main__": - if len(sys.argv) != 3 and len(sys.argv) != 4: - print(f"Usage: {sys.argv[0]} [path/to/target.o] [path/to/compiled.o] [function name (optional)]") - sys.exit(0) - target = pathlib.Path(sys.argv[1]) - compiled = pathlib.Path(sys.argv[2]) - if len(sys.argv) == 4: - label = sys.argv[3] - else: - label = None - target_bytes = target.read_bytes() - compiled_bytes = compiled.read_bytes() - AsmDifferWrapper.diff(target_bytes, compiled_bytes, label) diff --git a/tools/libelf.py b/tools/libelf.py deleted file mode 100755 index 11c4c03..0000000 --- a/tools/libelf.py +++ /dev/null @@ -1,1181 +0,0 @@ -#!/usr/bin/env python3 -# -# MIPS ELF library -# - -import struct - -from mdebug import EcoffHDRR, EcoffFdr, EcoffPdr, EcoffLiner, EcoffSymr - -# ===================================================================================================== -# Utility -# ===================================================================================================== - -def align_as(value, align): - if align == 0: - return value - while (value % align != 0): - value += 1 - return value - -# ===================================================================================================== -# ELF Identity -# ===================================================================================================== - -# Offsets into e_ident -EI_MAG0 = 0x00 # Magic char 0 , 0x7F -EI_MAG1 = 0x01 # Magic char 1 , 0x45 -EI_MAG2 = 0x02 # Magic char 2 , 0x4C -EI_MAG3 = 0x03 # Magic char 3 , 0x46 -EI_CLASS = 0x04 # -EI_DATA = 0x05 # -EI_VERSION = 0x06 # -EI_OSABI = 0x07 # -EI_ABIVERSION = 0x08 # -EI_PAD = 0x09 # -EI_NIDENT = 0x10 # - -# Values for e_ident[EI_DATA] -EI_DATA_LE = 1 # little endian -EI_DATA_BE = 2 # big endian - -EI_DATA_V = { - EI_DATA_LE : 'Little Endian', - EI_DATA_BE : 'Big Endian' -} - -# Values for e_ident[EI_CLASS] -EI_CLASS_32 = 1 # 32-bit -EI_CLASS_64 = 2 # 64-bit - -EI_CLASS_V = { - EI_CLASS_32 : 'ELF32', - EI_CLASS_64 : 'ELF64' -} - -# Values for e_ident[EI_OSABI] -EI_OSABI_V = { - 0x00 : 'UNIX / System V', - 0x01 : 'HP-UX', - 0x02 : 'NetBSD', - 0x03 : 'Linux', - 0x04 : 'GNU Hurd', - 0x06 : 'Solaris', - 0x07 : 'AIX', - 0x08 : 'IRIX', - 0x09 : 'FreeBSD', - 0x0A : 'Tru64', - 0x0B : 'Novell Modesto', - 0x0C : 'OpenBSD', - 0x0D : 'OpenVMS', - 0x0E : 'NonStop Kernel', - 0x0F : 'AROS', - 0x10 : 'Fenix OS', - 0x11 : 'CloudABI', - 0x12 : 'Stratus Technologies OpenVOS' -} - -# ===================================================================================================== -# ELF Types -# ===================================================================================================== - -ET_NONE = 0x0000 # -ET_REL = 0x0001 # relocatable -ET_EXEC = 0x0002 # -ET_DYN = 0x0003 # -ET_CORE = 0x0004 # -ET_LOOS = 0xFE00 # -ET_HIOS = 0xFEFF # -ET_LOPROC = 0xFF00 # -ET_HIPROC = 0xFFFF # - -E_TYPE = { - ET_NONE : 'ET_NONE', - ET_REL : 'ET_REL', - ET_EXEC : 'ET_EXEC', - ET_DYN : 'ET_DYN', - ET_CORE : 'ET_CORE', - ET_LOOS : 'ET_LOOS', - ET_HIOS : 'ET_HIOS', - ET_LOPROC : 'ET_LOPROC', - ET_HIPROC : 'ET_HIPROC' -} - -# ===================================================================================================== -# ELF Machines -# ===================================================================================================== - -EM_UNSPECIFIED = 0x00 -EM_ATNT_WE_32100 = 0x01 -EM_SPARC = 0x02 -EM_X86 = 0x03 -EM_MOTOROLA_68000 = 0x04 -EM_MOTOROLA_88000 = 0x05 -EM_INTEL_MCU = 0x06 -EM_INTEL_80860 = 0x07 -EM_MIPS = 0x08 -EM_IBM_SYSTEM_370 = 0x09 -EM_MIPS_RS3000_LE = 0x0A -EM_RESERVED_xB = 0x0B -EM_RESERVED_xC = 0x0C -EM_RESERVED_xD = 0x0D -EM_HEWLETT_PACKARD = 0x0E -EM_RESERVED_xF = 0x0F -EM_INTEL_80960 = 0x13 -EM_POWERPC = 0x14 -EM_POWERPC_64 = 0x15 -EM_5390 = 0x16 -EM_ARM = 0x28 -EM_SUPERH = 0x2A -EM_IA64 = 0x32 -EM_AMD64 = 0x3E -EM_TMS320C6000 = 0x8C -EM_ARM64 = 0xB7 -EM_RISC_V = 0xF3 - -E_MACHINE = { - EM_UNSPECIFIED : 'Unspecified', - EM_ATNT_WE_32100 : 'AT&T WE 32100', - EM_SPARC : 'SPARC', - EM_X86 : 'x86', - EM_MOTOROLA_68000 : 'Motorola 68000 (M68K)', - EM_MOTOROLA_88000 : 'Motorola 88000 (M88K)', - EM_INTEL_MCU : 'Intel MCU', - EM_INTEL_80860 : 'Intel 80860', - EM_MIPS : 'MIPS', - EM_IBM_SYSTEM_370 : 'IBM_System/370', - EM_MIPS_RS3000_LE : 'MIPS RS3000 Little-endian', - EM_RESERVED_xB : 'Reserved', - EM_RESERVED_xC : 'Reserved', - EM_RESERVED_xD : 'Reserved', - EM_HEWLETT_PACKARD : 'Hewlett-Packard PA-RISC', - EM_RESERVED_xF : 'Reserved', - EM_INTEL_80960 : 'Intel 80960', - EM_POWERPC : 'PowerPC', - EM_POWERPC_64 : 'PowerPC (64-bit)', - EM_5390 : 'S390, including S390x', - EM_ARM : 'ARM (up to ARMv7/Aarch32)', - EM_IA64 : 'SuperH', - EM_IA64 : 'IA-64', - EM_AMD64 : 'amd64', - EM_TMS320C6000 : 'TMS320C6000 Family', - EM_ARM64 : 'ARM 64-bits (ARMv8/Aarch64)', - EM_RISC_V : 'RISC-V' -} - -# ===================================================================================================== -# Program Types -# ===================================================================================================== - -PT_NULL = 0x00000000 # Program header table entry unused -PT_LOAD = 0x00000001 # Loadable segment -PT_DYNAMIC = 0x00000002 # Dynamic linking information -PT_INTERP = 0x00000003 # Interpreter information -PT_NOTE = 0x00000004 # Auxiliary information -PT_SHLIB = 0x00000005 # Reserved -PT_PHDR = 0x00000006 # Segment containing the program header table itself -PT_TLS = 0x00000007 # Thread-Local storage template -PT_LOOS = 0x60000000 # Inclusive reserved range for processor-specific semantics -PT_HIOS = 0x6FFFFFFF # ^ -PT_LOPROC = 0x70000000 # Inclusive reserved range for processor-specific semantics -PT_HIPROC = 0x7FFFFFFF # ^ - -P_TYPE = { - PT_NULL : 'PT_NULL' , - PT_LOAD : 'PT_LOAD' , - PT_DYNAMIC : 'PT_DYNAMIC', - PT_INTERP : 'PT_INTERP' , - PT_NOTE : 'PT_NOTE' , - PT_SHLIB : 'PT_SHLIB' , - PT_PHDR : 'PT_PHDR' , - PT_TLS : 'PT_TLS' , - PT_LOOS : 'PT_LOOS' , - PT_HIOS : 'PT_HIOS' , - PT_LOPROC : 'PT_LOPROC' , - PT_HIPROC : 'PT_HIPROC' -} - -# ===================================================================================================== -# Program Flags ( May be platform specific ! ) -# ===================================================================================================== - -PF_E = 1 << 0 # Execute -PF_W = 1 << 1 # Write -PF_R = 1 << 2 # Read - -# ===================================================================================================== -# Symbol Info -# ===================================================================================================== - -# Symbol Types - -ST_NOTYPE = 0 -ST_OBJECT = 1 -ST_FUNC = 2 -ST_SECTION = 3 -ST_FILE = 4 - -SYM_TYPE = { - ST_NOTYPE : 'NOTYPE', - ST_OBJECT : 'OBJECT', - ST_FUNC : 'FUNC', - ST_SECTION : 'SECTION', - ST_FILE : 'FILE' -} - -# Symbol Bind - -SB_LOCAL = 0 -SB_GLOBAL = 1 -SB_WEAK = 2 - -SYM_BIND = { - SB_LOCAL : 'LOCAL', - SB_GLOBAL : 'GLOBAL', - SB_WEAK : 'WEAK' -} - -# Symbol Visibility - -SV_DEFAULT = 0 - -SYM_VIS = { - SV_DEFAULT : 'DEFAULT' -} - -# NDX - -SHN_UND = 0x0000 -SHN_ABS = 0xFFF1 -SHN_COMMON = 0xFFF2 -SHN_XINDEX = 0xFFFF -SHN_LORESERVE = 0xFF00 - -SYM_NDX = { - SHN_UND : 'UND', - SHN_ABS : 'ABS', - SHN_COMMON : 'COMMON', - SHN_XINDEX : 'XINDEX', - SHN_LORESERVE : 'LORESERVE' -} - -# ===================================================================================================== -# Relocation Type -# ===================================================================================================== - -# EM_MIPS -R_MIPS_32 = 2 # Write the 32 bit address of the symbol -R_MIPS_26 = 4 # Write the 26 bit address of the symbol divided by four (for relocating branch instructions). Fail if address won't fit -R_MIPS_HI16 = 5 # Write the high 16 bits of the address of the symbol -R_MIPS_LO16 = 6 # Write the low 16 bits of the address of the symbol - -# EM_POWERPC -R_PPC_NONE = 0 # Do nothing. Skip this entry -R_PPC_ADDR32 = 1 # Write the 32 bit address of the symbol -R_PPC_ADDR24 = 2 # Write the 24 bit address of the symbol divided by four shifted up 2 bits to the 32 bit value (for relocating branch instructions). Fail if address won't fit -R_PPC_ADDR16 = 3 # Write the 16 bit address of the symbol. Fail if address more than 16 bits -R_PPC_ADDR16_LO = 4 # Write the low 16 bits of the address of the symbol -R_PPC_ADDR16_HI = 5 # Write the high 16 bits of the address of the symbol -R_PPC_ADDR16_HA = 6 # Write the high 16 bits of the address of the symbol plus 0x8000 -R_PPC_ADDR14 = 7 # Write the 14 bits of the address of the symbol divided by four shifted up 2 bits to the 32 bit value (for relocating conditional branch instructions). Fail if address won't fit -R_PPC_REL24 = 10 # Write the 24 bit address of the symbol minus the address of the relocation divided by four shifted up 2 bits to the 32 bit value (for relocating relative branch instructions). Fail if address won't fit -R_PPC_REL14 = 11 # Write the 14 bit address of the symbol minus the address of the relocation divided by four shifted up 2 bits to the 32 bit value (for relocating conditional relative branch instructions). Fail if address won't fit -R_PPC_EMB_SDA21 = 109 # Small Data Area - -# Gamecube/Wii custom relocations -R_DOLPHIN_NOP = 201 # Do nothing. Skip this entry. Carry the address of the symbol to the next entry -R_DOLPHIN_SECTION = 202 # Change which section relocations are being applied to. Set the offset into the section to 0 -R_DOLPHIN_END = 203 # Stop parsing the relocation table -R_DOLPHIN_MRKREF = 204 # Unknown - -RELOC_TYPE = { - EM_MIPS : { - R_MIPS_32 : 'R_MIPS_32', - R_MIPS_26 : 'R_MIPS_26', - R_MIPS_HI16 : 'R_MIPS_HI16', - R_MIPS_LO16 : 'R_MIPS_LO16' - }, - EM_POWERPC : { - R_PPC_NONE : 'R_PPC_NONE', - R_PPC_ADDR32 : 'R_PPC_ADDR32', - R_PPC_ADDR24 : 'R_PPC_ADDR24', - R_PPC_ADDR16 : 'R_PPC_ADDR16', - R_PPC_ADDR16_LO : 'R_PPC_ADDR16_LO', - R_PPC_ADDR16_HI : 'R_PPC_ADDR16_HI', - R_PPC_ADDR16_HA : 'R_PPC_ADDR16_HA', - R_PPC_ADDR14 : 'R_PPC_ADDR14', - 8 : 'R_PPC_ADDR14', - 9 : 'R_PPC_ADDR14', - R_PPC_REL24 : 'R_PPC_REL24', - R_PPC_REL14 : 'R_PPC_REL14', - 12 : 'R_PPC_REL14', - 13 : 'R_PPC_REL14', - R_PPC_EMB_SDA21 : 'R_PPC_EMB_SDA21', - R_DOLPHIN_NOP : 'R_DOLPHIN_NOP', - R_DOLPHIN_SECTION : 'R_DOLPHIN_SECTION', - R_DOLPHIN_END : 'R_DOLPHIN_END', - R_DOLPHIN_MRKREF : 'R_DOLPHIN_MRKREF' - } -} - -# ===================================================================================================== -# Section Types -# ===================================================================================================== - -SHT_NULL = 0x00000000 # Section header table entry unused -SHT_PROGBITS = 0x00000001 # Program data -SHT_SYMTAB = 0x00000002 # Symbol table -SHT_STRTAB = 0x00000003 # String table -SHT_RELA = 0x00000004 # Relocation entries with addends -SHT_HASH = 0x00000005 # Symbol hash table -SHT_DYNAMIC = 0x00000006 # Dynamic linking information -SHT_NOTE = 0x00000007 # Notes -SHT_NOBITS = 0x00000008 # Program space with no data (bss) -SHT_REL = 0x00000009 # Relocation entries, no addends -SHT_SHLIB = 0x0000000A # Reserved -SHT_DYNSYM = 0x0000000B # Dynamic linker symbol table -SHT_INIT_ARRAY = 0x0000000E # Array of constructors -SHT_FINI_ARRAY = 0x0000000F # Array of destructors -SHT_PREINIT_ARRAY = 0x00000010 # Array of pre-constructors -SHT_GROUP = 0x00000011 # Section group -SHT_SYMTAB_SHNDX = 0x00000012 # Extended section indices -SHT_NUM = 0x00000013 # Number of defined types. -SHT_LOOS = 0x60000000 # Start OS-specific. - -# MIPS specific -SHT_MIPS_DEBUG = 0x70000005 # .mdebug -SHT_MIPS_REGINFO = 0x70000006 # .reginfo -SHT_MIPS_OPTIONS = 0x7000000D # .options - -SH_TYPE = { - SHT_NULL : 'SHT_NULL', - SHT_PROGBITS : 'SHT_PROGBITS', - SHT_SYMTAB : 'SHT_SYMTAB', - SHT_STRTAB : 'SHT_STRTAB', - SHT_RELA : 'SHT_RELA', - SHT_HASH : 'SHT_HASH', - SHT_DYNAMIC : 'SHT_DYNAMIC', - SHT_NOTE : 'SHT_NOTE', - SHT_NOBITS : 'SHT_NOBITS', - SHT_REL : 'SHT_REL', - SHT_SHLIB : 'SHT_SHLIB', - SHT_DYNSYM : 'SHT_DYNSYM', - SHT_INIT_ARRAY : 'SHT_INIT_ARRAY', - SHT_FINI_ARRAY : 'SHT_FINI_ARRAY', - SHT_PREINIT_ARRAY : 'SHT_PREINIT_ARRAY', - SHT_GROUP : 'SHT_GROUP', - SHT_SYMTAB_SHNDX : 'SHT_SYMTAB_SHNDX', - SHT_NUM : 'SHT_NUM', - SHT_LOOS : 'SHT_LOOS', - - SHT_MIPS_DEBUG : 'SHT_MIPS_DEBUG', - SHT_MIPS_REGINFO : 'SHT_MIPS_REGINFO', - SHT_MIPS_OPTIONS : 'SHT_MIPS_OPTIONS', -} - -# ===================================================================================================== -# Section Flags -# ===================================================================================================== - -SHF_WRITE = 1 << 0 # Writable -SHF_ALLOC = 1 << 1 # Occupies memory during execution -SHF_EXECINSTR = 1 << 2 # Executable -SHF_MERGE = 1 << 4 # Might be merged -SHF_STRINGS = 1 << 5 # Contains null-terminated strings -SHF_INFO_LINK = 1 << 6 # 'sh_info' contains SHT index -SHF_LINK_ORDER = 1 << 7 # Preserve order after combining -SHF_OS_NONCONFORMING = 1 << 8 # Non-standard OS specific handling required -SHF_GROUP = 1 << 9 # Section is member of a group -SHF_TLS = 1 << 10 # Section hold thread-local data - -SHF_MASKOS = 0x0ff00000 # OS-specific -SHF_MASKPROC = 0xf0000000 # Processor-specific -SHF_ORDERED = 0x04000000 # Special ordering requirement (Solaris) -SHF_EXCLUDE = 0x08000000 # Section is excluded unless referenced or allocated (Solaris) - -SH_FLAG = { - SHF_WRITE : 'SHF_WRITE', - SHF_ALLOC : 'SHF_ALLOC', - SHF_EXECINSTR : 'SHF_EXECINSTR', - SHF_MERGE : 'SHF_MERGE', - SHF_STRINGS : 'SHF_STRINGS', - SHF_INFO_LINK : 'SHF_INFO_LINK', - SHF_LINK_ORDER : 'SHF_LINK_ORDER', - SHF_OS_NONCONFORMING : 'SHF_OS_NONCONFORMING', - SHF_GROUP : 'SHF_GROUP', - SHF_TLS : 'SHF_TLS', - SHF_MASKOS : 'SHF_MASKOS', - SHF_MASKPROC : 'SHF_MASKPROC', - SHF_ORDERED : 'SHF_ORDERED', - SHF_EXCLUDE : 'SHF_EXCLUDE' -} - -# ===================================================================================================== -# ELF Header -# ===================================================================================================== - -ELF32_BIG_STRUCT = '>HHIIIIIHHHHHH' -ELF32_LITTLE_STRUCT = 'IIIBBH', data) - assert self.st_shndx != SHN_XINDEX, "too many sections (SHN_XINDEX not supported)" - self.bind = st_info >> 4 - self.type = st_info & 0xF - self.visibility = self.st_other & 3 - self.parent_section = elf_file.sections[self.st_shndx] if self.st_shndx < SHN_LORESERVE else None - - self.name = name - if self.type == ST_SECTION: - self.name = elf_file.shstrtab.lookup_str(self.parent_section.sh_name) - if self.name == None: - self.name = elf_file.symtab.strtab.lookup_str(self.st_name) - - @staticmethod - def from_parts(st_name, st_value, st_size, st_info, st_other, st_shndx, strtab, name): - header = struct.pack('>IIIBBH', st_name, st_value, st_size, st_info, st_other, st_shndx) - return Symbol(header, strtab, name) - - def to_bin(self): - st_info = (self.bind << 4) | self.type - return struct.pack('>IIIBBH', self.st_name, self.st_value, self.st_size, st_info, self.st_other, self.st_shndx) - - def section_offset(self): - return self.st_value - self.parent_section.sh_addr - - def padded_size_n(self, n): - return align_as(self.st_size, n) - - def padded_size(self): - return self.padded_size_n(self.parent_section.sh_addralign) - - def __str__(self): - # Num: Value Size Type Bind Vis Ndx Name - ndx = ' ' + (SYM_NDX[self.st_shndx] if self.st_shndx in SYM_NDX.keys() else self.parent_section.name) - out = f"{self.st_value:08X} {self.st_size:06X} {SYM_TYPE[self.type]:7} {SYM_BIND[self.bind]:6} {SYM_VIS[self.visibility]:7} {ndx:12} {self.name}" - return out - -# ===================================================================================================== -# Relocation -# ===================================================================================================== - -class Relocation: - """ - typedef struct { - Elf32_Word r_offset; - struct { - Elf32_Word sym_index : 24; - Elf32_Word rel_type : 8; - } r_info; - Elf32_Word r_addend; - } Elf32_Reloc; - """ - - def __init__(self, data, elf_file, target_section, sh_type): - self.sh_type = sh_type - if sh_type == SHT_REL: - self.r_offset, self.r_info = struct.unpack('>II', data) - self.r_addend = 0 - else: - self.r_offset, self.r_info, self.r_addend = struct.unpack('>III', data) - self.sym_index = self.r_info >> 8 - self.rel_type = self.r_info & 0xff - self.relocated_symbol = elf_file.symtab.symbol_entries[self.sym_index] - self.elf_machine = elf_file.elf_header.e_machine - self.target_section = target_section - # TODO obtain the addend if the target section is executable - - def to_bin(self): - self.r_info = (self.sym_index << 8) | self.rel_type - if self.sh_type == SHT_REL: - return struct.pack('>II', self.r_offset, self.r_info) - else: - return struct.pack('>III', self.r_offset, self.r_info, self.r_addend) - - def relocated_symbol_in_section(self, symtab, section): - return symtab.lookup_symbol_in_section(symtab.symbol_entries[self.sym_index].st_value, section) - - def __str__(self): - relocated_symbol = self.relocated_symbol - # Offset Info Type Sym.Value Sym. Name + Addend - # 80135560 00091201 R_MY_RELOC_TYPE 800f39e0 ...data.0 + 0 - out = f"{self.r_offset:08X} {self.r_info:08X} {RELOC_TYPE[self.elf_machine][self.rel_type]:17} {relocated_symbol.st_value:08X} {relocated_symbol.name} + 0x{self.r_addend:X}" - return out - -# ===================================================================================================== -# Section -# ===================================================================================================== - -class Section: - """ - Describes a section - - typedef struct { - Elf32_Word sh_name; - Elf32_Word sh_type; - Elf32_Word sh_flags; - Elf32_Addr sh_addr; - Elf32_Off sh_offset; - Elf32_Word sh_size; - Elf32_Word sh_link; - Elf32_Word sh_info; - Elf32_Word sh_addralign; - Elf32_Word sh_entsize; - } Elf32_Shdr; - -x00 x00 4 4 sh_name Offset to string in the .shstrtab section representing this section's name - -x04 x04 4 4 sh_type See SH_TYPE - -x08 x08 4 8 sh_flags See SH_FLAG - -x0C x10 4 8 sh_addr Virtual address of the section in memory (for loaded sections) - -x10 x18 4 8 sh_offset Offset of the section in the file image - -x14 x20 4 8 sh_size Size in bytes of the section in the file image - -x18 x28 4 4 sh_link Contains the section index of an associated section. This field is used for several purposes depending on section type - -x1C x2C 4 4 sh_info Contains extra information about the section. This field is used for several purposes, depending on section type - -x20 x30 4 8 sh_addralign Contains the required alignment of the section. This field must be a power of two - -x24 x38 4 8 sh_entsize Contains the size, in bytes, of each entry, for sections that contain fixed-size entries. Zero otherwise - -x28 x40 END - """ - - def __init__(self, header, elf_file, index): - self.late_init_done = False - self.sh_name, self.sh_type, \ - self.sh_flags, self.sh_addr, \ - self.sh_offset, self.sh_size, \ - self.sh_link, self.sh_info, \ - self.sh_addralign, self.sh_entsize = struct.unpack('>IIIIIIIIII', header) - assert not self.sh_flags & SHF_LINK_ORDER - if self.sh_entsize != 0: - assert self.sh_size % self.sh_entsize == 0 - if self.sh_type in [SHT_NULL, SHT_NOBITS]: - self.data = None - else: - self.data = elf_file.data[self.sh_offset:][:self.sh_size] - self.index = index - self.relocated_by = [] - self.elf_file = elf_file - - def late_init(self): - self.late_init_done = True - - @staticmethod - def from_parts(sh_name, sh_type, sh_flags, sh_link, sh_info, sh_addralign, sh_entsize, sh_addr, sh_offset, data, index): - header = struct.pack('>IIIIIIIIII', sh_name, sh_type, sh_flags, sh_addr, sh_offset, \ - len(data), sh_link, sh_info, sh_addralign, sh_entsize) - return Section(header, data, index) - - def to_bin(self): - if self.sh_type not in [SHT_NULL, SHT_NOBITS]: - self.sh_size = len(self.data) - header = struct.pack('>IIIIIIIIII', self.sh_name, self.sh_type, self.sh_flags, self.sh_addr, self.sh_offset, self.sh_size, self.sh_link, self.sh_info, self.sh_addralign, self.sh_entsize) - return header, self.data - - def get_rel(self, addr): - relocs = [] - for reloc_section in self.relocated_by: - reloc = reloc_section.find_reloc(addr) - if reloc is not None: - relocs.append(reloc) - return relocs - - def get_sym(self, addr): - symtab = self.elf_file.symtab - symbols = [] - for symbol in symtab.symbol_entries: - if symbol.st_value == addr and symbol.st_shndx == self.index and symbol.type != ST_SECTION: - symbols.append(symbol) - return symbols - - def is_rel(self): - return self.sh_type == SHT_REL or self.sh_type == SHT_RELA - - def is_allocable(self): - return (self.sh_flags & SHF_ALLOC) == SHF_ALLOC - - def is_executable(self): - return (self.sh_flags & SHF_EXECINSTR) == SHF_EXECINSTR - - def is_writable(self): - return (self.sh_flags & SHF_WRITE) == SHF_WRITE - - def padded_size(self): - return align_as(self.sh_size, self.sh_addralign) - - def padded_size_4(self): - return align_as(self.sh_size, 4) - - def flags_str(self): - flags = "" - flags += "W" if self.is_writable() else " " - flags += "A" if self.is_allocable() else " " - flags += "X" if self.is_executable() else " " - return flags - - def __str__(self): - s_type = SH_TYPE[self.sh_type].replace('SHT_','') if self.sh_type in SH_TYPE.keys() else str(self.sh_type) - out = f"{self.name:12}{s_type:12} " - out += f"{self.sh_addr:08X} " - out += f"{self.sh_offset:06X} " - out += f"{self.sh_size:06X} " - out += f"{self.sh_entsize:2X} " - out += f"{self.flags_str():3} " - out += f"{self.sh_link:2} " - out += f"{self.sh_info:3} " - out += f"{self.sh_addralign:5X} " - return out - -class SymtabSection(Section): - """ - Symbol Table Section - """ - - def __init__(self, header, elf_file, index): - super().__init__(header, elf_file, index) - assert self.sh_entsize == 16 - - def late_init(self): - if self.late_init_done: - return - super().late_init() - self.strtab = self.elf_file.sections[self.sh_link] - self.symbol_entries = [] - for i in range(0, self.sh_size, self.sh_entsize): - self.symbol_entries.append(Symbol(self.data[i:i+self.sh_entsize], self.elf_file)) - - def to_bin(self): - header, _ = super().to_bin() - data = bytearray() - for sym in self.symbol_entries: - data.extend(sym.to_bin()) - return header, data - - def find_symbol(self, name): - for s in self.symbol_entries: - if s.name == name: - return (s.st_shndx, s.st_value) - return None - - def lookup_symbol(self, vaddr): - found = [] - for s in self.symbol_entries: - if s.st_value == vaddr and s.type != ST_SECTION: - found.append(s) - if len(found) != 0: - found.sort(reverse=True, key=(lambda s : s.type)) - return found[0] - return None - - def lookup_symbol_for_section(self, vaddr, shndx): - found = [] - for s in self.symbol_entries: - if s.st_value == vaddr and s.type != ST_SECTION and s.st_shndx == shndx: - found.append(s) - if len(found) != 0: - found.sort(reverse=True, key=(lambda s : s.type)) - return found[0] - return None - - def lookup_symbol_in_section(self, vaddr, section): - found = [] - for s in self.symbol_entries: - if s.st_value == vaddr and s.type != ST_SECTION and s.st_shndx == section.index: - found.append(s) - if len(found) != 0: - found.sort(reverse=True, key=(lambda s : s.type)) - return found[0] - return None - - def find_symbol_in_section(self, name, section): - pos = self.find_symbol(name) - assert pos is not None - assert pos[0] == section.index - return pos[1] - - def local_symbols(self): - return self.symbol_entries[:self.sh_info] - - def global_symbols(self): - return self.symbol_entries[self.sh_info:] - -class StrtabSection(Section): - """ - String Table Section - """ - def __init__(self, header, data, index): - super().__init__(header, data, index) - - def lookup_str(self, index): - to = self.data.find(b'\0', index) - assert to != -1 - return self.data[index:to].decode('latin1') - -class RelocationSection(Section): - """ - Relocation Section - """ - def __init__(self, header, data, index): - super().__init__(header, data, index) - - def late_init(self): - if self.late_init_done: - return - super().late_init() - self.rel_target = self.elf_file.sections[self.sh_info] - self.rel_target.relocated_by.append(self) - self.relocations = [] - for i in range(0, self.sh_size, self.sh_entsize): - self.relocations.append(Relocation(self.data[i:][:self.sh_entsize], self.elf_file, self.rel_target, self.sh_type)) - - def to_bin(self): - header, _ = super().to_bin() - data = bytearray() - for rel in self.relocations: - data.extend(rel.to_bin()) - return header, data - - def lookup_reloc(self, vaddr): - for r in self.relocations: - if r.r_offset - r.r_offset % 4 == vaddr: - return r - return None - - def find_reloc(self, vaddr): - for r in self.relocations: - if r.r_offset == vaddr: - return r - return None - - def lookup_jtbl_reloc(self, vaddr, symtab): - for r in self.relocations: - r_sym = r.relocated_symbol(symtab) - if r_sym.st_value + r.r_addend == vaddr: - return r - return None - -class MdebugSection(Section): - """ - MIPS Debugging Section - """ - def __init__(self, header, elf_file, index): - super().__init__(header, elf_file, index) - self.parent = self.elf_file - self.hdrr = EcoffHDRR(self.data) - - self.fdrs = [] - for i in range(self.hdrr.ifdMax): - fdr = EcoffFdr.from_binary(self, i) - self.fdrs.append(fdr) - - def late_init(self): - if self.late_init_done: - return - super().late_init() - for fdr in self.fdrs: - fdr.late_init() - - def fdr_forname(self, filename): - for fdr in self.fdrs: - # remove path and file ext - normalized_name = ".".join(fdr.name.split("/")[-1].split(".")[:-1]) - - if normalized_name == filename: - return fdr - return None - - def fdr_foraddr(self, addr, extensions=('.c')): - for fdr in self.fdrs: - if fdr.adr == addr and any((fdr.name.endswith(ext) for ext in extensions)): - return fdr - return None - - def read_string(self, index): - to = self.elf_file.data.find(b'\0', self.hdrr.cbSsOffset + index) - assert to != -1 - return self.elf_file.data[self.hdrr.cbSsOffset + index:to].decode("ASCII") - - def read_ext_string(self, index): - to = self.elf_file.data.find(b'\0', self.hdrr.cbSsExtOffset + index) - assert to != -1 - return self.elf_file.data[self.hdrr.cbSsExtOffset + index:to].decode("ASCII") - -class ReginfoSection(Section): - """ - MIPS Register Information Section - """ - def __init__(self, header, elf_file, index): - super().__init__(header, elf_file, index) - -# ===================================================================================================== -# Elf File -# ===================================================================================================== - -class ElfFile: - def __init__(self, data): - def init_section(i): - offset = self.elf_header.e_shoff + i * self.elf_header.e_shentsize - section_type = struct.unpack(">I", data[offset + 4:][:4])[0] - header_data = data[offset:][:self.elf_header.e_shentsize] - - if section_type == SHT_REL or section_type == SHT_RELA: - return RelocationSection(header_data, self, i) - elif section_type == SHT_SYMTAB: - return SymtabSection(header_data, self, i) - elif section_type == SHT_STRTAB: - return StrtabSection(header_data, self, i) - elif section_type == SHT_MIPS_DEBUG: - return MdebugSection(header_data, self, i) - elif section_type == SHT_MIPS_REGINFO: - return ReginfoSection(header_data, self, i) - else: - return Section(header_data, self, i) - - self.data = data - self.elf_header = ElfHeader(data[0:52]) - - num_progheaders = self.elf_header.e_phnum - num_sections = self.elf_header.e_shnum - - # Init program headers - self.progheaders = [] - for i in range(num_progheaders): - offset = self.elf_header.e_phoff + i * self.elf_header.e_phentsize - self.progheaders.append(ProgramHeader(data[offset:][:self.elf_header.e_phentsize], self.elf_header.e_ident[EI_CLASS])) - - # Init sections - self.sections = [] - for i in range(num_sections): - self.sections.append(init_section(i)) - - # Init shstrtab and name sections - self.shstrtab = self.sections[self.elf_header.e_shstrndx] - assert isinstance(self.shstrtab, StrtabSection) - - for s in self.sections: - s.name = self.shstrtab.lookup_str(s.sh_name) - - # Init symtab - symtab = None - for s in self.sections: - if s.sh_type == SHT_SYMTAB: - assert not symtab , "Found more than one symtab section?" - symtab = s - self.symtab = symtab - if self.symtab is not None: - self.symtab.late_init() - - # Late Init sections - for s in self.sections: - s.late_init() - - def find_section_by_name(self, name): - for s in self.sections: - if s.name == name: - return s - return None - - def find_section_by_type(self, type): - for s in self.sections: - if s.sh_type == type: - return s - return None - -### Tests - -if __name__ == "__main__": - import sys - - elf_file = None - - with open(sys.argv[1], "rb") as elf: - elf_file = ElfFile(bytearray(elf.read())) - - # Header Info Test - print(elf_file.elf_header) - # Program Headers Info Test - print("") - print("Program Headers:") - print(" Type Offset VirtAddr PhysAddr FileSiz MemSiz Flg Align") - for phdr in elf_file.progheaders: - print(phdr) - # Section Headers Info Test - print("") - print("Section Headers:") - print(" [Nr] Name Type Addr Off Size ES Flg Lk Inf Al") - for i,s in enumerate(elf_file.sections,0): - print(f" [{i:2}] {s}") - # Symbols Info Test - if elf_file.symtab is not None: - print("") - print(f"Symbol table '{elf_file.symtab.name}' contains {len(elf_file.symtab.symbol_entries)} entries") - print(" Num: Value Size Type Bind Vis Ndx Name") - for i,sym in enumerate(elf_file.symtab.symbol_entries,0): - print(f"{i:6}: {sym}") - # Relocations Info Test - print("") - for s in elf_file.sections: - if s.is_rel(): - print(f"\nRelocation section '{s.name}' at offset 0x{s.sh_offset:06X} contains {len(s.relocations)} entries:") - print(" Offset Info Type Sym.Value Sym.Name + Addend") - for reloc in s.relocations: - print(f"{reloc}") - # mdebug Info Test - print("") - mdebug_section = elf_file.find_section_by_type(SHT_MIPS_DEBUG) - if mdebug_section is not None: - """ - for fdr in mdebug_section.fdrs: - print(fdr) - for symr in fdr.symrs: - print(symr) - for pdr in fdr.pdrs: - print(pdr) - for symr in pdr.symrs: - print(symr) - for liner in pdr.lines: - print(liner) - """ - for fdr in mdebug_section.fdrs: - print(fdr.c_str()) diff --git a/tools/m2ctx.py b/tools/m2ctx.py deleted file mode 100755 index 39c5dc5..0000000 --- a/tools/m2ctx.py +++ /dev/null @@ -1,76 +0,0 @@ -#!/usr/bin/env python3 - -import argparse -import os -import sys -import subprocess -import tempfile - -script_dir = os.path.dirname(os.path.realpath(__file__)) -root_dir = os.path.abspath(os.path.join(script_dir, "..")) -src_dir = root_dir + "src/" - -# Project-specific -CPP_FLAGS = [ - "-Iinclude", - "-Iinclude/PR", - "-Iinclude/gcc", - "-Isrc", - "-Isrc/libc", - "-Iver/current/build/include", - "-D_LANGUAGE_C", - "-DF3DEX_GBI_2", - "-D_MIPS_SZLONG=32", - "-DSCRIPT(...)={}" - "-D__attribute__(...)=", - "-D__asm__(...)=", - "-ffreestanding", - "-DM2CTX", -] - -def import_c_file(in_file) -> str: - in_file = os.path.relpath(in_file, root_dir) - cpp_command = ["gcc", "-E", "-P", "-dM", *CPP_FLAGS, in_file] - cpp_command2 = ["gcc", "-E", "-P", *CPP_FLAGS, in_file] - - with tempfile.NamedTemporaryFile(suffix=".c") as tmp: - stock_macros = subprocess.check_output(["gcc", "-E", "-P", "-dM", tmp.name], cwd=root_dir, encoding="utf-8") - - out_text = "" - try: - out_text += subprocess.check_output(cpp_command, cwd=root_dir, encoding="utf-8") - out_text += subprocess.check_output(cpp_command2, cwd=root_dir, encoding="utf-8") - except subprocess.CalledProcessError: - print( - "Failed to preprocess input file, when running command:\n" - + cpp_command, - file=sys.stderr, - ) - sys.exit(1) - - if not out_text: - print("Output is empty - aborting") - sys.exit(1) - - for line in stock_macros.strip().splitlines(): - out_text = out_text.replace(line + "\n", "") - return out_text - -def main(): - parser = argparse.ArgumentParser( - description="""Create a context file which can be used for mips_to_c""" - ) - parser.add_argument( - "c_file", - help="""File from which to create context""", - ) - args = parser.parse_args() - - output = import_c_file(args.c_file) - - with open(os.path.join(root_dir, "ctx.c"), "w", encoding="UTF-8") as f: - f.write(output) - - -if __name__ == "__main__": - main() diff --git a/tools/mdebug.py b/tools/mdebug.py deleted file mode 100644 index 6f061ec..0000000 --- a/tools/mdebug.py +++ /dev/null @@ -1,938 +0,0 @@ -#!/usr/bin/env python3 -# -# .mdebug section -# - -""" -References: -https://www.cs.unibo.it/~solmi/teaching/arch_2002-2003/AssemblyLanguageProgDoc.pdf -https://web.archive.org/web/20010628021622/http://reality.sgi.com/davea/objectinfo.html -https://github.com/astrelsky/ghidra_mdebug -https://github.com/Rozelette/print-mdebug/blob/master/print_mdebug.py -https://opensource.apple.com/source/gcc_legacy/gcc_legacy-938/gcc/mips-tdump.c.auto.html -https://github.com/uhhpctools/openuh/blob/master/osprey-gcc-4.2.0/gcc/mips-tdump.c -https://github.com/bminor/binutils-gdb/blob/master/gdb/mdebugread.c - -(stabs docs): -https://sourceware.org/gdb/current/onlinedocs/stabs.html - -(ecoff docs): -https://web.archive.org/web/20160305114748/http://h41361.www4.hp.com/docs/base_doc/DOCUMENTATION/V50A_ACRO_SUP/OBJSPEC.PDF -https://chromium.googlesource.com/native_client/nacl-toolchain/+/refs/tags/gcc-4.4.3/binutils/gas/ecoff.c -https://kernel.googlesource.com/pub/scm/linux/kernel/git/hjl/binutils/+/hjl/secondary/include/coff/sym.h -https://kernel.googlesource.com/pub/scm/linux/kernel/git/hjl/binutils/+/hjl/secondary/include/coff/symconst.h -""" - -from enum import IntEnum -import struct - -class EcoffBt(IntEnum): # Basic Type - NIL = 0 # - ADR = 1 # pointer-sized integer type - CHAR = 2 # char - UCHAR = 3 # unsigned char - SHORT = 4 # short - USHORT = 5 # unsigned short - INT = 6 # int - UINT = 7 # unsigned int - LONG = 8 # long - ULONG = 9 # unsigned long - FLOAT = 10 # float - DOUBLE = 11 # double - STRUCT = 12 # struct - UNION = 13 # union - ENUM = 14 # enum - TYPEDEF = 15 # type definition - RANGE = 16 # subrange of int - SET = 17 # pascal set - COMPLEX = 18 # FORTRAN complex - DCOMPLEX = 19 # FORTRAN double com[plex - INDIRECT = 20 # forward or unnamed typedef - FIXEDDEC = 21 # Fixed point decimal - FLOATDEC = 22 # Floating point decimal - STRING = 23 # Varying length character string - BIT = 24 # Aligned bit tring - PICTURE = 25 # picture - VOID = 26 # void - LONGLONG = 27 # long long int - ULONGLONG = 28 # unsigned long long int - LONG64 = 30 # - ULONG64 = 31 # - LONGLONG64 = 32 # - ULONGLONG64 = 33 # - ADR64 = 34 # - INT64 = 35 # - UINT64 = 36 # - - AGGREGATE = 63 # not a basic type - MAX = 64 # - -class EcoffSc(IntEnum): - NIL = 0 - TEXT = 1 # .text symbol - DATA = 2 # .data symbol - BSS = 3 # .bss symbol - REGISTER = 4 # value of symbol is register number - ABS = 5 # value of symbol is absolute - UNDEFINED = 6 # value of symbol is undefined - CDBLOCAL = 7 # variable value is in se->va.?? - BITS = 8 # variable is a bit field - CDBSYSTEM = 9 # variable value is in cdb address space - REGIMAGE = 10 # register value is saved on stack - INFO = 11 # symbol contains debugger information - USERSTRUCT = 12 # address in struct user for current process - SDATA = 13 # load time only small data - SBSS = 14 # load time only small common - RDATA = 15 # load time only read-only data - VAR = 16 # var parameter (FORTRAN, Pascal) - COMMON = 17 # common variable - SCOMMON = 18 # small common - VARREGISTER = 19 # var parameter in a register - VARIANT = 20 # variant record - SUNDEFINED = 21 # small undefined (external) data - INIT = 22 # .init section symbol - BASEDVAR = 23 # FORTRAN or PL/1 ptr based var - XDATA = 24 # exception handling data - PDATA = 25 # procedure section - FINI = 26 # .fini section - RCONST = 27 # .rconst section - MAX = 32 # - -class EcoffSt(IntEnum): - NIL = 0 # - GLOBAL = 1 # external symbol - STATIC = 2 # static symbol - PARAM = 3 # procedure argument - LOCAL = 4 # local variable - LABEL = 5 # label - PROC = 6 # procedure - BLOCK = 7 # beginning of block - END = 8 # end of something - MEMBER = 9 # member of struct/union/enum/.. - TYPEDEF = 10 # type definition - FILE = 11 # filename - REGRELOC = 12 # register relocation - FORWARD = 13 # forwarding address - STATICPROC = 14 # load time only static procedures - # (CONSTANT and STAPARAM are in different orders between different sources...) - CONSTANT = 15 # constant - STAPARAM = 16 # FORTRAN static parameters - STRUCT = 26 # structure - UNION = 27 # union - ENUM = 28 # enum - INDIRECT = 34 # - -class EcoffTq(IntEnum): # Type qualifier - NIL = 0 # - PTR = 1 # pointer - PROC = 2 # procedure - ARRAY = 3 # array - FAR = 4 # longer addressing - VOL = 5 # volatile - CONST = 6 # constant - MAX = 8 # - - UNK7 = 7 # invalid - UNK9 = 9 # invalid - UNK10 = 10 # invalid - UNK11 = 11 # invalid - UNK12 = 12 # invalid - UNK13 = 13 # invalid - UNK14 = 14 # invalid - UNK = 15 # invalid - -class EcoffLanguageCode(IntEnum): - C = 0 - PASCAL = 1 - FORTRAN = 2 - ASM = 3 - MACHINE = 4 - NIL = 5 - ADA = 6 - PL1 = 7 - COBOL = 8 - STDC = 9 - CPLUSPLUSV2 = 10 - MAX = 11 - -def get_bitrange(value, start, length): - return (value >> start) & ((1 << length) - 1) - -def sign_extend_16(value): - return (value & 0x7FFF) - (value & 0x8000) - -def sign_extend_4(value): - return (value & 0x7) - (value & 0x8) - -class EcoffLiner: - """ - ECOFF Line Numbers Mapping - - typedef struct sLINER { - s32 count : 4; - s32 delta : 4; - } tLINER, *pLINER; - """ - - def __init__(self, data) -> None: - self.count = get_bitrange(data[0], 0, 4) + 1 - self.delta = get_bitrange(data[0], 4, 4) - - if self.delta == 8: - self.is_extended = True - self.delta = sign_extend_16((data[1] << 8) | data[2]) - self.data = data[:3] - else: - self.is_extended = False - self.delta = sign_extend_4(self.delta) - self.data = data[:1] - - def __str__(self) -> str: - return f"""= EcoffLiner ============= -delta = {self.delta} -count = {self.count} -extended = {self.is_extended}""" - -class EcoffTir: - """ - ECOFF Type Information Record - - typedef struct { -#ifdef LITTLE_ENDIAN - u32 tq3 : 4; - u32 tq2 : 4; - u32 tq1 : 4; /* 6 type qualifiers - tqPtr, etc. */ - u32 tq0 : 4; - /* ---- 16 bit boundary ---- */ - u32 tq5 : 4; - u32 tq4 : 4; - u32 bt : 6; /* basic type */ - u32 continued : 1; /* indicates additional TQ info in next AUX */ - u32 fBitfield : 1; /* set if bit width is specified */ -#else - u32 fBitfield : 1; /* set if bit width is specified */ - u32 continued : 1; /* indicates additional TQ info in next AUX */ - u32 bt : 6; /* basic type */ - u32 tq4 : 4; - u32 tq5 : 4; - /* ---- 16 bit boundary ---- */ - u32 tq0 : 4; - u32 tq1 : 4; /* 6 type qualifiers - tqPtr, etc. */ - u32 tq2 : 4; - u32 tq3 : 4; -#endif - } TIR, *pTIR; // size = 4 - """ - SIZE = 4 - - def __init__(self, data, endian) -> None: - if endian == 1: - self.tq3 = EcoffTq(get_bitrange(data, 0, 4)) - self.tq2 = EcoffTq(get_bitrange(data, 4, 4)) - self.tq1 = EcoffTq(get_bitrange(data, 8, 4)) - self.tq0 = EcoffTq(get_bitrange(data, 12, 4)) - self.tq5 = EcoffTq(get_bitrange(data, 16, 4)) - self.tq4 = EcoffTq(get_bitrange(data, 20, 4)) - self.bt = EcoffBt(get_bitrange(data, 24, 6)) - self.continued = get_bitrange(data, 30, 1) - self.fBitfield = get_bitrange(data, 31, 1) - else: - self.fBitfield = get_bitrange(data, 0, 1) - self.continued = get_bitrange(data, 1, 1) - self.bt = EcoffBt(get_bitrange(data, 2, 6)) - self.tq4 = EcoffTq(get_bitrange(data, 8, 4)) - self.tq5 = EcoffTq(get_bitrange(data, 12, 4)) - self.tq0 = EcoffTq(get_bitrange(data, 16, 4)) - self.tq1 = EcoffTq(get_bitrange(data, 20, 4)) - self.tq2 = EcoffTq(get_bitrange(data, 24, 4)) - self.tq3 = EcoffTq(get_bitrange(data, 28, 4)) - self.tqs = (self.tq0, self.tq1, self.tq2, self.tq3, self.tq4, self.tq5) - - def __str__(self) -> str: - return f"""= EcoffTIR ============== -fBitfield = {self.fBitfield} -continued = {self.continued} -bt = {self.bt.name} -tq4 = {self.tq4} -tq5 = {self.tq5} -tq0 = {self.tq0} -tq1 = {self.tq1} -tq2 = {self.tq2} -tq3 = {self.tq3}""" - -class EcoffRNDXR: - """ - typedef struct { -#ifdef LITTLE_ENDIAN - u32 index : 20; /* index int sym/aux/iss tables */ - u32 rfd : 12; /* index into the file indirect table */ -#else - u32 rfd : 12; /* index into the file indirect table */ - u32 index : 20; /* index int sym/aux/iss tables */ -#endif - } RNDXR, *pRNDXR; // size = 4 - """ - SIZE = 4 - - def __init__(self, data, endian) -> None: - if endian == 1: - self.index = get_bitrange(data, 0, 20) - self.rfd = get_bitrange(data, 20, 12) - else: - self.rfd = get_bitrange(data, 0, 12) - self.index = get_bitrange(data, 12, 20) - - def __str__(self) -> str: - return f"""= EcoffRNDXR ============== -index = {self.index} -rfd = {self.rfd}""" - -class EcoffAux: - """ - typedef union __sgi_auxu_u { - TIR ti; /* type information record */ - RNDXR rndx; /* relative index into symbol table */ - long_i dnLow; /* low dimension of array */ - long_i dnHigh; /* high dimension of array */ - long_i isym; /* symbol table index (end of proc) */ - long_i iss; /* index into string space (not used) */ - long_i width; /* width for non-default sized struct fields */ - long_i count; /* count of ranges for variant arm */ - } AUXU, *pAUXU; // size = 4 - """ - SIZE = 4 - - def __init__(self, fdr, data, endian) -> None: - data = struct.unpack((">" if endian == 1 else "<") + "I", data)[0] - self.ti = EcoffTir(data, endian) - self.rndx = EcoffRNDXR(data, endian) - self.dnLow = self.dnHigh = self.isym = self.iss = self.width = self.count = data - self.fdr = fdr - - def __str__(self) -> str: - return f"""= EcoffAux ============== -ti = {{ -{self.ti} -}} -rndx = {{ -{self.rndx} -}} -dnLow = {self.dnLow:04X} -dnHigh = {self.dnHigh:04X} -isym = {self.isym:04X} -iss = {self.iss:04X} -width = {self.width:04X} -count = {self.count:04X}""" - -class EcoffSymr: - """ - ECOFF Local Symbol - - typedef struct sSymr { - s32 iss; /* index into String Space of name */ - s32 value; /* symbol value */ - /* value can be an address, size or frame offset depending on symbol type */ - EcoffSt st : 6; /* symbol type */ - EcoffSc sc : 5; /* storage class - text, data, etc */ - s32 _reserved : 1; /* reserved bit */ - s32 index : 20; /* index into sym/aux table */ - } tSymr, *pSymr; // size = 0xC - """ - SIZE = 0xC - - def __init__(self, parent, idx, data): - self.idx = idx - self.parent = parent # can be either Fdr or Pdr - self.pdr = parent if type(parent) == EcoffPdr else None - self.fdr = self.pdr.parent if self.pdr is not None else parent - - self.data = data[:EcoffSymr.SIZE] - - self.iss, self.value, bits = struct.unpack(">III", self.data) - self.st = EcoffSt(get_bitrange(bits, 26, 6)) - self.sc = EcoffSc(get_bitrange(bits, 21, 5)) - self._reserved = get_bitrange(bits, 20, 1) - self.index = get_bitrange(bits, 0, 20) - - self.name = self.fdr.read_string(self.iss) - self.type_name = None - - self.c_repr = None - - assert self._reserved == 0 # Sanity check - - def link_syms(self): - if self.st == EcoffSt.END: - self.start_sym = self.fdr.symrs[self.index] - elif self.st in [EcoffSt.BLOCK, EcoffSt.FILE, EcoffSt.STRUCT, EcoffSt.UNION, EcoffSt.ENUM]: - self.end_sym = self.fdr.symrs[self.index - 1] - elif self.st in [EcoffSt.PROC, EcoffSt.STATICPROC]: - aux = self.fdr.auxs[self.index] - self.end_sym = self.fdr.symrs[aux.isym - 1] - elif self.st in [EcoffSt.GLOBAL, EcoffSt.STATIC, EcoffSt.PARAM, EcoffSt.LOCAL, EcoffSt.MEMBER, EcoffSt.TYPEDEF, EcoffSt.FORWARD]: - pass - - def late_init(self): - if self.st == EcoffSt.END: - """ - END symbols index the associated begin symbol - """ - self.start_sym = self.fdr.symrs[self.index] - if self.start_sym.st == EcoffSt.BLOCK: - self.c_repr = "}" - elif self.start_sym.st == EcoffSt.FILE: - self.c_repr = f"// end of file: \"{self.start_sym.name}\"" - elif self.start_sym.st in [EcoffSt.STRUCT, EcoffSt.UNION, EcoffSt.ENUM]: - self.c_repr = "}" - if len(self.start_sym.type_name) != 0: - self.c_repr += " " + self.start_sym.type_name - self.c_repr += f";" - elif self.st in [EcoffSt.BLOCK, EcoffSt.FILE, EcoffSt.STRUCT, EcoffSt.UNION, EcoffSt.ENUM]: - """ - These symbols index the first symbol after their associated END symbol - """ - self.end_sym = self.fdr.symrs[self.index - 1] - if self.st == EcoffSt.BLOCK: - self.c_repr = "{" - elif self.st == EcoffSt.FILE: - self.c_repr = f"#line 1 \"{self.name}\"" - elif self.st in [EcoffSt.STRUCT, EcoffSt.UNION, EcoffSt.ENUM]: - keyword = "" - self.type_name = "" - next_sym = self.fdr.symrs[self.index] - if next_sym.st == EcoffSt.TYPEDEF: - # possible typedef struct/union/enum - # TODO check this by ensuring the typedef symbol references this symbol - keyword += "typedef " - self.type_name = next_sym.name - - if self.st == EcoffSt.UNION: - keyword += "union" - elif self.st == EcoffSt.ENUM: - keyword += "enum" - else: - keyword += "struct" - - name = self.name - if len(name) != 0: - name = ' ' + name - - self.c_repr = f"{keyword}{name} {{" - elif self.st in [EcoffSt.PROC, EcoffSt.STATICPROC]: - aux1 = self.fdr.auxs[self.index] - self.end_sym = self.fdr.symrs[aux1.isym - 1] - - self.c_repr = "" - if self.st == EcoffSt.STATICPROC: - self.c_repr += "static " - - self.return_type, _ = self.process_type_information(1) - self.c_repr += self.return_type - if len(self.return_type) != 0: - self.c_repr += " " - self.c_repr += self.name - self.c_repr += "()" - elif self.st in [EcoffSt.GLOBAL, EcoffSt.STATIC, EcoffSt.PARAM, EcoffSt.LOCAL, EcoffSt.MEMBER, EcoffSt.FORWARD]: - self.c_repr = "" - if self.st == EcoffSt.MEMBER: - # value of a stMember is the offset in bits - self.c_repr += f"/* 0x{self.value//8:X} */ " - - type_str, bitwidth = self.process_type_information(0) - self.c_repr += type_str - if len(self.c_repr) != 0: - self.c_repr += " " - self.c_repr += f"{self.name}{f' : {bitwidth}' if bitwidth is not None else ''};" - elif self.st == EcoffSt.TYPEDEF: - # TODO the typedef may already be absorbed into a struct or similar, check before emitting - type_str, _ = self.process_type_information(0) - self.c_repr = f"typedef {type_str} {self.name};" - elif self.st == EcoffSt.LABEL: - self.c_repr = f"{self.name}:" - - def process_type_information(self, ind): - c_bt_names = { - EcoffBt.NIL : None, - EcoffBt.ADR : None, - EcoffBt.CHAR : "signed char", - EcoffBt.UCHAR : "char", - EcoffBt.SHORT : "short", - EcoffBt.USHORT : "unsigned short", - EcoffBt.INT : "int", - EcoffBt.UINT : "unsigned int", - EcoffBt.LONG : "long", - EcoffBt.ULONG : "unsigned long", - EcoffBt.FLOAT : "float", - EcoffBt.DOUBLE : "double", - EcoffBt.STRUCT : "struct", - EcoffBt.UNION : "union", - EcoffBt.ENUM : "enum", - EcoffBt.TYPEDEF : "typedef", - EcoffBt.RANGE : None, - EcoffBt.SET : None, - EcoffBt.COMPLEX : "complex", - EcoffBt.DCOMPLEX : "double complex", - EcoffBt.INDIRECT : None, - EcoffBt.FIXEDDEC : None, - EcoffBt.FLOATDEC : None, - EcoffBt.STRING : "const char*", - EcoffBt.BIT : None, - EcoffBt.PICTURE : None, - EcoffBt.VOID : "void", - EcoffBt.LONGLONG : "long long", - EcoffBt.ULONGLONG : "unsigned long long", - EcoffBt.LONG64 : "long", - EcoffBt.ULONG64 : "unsigned long", - EcoffBt.LONGLONG64 : "long long", - EcoffBt.ULONGLONG64 : "unsigned long long", - EcoffBt.ADR64 : None, - EcoffBt.INT64 : None, - EcoffBt.UINT64 : None, - } - c_tq_str = { - EcoffTq.NIL : "", - EcoffTq.PTR : "*", - EcoffTq.PROC : "()", - EcoffTq.ARRAY : "[]", - EcoffTq.FAR : "/* FAR */", - EcoffTq.VOL : "volatile", - EcoffTq.CONST : "const", - } - - if self.index == 0xFFFFF: - # no type info - return "", None - - aux = self.fdr.auxs[self.index + ind] - ind += 1 - type_str = "" - - bit_width = None - if aux.ti.fBitfield == 1: - bit_width = self.fdr.auxs[self.index + ind].isym - ind += 1 - - if aux.ti.bt in [EcoffBt.STRUCT, EcoffBt.UNION, EcoffBt.ENUM, EcoffBt.TYPEDEF]: - type_ref_aux = self.fdr.auxs[self.index + ind] - ind += 1 - - fd_ref_idx = type_ref_aux.rndx.rfd - if fd_ref_idx == 4095: - fd_ref_idx = self.fdr.auxs[self.index + ind].isym - ind += 1 - - fdr_ref = self.fdr.parent.fdrs[fd_ref_idx] - sym_ref = fdr_ref.symrs[type_ref_aux.rndx.index] - # now we have the reference to the stStruct, stUnion, stEnum, or stTypeDef - type_str += f"{sym_ref.type_name if sym_ref.type_name is not None else sym_ref.name}" - else: - type_str += f"{c_bt_names[aux.ti.bt]}" - - # TODO improve emitting qualified types - tqs = "" - for tq in aux.ti.tqs: - if tq == EcoffTq.NIL: - continue - if tq == EcoffTq.ARRAY: - ind += 2 # skips over some info such as the type of index (always int for C) - array_low_aux = self.fdr.auxs[self.index + ind] - array_high_aux = self.fdr.auxs[self.index + ind + 1] - stride_aux = self.fdr.auxs[self.index + ind + 2] - ind += 3 - tqs += "[" - if array_high_aux.dnHigh != 0xFFFFFFFF: - tqs += '%d' % (array_high_aux.dnHigh + 1) - tqs += "]" - else: - tqs += c_tq_str[tq] - tqs += " " - tqs = tqs.strip() - if len(tqs) != 0: - type_str += " " + tqs - - return type_str, bit_width - - def __str__(self) -> str: - return f"""= EcoffSymr ============== {self.idx} -iss = 0x{self.iss:08X} -value = 0x{self.value:08X} -st = st{self.st.name} -sc = sc{self.sc.name} -_reserved = {self._reserved} -index = 0x{self.index:05X} -name = {self.name}""" - -class EcoffPdr: - """ - ECOFF Procedure Descriptor - - typedef struct sPDR { - s32 addr; /* memory address of start of procedure */ - s32 isym; /* start of local symbol entries */ - s32 iline; /* start of line number entries */ - s32 regmask; /* save register mask */ - s32 regoffset; /* save register offset */ - s32 iopt; /* start of optimization symbol entries */ - s32 fregmask; /* save floating point register mask */ - s32 fregoffset; /* save floating point register offset */ - s32 frameoffset; /* frame size */ - u16 framereg; /* frame pointer register */ - u16 pcreg; /* offset or reg of return pc */ - s32 lnLow; /* lowest line in the procedure */ - s32 lnHigh; /* highest line in the procedure */ - s32 cbLineOffset; /* byte offset for this procedure from the fd base */ -#ifdef 64_BIT - // TODO there's a bitfield in here - s32 gpPrologue; /* byte size of GP prologue */ - s32 gpUsed; /* true if the procedure uses GP */ - s32 regFrame; /* true if register frame procedure */ - s32 prof; /* true if compiled with -pg */ - s32 localOffset; /* offset of local variables from vfp */ -#endif - } tPDR, *pPDR; // size = 0x34 - """ - SIZE = 0x34 - - def __init__(self, fdr, data) -> None: - self.parent = fdr - self.data = data[:EcoffPdr.SIZE] - - self.addr, self.isym, self.iline, self.regmask, \ - self.regoffset, self.iopt, self.fregmask, self.fregoffset, \ - self.frameoffset, self.framereg, self.pcreg, self.lnLow, \ - self.lnHigh, self.cbLineOffset = struct.unpack(">IIIIIIIIIHHIII", self.data) - - self.symrs = [] - - i = self.isym - symr = self.parent.symrs[i] - assert symr.st == EcoffSt.PROC or symr.st == EcoffSt.STATICPROC - # Inherit procedure name from procedure symbol - self.name = symr.name - - self.symrs.append(symr) - while not (symr.st == EcoffSt.END and symr.name == self.symrs[0].name): - i += 1 - symr = self.parent.symrs[i] - self.symrs.append(symr) - - assert symr.st == EcoffSt.END and symr.sc == EcoffSc.TEXT - self.size = symr.value # value field of an stEND and scTEXT symbol is the procedure size - assert self.size % 4 == 0 - - # indexed by asm word offset from proc start - self.lines = [] - - # ilineMax = self.parent.parent.hdrr.ilineMax - # cbLine = self.parent.parent.hdrr.cbLine - # cbLineOffset = self.parent.parent.hdrr.cbLineOffset - # ilineBase = self.parent.ilineBase - # cline = self.parent.cline - # cbLineOffset = self.parent.cbLineOffset - # cbLine = self.parent.cbLine - # lnLow = self.lnLow - # lnHigh = self.lnHigh - # iline = self.iline - - elf_data = self.parent.parent.parent.data - - line_no = self.lnLow # first line in the procedure - line_data = self.parent.parent.hdrr.cbLineOffset + self.parent.cbLineOffset + self.cbLineOffset - # line_end = self.parent.parent.hdrr.cbLineOffset + self.parent.cbLineOffset + self.parent.cbLine - - # print(self) - # print(f"{self.name} [{self.lnLow}:{self.lnHigh}]") - # print(self.size//4) - while len(self.lines) < self.size//4: - # assert line_data < line_end , "Overflow in line numbers table" - - liner = EcoffLiner(elf_data[line_data:]) - line_no += liner.delta - # if line_no < self.lnLow or line_no > self.lnHigh: - # break - - # print(liner) - for i in range(liner.count): - # print(f"[{len(self.lines)}] {line_no}") - self.lines.append(line_no) - - line_data += len(liner.data) - - def lookup_sym(self, value, type=-1): - for sym in self.symrs: - if sym.value == value and (type == -1 or type == sym.st): - return sym - return None - - def __str__(self) -> str: - return f"""= EcoffPdr =============== -addr = 0x{self.addr:08X} -isym = 0x{self.isym:08X} -iline = 0x{self.iline:08X} -regmask = 0b{self.regmask:032b} -regoffset = 0x{self.regoffset:08X} -iopt = 0x{self.iopt:08X} -fregmask = 0b{self.fregmask:032b} -fregoffset = 0x{self.fregoffset:08X} -frameoffset = 0x{self.frameoffset:08X} -framereg = ${self.framereg} -pcreg = ${self.pcreg} -lnLow = {self.lnLow} -lnHigh = {self.lnHigh} -cbLineOffset = 0x{self.cbLineOffset:08X} -name = {self.name}""" - -class EcoffFdr: - """ - ECOFF File Descriptor - - typedef struct sFDR { - u32 adr; /* memory address of beginning of file */ - s32 rss; /* file name (of source, if known) */ - s32 issBase; /* file's string space */ - s32 cbSs; /* number of bytes in the ss */ - s32 isymBase; /* beginning of symbols */ - s32 csym; /* count file's of symbols */ - s32 ilineBase; /* file's line symbols */ - s32 cline; /* count of file's line symbols */ - s32 ioptBase; /* file's optimization entries */ - s32 copt; /* count of file's optimization entries */ - u16 ipdFirst; /* start of procedures for this file */ - u16 cpd; /* count of procedures for this file */ - s32 iauxBase; /* file's auxiliary entries */ - s32 caux; /* count of file's auxiliary entries */ - s32 rfdBase; /* index into the file indirect table */ - s32 crfd; /* count file indirect entries */ - EcoffLanguageCode lang : 5; /* language for this file */ - u32 fMerge : 1; /* whether this file can be merged */ - u32 fReadin : 1; /* true if it was read in (not just created) */ - u32 fBigEndian : 1; /* true if AUXU's are big endian */ - u32 glevel : 2; /* level this file was compiled with */ - u32 _reserved : 20; /* reserved bits */ - s32 cbLineOffset; /* byte offset from header for this file ln's */ - s32 cbLine; /* size of lines for this file */ - } tFDR, *pFDR; // size = 0x48 - """ - SIZE = 0x48 - - @staticmethod - def from_binary(mdebug, i): - # Init - if 'init' not in EcoffFdr.from_binary.__dict__: - EcoffFdr.from_binary.cache = {} - EcoffFdr.from_binary.init = True - # Parent Init - if mdebug not in EcoffFdr.from_binary.cache: - EcoffFdr.from_binary.cache[mdebug] = {} - # Cache hit - if i in EcoffFdr.from_binary.cache[mdebug]: - return EcoffFdr.from_binary.cache[mdebug][i] - # Cache miss - cbFdOffset = mdebug.hdrr.cbFdOffset - elf_data = mdebug.parent.data - EcoffFdr.from_binary.cache[mdebug][i] = EcoffFdr(mdebug, elf_data[cbFdOffset+i*EcoffFdr.SIZE:cbFdOffset+(i+1)*EcoffFdr.SIZE]) - return EcoffFdr.from_binary.cache[mdebug][i] - - def __init__(self, mdebug, data) -> None: - self.parent = mdebug - self.data = data[:EcoffFdr.SIZE] - - self.adr, self.rss, self.issBase, self.cbSs, \ - self.isymBase, self.csym, self.ilineBase, self.cline, \ - self.ioptBase, self.copt, self.ipdFirst, self.cpd, \ - self.iauxBase, self.caux, self.rfdBase, self.crfd, \ - bits, self.cbLineOffset, self.cbLine = struct.unpack(">IIIIIIIIIIHHIIIIIII", self.data) - - self.lang = EcoffLanguageCode(get_bitrange(bits, 27, 5)) - self.fMerge = get_bitrange(bits, 26, 1) - self.fReadin = get_bitrange(bits, 25, 1) - self.fBigEndian = get_bitrange(bits, 24, 1) - self.glevel = get_bitrange(bits, 22, 2) - self._reserved = get_bitrange(bits, 2, 20) - - self.name = self.parent.read_string(self.issBase + self.rss) - - # print(self) - - hdrr = self.parent.hdrr - elf_data = self.parent.parent.data - - # Aux Symbols - self.auxs = [] - for i in range(self.caux): - i += self.iauxBase - assert i < hdrr.iauxMax , "Out of bounds in Auxiliary Symbol Table" - aux = EcoffAux(self, elf_data[hdrr.cbAuxOffset+i*EcoffAux.SIZE:][:EcoffAux.SIZE], self.fBigEndian) - self.auxs.append(aux) - - # Symbols - self.symrs = [] - for i in range(self.csym): - j = i + self.isymBase - assert j < hdrr.isymMax , "Out of bounds in Local Symbol Table" - symr = EcoffSymr(self, i, elf_data[hdrr.cbSymOffset+j*EcoffSymr.SIZE:hdrr.cbSymOffset+(j+1)*EcoffSymr.SIZE]) - self.symrs.append(symr) - for symr in self.symrs: - symr.link_syms() - - # PDRs - self.pdrs = [] - for i in range(self.cpd): - i += self.ipdFirst - assert i < hdrr.ipdMax , "Out of bounds in Procedure Descriptor Table" - pdr = EcoffPdr(self, elf_data[hdrr.cbPdOffset+i*EcoffPdr.SIZE:hdrr.cbPdOffset+(i+1)*EcoffPdr.SIZE]) - self.pdrs.append(pdr) - - self.size = sum([pdr.size for pdr in self.pdrs]) - - def late_init(self): - for symr in self.symrs: - symr.late_init() - - def pdr_forname(self, procedure_name): - for pdr in self.pdrs: - if pdr.name == procedure_name: - return pdr - return None - - def pdr_foranyaddr(self, addr): - for pdr in self.pdrs: - if pdr.addr <= addr and pdr.addr + pdr.size > addr: - return pdr - return None - - def pdr_foraddr(self, addr): - for pdr in self.pdrs: - if pdr.addr == addr: - return pdr - return None - - def read_string(self, index): - return self.parent.read_string(self.issBase + index) - - def c_str(self) -> str: - """ - C prettyprint file - """ - def print_symbol(symr): - return f"{symr.st.name} :: {symr.c_repr}" - - indent = 0 - out = f"File: {self.name}\n" - - for symr in self.symrs: - if symr.st in [EcoffSt.END]: - indent -= 2 - - out += " " * indent - out += print_symbol(symr) - out += "\n" - - if symr.st in [EcoffSt.FILE, EcoffSt.STRUCT, EcoffSt.UNION, EcoffSt.PROC, EcoffSt.STATICPROC, EcoffSt.BLOCK]: - indent += 2 - - return out - - def __str__(self) -> str: - return f"""= EcoffFdr =============== -adr = 0x{self.adr:08X} -rss = 0x{self.rss:08X} -issBase = 0x{self.issBase:08X} -cbSs = 0x{self.cbSs:08X} -isymBase = 0x{self.isymBase:08X} -csym = 0x{self.csym:08X} -ilineBase = 0x{self.ilineBase:08X} -cline = 0x{self.cline:08X} -ioptBase = 0x{self.ioptBase:08X} -copt = 0x{self.copt:08X} -ipdFirst = 0x{self.ipdFirst:08X} -cpd = 0x{self.cpd:08X} -iauxBase = 0x{self.iauxBase:08X} -caux = 0x{self.caux:08X} -rfdBase = 0x{self.rfdBase:08X} -crfd = 0x{self.crfd:08X} -lang = {self.lang.name} -fMerge = {bool(self.fMerge)} -fReadin = {bool(self.fReadin)} -fBigEndian = {bool(self.fBigEndian)} -glevel = {self.glevel} -_reserved = {self._reserved} -cbLineOffset = 0x{self.cbLineOffset:08X} -cbLine = 0x{self.cbLine:08X} -name = {self.name}""" - -class EcoffHDRR: - """ - Symbolic Header - - typedef struct sHDRR { - u16 magic; /* 0x7009 */ - u16 vstamp; /* version stamp */ - s32 ilineMax; /* number of line number entries */ - s32 cbLine; /* number of bytes for line number entries */ - s32 cbLineOffset; /* offset to start of line number entries */ - s32 idnMax; /* max index into dense number table */ - s32 cbDnOffset; /* offset to start dense number table */ - s32 ipdMax; /* number of procedures */ - s32 cbPdOffset; /* offset to procedure descriptor table */ - s32 isymMax; /* number of local symbols */ - s32 cbSymOffset; /* offset to start of local symbols */ - s32 ioptMax; /* max index into optimization symbol entries */ - s32 cbOptOffset; /* offset to optimization symbol entries */ - s32 iauxMax; /* number of auxillary symbol entries */ - s32 cbAuxOffset; /* offset to start of auxillary symbol entries */ - s32 issMax; /* max index into local strings */ - s32 cbSsOffset; /* offset to start of local strings */ - s32 issExtMax; /* max index into external strings */ - s32 cbSsExtOffset; /* offset to start of external strings */ - s32 ifdMax; /* number of file descriptor entries */ - s32 cbFdOffset; /* offset to file descriptor table */ - s32 crfd; /* number of relative file descriptor entries */ - s32 cbRfdOffset; /* offset to relative file descriptor table */ - s32 iextMax; /* max index into external symbols */ - s32 cbExtOffset; /* offset to start of external symbol entries */ - } tHDRR, *pHDRR; // size = 0x60 - """ - HDRR_MAGIC = 0x7009 - SIZE = 0x60 - - def __init__(self, data) -> None: - self.data = data[:EcoffHDRR.SIZE] - - self.magic, self.vstamp, self.ilineMax, self.cbLine, \ - self.cbLineOffset, self.idnMax, self.cbDnOffset, self.ipdMax, \ - self.cbPdOffset, self.isymMax, self.cbSymOffset, self.ioptMax, \ - self.cbOptOffset, self.iauxMax, self.cbAuxOffset, self.issMax, \ - self.cbSsOffset, self.issExtMax, self.cbSsExtOffset, self.ifdMax, \ - self.cbFdOffset, self.crfd, self.cbRfdOffset, self.iextMax, \ - self.cbExtOffset = struct.unpack(">HHIIIIIIIIIIIIIIIIIIIIIII", self.data) - - assert self.magic == EcoffHDRR.HDRR_MAGIC , f"Symbolic Header magic value is incorrect. Got 0x{self.magic:04X}, expected 0x{EcoffHDRR.HDRR_MAGIC:04X}" - - def __str__(self) -> str: - return f"""= EcoffHDRR ============== -magic = 0x{self.magic:04X} -vstamp = 0x{self.vstamp:04X} -ilineMax = 0x{self.ilineMax:08X} -cbLine = 0x{self.cbLine:08X} -cbLineOffset = 0x{self.cbLineOffset:08X} -idnMax = 0x{self.idnMax:08X} -cbDnOffset = 0x{self.cbDnOffset:08X} -ipdMax = 0x{self.ipdMax:08X} -cbPdOffset = 0x{self.cbPdOffset:08X} -isymMax = 0x{self.isymMax:08X} -cbSymOffset = 0x{self.cbSymOffset:08X} -ioptMax = 0x{self.ioptMax:08X} -cbOptOffset = 0x{self.cbOptOffset:08X} -iauxMax = 0x{self.iauxMax:08X} -cbAuxOffset = 0x{self.cbAuxOffset:08X} -issMax = 0x{self.issMax:08X} -cbSsOffset = 0x{self.cbSsOffset:08X} -issExtMax = 0x{self.issExtMax:08X} -cbSsExtOffset = 0x{self.cbSsExtOffset:08X} -ifdMax = 0x{self.ifdMax:08X} -cbFdOffset = 0x{self.cbFdOffset:08X} -crfd = 0x{self.crfd:08X} -cbRfdOffset = 0x{self.cbRfdOffset:08X} -iextMax = 0x{self.iextMax:08X} -cbExtOffset = 0x{self.cbExtOffset:08X}""" diff --git a/tools/mips_isa.py b/tools/mips_isa.py deleted file mode 100644 index d99dcda..0000000 --- a/tools/mips_isa.py +++ /dev/null @@ -1,1309 +0,0 @@ -# TODO enum these constants -from enum import IntEnum, auto - -# Register IDs -class MipsGPReg(IntEnum): - R0 = 0 # 0 - AT = auto() # 1 - V0 = auto() # 2 - V1 = auto() # 3 - A0 = auto() # 4 - A1 = auto() # 5 - A2 = auto() # 6 - A3 = auto() # 7 - T0 = auto() # 8 - T1 = auto() # 9 - T2 = auto() # 10 - T3 = auto() # 11 - T4 = auto() # 12 - T5 = auto() # 13 - T6 = auto() # 14 - T7 = auto() # 15 - S0 = auto() # 16 - S1 = auto() # 17 - S2 = auto() # 18 - S3 = auto() # 19 - S4 = auto() # 20 - S5 = auto() # 21 - S6 = auto() # 22 - S7 = auto() # 23 - T8 = auto() # 24 - T9 = auto() # 25 - K0 = auto() # 26 - K1 = auto() # 27 - GP = auto() # 28 - SP = auto() # 29 - FP = auto() # 30 - RA = auto() # 31 - -class MipsFPReg(IntEnum): - F0 = 0 # 0 - F1 = auto() # 1 - F2 = auto() # 2 - F3 = auto() # 3 - F4 = auto() # 4 - F5 = auto() # 5 - F6 = auto() # 6 - F7 = auto() # 7 - F8 = auto() # 8 - F9 = auto() # 9 - F10 = auto() # 10 - F11 = auto() # 11 - F12 = auto() # 12 - F13 = auto() # 13 - F14 = auto() # 14 - F15 = auto() # 15 - F16 = auto() # 16 - F17 = auto() # 17 - F18 = auto() # 18 - F19 = auto() # 19 - F20 = auto() # 20 - F21 = auto() # 21 - F22 = auto() # 22 - F23 = auto() # 23 - F24 = auto() # 24 - F25 = auto() # 25 - F26 = auto() # 26 - F27 = auto() # 27 - F28 = auto() # 28 - F29 = auto() # 29 - F30 = auto() # 30 - F31 = auto() # 31 - -# Instruction Unique IDs -MIPS_INS_SLL = 0 -MIPS_INS_SRL = 1 -MIPS_INS_SRA = 2 -MIPS_INS_SLLV = 3 -MIPS_INS_SRLV = 4 -MIPS_INS_SRAV = 5 -MIPS_INS_JR = 6 -MIPS_INS_JALR = 7 -MIPS_INS_SYSCALL = 8 -MIPS_INS_BREAK = 9 -MIPS_INS_SYNC = 10 -MIPS_INS_MFHI = 11 -MIPS_INS_MTHI = 12 -MIPS_INS_MFLO = 13 -MIPS_INS_MTLO = 14 -MIPS_INS_DSLLV = 15 -MIPS_INS_DSRLV = 16 -MIPS_INS_DSRAV = 17 -MIPS_INS_MULT = 18 -MIPS_INS_MULTU = 19 -MIPS_INS_DIV = 20 -MIPS_INS_DIVU = 21 -MIPS_INS_DMULT = 22 -MIPS_INS_DMULTU = 23 -MIPS_INS_DDIV = 24 -MIPS_INS_DDIVU = 25 -MIPS_INS_ADD = 26 -MIPS_INS_ADDU = 27 -MIPS_INS_SUB = 28 -MIPS_INS_SUBU = 29 -MIPS_INS_AND = 30 -MIPS_INS_OR = 31 -MIPS_INS_XOR = 32 -MIPS_INS_NOR = 33 -MIPS_INS_SLT = 34 -MIPS_INS_SLTU = 35 -MIPS_INS_DADD = 36 -MIPS_INS_DADDU = 37 -MIPS_INS_DSUB = 38 -MIPS_INS_DSUBU = 39 -MIPS_INS_TGE = 40 -MIPS_INS_TGEU = 41 -MIPS_INS_TLT = 42 -MIPS_INS_TLTU = 43 -MIPS_INS_TEQ = 44 -MIPS_INS_TNE = 45 -MIPS_INS_DSLL = 46 -MIPS_INS_DSRL = 47 -MIPS_INS_DSRA = 48 -MIPS_INS_DSLL32 = 49 -MIPS_INS_DSRL32 = 50 -MIPS_INS_DSRA32 = 51 -MIPS_INS_BLTZ = 52 -MIPS_INS_BGEZ = 53 -MIPS_INS_BLTZL = 54 -MIPS_INS_BGEZL = 55 -MIPS_INS_TGEI = 56 -MIPS_INS_TGEIU = 57 -MIPS_INS_TLTI = 58 -MIPS_INS_TLTIU = 59 -MIPS_INS_TEQI = 60 -MIPS_INS_TNEI = 61 -MIPS_INS_BLTZAL = 62 -MIPS_INS_BGEZAL = 63 -MIPS_INS_BLTZALL = 64 -MIPS_INS_BGEZALL = 65 -MIPS_INS_J = 66 -MIPS_INS_JAL = 67 -MIPS_INS_BEQ = 68 -MIPS_INS_BNE = 69 -MIPS_INS_BLEZ = 70 -MIPS_INS_BGTZ = 71 -MIPS_INS_ADDI = 72 -MIPS_INS_ADDIU = 73 -MIPS_INS_SLTI = 74 -MIPS_INS_SLTIU = 75 -MIPS_INS_ANDI = 76 -MIPS_INS_ORI = 77 -MIPS_INS_XORI = 78 -MIPS_INS_LUI = 79 -MIPS_INS_MFC0 = 80 -MIPS_INS_MTC0 = 81 -MIPS_INS_TLBR = 82 -MIPS_INS_TLBWI = 83 -MIPS_INS_TLBWR = 84 -MIPS_INS_TLBP = 85 -MIPS_INS_ERET = 86 -MIPS_INS_MFC1 = 87 -MIPS_INS_DMFC1 = 88 -MIPS_INS_CFC1 = 89 -MIPS_INS_MTC1 = 90 -MIPS_INS_DMTC1 = 91 -MIPS_INS_CTC1 = 92 -MIPS_INS_BC1F = 93 -MIPS_INS_BC1T = 94 -MIPS_INS_BC1FL = 95 -MIPS_INS_BC1TL = 96 -MIPS_INS_ADD_S = 97 -MIPS_INS_SUB_S = 98 -MIPS_INS_MUL_S = 99 -MIPS_INS_DIV_S = 100 -MIPS_INS_SQRT_S = 101 -MIPS_INS_ABS_S = 102 -MIPS_INS_MOV_S = 103 -MIPS_INS_NEG_S = 104 -MIPS_INS_ROUND_L_S = 105 -MIPS_INS_TRUNC_L_S = 106 -MIPS_INS_CEIL_L_S = 107 -MIPS_INS_FLOOR_L_S = 108 -MIPS_INS_ROUND_W_S = 109 -MIPS_INS_TRUNC_W_S = 110 -MIPS_INS_CEIL_W_S = 111 -MIPS_INS_FLOOR_W_S = 112 -MIPS_INS_CVT_D_S = 113 -MIPS_INS_CVT_W_S = 114 -MIPS_INS_CVT_L_S = 115 -MIPS_INS_C_F_S = 116 -MIPS_INS_C_UN_S = 117 -MIPS_INS_C_EQ_S = 118 -MIPS_INS_C_UEQ_S = 119 -MIPS_INS_C_OLT_S = 120 -MIPS_INS_C_ULT_S = 121 -MIPS_INS_C_OLE_S = 122 -MIPS_INS_C_ULE_S = 123 -MIPS_INS_C_SF_S = 124 -MIPS_INS_C_NGLE_S = 125 -MIPS_INS_C_SEQ_S = 126 -MIPS_INS_C_NGL_S = 127 -MIPS_INS_C_LT_S = 128 -MIPS_INS_C_NGE_S = 129 -MIPS_INS_C_LE_S = 130 -MIPS_INS_C_NGT_S = 131 -MIPS_INS_ADD_D = 132 -MIPS_INS_SUB_D = 133 -MIPS_INS_MUL_D = 134 -MIPS_INS_DIV_D = 135 -MIPS_INS_SQRT_D = 136 -MIPS_INS_ABS_D = 137 -MIPS_INS_MOV_D = 138 -MIPS_INS_NEG_D = 139 -MIPS_INS_ROUND_L_D = 140 -MIPS_INS_TRUNC_L_D = 141 -MIPS_INS_CEIL_L_D = 142 -MIPS_INS_FLOOR_L_D = 143 -MIPS_INS_ROUND_W_D = 144 -MIPS_INS_TRUNC_W_D = 145 -MIPS_INS_CEIL_W_D = 146 -MIPS_INS_FLOOR_W_D = 147 -MIPS_INS_CVT_S_D = 148 -MIPS_INS_CVT_W_D = 149 -MIPS_INS_CVT_L_D = 150 -MIPS_INS_C_F_D = 151 -MIPS_INS_C_UN_D = 152 -MIPS_INS_C_EQ_D = 153 -MIPS_INS_C_UEQ_D = 154 -MIPS_INS_C_OLT_D = 155 -MIPS_INS_C_ULT_D = 156 -MIPS_INS_C_OLE_D = 157 -MIPS_INS_C_ULE_D = 158 -MIPS_INS_C_SF_D = 159 -MIPS_INS_C_NGLE_D = 160 -MIPS_INS_C_SEQ_D = 161 -MIPS_INS_C_NGL_D = 162 -MIPS_INS_C_LT_D = 163 -MIPS_INS_C_NGE_D = 164 -MIPS_INS_C_LE_D = 165 -MIPS_INS_C_NGT_D = 166 -MIPS_INS_CVT_S_W = 167 -MIPS_INS_CVT_D_W = 168 -MIPS_INS_CVT_S_L = 169 -MIPS_INS_CVT_D_L = 170 -MIPS_INS_BEQL = 171 -MIPS_INS_BNEL = 172 -MIPS_INS_BLEZL = 173 -MIPS_INS_BGTZL = 174 -MIPS_INS_DADDI = 175 -MIPS_INS_DADDIU = 176 -MIPS_INS_LDL = 177 -MIPS_INS_LDR = 178 -MIPS_INS_LB = 179 -MIPS_INS_LH = 180 -MIPS_INS_LWL = 181 -MIPS_INS_LW = 182 -MIPS_INS_LBU = 183 -MIPS_INS_LHU = 184 -MIPS_INS_LWR = 185 -MIPS_INS_LWU = 186 -MIPS_INS_SB = 187 -MIPS_INS_SH = 188 -MIPS_INS_SWL = 189 -MIPS_INS_SW = 190 -MIPS_INS_SDL = 191 -MIPS_INS_SDR = 192 -MIPS_INS_SWR = 193 -MIPS_INS_CACHE = 194 -MIPS_INS_LL = 195 -MIPS_INS_LWC1 = 196 -MIPS_INS_LWC2 = 197 -MIPS_INS_LLD = 198 -MIPS_INS_LDC1 = 199 -MIPS_INS_LDC2 = 200 -MIPS_INS_LD = 201 -MIPS_INS_SC = 202 -MIPS_INS_SWC1 = 203 -MIPS_INS_SWC2 = 204 -MIPS_INS_SCD = 205 -MIPS_INS_SDC1 = 206 -MIPS_INS_SDC2 = 207 -MIPS_INS_SD = 208 - -# RSP COP2 -MIPS_INS_VMULF = 209 -MIPS_INS_VMULU = 210 -MIPS_INS_VRNDP = 211 -MIPS_INS_VMULQ = 212 -MIPS_INS_VMUDL = 213 -MIPS_INS_VMUDM = 214 -MIPS_INS_VMUDN = 215 -MIPS_INS_VMUDH = 216 -MIPS_INS_VMACF = 217 -MIPS_INS_VMACU = 218 -MIPS_INS_VRNDN = 219 -MIPS_INS_VMACQ = 220 -MIPS_INS_VMADL = 221 -MIPS_INS_VMADM = 222 -MIPS_INS_VMADN = 223 -MIPS_INS_VMADH = 224 -MIPS_INS_VADD = 225 -MIPS_INS_VSUB = 226 -MIPS_INS_VABS = 227 -MIPS_INS_VADDC = 228 -MIPS_INS_VSUBC = 229 -MIPS_INS_VSAR = 230 -MIPS_INS_VLT = 231 -MIPS_INS_VEQ = 232 -MIPS_INS_VNE = 233 -MIPS_INS_VGE = 234 -MIPS_INS_VCL = 235 -MIPS_INS_VCH = 236 -MIPS_INS_VCR = 237 -MIPS_INS_VMRG = 238 -MIPS_INS_VAND = 239 -MIPS_INS_VNAND = 240 -MIPS_INS_VOR = 241 -MIPS_INS_VNOR = 242 -MIPS_INS_VXOR = 243 -MIPS_INS_VNXOR = 244 -MIPS_INS_VRCP = 245 -MIPS_INS_VRCPL = 246 -MIPS_INS_VRCPH = 247 -MIPS_INS_VMOV = 248 -MIPS_INS_VRSQ = 249 -MIPS_INS_VRSQL = 250 -MIPS_INS_VRSQH = 251 -MIPS_INS_VNOP = 252 -MIPS_INS_LBV = 253 -MIPS_INS_LSV = 254 -MIPS_INS_LLV = 255 -MIPS_INS_LDV = 256 -MIPS_INS_LQV = 257 -MIPS_INS_LRV = 258 -MIPS_INS_LPV = 259 -MIPS_INS_LUV = 260 -MIPS_INS_LHV = 261 -MIPS_INS_LFV = 262 -MIPS_INS_LTV = 263 -MIPS_INS_SBV = 264 -MIPS_INS_SSV = 265 -MIPS_INS_SLV = 266 -MIPS_INS_SDV = 267 -MIPS_INS_SQV = 268 -MIPS_INS_SRV = 269 -MIPS_INS_SPV = 270 -MIPS_INS_SUV = 271 -MIPS_INS_SHV = 272 -MIPS_INS_SFV = 273 -MIPS_INS_SWV = 274 -MIPS_INS_STV = 275 -MIPS_INS_MFC2 = 276 -MIPS_INS_MTC2 = 277 -MIPS_INS_CFC2 = 278 -MIPS_INS_CTC2 = 279 - -# Pseudo-Instruction Unique IDs -MIPS_INS_BEQZ = 280 -MIPS_INS_BNEZ = 281 -MIPS_INS_B = 282 -MIPS_INS_NOP = 283 -MIPS_INS_MOVE = 284 -MIPS_INS_NEGU = 285 -MIPS_INS_NOT = 286 - -# Invalid Instruction Unique ID -MIPS_INS_INVALID = -1 - -# Op IDs -# MIPS_OP_RS = 0 -# MIPS_OP_RT = 0 -# MIPS_OP_RD = 0 -# MIPS_OP_IMM = 0 - -# Instruction Groups - -MIPS_BRANCH_LIKELY_INSNS = [ - MIPS_INS_BEQL, MIPS_INS_BGEZALL, - MIPS_INS_BGEZL, MIPS_INS_BGTZL, - MIPS_INS_BLEZL, MIPS_INS_BLTZALL, - MIPS_INS_BLTZL, MIPS_INS_BNEL, - MIPS_INS_BC1TL, MIPS_INS_BC1FL, -] - -MIPS_BRANCH_INSNS = [ - *MIPS_BRANCH_LIKELY_INSNS, - - MIPS_INS_BEQ, - MIPS_INS_BGEZ, MIPS_INS_BGEZAL, - MIPS_INS_BGTZ, - MIPS_INS_BNE, - MIPS_INS_BLTZ, MIPS_INS_BLTZAL, - MIPS_INS_BLEZ, - MIPS_INS_BC1T, MIPS_INS_BC1F, - - MIPS_INS_BEQZ, - MIPS_INS_BNEZ, - MIPS_INS_B, -] - -MIPS_JUMP_INSNS = [ - MIPS_INS_JAL, MIPS_INS_JALR, MIPS_INS_J, MIPS_INS_JR -] - -MIPS_DELAY_SLOT_INSNS = [ - *MIPS_BRANCH_INSNS, *MIPS_JUMP_INSNS -] - -MIPS_FP_LOAD_INSNS = [ - MIPS_INS_LWC1, MIPS_INS_LDC1 -] - -MIPS_LOAD_INSNS = [ - MIPS_INS_LB, MIPS_INS_LBU, - MIPS_INS_LH, MIPS_INS_LHU, - MIPS_INS_LW, MIPS_INS_LWL, MIPS_INS_LWR, MIPS_INS_LWU, - MIPS_INS_LD, MIPS_INS_LDL, MIPS_INS_LDR, - MIPS_INS_LL, MIPS_INS_LLD, - *MIPS_FP_LOAD_INSNS -] - -MIPS_FP_STORE_INSNS = [ - MIPS_INS_SWC1, MIPS_INS_SDC1 -] - -MIPS_STORE_INSNS = [ - MIPS_INS_SB, - MIPS_INS_SH, - MIPS_INS_SW, MIPS_INS_SWL, MIPS_INS_SWR, - MIPS_INS_SD, MIPS_INS_SDL, MIPS_INS_SDR, - MIPS_INS_SC, MIPS_INS_SCD, - *MIPS_FP_STORE_INSNS -] - -MIPS_LOAD_STORE_INSNS = [ - *MIPS_LOAD_INSNS, - *MIPS_STORE_INSNS, -] - -MIPS_FP_LOAD_STORE_INSNS = [ - *MIPS_FP_LOAD_INSNS, *MIPS_FP_STORE_INSNS -] - -RSP_VECTOR_LOAD_STORES = [ - MIPS_INS_LBV, MIPS_INS_LSV, MIPS_INS_LLV, MIPS_INS_LDV, - MIPS_INS_LQV, MIPS_INS_LRV, MIPS_INS_LPV, MIPS_INS_LUV, - MIPS_INS_LHV, MIPS_INS_LFV, MIPS_INS_LTV, - - MIPS_INS_SBV, MIPS_INS_SSV, MIPS_INS_SLV, MIPS_INS_SDV, - MIPS_INS_SQV, MIPS_INS_SRV, MIPS_INS_SPV, MIPS_INS_SUV, - MIPS_INS_SHV, MIPS_INS_SFV, MIPS_INS_SWV, MIPS_INS_STV, -] - -# Labels - -# These labels can be referenced from pointers/loads/stores/etc. -LABEL_TYPE_FUNC = 0 -LABEL_TYPE_JTBL = 1 -LABEL_TYPE_DATA = 2 -LABEL_TYPE_BRANCH = 3 - -# Unknown -LABEL_TYPE_UNK = 20 - -class MipsLabel: - """ - Label - """ - - def __init__(self, vaddr, name=None, lbl_type=LABEL_TYPE_UNK, is_global=None) -> None: - self.name = name - self.vaddr = vaddr - self.lbl_type = lbl_type - self.is_global = is_global or (False if (lbl_type == LABEL_TYPE_BRANCH) else True) - - def __str__(self): - if self.name is not None: - return self.name - - if self.lbl_type == LABEL_TYPE_FUNC: - return f"func_{self.vaddr:08X}" - elif self.lbl_type == LABEL_TYPE_JTBL: - return f"jtbl_{self.vaddr:08X}" - elif self.lbl_type == LABEL_TYPE_BRANCH: - return f".L{self.vaddr:08X}" - elif (self.lbl_type == LABEL_TYPE_DATA or self.lbl_type == LABEL_TYPE_UNK): - return f"D_{self.vaddr:08X}" - assert False , f"Unimplemented default name for label type {self.lbl_type}" - -# Register Names - -mips_gpr_names = ( - "$zero", - "$at", - "$v0", "$v1", - "$a0", "$a1", "$a2", "$a3", - "$t0", "$t1", "$t2", "$t3", "$t4", "$t5", "$t6", "$t7", - "$s0", "$s1", "$s2", "$s3", "$s4", "$s5", "$s6", "$s7", - "$t8", "$t9", - "$k0", "$k1", - "$gp", - "$sp", - "$fp", - "$ra", -) - -rsp_gpr_names = ( - "$zero", - "$1", "$2", "$3", "$4", "$5", "$6", - "$7", "$8", "$9", "$10", "$11", "$12", - "$13", "$14", "$15", "$16", "$17", "$18", - "$19", "$20", "$21", "$22", "$23", "$24", - "$25", "$26", "$27", "$28", "$29", "$30", - "$ra", -) - -mips_cop0_names = ( - "Index" , "Random" , "EntryLo0" , "EntryLo1" , - "Context" , "PageMask" , "Wired" , "Reserved07", - "BadVaddr" , "Count" , "EntryHi" , "Compare" , - "Status" , "Cause" , "EPC" , "PRevID" , - "Config" , "LLAddr" , "WatchLo" , "WatchHi" , - "XContext" , "Reserved21", "Reserved22", "Reserved23", - "Reserved24", "Reserved25", "PErr" , "CacheErr" , - "TagLo" , "TagHi" , "ErrorEPC" , "Reserved31", -) - -rsp_cop0_names = ( - "SP_MEM_ADDR", "SP_DRAM_ADDR", "SP_RD_LEN" , "SP_WR_LEN" , - "SP_STATUS" , "SP_DMA_FULL" , "SP_DMA_BUSY" , "SP_SEMAPHORE", - "DPC_START" , "DPC_END" , "DPC_CURRENT" , "DPC_STATUS" , - "DPC_CLOCK" , "DPC_BUFBUSY" , "DPC_PIPEBUSY", "DPC_TMEM" , -) - -mips_cop1_names = ( - "$f0", "$f1", "$f2", "$f3", - "$f4", "$f5", "$f6", "$f7", "$f8", "$f9", "$f10", "$f11", - "$f12", "$f13", "$f14", "$f15", - "$f16", "$f17", "$f18", "$f19", - "$f20", "$f21", "$f22", "$f23", "$f24", "$f25", "$f26", "$f27", "$f28", "$f29", "$f30", - # Status register - "FpCsr", -) - -rsp_cop2_names = ( - "$v0", "$v1", "$v2", "$v3", "$v4", "$v5", "$v6", "$v7", - "$v8", "$v9", "$v10", "$v11", "$v12", "$v13", "$v14", "$v15", - "$v16", "$v17", "$v18", "$v19", "$v20", "$v21", "$v22", "$v23", - "$v24", "$v25", "$v26", "$v27", "$v28", "$v29", "$v30", "$v31", -) - -rsp_cop2_ctrl_names = ( - '$vco', '$vcc', '$vce' -) - -# Instruction sets - -class MipsAbi: - def __init__(self, name, gpr_names, cop0_names, cop1_names, cop2_names): - self.name = name - self.gpr_names, self.cop0_names, self.cop1_names, self.cop2_names = \ - gpr_names, cop0_names, cop1_names, cop2_names - -ABI_VR4300 = MipsAbi("VR4300", mips_gpr_names, mips_cop0_names, mips_cop1_names, None ) -ABI_RSP = MipsAbi("RSP", rsp_gpr_names, rsp_cop0_names, None, rsp_cop2_names) - -# Instruction field fetching - -def sign_extend_6(value): - if value & (1 << (6 - 1)): - return value - (1 << 6) - return value - -def sign_extend_16(value): - return (value & 0x7FFF) - (value & 0x8000) - -def mask_shift(v, s, w): - return (v >> s) & ((1 << w) - 1) - -mips_get_field = lambda raw,vaddr : mask_shift(raw, 26, 6) -mips_get_special = lambda raw,vaddr : mask_shift(raw, 0, 6) -mips_get_cop0 = lambda raw,vaddr : mask_shift(raw, 21, 5) -mips_get_cop1 = lambda raw,vaddr : mask_shift(raw, 21, 5) -mips_get_cop2 = lambda raw,vaddr : mask_shift(raw, 21, 4) -mips_get_regimm = lambda raw,vaddr : mask_shift(raw, 16, 5) -mips_get_tlb = lambda raw,vaddr : mask_shift(raw, 0, 5) -mips_get_function = lambda raw,vaddr : mask_shift(raw, 0, 6) - -mips_get_cond = lambda raw,vaddr : mask_shift(raw, 0, 4) -mips_get_fd = lambda raw,vaddr : MipsFPReg(mask_shift(raw, 6, 5)) -mips_get_fs = lambda raw,vaddr : MipsFPReg(mask_shift(raw, 11, 5)) -mips_get_ft = lambda raw,vaddr : MipsFPReg(mask_shift(raw, 16, 5)) -mips_get_fmt = lambda raw,vaddr : mask_shift(raw, 21, 5) -mips_get_ndtf = lambda raw,vaddr : mask_shift(raw, 16, 2) - -mips_get_target = lambda raw,vaddr : ((vaddr & 0xFC000000) | (mask_shift(raw, 0, 26) << 2)) -mips_get_offset = lambda raw,vaddr : vaddr + 4 + sign_extend_16(mask_shift(raw, 0, 16)) * 4 -mips_get_imm = lambda raw,vaddr : mask_shift(raw, 0, 16) - -mips_get_base = lambda raw,vaddr : MipsGPReg(mask_shift(raw, 21, 5)) - -mips_get_cd = lambda raw,vaddr : mask_shift(raw, 11, 5) - -mips_get_code = lambda raw,vaddr : (mask_shift(raw, 6, 20) << 6) >> 16 -mips_get_op = lambda raw,vaddr : mask_shift(raw, 16, 5) - -mips_get_sa = lambda raw,vaddr : mask_shift(raw, 6, 5) - -mips_get_rd = lambda raw,vaddr : MipsGPReg(mask_shift(raw, 11, 5)) -mips_get_rs = lambda raw,vaddr : MipsGPReg(mask_shift(raw, 21, 5)) -mips_get_rt = lambda raw,vaddr : MipsGPReg(mask_shift(raw, 16, 5)) - -rsp_load_store_multiplier = { - 0b00000 : 0x01, # lbv, sbv - 0b00001 : 0x02, # lsv, ssv - 0b00010 : 0x04, # llv, slv - 0b00011 : 0x08, # ldv, sdv - 0b00100 : 0x10, # lqv, sqv - 0b00101 : 0x10, # lrv, srv - 0b00110 : 0x08, # lpv, spv - 0b00111 : 0x08, # luv, suv - - 0b01000 : 0x02, # lhv, shv - 0b01001 : 0x04, # lfv, sfv - 0b01010 : 0x10, # swv - 0b01011 : 0x10, # ltv, stv -} - -mips_get_vc = lambda raw,vaddr : mask_shift(raw, 11, 5) -mips_get_vd = lambda raw,vaddr : mask_shift(raw, 6, 5) -mips_get_vs = lambda raw,vaddr : mask_shift(raw, 11, 5) -mips_get_vt = lambda raw,vaddr : mask_shift(raw, 16, 5) -mips_get_elem = lambda raw,vaddr : mask_shift(raw, 21, 4) -mips_get_elemd = lambda raw,vaddr : mask_shift(raw, 7, 4) -mips_get_cop2_func = lambda raw,vaddr : mask_shift(raw, 25, 1) -mips_get_lwc2 = lambda raw,vaddr : mask_shift(raw, 11, 5) -mips_get_swc2 = lambda raw,vaddr : mask_shift(raw, 11, 5) -mips_get_voffset = lambda raw,vaddr : sign_extend_6(mask_shift(raw, 0, 6)) * rsp_load_store_multiplier[mips_get_lwc2(raw,vaddr)] - -# Formatting - -def resolve_pseudo_insn(insn): - # move varies between assemblers - # IDO - move_insn = MIPS_INS_OR - # GCC - # move_insn = MIPS_INS_ADDU - - if insn.id == MIPS_INS_SLL and insn.rd == MipsGPReg.R0 and insn.rt == MipsGPReg.R0 and insn.sa == 0: - return MIPS_INS_NOP, "nop", (), () - elif insn.id == MIPS_INS_BEQ and insn.rs == MipsGPReg.R0 and insn.rt == MipsGPReg.R0: - return MIPS_INS_B, "b", ("offset",), (False,) - elif insn.id == move_insn and insn.rt == MipsGPReg.R0: - return MIPS_INS_MOVE, "move", ("rd","rs"), (True,False) - elif insn.id == MIPS_INS_BEQ and insn.rt == MipsGPReg.R0: - return MIPS_INS_BEQZ, "beqz", ("rs","offset"), (False,False) - elif insn.id == MIPS_INS_BNE and insn.rt == MipsGPReg.R0: - return MIPS_INS_BNEZ, "bnez", ("rs","offset"), (False,False) - elif insn.id == MIPS_INS_SUBU and insn.rs == MipsGPReg.R0: - return MIPS_INS_NEGU, "negu", ("rd","rt"), (True,False) - elif insn.id == MIPS_INS_NOR and insn.rt == MipsGPReg.R0: - return MIPS_INS_NOT, "not", ("rd","rs"), (True,False) - else: - return insn.id, insn.mnemonic, insn.fields, insn.writes - -def format_hex(v, signed, zeros, no_zero): - if abs(v) < 10: - if v == 0 and no_zero: - return "" - return f"{v}" - elif not signed: - return f"0x{v:{f'0{zeros}' if zeros > 0 else ''}x}" - else: - return f"{v:#x}" - -def format_vector_elem(insn, elem): - if insn.id in RSP_VECTOR_LOAD_STORES: - return f"[{elem}]" - elif (elem & 8) == 8: - return f"[{elem & 7}]" - elif (elem & 0xC) == 4: - return f"[{elem & 3}h]" - elif (elem & 0xE) == 2: - return f"[{elem & 1}q]" - else: - return "" - -mips_field_formatters = { - 'code' : (lambda insn : f'{insn.code}' if insn.code != 0 else ''), - 'cd' : (lambda insn : insn.abi.cop0_names[insn.cd]), - 'rd' : (lambda insn : insn.abi.gpr_names[insn.rd]), - 'rs' : (lambda insn : insn.abi.gpr_names[insn.rs]), - 'rt' : (lambda insn : insn.abi.gpr_names[insn.rt]), - 'fd' : (lambda insn : insn.abi.cop1_names[insn.fd]), - 'fs' : (lambda insn : insn.abi.cop1_names[insn.fs]), - 'ft' : (lambda insn : insn.abi.cop1_names[insn.ft]), - 'sa' : (lambda insn : format_hex(insn.sa, True, 0, False)), - 'op' : (lambda insn : format_hex(insn.op, False, 0, False)), - 'imm' : (lambda insn : format_hex(insn.imm, True, 0, False)), - 'offset(base)' : (lambda insn : f'{format_hex(insn.imm, True, 0, True)}({insn.abi.gpr_names[insn.base]})'), - 'offset' : (lambda insn : f'{format_hex(insn.offset, True, 0, False)}'), - 'target' : (lambda insn : f'{format_hex(insn.target, False, 0, False)}'), - 'vd' : (lambda insn : insn.abi.cop2_names[insn.vd]), - 'vs' : (lambda insn : insn.abi.cop2_names[insn.vs]), - 'vt' : (lambda insn : insn.abi.cop2_names[insn.vt]), - 'vt[e]' : (lambda insn : f"{insn.abi.cop2_names[insn.vt]}{format_vector_elem(insn, insn.elem)}"), - 'vt[ed]' : (lambda insn : f"{insn.abi.cop2_names[insn.vt]}{format_vector_elem(insn, insn.elemd)}"), - 'vd[e]' : (lambda insn : f"{insn.abi.cop2_names[insn.vd]}{format_vector_elem(insn, insn.elem)}"), - 'vd[ed]' : (lambda insn : f"{insn.abi.cop2_names[insn.vd]}{format_vector_elem(insn, insn.elemd)}"), - 'voffset' : (lambda insn : f'{format_hex(insn.voffset, True, 0, False)}'), - 'voffset(base)' : (lambda insn : f'{format_hex(insn.voffset, True, 0, True)}({insn.abi.gpr_names[insn.base]})'), - 'vc' : (lambda insn : rsp_cop2_ctrl_names[insn.vc]) -} - -class MipsInsn: - - def __init__(self, abi, raw, vaddr, values): - self.abi = abi - self.raw = raw - self.vaddr = vaddr - - if values is None: - values = MIPS_INS_INVALID, f"/* Invalid Instruction */ .4byte 0x{raw:08X}", (), () - - self.id, self.mnemonic, self.fields, self.writes = values - - # self.code = self.sa = self.op = self.cd = self.rd = self.rs = self.rt = self.fd = self.fs = self.ft = self.imm = self.offset = self.base = self.target = None - - for field in self.fields: - self.set_value(field) - - self.id, self.mnemonic, self.fields, self.writes = resolve_pseudo_insn(self) - - self.op_str = self.format_insn() - - def read_fields(self): - return [field for i,field in enumerate(self.fields) if self.writes[i] == False] - - def write_fields(self): - return [field for i,field in enumerate(self.fields) if self.writes[i] == True] - - def has_field(self, field): - return field in self.fields - - def format_field(self, field): - return mips_field_formatters[field](self) - - def format_insn(self): - return ", ".join([self.format_field(field) for field in self.fields]) - - def __str__(self): - return f"{self.mnemonic:12}{self.op_str}" - - # Field setters - - def set_code(self): - self.code = mips_get_code(self.raw, self.vaddr) - - def set_sa(self): - self.sa = mips_get_sa(self.raw, self.vaddr) - - def set_op(self): - self.op = mips_get_op(self.raw, self.vaddr) - - def set_cd(self): - self.cd = mips_get_cd(self.raw, self.vaddr) - - def set_rd(self): - self.rd = mips_get_rd(self.raw, self.vaddr) - - def set_rs(self): - self.rs = mips_get_rs(self.raw, self.vaddr) - - def set_rt(self): - self.rt = mips_get_rt(self.raw, self.vaddr) - - def set_fd(self): - self.fd = mips_get_fd(self.raw, self.vaddr) - - def set_fs(self): - self.fs = mips_get_fs(self.raw, self.vaddr) - - def set_ft(self): - self.ft = mips_get_ft(self.raw, self.vaddr) - - do_sign_extend = [ - MIPS_INS_ADDIU, MIPS_INS_SLTI, MIPS_INS_ADDI, MIPS_INS_DADDIU, - MIPS_INS_LB, MIPS_INS_LBU, - MIPS_INS_LH, MIPS_INS_LHU, - MIPS_INS_LW, MIPS_INS_LWL, MIPS_INS_LWR, MIPS_INS_LWU, - MIPS_INS_LWC1, - MIPS_INS_LD, MIPS_INS_LDL, MIPS_INS_LDR, - MIPS_INS_LDC1, - MIPS_INS_LL, MIPS_INS_LLD, - MIPS_INS_SB, - MIPS_INS_SH, - MIPS_INS_SW, MIPS_INS_SWL, MIPS_INS_SWR, - MIPS_INS_SWC1, - MIPS_INS_SD, MIPS_INS_SDL, MIPS_INS_SDR, - MIPS_INS_SDC1, - MIPS_INS_SC, MIPS_INS_SCD, - ] - - def set_imm(self): - self.imm = mips_get_imm(self.raw, self.vaddr) - if self.id in MipsInsn.do_sign_extend: # sign extended immediates - self.imm = sign_extend_16(self.imm) - - def set_offset(self): - self.offset = mips_get_offset(self.raw, self.vaddr) - - def set_base(self): - self.base = mips_get_base(self.raw, self.vaddr) - - def set_offset_base(self): - self.set_imm() - self.set_base() - - def set_target(self): - self.target = mips_get_target(self.raw, self.vaddr) - - def set_vd(self): - self.vd = mips_get_vd(self.raw, self.vaddr) - - def set_vs(self): - self.vs = mips_get_vs(self.raw, self.vaddr) - - def set_vt(self): - self.vt = mips_get_vt(self.raw, self.vaddr) - - def set_e(self): - self.elem = mips_get_elem(self.raw, self.vaddr) - - def set_ed(self): - self.elemd = mips_get_elemd(self.raw, self.vaddr) - - def set_vd_e(self): - self.set_vd() - self.set_e() - - def set_vt_ed(self): - self.set_vt() - self.set_ed() - - def set_vt_e(self): - self.set_vt() - self.set_e() - - def set_vd_ed(self): - self.set_vd() - self.set_ed() - - def set_voffset(self): - self.voffset = mips_get_voffset(self.raw, self.vaddr) - - def set_voffset_base(self): - self.set_voffset() - self.set_base() - - def set_vc(self): - self.vc = mips_get_vc(self.raw, self.vaddr) - - field_setters = { - 'code' : set_code, - 'sa' : set_sa, - 'op' : set_op, - 'cd' : set_cd, - 'rd' : set_rd, - 'rs' : set_rs, - 'rt' : set_rt, - 'fd' : set_fd, - 'fs' : set_fs, - 'ft' : set_ft, - 'imm' : set_imm, - 'offset' : set_offset, - 'base' : set_base, - 'offset(base)' : set_offset_base, - 'target' : set_target, - 'vd' : set_vd, - 'vs' : set_vs, - 'vt' : set_vt, - 'vt[e]' : set_vt_e, - 'vt[ed]' : set_vt_ed, - 'vd[e]' : set_vd_e, - 'vd[ed]' : set_vd_ed, - 'voffset' : set_voffset, - 'voffset(base)' : set_voffset_base, - 'vc' : set_vc - } - - def set_value(self, name): - MipsInsn.field_setters[name](self) - - # Field getters - - field_getters = { - 'code' : (lambda insn: insn.code), - 'sa' : (lambda insn: insn.sa), - 'op' : (lambda insn: insn.op), - 'cd' : (lambda insn: insn.cd), - 'rd' : (lambda insn: insn.rd), - 'rs' : (lambda insn: insn.rs), - 'rt' : (lambda insn: insn.rt), - 'fd' : (lambda insn: insn.fd), - 'fs' : (lambda insn: insn.fs), - 'ft' : (lambda insn: insn.ft), - 'imm' : (lambda insn: insn.imm), - 'offset' : (lambda insn: insn.offset), - 'base' : (lambda insn: insn.base), - 'offset(base)' : (lambda insn: (insn.offset, insn.base)), - 'target' : (lambda insn: insn.target), - 'vd' : (lambda insn: insn.vd), - 'vs' : (lambda insn: insn.vs), - 'vt' : (lambda insn: insn.vt), - 'vt[e]' : (lambda insn: (insn.vt, insn.elem)), - 'vt[ed]' : (lambda insn: (insn.vt, insn.elemd)), - 'vd[e]' : (lambda insn: (insn.vd, insn.elem)), - 'vd[ed]' : (lambda insn: (insn.vd, insn.elemd)), - 'voffset' : (lambda insn: insn.voffset), - 'voffset(base)' : (lambda insn: (insn.voffset, insn.base)), - 'vc' : (lambda insn: insn.vc), - } - - def value_forname(self, name): - return MipsInsn.field_getters[name](self) - -def fetch_insn(raw, vaddr, insn_set, func): - insn = insn_set.get(func(raw, vaddr), None) # default none for invalid instruction encoding - - if insn is not None and type(insn[1]) == dict: # extra decoding required - insn = fetch_insn(raw, vaddr, insn[1], insn[0]) - return insn - -def decode_insn(raw, vaddr): - return MipsInsn(ABI_VR4300, raw, vaddr, fetch_insn(raw, vaddr, mips_insns, mips_get_field)) - -def decode_rsp_insn(raw, vaddr): - return MipsInsn(ABI_RSP, raw, vaddr, fetch_insn(raw, vaddr, rsp_insns, mips_get_field)) - -mips_insns = { - 0b000000: (mips_get_special, { - # opcode id mnemonic fields field is written to - 0b000000: (MIPS_INS_SLL, "sll", ("rd","rt","sa"), (True , False, False)), - 0b000010: (MIPS_INS_SRL, "srl", ("rd","rt","sa"), (True , False, False)), - 0b000011: (MIPS_INS_SRA, "sra", ("rd","rt","sa"), (True , False, False)), - 0b000100: (MIPS_INS_SLLV, "sllv", ("rd","rt","rs"), (True , False, False)), - 0b000110: (MIPS_INS_SRLV, "srlv", ("rd","rt","rs"), (True , False, False)), - 0b000111: (MIPS_INS_SRAV, "srav", ("rd","rt","rs"), (True , False, False)), - 0b001000: (MIPS_INS_JR, "jr", ("rs", ), (False, )), - 0b001001: (MIPS_INS_JALR, "jalr", ("rs", ), (False, )), # technically also rd but it's always $ra - 0b001100: (MIPS_INS_SYSCALL, "syscall", ( ), ( )), - 0b001101: (MIPS_INS_BREAK, "break", ("code", ), (False, )), - 0b001111: (MIPS_INS_SYNC, "sync", ( ), ( )), - 0b010000: (MIPS_INS_MFHI, "mfhi", ("rd", ), (True , )), - 0b010001: (MIPS_INS_MTHI, "mthi", ("rs", ), (False, )), - 0b010010: (MIPS_INS_MFLO, "mflo", ("rd", ), (True , )), - 0b010011: (MIPS_INS_MTLO, "mtlo", ("rs", ), (False, )), - 0b010100: (MIPS_INS_DSLLV, "dsllv", ("rd","rt","rs"), (True , False, False)), - 0b010110: (MIPS_INS_DSRLV, "dsrlv", ("rd","rt","rs"), (True , False, False)), - 0b010111: (MIPS_INS_DSRAV, "dsrav", ("rd","rt","rs"), (True , False, False)), - 0b011000: (MIPS_INS_MULT, "mult", ("rs","rt" ), (False, False )), - 0b011001: (MIPS_INS_MULTU, "multu", ("rs","rt" ), (False, False )), - 0b011010: (MIPS_INS_DIV, "div", ("rd","rs","rt"), (False, False, False)), # for some reason gas hates div instructions - 0b011011: (MIPS_INS_DIVU, "divu", ("rd","rs","rt"), (False, False, False)), # with the correct number of operands - 0b011100: (MIPS_INS_DMULT, "dmult", ("rs","rt" ), (False, False )), - 0b011101: (MIPS_INS_DMULTU, "dmultu", ("rs","rt" ), (False, False )), - 0b011110: (MIPS_INS_DDIV, "ddiv", ("rd","rs","rt"), (False, False, False)), - 0b011111: (MIPS_INS_DDIVU, "ddivu", ("rd","rs","rt"), (False, False, False)), - 0b100000: (MIPS_INS_ADD, "add", ("rd","rs","rt"), (True , False, False)), - 0b100001: (MIPS_INS_ADDU, "addu", ("rd","rs","rt"), (True , False, False)), - 0b100010: (MIPS_INS_SUB, "sub", ("rd","rs","rt"), (True , False, False)), - 0b100011: (MIPS_INS_SUBU, "subu", ("rd","rs","rt"), (True , False, False)), - 0b100100: (MIPS_INS_AND, "and", ("rd","rs","rt"), (True , False, False)), - 0b100101: (MIPS_INS_OR, "or", ("rd","rs","rt"), (True , False, False)), - 0b100110: (MIPS_INS_XOR, "xor", ("rd","rs","rt"), (True , False, False)), - 0b100111: (MIPS_INS_NOR, "nor", ("rd","rs","rt"), (True , False, False)), - 0b101010: (MIPS_INS_SLT, "slt", ("rd","rs","rt"), (True , False, False)), - 0b101011: (MIPS_INS_SLTU, "sltu", ("rd","rs","rt"), (True , False, False)), - 0b101100: (MIPS_INS_DADD, "dadd", ("rd","rs","rt"), (True , False, False)), - 0b101101: (MIPS_INS_DADDU, "daddu", ("rd","rs","rt"), (True , False, False)), - 0b101110: (MIPS_INS_DSUB, "dsub", ("rd","rs","rt"), (True , False, False)), - 0b101111: (MIPS_INS_DSUBU, "dsubu", ("rd","rs","rt"), (True , False, False)), - 0b110000: (MIPS_INS_TGE, "tge", ("rs","rt" ), (False, False )), - 0b110001: (MIPS_INS_TGEU, "tgeu", ("rs","rt" ), (False, False )), - 0b110010: (MIPS_INS_TLT, "tlt", ("rs","rt" ), (False, False )), - 0b110011: (MIPS_INS_TLTU, "tltu", ("rs","rt" ), (False, False )), - 0b110100: (MIPS_INS_TEQ, "teq", ("rs","rt" ), (False, False )), - 0b110110: (MIPS_INS_TNE, "tne", ("rs","rt" ), (False, False )), - 0b111000: (MIPS_INS_DSLL, "dsll", ("rd","rt","sa"), (True , False, False)), - 0b111010: (MIPS_INS_DSRL, "dsrl", ("rd","rt","sa"), (True , False, False)), - 0b111011: (MIPS_INS_DSRA, "dsra", ("rd","rt","sa"), (True , False, False)), - 0b111100: (MIPS_INS_DSLL32, "dsll32", ("rd","rt","sa"), (True , False, False)), - 0b111110: (MIPS_INS_DSRL32, "dsrl32", ("rd","rt","sa"), (True , False, False)), - 0b111111: (MIPS_INS_DSRA32, "dsra32", ("rd","rt","sa"), (True , False, False)), - }), - 0b000001: (mips_get_regimm, { - 0b00000: (MIPS_INS_BLTZ, "bltz", ("rs","offset"), (False, False)), - 0b00001: (MIPS_INS_BGEZ, "bgez", ("rs","offset"), (False, False)), - 0b00010: (MIPS_INS_BLTZL, "bltzl", ("rs","offset"), (False, False)), - 0b00011: (MIPS_INS_BGEZL, "bgezl", ("rs","offset"), (False, False)), - 0b01000: (MIPS_INS_TGEI, "tgei", ("rs","imm" ), (False, False)), - 0b01001: (MIPS_INS_TGEIU, "tgeiu", ("rs","imm" ), (False, False)), - 0b01010: (MIPS_INS_TLTI, "tlti", ("rs","imm" ), (False, False)), - 0b01011: (MIPS_INS_TLTIU, "tltiu", ("rs","imm" ), (False, False)), - 0b01100: (MIPS_INS_TEQI, "teqi", ("rs","imm" ), (False, False)), - 0b01110: (MIPS_INS_TNEI, "tnei", ("rs","imm" ), (False, False)), - 0b10000: (MIPS_INS_BLTZAL, "bltzal", ("rs","offset"), (False, False)), - 0b10001: (MIPS_INS_BGEZAL, "bgezal", ("rs","offset"), (False, False)), - 0b10010: (MIPS_INS_BLTZALL, "bltzall", ("rs","offset"), (False, False)), - 0b10011: (MIPS_INS_BGEZALL, "bgezall", ("rs","offset"), (False, False)), - }), - 0b000010: (MIPS_INS_J, "j", ("target", ), (False, )), - 0b000011: (MIPS_INS_JAL, "jal", ("target", ), (False, )), - 0b000100: (MIPS_INS_BEQ, "beq", ("rs","rt","offset"), (False, False, False)), - 0b000101: (MIPS_INS_BNE, "bne", ("rs","rt","offset"), (False, False, False)), - 0b000110: (MIPS_INS_BLEZ, "blez", ("rs","offset" ), (False, False, )), - 0b000111: (MIPS_INS_BGTZ, "bgtz", ("rs","offset" ), (False, False, )), - 0b001000: (MIPS_INS_ADDI, "addi", ("rt","rs","imm" ), (True , False, False)), - 0b001001: (MIPS_INS_ADDIU, "addiu", ("rt","rs","imm" ), (True , False, False)), - 0b001010: (MIPS_INS_SLTI, "slti", ("rt","rs","imm" ), (True , False, False)), - 0b001011: (MIPS_INS_SLTIU, "sltiu", ("rt","rs","imm" ), (True , False, False)), - 0b001100: (MIPS_INS_ANDI, "andi", ("rt","rs","imm" ), (True , False, False)), - 0b001101: (MIPS_INS_ORI, "ori", ("rt","rs","imm" ), (True , False, False)), - 0b001110: (MIPS_INS_XORI, "xori", ("rt","rs","imm" ), (True , False, False)), - 0b001111: (MIPS_INS_LUI, "lui", ("rt","imm" ), (True , False )), - 0b010000: (mips_get_cop0, { - 0b00000: (MIPS_INS_MFC0, "mfc0", ("rt","cd"), (True , False)), - 0b00100: (MIPS_INS_MTC0, "mtc0", ("rt","cd"), (False, True )), - 0b10000: (mips_get_tlb, { - 0b000001: (MIPS_INS_TLBR, "tlbr", (), ()), - 0b000010: (MIPS_INS_TLBWI, "tlbwi", (), ()), - 0b000110: (MIPS_INS_TLBWR, "tlbwr", (), ()), - 0b001000: (MIPS_INS_TLBP, "tlbp", (), ()), - 0b011000: (MIPS_INS_ERET, "eret", (), ()), - }), - }), - 0b010001: (mips_get_cop1, { - 0b00000: (MIPS_INS_MFC1, "mfc1", ("rt","fs"), (True , False)), - 0b00001: (MIPS_INS_DMFC1, "dmfc1", ("rt","fs"), (True , False)), - 0b00010: (MIPS_INS_CFC1, "cfc1", ("rt","fs"), (True , False)), - 0b00100: (MIPS_INS_MTC1, "mtc1", ("rt","fs"), (False, True )), - 0b00101: (MIPS_INS_DMTC1, "dmtc1", ("rt","fs"), (False, True )), - 0b00110: (MIPS_INS_CTC1, "ctc1", ("rt","fs"), (False, True )), - 0b01000: (mips_get_ndtf, { - 0b00: (MIPS_INS_BC1F, "bc1f", ("offset",), (False,)), - 0b01: (MIPS_INS_BC1T, "bc1t", ("offset",), (False,)), - 0b10: (MIPS_INS_BC1FL, "bc1fl", ("offset",), (False,)), - 0b11: (MIPS_INS_BC1TL, "bc1tl", ("offset",), (False,)), - }), - 0b010000: (mips_get_function, { - 0b000000: (MIPS_INS_ADD_S, "add.s", ("fd","fs","ft"), (True , False, False)), - 0b000001: (MIPS_INS_SUB_S, "sub.s", ("fd","fs","ft"), (True , False, False)), - 0b000010: (MIPS_INS_MUL_S, "mul.s", ("fd","fs","ft"), (True , False, False)), - 0b000011: (MIPS_INS_DIV_S, "div.s", ("fd","fs","ft"), (True , False, False)), - 0b000100: (MIPS_INS_SQRT_S, "sqrt.s", ("fd","fs" ), (True , False )), - 0b000101: (MIPS_INS_ABS_S, "abs.s", ("fd","fs" ), (True , False )), - 0b000110: (MIPS_INS_MOV_S, "mov.s", ("fd","fs" ), (True , False )), - 0b000111: (MIPS_INS_NEG_S, "neg.s", ("fd","fs" ), (True , False )), - 0b001000: (MIPS_INS_ROUND_L_S, "round.l.s", ("fd","fs" ), (True , False )), - 0b001001: (MIPS_INS_TRUNC_L_S, "trunc.l.s", ("fd","fs" ), (True , False )), - 0b001010: (MIPS_INS_CEIL_L_S, "ceil.l.s", ("fd","fs" ), (True , False )), - 0b001011: (MIPS_INS_FLOOR_L_S, "floor.l.s", ("fd","fs" ), (True , False )), - 0b001100: (MIPS_INS_ROUND_W_S, "round.w.s", ("fd","fs" ), (True , False )), - 0b001101: (MIPS_INS_TRUNC_W_S, "trunc.w.s", ("fd","fs" ), (True , False )), - 0b001110: (MIPS_INS_CEIL_W_S, "ceil.w.s", ("fd","fs" ), (True , False )), - 0b001111: (MIPS_INS_FLOOR_W_S, "floor.w.s", ("fd","fs" ), (True , False )), - 0b100001: (MIPS_INS_CVT_D_S, "cvt.d.s", ("fd","fs" ), (True , False )), - 0b100100: (MIPS_INS_CVT_W_S, "cvt.w.s", ("fd","fs" ), (True , False )), - 0b100101: (MIPS_INS_CVT_L_S, "cvt.l.s", ("fd","fs" ), (True , False )), - 0b110000: (MIPS_INS_C_F_S, "c.f.s", ("fs","ft" ), (False, False )), - 0b110001: (MIPS_INS_C_UN_S, "c.un.s", ("fs","ft" ), (False, False )), - 0b110010: (MIPS_INS_C_EQ_S, "c.eq.s", ("fs","ft" ), (False, False )), - 0b110011: (MIPS_INS_C_UEQ_S, "c.ueq.s", ("fs","ft" ), (False, False )), - 0b110100: (MIPS_INS_C_OLT_S, "c.olt.s", ("fs","ft" ), (False, False )), - 0b110101: (MIPS_INS_C_ULT_S, "c.ult.s", ("fs","ft" ), (False, False )), - 0b110110: (MIPS_INS_C_OLE_S, "c.ole.s", ("fs","ft" ), (False, False )), - 0b110111: (MIPS_INS_C_ULE_S, "c.ule.s", ("fs","ft" ), (False, False )), - 0b111000: (MIPS_INS_C_SF_S, "c.sf.s", ("fs","ft" ), (False, False )), - 0b111001: (MIPS_INS_C_NGLE_S, "c.ngle.s", ("fs","ft" ), (False, False )), - 0b111010: (MIPS_INS_C_SEQ_S, "c.seq.s", ("fs","ft" ), (False, False )), - 0b111011: (MIPS_INS_C_NGL_S, "c.ngl.s", ("fs","ft" ), (False, False )), - 0b111100: (MIPS_INS_C_LT_S, "c.lt.s", ("fs","ft" ), (False, False )), - 0b111101: (MIPS_INS_C_NGE_S, "c.nge.s", ("fs","ft" ), (False, False )), - 0b111110: (MIPS_INS_C_LE_S, "c.le.s", ("fs","ft" ), (False, False )), - 0b111111: (MIPS_INS_C_NGT_S, "c.ngt.s", ("fs","ft" ), (False, False )), - }), - 0b010001: (mips_get_function, { - 0b000000: (MIPS_INS_ADD_D, "add.d", ("fd","fs","ft"), (True , False, False)), - 0b000001: (MIPS_INS_SUB_D, "sub.d", ("fd","fs","ft"), (True , False, False)), - 0b000010: (MIPS_INS_MUL_D, "mul.d", ("fd","fs","ft"), (True , False, False)), - 0b000011: (MIPS_INS_DIV_D, "div.d", ("fd","fs","ft"), (True , False, False)), - 0b000100: (MIPS_INS_SQRT_D, "sqrt.d", ("fd","fs" ), (True , False )), - 0b000101: (MIPS_INS_ABS_D, "abs.d", ("fd","fs" ), (True , False )), - 0b000110: (MIPS_INS_MOV_D, "mov.d", ("fd","fs" ), (True , False )), - 0b000111: (MIPS_INS_NEG_D, "neg.d", ("fd","fs" ), (True , False )), - 0b001000: (MIPS_INS_ROUND_L_D, "round.l.d", ("fd","fs" ), (True , False )), - 0b001001: (MIPS_INS_TRUNC_L_D, "trunc.l.d", ("fd","fs" ), (True , False )), - 0b001010: (MIPS_INS_CEIL_L_D, "ceil.l.d", ("fd","fs" ), (True , False )), - 0b001011: (MIPS_INS_FLOOR_L_D, "floor.l.d", ("fd","fs" ), (True , False )), - 0b001100: (MIPS_INS_ROUND_W_D, "round.w.d", ("fd","fs" ), (True , False )), - 0b001101: (MIPS_INS_TRUNC_W_D, "trunc.w.d", ("fd","fs" ), (True , False )), - 0b001110: (MIPS_INS_CEIL_W_D, "ceil.w.d", ("fd","fs" ), (True , False )), - 0b001111: (MIPS_INS_FLOOR_W_D, "floor.w.d", ("fd","fs" ), (True , False )), - 0b100000: (MIPS_INS_CVT_S_D, "cvt.s.d", ("fd","fs" ), (True , False )), - 0b100100: (MIPS_INS_CVT_W_D, "cvt.w.d", ("fd","fs" ), (True , False )), - 0b100101: (MIPS_INS_CVT_L_D, "cvt.l.d", ("fd","fs" ), (True , False )), - 0b110000: (MIPS_INS_C_F_D, "c.f.d", ("fs","ft" ), (False, False )), - 0b110001: (MIPS_INS_C_UN_D, "c.un.d", ("fs","ft" ), (False, False )), - 0b110010: (MIPS_INS_C_EQ_D, "c.eq.d", ("fs","ft" ), (False, False )), - 0b110011: (MIPS_INS_C_UEQ_D, "c.ueq.d", ("fs","ft" ), (False, False )), - 0b110100: (MIPS_INS_C_OLT_D, "c.olt.d", ("fs","ft" ), (False, False )), - 0b110101: (MIPS_INS_C_ULT_D, "c.ult.d", ("fs","ft" ), (False, False )), - 0b110110: (MIPS_INS_C_OLE_D, "c.ole.d", ("fs","ft" ), (False, False )), - 0b110111: (MIPS_INS_C_ULE_D, "c.ule.d", ("fs","ft" ), (False, False )), - 0b111000: (MIPS_INS_C_SF_D, "c.sf.d", ("fs","ft" ), (False, False )), - 0b111001: (MIPS_INS_C_NGLE_D, "c.ngle.d", ("fs","ft" ), (False, False )), - 0b111010: (MIPS_INS_C_SEQ_D, "c.seq.d", ("fs","ft" ), (False, False )), - 0b111011: (MIPS_INS_C_NGL_D, "c.ngl.d", ("fs","ft" ), (False, False )), - 0b111100: (MIPS_INS_C_LT_D, "c.lt.d", ("fs","ft" ), (False, False )), - 0b111101: (MIPS_INS_C_NGE_D, "c.nge.d", ("fs","ft" ), (False, False )), - 0b111110: (MIPS_INS_C_LE_D, "c.le.d", ("fs","ft" ), (False, False )), - 0b111111: (MIPS_INS_C_NGT_D, "c.ngt.d", ("fs","ft" ), (False, False )), - }), - 0b010100: (mips_get_function, { - 0b100000: (MIPS_INS_CVT_S_W, "cvt.s.w", ("fd","fs"), (True , False)), - 0b100001: (MIPS_INS_CVT_D_W, "cvt.d.w", ("fd","fs"), (True , False)), - }), - 0b010101: (mips_get_function, { - 0b100000: (MIPS_INS_CVT_S_L, "cvt.s.l", ("fd","fs"), (True , False)), - 0b100001: (MIPS_INS_CVT_D_L, "cvt.d.l", ("fd","fs"), (True , False)), - }), - }), - 0b010100: (MIPS_INS_BEQL, "beql", ("rs","rt","offset" ), (False, False, False)), - 0b010101: (MIPS_INS_BNEL, "bnel", ("rs","rt","offset" ), (False, False, False)), - 0b010110: (MIPS_INS_BLEZL, "blezl", ("rs","offset" ), (False, False )), - 0b010111: (MIPS_INS_BGTZL, "bgtzl", ("rs","offset" ), (False, False )), - 0b011000: (MIPS_INS_DADDI, "daddi", ("rt","rs","imm" ), (True , False, False)), - 0b011001: (MIPS_INS_DADDIU, "daddiu", ("rt","rs","imm" ), (True , False, False)), - 0b011010: (MIPS_INS_LDL, "ldl", ("rt","offset(base)"), (True , False )), - 0b011011: (MIPS_INS_LDR, "ldr", ("rt","offset(base)"), (True , False )), - 0b100000: (MIPS_INS_LB, "lb", ("rt","offset(base)"), (True , False )), - 0b100001: (MIPS_INS_LH, "lh", ("rt","offset(base)"), (True , False )), - 0b100010: (MIPS_INS_LWL, "lwl", ("rt","offset(base)"), (True , False )), - 0b100011: (MIPS_INS_LW, "lw", ("rt","offset(base)"), (True , False )), - 0b100100: (MIPS_INS_LBU, "lbu", ("rt","offset(base)"), (True , False )), - 0b100101: (MIPS_INS_LHU, "lhu", ("rt","offset(base)"), (True , False )), - 0b100110: (MIPS_INS_LWR, "lwr", ("rt","offset(base)"), (True , False )), - 0b100111: (MIPS_INS_LWU, "lwu", ("rt","offset(base)"), (True , False )), - 0b101000: (MIPS_INS_SB, "sb", ("rt","offset(base)"), (False, False )), - 0b101001: (MIPS_INS_SH, "sh", ("rt","offset(base)"), (False, False )), - 0b101010: (MIPS_INS_SWL, "swl", ("rt","offset(base)"), (False, False )), - 0b101011: (MIPS_INS_SW, "sw", ("rt","offset(base)"), (False, False )), - 0b101100: (MIPS_INS_SDL, "sdl", ("rt","offset(base)"), (False, False )), - 0b101101: (MIPS_INS_SDR, "sdr", ("rt","offset(base)"), (False, False )), - 0b101110: (MIPS_INS_SWR, "swr", ("rt","offset(base)"), (False, False )), - 0b101111: (MIPS_INS_CACHE, "cache", ("op","offset(base)"), (False, False, False)), - 0b110000: (MIPS_INS_LL, "ll", ("rt","offset(base)"), (True , False )), - 0b110001: (MIPS_INS_LWC1, "lwc1", ("ft","offset(base)"), (True , False )), - # lwc2 - 0b110100: (MIPS_INS_LLD, "lld", ("rt","offset(base)"), (True , False )), - 0b110101: (MIPS_INS_LDC1, "ldc1", ("ft","offset(base)"), (True , False )), - # ldc2 - 0b110111: (MIPS_INS_LD, "ld", ("rt","offset(base)"), (True , False )), - 0b111000: (MIPS_INS_SC, "sc", ("rt","offset(base)"), (False, False )), - 0b111001: (MIPS_INS_SWC1, "swc1", ("ft","offset(base)"), (False, False )), - # lwc2 - 0b111100: (MIPS_INS_SCD, "scd", ("rt","offset(base)"), (False, False )), - 0b111101: (MIPS_INS_SDC1, "sdc1", ("ft","offset(base)"), (False, False )), - # sdc2 - 0b111111: (MIPS_INS_SD, "sd", ("rt","offset(base)"), (False, False )), -} - -rsp_insns = { - 0b000000: (mips_get_special, { - # opcode id mnemonic fields field is written to - 0b000000: (MIPS_INS_SLL, "sll", ("rd","rt","sa"), (True , False, False)), - 0b000010: (MIPS_INS_SRL, "srl", ("rd","rt","sa"), (True , False, False)), - 0b000011: (MIPS_INS_SRA, "sra", ("rd","rt","sa"), (True , False, False)), - 0b000100: (MIPS_INS_SLLV, "sllv", ("rd","rt","rs"), (True , False, False)), - 0b000110: (MIPS_INS_SRLV, "srlv", ("rd","rt","rs"), (True , False, False)), - 0b000111: (MIPS_INS_SRAV, "srav", ("rd","rt","rs"), (True , False, False)), - 0b001000: (MIPS_INS_JR, "jr", ("rs", ), (False, )), - 0b001001: (MIPS_INS_JALR, "jalr", ("rs", ), (False, )), # technically also rd but it's always $ra - 0b001101: (MIPS_INS_BREAK, "break", ("code", ), (False, )), - 0b100000: (MIPS_INS_ADD, "add", ("rd","rs","rt"), (True , False, False)), - 0b100001: (MIPS_INS_ADDU, "addu", ("rd","rs","rt"), (True , False, False)), - 0b100010: (MIPS_INS_SUB, "sub", ("rd","rs","rt"), (True , False, False)), - 0b100011: (MIPS_INS_SUBU, "subu", ("rd","rs","rt"), (True , False, False)), - 0b100100: (MIPS_INS_AND, "and", ("rd","rs","rt"), (True , False, False)), - 0b100101: (MIPS_INS_OR, "or", ("rd","rs","rt"), (True , False, False)), - 0b100110: (MIPS_INS_XOR, "xor", ("rd","rs","rt"), (True , False, False)), - 0b100111: (MIPS_INS_NOR, "nor", ("rd","rs","rt"), (True , False, False)), - 0b101010: (MIPS_INS_SLT, "slt", ("rd","rs","rt"), (True , False, False)), - 0b101011: (MIPS_INS_SLTU, "sltu", ("rd","rs","rt"), (True , False, False)), - }), - 0b000001: (mips_get_regimm, { - 0b00000: (MIPS_INS_BLTZ, "bltz", ("rs","offset"), (False, False)), - 0b00001: (MIPS_INS_BGEZ, "bgez", ("rs","offset"), (False, False)), - 0b10000: (MIPS_INS_BLTZAL, "bltzal", ("rs","offset"), (False, False)), - 0b10001: (MIPS_INS_BGEZAL, "bgezal", ("rs","offset"), (False, False)), - }), - 0b000010: (MIPS_INS_J, "j", ("target", ), (False, )), - 0b000011: (MIPS_INS_JAL, "jal", ("target", ), (False, )), - 0b000100: (MIPS_INS_BEQ, "beq", ("rs","rt","offset"), (False, False, False)), - 0b000101: (MIPS_INS_BNE, "bne", ("rs","rt","offset"), (False, False, False)), - 0b000110: (MIPS_INS_BLEZ, "blez", ("rs","offset" ), (False, False )), - 0b000111: (MIPS_INS_BGTZ, "bgtz", ("rs","offset" ), (False, False )), - 0b001000: (MIPS_INS_ADDI, "addi", ("rt","rs","imm" ), (True , False, False)), - 0b001001: (MIPS_INS_ADDIU, "addiu", ("rt","rs","imm" ), (True , False, False)), - 0b001010: (MIPS_INS_SLTI, "slti", ("rt","rs","imm" ), (True , False, False)), - 0b001011: (MIPS_INS_SLTIU, "sltiu", ("rt","rs","imm" ), (True , False, False)), - 0b001100: (MIPS_INS_ANDI, "andi", ("rt","rs","imm" ), (True , False, False)), - 0b001101: (MIPS_INS_ORI, "ori", ("rt","rs","imm" ), (True , False, False)), - 0b001110: (MIPS_INS_XORI, "xori", ("rt","rs","imm" ), (True , False, False)), - 0b001111: (MIPS_INS_LUI, "lui", ("rt","imm" ), (True , False )), - 0b010000: (mips_get_cop0, { - 0b00000: (MIPS_INS_MFC0, "mfc0", ("rt","cd"), (True , False)), - 0b00100: (MIPS_INS_MTC0, "mtc0", ("rt","cd"), (False, True )), - }), - 0b010010: (mips_get_cop2_func, { # TODO this encoding got ugly, move to a mask matcher like gnu objdump - 0b0: (mips_get_cop2, { - 0b0000: (MIPS_INS_MFC2, "mfc2", ("rt", "vd[e]"), (True , False)), - 0b0100: (MIPS_INS_MTC2, "mtc2", ("rt", "vd[e]"), (False, True )), - 0b0010: (MIPS_INS_CFC2, "cfc2", ("rt", "vc" ), (True , False)), - 0b0110: (MIPS_INS_CTC2, "ctc2", ("rt", "vc" ), (False, True )), - }), - 0b1: (mips_get_function, { - 0b000000: (MIPS_INS_VMULF, "vmulf", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b000001: (MIPS_INS_VMULU, "vmulu", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b000010: (MIPS_INS_VRNDP, "vrndp", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b000011: (MIPS_INS_VMULQ, "vmulq", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b000100: (MIPS_INS_VMUDL, "vmudl", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b000101: (MIPS_INS_VMUDM, "vmudm", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b000110: (MIPS_INS_VMUDN, "vmudn", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b000111: (MIPS_INS_VMUDH, "vmudh", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b001000: (MIPS_INS_VMACF, "vmacf", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b001001: (MIPS_INS_VMACU, "vmacu", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b001010: (MIPS_INS_VRNDN, "vrndn", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b001011: (MIPS_INS_VMACQ, "vmacq", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b001100: (MIPS_INS_VMADL, "vmadl", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b001101: (MIPS_INS_VMADM, "vmadm", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b001110: (MIPS_INS_VMADN, "vmadn", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b001111: (MIPS_INS_VMADH, "vmadh", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b010000: (MIPS_INS_VADD, "vadd", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b010001: (MIPS_INS_VSUB, "vsub", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b010011: (MIPS_INS_VABS, "vabs", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b010100: (MIPS_INS_VADDC, "vaddc", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b010101: (MIPS_INS_VSUBC, "vsubc", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b011101: (MIPS_INS_VSAR, "vsar", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b100000: (MIPS_INS_VLT, "vlt", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b100001: (MIPS_INS_VEQ, "veq", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b100010: (MIPS_INS_VNE, "vne", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b100011: (MIPS_INS_VGE, "vge", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b100100: (MIPS_INS_VCL, "vcl", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b100101: (MIPS_INS_VCH, "vch", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b100110: (MIPS_INS_VCR, "vcr", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b100111: (MIPS_INS_VMRG, "vmrg", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b101000: (MIPS_INS_VAND, "vand", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b101001: (MIPS_INS_VNAND, "vnand", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b101010: (MIPS_INS_VOR, "vor", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b101011: (MIPS_INS_VNOR, "vnor", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b101100: (MIPS_INS_VXOR, "vxor", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b101101: (MIPS_INS_VNXOR, "vnxor", ("vd", "vs", "vt[e]"), (True , False, False)), - 0b110000: (MIPS_INS_VRCP, "vrcp", ("vd[ed]", "vt[e]" ), (True , False)), - 0b110001: (MIPS_INS_VRCPL, "vrcpl", ("vd[ed]", "vt[e]" ), (True , False)), - 0b110010: (MIPS_INS_VRCPH, "vrcph", ("vd[ed]", "vt[e]" ), (True , False)), - 0b110011: (MIPS_INS_VMOV, "vmov", ("vd[ed]", "vt[e]" ), (True , False)), - 0b110100: (MIPS_INS_VRSQ, "vrsq", ("vd[ed]", "vt[e]" ), (True , False)), - 0b110101: (MIPS_INS_VRSQL, "vrsql", ("vd[ed]", "vt[e]" ), (True , False)), - 0b110110: (MIPS_INS_VRSQH, "vrsqh", ("vd[ed]", "vt[e]" ), (True , False)), - 0b110111: (MIPS_INS_VNOP, "vnop", ( ), ()), - }), - }), - 0b100000: (MIPS_INS_LB, "lb", ("rt","offset(base)"), (True , False)), - 0b100001: (MIPS_INS_LH, "lh", ("rt","offset(base)"), (True , False)), - 0b100011: (MIPS_INS_LW, "lw", ("rt","offset(base)"), (True , False)), - 0b100100: (MIPS_INS_LBU, "lbu", ("rt","offset(base)"), (True , False)), - 0b100101: (MIPS_INS_LHU, "lhu", ("rt","offset(base)"), (True , False)), - 0b101000: (MIPS_INS_SB, "sb", ("rt","offset(base)"), (False, False)), - 0b101001: (MIPS_INS_SH, "sh", ("rt","offset(base)"), (False, False)), - 0b101011: (MIPS_INS_SW, "sw", ("rt","offset(base)"), (False, False)), - 0b110010: (mips_get_lwc2, { - 0b00000: (MIPS_INS_LBV, "lbv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b00001: (MIPS_INS_LSV, "lsv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b00010: (MIPS_INS_LLV, "llv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b00011: (MIPS_INS_LDV, "ldv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b00100: (MIPS_INS_LQV, "lqv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b00101: (MIPS_INS_LRV, "lrv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b00110: (MIPS_INS_LPV, "lpv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b00111: (MIPS_INS_LUV, "luv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b01000: (MIPS_INS_LHV, "lhv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b01001: (MIPS_INS_LFV, "lfv", ("vt[ed]", "voffset(base)"), (True , False)), - 0b01011: (MIPS_INS_LTV, "ltv", ("vt[ed]", "voffset(base)"), (True , False)), - }), - 0b111010: (mips_get_swc2, { - 0b00000: (MIPS_INS_SBV, "sbv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b00001: (MIPS_INS_SSV, "ssv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b00010: (MIPS_INS_SLV, "slv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b00011: (MIPS_INS_SDV, "sdv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b00100: (MIPS_INS_SQV, "sqv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b00101: (MIPS_INS_SRV, "srv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b00110: (MIPS_INS_SPV, "spv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b00111: (MIPS_INS_SUV, "suv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b01000: (MIPS_INS_SHV, "shv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b01001: (MIPS_INS_SFV, "sfv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b01010: (MIPS_INS_SWV, "swv", ("vt[ed]", "voffset(base)"), (False, False)), - 0b01011: (MIPS_INS_STV, "stv", ("vt[ed]", "voffset(base)"), (False, False)), - }), -} diff --git a/tools/patch_ar_meta.py b/tools/patch_ar_meta.py deleted file mode 100755 index d831785..0000000 --- a/tools/patch_ar_meta.py +++ /dev/null @@ -1,90 +0,0 @@ -#!/usr/bin/env python3 -# -# Patch metadata in .ar files -# - -import argparse - -def ar_patch(ar, original, new_uid, new_gid, new_filemode): - """ - AR file headers - - Offset Length Name Format - 0 16 File identifier ASCII - 16 12 File modification timestamp (in seconds) Decimal - 28 6 Owner ID Decimal - 34 6 Group ID Decimal - 40 8 File mode (type and permission) Octal - 48 10 File size in bytes Decimal - 58 2 Ending characters 0x60 0x0A - """ - assert len(ar) > 0x24 , "Got empty archive?" - - armap_time1 = None - armap_time2 = None - - i = 8 - while i < len(original): - file_name = original[i:][0:][:16].decode("ASCII") - file_size = int(original[i:][48:][:10].decode("ASCII").strip()) - end = original[i:][58:][:2].decode("ASCII") - - assert end == "`\n" - - if file_name.strip() == "/": - armap_time1 = original[i+16:i+16+12] - elif file_name.strip() == "//": - armap_time2 = original[i+16:i+16+12] - - if file_size % 2 != 0: - file_size += 1 - i += file_size + 60 - - assert armap_time1 is not None - assert armap_time2 is not None - - i = 8 - while i < len(ar): - file_name = ar[i:][0:][:16].decode("ASCII") - file_size = int(ar[i:][48:][:10].decode("ASCII").strip()) - end = ar[i:][58:][:2].decode("ASCII") - - assert end == "`\n" - - if file_name.strip() == "/": - ar[i+16:i+16+12] = armap_time1 - elif file_name.strip() == "//": - ar[i+16:i+16+12] = armap_time2 - else: - ar[i+28:i+28+6] = f"{new_uid:<6}".encode("ASCII")[:6] - ar[i+34:i+34+6] = f"{new_gid:<6}".encode("ASCII")[:6] - ar[i+40:i+40+8] = f"{new_filemode:<8}".encode("ASCII")[:8] - - if file_size % 2 != 0: - file_size += 1 - i += file_size + 60 - -def main(): - parser = argparse.ArgumentParser(description="Patch metadata in .a files.") - parser.add_argument("target", help="path to the ar file to patch") - parser.add_argument("original", help="path to the original ar file") - parser.add_argument("uid", help="new uid") - parser.add_argument("gid", help="new gid") - parser.add_argument("filemode", help="new filemode") - args = parser.parse_args() - - ar = None - with open(args.target, "rb") as ar_file: - ar = bytearray(ar_file.read()) - - original = None - with open(args.original, "rb") as original_ar_file: - original = bytearray(original_ar_file.read()) - - ar_patch(ar, original, args.uid, args.gid, args.filemode) - - with open(args.target, "wb") as ar_file: - ar_file.write(ar) - -if __name__ == '__main__': - main() diff --git a/tools/print_mdebug.py b/tools/print_mdebug.py deleted file mode 100755 index e0b295a..0000000 --- a/tools/print_mdebug.py +++ /dev/null @@ -1,589 +0,0 @@ -#!/usr/bin/env python3 -''' -Resources: -http://www.cs.unibo.it/~solmi/teaching/arch_2002-2003/AssemblyLanguageProgDoc.pdf -https://github.com/pathscale/binutils/blob/5c2c133020e41fc4aadd80a99156d2cea4754b96/include/coff/sym.h -https://github.com/pathscale/binutils/blob/5c2c133020e41fc4aadd80a99156d2cea4754b96/include/coff/symconst.h -https://github.com/pathscale/binutils/blob/5c2c133020e41fc4aadd80a99156d2cea4754b96/gas/ecoff.c -https://github.com/pathscale/binutils/blob/5c2c133020e41fc4aadd80a99156d2cea4754b96/bfd/ecoff.c -https://github.com/pathscale/absoft/blob/master/svn/trunk/ekopath-gcc/ekopath-gcc-4.2.0/gcc/mips-tdump.c -https://chromium.googlesource.com/native_client/nacl-toolchain/+/refs/tags/gcc-4.4.3/binutils/gas/ecoff.c -https://android.googlesource.com/toolchain/binutils/+/refs/heads/donut/binutils-2.17/bfd/ecofflink.c -https://kernel.googlesource.com/pub/scm/linux/kernel/git/hjl/binutils/+/hjl/secondary/include/coff/symconst.h -https://c0de.pw/bg/binutils-gdb/blob/cdbf20f73486c66e24f322400eba877eb534ae51/gdb/mdebugread.c -''' - -import os -import struct -import collections -import sys - -OFFSET = 0 # TODO why are the offsets in the symbolic header off by some amount? - -indent_level = 0 -is_comment = False - -symbol_type_list = [ - 'stNil', 'stGlobal', 'stStatic', 'stParam', 'stLocal', 'stLabel', 'stProc', 'stBlock', - 'stEnd', 'stMember', 'stTypedef', 'stFile', 'INVALID', 'INVALID', 'stStaticProc', 'stConstant', - 'stStaParam', 'INVALID', 'INVALID', 'INVALID', 'INVALID', 'INVALID', 'INVALID', 'INVALID', - 'INVALID', 'INVALID', 'stStruct', 'stUnion', 'stEnum', 'INVALID', 'INVALID', 'INVALID', - 'INVALID', 'INVALID', 'stIndirect'] -storage_class_list = ['scNil', 'scText', 'scData', 'scBss', 'scRegister', 'scAbs', 'scUndefined', 'reserved', - 'scBits', 'scDbx', 'scRegImage', 'scInfo', 'scUserStruct', 'scSData', 'scSBss', 'scRData', - 'scVar', 'scCommon', 'scSCommon', 'scVarRegister', 'scVariant', 'scUndefined', 'scInit'] -basic_type_c_list = ['nil', 'addr', 'signed char', 'unsigned char', 'short', 'unsigned short', 'int', 'unsigned int', - 'long', 'unsigned long', 'float', 'double', 'struct', 'union', 'enum', 'typedef', - 'range', 'set', 'complex', 'double complex', 'indirect', 'fixed decimal', 'float decimal', 'string', - 'bit', 'picture', 'void', 'long long', 'unsigned long long', 'INVALID', 'long', 'unsigned long', - 'long long', 'unsigned long long', 'addr', 'int64', 'unsigned int64'] - -def increase_indent(): - global indent_level - indent_level += 1 - -def decrease_indent(): - global indent_level - indent_level -= 1 - -def set_is_comment(set_to): - global is_comment - old = is_comment - is_comment = set_to - return old - -def get_indent(): - global indent_level - global is_comment - ret = '//' if is_comment else '' - for i in range(indent_level): - ret += ' ' - return ret - -def check_indent(): - global indent_level - assert indent_level == 0 - -def read_uint32_be(file_data, offset): - return struct.unpack('>I', file_data[offset:offset+4])[0] - -def read_uint16_be(file_data, offset): - return struct.unpack('>H', file_data[offset:offset+2])[0] - -def read_uint8_be(file_data, offset): - return struct.unpack('>B', file_data[offset:offset+1])[0] - -def read_elf_header(file_data, offset): - Header = collections.namedtuple('ElfHeader', - '''e_magic e_class e_data e_version e_osabi e_abiversion e_pad - e_type e_machine e_version2 e_entry e_phoff e_shoff e_flags - e_ehsize e_phentsize e_phnum e_shentsize e_shnum e_shstrndx''') - return Header._make(struct.unpack('>I5B7s2H5I6H', file_data[offset:offset+52])) - -def read_elf_section_header(file_data, offset): - Header = collections.namedtuple('SectionHeader', - '''sh_name sh_type sh_flags sh_addr sh_offset sh_size sh_link - sh_info sh_addralign sh_entsize''') - return Header._make(struct.unpack('>10I', file_data[offset:offset+40])) - -def read_symbolic_header(file_data, offset): - Header = collections.namedtuple('SymbolicHeader', - '''magic vstamp ilineMax cbLine cbLineOffset idnMax cbDnOffset - ipdMax cbPdOffset isymMax cbSymOffset ioptMax cbOptOffset - iauxMax cbAuxOffset issMax cbSsOffset issExtMax cbSsExtOffset - ifdMax cbFdOffset crfd cbRfdOffset iextMax cbExtOffset''') - return Header._make(struct.unpack('>2H23I', file_data[offset:offset+96])) - -# TODO find a better solution for the bitfield -def read_file_descriptor(file_data, offset): - if 'init' not in read_file_descriptor.__dict__: - read_file_descriptor.cache = {} - read_file_descriptor.header = collections.namedtuple('FileDescriptor', - '''adr rss issBase cbSs isymBase csym ilineBase cline ioptBase - copt ipdFirst cpd iauxBase caux rfdBase crfd XXX_bitfield - cbLineOffset cbLine''') - read_file_descriptor.init = True - if offset in read_file_descriptor.cache: - return read_file_descriptor.cache[offset] - read_file_descriptor.cache[offset] = read_file_descriptor.header._make( - struct.unpack('>I2iI6iHh4iI2I', file_data[offset:offset+72])) - return read_file_descriptor.cache[offset] - -def read_procedure_descriptor(file_data, offset): - Header = collections.namedtuple('ProcedureDescriptor', - '''adr isym iline regmask regoffset iopt fregmask fregoffset - frameoffset framereg pcreg lnLow lnHigh cbLineOffset''') - return Header._make(struct.unpack('>I8i2h2iI', file_data[offset:offset+52])) - -def read_symbol(file_data, offset): - if 'init' not in read_symbol.__dict__: - read_symbol.cache = {} - read_symbol.header = collections.namedtuple('Symbol', '''iss value st sc index''') - read_symbol.init = True - if offset in read_symbol.cache: - return read_symbol.cache[offset] - (word0, word1, word2) = struct.unpack('>iiI', file_data[offset:offset+12]) - read_symbol.cache[offset] = read_symbol.header._make(( - word0, word1, (word2 >> 26) & 0x3F, (word2 >> 21) & 0x1F, word2 & 0xFFFFF)) - return read_symbol.cache[offset] - -def read_auxiliary_symbol(file_data, offset): - if 'init' not in read_auxiliary_symbol.__dict__: - read_auxiliary_symbol.cache = {} - read_auxiliary_symbol.header = collections.namedtuple('AuxSymbol', - '''ti rndx dnLow dnHigh isym iss width count''') - read_auxiliary_symbol.type_info = collections.namedtuple('TypeInfo', - '''fBitfield continued bt tq4 tq5 tq0 tq1 tq2 tq3''') - read_auxiliary_symbol.rel_sym = collections.namedtuple('RelativeSymbol', '''rfd index''') - read_auxiliary_symbol.init = True - if offset in read_auxiliary_symbol.cache: - return read_auxiliary_symbol.cache[offset] - word0 = struct.unpack('>I', file_data[offset:offset+4])[0] - read_auxiliary_symbol.cache[offset] = read_auxiliary_symbol.header._make(( - read_auxiliary_symbol.type_info._make(((word0 >> 31) & 1, (word0 >> 30) & 1, (word0 >> 24) & 0x3F, (word0 >> 20) & 0xF, (word0 >> 16) & 0xF, (word0 >> 12) & 0xF, (word0 >> 8) & 0xF, (word0 >> 4) & 0xF, word0 & 0xF)), - read_auxiliary_symbol.rel_sym._make(((word0 >> 20) & 0xFFF, word0 & 0xFFFFF)), - word0, word0, word0, word0, word0, word0)) - return read_auxiliary_symbol.cache[offset] - -def read_string(file_data, offset): - current_offset = 0 - current_string = b'' - while True: - char = struct.unpack('c', file_data[offset+current_offset:offset+current_offset+1])[0] - if char == b'\0': - return current_string.decode('ascii') - else: - current_string += char - current_offset += 1 - -def map_relative_file_descriptor(file_data, fd, symbolic_header, rfd_num): - if fd.crfd == 0: - return rfd_num - - offset = symbolic_header.cbRfdOffset - OFFSET + (fd.rfdBase + rfd_num)*4 - return struct.unpack('>I', file_data[offset:offset+4])[0] - -def get_symbol_name_from_aux(file_data, fd, symbolic_header, aux_num, search_for_typedef): - aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + aux_num)*4) - fd_num = aux.rndx.rfd - next_aux = aux_num+1 - if fd_num == 4095: - aux2 = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + next_aux)*4) - fd_num = aux2.isym - next_aux = next_aux+1; - fd_num = map_relative_file_descriptor(file_data, fd, symbolic_header, fd_num) - fd2 = read_file_descriptor(file_data, symbolic_header.cbFdOffset - OFFSET + fd_num*72) - sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + (fd2.isymBase + aux.rndx.index)*12) - ret = '' - #print('%r' % (aux,)); - #print('%r' % (aux2,)); - #print('%r' % (sym,)); - if sym.st == 26 or sym.st == 27: #stStruct, stunion - ret = get_struct_or_union_string(file_data, fd2, symbolic_header, fd2.isymBase + aux.rndx.index, search_for_typedef) - elif sym.st == 28: #stEnum: - ret = get_enum_string(file_data, fd2, symbolic_header, fd2.isymBase + aux.rndx.index) - else: - ret = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd2.issBase + sym.iss) - return (ret, next_aux) - -def get_type_string(file_data, fd, symbolic_header, aux_num, name, search_for_typedef): - ret = '' - aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + aux_num)*4) - #print(''); - #print('%r' % (aux,)); - next_aux = aux_num+1 - has_bitfield = aux.ti.fBitfield == 1 - bitwidth = 0 - if has_bitfield: - bit_aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + next_aux)*4) - bitwidth = bit_aux.isym - next_aux = next_aux+1 - if aux.ti.bt == 12: # btStruct - (ret, next_aux) = get_symbol_name_from_aux(file_data, fd, symbolic_header, next_aux, search_for_typedef) - elif aux.ti.bt == 13: # btUnion - (ret, next_aux) = get_symbol_name_from_aux(file_data, fd, symbolic_header, next_aux, search_for_typedef) - elif aux.ti.bt == 15: # btTypedef - (ret, next_aux) = get_symbol_name_from_aux(file_data, fd, symbolic_header, next_aux, search_for_typedef) - elif aux.ti.bt == 14: # btEnum - (ret, next_aux) = get_symbol_name_from_aux(file_data, fd, symbolic_header, next_aux, search_for_typedef) - else: - if aux.ti.bt >= 36: - print('Error unknow bt: %d' % (aux.ti.bt)) - ret = basic_type_c_list[aux.ti.bt] - - tq_list = (aux.ti.tq0, aux.ti.tq1, aux.ti.tq2, aux.ti.tq3, aux.ti.tq4, aux.ti.tq5) - - # TODO this is very naive and probably does not work in a large amount of cases - last_was_proc = False # if we see a tqProc, assume the next will be a tqPtr - for tq in tq_list: - if tq == 0: # tqNil - break; - elif tq == 1: # tqPtr - if last_was_proc: - last_was_proc = False - continue - ret += '*' - elif tq == 2: # tqProc - last_was_proc = True - name = '(*%s)(/* ECOFF does not store param types */)' % name - elif tq == 3: # tqArray - next_aux += 2 # todo what does this skip over? (Apparantly the type of the index, so always int for C) - array_low_aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + next_aux)*4) - array_high_aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + next_aux+1)*4) - stride_aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + next_aux+2)*4) - next_aux += 3 - if array_high_aux.dnHigh == 0xFFFFFFFF: - name += '[]' - else: - name += '[%d]' % (array_high_aux.dnHigh + 1) - elif tq == 4: # tqFar - print('ERROR tqFar in get_type_name') - elif tq == 5: # tqVol - ret = 'volatile ' + ret - elif tq == 6: # tqConst - ret = 'const ' + ret - if has_bitfield: - name += ' : %d' % bitwidth - return ret + ' ' + name - -def get_enum_string(file_data, fd, symbolic_header, enum_sym_num): - ret = '' - start_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + enum_sym_num*12) - if start_sym.st != 28: - print('ERROR unknown type in get_enum_string start:%d' % start_sym.st) - return ret - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + start_sym.iss) - if name != '': - name += ' ' - ret += 'enum %s{\n' % name - increase_indent() - sym_num = enum_sym_num + 1 - while sym_num < fd.isymBase + start_sym.index: - sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - if sym.st == 8: # stEnd - decrease_indent() - ret += get_indent() - ret += '}' - elif sym.st == 9: # stMember - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + sym.iss) - ret += get_indent() - ret += '%s = %d,\n' % (name, sym.value) - else: - print('ERROR unknown type in get_enum_string:%d' % sym.st) - break - sym_num += 1 - return ret - -def get_struct_or_union_string(file_data, fd, symbolic_header, union_sym_num, search_for_typedef): - ret = '' - start_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + union_sym_num*12) - if search_for_typedef: - typedef_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + (fd.isymBase + start_sym.index)*12) - if typedef_sym.st == 10: # stTypedef - return read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + typedef_sym.iss) - else: - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + start_sym.iss) - if name != '': - return name - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + start_sym.iss) - if name != '': - name += ' ' - if start_sym.st == 26: # stStruct - ret += 'struct %s{\n' % name - increase_indent() - elif start_sym.st == 27: # stUnion - ret += 'union %s{\n' % name - increase_indent() - else: - print('ERROR unknown type in get_struct_or_union_string start:%d' % start_sym.st) - return ret - sym_num = union_sym_num + 1 - while sym_num < fd.isymBase + start_sym.index: - sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - if sym.st == 8: # stEnd - decrease_indent() - ret += get_indent() - ret += '}' - elif sym.st == 9: # stMember - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + sym.iss) - ret += get_indent() - ret += '/* 0x%X */ %s;\n' % (sym.value // 8, get_type_string(file_data, fd, symbolic_header, sym.index, name, True)) - elif sym.st == 26 or sym.st == 27: #stStruct, stUnion - sym_num = fd.isymBase + sym.index - continue - elif sym.st == 34: # stIndirect - # TODO what even is a stIndirect? - sym_num += 1 - else: - print('ERROR unknown type in get_struct_or_union_string:%d' % sym.st) - break - sym_num += 1 - return ret - -def print_typedef_symbols(file_data, fd, symbolic_header, typedef_sym_num): - typedef_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + typedef_sym_num*12) - if typedef_sym.st != 10: # stTypedef - print('ERROR expected stTypedef symbol in print_typedef_symbols, found:%d' % typedef_sym.st) - return - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + typedef_sym.iss) - print('typedef %s;' % get_type_string(file_data, fd, symbolic_header, typedef_sym.index, name, False)) - -def print_procedure(file_data, fd, symbolic_header, proc_sym_num): - proc_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + proc_sym_num*12) - proc_name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + proc_sym.iss) - print('%s(' % get_type_string(file_data, fd, symbolic_header, proc_sym.index+1, proc_name, True), end='') - sym_num = proc_sym_num+1 - param_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - first = True - while param_sym.st == 3: # stParam - param_name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + param_sym.iss) - print('%s%s' % ('' if first else ', ', - get_type_string(file_data, fd, symbolic_header, param_sym.index, param_name, True)), - end='') - sym_num += 1 - param_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - first = False - - print(');') - - check_indent(); - - comment_old = set_is_comment(True) - while sym_num < fd.isymBase + fd.csym: - sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - sym_num += 1 - if sym.st == 7: # stBlock - print('%s{' % get_indent()) - increase_indent() - elif sym.st == 8: # stEnd - end_name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + sym.iss) - if end_name == proc_name: - break - if end_name != '': - # this is a stEnd for something other than the function. Let's back out and return - sym_num -= 1 - break - decrease_indent() - print('%s}' % get_indent()) - elif sym.st == 4: # stLocal - local_name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + sym.iss) - is_reg = sym.sc == 4 # scRegister - print('%s%s%s;' % (get_indent(), - 'register ' if is_reg else '', - get_type_string(file_data, fd, symbolic_header, sym.index, local_name, True))) - elif sym.st == 2: # stStatic - static_name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + sym.iss) - if sym.index == 0xFFFFF: - print('%sstatic %s; // no type symbol' % (get_indent(),static_name)) - else: - print('%sstatic %s;' % (get_indent(),get_type_string(file_data, fd, symbolic_header, sym.index, static_name, True))) - elif sym.st == 5: # stLabel - label_name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + sym.iss) - print('%sLabel: %s @ %d;' % (get_indent(), label_name, sym.value)) - elif sym.st == 6: # stProc - # multiple name for function? - sym_num = print_procedure(file_data, fd, symbolic_header, sym_num-1) - elif sym.st == 26 or sym.st == 27: # stStruct, stUnion - print('%s%s;' % (get_indent(), get_struct_or_union_string(file_data, fd, symbolic_header, sym_num-1, False))) - sym_num = fd.isymBase + sym.index - elif sym.st == 28: # stEnum - print('%s%s;' % (get_indent(), get_enum_string(file_data, fd, symbolic_header, sym_num-1))) - sym_num = fd.isymBase + sym.index - elif sym.st == 34: # stIndirect - # TODO what even is a stIndirect? - indirect_name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + sym.iss) - print('%sTODO Indirect: %s;' % (get_indent(), indirect_name)) - else: - print('ERROR unknown st in print_procedure: %d' % sym.st) - set_is_comment(comment_old) - - check_indent(); - - return sym_num - -def print_symbols(file_data, fd, symbolic_header): - sym_num = fd.isymBase - indirects = [] - typedefs = [] - while sym_num < fd.isymBase + fd.csym: - root_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - if root_sym.st == 10: # stTypedef - aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + root_sym.index)*4) - offset = 0 - if aux.ti.fBitfield == 1: - offset = 1 - if aux.ti.bt == 12 or aux.ti.bt == 13 or aux.ti.bt == 14 or aux.ti.bt == 15: # btStruct, btUnion, btEnum, btTypedef - aux2 = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + root_sym.index + 1 + offset)*4) - fd_num = aux2.rndx.rfd - if fd_num == 4095: - fd_num = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + root_sym.index + 2 + offset)*4).isym - fd_num = map_relative_file_descriptor(file_data, fd, symbolic_header, fd_num) - fd2 = read_file_descriptor(file_data, symbolic_header.cbFdOffset - OFFSET + fd_num*72) - sym2 = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + (fd2.isymBase + aux2.rndx.index)*12) - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd2.issBase + sym2.iss) - if name != '': - typedefs.append(name) - elif root_sym.st == 34: # stIndirect - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + root_sym.iss) - indirects.append(name); - sym_num += 1 - sym_num = fd.isymBase - while sym_num < fd.isymBase + fd.csym: - root_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - if root_sym.st == 11: # stFile - file_name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + root_sym.iss) - print('// begin file %s\n' % file_name) - sym_num += 1 - leaf_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - while leaf_sym.st != 8: # stEnd - if leaf_sym.st == 26 or leaf_sym.st == 27: # stStruct, stUnion - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + leaf_sym.iss) - if (name != '') and ((name in indirects) or (name not in typedefs)): # TODO - print('%s;\n' % get_struct_or_union_string(file_data, fd, symbolic_header, sym_num, False)) - sym_num = fd.isymBase + leaf_sym.index - elif leaf_sym.st == 28: # stEnum - name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + leaf_sym.iss) - if (name != '') and (name not in typedefs): # TODO - print('%s;\n' % get_enum_string(file_data, fd, symbolic_header, sym_num)) - sym_num = fd.isymBase + leaf_sym.index - elif leaf_sym.st == 10: # stTypedef - # TODO typedef for stIndirect shoulf print the keyword i.e. typdef >struct< THING thing - print_typedef_symbols(file_data, fd, symbolic_header, sym_num) - sym_num += 1 - print('') - elif leaf_sym.st == 6 or leaf_sym.st == 14: # stProc, stStaticProc - # TODO how do stProc and stStaticProc differ? stStaticProc isn't exported? - sym_num = print_procedure(file_data, fd, symbolic_header, sym_num) - print('') - elif leaf_sym.st == 2: # stStatic - static_name = read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + leaf_sym.iss) - if leaf_sym.sc == 2 or leaf_sym.sc == 3 or leaf_sym.sc == 5 or leaf_sym.sc == 15: # scData, scBss, scAbsolute, scRData - if leaf_sym.index != 0xFFFFF: # looks like it's an invalid value for .s files - print('static %s;\n' % get_type_string(file_data, fd, symbolic_header, leaf_sym.index, static_name, True)) - else: - print('static %s;\n' % static_name) - else: - print('ERROR unknown sc for stStatic in print_symbols: %d' % leaf_sym.sc) - sym_num += 1 - elif leaf_sym.st == 34: # stIndirect - # stIndirect is put out when the compiler sees a struct when it is not yet defined - # TODO more info - sym_num += 1 - elif leaf_sym.st == 5: # stLabel - print('// label: %s' % read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + leaf_sym.iss)) - sym_num += 1 - elif leaf_sym.st == 0: # stNil - print('// nil: %s' % read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + leaf_sym.iss)) - sym_num += 1 - else: - print('ERROR unknown st in leaf_sym in print_symbols: %d' % leaf_sym.st) - sym_num += 1 - leaf_sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - sym_num = fd.isymBase + root_sym.index - print('// end file %s' % file_name) - else: - print('ERROR expected st of stFile as only root type in print_symbols:%d' % root_sym.st) - return - -def main(): - global OFFSET - if len(sys.argv) < 2: - return # TODO print usage - - filename = sys.argv[1] - - try: - with open(filename, 'rb') as f: - file_data = f.read() - except IOError: - print('failed to read file ' + filename) - return - - elf_header = read_elf_header(file_data, 0) - section_headers = [] - debug_index = 0xFFFFFFFF - #print('%r' % (elf_header,)) - for i in range(elf_header.e_shnum): - section_headers.append(read_elf_section_header(file_data, elf_header.e_shoff + i*40)) - #print('%r' % (section_headers[i],)) - if section_headers[i].sh_type == 0x70000005: - debug_index = i - - if debug_index != 0xFFFFFFFF: - symbolic_header = read_symbolic_header(file_data, section_headers[debug_index].sh_offset) - file_descriptors = [] - print('%r' % (symbolic_header,)) - # Set offset by assuming that there are no optimization symbols so cbOptOffset points to the start of the symbolic header - #OFFSET = symbolic_header.cbOptOffset - section_headers[debug_index].sh_offset - #print('Using OFFSET of %d' % OFFSET) - #for sym_num in range(symbolic_header.isymMax): - #sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - #print('%d:%r' % (sym_num, (sym,))); - #for aux_num in range(symbolic_header.iauxMax): - #aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + aux_num*4) - #print('%d:%r' % (aux_num, (aux,))); - for file_num in range(symbolic_header.ifdMax): - fd = read_file_descriptor(file_data, symbolic_header.cbFdOffset - OFFSET + file_num*72) - file_descriptors.append(fd) - for file_num in range(symbolic_header.ifdMax): - fd = read_file_descriptor(file_data, symbolic_header.cbFdOffset - OFFSET + file_num*72) - print('%r' % (fd,)) - print(' name:%s' % read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + fd.rss)) - - ''' - print(' Relative File Descriptors:') - for rfd_num in range(fd.rfdBase, fd.rfdBase + fd.crfd): - offset = symbolic_header.cbRfdOffset - OFFSET + rfd_num*4 - rfd_index = struct.unpack('>I', file_data[offset:offset+4])[0] - rfd = read_file_descriptor(file_data, symbolic_header.cbFdOffset - OFFSET + rfd_index*72) - print(' %d:%r' % (rfd_index, (rfd,))) - ''' - - ''' - print(' procedures:') - for proc_num in range(fd.ipdFirst, fd.ipdFirst + fd.cpd): - pd = read_procedure_descriptor(file_data, symbolic_header.cbPdOffset - OFFSET + proc_num*52) - print(' %r' % ((pd,))) - ''' - - ''' - print(' symbols:') - for sym_num in range(fd.isymBase, fd.isymBase + fd.csym): - sym = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + sym_num*12) - print(' %r' % ((sym,))) - print(' name:%s' % read_string(file_data, symbolic_header.cbSsOffset - OFFSET + fd.issBase + sym.iss)) - print(' type:%s(%d)' % (symbol_type_list[sym.st], sym.st)) - print(' storage class:%s(%d)' % (storage_class_list[sym.sc], sym.sc)) - if sym.st == 3 or sym.st == 4 or sym.st == 9 or sym.st == 10 or sym.st == 28: # stParam, stLocal, stMember, stTypedef, stEnum - aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + sym.index)*4) - print(' %r' % ((aux,))) - offset = 0 - if aux.ti.fBitfield == 1: - bitfield_aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + sym.index + 1)*4) - print(' %r' % ((bitfield_aux,))) - offset = 1 - if aux.ti.bt == 12 or aux.ti.bt == 13 or aux.ti.bt == 14 or aux.ti.bt == 15: # btStruct, btUnion, btEnum, btTypedef - aux2 = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + sym.index + 1 + offset)*4) - print(' %r' % ((aux2,))) - fd_num = aux2.rndx.rfd - if fd_num == 4095: - aux3 = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + sym.index + 2 + offset)*4) - print(' %r' % ((aux3,))) - fd_num = aux3.isym - fd_num = map_relative_file_descriptor(file_data, fd, symbolic_header, fd_num) - sym2 = read_symbol(file_data, symbolic_header.cbSymOffset - OFFSET + (file_descriptors[fd_num].isymBase + aux2.rndx.index)*12) - print(' %r' % (sym2,)) - print(' name:%s' % read_string(file_data, symbolic_header.cbSsOffset - OFFSET + file_descriptors[aux3.isym].issBase + sym2.iss)) - if sym.st == 6 or sym.st == 14: # stProc, stStaticProc - # TODO what is the first aux symbol for? - aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + sym.index)*4) - type_aux = read_auxiliary_symbol(file_data, symbolic_header.cbAuxOffset - OFFSET + (fd.iauxBase + sym.index+1)*4) - print(' %r' % ((aux,))) - print(' %r' % ((type_aux,))) - ''' - - print(' pretty print:') - print_symbols(file_data, fd, symbolic_header) - - -main() \ No newline at end of file diff --git a/tools/set_o32abi_bit.py b/tools/set_o32abi_bit.py deleted file mode 100755 index fc22d2c..0000000 --- a/tools/set_o32abi_bit.py +++ /dev/null @@ -1,25 +0,0 @@ -#!/usr/bin/env python3 -import argparse, struct, sys - -if __name__ == '__main__': - parser = argparse.ArgumentParser() - - parser.add_argument('file', help='input file') - args = parser.parse_args() - - with open(args.file, 'r+b') as f: - magic = struct.unpack('>I', f.read(4))[0] - if magic != 0x7F454C46: - print('Error: Not an ELF file') - sys.exit(1) - - f.seek(36) - flags = struct.unpack('>I', f.read(4))[0] - # if flags & 0xF0000000 != 0x20000000: # test for mips3 - # print('Error: Architecture not mips3') - # sys.exit(1) - - flags |= 0x00001000 # set EF_MIPS_ABI_O32 - f.seek(36) - f.write(struct.pack('>I', flags)) - diff --git a/tools/strip_debug.sh b/tools/strip_debug.sh deleted file mode 100755 index 4a8be78..0000000 --- a/tools/strip_debug.sh +++ /dev/null @@ -1,10 +0,0 @@ -#!/usr/bin/bash - -cd $1 - -mkdir -p .cmp - -for f in *.o ; -do - ${CROSS}objcopy -p --strip-debug $f .cmp/${f/.o/.cmp.o} -done diff --git a/tools/util.py b/tools/util.py deleted file mode 100644 index b6c6155..0000000 --- a/tools/util.py +++ /dev/null @@ -1,44 +0,0 @@ - -import struct - -def enumerate_stepped(l, start=0, step=1): - p = start - for e in l: - yield p, e - p += step - -def back_align(x, al): - return x - (x % al) - -def forward_align(x, al): - return (x + (al - 1)) & ~(al - 1) - -def as_double(b): - return struct.unpack(">d", b)[0] - -def as_dword(b): - return struct.unpack(">Q", b)[0] - -def as_float(b): - return struct.unpack(">f", b)[0] - -def as_word(b): - return struct.unpack(">I", b)[0] - -def as_hword(b): - return struct.unpack(">H", b)[0] - -def as_double_list(b): - return [i[0] for i in struct.iter_unpack(">d", b)] - -def as_dword_list(b): - return [i[0] for i in struct.iter_unpack(">Q", b)] - -def as_float_list(b): - return [i[0] for i in struct.iter_unpack(">f", b)] - -def as_word_list(b): - return [i[0] for i in struct.iter_unpack(">I", b)] - -def as_hword_list(b): - return [h[0] for h in struct.iter_unpack(">H", b)]